Untitled - The Sharp MZ-Series
Untitled - The Sharp MZ-Series
Untitled - The Sharp MZ-Series
Erfolgreiche ePaper selbst erstellen
Machen Sie aus Ihren PDF Publikationen ein blätterbares Flipbook mit unserer einzigartigen Google optimierten e-Paper Software.
27003<br />
27004<br />
27012<br />
27020<br />
27032<br />
27033<br />
27035<br />
27038<br />
27047<br />
27048<br />
27050<br />
698DH<br />
I<br />
27053<br />
27055<br />
27063<br />
27075<br />
27078<br />
27080<br />
27084 69CC 2B<br />
27090<br />
27094 <br />
27095 <br />
27098 <br />
27100<br />
27101<br />
27103<br />
27104<br />
27107<br />
27109<br />
27110<br />
27112<br />
27113<br />
DEC H<br />
BASIC 1<br />
27054 69AE 30 DA JR N<br />
27056 69BO 5E LD E<br />
27057 69B1 23 INC<br />
27058 69B2 56 LD D<br />
27059 69B3<br />
23 INC<br />
27060 69B4 7A LD A<br />
27061 69B5 B3 OR E<br />
27062 69B6 28 13 JR Z<br />
27064 69B8 EB EX D<br />
27065 69B9 19 ADD<br />
27066 69BA EB EX D<br />
27067 69BB IB DEC<br />
27068 69BC 1B I;>EC<br />
27069 69BD D5 PUSH<br />
NOCH PROGRAMM VORHANDEN 27070 69BE 5E LD E<br />
27071 69BF 23 INC<br />
27072 69CO 56 \-D D<br />
27073 69Cl EB EX D<br />
27074 69C2<br />
ED 42 SBC H<br />
27076 69C4 E1 POP H<br />
27077 69C5 38 E9 JR C<br />
27079 69C7 28 04 JR Z<br />
27081 69C9 EB EX D<br />
27082 69CA 2B DEC H<br />
27083 69CB 2B DEC H<br />
27085 69CD 01 POP D<br />
I 27086 69CE 05 Pl,ISH<br />
27087 69CF E5 PUSH<br />
27088 69DO B7 OR A<br />
27089 69D1 ED 52 SBC H<br />
27091 69D3 4D LD C<br />
27092 69D4 44 LD B,<br />
27093 69D5 2A 83 6A LD HL<br />
27096 69D8 87 OR A<br />
27097 69D9 ED 42 SBC H<br />
27099 69DB 22 B3 6A LD (6<br />
27102 69DE 2A DA 38 LD HL<br />
27105 69E1 87 OR A<br />
27106 69E2 ED 42 SBC H<br />
27108 69E4 22 DA 38 LD (3<br />
GLEICH ENDZEILENNUMMER 27111 69E7 2A B5 6A LD HL<br />
-+ 69CDH NUR EINE ZEILE LöSCHEN 27114 69EA B7 OR A<br />
PUSH DE ANFANG ZU LöSCHENDER BEREI.<br />
I ZEIGER WIEDER AUF ANFANG<br />
27036 699C E1 POP HL ZEIGER AUF FOLGENDE ZEILE<br />
I GERETTETE REGISTER HOLEN<br />
ZEIGER AUF ENDE BEREICH<br />
18 F8 JR F8 -+ 6985H GERETTETE REGISTER HOLEN<br />
ZEIGER AUF NÄCHSTE ZEILE<br />
21 00 00 LD HL, 0000 IZEILENNUMMER DER ZEILE<br />
-+ 697DH IZEILE IST KLEINER ALS<br />
PUSH HL ZEIGER AUF ENDE ZEILE<br />
ENDZEILENNUMMER HOLEN<br />
2A BF 6A LD HL, (6ABF) BASIC - PROGRAMMANFANG<br />
27009 6981 7B LD A.E IOFFSET GLEICH NULL?<br />
27031 6997 22 A7 69 LO (69A7),HL IN ROUTINE EINTRAGEN<br />
I ZEIGER AUF FOLGENDE<br />
I (Wird eingetragen)<br />
LD C,L IANFANGSZEILENNUMMER<br />
. SBC HL. BC GLEICH ANFANGSZEILE<br />
POP HL ANFANGSZEILENNUMMER<br />
IOFFSET AUF NÄCHSTE<br />
26998 6976 E5 PUSH HL ANFANGSZEILENNUMMER<br />
UND WIEDER MERKEN<br />
5E LO E. (HU I ZEILENNUMMER DER<br />
I ZEILE ERRECHNEN<br />
26996 6974 F5 PUSH AF I REGISTER RETTEN<br />
D1 POP DE ENDZEILENNUMMER<br />
ENDZEILENNUMMER<br />
I ANFANGSZEILE<br />
Zeilen löschen HL Anfangszeilennr. DE Endzeilennr.<br />
27028 6994 23 INC HL I ZEILE HOLEN<br />
I ZE I LE HOLEN<br />
27026 6992 D5 PUSH OE UND MERKEN<br />
BASIC 1Z-013B V1_0A<br />
27001 6979 44 LD B,H I NACH BC<br />
DEC DE I ZEILE<br />
27041 69Al lB DEC DE I<br />
27029 6995 56 LO 0, (HU I<br />
27016 6988 Fl POP AF I<br />
26997 6975 C5 PUSH BC I<br />
27011 6983 20 08 JR NZ, 08 •<br />
27(149 69A9 ED 42 SBC HL.BC<br />
27022 698E 19 ADD HL.OE<br />
27052 69AC 28 1F JR Z. IF<br />
EX DE,HL<br />
27037 699D 38 DE JR C. DE<br />
LD D, (HU<br />
27(105 697D 5E LD E, (HU<br />
27025 6991 EB EX OE,HL<br />
EX OE,HL<br />
27043 69A3 C5 PUSH BC<br />
27051 69AB El POP HL<br />
27042 69A2 Cl POP BC<br />
27039 699F 1B DEC OE<br />
26999 6977 05 PUSH DE<br />
27023 698F 2B OEC HL<br />
27024 6990 2B DEC HL<br />
27018 698A D1 POP OE<br />
27015 6987 Cl POP BC<br />
27008 6980 23 INC HL<br />
27006 697E 23 INC HL<br />
27010 6982 B2 OR D<br />
27017 6989 C9 RET<br />
27034 699A ED 42<br />
27040 69AO 1B<br />
27044 69A4 D5<br />
27045 69A5 E5<br />
27030 6996 EB<br />
SEITE 472<br />
27021 698D EB<br />
27014 6986 Ei<br />
27007 697F 56<br />
27(100 6978 4D<br />
27046 69A6<br />
27027 6993<br />
27019 698B<br />
27013 6985<br />
27002 697A
Change language