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 454<br />
BASIC 1Z-013B<br />
25971<br />
25972<br />
25973 6575 80<br />
25974 6576 49 OF OA A2<br />
25975<br />
25976<br />
25977<br />
Funktion SGN<br />
25978 657A 11 00 00 LO OE. 0000<br />
25979<br />
25980<br />
25981 6570 CO 8E 65 CALL 658E<br />
25982<br />
25983<br />
25984 6580 28 08 JR Z. 08 ~ 658AH<br />
25985<br />
25986 6582 CO 87 61 CALL 6187<br />
25987<br />
25988<br />
25989 6585 13 INC OE<br />
25990 6586 28 02 JR Z. 02 ~ 658AH<br />
25991<br />
25992 6588 18 OEC OE<br />
25993 6589 18 OEC OE<br />
25994 658A CO 82 3A CALL 3A82<br />
25995<br />
25996<br />
25997 6580 C9 RET<br />
Unte~suchen. ob We~t (HL) gleich Null ist<br />
25998 658E 3A 65 6A LO A. (6A65)<br />
25999<br />
26000<br />
26001 6591 FE 02 CP 02<br />
26002<br />
26003 6593 28 03 JR Z. 03 + 6598H<br />
26004<br />
26005 6595 7E LD A. (HL><br />
26006 6596 87 OR A<br />
26007 6597 C9 RET<br />
26008 6598 7E LD A. (HL><br />
26009 6599 23 INC HL<br />
26010 659A 86 OR (HL> ;<br />
26011 6598 2B DEC HL<br />
26012 659C C9 RET<br />
Funktion RAD<br />
26013 6590 11 BO 65 LD OE. 65BO<br />
26014<br />
26015<br />
26016 65AO 18 03 JR 03 ~ 65A5H<br />
26017<br />
V1.0A<br />
(1/21><br />
Exponent ..../4<br />
Mantisse ..../4<br />
VORGABE WERT NULL<br />
I UNTERSUCHEN. OB WERT<br />
I (HL> GLEICH NULL IST<br />
WERT GLEICH NULL<br />
I VORZEICHEN OER ZAHL (HL)<br />
I ABFRAGEN<br />
VORGABE +1<br />
ZAHL IST POSITIV<br />
I VORGABE - 1<br />
I INTGER- WERT IN OE UM<br />
ISETZEN IN REAL - WERT (HL)<br />
WERT-FLAG<br />
INTEGER - WERT ?<br />
JA<br />
EXPONENT REAL-WERT HOLEN<br />
GLEICH NULL ?<br />
L- BYTE WERT<br />
ZEIGER AUF H-BYTE<br />
H- 8YTE WERT<br />
ZEIGER WIEDER AUF L- BYTE<br />
ZEIGER AUF ..../180<br />
I KONSTANTE MIT ARGUMENT<br />
I MULTIPLI ZIEREN<br />
BASIC<br />
Funktion PAI<br />
26018 65A2 11 AB 65<br />
26019<br />
26020<br />
26021 65A5 C5<br />
26022 65A6 CO El 5F<br />
26023<br />
26024<br />
26025 65A9 Cl<br />
26026 65AA C9<br />
26027 65A8 82<br />
26028 65AC 49 OF DA A2<br />
26029<br />
26030<br />
26031<br />
26032 65BO 7B<br />
26033 65B1 OE FA 35 13<br />
26034<br />
26035<br />
2603 6<br />
Funktion PEEK<br />
26037 6585 FE 40<br />
26038<br />
26039 65B7 28 OF<br />
26040<br />
26041 65B9 ES<br />
26042 65BA CD 21 3D<br />
26043<br />
26044<br />
26045 65BO CD EA 00<br />
26046<br />
26047<br />
26048 65CO 5F<br />
26049 65Cl 16 00<br />
26050<br />
26051 65C3 El<br />
26052 65C4 CD 82 3A<br />
26053<br />
26054<br />
26055 65C7 C9<br />
26056 65C8 23<br />
26057 65C9 E5<br />
26058 65CA CD 21 3D<br />
26059<br />
26060<br />
26061 65CD 7E<br />
26062 65CE 18 FO<br />
26063<br />
1Z<br />
LO DE.<br />
PUSH BC<br />
CALL 5F<br />
POP BC<br />
RET<br />
CP 40<br />
JR Z. O<br />
PUSH HL<br />
CALL 30<br />
CALL OO<br />
LD E.A<br />
LD D. 0<br />
POP HL<br />
CALL 3A<br />
RET<br />
INC HL<br />
PUSH HL<br />
CALL 3D<br />
LD A. (H<br />
JR FO<br />
I