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 442<br />
BASIC 1Z<br />
BASIC 1Z-013B V1_0A<br />
Befehl SOR<br />
25296 6200 7E LO A. (HU<br />
25297 6201 B7<br />
EXPONENT ARGUMENT HOLEN<br />
OR A<br />
25298 6202 GLEICH NULL ?<br />
C8 RET Z<br />
25299 6203 ERGEBNIS GLEICH NULL<br />
CO B7 61 CALL 61B7<br />
25300<br />
VORZEICHEN ZAHL ABFRAGEN<br />
25301<br />
25302 6206 C2 01 21 JP NZ. 2101<br />
25303<br />
NEGATIV ~ DATENFEHLER<br />
25304<br />
25305 25,306<br />
6209 CO 36 67 CALL 6736<br />
LN - ROUTINE<br />
25307<br />
2530~ 25309<br />
620C CO Cl 61 CALL 61C1<br />
REAL-ZAHL (HL) DURCH ZWEI<br />
25310<br />
25311 62DF 25312<br />
25313<br />
C3 15 66 JP 6615<br />
EXP - ROUTINE<br />
Ergebnis Plus Eins vorgeben und Stack corrigieren<br />
25314 62E2 E5 PUSH HL<br />
25315 62E3 EB ZEIGER AUF ERGEBNIS MERKEN<br />
EX DE.HL<br />
25316 62E4 CO B5 3A<br />
ZEIGER FüR ERGE8NIS NACH DE<br />
CALL 3AB5<br />
25,317<br />
+1 NACH (OE) üBERTRAGEN<br />
25318<br />
25319 62E7 EI POP HL<br />
25320 62E8 Cl<br />
ZEIGER AUF ERGEBNIS<br />
POP BC<br />
25321 62E9 C9<br />
STACK CORRIGIEREN<br />
RET<br />
25322 62EA 7E<br />
25323 62EB 4C<br />
überprUfen. ob 8etrag Argu<br />
ATN Ober I/Argument errech<br />
25324 62EC 80 <br />
25325 62EO 2B<br />
Exponent 0.19970768<br />
Mantisse 0.19970768 <br />
Exponent 0.67097684<br />
Mantisse 0.67097684<br />
25343 62FF CO Al 62 CALL 6<br />
25344<br />
25345<br />
25346 6302 38 24 JR C.<br />
25347<br />
25348 6304 CD C9 61 CALL 6<br />
25349<br />
25350<br />
25351 6307 05 PUSH O<br />
25352 6308 E5 PUSH H<br />
25353 6309 CD B8 3A CALL 3<br />
25354<br />
25355<br />
25356 630C 01 POP OE<br />
25357 6300 05 PUSH D<br />
25358 630E CO 85 3A CALL 3<br />
25359<br />
25360<br />
25361 6311 E1 POP HL<br />
25362 6312 01 POP OE<br />
25363 6313 CD CC 60 CALL 6<br />
25364<br />
25365<br />
25366 6316 CD 28 63 CALL 6<br />
25367<br />
25368<br />
25369 6319 11 AB 65 LO OE.<br />
25370<br />
25371<br />
25372 631C CD BC 61 CALL 6<br />
25373<br />
25374<br />
25375 631F CD A6 5D CALL 5<br />
25376<br />
25377<br />
25378 6322 CD Cl 61 CALL 6<br />
25379<br />
25380<br />
25381 6325 C3 F7 5D JP 50F<br />
25382<br />
25383<br />
B~fehl ATN<br />
ATN der Zahl (HL) iteriere<br />
25326 62EE C5 PUSH BC<br />
25327 62EF 23<br />
REGISTER RETTEN<br />
INC HL<br />
25328 62FO 7E<br />
ZEIGER AUF MANTISSE<br />
LD A. (HU<br />
25329 62F1 CB 8E<br />
MSBYTE MANTISSE HOLEN<br />
RES 7. (HU<br />
25330<br />
VORZEICHEN AUF PLUS<br />
25331 62F3 2B DEC HL<br />
25332 62F4 F5<br />
ZEIGER WIEDER AUF EXPONENT<br />
PUSH AF<br />
25333 62F5 VORZEICHEN ARGUMENT MERKEN<br />
CD FF 62 CALL 62FF<br />
25334<br />
ATN - WERT ERRECHNEN<br />
25335<br />
25336 62F8 Fl POP AF<br />
25337 62F9<br />
VORZEICHEN ARGUMENT<br />
Cl POP BC<br />
25338 62FA<br />
GERETTETES REGISTER<br />
07 RLCA<br />
25339 62FB 00<br />
VORZEICHEN ARGUMENT NACH C.<br />
RET NC<br />
25340 62FC<br />
ARGUMENT WAR POSITIV<br />
C3 91 5D JP 5091<br />
25341<br />
I VORZEICHEN DES ERGEBNIS<br />
I (HL) UMKEHREN<br />
25342<br />
25384 6328 3E FF LD A.<br />
25385<br />
25386 632A 32 lE 6A LD (6A<br />
25387<br />
25388<br />
25389 6320 11 EA 62 LD OE<br />
25390<br />
25391<br />
25392 6330 CD 4A 5E CALL 5<br />
25393<br />
25394<br />
25395 6333 38 4F JR C.<br />
25396<br />
25397 6335 11 EC 62 LD OE