Untitled - The Sharp MZ-Series

SEITE 382
BASIC 1Z-013B V1.0A
22015 55FF 48 LD C.B LÄNGE HEX-ASCII-TEXT
22016 5600 2A 03 38 LO HL. (3803) I ZEIGER AUF
22017 ISTRINGARBEITSBEREICH
22018
22019 5603 E5 PUSH HL MERKEN
22020 5604 CD 00 58 CALL 5800 I IN S ANGEGEBENE ANZAHL
22021 I ZEICHEN VON (OE) NACH
22022 I (HL) üBE~TRAGEN
22023 5607 EB EX DE.HL
22024 5608 E1 POP HL ZEIGER AUF STRING
22025 5609 D9 EXX
22026 560A Dl POP OE ZEIGER FüR DESCRIPTOR
22027 560B D9 EXX
22028 560C C3 CB 55 JP 55CB IDESCRIPTOR FüR ERGEBNIS
22029 I AUFBAUEN
22030
22031 560F CD 21 3D CALL 3021 IREAL-WERT (HL) UMSETZEN
2203 2 I IN INTEGER NACH HL
22033
2203 4 5612 11 OF 11 LD OE. 110F I ZEIGER AUF ZWISCHEN­
22035 I SPEICHER FüR HEX-WERT
22036
22037 5615 C9 RET
Hex-Wert in HL umsetzen in Hex-ASCII-Zeichenfolge nach (OE)
22038 5616 05 PUSH OE ZEIGER AUF ASCII-SPEICHER
22039 5617 7C LD A.H H- BYTE WERT
22040 5618 CO 29 56 CALL 5629 IH-NIBsLE UMSETZEN
22041 I IN ASCII NACH (OE)
22042
22043 561B 7C LO A.H H-BYTE WERT
22044 561C CO 2D 56 CALL 562D IL-NIBBLE UMSETZEN
22045 I IN ASCII NACH (DE)
22046
22047 561F 7D LD A.L L-BYTE WERT
22048 5620 CD 29 56 CALL 5629 IH- NIBSLE UMSETZEN
22049 I IN ASCII NACH (OE)
22050
22051 5623 70 LO A.L L- BYTE WERT
22052 5624 CD 2D 56 CALL 5620 IL-NIBBLE UMSETZEN
22053 I IN ASCII NACH (OE)
22054
22055 5627 Dl POP OE ZEIGER AUF ASCII-TEXT
2 2056 5628 C9 RET
H-Nibble des Hex - Wertes im Accu umsetzen in ASCII nach (DE)
22057 5629 07 RLCA IH-NIBBLE AUF L-NIBBLE
22058 562A 07 RLCA I SCHIEBEN
22059 562B 07 RLCA I
22060 562C 07 RLCA I
22061 5620 E6 OF ANO A. OF L-NIBBLE MASKIEREN
22062
22063 562F C6 30 ADO A. 30 UMSETZEN IN ASCII
22064
22065 5631 FE 3A CP 3A 0-9 ?
22066
BASIC 1Z
22067 5633 38 02 JR C.
22068
22069 5635 C6 07 AOO A
22070
22071 5637 12 LO