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 418 <br />
BASIC 1Z-013B V1.0A <br />
Funktion + (plus)<br />
23983 50AF 3A 65 6A LO A, (6A65) WERT - FLAG<br />
23984<br />
23985<br />
23986 50B2 FE 03 CP 03 STRING ?<br />
23987<br />
23988 50B4 CA 07 5E JP Z, 5E07 ZWEI STRINGS ADDIEREN<br />
23989<br />
23990<br />
23991 50B7 4F LD C,A LÄNGE WERT<br />
23992 50B8 AF XOR A CODE PLUS<br />
23993 50B9 22 59 6A LO (6A59>,HL ZEIGER FüR ERGEBNIS MERKEN<br />
23994<br />
23995<br />
23996 50BC 23997 50BO 23998 50BE 05 PUSH OE ZEIGER AUF ARGUMENTE<br />
E5 PUSH HL<br />
EO 73 5C 6A LO (6A5C),SP<br />
•<br />
STACKPOINTER MERKEN<br />
23999<br />
24000<br />
24001<br />
24002 5DC2 23 INC HL I ZEIGER AUF VORZEICHEN<br />
24003 5DC3 13 INC OE I DER MANT I SSEN<br />
24004 50C4 46 LO B, (HL> I VORZEICHEN ERGEBNIS<br />
24005 5DC5 AE XOR (HL> I ERRECHNEN<br />
24006 5DC6 EB EX OE,HL<br />
24007 ~OC7 AE XOR (HL> •I<br />
24008 50C8 2B DEC HL I ZEIGER WIEDER AUF<br />
24009 5DC9 1B OEC DE • EXPONENTEN STELLEN<br />
24010 50CA EB EX OE,HL<br />
24011 50CB 07 RLCA<br />
24012 50CC 78 LO A,B VORZEICHEN ERGEBNIS<br />
24013 50CO 32 5B 6A LO (6A5B),A ; MERKEN<br />
24014<br />
24015<br />
24(116 5DDO OA C8 5E JP C, 5EC8 I I ZAHLEN VONEINANDER<br />
24017 I SUBTRAH I EREN<br />
24018<br />
24019 5003 AF XOR A ACCU AUF NULL<br />
24020 5004 BE CP (HL> EXPONENT ERSTES ARGUMENT<br />
24021 5005 CA FC 50 JP Z. 5DFC ERGEBNIS IST 2tes ARGUMENT<br />
24022<br />
24023<br />
24024 50D8 1A LO A. (OE) • EXPONENT 2tes ARGUMENT<br />
24025 5009 B7 OR A GLEICH NULL ?<br />
24026 50DA 28 04 JR Z. 04 + 5DEOH I JA +<br />
24027 IERGEBNIS IST ltms ARGUMENT<br />
24028 50De 96 SUB SP. (~A5C) • STACKPOINTER HOLEN<br />
24033<br />
24034<br />
24035<br />
24036 50E4 El POP HL • ZEIGER AUF ARGUMENTE<br />
24037 50E5 01 POP DE I HOLEN<br />
24038 50E6 FB EI INTERRUPT FREIGEBEN<br />
BASIC 1Z<br />
24039 50E7 7E LD A, (H<br />
24040 50E8 B7 OR A<br />
24041 5DE9 24042 <br />
28 OC JR Z. O<br />
24043 5DEB 3A 5B 6A LD A, (6<br />
24044 <br />
24045 <br />
24046 5DEE E6 80 AND A,<br />
24047 <br />
24048 50FO 23 INC HL<br />
24049 24050 <br />
5DF1 CB SE RES 7. (<br />
24051 50F3 B6 OR (HL><br />
24052 50F4 77 LD (HU<br />
24053 5DF5 2B DEC HL<br />
24054 5DF6 C9 RET<br />
Absolut - Betrag des Wertes<br />
24055 5DF7 23 INC HL<br />
24056 50F8 CB BE RES 7, (<br />
24057 <br />
24058 50FA 2B DEC HL<br />
24059 50FB C9 RET<br />
Zwei tes Argumen't und errech<br />
24060 50FC 24061 <br />
06 00 LO B. 0<br />
24062 5DFE 3E 05 LD A. 0<br />
24063 <br />
24064 5EOO 4F LD C.A<br />
24065 5EOl ES EX OE.HL<br />
24066 5E02 EO BO LDIR<br />
24067 <br />
24068 5E04 C3 EO 50 JP 50EO<br />
24069 <br />
24070 <br />
Zwei Srings addieren<br />
24071 5E07 46 LO S. (HL<br />
24072 5E08 lA LO A.