Untitled - The Sharp MZ-Series

Untitled - The Sharp MZ-Series Untitled - The Sharp MZ-Series

20.02.2014 Aufrufe

SEITE 28 BASIC 1Z-013B V1.0A Zeiger auf Verkettungsflag der Zeile mit V-Koordinate in H bereitstellen 1454 05AE 5C LD E.H V-KOORDINATE 1455 05AF 16 00 LD D. 00 OE ENTHÄLT OFFSET 1456 1457 05Bl 21 A7 00 LD HL~ 00A7 I ANFANG TABELLE MIT VER­ 1458 IKETTUNGSFLAGS FUR SILD­ 1459 ISCHIRMZEILEN 1460 0584 19 ADD HL,DE ZEIGER AUF FLAG ERRECHNEN 1461 0585 C9 RET Bildschirmkoordinate aus Cursorposition errechnen 1462 05S6 2A 54 00 LD HL. (0054) AKTUELLE CURSORPOSITION 1463 1464 1465 05B9 05 PUSH OE REGISTER RETTEN 1466 05BA CD C5 05 CALL 05C5 IBILDSPEICHEROFFSET AUF 1467 IANFANG ZEILE AUS CURSOR­ 1468 I POSITION ERRECHNEN 1469 05SD 16 00 LD 0, 00 ANFANG BILDSPEICHER 147(1 1471 05BF 19 ADD HL,DE AKTUELLE ADRESSE ERRECHNEN 1472 05CO 01 POP OE GERETTETES REGISTER HOLEN 1473 05Cl C9 RET Bildspeicheroffset auf Anfang physikalische Zeile aus Cursorkoordinate errechnen 1474 05C2 2A 54 00 LD HL, (0054) ; AKTUELLE CURSORKOORDINATE 1475 1476 1477 05C5 50 LD E.L X-KOORDINATE 1478 05C6 6C LD L.H V-KOORDINATE 1479 05C7 26 00 LD H. 00 ; HL ENTHÄLT V-KOORDINATE 1480 1481 05C9 40 LD C.L V-KOORDINATE 1482 05CA 44 LD B.H NULL 1483 05CS 29 ADD HL,HL I MAL 2 (40 ZEICHEN 1484 05CC 29 ADD HL.HL ; I MAL 4 JE ZEILE) 1485 05CD 09 ADD HL.BC I MAL 5 1486 05CE 29 ADD HL.HL I MAL 10 1487 05CF 29 ADD HL.HL • I MAL 20 1488 0500 29 ADD HL.HL ; I MAL 40 1489 0501 C9 RET Steuerzeichen-Routine nach Steuerzeichen im Accu aufrufen 1490 0502 6F LD L.A • STEUERZEICHEN 1491 0503 26 00 LD H. 00 l HL ENTHÄLT OFFSET 1492 1493 05D5 29 ADD HL.HL MAL ZWEI 1494 0506 01 67 00 LD BC. 0067 I ANFANG TABELLE MIT 1495 IANFANGSADRESSEN DER 1496 ISTEUERZEICHENROUTINEN 1497 05D9 09 ADD HL.BC I ZEIGER AUF ADRESSE ERRECH. 1498 05DA 4E LD C. (HLl I ADRESSE AUS TABELLE 1499 05DB 23 INC HL I HOLEN BASIC 1 1500 05DC 66 LD H. 1501 0500 69 LD L, 1502 05DE E9 JP (H Bildschirmausschnitt nach 1503 05DF 01 28 00 LO BC 1504 1505 150605E2 ED 43 FO 05 LO (0 1507 1508 1509 1510 05E6 09 EXX 1511 05E7 C5 PUSH 1512 05E8 09 EXX 1513 05E9 44 LD B 1514 05EA · 4D LD C 1515 05EB 15 DEC 0 1516 05EC 28 29 JR Z. 1517 1518 05EE 05 PUSH 1519 05EF 21 28 00 LD HL 1520 1521 1522 05F2 09 ADD H 1523 05F3 E5 PUSH 1524 05F4 E5 PUSH 1525 05F5 D9 EXX 1526 05F6 Cl POP. B 1527 05F7 09 EXX 1528 05F8 F3 01 1529 05F9 03 E3 OUT 1530 1531 05FS D9 EXX 1532 05FC OA LD A, 1533 05FD 09 EXX 1534 05FE 02 LD (B 1535 05FF 09 EXX 1536 0600 CS 98 RES 3 1537 1538 0602 OA LD A, 1539 0603 CB 08 SET 3 1540 1541 0605 03 INC B 1542 0606 09 EXX 1543 0607 CS 98 RES 3 1544 1545 0609 02 LD (B 1546 060A CB 08 SET 3 1547 1548 060C 03 I NC B 1549 060D 10 DEC E 1550 060E 20 EB JR NZ 1551 1552 0610 03 El OUT 1553 1554 0612 FB EI 1555 0613 Ei POP H 1556 0614 01 POP D 1557 0615 18 02 JR 02

SEITE 28 <br />

BASIC 1Z-013B V1.0A <br />

Zeiger auf Verkettungsflag der Zeile mit V-Koordinate <br />

in H bereitstellen <br />

1454 05AE 5C LD E.H V-KOORDINATE <br />

1455 05AF 16 00 LD D. 00 OE ENTHÄLT OFFSET<br />

1456<br />

1457 05Bl 21 A7 00 LD HL~ 00A7 I ANFANG TABELLE MIT VER­<br />

1458 IKETTUNGSFLAGS FUR SILD­<br />

1459 ISCHIR<strong>MZ</strong>EILEN<br />

1460 0584 19 ADD HL,DE ZEIGER AUF FLAG ERRECHNEN<br />

1461 0585 C9 RET<br />

Bildschirmkoordinate aus Cursorposition errechnen<br />

1462 05S6 2A 54 00 LD HL. (0054) AKTUELLE CURSORPOSITION<br />

1463<br />

1464<br />

1465 05B9 05 PUSH OE REGISTER RETTEN<br />

1466 05BA CD C5 05 CALL 05C5 IBILDSPEICHEROFFSET AUF<br />

1467 IANFANG ZEILE AUS CURSOR­<br />

1468 I POSITION ERRECHNEN<br />

1469 05SD 16 00 LD 0, 00 ANFANG BILDSPEICHER<br />

147(1<br />

1471 05BF 19 ADD HL,DE AKTUELLE ADRESSE ERRECHNEN<br />

1472 05CO 01 POP OE GERETTETES REGISTER HOLEN<br />

1473 05Cl C9 RET<br />

Bildspeicheroffset auf Anfang physikalische Zeile <br />

aus Cursorkoordinate errechnen <br />

1474 05C2 2A 54 00 LD HL, (0054) ; AKTUELLE CURSORKOORDINATE<br />

1475<br />

1476<br />

1477 05C5 50 LD E.L X-KOORDINATE<br />

1478 05C6 6C LD L.H V-KOORDINATE<br />

1479 05C7 26 00 LD H. 00 ; HL ENTHÄLT V-KOORDINATE<br />

1480<br />

1481 05C9 40 LD C.L V-KOORDINATE<br />

1482 05CA 44 LD B.H NULL<br />

1483 05CS 29 ADD HL,HL I MAL 2 (40 ZEICHEN<br />

1484 05CC 29 ADD HL.HL ; I MAL 4 JE ZEILE)<br />

1485 05CD 09 ADD HL.BC I MAL 5<br />

1486 05CE 29 ADD HL.HL I MAL 10<br />

1487 05CF 29 ADD HL.HL • I MAL 20<br />

1488 0500 29 ADD HL.HL ; I MAL 40<br />

1489 0501 C9 RET<br />

Steuerzeichen-Routine nach Steuerzeichen im Accu aufrufen<br />

1490 0502 6F LD L.A • STEUERZEICHEN<br />

1491 0503 26 00 LD H. 00 l HL ENTHÄLT OFFSET<br />

1492<br />

1493 05D5 29 ADD HL.HL MAL ZWEI<br />

1494 0506 01 67 00 LD BC. 0067 I ANFANG TABELLE MIT<br />

1495 IANFANGSADRESSEN DER<br />

1496 ISTEUERZEICHENROUTINEN<br />

1497 05D9 09 ADD HL.BC I ZEIGER AUF ADRESSE ERRECH.<br />

1498 05DA 4E LD C. (HLl I ADRESSE AUS TABELLE<br />

1499 05DB 23 INC HL I HOLEN<br />

BASIC 1<br />

1500 05DC 66 LD H.<br />

1501 0500 69 LD L,<br />

1502 05DE E9 JP (H<br />

Bildschirmausschnitt nach<br />

1503 05DF 01 28 00 LO BC<br />

1504<br />

1505<br />

150605E2 ED 43 FO 05 LO (0<br />

1507<br />

1508<br />

1509<br />

1510 05E6 09 EXX<br />

1511 05E7 C5 PUSH<br />

1512 05E8 09 EXX<br />

1513 05E9 44 LD B<br />

1514 05EA · 4D LD C<br />

1515 05EB 15 DEC 0<br />

1516 05EC 28 29 JR Z.<br />

1517<br />

1518 05EE 05 PUSH<br />

1519 05EF 21 28 00 LD HL<br />

1520<br />

1521<br />

1522 05F2 09 ADD H<br />

1523 05F3 E5 PUSH<br />

1524 05F4 E5 PUSH<br />

1525 05F5 D9 EXX<br />

1526 05F6 Cl POP. B<br />

1527 05F7 09 EXX<br />

1528 05F8 F3 01<br />

1529 05F9 03 E3 OUT<br />

1530<br />

1531 05FS D9 EXX<br />

1532 05FC OA LD A,<br />

1533 05FD 09 EXX<br />

1534 05FE 02 LD (B<br />

1535 05FF 09 EXX<br />

1536 0600 CS 98 RES 3<br />

1537<br />

1538 0602 OA LD A,<br />

1539 0603 CB 08 SET 3<br />

1540<br />

1541 0605 03 INC B<br />

1542 0606 09 EXX<br />

1543 0607 CS 98 RES 3<br />

1544<br />

1545 0609 02 LD (B<br />

1546 060A CB 08 SET 3<br />

1547<br />

1548 060C 03 I NC B<br />

1549 060D 10 DEC E<br />

1550 060E 20 EB JR NZ<br />

1551<br />

1552 0610 03 El OUT<br />

1553<br />

1554 0612 FB EI<br />

1555 0613 Ei POP H<br />

1556 0614 01 POP D<br />

1557 0615 18 02 JR 02

Hurra! Ihre Datei wurde hochgeladen und ist bereit für die Veröffentlichung.

Erfolgreich gespeichert!

Leider ist etwas schief gelaufen!