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.
SEITE 136<br />
BASIC 1Z-013B<br />
7682<br />
7683<br />
7684 lE04 2A 4D ID LD HL. (lD4D)<br />
7685<br />
7686<br />
7687 lE07 CD 14 54 CALL 5414<br />
7688<br />
7689<br />
7690 l EOA FE 2C CP 2C<br />
7691<br />
7692 lEOC 23 INC HL<br />
7693 lEOD CA 79 1D JP Z, ID79<br />
7694<br />
7695<br />
7696 lE10 2B DEC HL<br />
7697 lEll CD OB 58 CALL 580B<br />
7698<br />
7699<br />
7700 lEl4 22 4D ID LD (lD4D).HL<br />
7701<br />
7702<br />
7703 lEl7 DD 2A Dl ID LD IX. (lDDl><br />
7704<br />
7705<br />
7706<br />
7707 lEl8 DD 5E 00 LD E, (I X+OQ)<br />
7708<br />
7709<br />
7710 lElE DD 56 01 LD D, (I X+Ol><br />
7711<br />
7712<br />
7713 lE21 21 12 FF LD HL. FF12<br />
7714<br />
7715<br />
7716 lE24 B7 OR A<br />
7717 lE25 ED 52 SBC HL.DE<br />
7718<br />
7719 lE27 C2 C8 20 JP NZ. 20C8<br />
7720<br />
7721<br />
7722 lE2A DD 6E 06 LD L, (I X+06)<br />
7723<br />
7724<br />
7725 lE2D DD 66 07 LD H. (IX+07)<br />
7726<br />
7727<br />
7728 IE30 B7 OR A<br />
7729 l E3 1 ED 42 SBC HL,BC<br />
7730<br />
7731 lE33 2A 4D 1D LD HL. (ID4D)<br />
7732<br />
7733<br />
7734 lE36 CA 79 1D JP Z. ID79<br />
7735<br />
7736<br />
7737 lE39 11 12 00 LD DE. 0012 ;<br />
7738<br />
7739<br />
7740 lE3C DD 19 ADD IX,DE<br />
7741<br />
77421E3E DD 22 D1 1D LD (1DDl).IX<br />
7743<br />
V1.0A<br />
PROGRAM<strong>MZ</strong>EIGER HOLEN<br />
IPROGRAM<strong>MZ</strong>EIGER AUF<br />
I NÄCHSTES RELEVANTES<br />
I ZEICHEN SETZEN<br />
(Komma.) ?<br />
PROGRAM<strong>MZ</strong>EIGER<br />
NÄCHSTE SCHLEIFE üBERPRüFEN<br />
PROGRAM<strong>MZ</strong>EIGER<br />
IVARIABLENNAMEN (HL) AUS<br />
I WERTEN UND ZEIGER AUF<br />
I VARIABLE BEREITSTELLEN<br />
PROGRAM<strong>MZ</strong>EIGER MERKEN<br />
STACKPOINTER HOLEN<br />
I CODE-WERT VOM STACK<br />
I HOLEN<br />
CODE FOR-DATEN<br />
CARRV-FLAG ZURüCKSETZEN<br />
FOR-DATENSATZ ?<br />
INEIN ~ FEHLER 13<br />
INEXT ohne FOR FEHLER<br />
I ZEIGER AUF SCHLEIFEN<br />
IVARIABLE AUS DATENSATZ<br />
I~~N<br />
CARRV-FLAG ZURüCKSETZEN<br />
GLEICHE ZEIGER ?<br />
PROGAM<strong>MZ</strong>EIGER HOLEN<br />
TESTEN, OB ENDE SCHLEIFE<br />
LÄNGE FOR-DATENSATZ<br />
EINEN DATENSATZ VERGESSEN<br />
ZEIGER AUF STACK MERKEN<br />
BASIC 1Z-<br />
7744<br />
7745<br />
7746 lE42 ED 7B Dl ID LD SP. (l<br />
7747<br />
7748<br />
7749<br />
7750 lE46 18 D3 JR D3 ~<br />
7751<br />
7752 lE48 00<br />
7753 lE49 00 00<br />
7754<br />
7755 lE4B 00<br />
das folgende RoutinenstUck<br />
(es läuft in dieser Form au<br />
Siehe hierzu auch Programm<br />
7756 lE4C CD 80 38 CALL 38<br />
7757<br />
7758<br />
7759 lE4F B7 OR A<br />
7760 lE5e) CO RET NZ<br />
7761 lE5l 23 INC HL<br />
7762 lE52 D5 PUSH DE<br />
7763 lE53 5E LD E. (H<br />
7764 lE54 "';;:' ,J INC HL<br />
7765 lE55 56 LD D. (H<br />
7766 lE56 7A LD A,D<br />
7767 lE57 B3 OR E<br />
7768 lE58 23 INC HL<br />
7769 lE59 ED 53 48 lE LD (IE4<br />
7770<br />
7771<br />
7772<br />
7773 lE5D 5E LD E. (H<br />
7774 lE5E 23 INC HL<br />
7775 lE5F 56 LD D. (H<br />
7776 lE60 ED 53 49 lE LD ( lE4<br />
7777<br />
7778<br />
7779<br />
7780 lE64 Dl POP DE<br />
7781 lE65 37 SCF<br />
7782 lE66 C8 RET Z<br />
7783 lE67 18 E3 JR E3<br />
7784<br />
7785 lE69 71<br />
I<br />
I<br />
I