Untitled - The Sharp MZ-Series
Untitled - The Sharp MZ-Series
Untitled - The Sharp MZ-Series
Sie wollen auch ein ePaper? Erhöhen Sie die Reichweite Ihrer Titel.
YUMPU macht aus Druck-PDFs automatisch weboptimierte ePaper, die Google liebt.
SEITE 228<br />
BASIC 1Z-013B V1.0A<br />
BASIC 1Z<br />
13740<br />
13741<br />
13742<br />
13743<br />
13744<br />
13745<br />
13746<br />
13747<br />
13748<br />
13749<br />
13750<br />
13751<br />
35AE<br />
35B l<br />
3584<br />
3587<br />
CO<br />
CO<br />
CD<br />
EI<br />
A7<br />
51<br />
09<br />
21<br />
00<br />
00<br />
CALL 21A7<br />
CALL 0051<br />
CALL 0009<br />
POP HL<br />
13752 35B8 23 INC HL<br />
13753<br />
13754<br />
I MOMENTANEN ZEILE<br />
I (Wi rd ei ngetragen)<br />
IHEX-WERT IN HL UMSETZEN<br />
I IN ASCII NACH ZWISCHEN<br />
I SPEICHER<br />
TEXT (OE) AUSGEBEN<br />
I ZEILENVORSCHUB AUSGEBEN.<br />
I WENN CURSOR NICHT AUF<br />
IANFANG ZEILE STEHT<br />
ZEIGER AUF PROGRAMM<br />
3589 18 06 JR 06 -+ 3591H RESTPROGRAMM UMSETZEN<br />
Untersuchen. ob Zeile mit Nummer in HL vorhanden ist<br />
wenn ja -+ Zeiger auf Zeile nach HL bereitstellen<br />
13755 35BB C5 PUSH BC I REGISTER RETTEN<br />
13756 35BC 05 PUSH DE I<br />
13795 35E3<br />
13796 35E4<br />
13797 35E5<br />
13798 35E6<br />
13799<br />
13800 35E8<br />
13801 35E9<br />
13802 35EA<br />
13803<br />
13804 35EC<br />
13805 35EO<br />
13806<br />
05<br />
EB<br />
B7<br />
EO<br />
01<br />
El<br />
30<br />
37<br />
18<br />
42<br />
05<br />
Fl<br />
PUSH DE<br />
EX DE.H<br />
OR A<br />
SBC HL.<br />
POP DE<br />
POP HL<br />
JR NC.<br />
SCF<br />
JR Fl<br />
Anfangs und Endzeilennumme<br />
13807 35EF 11 00 00 LD DE.<br />
1.3808<br />
13809<br />
13810 35F2 01 FF FF LD BC.<br />
13811<br />
13757 35BO EB EX DE.HL<br />
13813 35F5 CD 66 lC CALL lC<br />
13758 35BE 2A BF 6A<br />
13814<br />
LO HL. (6ABF) I ZEIGER AUF ANFANG<br />
13759<br />
13815<br />
I PROGRAM<strong>MZ</strong>EIGER<br />
13760<br />
13816 35F8 C8 RET Z <br />
13761 35Cl 4E LO<br />
13817 35F9 FE 20<br />
C. (HU I OFFSET AUF NÄCHSTE<br />
CP 20<br />
13818<br />
13762 35C2 23 INC HL I ZEILE HOLEN<br />
13763 35C3 46<br />
13819 35F8 28 2A<br />
LO B. (HL> I<br />
JR Z. 2A<br />
13820<br />
13764 35C4 78 LD A.B I GLEICH NULL 7<br />
13765 35C5 BI<br />
13821 35FD FE 2C<br />
OR C I<br />
CP 2C<br />
13822<br />
13766 35C6 28 24 JR Z. 24 -+ 35ECH ENDE PROGRAMM<br />
13767<br />
13823 35FF CA FE 20 JP Z. 2<br />
13824<br />
13768 35C8 E5 PUSH HL ZEIGER MERKEN<br />
13769 35C9 09<br />
13825<br />
ADD HL.BC I ZEIGER AUF NÄCHSTE ZEILE<br />
13770 35CA 2B<br />
13826 3602 FE 2E CP 2E<br />
DEC HL I ERRECHNEN<br />
13827<br />
13771 35CB 40 LO C.L I MERKEN<br />
13772 35CC 44 LD B.H<br />
13828 3604 20 06 JR NZ.<br />
I<br />
13829<br />
13773 35CO EI POP HL ZEIGER AUF AKTUELLE ZEILE<br />
13774 35CE C5<br />
13830 3606 ED 58 E2 38 LD OE. (<br />
PUSH BC ZEIGER AUF NÄCHSTE ZEILE 13831<br />
13775 35CF 23 INC HL<br />
13832<br />
13776 35DO 4E LO C. (HU • I ZEILENNUMMER HOLEN 13833<br />
13777 35Dl 23 INC HL I<br />
13778 35D2 46 LD B. (HL> , I 13834 360A 18 09 JR 09<br />
13835<br />
13779 35D3 79 LD A.C IL-BYTE ZEILENNUMMER<br />
13780 35D4 BB CP E<br />
13836 360C FE OB CP OB<br />
I VERGLEICHEN<br />
13837<br />
13781 35D5 20 OC JR NZ. OC -+ 35E3H NICHT GLEICH<br />
13782<br />
13838 360E C2 FE 20 JP NZ. 2<br />
13839<br />
13783 35D7 78 LD A.B IH-BYTE ZEILENNUMMER<br />
13840<br />
13784 35D8 BA CP 0 I VERGLEICHEN<br />
13785 35D9<br />
13841 3611<br />
2B DEC HL<br />
23<br />
I ZEIGER WIEDER AUF<br />
INC HL<br />
13842 3612<br />
13786 35DA 2B DEC HL<br />
5E LD E. (H<br />
I ANFANG ZEILE<br />
13843 3613<br />
13787 350B 2B DEC HL<br />
23<br />
I<br />
INC HL<br />
13844 3614<br />
13788 35DC 20 05<br />
56<br />
JR NZ. 05 -+ 35E3H NICHT GLEICH<br />
LD D. (HL<br />
13845 3615<br />
13789<br />
23 INC HL<br />
13846 3616<br />
13790 35DE Cl POP BC<br />
CO 66 lC<br />
ZEIGER AUF NÄCHSTE ZEILE<br />
CALL lC6<br />
13847<br />
13791 35DF B7 OR A CARRY-FLAG ZURüCKSETZEN 13848<br />
13792 35EO 01 POP OE I GERETTETE REGISTER HOLEN<br />
13849 361 9<br />
13793 35El Cl POP BC<br />
28 09<br />
I<br />
JR Z. 09<br />
13850<br />
13794 35E2 C9 RET<br />
1.3812<br />
13851 3618 FE 20 CP 20<br />
13852
Change language