20.02.2014 Aufrufe

Untitled - The Sharp MZ-Series

Untitled - The Sharp MZ-Series

Untitled - The Sharp MZ-Series

MEHR ANZEIGEN
WENIGER ANZEIGEN

Erfolgreiche ePaper selbst erstellen

Machen Sie aus Ihren PDF Publikationen ein blätterbares Flipbook mit unserer einzigartigen Google optimierten e-Paper Software.

BASIC<br />

Per<br />

111Z ·7


Durch dieses Disassembler-Listing werden die Rechte der<br />

Fa. SHARP ELECTRONICS (EUROPE) G.M.B.H<br />

Sonninstraße 3<br />

2000 Hamburg<br />

in keiner Weise angetastet. Dieses Disassembler-Listing soll dem <br />

<strong>MZ</strong>-700 Benutzer lediglich eine Hilfe beim Anwenden und Verstehen <br />

seiner Maschine sein. <br />

Das Listing wurde sehr sorgfältig auf seinen Inhalt hin UberprUft. <br />

Es kann jedoch nicht ausgeschlossen werden. daß sich noch Fehler <br />

eingeschlichen haben. <br />

Fur Schäden. die sich aus der Benutzung dieses Listings ergeben. <br />

wird keine Haftung übernommen. <br />

Es kann nicht ausgeschlossen werden. daß die Fa. SHARP <br />

verschiedene Versionen unter der gleichen Bezeichnung <br />

vertreibt. <br />

Herstellung und Vertrieb: <strong>MZ</strong>-VERLAG,HARALDSCHICKE<br />

LINDENWEG 18,2110 HOLM-SEPPENSEN<br />

Alle Rechte vorbehalten.<br />

Kein Teil dieser Veröffentlichung darf ohne schriftliche<br />

Genehmigung des Autors reproduziert. in jedwedem System<br />

gespeichert oder übertragen werden. sei es auf elektronischem.<br />

elektromechanischem oder sonstigem Wege.<br />

..~. ~ ," ~.. r:. j'. ~. i -i ~ \f ' ~ ~~­<br />

Copyright (c) 1983 by: Rainer Scl;läfer <br />

H:auptstr aße 94 <br />

~.<br />

.• ~ .,<br />

\. .;, L ~i""<br />

5441 Ki'rchwal d<br />

BASIC 1Z-013<br />

Einsprungtabelle Monitor<br />

1<br />

/) 000 0 C3 O~ 00 JP OODA<br />

1<br />

2<br />

3 000 3 C3 20 01 JP 0120<br />

4<br />

5<br />

6 0006 C3 FE 04 JP 04FE<br />

7<br />

8<br />

9 0009 C3 FA 04 JP 04FA<br />

10<br />

11<br />

12 OOOC C3 31 05 JP 0531<br />

13<br />

14<br />

15 OOOF C3 02 05 JP 0502<br />

16<br />

18 0012 C3 ' 33 05 JP 0533<br />

19<br />

I)<br />

2 1 001 5 C3 DA 04 JP 04DA<br />

22<br />

23<br />

24 0018 C3 DA 04 JP 04DA<br />

25<br />

26<br />

"'7 001 B C3 FO 02 JP 02FO<br />

8<br />

29<br />

:S O 00 lE C3 AO 04 JP 04AO<br />

32<br />

33 0021 C3 3B OA JP OA3B<br />

4<br />

35<br />

6 0024 C3 3F OA JP OA3F<br />

3 7<br />

3 8<br />

39 0027 C3 7A (JA JP OA7A<br />

40<br />

41<br />

42 0 02 A C3 7E OA JP OA7E<br />

43<br />

44<br />

45 002D C3 94 OA JP OA94<br />

46<br />

47<br />

48 0030 C3 E4 08 JP 08E4<br />

49<br />

I)<br />

1 003 3 C3 5A OD JP OD5A<br />

2<br />

3<br />

4 0036 EB EX DE.HL<br />

0037 00 NOP<br />

6 0038 C3 E4 00 JP ODE4<br />

7<br />

8<br />

...9 0 0 3 8 C3 A7 00 JP ODA7


SEITE 2<br />

BASIC 1Z-013B<br />

60<br />

61<br />

62 003E C3 13 OA JP OA13 •<br />

63<br />

64<br />

65 0041 C3 04 OA JP OA04<br />

66<br />

67<br />

68 0044 C3 B7 09 JP 09B7<br />

69<br />

70<br />

71 0047 C3 D2 09 JP 0902<br />

72<br />

73<br />

74 004A C3 20 01 JP 0120<br />

75<br />

76<br />

77 0040 00<br />

78 004E 00 ~ ~<br />

II.A... \<br />

79 004F FF ::. 15 w...~ ~C- '€I ~<br />

80 0050 00<br />

81 0051 C3 DA 04 JP 04DA <br />

82 <br />

83 <br />

84 0054 00<br />

85 0055 00<br />

86 0056 00<br />

87 0057 18 •<br />

88 0058 C3 53 02 JP 0253 <br />

89 <br />

90 <br />

91 005B 00<br />

92 005C 27<br />

93 005D 71<br />

94 005E 00<br />

95 005F 00 ,<br />

96 0060 EF<br />

97 0061 C3 6A OE JP OE6A <br />

98 <br />

99 <br />

100 0064 00<br />

101 0065 00<br />

102 0066 00<br />

V1_0A<br />

REFERENZTON<br />

TEMPO SETZEN<br />

TONSTART<br />

TONS TOP<br />

ZEILE VON TASTATUR HOLEN<br />

PARALLELAUSGABEFLAG DRUCKER<br />

BILDSCHIRM-AUSSCHNITT-FLAG<br />

PUFFERLÄNGE FüR INPUT<br />

TEXTAUSGABEFLAG FüR TAPE<br />

TEXT (DE) AUSGEBEN<br />

AKTUELLE CURSORPOSITION X<br />

AKTUELLE CURSORPOSITION Y<br />

Y-KOORDINATE MINIMAL<br />

Y-KOORDINATE MAXIMAL<br />

TASTATURABFRAGE.4 (\) Q<br />

X-KOORDINATE MINIMAL<br />

X-KOORDINATE MAXIMAL<br />

ZEICHEN/HINTERGRUNDFARBE<br />

LöSCHZEICHEN (Spaee-Anz.C.<br />

LETZTE GEDRüCKTE TASTE<br />

AKTUELLES CURSORZEICHEN<br />

JOY - STICK - ABFRAGE<br />

FLAG VORMITTAG/NACHMITTAG<br />

WERT ANALOG JOY-STICK<br />

WERT DIGITAL JOY-STICK<br />

BASIC 1Z-013<br />

Tabelle mit Anfangsad~essen de ~ CT<br />

103 0067 E9 (1)<br />

104<br />

105 0069 E9 00<br />

106<br />

107 ~)6B E9 00<br />

108<br />

109 006D E9 00<br />

110<br />

111 006F E9 00<br />

112<br />

113 0071 FE 07<br />

1 14<br />

115 0073 F8 07<br />

116<br />

117 0075 E9 00<br />

118<br />

119 0077 E9 00<br />

120<br />

121 0079 E9 00<br />

122<br />

123 007B E9 00<br />

124<br />

125 007D E9 00<br />

126<br />

127 007F E9 00<br />

128<br />

129 0081 80 07<br />

130<br />

131 0083 E9 00<br />

132<br />

133 0085 E9 00<br />

134<br />

135 0087 04 08<br />

136<br />

137 0089 BI 07<br />

138<br />

139 0088 D6 07<br />

140<br />

141 0080 87 07<br />

142<br />

143 008F OB 07<br />

144<br />

145 0091 F9 06<br />

146<br />

147 0093 lE 07<br />

148<br />

149 0095 FB 07<br />

150<br />

151 0097 A6 08<br />

152<br />

153 0099 F8 07<br />

154<br />

155 009B E9 00<br />

156<br />

157 0090 80 07<br />

158<br />

159 009F E9 00<br />

160<br />

161 OOAI E9 00<br />

162


SEITE 4<br />

BASIC 1Z-013B V1_0A BASIC 1Z-013B<br />

163 00A3 E9 00 CTRL l' Kaltstart Monitor<br />

164 <br />

165 00A5 E9 00 CTRL ~ 218 OODA F3 DI<br />

166 2 19 OODB 31 00 00 LD SP. 0000<br />

2 2C)<br />

221 <br />

Verkettungsflags für Bildschimzeilen. Ist das Flag unglei ch 222 OOOE ED 56 IM 1<br />

Null 30 gehört diese Bildschirmzeile logisch zur Vorher i gen. 22 3 <br />

224 OOEO D3 El OUT (Ell, A<br />

167 00A7 00 Ver kettungsflag Zeile 0 2 25<br />

168 00A8 00 Ver kettungsflag Zeile 226 00E2 AF XOR A<br />

169 00A9 00 Verkettungsflag Zeile 2 227 OOE3 3 2 19 18 LD (1819>,A<br />

170 OOAA 00 Verkettungsflag Zeile 3 228 <br />

171 OOAB 00 Verkettungsflag Zeile 4 229 <br />

172 OOAC 00 Verkett ungsflag Zeile 5 230 00E6 C3 22 18 JP 1822<br />

173 OOAO 00 Verkettungsflag Zei l e 6 2 31 <br />

174 OOAE 00 Verkettungs flag Zei l e 7 2.32<br />

175 OOAF 00 Verkett ungsf lag Zei l e 8 <br />

176 OOBO 00 Verkettungsflag Zeile 9 <br />

177 OOBl 00 Verkettungsflag Zei le 10 233 00E9 C9 RET<br />

178 00B2 00 Verkettungsflag Zei le 11 <br />

179 00B3 00 Verkettungsflag Zeile 12 <br />

180 00B4 00 Verkettungsflag Zeile 13 ein Zeichen von Systemadressen hole<br />

181 00B5 00 Verkettungsflag Zeile 14 <br />

182 0086 00 Verket tungsflag Zeile 15 234 OOEA F.3 01<br />

183 00B7 00 Ver kettungs flag Zei le 16 235 OOEB 03 E3 OUT (E3>,A<br />

184 00B8 00 Ver kettungsflag Zeile 17 236<br />

185 00B9 00 Ver kettungs flag Zeile 18 237 OOEO 7E LD A, (HL><br />

186 OOBA 00 Ver kettungs fl a g Zeile 19 2.38 OOEE D3 E 1 OUT (Ell, A<br />

187 OOB,8 00 Verkettungs flag Zeile 20 239<br />

188 OOBC 00 Verkettungsflag Zeile 21 240 OOFO FB EI<br />

189 OOBO 00 Verkettungs flag Zeile 22 241 OOFl C9 RET<br />

190 OOBE 00 Verkettungsflag Zeile 23 <br />

191 I)OBF 00 Verkettungsflag Zeile 24 <br />

192 OOCO 00 Verkettungsflag Zeile 25 ein Zeichen nach Systemadresse ausg<br />

19~ OOCl 00 Ver kettungsflag Zeile 26 <br />

19.4 ooc:2 00 Verkettungsflag Zeile 27 2 42 OOF2 F3 01<br />

195 00C3 00 Verkettungsflag Zeile 28 2 43 OOF3 D3 E3 OUT (E3l,A<br />

196 00C4 00 Verkettungsflag Zeile 29 244<br />

197 OOC!5 00 Verkettungsf l ag Zeile 30 2 45 00F5 77 LD (HL>. A<br />

198 OOC6 . 00 Verkettungsflag Zeile 31 246 OOF6 D3 El OUT (EU, A<br />

199 OOC7 00 Verkettungsflag Zeile 32 247<br />

200 ooca 00 Verkettungsflag Zeile 33 248 00F8 FB EI<br />

201 00C9 00 Verkettungsflag Zeile 34 249 00F9 C9 RET <br />

202 OOCA 00 Verkettungsflag Zeile 35 <br />

203 ooce 00 ~erkettungsflag Zeile 36 <br />

20~ OOCC 00 Verkettungsflag Zeile 37 Zeile von Tastatur holen; bei Rückk<br />

205 OOCO 00 Verkettungsflag Zeile 38 auf eigentliche Eingabe stellen <br />

206 OOCE 00 Verkettungsflag Zeile 39 <br />

207 OOCF 00 Verkettung3flag Zeile 40 250 OOFA E5 PUSH HL<br />

208 0000 00 Verkettungsflag Zeile 41 251 OOFB 2A 54 00 LD HL. <br />

209 0001 00 Verkettungsflag Zeile 42 252 <br />

210 0002 00 Verkettungsflag Zeile 43 253 <br />

211 0'003 00 Verkettungsflag Zeile 44 254 OOFE E5 PUSH HL<br />

212 0004 00 Verkettungsflag Zeile 4~ 255 OOFF D5 PUSH OE<br />

213 0005 00 Verkettungsflag Zeile 46 256 0100 CO AE 05 CALL 05AE<br />

214 0006 00 Verkettungsflag Zeile 47 257<br />

215 0001 00 Verkettungsflag Zeile 48 258 <br />

216 oooa 00 Verkettungsflag Zeile 49 259 0103 01 POP OE<br />

217 0009 00 Verkettungsflag Zeile 50 260 0104 36 00 LD (HU. 00<br />

2 61 <br />

262 0106 El POP HL


SEITE 6 <br />

BASIC 1Z-013B V1_0A <br />

263 0107 CD 20 01 CALL 0120 ZEILE VON TASTATUR HOLEN<br />

264<br />

265<br />

266 010A 38 OE JR C. OE ~ allAH BREAK GEDRüCKT<br />

267<br />

268 010C 3A 58 00 LD A.


SEITE<br />

373<br />

374<br />

375 0177<br />

376<br />

377<br />

378 017A<br />

379<br />

380 017C<br />

381<br />

382 017E<br />

383<br />

384 0180<br />

385<br />

386 0182<br />

387<br />

388<br />

389 0185<br />

390 0186<br />

391 0187<br />

392 0188<br />

393<br />

394 018A<br />

395 018B<br />

396<br />

397<br />

398 018E<br />

399<br />

400 0190<br />

401<br />

402<br />

403 0193<br />

404<br />

405 0195<br />

406<br />

407 0197<br />

408 0198<br />

409<br />

410 019A<br />

411<br />

412 019C<br />

413<br />

414 019E<br />

415<br />

416 01AO<br />

417<br />

418<br />

419 01A3<br />

420<br />

421 01A5<br />

422<br />

423 01A7<br />

424<br />

425<br />

426 01AA<br />

427<br />

428<br />

8<br />

BASIC 1Z-013B<br />

2A 5B 00 LD HL. (005B)<br />

FE 14 CP 14<br />

28 08 JR Z. 08 ~ 0186H<br />

FE 12 CP 12<br />

20 08 JR NZ. 08 ~ 018AH<br />

2A 56 00 LD HL. (0056)<br />

5A ~ 0125H<br />

LD E.D<br />

70 LD A.L<br />

BB CP E<br />

30 9B JR NC. 9B F1 POP AF<br />

CD 33 05 CALL 0533<br />

18 99 JR 99 ~ 0129H<br />

3A 60 00 LD A. (0060)<br />

FE FF CP FF<br />

20 A6 JR NZ. A6 + 013DH<br />

F1 POP AF<br />

FE 17 CP 17<br />

30 C3 JR NC. C3 + 015FH<br />

FE 11 CP 11<br />

38 BF JR C. BF ~ 01SFH<br />

2A E9 OE LD HL. (OEE9)<br />

CB 75 BIT 6. L<br />

28 B8 JR Z. B8 + 015FH<br />

CD SE 05 CALL OS5E<br />

C3 29 01 JP 0129<br />

V1.0A<br />

I X-KOORDINATE <br />

1 MINIMAL/MAXIMAL <br />

Cursor links ?<br />

JA<br />

~ Cursor hoc:h ?<br />

NEIN + ZEICHEN AUSGEBEN<br />

1 Y-KOORDINATE <br />

I MINIMAL/MAXIMAL <br />

• Y-KOORDINATE NACH E<br />

MINIMAL-KOORDINATE<br />

AKTUELLE KOORDINATE<br />

1 TASTE NICHT ERLAUBT<br />

1+ NÄCHSTE TASTE<br />

GEDRüCKTE TASTE<br />

~ ZEICHEN IM ACCU AUSGEBEN<br />

NÄCHSTE TASTE<br />

• AKTUELLES CURSORZEICHEN<br />

GRAPHIK-CURSOR ? <br />

'NEIN ~ AUF STEUERZEICHEN <br />

1 UNTERSUCHEN <br />

GEDRüCKTE TASTE ? <br />

GRöSSTE CURSOR TASTE ? <br />

KEINE CURSORTASTE <br />

KLEINSTE CURSORTASTE <br />

KEINE CURSORTASTE <br />

TASTENWERT SPALTE 9 <br />

; CTRL - TASTE GEDRüCKT ?<br />

JA<br />

• 1 ZEICHEN IM ACCU OHNE<br />

IUNTERSUCHUNS AUF STEUER­<br />

I ZEICHEN AUSGEBEN<br />

NÄCHSTE TASTE ABFRAGEN<br />

BASIC 1Z-0<br />

Tastatureingabe mit 8REAK abge<br />

429 01AD 37 SCF<br />

Normales Ende der Eingabe eine<br />

430 01AE F5 PUSH AF <br />

431 01AF 3E OD LD A. 00 <br />

432 <br />

433 0181 CD 33 05 CALL 0533<br />

434 <br />

435 <br />

436 01B4 Fl POP AF<br />

437 01B5 D1 POP OE<br />

438 0186 EI POP HL <br />

439 0187 Cl POP BC<br />

440 018S C9 RET<br />

V-Koordinate Anfang Zeile nach<br />

441 01B9 CD AE 05 CALL 05AE<br />

442 <br />

443 <br />

444 018C 7E LD A. (HU<br />

445 018D B7 OR A <br />

446 018E C8 RET Z <br />

447 01BF 28 DEC HL<br />

448 OlCO 10 DEC E <br />

449 OICI 3A 56 00 LD A. «(1056<br />

450 <br />

451<br />

452 01C4 BB CP E<br />

453 454<br />

01C5 38 F5 JR C. F5<br />

455 0lC7 C9 RET<br />

Y-Koordiante Ende Zeile plus e<br />

456 01CS CD AE 05 CALL 05AE<br />

457<br />

458<br />

459 01CB lC INC E<br />

460 01CC 23 INC HL<br />

461 01CD 7E LD A. (HU<br />

462 01CE 87 OR A<br />

463 01CF CS RET Z<br />

464 0100 465<br />

3A 57 00 LD A. «057)<br />

466<br />

467 0103 B8 CP E<br />

468 01D4 469<br />

30 F5 JR NC. F5<br />

470 0106 C9 RET


SE ITE 10<br />

BASIC 1Z-013B V1_0A BASIC 1Z-0<br />

Zeile aus 8ildspeicher nach Eingabe-Puffer holen 531<br />

532 0214 09 ADD HL.BC<br />

471 01D7<br />

472<br />

Cl<br />

01<br />

POP POP 8C<br />

DE<br />

473 535 0217 ID OEC E<br />

474 01DA CD 89 01 CALL 01B9 IY-KOORDINATE ANFANG 536 0218 20 E1 JR NZ. E<br />

475 I ZEILE BEREITSTELLEN 537<br />

476 538 021A D5 PUSH DE<br />

477 01DD 53 LD D.E Y-KOORDINATE ANFANG MERKEN 539 0218 E5 PUSH HL<br />

478 01DE CD C8 01 CALL 01CB IY-KOORDINATE ENDE ZEILE 540 021C 09 EXX<br />

479 I 8ERE I TSTELLEN 541 0210 D9 EXX<br />

480 542 021E EI POP HL<br />

481 01El 3A 5B 00 LD A. .<br />

512 0200 CD 86 04 CALL 04B6 IANZEIGE-CODE IM ACCU 574<br />

513 IUMSETZEN IN ASCII 575 023F 2B DEC HL<br />

514 576 0240 10 F4 DJNZ F4<br />

515 0203 23 INC HL ZEIGER AUF BILDSCHIRM 577<br />

516 0204 02<br />

LD (BC). A<br />

ZEICHEN IM PUFFER MERKEN 578 0242 87<br />

OR A<br />

517 0205 03<br />

INC BC<br />

ZEIGER AUF PUFFER<br />

579 0243 C3 AE 01 JP 01AE<br />

518 0206 D9 EXX 580<br />

519 0207 2D DEC L , RESTANZAHL ZEICHEN MAXIMAL 581<br />

520 0208 28 13 JR Z. 13 ~ 021DH PUFFER VOLL<br />

521<br />

522 020A D9 EXX 582 0246 7E LD A. (HL><br />

523 020B 15 DEC D • RESTANZAHL ZEICHEN IN ZEILE 583 0247 B7 OR A<br />

524 020C C2 FD 01 JP NZ, 01FD • I NÄCHSTES ZEICHEN AUS 584 0248 20 02 JR NZ. 02<br />

525 I DIESER ZEILE HOLEN 585<br />

526 586 024A 36 20 LD (HL>.<br />

527 020F E1 POP HL ANFANGSKOORDINATE 587<br />

528 0210 CS PUSH BC ZEIGER AUF EINGA8E-PUFFER 588 024C 28 DEC HL<br />

529 0211 01 28 00 LD BC, 0028 40 ZEICHEN JE ZEILE 589 024D 10 F7 DJNZ F7<br />

530 590


SEITE 12<br />

BASIC 1Z-013B V1_0A BASIC 1Z<br />

591 024F<br />

592 0250<br />

B7<br />

C3 AE 01<br />

OR<br />

JP<br />

A<br />

01AE<br />

CARRY-FLAG ZURüCKSETZEN<br />

'WagenrUcklauf AUSGEBEN<br />

• UND GERETTETE REGISTER<br />

593<br />

594 • HOLEN 648<br />

649 0289 CD 13 03 CALL<br />

650<br />

Tastaturabfrage nach Status im ACCU 651<br />

652 028C CD 33 03 CALL<br />

595 0253 3C INC A 653<br />

596 0254<br />

597<br />

598<br />

CA 08 02 JP Z, 0208 'TASTATURABFRAGE<br />

• ENTPRELLEN<br />

645<br />

646<br />

647<br />

MIT 654<br />

655<br />

656<br />

0286<br />

0287<br />

08<br />

06 10<br />

EX<br />

LD<br />

AF<br />

B,<br />

028F CB 4F BIT 1<br />

599 0257 3D OEC A 657 0291 20 F4 JR NZ<br />

600 0258<br />

601<br />

CA FO 02 JP Z, 02FO ABFRAGE, OB TASTE GEDRüCKT 658<br />

659 0293 10 F4 DJNZ<br />

602 660<br />

661 0295 CB 47 BIT 0<br />

662<br />

ein Zeichen von Tastatur mit Cursorblinken 663 0297 28 11 JR Z.<br />

664<br />

603 025B<br />

604<br />

605<br />

606 025E<br />

607 025F<br />

608 0260<br />

609 026 1<br />

610<br />

611<br />

612 0264<br />

613<br />

614<br />

615 0267<br />

616 0268<br />

CD FA 02 CALL 02FA • UNTERSUCHEN, OB NOCH<br />

• ZEICHEN VON FUNKTIONS­<br />

C5<br />

E5<br />

D5<br />

CD<br />

CD<br />

B6<br />

EA<br />

05<br />

00<br />

57<br />

3A 60 00<br />

PUSH<br />

PUSH<br />

PUSH<br />

CALL<br />

CALL<br />

LD<br />

LO<br />

BC<br />

HL<br />

OE<br />

05B6<br />

OOEA<br />

D,A<br />

A, (0060)<br />

'TASTE BEREITSTEHEN<br />

• REGISTER RETTEN<br />

•<br />

• IBILDSCHIRMKOORDINATE<br />

lAUS CURSORPOSITION<br />

• ERRECHNEN<br />

I ZEICHEN AUS BILDSPEICHER<br />

I HOLEN<br />

ORIGINALZEICHEN MERKEN<br />

AKTUELLES CURSORZEICHEN<br />

665<br />

666<br />

667<br />

668<br />

669<br />

670<br />

671<br />

672<br />

673<br />

674<br />

675<br />

676<br />

0299 CB 57 BIT 2<br />

02A6 3E 06 LD A,<br />

617<br />

618 680 02A8 18 13 JR 13<br />

619 026B<br />

620 026C<br />

6~1<br />

622<br />

623 026F<br />

624 0270<br />

625 0271<br />

626<br />

627 0273<br />

628<br />

629<br />

630 0276<br />

631 0277<br />

5F<br />

CD F2 00<br />

AF<br />

F3<br />

D3<br />

32<br />

2F<br />

32<br />

E3<br />

00<br />

EO<br />

LO E,A<br />

CALL 00F2 c<br />

XOR A<br />

01<br />

OUT (E3),A<br />

LD (EOOO),A<br />

CPL<br />

LO (EOOO),A<br />

MERKEN<br />

'CURSoRZEICHEN IM BILD­<br />

• SPEICHER EINTRAGEN<br />

ACCU AUF NULL<br />

INTERRUPT SPERREN<br />

• UMSCHALTEN AUF SYSTEM­<br />

'ADRESSEN AB $DOOO<br />

I ZÄHLER FüR CURSoR­<br />

'BLINKFREQUENZ INITIIERN<br />

00 EO<br />

693<br />

632<br />

•<br />

694<br />

633 695<br />

634 027A D3 E1<br />

OUT (EU ,A<br />

;<br />

635<br />

636 027C<br />

637 0270<br />

638<br />

639 027F<br />

640 0280<br />

641 0281<br />

642<br />

643<br />

644 0284<br />

FB<br />

OE<br />

08<br />

F5<br />

CD<br />

3E<br />

00<br />

33<br />

60<br />

03<br />

EI<br />

LO C, 00<br />

EX AF,AF'<br />

PUSH AF<br />

CALL 0333<br />

LD A, 60<br />

;<br />

•<br />

• UMSCHALTEN AUF<br />

• RAM AB $DOOO<br />

INTERRUPT WIEDER FREIGEBEN<br />

• REGISTER RETTEN<br />

•• FESTSTELLEN, OB SICH<br />

'TASTATURSTATUS GEÄNDERT<br />

• HAT<br />

I ZÄHLER FüR REPEAT-VER­<br />

677<br />

678<br />

679<br />

681<br />

682<br />

683<br />

684<br />

685<br />

686<br />

687<br />

688<br />

689<br />

690<br />

691<br />

692<br />

696<br />

697<br />

698<br />

699<br />

700<br />

701<br />

702<br />

703<br />

704<br />

705<br />

706<br />

029B<br />

02 9D<br />

029E<br />

02 9F<br />

02Al<br />

02A3<br />

02A4<br />

02AA<br />

02AB<br />

02AC<br />

02AD<br />

02BO<br />

02B3<br />

02B6<br />

02B8<br />

02B9<br />

02BA<br />

02BB<br />

02BD<br />

02CO<br />

20 lE<br />

08<br />

3 D<br />

20 E5<br />

3E 00<br />

B7<br />

20 E1<br />

E5<br />

D5<br />

C5<br />

21<br />

11<br />

01<br />

ED<br />

Cl<br />

01<br />

El<br />

3E<br />

32<br />

CD<br />

F2<br />

E8<br />

OA<br />

BO<br />

60<br />

85<br />

13<br />

OE<br />

OE<br />

00<br />

02<br />

03<br />

JR NZ<br />

EX AF<br />

DEC A<br />

JR NZ<br />

LD A,<br />

OR A<br />

JR ~Z<br />

PUSH<br />

PUSH<br />

PUSH<br />

LO HL<br />

LO OE<br />

LO BC<br />

LDIR<br />

POP B<br />

POP D<br />

POP H<br />

LD A.<br />

LD (0<br />

CALL


SEITE 14 <br />

BASIC 1Z-013B V1.0A <br />

707 02C3 CD 71 03 CALL 0371 I TASTATUR AUF GEDRüCKTE<br />

708 I TASTE ABFRAGEN<br />

709<br />

710 02C6 B7 OR A TASTE GEDRüCKT ?<br />

711 02C7 28 F7 JR Z, F7 ~ 02COH NEIN ~ WEITER ABFRAGEN<br />

712<br />

713 02C9 32 5F 00 LD


SEITE 16<br />

BASIC 1Z-013B V1_0A BASIC 1Z<br />

810 032A 30 OEC A CURSORZEICHEN IM BILDSP. 868<br />

811 0328 C8 RET Z JA 869 0365 23 INC H<br />

812 032C OE 01 LO C. 01 I CODE CURSORZEICHEN 870 0366 13 INC D<br />

871<br />

872 0367 10 09 OJNZ<br />

813<br />

814 032E 78 LO A.E<br />

I IM BILOSPEICHER<br />

CURSORZEICHEN HOLEN<br />

815 032F CO F2 00 CALL 00F2 I NACH BILDSPEICHER 873 0369 79 LO A.<br />

036A 03 EI OUT (<br />

816<br />

817<br />

I üBERTRAGEN 874<br />

875<br />

818 0332 C9 RET 876 036C FB EI<br />

Abfrage. ob sich Tastaturstatus geändert hat 879<br />

880<br />

877 0360 01 POP D<br />

878 036E EI POP H<br />

819 0333 C5 PUSH BC I REGISTER RETTEN<br />

820 0334 E5 PUSH HL I<br />

821 0335 05 PUSH DE I Tastatur abfragen; bei R<br />

822 0336 11 F2 OE LD OE. OEF2 I ZEIGER AUF WERTE gedrückten Taste oder OOH<br />

823 ILETZTER ZEILENSTATUS<br />

824 881 0371 C5 PUSH<br />

825 0339 21 E8 OE LD HL. OEE8 I ZEIGER AUF WERTE 882 0372 E5 PUSH<br />

883 0373 D5<br />

826 IAKTUELLER ZEILENSTATUS PUSH<br />

827 884 0374 21 E8 OE LO HL<br />

828 033C 01 00 OA LD BC. OAOO OA ANZAHL SPALTEN 885<br />

829 00 VORGABE FüR FLAGS 886<br />

830 887 0377 11 F2 OE LO DE<br />

831 033F F3 01 INTERRUPT SPERREN<br />

888<br />

832 0340 03 E3 OUT (E3).A I UMSCHALTEN AUF SYSTEM­ 889<br />

833 I ADRESSEN AB $0000 890 037A E5 PUSH<br />

834 0342 78 LD A.B ZÄHLER RESTANZAHL SPALTEN ~91 037B 05 PUSH<br />

835 0343 C6 EF ADD A. EF IUMRECHEN IN SPALTENWERT 892 037C 01 OA 00 LD BC<br />

836 I FüR PORT A / 8255 893<br />

837 0345 32 00 EO LD (EOOO).A SPALTENNUMMER AUSGEBEN 894<br />

838 895 037F EO BO LDIR<br />

839 896<br />

840 0348 FE F8 CP F8 SPALTE MIT SFT/BREAK/CTRL 897 0381 EI<br />

POP H<br />

841 898 0382 DI POP O<br />

842 034A 3 A 01 EO LD A. (EOOI) ZEILENWERT ABFRAGEN 899 0383 01 F9 OA LD BC<br />

843<br />

900<br />

844<br />

901<br />

845 0340 20 02 JR NZ. 02 ~ 0351H NORMALE SPALTE 902 0386 F3·<br />

01<br />

846 903 0387 03 E3 OUT (<br />

847 034F F6 7F OR 7F I TASTEN BIS AUF BREAK 904<br />

848 I VERGESSEN 905 0389 79 LD A.C<br />

849 035.1 FE FF CP FF TASTE GEDRUCKT ? 906 038A 32 00 EO LD (E<br />

850 907<br />

851 0353 28 02 JR Z. 02 ~ 0357H 908<br />

• NEIN<br />

852 909 038D 00 NOP<br />

853 0355 CB Cl SET O.C CODE TASTE GEDRüCKT 910 038E 3A 01 EO LO A.<br />

854 911<br />

855 0357 EB EX DE.HL ZEIGER LETZTER WERT NACH HL<br />

912<br />

856 0358 BE CP (HLl • VERGLEICHEN<br />

913 0391 12 LD .A NEUEN STATUS MERKEN 914 0392 79<br />

LD A.C<br />

858 035A EB EX DE.HL 915 0393 32 00 EO LD (E<br />

859 035B 28 02 JR Z. 02 + 035FH • I GLEICHER STATUS +<br />

916<br />

860 I TASTE NICHT GEPRELLT<br />

917<br />

861 035D CB C9 SET 1.C • CODE TASTE GEPRELLT 918 0396 FE Fa CP F<br />

862 919<br />

863 035F 2F CPL I TASTE ZUSÄTZLICH 920 0398 3A 01 EO LD A.<br />

864 0360 A6 AND (HL> ; I GEDRUCKT ? 921<br />

865 0361 28 02 JR Z. 02 + 0365H NEIN 922<br />

866 923 039B 12 LD (O<br />

867 0363 CB Dl SET 2.C I CODE TASTATURSTATUR 924 039C 28 23 JR Z.<br />

036F<br />

0370<br />

Ci<br />

C9<br />

POP<br />

RET<br />

B


SEITE 18<br />

BASIC 1Z-013B V1_0A BASIC 1Z<br />

925<br />

926 039E<br />

927 039F<br />

928 03AO<br />

929 03Al<br />

930 03A2<br />

931 03A3<br />

932 03A4<br />

933<br />

934 03A6<br />

935<br />

936 03A8<br />

937 03A9<br />

938<br />

939<br />

940 03AC<br />

941 03AD<br />

942 03AE<br />

943 03AF<br />

944<br />

945 0381<br />

946 0382<br />

947<br />

2F<br />

A6<br />

77<br />

13<br />

23<br />

OD<br />

10 EC<br />

D3<br />

FB<br />

01<br />

El<br />

2B<br />

7E<br />

B7<br />

20 33<br />

OC<br />

10 F8<br />

00 OA<br />

CPL<br />

AND (HU<br />

LD (HU.A<br />

INC DE<br />

INC HL<br />

DEC C<br />

DJNZ EC + 0392H<br />

OUT (Ei>. A<br />

EI<br />

LD BC. OAOO<br />

DEC HL<br />

LD A. (HU<br />

ORA<br />

JR NZ. 33 + 03E4H<br />

INC C<br />

DJNZ F8 + 03ACH<br />

;<br />

IENTPRELLUNG AUFHEBEN<br />

I ÄNDERUNG MASKIEREN<br />

I<br />

UND MERKEN<br />

ZEIGER AUF AKTUELLE WERTE<br />

ZEIGER AUF ÄNDERUNGEN<br />

SPALTENNUMMER<br />

WEITER SPALTEN ABFRAGEN<br />

I UMSCHALTEN AUF<br />

IRAM AB $DOOO<br />

INTERRUPT FREIGEBEN<br />

I OA = ANZAHL SPALTEN<br />

I 00 = ZÄHLER<br />

ZEIGER AUF<br />

WERT "HOLEN<br />

ÄNDERUNG ?<br />

JA + TASTE<br />

ZÄHLER<br />

I WEITERE SPALTEN<br />

I ÄNDERUNG TESTEN<br />

948 0384 06 OA LD B. OA 10 SPALTEN<br />

949<br />

950 03136<br />

951 03B7<br />

IB<br />

1A<br />

FE FF<br />

DEC DE<br />

LD A.


SEITE 20 <br />

BASIC 1Z-013B V1_0A <br />

1045<br />

1046 0416 ED BO LDIR<br />

1047 <br />

ITEXT NACH ZWISCHEN­<br />

I SPE I CHER HOLEN<br />

1048 0418 3A Dl OE LD A. (OEDl> TEXTLANGE<br />

1049<br />

1050<br />

1051 041B B7<br />

oR A GLEICH NULL ?<br />

IJA ~ TASTE VERGESSEN<br />

1052 041C CA BE 03 JP Z. 03BE<br />

1053<br />

1054<br />

1055 041F 3D DEC A<br />

IUND WEITER ABFRAGEN<br />

MINUS EINS<br />

RESTTEXTLANGE MERKEN<br />

1056 0420 32 Dl OE LD (OEDll.A<br />

1057<br />

1058<br />

1059 0423 3A D2 OE LD A. (OED2l ERSTES ZEICHEN HOLEN<br />

1060 <br />

1061 <br />

JP 036A <br />

GERETTETE REGISTER HOLEN<br />

1062 0426 C3 6A 03<br />

1063 <br />

1064 <br />

aus Zeilennummer und Spaltenwert ASCII-Code der <br />

gedrückten Taste bereitstellen <br />

1065 0429 CD 96 04 CALL 0496<br />

1066<br />

1067<br />

1068 042C 69 LD L.C<br />

1069 042D 26 00 LD H. 00 <br />

1070 <br />

I IM ACCU GESETZTES BIT<br />

IUMRECHNEN IN BIT-NUMMER<br />

I NACH B<br />

SPALTENNUMMER<br />

HL ENTHALTE SPALTE<br />

1071 042F 29<br />

ADD HL.HL<br />

I MAL 2


SEITE 22<br />

BASIC 1Z-013B V1_0A<br />

BASIC 1Z<br />

1212<br />

1164 I UMRECHNEN 1213 04BD BE CP (HU<br />

1165 048D C3 6A 03 JP 036A GERETTETE REGISTER HOLEN 1214 04BE 28 07 JR Z. 0<br />

1166 1215<br />

1167 1216 04CO ~~ INC HL<br />

1168 0490 3E 20 LD A, 20 ICTRL-WERT ERRECHNEN 1217 04Cl 10 FA DJNZ FA<br />

1169 I 1218<br />

1170 0492 90 SUB B I 1219 04C3 AF XOR A<br />

1171 0493 C3 6A 03 JP 036A GERETTETE REGISTER HOLEN 1220 04C4 Cl POP BC<br />

1172 1221 04C5 EI POP HL<br />

1173 1222 04C6 C9 RET<br />

im Accu gesetztes Bit umsetzen in Bitnummer nach B 1223 04C7 3E 00 LD A. 0<br />

1224<br />

1174 0496 06 08 LD B, 08 VORGABE FüR WERT 1225 04C9 90 SUB B<br />

1175 1226 04CA Cl POP Be<br />

1176 0498 OF RRCA EIN BIT NACH CARRY SCHIEBEN 1227 04CB EI POP HL<br />

1177 0499 38 03 JR C, 03 ~ 049EH GESETZTES BIT GEFUNDEN 1228 04CC C9 RET<br />

1178<br />

1179 049B 10 FB DJNZ FB ~ 0498H WEITER SCHIEBEN<br />

1180 Zeichen im Accu umsetzen v<br />

1181 049D C9 RET<br />

1182 049E 05 DEC B WERT CORRIGIEREN 1229 04CD E5 PUSH H<br />

1183 049F C9 RET 1230 04CE C5 PUSH BC<br />

1231 04CF 4F LO C.A<br />

1232 04DO 06 00 LD B.<br />

Abfrage, ob SFT-BREAK gedrUckt; wenn Ja • Z-Flag bei 1233<br />

RUckkehr gesetzt. ist nur BREAK gedrUckt, wird das Programm 1234 04D2 21 FC OE LD HL.<br />

so lange angehalten, bi~ diese Taste losgelassen wird. 1235<br />

1236<br />

1184 04AO 3E E8 LO A, E8 I VORGABE FüR SPALTE 1237 0405 09 AOD HL<br />

1185 IMIT SHFIFT/BREAK - TASTE 1238 04D6 7E LD A. (<br />

1186 04A2 F3 01 INTERRUPT SPERREN 1239 04D7 Cl POP BC<br />

1187 04A3 D3 E3 OUT (E3), A I UMSCHALTEN AUF SYSTEM­ 1240 04D8 El POP HL<br />

1188 I ADRESSE AB $0000 1241 04D9 C9 RET<br />

1189 04A5 32 00 EO LD (EOOO),A ISPALTENNUMMER AN<br />

1190 I TASTATUR AUSGEBEN<br />

1191 ASCII - Te:{t ab (OE) bis O<br />

1192 04A8 00 NOP ZEIT SCHINDEN<br />

1193 04A9 3A 01 EO LD A, (E001) I ZEILENWERT VON TASTATUR 1242 04DA D5 PUSH O<br />

1194 I HOLEN 1243 040B lA LD A, <<br />

1195 1244 04DC B7 OR P<br />

1196 04AC D3 EI OUT (EI), A I UMSCHALTEN AUF 1245 04DO 28 06 JR Z.<br />

1197 I RAM AB $0000<br />

1246<br />

1198 04AE FB EI INTERRUPT FREIGEBEN 1247 04DF CO 3.3 05 CALL 0<br />

1199 04AF E6 81 AND A, 81 ; SHIFT UND BREAK MASKIEREN 1248<br />

1200 1249<br />

1201 04Bl C8 RET Z KEINE DER TASTEN GEDRüCKT 1250 04E2 13 INC OE<br />

1202 04B2 07 RLCA BREAK-TASTE NACH CARRY 1251 04E3 18 F6 JR F6<br />

1203 04B3 D8 RET C BREAK NICHT GEDRüCKT 1252<br />

1204 04B4 18 EA JR EA • 04AOH I WARTEN, BIS TASTE 1253 04E5 01 POP DE<br />

1205 I LOSGELASSEN WIRD 1254 04E6 C9 RET<br />

Zeichen im Accu von Anzeigecode in ASCII umsetzen<br />

1206 04B6 E5 PUSH HL I REGISTER RETTEN<br />

1207 04B7 C5 PUSH BC I<br />

1208 04B8 21 FC OE LO HL, OEFC I ZEIGER AUF AUF<br />

1209 I UMSETZTABELLEN<br />

1210<br />

1211 04BB 06 00 LD B. 00 TABELLE HAT 256 ZEICHEN


SEITE 24<br />

BASIC 1Z-013B V1.0A BASIC 1Z<br />

Abfrage. ob Cursor auf Anfang logische Zeile steht Umsetztabelle für Steuerz<br />

1255 04E7 E5 PUSH HL REGISTER RETTEN 1297 0511 00<br />

1256 04E8 2A 54 00 LD HL. (0054) AKTUELLE CURSORKOORDINATE 1298 0512 00<br />

1257 1299 0513 00<br />

1258 1300 0514 00<br />

1259 04EB 3A 5B 00 LD A. (0058) X-KooRDIANTE MINIMAL 1301 0515 (~<br />

1260 1302 0516 00<br />

1261 1303 0517 00<br />

1262 04EE BD CP L AKTUELLE X-KOORDINATE 1304 0518 10 nächste Fa<br />

1263 04EF 38 07 JR C. 07 + 04F8H I AKTUELLE KOORDINATE> 1305 0519 00<br />

1264 IX-KOORDINATE MINIMAL 1306 051A 00<br />

1265 04F1 D5 PUSH DE REGISTER RETTEN 1307 051B 00<br />

1266 04F2 CD AE 05 CALL 05AE • I ZEIGER AUF VERKETTUNGS­ 1308 051C 00<br />

1267 IFLAG DER ZEILE HOLEN 1309 0510 00<br />

1268<br />

1269 04F5<br />

1270 04F6<br />

1271 04F7<br />

7E<br />

B7<br />

Dl<br />

1272 04F8 E1<br />

1273 04F9 C9<br />

Zeilenvorschub<br />

LD A. (HU<br />

oR A<br />

POP DE<br />

POP HL<br />

RET<br />

ausgeben. wenn Cursor<br />

VERKETTUNGSFLAG HOLEN<br />

ZEILEN VERKETTET ?<br />

I GERETTETE REGISTER HOLEN<br />

nicht auf Anfang Zeile .teht<br />

1310<br />

1311<br />

1312<br />

1313<br />

051E<br />

051F<br />

0520<br />

0521<br />

1314 0522<br />

1315 0523<br />

1316 0524<br />

1317 0525<br />

1318 0526<br />

1319 0527 00<br />

1274 04FA CD E7 04 CALL 04E7 I ABFRAGE. OB CURSOR AUF 1320 0528 00<br />

1275 I ANFANG EINER ZEILE STEHT 1321 0529 00<br />

1276 1322 052A 00<br />

1277 04FD C8 RET . Z I CURSOR STEHT AUF ANFANG 1323 0528 00<br />

1324 052C<br />

1325 0520<br />

Zeilenvorschub auf Bildschirm ausgeben 1326 052E 00<br />

1327 052F 00<br />

1278 04FE 3E OD LD A. OD Wagenrücklauf 1328 0530 00<br />

1279<br />

1280 0500 18 31 JR 31 + 0533H ; ZEICHEN IM ACCU AUSGEBEN<br />

1281 ein Space ausgeben<br />

00<br />

00<br />

00<br />

~)<br />

OA<br />

03<br />

20<br />

OE<br />

00<br />

00<br />

00<br />

Wagenr-ückl<br />

Zeilenvorsc<br />

Zeilenr-ück<br />

Space<br />

Rückschrit<br />

Wagenrücld<br />

Cursor auf nächste Tabulatorposition setzen<br />

1329 0531<br />

1330<br />

3E 20 lD A.<br />

1282 0502 CO OC 00 CAlL OOOC EIN Space AUSGEBEN<br />

1283 ASCII - Zeichen im Accu a<br />

1284<br />

1285 0505 3A 54 00 LD A. (0054) • AKTUELLE X-KOORDINATE 1331 0533 E5 PUSH<br />

1286 1332 0534 D5 PUSH<br />

1287 1333 0535 C5 PUSH<br />

1288 0508 D6 OA SUB A. OA 10er TAB<br />

1334 0536 F5 PUSH<br />

1289 1335 0537 CD 60 05 CALL<br />

1290 050A 30 FC JR NC. FC + 0508H • WEITER ABZIEHEN 1336<br />

1291 1337<br />

1292 050C C6 OA ADD A. OA WERT CORRIGIEREN 1338 053A 3A 40 00 lD A.<br />

1293 1339<br />

1294 050E C8 RET Z CURSOR STEHT AUF TAB-STOP 1.340<br />

1295 050F 18 Fl JR Fl + 0502H WEITERE SPACES AUSGEBEN<br />

1341 053D B7 oR A<br />

1296 1342 053E 28 19 JR Z.<br />

1343<br />

1344 0540 Fl POP A<br />

1345 0541 F5 PUSH<br />

1346 0542 FE 20 CP 2<br />

1347<br />

1348 0544 30 OE JR NC<br />

I


SEITE 26<br />

BASIC 1Z-013B V1_0A<br />

1349<br />

1350 0546<br />

1351 0547<br />

1352<br />

1353 0549<br />

1354<br />

1355<br />

1356 054C<br />

1357 054D<br />

1358 054E<br />

1359 054F<br />

1360<br />

1361<br />

1362 0552<br />

1363<br />

1364 0554<br />

1365 0555<br />

1.'366 0556<br />

1367<br />

1368<br />

1369 0559<br />

1370 055A<br />

1371 055B<br />

1372 055C<br />

1373 055D<br />

6F<br />

26 00<br />

11 11 05<br />

19<br />

7E<br />

B7<br />

C4 7E 16<br />

18 05<br />

F1<br />

F5<br />

CD 62 17<br />

F1<br />

Cl<br />

Dl<br />

El<br />

C9<br />

LD L,A <br />

LD H, 00 <br />

LD DE, 0511<br />

ADD HL,DE<br />

LD A, (HLl<br />

OR A<br />

CALL NZ, 167E<br />

JR 05 .. 0559H<br />

POP AF <br />

PUSH AF <br />

CALL 1762 <br />

POP AF <br />

POP BC <br />

POP DE <br />

POP HL <br />

RET <br />

Steuerzeichen <br />

HL ENTHÄLT OFFSET <br />

I ANFANG UMSETZTABELLE FüR<br />

I STEUERZEICHEN FüR DRUCKER<br />

ZEIGER AUF RICHTIGES ZEICH.<br />

STEUERZEICHEN AUS TABELLE<br />

VORHANDEN ?<br />

I JA ..<br />

I STEUERZEICHEN AN DRUCKER<br />

I AUSGEBEN<br />

GERETTETE REGISTER HOLEN<br />

AUSZUGEBENDES ZEICHEN<br />

AUSZUGEBENDES ZEICHEN<br />

I ZEICHEN AN DRUCKER<br />

I AUSGEBEN<br />

I GERETTETE REGISTER HOLEN<br />

I <br />

I <br />

I <br />

Zeichen im Accu ohne Untersuchung auf Steuerzeichen ausgeben<br />

1374 055E E5 PUSH HL I REGISTER RETTEN<br />

1375 055F D5 PUSH OE I<br />

1376 0560 C5 PUSH BC I<br />

1377 0561 F5 PUSH AF I<br />

1378 0562 CD 72 05 CALL 0572 I ZEICHEN IM ACCU OHNE<br />

1379 I UNTERSUCHUNG AUF BILD­<br />

1380 I SCHIRM AUSGEBEN<br />

1381 0565 3A 40 00 LD A, «040) PARALLELAUSGABEFLAG DRUCKER<br />

1382<br />

1383<br />

1384 0568 B7 OR A ; GESETZT ?<br />

1385 0569 20 E9 JR NZ, E9 .. OS54H IJA" ZEICHEN AN DRUCKER<br />

1386 I AUSGEBEN<br />

1387 056B 18 EC JR EC ? 0559H GERETTETE REGISTER HOLEN<br />

1388<br />

Zeichen im Accu auf Bildschirm ausgeben<br />

1389 056D FE 20 CP 20 Steuerzeichen ?<br />

1390<br />

1392 lROUTINE AUFRUFEN<br />

1391 056F DA D2 05 JP C, 05D2 IJA ~ STEUERZEICHEN­<br />

1393<br />

Zeichen im Accu ohne Untersuchung ~uf Steuerzeichen<br />

auf Bildschirm ~usgeben<br />

1394 0572 2A 54 00 LD HL, «054) • AKTUELLE CURSORPOSITION<br />

1395<br />

1396<br />

1397 0575 E5 PUSH HL MERKEN<br />

1398 0576<br />

1399 0577<br />

1400<br />

1401<br />

1402 057A<br />

1403 0578<br />

1404<br />

1405<br />

1406 057E<br />

1407<br />

1408<br />

1409 0581<br />

1410<br />

1411 0583<br />

1412<br />

1413<br />

1414 0586<br />

1415<br />

1416<br />

1417 0589<br />

1418 058A<br />

1419 058B<br />

1420<br />

1421<br />

1422 058E<br />

1423 058F<br />

1424<br />

1425<br />

1426 0592<br />

1427<br />

1428<br />

1429 0595<br />

1430 0596<br />

1431 0597<br />

1432 0598<br />

1433<br />

1434<br />

143 5 059B<br />

1436<br />

1437 059D<br />

1438 059E<br />

1439<br />

1440<br />

1441 05A1<br />

1442 05A2<br />

1443<br />

1444<br />

1445 05A5<br />

1446 05A6<br />

1447 05A7<br />

1448<br />

1449<br />

1450 05AA<br />

1451 05AB<br />

1452<br />

1453<br />

BASIC<br />

F5<br />

CO 89 05<br />

F1<br />

CO CO 04<br />

CD F2 00<br />

CB DC<br />

3A 5D 00<br />

CD F2 00<br />

El<br />

2C<br />

.3A 5C 00<br />

BD<br />

D2 D2 07<br />

3A 5B 00<br />

6F<br />

24<br />

E5<br />

CD AE 05<br />

3 6 01<br />

E1<br />

3A 57 00<br />

BC<br />

D2 D2 07<br />

67<br />

E5<br />

CD A5 06<br />

El<br />

C3 D2 07<br />

1Z<br />

PUSH<br />

CALL<br />

POP A<br />

CALL<br />

CALL<br />

SET 3<br />

LD A,<br />

CALL<br />

POP H<br />

INC L<br />

LD A,<br />

CP L<br />

JP Ne<br />

LD A,<br />

LD L,A<br />

INC H<br />

PUSH<br />

CALL<br />

LD (H<br />

POP H<br />

LD A,<br />

CP H <br />

JP NC<br />

LD H,<br />

PUSH<br />

CALL<br />

POP H<br />

JP 07


SEITE 28 <br />

BASIC 1Z-013B V1.0A <br />

Zeiger auf Verkettungsflag der Zeile mit V-Koordinate <br />

in H bereitstellen <br />

1454 05AE 5C LD E.H V-KOORDINATE <br />

1455 05AF 16 00 LD D. 00 OE ENTHÄLT OFFSET<br />

1456<br />

1457 05Bl 21 A7 00 LD HL~ 00A7 I ANFANG TABELLE MIT VER­<br />

1458 IKETTUNGSFLAGS FUR SILD­<br />

1459 ISCHIR<strong>MZ</strong>EILEN<br />

1460 0584 19 ADD HL,DE ZEIGER AUF FLAG ERRECHNEN<br />

1461 0585 C9 RET<br />

Bildschirmkoordinate aus Cursorposition errechnen<br />

1462 05S6 2A 54 00 LD HL. (0054) AKTUELLE CURSORPOSITION<br />

1463<br />

1464<br />

1465 05B9 05 PUSH OE REGISTER RETTEN<br />

1466 05BA CD C5 05 CALL 05C5 IBILDSPEICHEROFFSET AUF<br />

1467 IANFANG ZEILE AUS CURSOR­<br />

1468 I POSITION ERRECHNEN<br />

1469 05SD 16 00 LD 0, 00 ANFANG BILDSPEICHER<br />

147(1<br />

1471 05BF 19 ADD HL,DE AKTUELLE ADRESSE ERRECHNEN<br />

1472 05CO 01 POP OE GERETTETES REGISTER HOLEN<br />

1473 05Cl C9 RET<br />

Bildspeicheroffset auf Anfang physikalische Zeile <br />

aus Cursorkoordinate errechnen <br />

1474 05C2 2A 54 00 LD HL, (0054) ; AKTUELLE CURSORKOORDINATE<br />

1475<br />

1476<br />

1477 05C5 50 LD E.L X-KOORDINATE<br />

1478 05C6 6C LD L.H V-KOORDINATE<br />

1479 05C7 26 00 LD H. 00 ; HL ENTHÄLT V-KOORDINATE<br />

1480<br />

1481 05C9 40 LD C.L V-KOORDINATE<br />

1482 05CA 44 LD B.H NULL<br />

1483 05CS 29 ADD HL,HL I MAL 2 (40 ZEICHEN<br />

1484 05CC 29 ADD HL.HL ; I MAL 4 JE ZEILE)<br />

1485 05CD 09 ADD HL.BC I MAL 5<br />

1486 05CE 29 ADD HL.HL I MAL 10<br />

1487 05CF 29 ADD HL.HL • I MAL 20<br />

1488 0500 29 ADD HL.HL ; I MAL 40<br />

1489 0501 C9 RET<br />

Steuerzeichen-Routine nach Steuerzeichen im Accu aufrufen<br />

1490 0502 6F LD L.A • STEUERZEICHEN<br />

1491 0503 26 00 LD H. 00 l HL ENTHÄLT OFFSET<br />

1492<br />

1493 05D5 29 ADD HL.HL MAL ZWEI<br />

1494 0506 01 67 00 LD BC. 0067 I ANFANG TABELLE MIT<br />

1495 IANFANGSADRESSEN DER<br />

1496 ISTEUERZEICHENROUTINEN<br />

1497 05D9 09 ADD HL.BC I ZEIGER AUF ADRESSE ERRECH.<br />

1498 05DA 4E LD C. (HLl I ADRESSE AUS TABELLE<br />

1499 05DB 23 INC HL I HOLEN<br />

BASIC 1<br />

1500 05DC 66 LD H.<br />

1501 0500 69 LD L,<br />

1502 05DE E9 JP (H<br />

Bildschirmausschnitt nach<br />

1503 05DF 01 28 00 LO BC<br />

1504<br />

1505<br />

150605E2 ED 43 FO 05 LO (0<br />

1507<br />

1508<br />

1509<br />

1510 05E6 09 EXX<br />

1511 05E7 C5 PUSH<br />

1512 05E8 09 EXX<br />

1513 05E9 44 LD B<br />

1514 05EA · 4D LD C<br />

1515 05EB 15 DEC 0<br />

1516 05EC 28 29 JR Z.<br />

1517<br />

1518 05EE 05 PUSH<br />

1519 05EF 21 28 00 LD HL<br />

1520<br />

1521<br />

1522 05F2 09 ADD H<br />

1523 05F3 E5 PUSH<br />

1524 05F4 E5 PUSH<br />

1525 05F5 D9 EXX<br />

1526 05F6 Cl POP. B<br />

1527 05F7 09 EXX<br />

1528 05F8 F3 01<br />

1529 05F9 03 E3 OUT<br />

1530<br />

1531 05FS D9 EXX<br />

1532 05FC OA LD A,<br />

1533 05FD 09 EXX<br />

1534 05FE 02 LD (B<br />

1535 05FF 09 EXX<br />

1536 0600 CS 98 RES 3<br />

1537<br />

1538 0602 OA LD A,<br />

1539 0603 CB 08 SET 3<br />

1540<br />

1541 0605 03 INC B<br />

1542 0606 09 EXX<br />

1543 0607 CS 98 RES 3<br />

1544<br />

1545 0609 02 LD (B<br />

1546 060A CB 08 SET 3<br />

1547<br />

1548 060C 03 I NC B<br />

1549 060D 10 DEC E<br />

1550 060E 20 EB JR NZ<br />

1551<br />

1552 0610 03 El OUT<br />

1553<br />

1554 0612 FB EI<br />

1555 0613 Ei POP H<br />

1556 0614 01 POP D<br />

1557 0615 18 02 JR 02


SEITE 30 <br />

BASIC 1Z-013B V1_0A <br />

1558 I ZEILEN<br />

1559 0617 60 LO H,B I ZEIGER AUF ZEILE<br />

1560 0618 69 LD L,C I DUPL I Z I EREN<br />

1561 0619 EO 4B 50 00 LO BC, (0050) ZEICHEN/HINTERGRUNDFARBE<br />

1562<br />

1563<br />

1564<br />

1565 0610 F3 01 INTERRUPT SPERREN<br />

1566 061E 03 E3 OUT (E3),A I UMSCHALTEN AUF SYSTEM­<br />

1567 I ADRESSEN AB $0000<br />

1568 0620 71 LO (HL> ,C ZEICHEN/HINTERGRUNOFARBE<br />

1569 0621 CB 9C RES 3,H ZEIGER AUF BILDSPEICHER<br />

1570<br />

1571 0623 70 LO (HL>, B ZEICHEN LöSCHEN<br />

1572 0624 CB DC SET 3,H ZEIGER AUF FARB-SPEICHER<br />

1573<br />

1574 0626 23 INC HL AUF NÄCHSTES ZEICHEN<br />

1575 0627 1D DEC E RESTANZAHL ZEICHEN<br />

1576 0628 20 F6 JR NZ. F6 ~ 0620H WEITERE ZEICHEN LöSCHEN<br />

1577<br />

1578 062A D3 El OUT (E1>. A I UMSCHALTEN AUF RAM<br />

1579 I AB $0000<br />

1580 062C FB EI INTERRUPT FREIGEBEN<br />

1581 0620 D9 EXX<br />

1582 062E Cl POP BC GERETTETES REGISTER HOLEN<br />

1583 062F 09 EXX<br />

1584 063 0 C9 RET<br />

eine Bilschirmzeile von (HL> nach


SEITE 32<br />

BASIC 1Z-013B<br />

Bildschirminhalt um eine Zeile nach unten<br />

1661 067D 21 CF D7 LD HL. D7CF<br />

1662<br />

1663<br />

1664 0680 11 F7 07 LD OE. D7F7<br />

1665<br />

1666<br />

1667 0683 F3 DI<br />

1668 0684 06 32 LD B. 32<br />

1669<br />

1670 0686 C5 PUSH BC<br />

1671 0687 CD 35 06 CALL 0635<br />

1672<br />

1673<br />

1674 068A Cl POP BC<br />

1675 068B 10 F9 DJNZ F9 ~ 0686H<br />

1676<br />

1677 0680 21 00 07 LO HL. D700<br />

1678<br />

1679<br />

1680 0690 11 00 00 LD DE. DOOO<br />

1681<br />

1682<br />

1683 0693 CO 31 06 CALL 0631<br />

1684<br />

1685<br />

1686 0696 FB EI<br />

1687 0697 21 09 00 LO HL. 0009<br />

1688<br />

1689<br />

1690 069A 5D LD E.L<br />

1691 069B 54 LD O.H<br />

1692 069C 2B DEC HL ;<br />

1693 0690 lA LD A.


SEITE 34 <br />

BASIC 1Z-013B V1_0A <br />

1775 06EF 13 INC DE • IVERKETTUNGSFLAGS DER <br />

1776 06FO lA LD A. (OE) • I ZEILEN VERSCHIEBEN <br />

1777 06Fl 13 INC DE I <br />

1778 06F2 77 LD (HL>.A I <br />

1779 06F3 23 INC HL I <br />

1780 06F4 10 FA DJNZ FA ~ 06FOH I <br />

1781 <br />

1782 06F6 36 00 LD (HL>. 00 LETZTE ZEILE NICHT VERKETT. <br />

1783 <br />

1784 06F8 C9 RET <br />

Steuerzeichen HOME<br />

1785 06F9 3A 5B 00 LD A.


SEITE 36<br />

BASIC 1Z-013B V1_0A<br />

BASIC 1 Z<br />

1879<br />

1880<br />

1881<br />

1882<br />

1883<br />

1884<br />

gesetzten Bilschirmausschnitt löschen<br />

0757 CD 04 07 CALL 0704 I WERTE FüR BILDSCHIRMlAUSSCHNITT<br />

BEREITSTELLEN<br />

075A<br />

0758<br />

075C<br />

05<br />

E5<br />

3A 50 00<br />

PUSH OE<br />

PUSH HL<br />

LD A, «050)<br />

ZEICHEN ZEILEN<br />

ZEIGER AUF AUSSCHNITT<br />

ZEICHEN/HINTERGRUNDFARBE<br />

1939<br />

1885 1940<br />

1886<br />

1887<br />

1888<br />

1889<br />

1890<br />

1891<br />

075F<br />

0760<br />

0762<br />

0763<br />

F3<br />

03<br />

77<br />

CB<br />

E3<br />

DI<br />

OUT (E3),A<br />

LD (HLl,A<br />

RES 3,H<br />

INTERRUPT SPERREN<br />

I UMSCHALTEN AUF·SYSTEM­<br />

I ADRESSEN AB $DOOO<br />

HINTERGRUNDFARBE VORGEBEN<br />

ZEIGER AUF BILDSPEICHER<br />

9C<br />

1892<br />

1893 0765 36 00 LD (HLl, 00 ZEICHEN LöSCHEN<br />

1894<br />

1895 0767 CB DC SET 3,H ZEIGER AUF FARBSPEICHER<br />

1896<br />

1897 0769<br />

1898 076A<br />

1899 076B<br />

1900<br />

1901 0760<br />

1902<br />

1903 076F<br />

1904 0770<br />

1905 0771<br />

23<br />

ID<br />

20<br />

03<br />

FB<br />

EI<br />

01<br />

F5<br />

EI<br />

INC HL<br />

DEC E<br />

JR NZ, F5 ~<br />

OUT (EU ,A<br />

EI<br />

POP HL<br />

LD BC. 0028<br />

0762H<br />

AUF NÄCHSTES ZEICHEN<br />

RESTANZAHL ZEICHEN/ZEILE<br />

I WEITERE ZEICHEN IN DIESER<br />

I ZEILE LöSCHEN<br />

I UMSCHALTEN AUF<br />

I RAM AB $DOOO<br />

INTERRUPT FREIGEBEN<br />

ZEIGER AUF ANFANG ZEILE<br />

OFFSET AUF NÄCHSTE ZEILE<br />

1933<br />

1934<br />

1935<br />

1936<br />

1937<br />

1938<br />

1941<br />

1942<br />

1943<br />

1944<br />

1945<br />

1946<br />

-1947<br />

1948<br />

1949<br />

1950<br />

WagenrQcklauf (Zeilenvors<br />

0780 2A 54 00 LD HL<br />

0790<br />

0793<br />

0795<br />

0798<br />

0799<br />

079A<br />

3A<br />

E6<br />

32<br />

E5<br />

24<br />

CD<br />

5D<br />

7F<br />

5D<br />

AE<br />

00 LD A,<br />

00<br />

05<br />

AND A<br />

LD


SEITE 38<br />

SIC 1Z-013B V1_0A<br />

BASIC 1Z<br />

1985 07Cl 3A 5B 00 LD A. (005B) X-KOORDINATE MINIMAL<br />

1986<br />

1987<br />

1988 07C4 6F LD L,A ALS X-KOORDINATE VORGEBEN<br />

1989<br />

1990<br />

1991<br />

1992<br />

1993<br />

1994<br />

1995<br />

1996<br />

1997<br />

1998<br />

1999<br />

2000<br />

2001<br />

07C5<br />

07C6<br />

07C9<br />

07CA<br />

07CC<br />

07CD<br />

07CE<br />

24<br />

3A 57 00<br />

BC<br />

30<br />

67<br />

E5<br />

CD<br />

06<br />

A5 06<br />

INC H<br />

LD A, (0057)<br />

CP H<br />

JR NC, 06<br />

LD H.A<br />

PUSH HL<br />

CALL 06A5<br />

~ 07D2H<br />

c<br />

Y-KOORDINATE<br />

Y-KOORDINATE<br />

PLUS EINS<br />

MINIMAL<br />

MIT Y-KOORDINATE VERGLEICH.<br />

IY-KOORDINATE IST OK ~<br />

ICURSORKOORDINATE MERKEN<br />

Y-KOORDINATE MAXIMAL<br />

CURSORKOORDINATE RETTEN<br />

BILDSCHIRM SCROLLEN<br />

2039<br />

2040<br />

2041<br />

2042<br />

Umstellen auf Alpha - Mo<br />

07F8<br />

07FA<br />

3 E<br />

21<br />

Umstellen<br />

2043 07FB 3E<br />

2044<br />

2045 07FD 21<br />

EF LD A.<br />

auf<br />

FF<br />

G~aphik - M<br />

0701 EI<br />

POP HL<br />

CURSORKOORDINATE HOLEN<br />

Umstellen auf Kleinschreib<br />

2002 0702 22 54 00 LD (0054),HL<br />

AKTUELLE CURSORKOORDINATE<br />

2003 2046 07FE 3E 43 LD A.<br />

2004 2047<br />

2005 07D5 C9 RET 2048 0800 32 60 00 LD (0<br />

2049<br />

2050<br />

Steue~zeichen Cu~so~ hoch 2051 0803 C9 RET<br />

LD A,<br />

2006 07D6 2A 54 00 LD HL. (0054) AKTUELLE CURSORKOORDINATE<br />

2~)7 SteL\erzei ehen Delete<br />

2008<br />

2009 0709 18 00 JR 00 ~ 07E8H IY-KOORDINATE, WENN 2052 0804 2A 54 00 LD HL<br />

2010 I MöGLICH, MINUS EINS 2053<br />

2054<br />

2055 0807 ED 4B 5B 00 LD BC<br />

Steue~zeichen Cu~so~ links 2056<br />

2057<br />

2011 07DB 2A 54 00 LD HL. (0054) AKTUELLE CURSORKOORDINATE 2058<br />

2012<br />

2059 080B 70 LD A,L<br />

2013<br />

2060 080C 20<br />

DEC L<br />

2014 07DE 3A 5B 00 LD A, (005B) X- KOORDINATE MINIMAL<br />

206 1 0800 OC<br />

INC C<br />

2015 2062 080E 89 CP C<br />

2016 2063 080F 3 0 OC JR NC<br />

2017<br />

2018 07El<br />

07E2<br />

BD<br />

38 OF<br />

CP<br />

JR C. L<br />

OF ~ 07F3H<br />

AKTUELLE<br />

I NOCH OK<br />

X-KOORDINATE<br />

~ X-KOORDINATE<br />

2019<br />

IMINUS EINS UND MERKEN<br />

2066<br />

2020 07E4 3A 5C 00 LD A, (005C)<br />

X-KOORDINATE MAXIMAL<br />

2067<br />

2021 2068<br />

2022<br />

2023<br />

2024 07E7<br />

07E8<br />

6F<br />

3A 56 00<br />

LD<br />

LD<br />

L,A<br />

A. (0056)<br />

ALS X-KOORDINATE VORGEBEN<br />

Y- KOORDINATE MINIMAL<br />

2064<br />

2065 0811 E5 PUSH<br />

2069<br />

2070<br />

2071<br />

08 12 CD AE 05 CALL<br />

2025 2072 0818 B7 OR A<br />

2026 2073 0819 28 3B JR Z,<br />

2027 07EB BC CP H AKTUELLE Y- KOORDINATE 2074<br />

2028 07EC 38 07 JR C. 07 ~ 07F5H I NOCH OK ~ Y-KOORDINATE 2075 081B 68 LD L,B<br />

2029 I MINUS EINS UND MERKEN 2076 081C 25 ED DEC H<br />

LD OE<br />

2030 07EE 3A 56 00 LD A.


SEITE 40<br />

BASIC 1Z-013B V1.0A BASIC 1Z<br />

2085 0825 ~ 0843H 3A SB 00 LD A. (005B) X-KOORDINATE MINIMAL 2147<br />

2086<br />

2087<br />

2088 0828 BD CP L X-KOORDINATE Zeichen und Farbe nach in<br />

2089 0829 38 24 JR C. 24 ~ 084FH IWEITERE ZEICHEN IN ZEILE aus Bild- Farbspeicher na<br />

2090 I VERSCH I EBEN<br />

2091 2092 082B 082C E5<br />

CD AE 05 PUSH CALL HL<br />

05AE<br />

X/Y-KOORDINATE MERKEN<br />

I ZEIGER AUF VERKETTUNGS­<br />

2148 2149 0864 0865 E5<br />

CD C5 05 PUSH<br />

CALL<br />

2093 IFLAG DER ZEILE BEREIT­ 2150<br />

2094 I STELLEN 2151<br />

2095 2096 082F 0830 7E<br />

E1<br />

LD A. (HL><br />

POP HL<br />

VERKETTUNGSFLAG HOLEN<br />

X/Y-KOORDINATE HOLEN<br />

2152 2153<br />

0868 16 08<br />

LO D.<br />

2097 0831 B7<br />

OR A<br />

ZEILE VERKETTET ?<br />

2154 086A 19<br />

ADD H<br />

2098 0832 28 OF JR Z. OF ILETZTES ZEICHEN IN<br />

2155 086B CD EA 00 CALL<br />

2099<br />

I VORIGER ZEILE LöSCHEN<br />

2156<br />

2100 0834 CD 64 08 CALL 0864 I ZEICHEN UND FARBE VON 2157<br />

2101 IKOORDINATE IN HL NACH 2158 086E 5F LD E.A<br />

2102 IDE HOLEN 2159 086F CB 9C RES 3<br />

2103 2104 0837 0838 E5<br />

3A 5C 00 PUSH HL<br />

LD A. (005C)<br />

X/Y-KOORDINATE<br />

X-KOORDINATE MAXIMAL<br />

0871 CD EA 00 CALL<br />

2105<br />

2106<br />

2107<br />

2108<br />

083B<br />

083C<br />

083D<br />

6F<br />

25<br />

CD<br />

LD L.A<br />

DEC H<br />

CALL 0880<br />

ALS X-KOORDIANATE VORGEBEN<br />

Y-KOORDINATE MINUS EINS<br />

I ZEICHEN UND FARBE IN DE<br />

2109<br />

80 08<br />

0876 57<br />

LD D.A<br />

2110 I NACH BILDSPEICHER AN 2167 0877 40 LD C,<br />

2111<br />

2112<br />

2113<br />

2114<br />

2115<br />

2116<br />

2117<br />

2118<br />

2119<br />

2120<br />

2121<br />

2122<br />

0840<br />

0841<br />

EI<br />

18 13<br />

POP HL<br />

JR 13 ~ 0856H<br />

I KOORDINATE IN<br />

X/Y-KOORDINATE<br />

0843 3A 5C 00 LD A.


SEITE 42<br />

BASIC 1Z-013B V1.0A BASIC 1Z<br />

2195 0893 CB DC SET 3.H I ZEIGE WIEDER AUF 2249<br />

2196 I FARBSPEICHER 2250 08CA 03 INC BC<br />

2197 0895 40 LD C.L I ZEIGER AUF FARBSPEICHER 2251 08CB CD 7B 08 CALL 0<br />

2198 0896 44 LD B.H I NACH BC 2252<br />

2199<br />

2200<br />

2201<br />

2202<br />

0897<br />

0898<br />

EI<br />

C9<br />

POP<br />

RET<br />

HL X/Y-KOORDINATE 2253<br />

2254 08CE 18 E4 JR E4<br />

2256 0800 E5 PUSH H<br />

Cursor auf letztes Zeichen in Zeile stellen 2257 0801 68 LD L.8<br />

2258 0802 25 DEC H<br />

0899 2A 54 00 LD HL. (0054) AKTUELLE CURSORKOORDINATE 2259 0803 CD 64 08 CALL 0<br />

2260<br />

2203 2261<br />

2204<br />

089C CD C8 01 CALL 01C8 IY-KOORDINATE ENDE<br />

• PLUS EINS NACH OE<br />

2205<br />

2206 2264<br />

2207 089F ID DEC E IY-KOORDINATE ENDE 2265<br />

,,~C"'t::"<br />

4.,;;.....J~<br />

ZEILE 2262<br />

2263<br />

0806<br />

0807<br />

E3<br />

CD 80 08<br />

2208 08AO 63 LD H.E I LOGISCHE ZEILE 2266 D8DA EI POP HL<br />

2209<br />

08DB 18 D7 JR 07<br />

08Al 3A 5C 00 LD A. (005C) X-KOORDIANTE MAXIMAL 2267<br />

2268<br />

2210<br />

2211<br />

2212 08A4 6F LD L.A X-KOORDINATE ENDE ZEILE<br />

2213 08A5 C9 RET 2271<br />

2272<br />

2269<br />

2270<br />

EX (SP<br />

CALL 0<br />

08DD ED 5B 5D 00 LD OE.<br />

2273 08El C3 80 08 JP 088<br />

Steuerzeichen INST 2274<br />

2275<br />

2214 08A6 CD 99 08 CALL 0899 ICURSORKOORDINATE LEZTES<br />

2215 I ZEICHEN IN ZEILE NACH HL<br />

2216<br />

M~lodie (DE) ausgeben<br />

2217 08A9 CD 64 08 CALL 0864 I ZEICHEN UND FARBE AUS<br />

2218 18ILDSPEICHER MIT KOORDI­ 2276 08E4 C5 PUSH B<br />

2219 INATE IN HL NACH DE HOLEN 2277 08E5 D5 PUSH D<br />

2220<br />

2221<br />

08AC 3E FO LD A. FO SET - Space 2278<br />

2279<br />

2222 08AE BA CP D MIT ZEICHEN VERGLEICHEN 2280<br />

2223<br />

08E6<br />

08E7<br />

E5<br />

3E02<br />

PUSH H<br />

LD A.<br />

08AF 28 03 JR Z. 03 + 08B4H 'KEIN ZEICHEN AUF<br />

2281 08E9 32 38 OA LD (OA<br />

2224 08AF 28 03 JR Z. 03 + 08B4H I LETZTER STELLE<br />

2282<br />

2225 0881 AF<br />

XOR A<br />

NORMAL - Space<br />

2283<br />

2226 0882 BA<br />

CP D<br />

MIT ZEICHEN VERGLEICHEN<br />

2284 08EC 06 01 LD B.<br />

2227 0883 CO RET NZ STELLE NICHT FREI 2285<br />

2228<br />

2229<br />

08B4 ED 4B 5B 00 LD 8C. (005B) I X-KOORDINATE<br />

I MINIMAL/MAX IMAL<br />

2230<br />

2231 2289 08Fl 28 3E JR Z.<br />

2232 08B8 EB EX DE.HL KOORDINATEN NACH DE 2290<br />

2233 0889 2A 54 00 LD HL. (0054) c AKTUELLE CURSORKOORDINATE 2291 08F3 87<br />

OR A<br />

2234<br />

2292 08F4 28 3B JR Z.<br />

2235 2293<br />

2236 08BC B7 OR A CARRY-FLAG ZURüCKSETZEN 2294 08F6 FE C8 CP C8<br />

2237 08BD ED 52 S8C HL.DE<br />

KOORDINATEN VERGLEICHEN 2295<br />

2238<br />

2296 08F8 28 37 JR Z.<br />

2239 08BF EB<br />

EX DE.HL<br />

2297<br />

2240 08CO 28 18 JR Z. 18 + 08DDH ; • FERTIG VERSCHOBEN +<br />

2298 08FA FE CF CP CF<br />

2241<br />

I ZEICHEN UNTER CURSOR LöSCH<br />

2299<br />

2242 08C2 79 LD A.C ~ X-KOODINATE MINIMAL 2300 08FC 28 27 JR Z.<br />

2243 08C3 SD CP L AKTUELL KOORDINATE 2301<br />

2244<br />

08C4 30 OA JR NC. OA + 08DOH ZEICHEN AUS VORIGER ZEILE 2302 08FE FE 2D CP 2D<br />

2245<br />

2303<br />

2246 08C6 2D DEC L X-KOORDINATE MINUS EINS 2304 0900 28 23 JR Z.<br />

2247 08C7 CD 64 08 CALL 0864 I ZEICHEN UND FARBE AUS 2305<br />

2248 IBILDSPEICHER MIT KOORDI­ 2306 0902 FE 2B CP 2B<br />

2286<br />

2287<br />

2288<br />

08EE<br />

08EF<br />

lA<br />

FE OD<br />

LD<br />

CP<br />

A. <<br />

OD


BASIC 1Z<br />

SEITE 44<br />

2307<br />

2308 0904 28 27<br />

2309<br />

2310 0906 FE D7<br />

2311<br />

2312 0908 28 23<br />

2313<br />

2314 090A FE 23<br />

2315<br />

2316 090C 21 91<br />

2317<br />

2318<br />

2319 090F 20 04<br />

2320<br />

2321 0911 21 9F<br />

2322<br />

2323<br />

2324 0914 13<br />

2325 0915 CD 3D<br />

2326<br />

2327<br />

2328 0918 38 04<br />

2329<br />

2330 091A CD E2<br />

2331<br />

2332<br />

2333 091D 38 15<br />

2334<br />

2335 091F CD 87<br />

2336<br />

2337<br />

2338 0922 41<br />

2339 0923 18 C9<br />

2340<br />

Untere Oktave<br />

2341 0925 3E 03<br />

2342<br />

2343 0927 32 38<br />

2344<br />

2345<br />

2346 092A 13<br />

2347092B . 18 Cl<br />

2348<br />

Obere Oktave<br />

2349 092D 3E 01<br />

2350<br />

2351 092F 18 F6<br />

2352<br />

Ende Musik<br />

2353 0931 CD E2<br />

2354<br />

2355<br />

2356 0934 F5<br />

BASIC 1Z-013B<br />

JR Z. 27 ~ 092DH<br />

CP 07<br />

JR Z. 23 ~ 092DH<br />

CP 23 ••<br />

09 LD HL. 0991<br />

JR NZ. 04 ~ 0915H<br />

09 LD HL. 099F<br />

INC OE<br />

09 CALL 093D<br />

JR C. 04 ~ 08EEH<br />

09 CALL 09E2<br />

JR C. 15 ~ 0934H ;<br />

09 CALL 09B7<br />

LD B.C<br />

JR C9 ~ 08EEH<br />

merken<br />

LD A. 03 ;<br />

OA LD (OA38).A ;<br />

INC OE<br />

JR Cl ~ 08EEH l<br />

merken<br />

LD A. 01 •<br />

JR F6 ~ 0927H<br />

09 CALL 09E2<br />

PUSH AF<br />

V1.0A<br />

JA ~ OBERE OKTAVE SETZEN<br />


SEITE 46 <br />

BASIC 1Z-013B V1_0A <br />

2415 096F E6 FO AND A. FO H-NIBBLE MASKIEREN <br />

2416 <br />

2417 0971 FE 30 CP 30 ZAHL ? <br />

2418 <br />

2419 0973 28 03 JR Z. 03 ~ 0978H JA (Unte~suchung ungenau) <br />

2420 <br />

2421 0975 7E LD A. (HU ALTE TONLÄNGE HOLEN <br />

2422 0976 18 05 JR 05 ~ 097DH I ZÄHLER FüR TONLÄNGE <br />

2423 I ERRECHNEN <br />

2424 0978 13 INC OE ZEIGER AUF MELODIE <br />

2425 0979 78 LD A.B ASCII-ZAHL HOLEN <br />

2426 097A E6 OF AND A. OF ZAHLWERT MASKIEREN <br />

2427 <br />

2428 097C 77 LD (HU.A ALS TONLÄNGE MERKEN <br />

2429 0970 21 AD 09 LD HL. 09AD I ZEIGER AUF TABELLE FüR <br />

2430 I TONLÄNGEN <br />

2431 <br />

2432 0980 4F LD C.A ANGEGEBENE TONLÄNGE <br />

2433 0981 06 00 LD B, 00 IBC ENTHÄLT OFFSET <br />

2434 I AUF TABELLE <br />

2435 0983 09 ADD HL,BC ZEIGER AUF TABELLE ERRECHN. <br />

2436 0984 4E LD C. (HU LÄNGENWERT AUS TABELLE <br />

2437 0985 3A 32 OA LD A, (OA32) GESETZTES TEMPO <br />

2438 <br />

2439 <br />

2440 0988 47 LD B,A TEMPOZAHL <br />

2441 0989 AF XOR A ACCU AUF NULL <br />

2442 098A 81 ADD A,C I WARE TONLÄNGE AUS TEMPO <br />

2443 098B 10 FD DJNZ FD ~ 098AH IUND ANGEGEBENER TON­<br />

2444 I LÄNGE ERRECHNEN <br />

2445 0980 Cl POP BC I GERETTETES REGISTER HOLEN <br />

2446 098E 4F LD C,A ZÄHLER FüR TONLÄNGE <br />

2447 098F AF XOR A FLAG OK SETZEN <br />

2448 0990 C9 RET <br />

Tabelle fUr Teilungsverhältnis für normale Töne<br />

2449 0991 EC 04 Teilungsve~hältnis A <br />

2450 3520 Hz <br />

2451 0993 64 04 Teilungsve~hältnis B <br />

2452 3951 Hz <br />

2453 0995 46 08 Teilungsve~hältnis C <br />

2454 2093 Hz <br />

2455 0997 5F 07 Teilungsve~hältnis 0 <br />

2456 2349 Hz <br />

2457 0999 91 06 Teilungsverhältnis E <br />

2458 2637 Hz <br />

2459 099B 33 06 Teilungsve~hältnis F <br />

2460 2794 Hz <br />

2461 0990 86 05 Teilungsverhältnis G <br />

2462 3136 Hz <br />

Tabelle für Teilungsverhältnis für e~höhte Töne<br />

2463 099F A5 04 ITeilungsve~hältnis #A <br />

2464 I 3729 Hz <br />

2465 09Al 23 04 ITeilungsve~h~ltnis #B <br />

2466 I 4186 Hz <br />

2467 09A3 CF 07 ITeilungsve~hältnis #C <br />

2468 I 2217 Hz <br />

BASIC 1Z<br />

2469 09A5 F~ 06<br />

2470 <br />

2471 09A7 33 06<br />

2472 <br />

2473 09A9 DA 05<br />

2474 <br />

2475 09AB 37 05 <br />

2476 <br />

Tabelle für Tonlängenzähle<br />

2477 09AD 01<br />

2478 09AE 02<br />

2479 09AF 03<br />

2480 09BO 04<br />

2481 09Bl 06<br />

2482 09B2 08<br />

2483 09B3 OC<br />

2484 0984 10<br />

2485 09B5 18<br />

2486 0986 20<br />

Ton nach gesetztem Teilung<br />

2487 09B7 2A 39 OA LD HL.<br />

2488 <br />

2489 <br />

2490 09BA 7C LD A.H<br />

2491 09B8 B5 OR L<br />

2492 09BC 28 14 JR Z,<br />

2493 <br />

2494 09BE 05 PUSH O<br />

2495 09BF EB EX DE.<br />

2 496 09CO 21 04 EO LD HL.<br />

2497 <br />

2498 <br />

2499 09C3 F3 01 <br />

2500 09C4 D3 E3 OUT (E<br />

2501 <br />

2502 (l9C6 73 LD (H<br />

2503 09C7 72 LD (H<br />

2504 09Ca 3E 01 LD A.<br />

2505 <br />

2506 09CA 32 08 EO LD (E<br />

2507 <br />

2508 <br />

2509 09CD 03 El OUT (E<br />

2510 <br />

2511 09CF FB EI <br />

2512 0900 01 POP OE<br />

2513 0901 C9 RET


SEITE 48<br />

BASIC 1Z-013B V1_0A<br />

BASIC 1Z<br />

Ton STOP Tempo setzen<br />

2514<br />

2515<br />

2516<br />

2517<br />

2518<br />

2519<br />

2520<br />

2521<br />

2522<br />

2523<br />

2524<br />

2525<br />

2526<br />

09D2<br />

09D4<br />

09D5<br />

09D7<br />

09DA<br />

09DB<br />

3E 36<br />

F3<br />

D3 E3<br />

32 07<br />

AF<br />

32 08<br />

EO<br />

EO<br />

LD A. 36<br />

01<br />

OUT (E3).A<br />

LD (E007).A<br />

XOR A<br />

LD (E008).A<br />

MODE - SET (8253 COUNTERO)<br />

INTERRUPT SPERREN<br />

IUMSCHALTEN AUF SYSTEM­<br />

I ADRESSEN AB $DOOO<br />

I MODE DES TONGENERATORS<br />

I INITIIEREN<br />

CODE KEIN TON<br />

AN TONGENERATOR AU8GEBEN<br />

09DE 03 E1<br />

OUT (EU.A<br />

I UMSCHALTEN AUF<br />

2527<br />

I RAM AB $DOOO<br />

2528 09EO FB EI INTERRUPT FREIGEBEN<br />

2529 09El C9 RET<br />

2564 OA04<br />

2565 OA05<br />

2566 OA06<br />

2567<br />

2568 OA08<br />

2569 OA09<br />

2570<br />

2571 OAOB<br />

2572 OAOC<br />

2573<br />

2574<br />

2575 OAOF<br />

2576 OAI0<br />

2577 OAII<br />

F5<br />

C5<br />

E6<br />

47<br />

3E<br />

90<br />

32<br />

Cl<br />

Fl<br />

C9<br />

OF<br />

08<br />

32 OA<br />

PUSH AF<br />

PUSH BC<br />

AND A.<br />

LD B.A<br />

LD A. 0<br />

SUB B<br />

LD COA<br />

POP BC<br />

POP AF<br />

RET<br />

2578 OA12 AF XOR A<br />

2530<br />

2531<br />

2532<br />

2533<br />

2534<br />

2535<br />

2536<br />

2537<br />

2538<br />

2539<br />

2540<br />

2541<br />

2542<br />

2543<br />

2544<br />

Ende des Ton entsprechend Tonlängenzähler in B abwarten<br />

09E2<br />

09E5<br />

09E6<br />

09E8<br />

09EA<br />

09EB<br />

99EC<br />

09EE<br />

09EF<br />

2545 09F1<br />

2546<br />

2547<br />

2548 09F4<br />

2549 09F5<br />

2550<br />

2551 09F7<br />

2552<br />

2553<br />

2554 09FA<br />

2555 09FB<br />

2556<br />

2557 09FD<br />

2558<br />

2559 09FF<br />

2~60 OAOO<br />

2561<br />

2562 OA02<br />

2563 OA03<br />

21<br />

F3<br />

D3<br />

36<br />

23<br />

7E<br />

E6<br />

37<br />

28<br />

3A<br />

00<br />

E3<br />

F8<br />

81<br />

OF<br />

08<br />

OF<br />

38 FA<br />

3A 08<br />

OF<br />

30 FA<br />

10 F2<br />

AF<br />

03 EI<br />

FB<br />

C9<br />

EO<br />

EO<br />

EO<br />

LD HL. EOOO<br />

01<br />

OUT (E3).A<br />

LD (HU. F8<br />

INC HL<br />

LD A. (HU<br />

AND A. 81<br />

SCF<br />

JR Z. OF ~<br />

LD A. (E008)<br />

OAOOH :<br />

RRCA<br />

JR C. FA ~ 09FIH<br />

LD A. (E008)<br />

RRCA<br />

JR NC. FA ~ 09F7H<br />

DJNZ F2 ~ 09FIH<br />

XOR A<br />

OUT (El).A<br />

EI<br />

RET<br />

:<br />

:<br />

•<br />

:<br />

I ZEIGER AUF TASTATUR­<br />

• AUSGABEPORT<br />

INTERRUPT SPERREN<br />

• UMSCHALTEN AUF SYSTEM­<br />

• ADRESSEN AB $0000<br />

SPALTE MIT SHIFT/BREAK<br />

ZEIGER AUF EINGABE-PORT<br />

WERT VON TASTATUR HOLEN<br />

SHIFT-BREAK GEDRüCKT ?<br />

CODE UNTERBROCHEN<br />

SHIFT-BREAK GEDRüCKT<br />

TEMPO-TIMER LESEN<br />

STATUS NACH CARRY<br />

LOW-STATUS ABWARTEN<br />

TEMPO-TIMER LESEN<br />

STATUS NACH CARRY<br />

HIGH-STATUS ABWARTEN<br />

WEITER WARTEN<br />

CODE OK<br />

• UMSCHALTEN AUF<br />

'RAM AB $0000<br />

INTERRUPT WIEDER FREIGEBEN<br />

Referenzton ausgeben<br />

2579 OA13<br />

2580 OA14<br />

2581<br />

2582<br />

2583 OA17<br />

2584<br />

2585 OA 19<br />

2586<br />

2587 OAIB<br />

2588<br />

2589 OAID<br />

2590<br />

2591<br />

2592 OA20<br />

2593 OA21<br />

2594 OA22<br />

2595<br />

2596<br />

2597 OA25<br />

2598<br />

2599<br />

2600 OA28<br />

2601 OA29<br />

2602 OA2A<br />

2603 OA2B<br />

2604<br />

2605 OA2D<br />

2606<br />

2607<br />

2608 OA30<br />

2609 OA31<br />

E5<br />

21 F8 03<br />

28 09<br />

FE 01<br />

28 10<br />

CD BA 09<br />

E1<br />

C9<br />

CD BA 09<br />

21 10 27<br />

28<br />

7C<br />

B5<br />

20 FB<br />

CD 02 09<br />

EI<br />

C9<br />

PUSH H<br />

LD HL.<br />

JR Z.<br />

CP 01<br />

JR Z.<br />

CALL 0<br />

POP HL<br />

RET<br />

CALL 0<br />

LD HL.<br />

DEC HL<br />

LD A.H<br />

OR L<br />

JR NZ.<br />

CALL 0<br />

POP HL<br />

RET<br />

2610 OA32 04<br />

26 11 OA33 00 NOP<br />

2612 OA34 00 NOP<br />

2613 OA35 00 NOP


SEITE 50<br />

BASIC 1Z-013B<br />

2614 OA36 00 NOP<br />

2615 OA37 00<br />

2616 OA38 00<br />

2617 OA39 00 00<br />

2618<br />

Kennung (Header) auf Band schreiben<br />

2619 OA3B 3E CC LD A, CC c<br />

2620<br />

2621 OA3D 18 02 JR 02 ~ OA41H<br />

2622<br />

Daten auf Band schreiben<br />

2623 OA3F 3E 53 LD A, 53<br />

2624<br />

2625 OA41 D5 PUSH DE<br />

2626 OA42 5F LD E,A<br />

2627 OA43 16 D7 LD D, D7<br />

2628<br />

2629 OA45 78 LD A,B<br />

263 0 OA46 B1 OR C<br />

2631 OA47 28 28 JR Z, 28 ~ OA71H<br />

2632<br />

2633 OA49 CD AC OA CALL OAAC<br />

2634<br />

2635<br />

2636 OA4C CD CE OA CALL OACE<br />

2637<br />

2638<br />

2639 OA4F 38 1D JR C, 1D ~ OA6EH<br />

2640<br />

2641 OA51 7B LD A,E<br />

2642 OA52 FE CC CP CC ;<br />

2643<br />

2644 OA54 20 11 JR NZ. 11 ~ OA67H<br />

2645<br />

2646 OA56 3A 50 00 LD A. (0050)<br />

2647<br />

2648<br />

2649 OA59 B7 OR A<br />

2650 OA5A 20 OB JR NZ. OB ~ OA67H<br />

2651<br />

2652 OA5C CD 09 00 CALL 0009<br />

2653<br />

2654<br />

2655 OA5F D5 PUSH DE<br />

2656 OA60 11 03 18 LD DE. 1803<br />

2657<br />

2658<br />

2659 OA63 CD C8 16 CALL 16C8<br />

2660<br />

2661<br />

2662 OA66 D1 POP DE •<br />

2663 OA67 F3 DI c<br />

2664 OA68 CD 5A OB CALL OB5A<br />

2665<br />

2666<br />

2667 OA6B D4 85 08 CALL NC, OB85<br />

V1_0A<br />

TONLANGE<br />

OKTAVE<br />

TEILUNGSVERHALTNIS<br />

CODE KENNUNG<br />

CODE DATEN<br />

REGISTER RETTEN<br />

CODE KENNUNG/DATEN<br />

CODE SCHREIBEN<br />

I LANGE GLEICH NULL?<br />

I<br />

GERETTETES REGISTER HOLEN <br />

I PRüFSUMME DES BEREICHES <br />

I AUSZAHLEN <br />

MOTOR AN <br />

BREAK GEDRüCKT <br />

FLAG KENNUNG/DATEN <br />

KENNUNG ? <br />

NEIN <br />

BAND-TEXTAUSGABE-FLAG <br />

GESETZT ? <br />

KEINE TEXTAUSGABE <br />

I ZEILENVORSCHUB AUSGEBEN. <br />

I WENN CURSOR NICHT AUF <br />

IANFANG ZEILE STEHT <br />

REGISTER RETTEN <br />

TEXT WRITING <br />

I TEXT UND DATEINAMEN <br />

I AUSGEBEN <br />

GERETTETES REGISTER HOLEN <br />

INTERRUPT SPERREN <br />

IKENNMARKE AUF BAND <br />

I SCHREIBEN <br />

I NICHT GEBREAKT ~ <br />

2668<br />

2669<br />

2670<br />

2671<br />

2672<br />

2673<br />

2674<br />

2675<br />

2676<br />

2677<br />

2678<br />

2679<br />

2680<br />

2681<br />

2682<br />

2683<br />

2684<br />

2685<br />

2686<br />

2687<br />

2688<br />

2689<br />

2690<br />

2691<br />

2692<br />

2693<br />

2694<br />

2695<br />

2696<br />

2697<br />

2698<br />

2699<br />

2700<br />

2701<br />

2702<br />

2703<br />

2704<br />

2705<br />

2706<br />

2707<br />

2708<br />

2709<br />

2710<br />

2711<br />

2712<br />

2713<br />

2714<br />

2715<br />

2716<br />

2717<br />

BASIC 1Z<br />

OA6E CD<br />

38 OB CALL O<br />

OA71 D1<br />

OA72 F5<br />

OA73 AF<br />

OA74 32<br />

POP DE<br />

PUSH A<br />

XOR A<br />

50 00 LD (00<br />

OA77 Fl<br />

OA78 C9<br />

OA79 C9<br />

POP AF<br />

RET<br />

RET<br />

Kennung<br />

(Header) vom Ban<br />

OA7A 3 E <br />

CC LD A,<br />

OA7C 18 <br />

02 JR 02<br />

Daten vom <br />

Band lesen<br />

OA7E 3 E <br />

5 3 LD A,<br />

OA80 D5 <br />

OA81 16 <br />

PUSH D<br />

D2 LD D,<br />

OA83 5F<br />

OA84 78<br />

OA85 B1<br />

OA86 28<br />

LD E,A<br />

LD A,B<br />

OR C<br />

E9 JR Z.<br />

OA88 CD<br />

CE OA CALL O<br />

OA8B F3<br />

OA8C D4<br />

01 <br />

2A OC CALL N<br />

OA8F D4<br />

66 OC CALL N<br />

OA92 18<br />

DA JR DA<br />

Dat en auf<br />

Band vergleichen<br />

OA94 D5 <br />

OA95 16 <br />

PUSH O<br />

D2 LD D,<br />

OA97 1E<br />

53 LD E,<br />

OA99 78<br />

OA9A B1<br />

OA9B 28<br />

LD A,B<br />

OR C<br />

D4 JR Z,<br />

OA9D CD<br />

AC OA CALL O


SEITE 52<br />

BASIC 1Z-013B<br />

2718<br />

2719<br />

2720 OAAO CD CE OA CALL OACE<br />

2721<br />

2722<br />

2723 OAA3 F3 01<br />

2724 OAA4 04 2A OC CALL NC, OC2A<br />

2725<br />

2726<br />

2727 OAA7 D4 OF OC CALL NC, OCDF<br />

2728<br />

2729<br />

2730 OAAA 18 C2 JR C2 ~ OA6EH<br />

2731<br />

PrUfsumme des Bereiches auszählen<br />

2732 OAAC C5 PUSH BC<br />

2733 OAAD 05 PUSH OE<br />

2734 OAAE E5 PUSH HL<br />

2735 OAAF 11 00 00 LD DE, 0000<br />

2736<br />

2737<br />

2738 OAB2 78 LD A,B<br />

2739 OAB3 BI OR C<br />

2740 OAB4 20 09 JR NZ, 09 ~ OABFH<br />

2741<br />

2742 OAB6 EB EX OE,HL<br />

2743 OAB7 22 BF OE LO (OEBF>,HL<br />

2744<br />

2745<br />

2746 OABA 22 Cl OE LD , HL<br />

2747<br />

2748<br />

2749 OABD 18 78 JR 78 ~ OB37H<br />

2750<br />

2751 OABF 7E LD A, (HL><br />

2752 OACO CS PUSH BC<br />

2753 OACI 06 08 LO B, 08<br />

2754<br />

2755 OAC3 07 RLCA<br />

2756 OAC4 30 01 JR NC, 01 ~ OAC7H<br />

2757<br />

2758 OAC6 13 INC DE<br />

2759 OAC7 10 FA DJNZ FA ~ OAC3H<br />

2760<br />

2761 OAC9 Cl POP BC<br />

2762 OACA 23 INC HL<br />

2763 OACB OB OEC BC<br />

2764 OACC 18 E4 JR E4 ~ OAB2H<br />

2765<br />

V1.0A<br />

• AUSZAHLEN<br />

ABFRAGE, OB MOTOR LAUFT<br />

INTERRUPT SPERREN<br />

I KEIN FEHLER ~<br />

'KENNMARKE AUF BAND SUCHEN<br />

• KEIN FEHLER ~<br />

I BYTES VOM BAND LESEN<br />

'UND VERGLEICHEN<br />

I MOTOR AUS UND GERETTETE<br />

'REGISTER HOLEN<br />

I REGISTER RETTEN<br />

, VORGABE FüR PRüFSUMME<br />

'RESTANZAHL BYTES<br />

I GLEICH NULL?<br />

WEITER AUSZAHLEN<br />

PRüFSUMME NACH HL<br />

PRüFSUMME EINS<br />

PRüFSUMME ZWEI<br />

GERETTETE REGISTER HOLEN<br />

EIN BYTE HOLEN<br />

RESTANZAHL RETTEN<br />

ACHT BIT JE BYTE<br />

EIN BIT NACH CARRY SCHIEBEN<br />

I NICHT GESETZT ~<br />

I NICHT ZAHLEN<br />

PRüFSUMME PLUS EINS<br />

WEITERE BIT'S IM BYTE<br />

RESTANZAHL HOLEN<br />

ZEIGER AUF BYTES<br />

RESTANZAHL MINUS EINS<br />

üBERPRüFEN, OB FERTIG<br />

Motor<br />

2766 OACE<br />

2767 OACF<br />

2768 OADO<br />

2769 OAOI<br />

2770<br />

2771<br />

2772 OAD4<br />

2773<br />

2774 OAD6<br />

2775<br />

2776<br />

2777 OA09<br />

2778<br />

2779 OAOB<br />

2780<br />

2781<br />

2782 OAOE<br />

2783<br />

2784<br />

2785 OAEI<br />

2786<br />

2787 OAE3<br />

2788<br />

2789 OAE5<br />

2790<br />

2791 OAE7<br />

2792<br />

2793<br />

2794 OAEA<br />

2795<br />

2796 OAEC<br />

2797 OAEO<br />

2798<br />

2799 OAEF<br />

2800<br />

2801<br />

2802 OAF2<br />

2803<br />

2804 OAF4<br />

2805<br />

2806<br />

2807 OAF7<br />

2808 OAF8<br />

2809<br />

2810<br />

2811 OAFB<br />

2812<br />

2813 OAFD<br />

2814<br />

2815<br />

2816 OBOO<br />

2817 OBOI<br />

2818<br />

2819 OB03<br />

2820<br />

2821<br />

2822 OB06<br />

2823<br />

BASIC 1Z<br />

des Cassettenlaufwe<br />

C5 PUSH<br />

05 PUSH<br />

E5 PUSH<br />

21 00 EO LD HL<br />

.3E F8 LD A,<br />

CO F2 00 CALL O<br />

06 OA LO B,<br />

21 02 EO LO HL,<br />

CO EA 00 CALL O<br />

E6 10 AND A,<br />

28 OA JR Z,<br />

06 A6 LO B,<br />

CD 4C OD CALL 0<br />

10 FB OJNZ F<br />

AF XOR A<br />

18 48 JR 48<br />

21 03 EO LD HL,<br />

3E 06 LO A,<br />

CD F2 00 CALL O<br />

3C INC A<br />

CO F2 00 CALL 0<br />

10 OE OJNZ O<br />

3A 50 00 LO A. (0<br />

B7<br />

20 IF<br />

OR<br />

JR<br />

A<br />

NZ,<br />

CD 09 00 CALL 00<br />

3E 7F LD A, 7


SEITE 54<br />

BASIC 1Z-013B<br />

2824 OB08 CD 5E 05 CALL 055E<br />

2825<br />

2826<br />

2827 OBOB CD OC 00 CALL OOOC<br />

2828<br />

2829<br />

2830 OBOE 7A LO A,D<br />

2831 OBOF FE D7 CP D7<br />

2832<br />

2833 OBll 20 06 JR NZ. 06 ~ OB19H<br />

2834<br />

2835 OB13 11 C3 OE LD DE. OEC3<br />

2836<br />

2837<br />

2838 OB16 CD 51 00 CALL 0051<br />

2839<br />

2840<br />

2841 OB19 11 CB OE LD DE, OECB<br />

2842<br />

2843<br />

2844 OBIC CD 51 00 CALL 0051<br />

2845<br />

2846<br />

2847 081F CD 09 00 CALL 0009<br />

2848<br />

2849<br />

2850 OB22 21 02 EO LD HL, E002<br />

2851<br />

2852<br />

2853 OB25 CD EA 00 CALL OOEA<br />

2854<br />

2855<br />

2856 OB28 E6 10 AND A, 10<br />

2857<br />

2858 OB2A 20 B9 JR NZ. B9 ~ OAE5H<br />

2859<br />

2860 OB2C 21 01 EO LD HL. EOOl<br />

2861<br />

2862<br />

2863 OB2F CD EA 00 CALL OOEA<br />

2864<br />

2865<br />

2866 OB32 E6 80 AND A. 80<br />

2867<br />

2868 OB34 20 EC JR NZ. EC ~ OB22H<br />

2869<br />

2870 OB36 37 SCF<br />

2871 OB37 EI POP HL<br />

2872 OB38 Dl POP OE<br />

2873 OB39 Cl POP BC<br />

2874 OB3A C9 RET<br />

Cassetten - Motor Stop<br />

2875 OB3B F5 PUSH AF c<br />

2876 OB3C C5 PUSH BC<br />

2877 OB 3D 06 OA LO B. OA<br />

2878<br />

2879 OB3F F3 DI<br />

2880 0840 03 E3 OUT (E3), A<br />

2881<br />

V1_0A<br />

I ZEICHEN IM ACCU OHNE<br />

I UNTERSUCHUNG AUF STEUER­<br />

I ZEICHEN AUSGEBEN<br />

EIN Space AUSGEBEN<br />

FLAG LESEN/SCHREIBEN<br />

CODE SCHREIBEN<br />

DATEN LESEN<br />

TEXT RECORO.<br />

TEXT AB (OE) AUSGEBEN<br />

TEXT PLAY<br />

TEXT AB (DE) AUSGEBEN<br />

IZEILENVoRSCHUB AUSGEBEN.<br />

I WENN CURSOR NICHT AUF<br />

IANFANG ZEILE STEHT<br />

ZEIGER AUF STATUSPORT 8255<br />

WERT VOM STATUSPORT HOLEN<br />

MoTOR-FLAG MASKIEREN<br />

MOTOR LÄUFT<br />

I ZEIGER AUF TASTATUR­<br />

I EINGABEPORT<br />

WERT VON TASTATUR HOLEN<br />

BREAK-TASTE MASKIEREN<br />

INICHT GEDRüCKT ~<br />

I WEITER ABFRAGEN<br />

CODE BREAK<br />

I GERETTETE REGISTER HOLEN<br />

I REGISTER RETTEN<br />

I<br />

MAXIMAL 10 VERSUCHE<br />

INTERRUPT SPERREN<br />

I UMSCHALTEN AUF SYSTEM­<br />

I ADRESSE AB $0000<br />

BASIC 1Z<br />

2882 OB42 3A 02 EO LD A.<br />

2883<br />

2884<br />

2885 OB45 E6 10 AND A<br />

2886<br />

2887 0847 28 OB JR . Z.<br />

2888<br />

2889 OB49 3E 06 LD A.<br />

2890<br />

2891 OB4B 32 03 EO LD (E<br />

2892<br />

2893<br />

2894 OB4E 3e INC A<br />

2895 OB4F 32 03 EO LD (E<br />

2896<br />

2897<br />

2898 OB52 10 EE OJNZ<br />

2899<br />

2900 0854 D3 Ei OUT (<br />

2901<br />

2902 OB56 FB EI<br />

2903 0857 Cl POP 8C<br />

2904 0858 Fl POP A<br />

2905 0859 C9 RET<br />

Kennmarke auf Band schreib<br />

2906 085A C5 PUSH<br />

2907 OB5B E5 PUSH<br />

2908 085C 7B LD A.E<br />

2909 085D 01 F8 2A LD BC<br />

2910<br />

2911<br />

2912 0860 2 1 14 14 LD HL<br />

2913<br />

2914<br />

2915 0863 FE ce CP C<br />

2916<br />

2917 0865 2 0 04 JR NZ<br />

2918<br />

2919 OB67 01 Fa 55 LO BC<br />

2920<br />

2921<br />

2922 OB6A 29 AOO H<br />

2923 086B CD FE OB CALL<br />

2924<br />

2925<br />

2926 OB6E OB DEC B<br />

2927 086F 78 LO A.B<br />

2928 OB70 BI OR C<br />

2929 0871 20 F8 JR NZ<br />

2930<br />

2931 OB73 CD OF OB CALL<br />

2932<br />

2933<br />

2934 OB76 25 DEC H<br />

2935 OB77 20 FA JR NZ<br />

2936<br />

2937 0879 CD FE OB CALL O<br />

2938<br />

2939


SEITE 56<br />

BASIC 1Z-013B V1.0A<br />

BASIC 1Z<br />

2940<br />

2941<br />

2942<br />

2943<br />

2944<br />

2945<br />

2946<br />

2947<br />

2948<br />

2949<br />

2950<br />

2951<br />

2952<br />

2953<br />

2954<br />

2955<br />

2956<br />

2957<br />

2958<br />

2959<br />

OB7C<br />

OB70<br />

OB7F<br />

OB82<br />

OB83<br />

OB84<br />

2D<br />

20<br />

CD<br />

El<br />

Cl<br />

C9<br />

FA<br />

DF OB<br />

DEC L<br />

JR NZ. FA<br />

CALL OBDF<br />

POP HL<br />

POP BC<br />

RET<br />

~ OB79H<br />

RESTANZAHL KURZE IMPULSE<br />

I WEITERE KURZE IMPULSE<br />

lAUF BAND SCHREIBEN<br />

ILANGEN IMPULS AUF<br />

I BAND SCHRE I BEN<br />

I GERETTETE REGISTER HOLEN<br />

3008<br />

Kennung/Daten auf Band aufzeichnen 3009<br />

OB85<br />

OB86<br />

OB87<br />

OB88<br />

OB8A<br />

OB8C<br />

OB8D<br />

OB8F<br />

D5<br />

C5<br />

E5<br />

16<br />

3E<br />

F3<br />

D3<br />

32<br />

02<br />

F8<br />

E3<br />

00 EO<br />

PUSH DE<br />

PUSH BC<br />

PUSH HL<br />

LD D. 02<br />

LD A. F8<br />

DI<br />

OUT (E3).A<br />

LD (EOOO).A<br />

; REGISTER RETTEN<br />

ANZAHL BYTES<br />

ZEIGER AUF BYTES<br />

ZWEI MAL AUFZEICHNEN<br />

2960 I AUSGEBEN<br />

2961<br />

ICoDEWERT FüR SPALTE<br />

IMIT BREAK-TASTE<br />

INTERRUPT SPERREN<br />

I UMSCHALTEN AUF SYSTEM­<br />

I ADRESSEN AB $0000<br />

•. ISPALTENWERT AN TASTATUR<br />

2 998<br />

2999<br />

3000<br />

3001<br />

3002<br />

3003<br />

3004<br />

3005<br />

3006<br />

3007<br />

OBB6<br />

OBB9<br />

OBBA<br />

OBBB<br />

OBBO<br />

OBBF<br />

CO<br />

AF<br />

15<br />

28<br />

06<br />

CD<br />

OF<br />

00<br />

00<br />

FE<br />

OB<br />

OB<br />

CALL<br />

XOR A<br />

OEC 0<br />

JR Z.<br />

LO B.<br />

CALL<br />

3010 OBC2 10 FB OJNZ<br />

2962 OB92 D3 El OUT (El).A I UMSCHAL TEN AUF Byte im Accu auf Band sch<br />

2963<br />

2964<br />

2965<br />

2966<br />

2967<br />

2968<br />

2969<br />

2970<br />

2971<br />

2972<br />

2973<br />

2974<br />

2975<br />

2976<br />

2977<br />

OB94<br />

OB95<br />

OB98<br />

OB9A<br />

OB9D<br />

OB9F<br />

7E<br />

CD<br />

D3<br />

3A<br />

D3<br />

E6<br />

CE<br />

E3<br />

01<br />

El<br />

80<br />

OB<br />

EO<br />

LD A. (HL><br />

CALL OBCE<br />

OUT (E3).A<br />

LD A. (EOOl)<br />

OUT (EU. A<br />

AND A. 80<br />

I RAM AB $0000<br />

EIN BYTE HOLEN<br />

BYTE AUF BAND SCHREIBEN<br />

I UMSCHALTEN AUF SYSTEM­<br />

I ADRESSEN AB SDOOO<br />

IZEILENWERT VON TASTATUR<br />

I HOLEN<br />

I UMSCHALTEN AUF<br />

I RAM AB SOOOO<br />

BREAK-TASTE MASKIEREN<br />

OBAl 37<br />

SCF<br />

CODE BREAK GEDRüCKT<br />

OBDB 10 F7<br />

OJNZ<br />

2978 2979<br />

OBA2 28 26 JR Z. 26 ~ OBCAH BREAK GEDRüCKT ~ ABBRUCH<br />

OBDD Cl<br />

POP B<br />

2980 OBA4 23 INC HL ZEIGER AUF BYTES 3038 OBOE C9 RET<br />

2981 OBA5 OB DEC BC RESTANZAHL BYTES<br />

2982 OBA6 78 LD A.B I GLEICH NULL?<br />

2983 OBA7 Bl OR C I Langen Impuls auf Band sc<br />

2984<br />

2985 OBA8 C2 94 OB JP NZ. OB94 WEITERE BYTES AUSGEBEN OBDF F5 PUSH<br />

2986 3039 3040 OBEO E5 PUSH<br />

2987 OBAB 2A BF OE LD HL. (OEBF) PRüFSUMME HOLEN 3041 OBEl 21 03 EO LD HL<br />

2988<br />

3042<br />

2989 3043<br />

2990 OBAE 7C<br />

LD A.H<br />

; H-BYTE PRüFSUMME<br />

3044 OBE4 3E 03<br />

LD A.<br />

2991 OBAF CD CE OB CALL OBCE<br />

• IBYTE IM ACCU AUF BAND<br />

3045<br />

2992<br />

I SCHREIBEN<br />

3046 OBE6 CD 1C OC CALL<br />

2993<br />

3047<br />

2994 OBB2 7D LD A.L L-BYTE PRüFSUMME 3048<br />

2995<br />

2996<br />

2997<br />

OBB3 CD CE OB CALL OBCE IBYTE IM ACCU<br />

I SCHREIBEN<br />

3011<br />

3012<br />

3013<br />

3014<br />

30 15<br />

3016<br />

3017<br />

30 18<br />

30 19<br />

3020<br />

3021<br />

3022<br />

3023<br />

3024<br />

3025<br />

3026<br />

3027<br />

3028<br />

3029<br />

3030<br />

3031<br />

3032<br />

3033<br />

3034<br />

3035<br />

3036<br />

3037<br />

AUF BAND 3049<br />

3050<br />

3051<br />

OBC4<br />

OBC5<br />

OBC6<br />

OBC7<br />

OBC8<br />

OBCA<br />

OBCB<br />

OBCC<br />

OBCO<br />

OBCE<br />

OBCF<br />

OBD1<br />

OB04<br />

OB05<br />

OBD8<br />

OBE9<br />

OBEB<br />

El<br />

Cl<br />

C5<br />

E5<br />

18<br />

El<br />

Cl<br />

01<br />

C9<br />

C5<br />

06<br />

CD<br />

07<br />

OC<br />

04<br />

3E<br />

00<br />

CA<br />

08<br />

OF<br />

DF<br />

FE<br />

OB<br />

OB<br />

OB<br />

POP H<br />

POP B<br />

PUSH<br />

PUSH<br />

JR CA<br />

POP H<br />

POP B<br />

POP O<br />

RET<br />

PUSH<br />

LD B.<br />

CALL<br />

RLCA<br />

CALL<br />

CALL<br />

60 LD A.<br />

NOP<br />

I


SEITE 58<br />

BASIC 1Z-013B<br />

3052 OBEC CO 47 00 CALL OD47<br />

3053<br />

3054<br />

3055 OBEF 3E 02 LO A, 02<br />

3056<br />

3057 08Fl CD lC OC CALL OCIC<br />

3058<br />

3059<br />

3060 OBF4 3E 6F LO A, 6F<br />

3061<br />

3062 OBF6 3E 5F LO A, 5F<br />

3063<br />

3064 OBF8 CD 47 OD CALL 0047<br />

3065<br />

3066<br />

3067 08F8 EI POP HL<br />

3068 OBFC Fl POP AF<br />

3069 OBFD C9 RET<br />

Kurzen Impuls auf Band schreiben<br />

3070 OB FE F5 PUSH AF<br />

3071 OBFF E5 PUSH HL<br />

3072 OCOO 21 03 EO LD HL, E003<br />

3073<br />

3074<br />

3075 OC03 3E 03 LD A, 03<br />

3076<br />

3077 OC05 CD 1C OC CALL OClC<br />

3078<br />

3079<br />

3080 OC08 3E 2E ·LD A, 2E<br />

3081<br />

3082 OCOA CD 47 OD CALL 0047<br />

3083<br />

3084<br />

3085 OCOO 3E 02 LD A, 02<br />

3086<br />

3087 OCOF CD lC OC CALL OCIC<br />

3088<br />

3089<br />

.3090 OC12 3E 2B LD A, 2B<br />

3091<br />

3092 OC14 00 NOP<br />

3093 OC15 00 NOP<br />

3094 OC16 CD 47 00 CALL 0047<br />

3095<br />

3096<br />

3097 OC19 EI POP HL<br />

3098 OCtA Fl POP AF<br />

3099 OCl8 C9 RET<br />

V1.0A<br />

CODE IMPULS AUS<br />

IAN STEUERBAUSTEIN<br />

I AUSGEBEN<br />

I ZEITSCHLEIFE 386 usec<br />

I (Impuls LOW soll<br />

I 494 usec sein)<br />

I GERETTETE REGISTER HOLEN<br />

I REGISTER RETTEN<br />

I ZEIGER AUF KONTROLL­<br />

IWORTREGISTER 8255<br />

CODE IMPULS AN<br />

IAN STEUER8AUSTEIN<br />

I AUSGEBEN<br />

I ZEITSCHLEIFE 190 usec<br />

I (Impuls HIGH soll<br />

240 usec sein)<br />

CODE IMPULS AUS<br />

IAN STEUERBAUSTEIN<br />

I AUSGEBEN<br />

I ZEITSCHLEIFE 180 usec<br />

I<br />

I (Impuls LOW soll<br />

I 264 usec sein)<br />

I GERETTETE REGISTER HOLEN<br />

Steuer wort<br />

3100 OC1C F3<br />

3101 OCID 03<br />

3102<br />

3103 OCIF 77<br />

3104 OC20 D3<br />

3105<br />

3106 OC22 C9<br />

Datenwort<br />

3107 OC23 F3<br />

3108 OC24 03<br />

3109<br />

3110 OC26 7E<br />

3111 OC27 03<br />

3112<br />

3113 OC29 C9<br />

Kennmarke<br />

3114 OC2A D5<br />

3115 OC28 C5<br />

3116 OC2C E5<br />

3117 OC2D 7B<br />

3118 OC2E FE<br />

3119<br />

3120 OC30 3E<br />

3121<br />

3122 OC32 20<br />

3123<br />

3124 OC34 87<br />

3125 OC35 57<br />

3126 OC36 21<br />

3127<br />

3128<br />

3129 OC39 5A<br />

3130 OC3A CD<br />

3131<br />

3132<br />

3133 OC30 38<br />

3134<br />

3135 OC3F CD<br />

3136<br />

3137<br />

3138 OC42 CD<br />

3139<br />

3140<br />

3141 OC45 E6<br />

3142<br />

3143 OC47 28<br />

3144<br />

3145 OC49 10<br />

3146 OC4A 20<br />

3147<br />

3148 OC4C 5A<br />

3149 OC4D CD<br />

3150<br />

3151<br />

BASIC 1Z<br />

an Steuerbaust<br />

01<br />

E3 OUT (<br />

LD (H<br />

~1 OUT (<br />

RET<br />

vom Steuerbaust<br />

01<br />

E3 OUT (<br />

LD A,(<br />

EI OUT (<br />

RET<br />

auf Band suchen<br />

PUSH<br />

PUSH<br />

PUSH<br />

LD A,<br />

CC CP C<br />

14 LO A.<br />

01 JR NZ<br />

ADD A<br />

LO O,A<br />

02 EO LO HL<br />

LO E.O<br />

24 OD CALL<br />

23 JR C,<br />

44 OD CALL<br />

23 OC CALL<br />

20 AND A<br />

FO JR Z.<br />

DEC E<br />

EE JR NZ<br />

LD E.D<br />

24 OD CALL<br />

I<br />

I<br />

I<br />

I<br />

I<br />

I


SEITE 60 <br />

BASIC 1Z-013B V1.0A <br />

3152 OC50 38 10 JR C, 10 ~ OC62H BREAK GEDRüCKT<br />

3153<br />

3154 OC52 CD 44 OD CALL OD44 I ZEITSCHLEIFE 278 usec<br />

3155 (SoI1=368)<br />

3156<br />

3157 OC55 CD 23 OC CALL OC23 STATUSWERT VOM 8255 HOLEN<br />

3158<br />

3159<br />

3160 OC58 E6 20 AND A, 20 BANDEINGANG MASKIEREN<br />

3161<br />

3162 OC5A 20 DD JR NZ. DD ~ OC39H I IST KURZER IMPULS ~<br />

3163 (VON VORNE ANFANGEN<br />

3164 OC5C 1D DEC E RESTANZAHL LANGE IMPULSE<br />

3165 OC5D 20 EE JR NZ. EE ~ OC4DH WEITERE LANGE IMPULSE<br />

3166<br />

3167 OC5F CD 24 OD CALL OD24 ( IMPULSSTART DES NÄCHSTEN<br />

3168 I BITS SUCHEN<br />

3169<br />

3170 OC62 EI POP HL I GERETTETE REGISTER HOLEN<br />

3171 OC63 Cl POP BC 1<br />

3172 OC64 Dl POP DE 1<br />

3173 OC65 C9 RET<br />

In BC angegebene Anzahl Bytes vom Band nach (HL) laden<br />

3174 OC66 05 PUSH DE 1 REGISTER RETTEN<br />

3175 OC67 C5 PUSH BC 1<br />

3176 OC68 E5 PUSH HL I<br />

3177 OC69 16 02 LD D, 02 ZWEI DURCHLÄUFE<br />

3178<br />

3179 OC6B 21 02 EO LD HL. E002 ZEIGER AUF STATUSPORT 8255<br />

3180<br />

3181<br />

3182 OC6E CD 24 OD CALL OD24 IMPULSSTART SUCHEN<br />

3183<br />

3184<br />

3185 OC71 38 EF JR C. EF ~ OC62H BREAK GEDRüCKT<br />

3186<br />

3187 OC73 CD 44 OD CALL OD44 , ZEITSCHLEIFE 278 usec<br />

3188<br />

(So11=368)<br />

3189<br />

3190 OC76 CD 23 OC CALL OC23 STATUSWERT VOM 8255 LESEN<br />

3191<br />

3192<br />

3193 OC79 E6 20 AND A. 20 BANDEINGANG MASKIEREN<br />

3194<br />

3195 OC7B 28 Fl JR Z, Fl ~ OC6EH LANGEN START IMPULS SUCHEN<br />

3196<br />

3197 OC7D 21 00 00 LD HL. 0000 ZÄHLER AUF NULL<br />

3198<br />

3199<br />

3200 OC80 22 BF OE LD (OEBF),HL PRüFSUMMENZÄHLER<br />

3201<br />

3202<br />

3203 OC83 EI POP HL I ZEIGER AUF SPEICHER<br />

3204 OC84 Cl POP BC I I ANZAHL BYTES<br />

3205 OC85 C5 PUSH BC I<br />

3206 OC86 E5 PUSH HL ZEIGER AUF SPEICHER<br />

3207 OC87 CD B3 OC CALL OCB3 I EIN BYTE LESEN<br />

3208<br />

3209<br />

3210 OC8A 38<br />

3211<br />

3212 OC8C 77<br />

3213 OC8D 23<br />

3214 aC8E OB<br />

3215 OC8F 78<br />

3216 aC90 81<br />

3217 OC91 20<br />

3218<br />

3219 aC93 2A<br />

3220<br />

3221<br />

3222 OC96 CD<br />

3223<br />

3224<br />

3225 OC99 38<br />

3226<br />

3227 OC9B 5F<br />

3228 OC9C CD<br />

3229<br />

3230<br />

3231 OC9F 38<br />

3232<br />

3233 eCAl BD<br />

3234 OCA2 20<br />

3235<br />

3236 OCA4 7B<br />

3237 aCA5 BC<br />

3238 OCA6 20<br />

3239<br />

3240 aCA8 AF<br />

3241 OCA9 18<br />

3242<br />

3243 OCAB 15<br />

3244 OCAC 20<br />

3245<br />

3246 OCAE 3E<br />

3247<br />

3248 OCBO 37<br />

3249 OCBl 18<br />

3250<br />

ein Byte<br />

3251 OCB3 05<br />

3252 OCB4 C5<br />

3253 OCB5 E5<br />

3254 OCB6 21<br />

3255<br />

3256<br />

3257 OCB9 ED<br />

3258<br />

3259<br />

3260<br />

3261 OCBD 01<br />

3262<br />

3263<br />

3264 ecco CD<br />

3265<br />

3266<br />

3267 OCC3 38<br />

BASIC<br />

D6<br />

F4<br />

BF OE<br />

B3 OC<br />

C7<br />

83 OC<br />

Cl<br />

07<br />

03<br />

B7<br />

BD<br />

02<br />

AF<br />

lesen<br />

02 EO<br />

5B BF OE<br />

00 08<br />

24 OD<br />

56<br />

1Z<br />

JR C,<br />

LD (H<br />

INC H<br />

DEC B<br />

LD A.<br />

OR C<br />

JR NZ<br />

LD HL<br />

CALL<br />

JR C.<br />

LD E.A<br />

CALL<br />

JR C.<br />

CP L<br />

JR NZ<br />

LD A.<br />

CP H<br />

JR NZ<br />

XOR A<br />

JR ''B7<br />

DEC D<br />

JR NZ<br />

LD A.<br />

SCF<br />

JR AF<br />

PUSH<br />

PUSH<br />

PUSH<br />

LD HL<br />

LD DE<br />

LD BC<br />

CALL<br />

JR C,


SEITE 62 <br />

BASIC 1Z-013B V1.0A <br />

3268 <br />

3269 OCC5 CO 44 00 CALL OD44 ZEITSCHLEIFE 278 usec <br />

3270 (Soll=368)<br />

3271 <br />

3272 OCC8 CO 23 OC CALL OC23 STATUSWERT VOM 8255 LESEN <br />

3273<br />

3274<br />

3275 OCCB E6 20 AND A, 20 BANDEINGANG MASKIEREN<br />

3276<br />

3277 OCCD 28 02 JR Z, 02 ~ OCD1H I


SEITE 64<br />

BASIC 1Z-013B V1.0A BASIC 1Z<br />

3381<br />

3382<br />

3383<br />

3384<br />

3385<br />

3386<br />

3387<br />

3388<br />

3389<br />

3390<br />

3391<br />

3392<br />

3393<br />

3394<br />

3395<br />

3396<br />

3397<br />

3398<br />

3399<br />

3400<br />

3401<br />

3402<br />

3403<br />

0035<br />

0036<br />

0038<br />

0039<br />

0038<br />

0030<br />

003F<br />

0040<br />

0042<br />

0043<br />

07<br />

30 08<br />

7E<br />

E6<br />

28<br />

03<br />

C9<br />

03<br />

37<br />

C9<br />

20<br />

F5<br />

El<br />

RLCA<br />

JR NC. 08 + 0040H<br />

LO A. (HU<br />

ANO A. 20<br />

JR Z. F5 + 0032H<br />

OUT (EU. A<br />

RET<br />

El OUT<br />

SCF<br />

RET<br />

Zeitschleife 278 usec<br />

0044<br />

0046<br />

0047<br />

0048<br />

0048<br />

3E<br />

00<br />

3D<br />

C2<br />

C9<br />

44 LO A. 44<br />

NOP<br />

OEC A<br />

47 00 JP NZ.<br />

RET<br />

Zeitschleife 10 msec<br />

3404 004C<br />

3405 0040<br />

3406<br />

3407 004F<br />

3408<br />

3409<br />

3410 0052<br />

3411<br />

3412 0054<br />

3413 0055<br />

3414<br />

3415<br />

3416<br />

3417<br />

C5<br />

06<br />

CO<br />

10<br />

Cl<br />

C9<br />

24<br />

56<br />

F8<br />

00<br />

PUSH BC<br />

LO B. 24<br />

CALL 0056<br />

8REAK-TASTE NACH<br />

8REAK GEDRüCKT<br />

WERT VOM STATUSPORT HOLEN<br />

8ANDEINGANG MASKIEREN<br />

IMPULSANFANG SUCHEN<br />

I UMSCHALTEN AUF<br />

I RAM A8 $0000<br />

(EU. A I UMSCAHLTEN AUF<br />

I RAM AB $0000<br />

CODE 8REAK GEDRüCKT<br />

168 * 14 + 35<br />

1<br />

I ZÄHLER<br />

CARRY Uhr-zeit setzen<br />

TAKT ZYKLEN<br />

3418 005A<br />

3419 0058<br />

3420 005C<br />

3421 0050<br />

3422 OD5E<br />

3423<br />

3424<br />

342~ 0061<br />

3426<br />

3427<br />

3428<br />

3429<br />

3430<br />

0064<br />

0065<br />

F3<br />

C5<br />

D5<br />

E5<br />

32<br />

21<br />

AF<br />

ED<br />

64<br />

CO<br />

52<br />

00<br />

A8<br />

01<br />

PUSH<br />

PUSH<br />

PUSH<br />

LO (0<br />

LO HL<br />

XOR A<br />

SBC H<br />

3431 3432 OD67 0068 E5<br />

00<br />

PUSH<br />

NOP<br />

3433 0069 E8 EX OE<br />

OD6A 21 07 EO LD HL<br />

3434<br />

3435<br />

3436<br />

3437<br />

3438<br />

3439<br />

3440<br />

0047 I WEITER WARTEN 3441<br />

3442<br />

3443<br />

DJNZ F8 + 004FH<br />

POP 8C<br />

RET<br />

REGISTER RETTEN<br />

36 DURCHLÄUFE<br />

ZEITSCHLEIFE 278 usec<br />

WEITER WARTEN<br />

GERETTETES REGISTER HOLEN<br />

3444<br />

3445<br />

3446<br />

3447<br />

3448<br />

3449<br />

3450<br />

3451<br />

3 452<br />

3453<br />

3 454<br />

3455<br />

3 456<br />

3457<br />

3458<br />

OD6D<br />

OD6F<br />

OD71<br />

0073<br />

OD74<br />

0075<br />

0076<br />

OD77<br />

0079<br />

0078<br />

007C<br />

0070<br />

OD7F<br />

0080<br />

0081<br />

0082<br />

D3<br />

36<br />

36<br />

28<br />

73<br />

E3<br />

74<br />

72<br />

28<br />

36 OA<br />

36<br />

23<br />

23<br />

3 6<br />

28<br />

4E<br />

7E<br />

8A<br />

OUT (<br />

LO (H<br />

80 LO (H<br />

3459 0083 20 F8 JR NZ<br />

3460<br />

Zeitschleife 260 usec 3461 0085 79 LD A,C<br />

0056<br />

0058<br />

3E<br />

18<br />

3F<br />

EO<br />

LO<br />

JR<br />

A. 3F<br />

EO + 0047H ;<br />

63 * 14 +<br />

EINSPRUNG<br />

29<br />

IN<br />

TAKTZYKLEN<br />

SCHLEIFE<br />

3462<br />

3463<br />

3464<br />

3465<br />

3466<br />

0086<br />

0087<br />

0089<br />

OD8A<br />

88<br />

20<br />

28<br />

00<br />

00<br />

80<br />

F7<br />

OEC HL<br />

LO (!-l<br />

LO (H<br />

DEC HL<br />

LD (H<br />

LD (H<br />

INC HL<br />

INC HL<br />

LD (H<br />

DEC HL<br />

LO C,<br />

LO A.<br />

CP 0<br />

CP E<br />

JR NZ<br />

DEC HL<br />

NOP<br />

3467 0088 00 NOP<br />

3468 OD8C 00 NOP<br />

3469 0080 36 F8 LD (H<br />

3470<br />

3471 OD8F 36 3C LO (H<br />

3472<br />

3473 0091 03 E1 OUT (<br />

3474<br />

3 475 0093 23 INC HL<br />

3476 0094 01 POP OE<br />

3 477 0095 03 E3 OUT (E<br />

~<br />

I


SEITE<br />

3478<br />

3479 0097<br />

3480 0098<br />

3481 0099<br />

3482<br />

3483 OD9B<br />

3484 OD9C<br />

3485<br />

3486 OD9E<br />

3487 OD9F<br />

3488 ODAO<br />

3489<br />

3490 ODA2<br />

3491 ODA3<br />

3492 ODA4<br />

3493 ODA5<br />

3494 ODA6<br />

Uhr-zeit<br />

3495 ODA7<br />

3496 ODA8<br />

3497 ODA9<br />

3498<br />

3499<br />

3500 ODAC<br />

3501<br />

3502 ODAE<br />

3503<br />

3504 ODBO<br />

3505 ODBI<br />

3506 ODB2<br />

3507 ODB3<br />

3508<br />

3509 ODB5<br />

3510 ODB6<br />

3511 ODB7<br />

3512 ODB8<br />

3513<br />

3514 ODBA<br />

3515 ODBB<br />

3516<br />

35 17<br />

3518 ODBE<br />

3519<br />

3520 ODCO<br />

3521<br />

3522 ODC2<br />

3523 ODC3<br />

3524<br />

3525<br />

3526 ODC6<br />

3527 ODC7<br />

3528 ODC8<br />

3529<br />

3530<br />

3531 ODCB<br />

3532<br />

3533<br />

3534 ODCE<br />

3535<br />

66<br />

4E<br />

7E<br />

03 EI<br />

BA<br />

20 F9<br />

CF7)<br />

79<br />

BB<br />

20 F5<br />

(F3)<br />

EI<br />

01<br />

Cl<br />

FB<br />

C9<br />

lesen<br />

E5<br />

F3<br />

21 07<br />

03 E3<br />

36 80<br />

2B<br />

5E<br />

56<br />

03 EI<br />

FB<br />

7B<br />

B2<br />

28 OE<br />

AF<br />

21 CO<br />

ED 52<br />

38 10<br />

EB<br />

3A 64<br />

EI<br />

C9<br />

11 CO<br />

3A 64<br />

EE 01<br />

BASIC 1Z-013B<br />

LD C, (HU<br />

LD A, (HU<br />

OUT (El).A<br />

CP 0<br />

JR NZ, F9 ? OD97H<br />

LD A.C<br />

CP E<br />

JR NZ, F5 ? OD97H<br />

POP HL <br />

POP OE <br />

POP BC <br />

EI <br />

RET <br />

PUSH HL<br />

01<br />

EO LD HL, E007<br />

OUT (E3),A<br />

LD (HU, 80<br />

DEC HL<br />

LD E, (HU<br />

LD D, CHU<br />

OUT (EU ,A<br />

EI<br />

LD A,E<br />

OR D<br />

JR Z, OE ? ODC8H<br />

XOR A ;<br />

A8 LD HL, A8CO<br />

SBC HL.DE<br />

JR C, 10 ~ ODD2H<br />

EX DE,HL ;<br />

00 LD A. (0064)<br />

POP HL<br />

RET<br />

A8 LD OE, A8CO<br />

00<br />

LD A, (0064)<br />

XOR 01<br />

V1.0A<br />

• ADRESSEN AB $0000<br />

• TI MER LESEN<br />

•• UMSCHALTEN AUF<br />

I RAM AB $DOOO<br />

VERGLEICHEN<br />

WEITER ABFRAGEN<br />

L-BYTE WERT<br />

VERGLEICHEN<br />

WE ITER ABFRAGEN<br />

·<br />

• GERETTETE REGISTER HOLEN<br />

•<br />

I NTERRUPT FREIGEBEN<br />

REGISTER RETTEN<br />

INTERRUPT SPERREN<br />

KONTROLLWORTREGISTER 8253<br />

'UMSCHALTEN AUF SYSTEM­<br />

• ADRESSEN AB · $DOOO<br />

READ-MODE TIMER 2<br />

• TIMER 2 LESEN<br />

I • UMSCHALTEN AUF<br />

I RAM AB $DOOO<br />

INTERRUPT FREIGEBEN<br />

ITIMER GLEICH NULL?<br />

I<br />

I GERADE VOR INTERRUPT<br />

I ERWISCHT<br />

CARRY-FLAG ZURüCKSETZEN<br />

I ANZAHL SEKUNDEN FüR<br />

I 12 STUNDEN<br />

SEKUNDENZAHL ERRECHNEN<br />

• INTERRUPT NICHT AUSGE­<br />

IFüHRT ~ WERTE CORRIGIEREN<br />

SEKUNDEN NACH OE<br />

FLAG VORMITTAG/NACHMITTAG<br />

GERETTETES REGISTER HOLEN<br />

I SEKUNDEN ZAHL FüR<br />

I 12 STUNDEN<br />

FLAG VORMITTAG/NACHMITTAG<br />

FLAG UMKEHREN<br />

3536 ODDO EI<br />

3537 ODDI C9<br />

3538 ODD2 F3<br />

3539 ODD3 21<br />

3540<br />

3541<br />

3542 ODD6 D3<br />

3543<br />

3544 ODD8 7E<br />

3545 ODD9 2F<br />

3546 ODDA 5F<br />

3547 ODDB 7E<br />

3548 ODDC 2F<br />

3549 ODDD 57<br />

3550 ODDE D3<br />

3551<br />

3552 ODEO FB<br />

3553 ODEI 13<br />

3554 ODE2 18<br />

3555<br />

Inter-r-upt<br />

3556 ODE4 3557 ODE5 F'<br />

F5<br />

3558 ODE6 C5<br />

3559 ODE7 D5<br />

3560 ODE8 E5<br />

356 1 ODE9 21<br />

3562<br />

3563<br />

3564 ODEC 7E<br />

3565 ODED EE<br />

3566<br />

3567 ODEF 77<br />

3568 ODFO 21<br />

3569<br />

3570<br />

3571 ODF3 D3<br />

3572<br />

3573 ODF5 36<br />

3574<br />

3575 ODF7 03<br />

3576<br />

3577 ODF9 2B<br />

3578 ODFA E5<br />

3 579 ODFB 03<br />

3580<br />

3581 ODFD 5E<br />

3582 ODFE 56<br />

3583 ODFF 03<br />

3584<br />

3585 OEOI 21<br />

3586<br />

3587<br />

3588 OE04 19<br />

3589 OE05 2B<br />

3590 OE06 2B<br />

3591 OE07 EB<br />

BASIC 1Z<br />

POP HL<br />

RET <br />

06 EO<br />

01 <br />

LD HL,<br />

E3<br />

OUT (E<br />

EI<br />

LD A, (<br />

CPL <br />

LD E,A<br />

LD A, (<br />

CPL <br />

LD D,A<br />

OUT (E<br />

E7<br />

EI <br />

INC DE<br />

JR E7<br />

- Routine<br />

fUr- 12<br />

64 00<br />

01<br />

PUSH A<br />

PUSH B<br />

PUSH O<br />

PUSH H<br />

LD HL,<br />

01<br />

LD A. (<br />

XOR 0<br />

07 EO<br />

LD (HU<br />

LD HL,<br />

E3<br />

OUT (E<br />

80<br />

LD (HU<br />

EI<br />

OUT (E<br />

E3<br />

OEC HL<br />

PUSH H<br />

OUT (E<br />

EI<br />

LD E. (<br />

LD D. (<br />

OUT (E<br />

CO A8<br />

LD HL,<br />

ADD HL<br />

DEC HL<br />

DEC HL<br />

EX DE,H<br />

.


SEITE 68 <br />

BASIC 1Z-013B V1_0A <br />

3592 OE08 EI POP HL ZEIGER AUF TIMER 2 (8253)<br />

3593 OE09 D3 E3 OUT (E3).A I UMSCHALTEN AUF SYSTEM­<br />

3594 I ADRESSEN AB $DOOO<br />

3595 OEOB 73 LD (HU.E IRESTWERT IN TIMER<br />

3596 OEOC 72 LD (HU.D I EINTRAGEN<br />

3597 OEOD 03 EI OUT (EU.A I UMSCHALTEN AUF<br />

3598 I RAM AB $DOOO<br />

3599 OEOF EI POP HL I GERETTETE REGISTER HOLEN<br />

3600 OE10 Dl POP DE I<br />

3601 OEII Cl POP BC I<br />

3602 OE12 Fl POP AF I<br />

3603 OE13 FB EI INTERRUPT WIEDER FREIGEBEN<br />

3604 OE14 C9 RET<br />

Rest Z-80 - Befehl für Abfrage JOY-Stick nach Richtungs­<br />

und JOY-Stick-Nummer bereitstellen <br />

3605 OE15 3E 4E LD A. 4E BIT 1. (HL><br />

3606<br />

3607 OE17 20 DEC L ZÄHLER MINUS EINS<br />

3608 OE18 C8 RET Z BEFEHL STIMMT<br />

3609 OE19 3E 56 LD A. 56 BIT 2. (HU<br />

3610<br />

3611 OE1B 20 DEC L ZÄHLER MINUS EINS<br />

3612 OE1C C8 RET Z BEFEHL STIMMT<br />

3613 OE1D 3E 5E LD A. 5E BIT 3. (HU<br />

3614<br />

3615 OE1F 2D DEC L ZÄHLER MINUS EINS<br />

3616 OE20 C8 RET Z BEFEHL STIMMT<br />

3617 OE21 3E 66 LD A. 66 BIT 4. (HU<br />

3618<br />

3619 OE23 20 DEC L ZÄHLER MINUS EINS<br />

3620 OE24 C9 RET<br />

Abfrage Analog - Joystick<br />

3621 OE25 D5 PUSH DE REGISTER RETTEN<br />

3622 OE26 32 45 OE LD COE45). A REST BEFEHL EINTRAGEN<br />

3623<br />

,3624<br />

3625 OE29 11 FF FF LD DE. FFFF VORGABE FüR ZÄHLER<br />

3626<br />

3627<br />

3628 OE2C 21 02 EO LD HL. E002 ZEIGER AUF STATUSPORT 8255<br />

3629<br />

3630<br />

3631 OE2F F3 01 = INTERRUPT SPERREN<br />

3632 OE30 D3 E3 OUT (E3). A I UMSCHALTEN AUF SYSTEM­<br />

3633 I ADRESSEN AB $0000<br />

3634 OE32 CB 7E BIT 7. (HU lAUF ABFALLENDE FLANKE<br />

3635 IV-BLANK-IMPULS WARTEN<br />

3636 OE34 CA 32 OE JP Z. OE32 I<br />

3637 I<br />

3638 I<br />

3639 OE37 CB 7E BIT 7. (HU ; I<br />

3640 I<br />

3641 OE39 C2 37 OE JP NZ. OE37 I<br />

3642<br />

3643<br />

3644 OE3C 2E 08 LD L. 08 ZEIGER AUF JOYSTICK-PORT<br />

BASIC 1Z<br />

3645 <br />

3646 3647<br />

OE3E 3E 11 LD A.<br />

3648 OE40 3D DEC A<br />

3649 .3650 <br />

OE41 20 FD JR NZ<br />

3651 OE43 13 INC O<br />

3652 OE44 CB 46 BIT O<br />

3653 ( 1-<br />

3654 OE46 CA 43 OE JP Z.<br />

3655<br />

3656 <br />

3657 OE49 03 EI OUT (<br />

3658<br />

3659 OE4B FB EI<br />

3660 OE4C 7A LD A.D<br />

3661 OE4D B7 OR A<br />

3662 OE4E 7B LD A,E<br />

3663 OE4F 3664 <br />

28 02 JR Z.<br />

3665 OE51 3666 <br />

3E FF LD A,<br />

3667 OE53 32 66 00 LD (00<br />

3668 <br />

3669 <br />

3670 OE56 Dl POP DE<br />

3671 OE57 EI POP HL<br />

3672 OE58 37 SCF<br />

3673 OE59 C9 RET<br />

Rest Z- 80 - Befehl für Ab<br />

und JOY-Stick-Nummer bere<br />

3674 OE5A 3E 4E<br />

3675<br />

LD A.<br />

3676 OE5C 20 DEC L<br />

3677 OE5D C8 RET Z<br />

3678 OE5E 3E 56 LD A.<br />

3679 <br />

3680 OE60 2D DEC L<br />

3681 OE61 C8 RET Z<br />

LD A.<br />

3682 OE62 3E 5E<br />

3683<br />

3684 OE64 2D DEC L<br />

3685 OE65 C8 RET Z<br />

3686 OE66 3E 66 LD A.<br />

3687<br />

3688 OE68 20 DEC L<br />

3689 OE69 C9 RET<br />

Joy - Sticks abfragen<br />

3690 OE6A 3C INC A<br />

3691 OE6B E5 PUSH H<br />

3692 OE6C '3693 OE6D 3694<br />

6F LD L.A<br />

CD 15 OE CALL O<br />

3695<br />

3696 3697<br />

OE70 CA 25 OE JP Z. O


SEITE 70<br />

3698<br />

Digital JOY<br />

3699 OE73 CD 5A<br />

3700<br />

3701<br />

3702 OE76 32 AC<br />

3703<br />

3704<br />

3705 OE79 32 8A<br />

3706<br />

3707<br />

3708 OE7C 21 02<br />

3709<br />

3710<br />

3711 OE7F F3<br />

3712 OE80 D3 E3<br />

3713<br />

3714 OE82 CB 7E<br />

3715<br />

3716 OE84 CA 82<br />

3717<br />

3718<br />

3719 OE87 2E 08<br />

3720<br />

3721 OE89 CB 46<br />

3722<br />

3723 OE8B 7D<br />

3724 OE8C CA 90<br />

3725<br />

3726<br />

3 727 OE8F AF<br />

3728 OE90 32 B4<br />

3729<br />

3730<br />

3731 OE93 D3 E1<br />

373 2<br />

3733 OE95 3E 09<br />

3734<br />

3735 OE97 F5<br />

3736 OE98 AF<br />

3737 OE99 3D<br />

3738 OE9A 20 FD<br />

3739<br />

3740 OE9C F1<br />

3741 OE9D 3D<br />

3742 OE9E 20 F7<br />

3743<br />

3744 OEAO D3 E3<br />

3745<br />

3746 OEA2 2E 02<br />

3747<br />

3748 OEA4 CB 7E<br />

3749<br />

3750 OEA6 CA A4<br />

3751<br />

3752<br />

3753 OEA9 2E 08<br />

3754<br />

3755 OEAB CB 46<br />

BASIC 1Z-013B<br />

- Stick abfragen<br />

OE CALL OE5A<br />

OE LD (OEAC),A<br />

OE LD (OE8A),A c<br />

EO LD HL, E002<br />

DI<br />

OUT (E3),A<br />

BIT 7, (HU<br />

OE<br />

JP Z, OE82<br />

LD L, 08<br />

OE<br />

BIT 0, (HU<br />

(1-4)<br />

LD A,L<br />

JP Z, OE90<br />

OE<br />

XOR A<br />

LD (OEB4),A<br />

OUT (EU, A<br />

LD A, 09<br />

PUSH AF<br />

XOR A<br />

DEC A<br />

JR NZ, FD ~ OE99H<br />

POP AF<br />

DEC A<br />

JR NZ, F7 ~ OE97H<br />

OUT (E3),A<br />

LD L, 02<br />

•<br />

BIT 7, (HL)<br />

OE<br />

JP Z, OEA4<br />

LD L, 08<br />

BIT 0, (HU<br />

V1.0A<br />

I BIT-NUMMER FüR DIGITAL­<br />

I JOY-STICK BEREITSTELLEN<br />

I REST BEFEHL ZUR BIT­<br />

I ABFRAGE EINTRAGEN<br />

ZEIGER AUF STATUSPORT 8255<br />

INTERRUPT SPERREN<br />

'UMSCHALTEN AUF SYSTEM­<br />

'ADRESSEN AB $DOOO<br />

lAUF V-BLANK AKTIV<br />

I WARTEN<br />

ZEIGER AUF JOY-STICK- PORT<br />

I ABFRAGE, OB TASTE GEDRüCKT<br />

I (Bi t wi rd ei ngetragen)<br />

ACCU AUF 8<br />

TASTE GEDRüCKT<br />

CODE TASTE NICHT GEDRüCKT<br />

I ERGEBNIS ERSTE ABFRAGE<br />

I MERKEN<br />

UMSCHALTEN AUF <br />

RAM AB $DOOO <br />

ZEITSCHLEIFE 10msec <br />

ZEITSSCHLEIFE<br />

1.1 msec<br />

I UMSCHALTEN AUF SYSTEM­<br />

I ADRESSEN AB $DOOO<br />

ZEIGER AUF STATUSPORT 8255<br />

lAUF V-BLANK AKTIV<br />

, WARTEN<br />

ZEIGER AUF JOY-STICK-PORT<br />

• ABFRAGE, OB TASTE GEDRüCKT<br />

BASIC 1Z<br />

3756<br />

3757 OEAD 7D LD A,L<br />

3758 OEAE CA B2 OE JP Z,<br />

3759<br />

3760<br />

3761 (lEB1 AF XOR A<br />

3762 OEB2 6F LD L,A<br />

3763 OEB3 3E 00 LD A,<br />

3764<br />

3765 OEB5 A5 AND L<br />

3766 OEB6 32 65 00 LD (0<br />

3767<br />

3768<br />

3769 OEB9 D3 E1 OUT (<br />

3770<br />

3771 OEBB FB EI<br />

3772 OEBC E1 POP HL<br />

3773 OEBD B7 OR A<br />

3774 OE BE C9 RET<br />

3775 OEBF 00 00<br />

3 776<br />

3777 OECl 00 00<br />

3778<br />

Tex te für Cas settenrecorde<br />

3779 OEC3 5 2 R<br />

3 780 OEC4 45 E<br />

3781 OEC5 4 3 C<br />

3782 OEC6 4F o<br />

3783 OEC7 5 2 R<br />

3784 OEC8 44 D<br />

3785 OEC9 2E<br />

3786 OECA 00<br />

3787 OEeB 50 P<br />

3 788 OECC 4C L<br />

3789 OECD 41 A<br />

3790 OECE 59 Y<br />

3791 OECF 00<br />

Zwischenspeicher für Text<br />

3792 OEDO 00<br />

3793 OED1 00<br />

3794 OED2 00<br />

3795 OED3 00<br />

3796 OED4 00<br />

3797 OED5 00<br />

3798 OED6 00<br />

3799 OED7 00<br />

3800 OED8 00<br />

3801 OED9 00<br />

3802 OEDA 00<br />

3803 OEDB 00<br />

3804 OEDC 00<br />

3805 OEDD 00<br />

3806 OEDE 00<br />

3807 OEDF 00<br />

3808 OEEO 00<br />

I<br />

I<br />

I


BASIC 1Z-013B V1.0A BASIC 1 Z<br />

I<br />

SEITE 72<br />

3809 OEEl 00 NOP<br />

3852 OFOC Fe) -t.p<br />

3810 OEE2 00 NOP 3853 OFOD Cl 'lQ<br />

3811 OEE3 00 NOP 3854 OFOE C2 1'R<br />

3812 OEE4 00 NOP 3855 OFOF C3 ·tS<br />

3813 OEE5 00 NOP \<br />

3856 OF10 C4 ·tT<br />

3857 OF 11 C5<br />

3814 OEE6 00 NOP , , 'lU<br />

3815 OEE7 00 NOP 3858 OF12 C6 ·t V<br />

3859 OF13 FO 'l W <br />

3860 OF 14 FO .t-X <br />

Zwischenspeicher fUr aktuelle Zeilenwerte bei Tastaturab-frage 3861 OF15 FO 1'y <br />

3862 OF16 FO ·t·Z<br />

3816 OEE8 00<br />

SPALTE 10 3863 OF17 FO H<br />

3817 OEE9 00<br />

SPALTE 9 3864 OF18 FO 1'\<br />

3818 OEEA 00 SPALTE 8 3865 OF19 FO 1']<br />

3819 OEEB 00<br />

SPALTE 7 3866 OF1A FO -t··t·<br />

3820 OEEC 00<br />

SPALTE 6 3867 OF1B FO ·t ....<br />

3821 OEED 00<br />

SPALTE 5 3868 OF1C 00 Spa<br />

3822 OEEE 00<br />

SPALTE 4 3869 OF1D 61<br />

3823 OEEF 00<br />

SPALTE 3 3870 OF1E 62<br />

3824 OEFO 00<br />

SPALTE 2 3871 OF1F 63 #<br />

3825 OEF1 00 SPALTE 1 3872 OF20 64 $ <br />

3873 OF21 65 I. <br />

3874 OF22 66 & <br />

Zwischenspeicher fUr letzte Zeilenwerte bei Tastaturabfrage 3875 OF23 67 <br />

3876 OF24 68 ( <br />

10 3877 OF25 69 )<br />

3826 OEF2 00 SPALTE<br />

3827 OEF3 00 SPALTE 9<br />

3878 OF26 6 B<br />

3828 OEF4 00 SPALTE 8 3879 OF27 6A +<br />

3829 OEF5 00 SPALTE 7 3880 OF28 2F<br />

SPALTE 6 , I<br />

3830 OEF6 00<br />

388 1 OF29 2A<br />

3831 OEF7 00<br />

SPALTE 5 3882 OF2A 2E<br />

3832 OEF8 00<br />

SPALTE 4 3883 OF2B 2D I<br />

3833 OEF9 00<br />

SPALTE 3 3884 OF2C 20 0<br />

3834 OEFA 00 <br />

SPALTE 2 3885 OF2D 21 1<br />

3835 OEFB 00 SPALTE 1 , 3886 OF2E 22<br />

,.,.,..<br />

2<br />

3887 OF2F ..::. .....> 3<br />

3888 OF30 24 4 <br />

Tabelle zum Umsetzen von ASCII in An z eigecode und umgekehrt 3889 OF31 25 5 <br />

Mit dem ASCII-Code als Tabellenoffset erhält man das 3890 OF32 26 6 <br />

entsprechende Anzeigecode-Zeichen. Zum Umsetzen vom 389 1 OF33 27 7 <br />

Anzeigecoda i n ASCII muß die Tabelle nach dem Anzeige- 3892 OF34 28 8 <br />

codezeichen durchsucht werden. 3893 OF35 29 9 <br />

3894 OF36 4F <br />

FOH bedeutet. daß zu diesem ASCII-Steuerzeichen kein 3895 OF37 2C <br />

anzeigbares Zeichen existiert. 3896 OF38 51 < <br />

3897 OF39 28<br />

3898 OF3A 57<br />

3836 OEFC FO 1Q1 ><br />

3837 OEFO FO 1'A 3899 OF3B 49 ?<br />

3838 OEFE FO 1'B 3900 OF3C 55 ;j)<br />

3839 OEFF r:0 1'C 3901 OF3D 01 A<br />

38Ll0 OFOO FO 1'0 3 902 OF3E 02 8<br />

1'E 3903 OF3F 03 C<br />

38~1 OF01 FO<br />

3842 OF02 FO 1'F , I <br />

3904 OF40 04 0<br />

3843 OF03 FO 1'6 3905 OF41 05 E <br />

3844 OF04 FO 1'H 3906 OF42 06 F <br />

3845 OF05 FO 1'I I 3907 OF43 07 G <br />

3846 OF06 FO 1'J 3 908 OF44 08 H <br />

3847 OF07 FO 1'K 3 9 09 OF45 09 I .<br />

3848 OF08 FO ,tL 3 910 OF46 OA J <br />

3849 OF09 FO 1'M 3 911 OF47 OB K <br />

! <br />

3850 OFOA FO 1'N 3912 OF48 OC L<br />

3851 OFOB FO 1'0 3913 OF49 0 0 M<br />

*


BASIC 1Z-013B V1_0A BASIC 1Z<br />

SEITE 74 11<br />

3914 OF4A OE N 3976 OF88 9F \<br />

3915 OF4B OF 0 3977 OF89 B3<br />

3916 OF4C 10 P 3978 OF8A B7<br />

3917 OF40 11 Q 3979 OF8B BB ,0'<br />

3918 OF4E 12 R 3980 OF8C BF<br />

3919 OF4F 13 S 3981 OF80 A3 #<br />

3920 OF50 14 T 3982 OF8E 85 e<br />

3921 OF51 15 U 3983 OF8F A4 ~~:<br />

3922 OF52 16 V 3984 OF90 A5 ~<br />

3923 OF53 17 W 3985 OF91 A6 !:6i<br />

3924 OF54 18 X 3986 OF92 94 t<br />

3925 OF55 19 Y 3987 OF93 87 9<br />

3926 OF56 1A Z 3988 OF94 88 h<br />

3927 OF57 52 [ 3989 OF95 9C (<br />

3928 OF58 59 \ 3990 OF96 82 b<br />

3929 OF59 54 J 3991 OF97 98 x<br />

3930 OF5A 50 1- 3992 OF98 84 d<br />

3931 OF5B 45 +- 3993 OF99 92 r<br />

3932 OF5C C7 a 3994 OF9A 90 p<br />

3933 OF50 C8 }:I 3995 OF9B 83 c<br />

3934 OF5E C9 ;J; 3996 OF9C 91 CI<br />

3935 OF5F CA -I 3997 OF90 81 a<br />

3936 OF60 CB 3998 OF9E 9A z<br />

39.37 OF61 CC "" ,.. 3999 OF9F 97 IN<br />

3938 OF62 CO T 4000 OFAO 93 s<br />

3939 OF63 CE ~ 4001 OFAl 95 LI<br />

3940 OF64 CF ~ 4002 OFA2 89 i<br />

3941 OF65 OF \11 4003 OFA3 Al<br />

3942 OF66 E7 f4- 4004 OFA4 AF Ö<br />

3943 OF67 E8 ~ 4005 OFA5 8B k<br />

3944 OF68 E5 k;; 4006 OFA6 86 f<br />

3945 OF69 E9 ~~ 4007 OFA7 96 v<br />

3946 OF6A EC H 4008 OFA8 A2 11<br />

3947 OF6B EO 4009 OFA9 AB Ü<br />

3948 OF6C 00 ~<br />

* 4010 OFAA AA ß<br />

3949 OF60 01<br />

ii 4011 OFAB 8A<br />

I<br />

3950 OF6E 02 I 4012 OFAC 8E:: n<br />

3951 OF6F 03 4013 OFAO BO<br />

3952 OF70 04 tM 4014 OFAE AO Ü<br />

3953 OF71 05 r 4015 OFAF 80 m<br />

3954 OF72 06 "'I 4016 OFBO A7<br />

3955 OF73 07<br />

~ 4017 OFBl A8<br />

.,,­<br />

3956 OF74 08 A 4018 OFB2 A9<br />

3957 OF75 09 '\ 4019 OFB3 8F 0<br />

3958 OF76 DA \ 4020 OFB4 8C 1<br />

3959 OF77 OB 4021 OFB5 AE Ä<br />

3960 OF78 OC X 4022 OFB6 AC Ö<br />

3961 OF79 00 t 4023 OFB7 9B ä<br />

3962 OF7A OE I 4024 OFB8 AO<br />

3963 OF7B CO 4025 OFB9 99 y<br />

3964 OF7C 40 4026 OFBA BC ~<br />

3965 OF7D BD +<br />

4027 OFBB B8 \<br />

3966 OF7E 90 4028 OFBC 80<br />

3967 OF7F Bl r 4029 OFBO 3B<br />

3968 OF80 B5 ~-<br />

4030 OFBE 3A<br />

3969 OF81 B9 4031 OFBF 70 ­<br />

3970 OF82 B4 4032 OFCO 3C<br />

3971 OF83 9E 4033 OFC1 71<br />

~)<br />

3972 OF84 B2 4034 OFC2 5A ~<br />

3973 OF85 B6 J'<br />

4035 OFC3 3D I<br />

3974 OF86 BA 4036 OFC4 43 ~~<br />

3975 OF87 BE 6 4037 OFC5 56 fl""


SEITE<br />

4038 OFC6<br />

4039 OFC7<br />

4040 OFC8<br />

4041 OFC9<br />

4042 OFCA<br />

4043 OFCB<br />

4044 OFCC<br />

4045 OFCD<br />

4046 OFCE<br />

4047 OFCF<br />

4048 OFDO<br />

4049 OFD1<br />

4050 OFD2<br />

4051 OFD3<br />

4052 OFD4<br />

4053 OFD5<br />

4054 OFD6<br />

4055 OFD7<br />

4056 OFD8<br />

40570FD9<br />

4058 OFDA<br />

4059 OFDB<br />

4060 OFDC<br />

4061 OFDD<br />

4062 OFDE<br />

4063 OFDF<br />

4064 OFEO<br />

4065 OFE1<br />

4066 OFE2<br />

4067 OFE3<br />

4068 OFE4<br />

4069 OFE5<br />

4070 OFE6<br />

4071 OFE7<br />

4072 OFE8<br />

4073 OFE9<br />

4074 . 0FEA<br />

4075 OFEB<br />

4076 OFEC<br />

4077 OFED<br />

4078 OFEE<br />

4079 OFEF<br />

4080 OFFO<br />

4081 OFF1<br />

4082 OFF2<br />

4083 OFF3<br />

4084 OFF4<br />

4085 OFF5<br />

4086 OFF6<br />

4087 OFF7<br />

4088 OFF8<br />

4089 OFF9<br />

4090 OFFA<br />

4091 OFFB<br />

76<br />

3F<br />

1E<br />

4A<br />

1C<br />

5D<br />

3E<br />

5C<br />

1F<br />

5F<br />

5E<br />

37<br />

7B<br />

7F<br />

36<br />

7A<br />

7E<br />

33<br />

4B<br />

4C<br />

1D<br />

6C<br />

58<br />

78<br />

41<br />

35<br />

34<br />

74<br />

30<br />

38<br />

75<br />

39<br />

4D<br />

6F<br />

6E<br />

32<br />

77<br />

76<br />

72<br />

73<br />

47<br />

7C<br />

53<br />

31<br />

4E<br />

6D<br />

48<br />

46<br />

7D<br />

44<br />

1B<br />

58<br />

79<br />

42<br />

60<br />

BASIC 1Z-013B V1_0A<br />

~<br />

c<br />

....<br />

"T<br />

...J<br />

....<br />

.J<br />

.­ -­<br />

•I<br />

L<br />

"­<br />

4092<br />

4093<br />

4094<br />

~<br />

4095<br />

4096<br />

.J 4097<br />

ṛ,<br />

•<br />

•<br />

I<br />

.....<br />

X<br />

o<br />

•<br />

•<br />

f:<br />

.J.<br />

....<br />

4098<br />

4099<br />

4100<br />

4101<br />

4102<br />

4103<br />

4104<br />

4105<br />

4106<br />

4107<br />

4108<br />

4109<br />

4110<br />

4111<br />

4112<br />

4113<br />

4114<br />

4115<br />

'ff<br />

BASIC 1Z<br />

Der Speicherbereich von $<br />

Routinen als Zwischenspei<br />

So wird hierin z. B. die<br />

zwischengespeichert. eine<br />

USING - Format aufbereite<br />

zwischengespeichert<br />

Der Bereich $1000 - $11FF<br />

oder Speicher für feste D<br />

Daten oder Programm beim<br />

schließendem Wiederumsch<br />

verloren gehen sollen.<br />

Dieser Bereich ($1000-$11<br />

bauten ROM - Monitor auch<br />

Im folgenden wird nur der<br />

(Programm- oder Datendate<br />

ist 128 Bytes lang. Die B<br />

haben zur Zeit noch keine<br />

Speicherbereich für Datei<br />

OFFC 00<br />

OFFD 00<br />

OFFE 00<br />

OFFF 00<br />

1000 00<br />

1001 00<br />

1002 00<br />

1003 00<br />

1004 00<br />

1005 00<br />

1006 00<br />

1007 00<br />

1008 00<br />

1009 00<br />

100A 00<br />

1008 00<br />

100C 00<br />

100D 00<br />

100E 00 00<br />

1010 00 00<br />

1012 00 00<br />

/<br />

I<br />

;<br />

I<br />

I<br />

I<br />

I<br />

I


SEITE 78<br />

Tabelle zum<br />

4637 1210 90<br />

4638 121E 17<br />

4639 121F FC<br />

4640 1220 19<br />

4641 1221 00<br />

4642 1222 3B<br />

4643 1223 3A<br />

4644 1224 00<br />

4645 1225 59<br />

4646 1226 5A<br />

4647 1227 40<br />

4648 1228 5B<br />

4649 1229 5D<br />

4650 122A 00<br />

4651 122B 00<br />

4652 122C 00<br />

4653 122D 51<br />

4654 122E 52<br />

4655 122F 53<br />

4656 1230 54<br />

4657 1231 55<br />

4658 1232 56<br />

4659 1233 57<br />

4660 1234 58<br />

4661 1235 49<br />

4662 1236 4A<br />

4663 1237 4B<br />

4664 1238 4C<br />

4665 1239 4D<br />

4666 123A 4E<br />

4667 123B 4F<br />

4668 123C 50<br />

4669 1230 41<br />

4670 123E 42<br />

4671 123F 43<br />

4672 1240 44<br />

4673 1241 45<br />

4674 1242 46<br />

4675 1243 47<br />

4676 1244 48<br />

4677 1245 31<br />

4678 1246 32<br />

4679 1247 33<br />

4680 1248 34<br />

4681 1249 35<br />

4682 124A 36<br />

4683 124B 37<br />

4684 124C 38<br />

4685 1240 5C<br />

4686 124E 5E<br />

4687 124F 2D<br />

4688 1250 20<br />

4689 1251 30<br />

4690 1252 39<br />

BASIC 1 Z -(:> 1 3B<br />

Umsetzen der Tastaturmatrix<br />

/<br />

Space<br />

Graph<br />

+<br />

Alpha<br />

Nicht belegt<br />

Carriage Return<br />

y<br />

Z<br />

@<br />

t<br />

nicht belegt<br />

nicht belegt<br />

nicht belegt<br />

Q<br />

R<br />

S<br />

T<br />

U<br />

V<br />

W<br />

X<br />

J<br />

K<br />

L<br />

M<br />

N<br />

o<br />

P<br />

A<br />

B<br />

C<br />

o<br />

E<br />

]<br />

F<br />

G<br />

H<br />

1<br />

2<br />

3<br />

4<br />

5<br />

6<br />

7<br />

8<br />

o<br />

9<br />

I<br />

Space<br />

V 1 _ OA<br />

in ASCII<br />

Normalmodus Spalte<br />

Normalmodus Spalte 2<br />

Normal modus Spalte 3<br />

\<br />

l'<br />

Normal modus Spalte 4<br />

Normal modus Spalte 5<br />

Normalmodus Spalte 6<br />

Normalmodus Spalte 7<br />

4691<br />

4692<br />

4693<br />

4694<br />

4695<br />

4696<br />

4697<br />

4698<br />

4699<br />

4700<br />

4701<br />

4702<br />

4703<br />

4704<br />

4705<br />

4706<br />

4707<br />

4708<br />

4709<br />

4710<br />

4711<br />

4712<br />

4713<br />

4714<br />

4715<br />

4716<br />

4717<br />

4718<br />

4719<br />

4720<br />

4721<br />

4722<br />

4723<br />

4724<br />

4725<br />

4726<br />

4727<br />

4728<br />

4729<br />

4730<br />

4731<br />

4732<br />

4733<br />

4734<br />

4735<br />

4736<br />

4737<br />

4738<br />

4739<br />

4740<br />

4741<br />

4742<br />

4743<br />

4744<br />

4745<br />

1253<br />

1254<br />

1255<br />

1256<br />

1257<br />

1258<br />

1259<br />

125A<br />

125B<br />

125C<br />

1250<br />

125E<br />

125F<br />

1260<br />

1261<br />

1262<br />

1263<br />

1264<br />

1265<br />

1266<br />

1267<br />

1268<br />

1269<br />

126A<br />

1268<br />

126C<br />

1260<br />

126E<br />

126F<br />

1270<br />

1271<br />

1272<br />

1273<br />

1274<br />

1275<br />

1276<br />

1277<br />

1278<br />

1279<br />

127A<br />

127B<br />

127C<br />

1270<br />

127E<br />

127F<br />

1280<br />

1281<br />

1282<br />

1283<br />

1284.<br />

1285<br />

1286<br />

1287<br />

1288<br />

1289<br />

2C<br />

2E<br />

18<br />

10<br />

12<br />

11<br />

13<br />

14<br />

3F<br />

2F<br />

90<br />

17<br />

FB<br />

05<br />

00<br />

2B<br />

2A<br />

00<br />

BO<br />

A2<br />

93<br />

BE<br />

80<br />

00<br />

00<br />

00<br />

AO<br />

90<br />

A4<br />

96<br />

A5<br />

AB<br />

A3<br />

9B<br />

A6<br />

AF<br />

A9<br />

B8<br />

B3<br />

BO<br />

B7<br />

9E<br />

Al<br />

9A<br />

9F<br />

9C<br />

92<br />

AA<br />

97<br />

98<br />

21<br />

22<br />

23<br />

24<br />

25<br />

BASI,-C<br />

1Z<br />

Inst<br />

Oel.<br />

Curs<br />

CLlr<br />

Curs<br />

CLlr<br />

?<br />

Und<br />

Grap<br />

L<br />

+<br />

Alp<br />

nic<br />

*Car<br />

y<br />

z<br />

~;; :<br />

~<br />

nic<br />

nic<br />

nic<br />

CI '.<br />

s<br />

LI<br />

V<br />

IN<br />

r<br />

>:<br />

t<br />

k<br />

1<br />

m<br />

j<br />

n<br />

o<br />

p<br />

a<br />

b<br />

c<br />

d<br />

e<br />

9<br />

h<br />

f<br />

#<br />

$<br />

/.


SEITE 80<br />

BASIC 1Z-013B V1_0A BASIC 1Z<br />

4746 128A 26 t.c<br />

4801 12C1 E3<br />

4747 128B 2 7 4802 12C2 CC a<br />

4748 128C 28 4803 12C3 OB<br />

4804 12C4 EF r<br />

4749 1280 CO Sh iftmodus Spalte 7<br />

4750 128E 94 ~ 4805 12C5 04<br />

4751 128F 3D 4806 12C6 CF<br />

4752 1290 20 Space 4807 12C7 06 I<br />

4753 1291 FF 'Y( 4808 12C8 05 I<br />

4754 1292 29 ) 4809 12C9 C2<br />

4755 1293 3C <<br />

4810 12CA 03 --I<br />

4811 12CB 01<br />

..J..<br />

4756 1294 3E ><br />

4812 12CC . 81 +<br />

4757 1295 16 Clr Shiftmodus Spal tf~ 8<br />

4758 1296 15 Home 4813 12CO 74 tN<br />

4759 1297 12 Cursor hoch<br />

4814 12CE 87<br />

4760 1298 11 Cursor runter<br />

,<br />

4815 12CF 72<br />

4761 1299 13 Cursor rechts 4816 1200 20 Spa<br />

4762 129A 14 Cursor links 4817 1201 99 (<br />

4763 129B C6 ~ 4818 1202 A7<br />

4764 129C 5F +- 4819 1203 63 ~<br />

4820 1204 HF \<br />

4765 1290 90 Unterline Graphikmodus Spalte<br />

4766 129E 17 . Graph 4821 1205 16 Clr<br />

4767 129F 6C k;; 4822 1206 15 Home<br />

4768 12AO 19 Alpha 4823 1207 12 Curs<br />

4769 12A1 00 nicht belegt 4824 1208 11 Curs<br />

4770 12A2 FE "q .~ 4825 1209 13 Curs<br />

4771 12A3 89 ..)<br />

j <br />

4826 120A 14 Curs<br />

4772 12A4 00 Carriage Return 4827 1208 8A<br />

4828 120C 78<br />

4773 12A5 E7 Graphikmodus Spalte 2<br />

4774 12A6 EE / i 4829 1200 90 Und<br />

4775 12A7 88 ...... 4830 120E 17 Grap<br />

4776 12A8 78 .4<br />

4831 120F 68 ~<br />

4836 12E4 00 Ca<br />

4777 12A9 F5 ..a 4832 12EO 05 Alp<br />

4778 12AA 00 n cht belegt 4833 12El 00 nic<br />

4779 12A8 00 n cht belegt 4834 12E2 84 l._<br />

4780 12AC 00 n cht belegt ii<br />

4835 12E3 E9 t:..<br />

4781 12AO C4 Graphikmodus Spalte 3<br />

4782 12AE E5 4837 12E5 E2<br />

4783 12AF FA 4838 12E6 EO<br />

•<br />

"­<br />

4784 1280 C5 I 4839 12E7 77 ~<br />

4840 12E8 80 ,<br />

4785 1281 FD I<br />

4786 12B2 7A \<br />

4841 12E9 8E )<br />

4787 1283 E6 4842 12EA 00 nic<br />

4788 12El4 F6 X 4843 12EB 00 nic<br />

4844 12EC 00 nic<br />

4789 1285 F9 Graphikmodus Spiilte 4<br />

4790 12B6 00 4845 12ED F2<br />

4791 12B7 OF .. 4846 12EE C3<br />

4792 12B8 86 4847 12EF E1<br />

4848 12FO F4<br />

•<br />

4793 1289 CD<br />

I<br />

4794 128A EC L<br />

4849 12F1 E8 I<br />

4795 1288 B1 ( 4850 12F2 95 !Si<br />

4796 128C 76 "C 4851 12F3 EO<br />

4852 12F4 70<br />

4797 12BD F3 •<br />

• Graphikmoduti Spalte 5<br />

4798 128E EA 4853 12F5 C7<br />

4799 128F 7E 4854 12F6 CE ,<br />

4800 12CO F1 4855 12F7 OE ..<br />


SEITE 82<br />

BASIC 1Z-013B V1.0A BASIC 1Z<br />

4856 12F8 C9 ,.<br />

4904 1328 00<br />

4857 12F9 00<br />

..J<br />

4905 1329 00<br />

4858 12FA OA .J 4906 132A 00<br />

4859 12F8 75 Y 4907 1328 00<br />

4860 12FC 83<br />

( .. 4908 132C 00<br />

4909 1320 00<br />

4861 12FO F8 •<br />

Shift-Graphik Spalte 5<br />

4910 132E 00<br />

4862 12FE E8<br />

.J<br />

4911 132F 00<br />

4863 12FF 79 4912 1330 00<br />

4864 1300 F7 0 4913 1331 00<br />

4865 1301 E4<br />

4866<br />

4867<br />

4868<br />

4869<br />

4870<br />

1302<br />

1303<br />

1304<br />

1305<br />

1306<br />

C8<br />

OC<br />

FO<br />

CA<br />

07<br />

a<br />

'"'\<br />

...,<br />

Shi ft-Graphi k Spalte 6<br />

4871 1307 09 4920 1.338 00<br />

4872 1308 Cl 4921 1.339 00<br />

4873 1309 08 ,.' 4922 133A 00<br />

4874<br />

4875<br />

130A<br />

1308<br />

C8<br />

02<br />

4914<br />

4915<br />

4916<br />

4917<br />

4918<br />

4919<br />

1332<br />

1333<br />

1334<br />

1335<br />

1336<br />

1337<br />

~: 4923<br />

4924 1338<br />

133C<br />

4876 130C AC 11<br />

~<br />

4925 133D 00<br />

4877<br />

4878<br />

4879<br />

4880<br />

4881<br />

4882<br />

4883<br />

4884<br />

4885<br />

4886<br />

4887<br />

4888<br />

4889<br />

4890<br />

4891<br />

4892<br />

1300<br />

130E<br />

130F<br />

1310<br />

1311<br />

1312<br />

1313<br />

1314<br />

1315<br />

1316<br />

1317<br />

1318<br />

1319<br />

131A<br />

1318<br />

131C<br />

73<br />

8C<br />

71<br />

20<br />

82<br />

91<br />

70<br />

85<br />

16<br />

15<br />

12<br />

11<br />

13<br />

14<br />

8F<br />

8B<br />

Tabelle zum<br />

4893 1310 5B<br />

4894 131E 5C<br />

4895 131F 50<br />

4896 1320 5E<br />

4897 1321 2F<br />

..<br />

•<br />

Space<br />

Clr<br />

Horne<br />

Cursor<br />

Cursor<br />

Cursor<br />

Cursor<br />

6<br />

Umsetzen der<br />

hoch<br />

runter<br />

rechts<br />

links<br />

Shift-Graphik Spalte<br />

• Shift-Graphi k Spalte<br />

zusätzlich definierten CTRL - Tasten<br />

Zwischenspeicher für die den Funktionsta~ten zugeordneten Texten.<br />

Die dargestellte 8elegung entspricht der Belegung beim<br />

Anlaufen des Ba~ic - Interpreters.<br />

4898 1322 04 , T&xtlänge<br />

4899 1323 52 R Text<br />

4900 1324 55 U<br />

4901 1325 4E N<br />

4902 1326 00 Carriage Return<br />

4903 1327 00<br />

Fl<br />

F1<br />

7<br />

8<br />

il i<br />

,'.<br />

t<br />

I'l<br />

';(<br />

i' l<br />

lI ~ i !<br />

' ~<br />

i ~l<br />

, r<br />

l<br />

lf<br />

~<br />

'l ,'<br />

, I ~ j,<br />

4926<br />

4927<br />

4928<br />

4929<br />

4930<br />

4931<br />

4932<br />

4933<br />

4934<br />

4935<br />

4936<br />

4937<br />

4938<br />

4939<br />

4940<br />

4941<br />

4942<br />

133E<br />

133F<br />

1340<br />

1341<br />

1342<br />

13 4.3<br />

1344<br />

1345<br />

1346<br />

1347<br />

1348<br />

1349<br />

134A<br />

1348<br />

13 4C<br />

1340<br />

13 4E<br />

04<br />

4C<br />

49<br />

53<br />

54<br />

00<br />

00<br />

00<br />

00<br />

00<br />

00<br />

00<br />

04<br />

41<br />

55<br />

54<br />

4F<br />

00<br />

00<br />

00<br />

00<br />

00<br />

00<br />

00<br />

00<br />

4943 134F 00<br />

4944<br />

4945<br />

4946<br />

4947<br />

4948<br />

4949<br />

4950<br />

4951<br />

1350<br />

1351<br />

1352<br />

1353<br />

1354<br />

1355<br />

1356<br />

1357<br />

00<br />

00<br />

05<br />

52<br />

45<br />

4E<br />

55<br />

40<br />

4952 1358 00<br />

4953 1359 00<br />

4955<br />

4956<br />

4957<br />

4958<br />

4959<br />

4960<br />

4961<br />

4954<br />

\",<br />

I'<br />

:'· 1<br />

135A<br />

1358<br />

135C<br />

1350<br />

135E<br />

135F<br />

1.360<br />

1361<br />

00<br />

00<br />

00<br />

00<br />

00<br />

00<br />

00<br />

00<br />

L<br />

A<br />

U<br />

T<br />

0<br />

R<br />

E<br />

N<br />

U<br />

M<br />

)<br />

]<br />

1­<br />

/<br />

\<br />

I<br />

[<br />

\<br />

I<br />

I<br />

I<br />

S<br />

T


8EITE 84<br />

BASIC 1Z-013B V 1 _ (::>A<br />

BASIC 1<br />

4962 1362 05 Textlänge F5 5021 1390 00<br />

4963 1363 43 C Text F5 5022 139E 00<br />

4964 1364 4F 0 5023 139F 00<br />

4965 1365 4C L 5"024 13AO 00<br />

4966 1366 4F 0<br />

c:-...,<br />

5025 13A1 00<br />

4967 1367 ....J.L. R<br />

4968 1368 00 5026 13A2 04<br />

4969 1369 00 5027 13A3 53<br />

4970 136A<br />

8<br />

00 5028 1.3A4 41<br />

4971<br />

A<br />

136B 00 5029 13A5 56 V<br />

4972 136C 00 5030 13A6 45<br />

4973<br />

E<br />

1360 00 5031 13A7 00<br />

4974 136E 00 5032 13A8 00<br />

4975 136F 00 5033 13A9 00<br />

4976 1370 00 5034 13AA 00<br />

4977 1371 00 5035 13AB 00<br />

5036 13AC 00<br />

4978 1372 05 Textlänge 8ft F1 5037 13AO 00<br />

4979 1373 43 C Text 8ft Fl 5038 13AE 00<br />

4980 1374 48 H 5039 13AF 00<br />

4981 1375 52 R 5040 13BO 00<br />

4982 1376 24 $ 5041 1381 00<br />

4983 1377 28 (<br />

! '<br />

4984 1378 00<br />

I<br />

5042 1382 04<br />

4985 1379 00 5043 1383 4C L<br />

4986 137A 00 5044 1384 4F 0<br />

4987 1378 00 5045 1385 41 A<br />

4988 137C 00 5046 13B6 44 0<br />

4989 137D 00 ,t 5047 1387 00<br />

4990 137E 00<br />

~ 5048 13B8 00<br />

4991 137F 00 5049 1389 00<br />

4992 1380 00 5050 13BA 00<br />

4993 1381 00 5051 1388 00<br />

5052 1.3BC 00<br />

4994 1382 08 Textlänge 8ft F2 5053 138D 00<br />

4995 1383 44 D Text 8ft F2 5054 13BE 00<br />

4996 1384 45 E 5055 138F 00<br />

4997 1385 46 F 5056 13CO 00<br />

4998 1386 20 8pace 5057 13Cl 00<br />

4999 1387 48 K<br />

5000 1388 45 E<br />

5001 1389 59 Y<br />

5002 138A 28 (<br />

5003 1388 00<br />

5004 138C 00<br />

5005 138D 00<br />

5006 138E 00<br />

5007 138F 00<br />

5008 1390 00<br />

5009 1391 00<br />

5010 1392 04 Textlänge 8ft F3<br />

5011 1393 43 C Text 8ft F3<br />

5012 1394 4F 0<br />

5013 1395 4E N<br />

5014 1396 54 T<br />

5015 1397 00<br />

5016 1398 00<br />

5017 1399 00<br />

5018 139A 00<br />

5019 1398 00<br />

5020 139C 00<br />

,<br />

I


SEITE 86 <br />

BASIC 1Z-013B V1_0A <br />

Die folgenden Routinen gehören zu dem integrierten <br />

Maschinensprachenmonitor <br />

Kaltstart Monitor (Basic-Befehl BVE)<br />

5058 13C2 E5 PUSH HL REGISTER RETTEN<br />

5059 13C3 ED 5B 20 18 LD DE. (1820) I ALTE FEHLERADRESSE<br />

5060 I HOLEN<br />

5061<br />

5062<br />

5063 13C7 D5 PUSH DE UND MERKEN<br />

IBEHANDLUNG IM MONITOR<br />

5064 13C8 11 OB 14 LD DE. 140B I ADRESSE FüR FEHLER­<br />

5065<br />

5066<br />

5067 13CB ED 53 20 18 LD (1820).DE EINTRAGEN<br />

5068<br />

5069<br />

5070<br />

5071 13CF 3A 4F 00 LD A.


SEITE 88 <br />

BASIC 1Z-013B V1.0A <br />

5160 1428 46 F Daten im Speicher suchen<br />

5161 1429 F4 15 Anfangsadresse Routine<br />

5162<br />

5163 142B 52 R Rücksprung zum Basic<br />

5164 142C B8 14 Anfangsadresse Routine<br />

5165<br />

5166 142E 53 S Daten auf Band schreiben<br />

5167 142F 43 14 Anfangsadresse Routine<br />

5168<br />

5169 1431 4C L Daten vom Band lesen<br />

5170 1432 69 14 Anfangadresse Routine<br />

5171<br />

5172 1434 56 v Daten auf Band vergleichen<br />

5173 1435 A9 14 Anfangsadresse Routine<br />

5174<br />

5175 1437 54 T Verschieben von Daten<br />

5176 1438 5A 16 Anfangsadresse Routine<br />

5177<br />

Monitorbefehl P .HL STARTADRESSE<br />

5200<br />

5201<br />

5202 1452 05 PUSH OE ANFANGSADRESSE MERKEN<br />

5203 1453 C5 PUSH BC ; LÄNGE MERKEN<br />

5204 1454 D9 EXX<br />

5205 1455 CD lF 17 CALL 171F ; I FILE-NAMEN AUS EINGABE<br />

5206 I HOLEN UND AUFBEREITEN<br />

5207<br />

5208 1458 21 FC OF LD HL. OFFC ; I ZEIGER AUF ZWISCHEN­<br />

5209 I SPEICHER MIT VORBEREI­<br />

5210 ITETER FILE-KENNUNG<br />

5211 145B 36 01 LD (HU. 01 • FILE-TYP MASCHINENPROGRAMM<br />

5212<br />

5213 1450 01 80 00 LD BC, 0080 LÄNGE PROGRAMMKENNUNG<br />

BASIC 1Z<br />

5214<br />

5215<br />

5216 1460 CD 21 00 CALL<br />

5217<br />

5218<br />

5219 1463 Cl POP B<br />

5220 1464 EI POP H<br />

5221 1465 04 24 00 CALL<br />

5222<br />

5223<br />

5224 1468 C9 RET<br />

Monitorbefehl L (Prog<br />

5225 1469 CD E7 14 CALL<br />

5226<br />

5227<br />

5228 146C E5 PUSH<br />

5229 1460 F5 PUSH<br />

5230 146E CD 84 14 CALL<br />

5231<br />

5232<br />

5233 1471 F1 POP A<br />

5234 1472 E1 POP H<br />

5235 1473 30 03 JR NC<br />

5236<br />

5237 1475 2A 14 FF LD HL<br />

5238<br />

52.39<br />

5240 1478 ED 4B 12 FF LD BC<br />

5241<br />

5242<br />

5243<br />

5244 147C CD 2A 00 CALL<br />

5245<br />

5246<br />

5247 147F DA 1F 18 JP C.<br />

5248<br />

5249<br />

5250 1482 18 E4 JR E4<br />

5251<br />

Filenamen aus Eingabe be<br />

kennung vom Band lesen <br />

5252 1484 CD IF 17 CALL<br />

5253<br />

5254<br />

5255 1487 3E 01 LD A<br />

5256<br />

5257 1489 32 FC OF LD (O<br />

5258<br />

5259<br />

5260 148C 21 00 FF LD H<br />

5261<br />

5262<br />

5263 148F 01 80 00 LD B<br />

5264<br />

5265<br />

5266 1492 CD 27 00 CALL


SEITE 90 <br />

BASIC 1Z-013B V1_0A <br />

5267<br />

5268<br />

5269 1495 DA lF 18 JP C, 181F FEHLER AUFGETRETEN<br />

5270<br />

5271<br />

5272 1498 11 OE 18 LD DE, 180E ' TEXT Found<br />

5273<br />

5274<br />

5275 1498 CD C8 16 CALL 16C8 ITEXT (OE) UND GELESENEN<br />

5276 I PROGRAMM-NAMEN AUSGEBEN<br />

5277<br />

5278 149E CD EE 16 CALL 16EE I GELESENEN PROGRAMM-NAMEN<br />

5279 IMIT VORGEGEBENEM VER­<br />

5280 I GLEICHEN<br />

5281 14Al 20 E9 JR NZ, E9 ~ 148CH I FALSCHES PROGRAMM ~<br />

5282 I NÄCHSTE KENNUNG LESEN<br />

5283 14A3 11 OB 43 LD OE, 430B TEXT<br />

5284<br />

5285<br />

5286 14A6 C3 C8 16 JP 16C8 ITEXT (OE) UND GELESENEN<br />

5287 IPROGRAMMNAMEN AUSGEBEN<br />

5288<br />

Monitorbefehl V (Programm auf Band vergleichen)<br />

5289 14A9 CD 84 14 CALL 1484 I PROGRAMM-NAMEN AUS EIN­<br />

5290 IGA8E BEREITSTELLEN UND<br />

5291 IENTSPR. KENNUNG LESEN<br />

5292 14AC 2A 14 FF LD HL, (FFI4) I GELESENEN PROGRAMM­<br />

5293 I ANFANGSADRESSE<br />

5294<br />

5295 14AF ED 4B 12 FF LD BC, (FFI2) GELESENE PROGRAMMLÄNGE<br />

5296<br />

5297<br />

5298<br />

5299 14B3 CD 20 00 CALL 002D DATEN AUF BAND VERGLEICHEN<br />

5300<br />

5301<br />

5302 14B6 18 C7 JR C7 ~ 147FH AUSWERTEN, OB FEHLER<br />

5303<br />

Monitorbefehl R (Rücksprung z um BASIC)<br />

5304 14B8 31 00 00 LD SP. 0000 ISTACKPOINTER WI EDER SETZEN<br />

5305 I (Adresse wird bei Aufruf<br />

5306 I Monitor eingetragen)<br />

5307 148B Fl POP AF GERETTETE PUFFERLÄNGE<br />

5308 14BC 32 4F 00 LD (004F),A WIEDER EINTRAGEN<br />

5309<br />

5310<br />

5311 14BF EI POP HL ; GERETTETE FEHLERADRESSE<br />

5312 14CO 22 20 18 LD (1820). HL WIEDER EINTRAGEN<br />

5313<br />

5314<br />

5315 14C3 EI POP HL PROGRAM<strong>MZ</strong>EIGER<br />

5316 14C4 C9 RET RüCKSPRUNG ZUM BASIC<br />

BASIC 1Z<br />

Zeile von Tastatur holen u<br />

5317 14C5 11 00 FF LD OE<br />

5318<br />

5319<br />

5320 14C8 CD 4A 00 CALL 0<br />

5321<br />

5322<br />

5323 14CB 38 18 JR C,<br />

53 24<br />

5325 14CD lA LD A.<br />

5326 14CE FE 3A CP 3A<br />

5327<br />

5328 1400 37 SCF<br />

5329 14Dl CO RET NZ<br />

5330 14D2 13 INC OE<br />

533 1 14D3 CD E7 14 CALL<br />

5332<br />

5333<br />

5 3 34 1406 08 RET C<br />

5335 1407 lA LD A,<br />

5336 1408 13 INC DE<br />

5337 1409 EE 3 D XOR 3<br />

5338<br />

5.33 9 1408 CO RET NZ<br />

5 3 40 14DC CD lB 15 CALL 1<br />

53 41<br />

5 3 4 2<br />

5343 14DF :3F CCF<br />

5 3 44 14EO DO RET NC<br />

5 3 45 14El 77 LD (H<br />

5346 14E2 23 INC HL<br />

5347 14E3 18 F7 JR F7<br />

5348<br />

5349 14E5 12 LD


SEITE 92<br />

BASIC 1Z-013B V1_0A BASIC 1Z<br />

5373<br />

5374<br />

5375<br />

5376<br />

5377<br />

5378<br />

5379<br />

5380<br />

5381<br />

5382<br />

14FO<br />

14FE<br />

14FF<br />

E1<br />

37<br />

C9<br />

POP<br />

SCF<br />

RET<br />

HL I<br />

CODE FEHLER AUFGETRETEN<br />

Zeige~ in DE auf näc h stes ~elevante Zeichen setzen 5427<br />

5428<br />

1500<br />

1501<br />

1502<br />

1504<br />

1506<br />

13<br />

1A<br />

FE<br />

28<br />

C9<br />

20<br />

FA<br />

INC DE<br />

LO A.


SEITE 94<br />

BASIC 1Z-013B V1_0A<br />

BASIC 1Z<br />

553()<br />

5472 1560 OE 08 LD C. 08 8 BYTE JE ZEILE AUSGEBEN 5531 159B CD lE 00 CALL<br />

5473 C'C"~...,<br />

~..J....,,,,-<br />

5474 1562 CD 6D 15 CALL 156D EINE ZEILE AUSGEBEN 5533<br />

5475 55:.4 159E 37 SCF<br />

5476 5535 159F C8 RET Z<br />

5477 1565 D8 RET C BREAk GEDRüCkT 553 6 15AO B7 OR A<br />

5478 1566 E5 PUSH HL AKTUELLE ADRESSE 5537 15Al C9 RET<br />

5479 1567 ED 52 SBC HL.DE I üBERPRüFEN. OB BEREICH<br />

5480 I AUSGEGEBEN<br />

5481 1569 EI POP HL AKTUELLE ADRESSE Hex-Wert 'in HL umsetzen i<br />

5482 156A DO RET NC FERTIG<br />

5483 156B 18 F3 JR F3 ~ 1560H WEITERE ZEILEN AUSGEBEN 5538 15A2 7C LD A,<br />

5484 5539 15A3 CD A7 15 CALL<br />

5540<br />

Eine Zeile für Monitorbefehl D aufbereiten und ausgeben 5541<br />

5542 15A6 7D LD A.<br />

5485 156D CD EF 15 CALL 15EF Doppelpunkt AUSGEBEN<br />

5486 Hex-Wert im Accu umsetz en<br />

5487 <br />

5488 1570 CD A2 15 CALL 15A2 IHEX-WERT IN HL AUFBE­ 5543 i 5A7 F5 PUSH<br />

5489 IREITEN IN ASCII UND<br />

5544 15A8 07 RLCA<br />

5490 I AUSGEBEN<br />

5545 15A9 07 RLCA<br />

5491 1573 CD EA 15 CALL 15EA AUSGEBEN<br />

5546 15AA 07 RLCA<br />

5492<br />

5547 15A8 07 RLCA<br />

5493<br />

5548 15AC CD BO 15 CALL<br />

5494 1576 41 LD B.C ANZAHL BYTES JE ZEILE<br />

5549<br />

5495 1577 E5 PUSH HL ADRESSE ANFANG ZEILE MERKEN<br />

5550<br />

5496 1578 7E LD A. (HU EIN BYTE HOLEN<br />

5551 15AF Fl POP A<br />

5497 1579 CD A7 15 CALL 15A7 IHEX-WERT IM ACCU AUF­<br />

5552 15BO E6 OF AND A<br />

5498 IBEREITEN IN ASCII UND<br />

C"C"C"'~<br />

o...J..J...J .J<br />

5499 I AUSGEBEN<br />

5554 15 82 C6 3 0 ADD A<br />

5500 157C 23 INC HL ZEIGER AU SPEICHER<br />

5555<br />

5501 157D 3E 20 LD A. 20 Space<br />

5556 1584 FE 3A CP 3<br />

5502<br />

5557<br />

5503 157F CD D3 17 CALL 17D3 IASCII-ZEICHEN IM ACCU<br />

5558 1586 38 02 JR C,<br />

5504 lAUF BILDSCHIRM ODER<br />

5505<br />

5559<br />

I DRUCk ER AUSGEBEN<br />

5560 1588 C6 07 ADD A<br />

5506 1582 10 F4 DJNZ F4 ~ 1578H I WEITERE SPEICHERSTELLEN<br />

5507<br />

5561<br />

I IN DIESER ZEILE AUSGEBEN<br />

5562 158A C3 D3 17 JP 17<br />

5508 1584 EI POP HL ADRESSE ANFANG ZEILEN<br />

5563<br />

5509 1585 3E 2F LD A. 2F I (Schrägstrich)<br />

5564<br />

5510<br />

5511 1587 CD D3 17 CALL 17D3 IASCII IM ACCU AUF<br />

5512 I BILDSCHIRM ODER DRUCKER<br />

5513 I AUSGEBEN<br />

5514 158A 41 LD B.C ANZAHL BYTES JE ZEILE<br />

5515 158B 7E LD A. (HU EINEN WERT HOLEN<br />

5516 158C FE 20 CP 20 Steuerzeichen ?<br />

5517<br />

5518 158E 30 02 JR NC, 02 ~ 1592H NEIN<br />

5519<br />

5520 1590 3E 2E LD A. 2E (für Steuerzeichen)<br />

5521<br />

5522 1592 CD D3 17 CALL 17D3 a IASCII IM ACCU AUF<br />

5523 I BILDSCHIRM ODER DRUCKER<br />

5524 I AUSGEBEN<br />

5525 1595 23 INC HL ZEIGER AUF SPEICHERBEREICH<br />

5526 1596 10 F3 DJNZ F3 ~ 158BH • WEITERE BYTES AUSGEBEN<br />

5527<br />

Monitorbefehl M (Ände<br />

5565 158D CD E7 14 CALL<br />

5566<br />

5567<br />

5568 15CO 3A 19 18 LD A,<br />

5569<br />

5570<br />

5571 15C3 F5 PUSH<br />

5572 15C4 AF XOR A<br />

5573 15C5 32 19 18 LD (1<br />

5574<br />

5575<br />

5576 15C8 CD 09 00 CALL<br />

5577<br />

5578<br />

5528 1598 CD F9 17 CALL 17F9 NEUE ZEILE AUSGEBEN 5 5 79 15 CB CD EF 15 CALL<br />

5529


SEITE 96 <br />

BASIC 1Z-013B V1_0A <br />

5580<br />

5581<br />

5582 15CE CD A2 15 CALL 15A2 IHEX-WERT IN HL UMSETZE~<br />

5583 I IN ASCII UND AUSGEBEN<br />

5584<br />

5585 1501 CD EA 15 CALL 15EA AUSGEBEN<br />

5586<br />

5587<br />

5588 1504 7E LD A. (HU BYTE AUS SPEICHER HOLEN<br />

5589 1505 CD A7 15 CALL' 15A7 I ACCU UMSETZEN IN ASCII­<br />

5590 (HEX-WERT UND AUSGEBEN<br />

5591<br />

Cursor links<br />

5592 1508 3E 14 LD A. 14 5593<br />

5594 15DA CD 12 00 CALL 0012 IASCII-ZEICHEN IM ACCU<br />

5595 I AUSGEBEN<br />

5596<br />

5597 1500 CO 12 00 CALL 0012 IASCII-ZEICHEN IM ACCU<br />

5598 I AUSGEBEN<br />

5599<br />

5600 15EO CD C5 14 CALL 14C5 IZEILE VON TASTATUR HOLEN<br />

5601 IUNO AUSWERTEN<br />

5602<br />

5603 15E3 30 E3 JR NC. E3 ~ 15C8H IKEIN FEHLER ODER BREAK ~<br />

5604 INÄCHSTE ZEILE<br />

5605 15E5 Fl POP AF "; GERETTETES FLAG HOLEN <br />

5606 15E6 32 19 18 LD (1819).A MONITORFLAG DRUCKER <br />

5607 <br />

5608 <br />

5609 15E9 C9 RET <br />

5610 15EA 3E 3D LD A. 3D (Gleich)<br />

5611 <br />

5612 15EC C3 03 17 JP 1703 IASCII-ZEICHEN IM ACCU <br />

5613 lAUF BILDSCHIRM ODER <br />

5614 I DRUCKER AUSGEBEN <br />

5615 15EF 3E 3A LD A. 3A (Doppelpunkt)<br />

5616 " <br />

5617 15Ft C3 03 17 JP 1703 : IASCII-ZEICHEN IM ACCU <br />

5618 lAUF BILDSCHIRM ODER <br />

5619 I DRUCKER AUSGEBEN <br />

Monitorbefehl F (Oatenstring suchen)<br />

5620 15F4 CD E7 14 CALL 14E7 IVIER ASCII-HEX-ZEICHEN<br />

5621 I


SEITE 98 <br />

BASIC 1Z-013B V1.0A <br />

5692<br />

5693 1630 AF XOR A ZERO-FLAG SETZEN<br />

5694 163E El POP HL I GERETTETE REGISTER HOLEN<br />

5695 163F Dl POP OE I<br />

5696 1640 Cl POP BC I<br />

5697 1641 C9 RET<br />

Anfangs- .Endadressse und dritten Parameter aus <br />

eingegebener Zeile bereitstellen <br />

5698 1642 CD E7 14 CAll 14E7 IVIER ASCII-HEX-WERTE<br />

5699 I


SEITE 100<br />

BASIC 1Z-013B V1_0A BASIC 1Z<br />

Drucker auf RUckmeldewert abfragen Text (OE) und gelesenen F<br />

5787<br />

5788<br />

5789<br />

5790<br />

1698<br />

169C<br />

57<br />

01<br />

00<br />

00<br />

LD<br />

LD<br />

D.A<br />

BC. 0000<br />

RüCKMELDEWERT<br />

I VORGABE FüR ANZAHL<br />

I DURCHLÄUFE<br />

5791 169F lE 20<br />

LD E. 20<br />

ZÄHLER SETZEN<br />

5792 5837<br />

16Al OB FE<br />

IN A. (FE)<br />

WERT VOM DRUCKERPORT HOLEN<br />

5793<br />

5794<br />

5795<br />

16A3 E6 00<br />

AND A. OD<br />

RüCKMELDEBIT'S MASKIEREN<br />

5796<br />

5797 16A5 BA CP D GLEICH RüCKMELDEWERT ? 5842<br />

5798 16A6 C8<br />

RET Z<br />

DRUCKER OK<br />

5843<br />

5844 16D3 16 10 LD D.<br />

5799 16A7 10<br />

DEC E<br />

ZÄHLER MINUS EINS<br />

16A8 20 F7 JR NZ. F7 + 16A1H WEITER ABFRAGEN<br />

5800<br />

5801<br />

5802 16AA<br />

5803<br />

5804 16AB<br />

16AC<br />

5805<br />

5806<br />

OB<br />

78<br />

BI<br />

DEC BC<br />

LD<br />

OR<br />

A.B<br />

C<br />

5832<br />

5833<br />

5834<br />

5835<br />

5836<br />

5838<br />

5839<br />

5840<br />

5841<br />

5845<br />

5846<br />

5847<br />

16CB<br />

16CB<br />

16CE<br />

16CF<br />

16DO<br />

1605<br />

1606<br />

CD<br />

CD<br />

09<br />

51<br />

00<br />

00<br />

E5<br />

23<br />

CD E9 16<br />

7E<br />

FE OD<br />

CALL<br />

CALL<br />

PUSH<br />

INC H<br />

CALL<br />

RESTANZAHL DURCHLÄUFE<br />

I GLEICH NULL? 5848<br />

5849 16D8 28 07 JR Z.<br />

16AD 20 FO JR NZ. FO + 169FH WEITER ABFRAGEN 5850<br />

5851<br />

Drucker nicht<br />

ansprechbar<br />

5852<br />

LD<br />

CP<br />

16DA CD 12 00 CALL<br />

5807 16AF AF<br />

XOR A ACCU AUF NULL<br />

5808 1680 32 4D 00 LD (004D).A IPARALLELAUSGABE üBER<br />

5857<br />

5809<br />

I DRUCKER ABSCHALTEN<br />

5858 16El CD E9 16 CALL<br />

58 10 5859<br />

1683 3E 41<br />

LD A. 41<br />

16E4 CO 09 00 CALL 0<br />

5811<br />

5812<br />

5813<br />

5814<br />

5815<br />

16B5<br />

C3<br />

lF 18<br />

JP<br />

181F<br />

I FEHLER 65<br />

I DRUCKER NICHT BEREIT<br />

FEHLER BEHANDELN<br />

5853<br />

5854<br />

5855<br />

5856<br />

5860<br />

5861<br />

5862<br />

5863<br />

5864<br />

16DD<br />

16DE<br />

16DF<br />

16E7<br />

16E8<br />

23<br />

15<br />

20 F4<br />

E1<br />

C9<br />

A.<br />

O<br />

INC H<br />

DEC D<br />

JR NZ<br />

POP HL<br />

RET<br />

Drucker auf nächste 10er Tabulator setzen Anführungszeichen ausgeben<br />

5816 16B8 3E 20 LO A. 20 Space 5865<br />

16E9 3E 22 LD A.<br />

5817<br />

5866 16E9 3E 22 5818 16BA CD 78 16 CALL 1678 I ZEICHEN IM ACCU AN<br />

5867<br />

5868 16EB C3 12 00 JP 001<br />

5819<br />

I DRUCKER AUSGEBEN<br />

5820 5869<br />

5821 16BD 3E 00 LD A. 00 I SPALTE DRUCKER<br />

5822 I (wird eingetragen)<br />

5823 16BF D6 OA SUB A. OA 10 ABZIEHEN Vorgegebenen Dateinamen m<br />

5824<br />

5825<br />

5826<br />

5827<br />

5828<br />

5829<br />

5830<br />

5831<br />

16Cl<br />

16C3<br />

16C5<br />

16C6<br />

30<br />

C6<br />

C8<br />

18<br />

FC<br />

OA<br />

FO<br />

JR NC. FC + 16BFH<br />

ADD A. OA<br />

RET Z<br />

JR FO + 16B8H<br />

WEITER ABZIEHEN<br />

ERGEBNIS CORRIGIEREN<br />

STEHT AUF TABULATORPOSITION<br />

NÄCHSTES Space AUSGEBEN<br />

5870<br />

5871<br />

5872<br />

5873<br />

5874<br />

5875<br />

5876<br />

5877<br />

5878<br />

5879<br />

5880<br />

5881<br />

5882<br />

5883<br />

16EE<br />

16EF<br />

16FO<br />

16Fl<br />

16F4<br />

16F5<br />

16F6<br />

16F8<br />

16FA<br />

D5<br />

E5<br />

23<br />

11<br />

13<br />

lA<br />

FE<br />

28<br />

06<br />

FC<br />

00<br />

13<br />

11<br />

OF<br />

PUSH D<br />

PUSH H<br />

INC HL<br />

LD OE.<br />

INC DE<br />

LO A. <<br />

CP OD<br />

JR<br />

LO<br />

Z.<br />

B.<br />

I


SEITE 102 <br />

BASIC 1Z-013B V1_0A <br />

5884 16FC lA LO A,


SEITE 104<br />

5993<br />

5994<br />

5995 176B FE 20<br />

5996<br />

5997 176D 38 5C<br />

5998<br />

5999 176F FE 60<br />

6000<br />

6001 1771 DA 78<br />

6002<br />

6003<br />

6004 1774 FE 7B<br />

6005<br />

6006 1776 CA 78<br />

6007<br />

6008<br />

6009 1779 FE 80<br />

6010<br />

6011 177B CA 78<br />

6012<br />

6013<br />

6014 177E FE 8B<br />

6015<br />

6016 1780 CA 78<br />

6017<br />

6018<br />

6019 1783 FE 92<br />

6020<br />

6021 1785 38 44<br />

6022<br />

6023 1787 FE 95<br />

6024<br />

6025 1789 28 40<br />

6026<br />

6027 178B FE 99<br />

6028<br />

6029 178D 28 3C<br />

6030<br />

6031 178F FE A7<br />

6032<br />

6033 1791 28 38<br />

6034<br />

6035 1793 FE AC<br />

6036<br />

6037 1795 28 34<br />

6038<br />

6039 1797 FE BI<br />

6040<br />

6041 1799 28 30<br />

6042<br />

6043 179B FE B4<br />

6044<br />

6045 179D DA 78<br />

6046<br />

6047<br />

6048 17AO FE B7<br />

6049<br />

6050 17A2 38 27<br />

6051<br />

6052 17A4 FE BC<br />

6053<br />

6054 17A6 28 23<br />

BASIC<br />

CP 20<br />

JR C.<br />

CP 60<br />

16 JP C.<br />

CP 7B<br />

16 JP Z.<br />

CP 80<br />

16 JP Z.<br />

CP 8B<br />

16 JP Z.<br />

CP 92<br />

JR C.<br />

CP 95<br />

JR Z.<br />

CP 99<br />

JR Z.<br />

CP A7<br />

JR Z.<br />

CP AC<br />

JR Z.<br />

CP BI<br />

JR Z.<br />

CP B4<br />

16 JP C.<br />

CP B7<br />

JR C.<br />

CP BC<br />

JR Z.<br />

1Z-013B<br />

5C ~ 17CBH<br />

1678<br />

1678<br />

:<br />

1678<br />

1678<br />

44 ~ 17CBH<br />

40 ~ 17CBH<br />

3C ~ 17CBH<br />

38 ~ 17CBH<br />

34 ~ 17CBH<br />

30 ~ 17CBH<br />

1678<br />

27 ~ 17CBH<br />

23 ~ 17CBH<br />

V1.0A<br />

I DRUCKER AUSGEBEN<br />

I ZEICHEN ZWISCHEN CURSOR­<br />

I ZEICHEN UND BUCHSTABEN?<br />

JA ~ • AUF DRUCKER AUSGEBEN<br />

IM BUCHSTABENZEICHENBLOCK ?<br />

IJA ~ ZEICHEN AUF<br />

I DRUCKER AUSGEBEN<br />

0 (GRAD-ZEICHEN)<br />

(JA + ZEICHEN AUF<br />

I DRUCKER AUSGEBEN<br />

Geschweifte Klammer zu ?<br />

IJA ~ ZEICHEN AUF<br />

I DRUCKER AUSGEBEN<br />

"'- ?<br />

IJA ~ ZEICHEN AUF<br />

DRUCKER AUSGEBEN<br />

VOR KLEINBUCHSTABEN ?<br />

JA ~ . AUF DRUCKER AUSGEBEN<br />

I FüR PLOTTER UNBEKANNTES<br />

I ZEICHEN<br />

JA ~ . AUF DRUCKER AUSGEBEN<br />

I FüR PLOTTER UNBEKANNTES<br />

I ZEICHEN<br />

JA ~ • AUF DRUCKER AUSGEBEN<br />

IFüR PLOTTER UNBEKANNTES<br />

I ZEICHEN<br />

JA + • AUF DRUCKER AUSGEBEN<br />

I FüR PLOTTER UNBEKANNTES<br />

I ZEICHEN<br />

JA + • AUF DRUCKER AUSGEBEN<br />

I FüR PLOTTER UNBEKANNTES<br />

I ZEICHEN ?<br />

JA + • AUF DRUCKER AUSGEBEN<br />

I ZEICHEN AUF DRUCKER<br />

I AUSGEBEN<br />

PUNKT AUF DRUCKER AUSGEBEN<br />

I FüR PLOTTER UNBEKANNTES<br />

I ZEICHEN ?<br />

JA + • AUF DRUCKER AUSGEBEN<br />

BASIC 1Z<br />

6055<br />

6056 17A8 FE BF CP BF<br />

6057<br />

6058 17AA DA 78 16 JP C.<br />

6059<br />

6060<br />

6061 17AD FE C6 CP C6<br />

6062<br />

6063 17AF CA 78 16 JP Z.<br />

6064<br />

6065<br />

6066 17B2 FE CF CP CF<br />

6067<br />

6068 17B4 CA 78 16 JP Z.<br />

6069<br />

6070<br />

6071 17B7 FE D7 CP D7<br />

6072<br />

6073 17B9 CA 78 16 JP Z.<br />

6074<br />

6075<br />

6076 17BC FE FB CP FB<br />

6077<br />

6078 17BE CA 78 16 JP Z.<br />

6079<br />

6080<br />

6081 17Cl FE FC CP FC<br />

6082<br />

6083 17C3 CA 78 16 JP Z.<br />

6084<br />

6085<br />

6086 17C6 FE FF CP FF<br />

6087<br />

6088 17C8 CA 78 16 JP Z.<br />

6089<br />

6090<br />

Punkt anstelle des für den<br />

6091 17CB F5 PUSH<br />

6092 17CC 3 E 2E LD A.<br />

6093<br />

6094 17CE CD 78 16 CALL<br />

6095<br />

6096<br />

6097 1701 Fl POP A<br />

6098 17D2 C9 RET<br />

ASCII-Zeichen im Accu auf<br />

6099 17D3 08 EX AF<br />

6100 17D4 3A 19 18 LD A.<br />

6101<br />

6102<br />

6103 17D7 B7 OR A<br />

6104 17D8 28 04 JR Z.<br />

6105<br />

6106 17DA 08 EX AF<br />

6107 17DB C3 78 16 JP 16<br />

6108<br />

6109


BASIC 1 Z-C>13B V1 _ OA<br />

I <br />

BASIC 1 Z<br />

SEITE 106<br />

6112 6158 180E 46 F<br />

6113 I 6159 180F B7 0<br />

6160 1810 A5 LI<br />

6161 1811 BO n<br />

Text


SEITE 108<br />

BASIC 1Z-013B V1.0A BASIC 1Z<br />

6178<br />

6179<br />

6180<br />

6181<br />

6182<br />

6183<br />

6184<br />

6185<br />

6186<br />

6187<br />

6188<br />

6189<br />

6190<br />

6191<br />

6192<br />

6193<br />

6194<br />

6195<br />

6196<br />

6197<br />

6198<br />

6199<br />

6200<br />

6201<br />

6202<br />

6203<br />

6204<br />

6205<br />

6206<br />

6207<br />

6208<br />

6209<br />

6210<br />

6211<br />

6212<br />

6213<br />

6214<br />

6215<br />

Kaltstart Basic (wird nur ein mal aufgerufen) 6230<br />

6231<br />

1822<br />

1825<br />

1828<br />

1829<br />

182B<br />

182C<br />

1820<br />

182F<br />

1831<br />

1834<br />

1837<br />

183A<br />

183D<br />

1840<br />

1843<br />

1846<br />

11 Cl 6A<br />

CD 51 00<br />

EB<br />

36 00<br />

23<br />

7C<br />

FE FF<br />

38 F8<br />

21 48 18<br />

22 E7 00<br />

21 00· FF<br />

22 BD 6A<br />

CD 31 22<br />

CD 39 22<br />

CD 4E 22<br />

18 05<br />

LD OE. 6ACl<br />

CALL 0051<br />

EX DE.HL<br />

LD (HL>. 00<br />

INC HL<br />

LD A.H<br />

CP FF<br />

JR C. F8 ~ 1829H<br />

LD HL. 1848<br />

LD (OOE?>. HL<br />

LD HL. FFOO<br />

LD (6ABD).HL<br />

CALL 2231<br />

CALL 2239<br />

CALL 224E<br />

JR 05 ~ 184DH<br />

COPYRIGHT-MELDUNG<br />

TEXT AB (OE) AUSGEBEN<br />

I KOMPLETTEN SPEICHER<br />

I LöSCHEN<br />

I<br />

I H-BYTE ZEIGER<br />

I ENDADRESSE<br />

I<br />

I WEITER LöSCHEN<br />

WARMSTARTADRESSE BASIC<br />

IALS ·BASIC-START-ADRESSE<br />

I EINTRAGEN<br />

ADRESSE LIMIT MAX<br />

IMAXIMAL BENUTZBARE<br />

I RAM-ADRESSE<br />

LIMIT MERKEN<br />

ZEIGER INITIALISIEREN<br />

CLR - ROUTINE<br />

6232<br />

6233<br />

6234<br />

6235<br />

6236<br />

6237<br />

6238<br />

6239<br />

6240<br />

6241<br />

6242<br />

6243<br />

6244<br />

6245<br />

6246<br />

6247<br />

6248<br />

6249<br />

6250<br />

6251<br />

6252<br />

6253<br />

6254<br />

6255<br />

6256<br />

6257<br />

6258<br />

6259<br />

6260<br />

6261<br />

6262<br />

6263<br />

6264<br />

6265<br />

6266<br />

6267<br />

6268<br />

6269<br />

6270<br />

1859<br />

185C<br />

185F<br />

1860<br />

1863<br />

1866<br />

1869<br />

186C<br />

186F<br />

1872<br />

1873<br />

1876<br />

1879<br />

187C<br />

CD<br />

CD<br />

AF<br />

32<br />

32<br />

CD<br />

11<br />

CD<br />

CD<br />

AF<br />

32<br />

21<br />

22<br />

CD<br />

85<br />

82<br />

A3<br />

DC<br />

09<br />

9B<br />

51<br />

06<br />

DC<br />

FF<br />

E6<br />

29<br />

lC<br />

22<br />

42<br />

38<br />

00<br />

21<br />

00<br />

00<br />

38<br />

FF<br />

38<br />

22<br />

CALL lC<br />

CALL 22<br />

XOR A<br />

LD (42A<br />

LD (38D<br />

CALL 00<br />

LD OE.<br />

CALL 00<br />

CALL 00<br />

XOR A<br />

LD (38D<br />

LD HL.<br />

LD (38E<br />

CALL 22<br />

6271 187F 11 OF 11 LD OE.<br />

Warmstart (Resetstart) Basic 6272<br />

6273<br />

6216 1848<br />

6217<br />

6218184A<br />

6219<br />

6220<br />

6221<br />

6222<br />

6223<br />

6224<br />

6225<br />

6226<br />

6227<br />

6228<br />

6229<br />

3E<br />

CD<br />

16<br />

D3 17<br />

LD A. 16<br />

CALL 1703<br />

Clr (Bildschirm löschen)<br />

IASCII-ZEICHEN IM ACCU<br />

lAUF DRUCKER AUSGEBEN<br />

6274<br />

6275<br />

6276<br />

6277<br />

6278<br />

6279<br />

1882<br />

1885<br />

1886<br />

3A<br />

B7<br />

28<br />

A3<br />

OE<br />

42 LD<br />

6280 1888 FE 02 CP 02<br />

Anfang Editorschleife 6281<br />

1840<br />

1851<br />

1854<br />

1855<br />

ED<br />

21<br />

E5<br />

ED<br />

7B<br />

FF<br />

73<br />

B9<br />

FF<br />

05<br />

6A<br />

38<br />

LD SP. (6AB9)<br />

LD HL. FFFF<br />

PUSH HL<br />

LD (38D5).SP<br />

STACKPOINTER SETZEN<br />

I CODE KEINE DATEN MEHR<br />

lAUF STACK (Sschleifen<br />

I und GOSUB vergessen)<br />

AUF STACK ABLEGEN<br />

STACKPOINTER MERKEN<br />

OR<br />

JR<br />

A. (4<br />

A<br />

Z. O<br />

6282 188A 20 05 JR NZ.<br />

6283<br />

6284<br />

6285<br />

6286<br />

6287<br />

6288<br />

6289<br />

6290<br />

6291<br />

188C<br />

188F<br />

1891<br />

CD B9<br />

18 08<br />

CD 89<br />

19<br />

19<br />

CALL 1<br />

JR 08<br />

CALL 1


SEITE 110 <br />

BASIC 1Z-013B V1.0A <br />

6292 1894 18 03 JR 03 ~ 1899H <br />

6293 <br />

6294 1896 CD 4A 00 CALL 004A ZEILE VON TASTATUR HOLEN <br />

6295 <br />

6296 <br />

6297 1899 30 1F JR NC, IF ~ 18BAH NICHT geBREAKt <br />

6298 <br />

6299 189B FE 04 CF' 04<br />

6300 <br />

6301 189D 20 00 JR NZ, 00 ~ 189FH ????<br />

6302 <br />

6303 189F 3A DF 38 LD A, (38DF) AUTO - FLAG<br />

6304 <br />

6305 <br />

6306 18A2 B7 OR A ; GESETZT ?<br />

6307 18A3 3E 00 LD A, 00 CODE NICHT AUTO-MODUS<br />

6308 <br />

63 09 18A5 32 DF 38 LD (38DF),A AUTO - FLAG<br />

6310 <br />

63 11 <br />

63 12 18A8 20 B5 JR NZ, B5 ~ 185FH I IM AUTO-MODUS GEWESEN ~ <br />

63 13 IMIT BREAK NUR ABGESCHALTET <br />

6314 18AA 3A DE 38 LD A, (38DE)<br />

6315 <br />

6316 <br />

63 17 18AD B7 OR A <br />

63 18 18AE C2 6E lC JP NZ, lC6E RUN - BEFEHL <br />

6319 <br />

6320 <br />

6321 18Bl 3A DC 38 LD A, (38DC)<br />

6 3 22 <br />

63 23 <br />

6324 18B4 B7 OR A<br />

63 25 18B5 28 B8 JR Z, BB ~ 1872H <br />

6326 <br />

6327 18B7 18 A6 JR A6 ~ 185FH Ready <br />

63 28 <br />

Eingegebene ode~ gelesene Zeile bga~beiten<br />

6329 18B9 13 INC DE ZEIGER AUF TEXT<br />

6330 18BA lA LD A,


SEITE 112<br />

BASIC 1Z-013B V1.0A BASIC 1Z<br />

6400<br />

6401<br />

6402<br />

1900<br />

1901<br />

56<br />

7A<br />

B3<br />

LO<br />

LD<br />

OR<br />

O. (HL><br />

A.D<br />

E<br />

I<br />

I GLEICH<br />

NULL ?<br />

1936 7E<br />

LD A.<br />

1902<br />

1937 FE 80<br />

CP 80<br />

6403 1903 28 OD JR Z. 00 ~ 18E2H ; JA ~ PROGRAMM ZU ENDE 6456<br />

6404<br />

6457 1939 02 3F 1C JP NC<br />

6405 1905 EB EX DE.HL 6458<br />

6406 1906 19<br />

ADO HL.OE<br />

I ZEIGER AUF DARAUF FOLGEN­<br />

6459<br />

6407 1907 2B<br />

OEC HL<br />

10E ZEILE ERRECHNEN<br />

6460 193C FE 27<br />

CP 27<br />

6408 1908 22 EO 38 LD (38EO).HL<br />

ZEIGER AUF NÄCHSTE ZEILE<br />

6461<br />

6409<br />

6462 193E CA 24 33 JP Z.<br />

6410 6463<br />

6411 190B EB EX DE.HL 6464<br />

6412 190C 23 INC HL 6465 1941 FE 20 CP 20<br />

6413 1900 5E<br />

LO E. (HL><br />

IZEILENNUMMER DER tJEUEN 6466<br />

6414 190E 23<br />

INC HL<br />

I ZE I LE HOLEN<br />

6467 1943 20 03 JR NZ<br />

6415 190F 56<br />

LD D. (HL><br />

I<br />

6468<br />

6416 1910 23<br />

INC HL<br />

PROGRAM<strong>MZ</strong>EIGER<br />

6469 1945 23<br />

INC HL<br />

6417 1911 ED 53 E6 38 LO (38E6).DE<br />

I ZEILENNUMMER AKTUELLE<br />

6470 1946 18 E5 JR E5<br />

6418<br />

I ZEILE MERKEN<br />

647 1<br />

6419 6472 1948 FE 3A CP 3A<br />

6420<br />

6421<br />

6422<br />

1915 3A OD 38 LD A. (38DD) TRACE - FLAG<br />

6453<br />

6454<br />

6455<br />

6473<br />

6474<br />

6475<br />

194A 28 F9 JR Z.<br />

6423 6476 194C B7 OR A<br />

6424 1918 B7 OR A GESETZT ? 6477 1940 28 AC JR Z.<br />

6425<br />

6426 1919 C4 78 22 CALL NZ. 2278 JA ~ ZEILENNUMMER AUSGEBEN 6478<br />

6479 194F FE 41 CP 41<br />

6427 6480<br />

6428 191C 01 POP OE STACK CORRIGIEREN 6481 1951 DA FE 20 JP C.<br />

6429 1910 18 06 JR 06 ~ 1925H ZEILE ABARBEITEN 6482<br />

6430 6483<br />

6484 1954 FE 5B CP 5B<br />

6485<br />

I<br />

Syntax untersuchung auf Ende<br />

BASIC - Befehl abarbeiten.<br />

letzter Befehl und nächsten 6486<br />

6487<br />

6431 191F CD 66 1C CALL 1C66 I üBERPRüFEN. OB NÄCHSTES<br />

643 2<br />

6433<br />

6434<br />

6435<br />

IPROGRAMMBYTE<br />

I ZEICHEN IST<br />

1922 C2 FE 20 JP NZ. 20FE NEIN ~ SYNTAX FEHLER<br />

BEFEHLSENDE­<br />

6436 6490<br />

6491<br />

6437<br />

6438<br />

6439<br />

6488<br />

1956 02 FE 20 JP NC<br />

Befehl LET<br />

6489 1959 CD OB 58 CALL 5<br />

6492 195C C5 PUSH<br />

Nächsten BASIC - Befehl holen und ausführen 6493 1950 C5 PUSH B<br />

1925 ED 73 D5 38 LO (38D5).SP ISTACKPOINTER BEI<br />

I BEFEHL MERKEN<br />

ANFANG 6495<br />

6496<br />

6497<br />

6494 195E F5 PUSH A<br />

195F CO 14 54 CALL 5<br />

6440 6498 1962 FE F4 CP F<br />

6441 1929 11 1F 19 LD DE. 191F I ADRESSE FüR NÄCHSTEN<br />

I BEFEHL ABARBEITEN<br />

1964 C2 FE 20 JP NZ<br />

6442<br />

6443<br />

6444<br />

6445<br />

192C<br />

192D<br />

D5<br />

22 FO 38<br />

PUSH DE<br />

LD (38FO).HL<br />

• AUF STACK ABLEGEN<br />

IPROGRAM<strong>MZ</strong>EIGER BEI<br />

IANFANG BEFEHL FüR ON­<br />

6446<br />

6447 IERROR-GOTO MERKEN 6505<br />

6448<br />

CD 1E 00 CALL 001E 8ft BREAK GEDRüCKT ? 6506<br />

6449 1930 CD 1E 00 CALL 001E 6507 196B Cl POP BC<br />

6450 6508 196C 3A 65 6A LD A.<br />

6451 1933 CA 71 20 JP Z. 2071 PROGRAMM UNTERBRECHEN 6509<br />

6452<br />

651 0<br />

6 499<br />

6500<br />

6501<br />

6502<br />

6503<br />

6504<br />

1967<br />

1968<br />

23<br />

CD 8B 52<br />

INC HL<br />

CALL 5


SEITE 114<br />

BASIC 1Z-013B V1.0A BASIC 1Z<br />

6511 196F B8 CP B TYPEN VERGLEICHEN<br />

6512 1970 C2 FB 20 JP NZ. 20F8 I NICHT GLEICH + <br />

6513 10ATENFEHLER <br />

6514 <br />

6515 1973 E3 EX (SP) .HL PROGRAM<strong>MZ</strong>. ~ VARIABLENZ. ~ <br />

6516 1974 EB EX OE.HL <br />

6517 1975 FE 05 CP 05 REAL - WERT ? <br />

6518 <br />

6519 1977 28 08 JR Z. 08 ~ 1981H REAL-~ERT ZUWEISEN<br />

6520<br />

6521 1979 C5 PUSH BC VARIA8LENTYP MERKEN<br />

6522 197A CO 82 18 CALL lB82 ISTRING MIT OESCRIPTOR (HL)<br />

6524 ICRIPTOR (OE) ZUWEISEN<br />

6523 10ER VARIABLEN MIT OES­<br />

6525 1970 F1 POP AF VARIABLENTYP<br />

6526 197E E1 POP HL PROGRAM<strong>MZ</strong>EIGER<br />

6527. 197F C 1 POP BC ZEIGER AUF VARIABLE<br />

6528 1980 C9 RET<br />

Real-Wert (HL) der Variablen (OE) zuweisen<br />

6565 19A5 OB OEC 8C<br />

6566 19A6 08 OEC 8C<br />

6567 19A7 ED 80 LDIR<br />

6568<br />

6569 19A9 21 Cl 6A LD HL.<br />

6570<br />

6571<br />

6572 19AC 11 OF 11 LD DE.<br />

6573<br />

6574<br />

6575 19AF CD CD 49 CALL 4<br />

6576<br />

6577 <br />

6578 19B2 3E 2E LD A.<br />

6579 <br />

6580 19B4 CD 03 17 CALL 1<br />

6581 <br />

6582 <br />

6583 1987 87 OR A <br />

6584 1988 C9 RET<br />

6529 1981 4F LO C.A LÄNGE REAL-ZAHL<br />

6530 1982 06 O~ LO 8. 00 BC ENTHÄLT LÄNGE<br />

6531<br />

6532 1984 EO BO LOIR WERT ZUWEISEN<br />

6533<br />

6534 1986 E1 POP HL PROGRAM<strong>MZ</strong>EIGER HOLEN<br />

6535 1987 Cl POP BC ZEIGER AUF VARIABLE<br />

6536 1988 C9 RET<br />

Nächste Zeile aus geladenem Programm für MERGE bereitstellen<br />

6537 1989 2A Al 42 LO HL. (42Al) I ZEIGER AUF EINZU­<br />

6538 IFüGENOE ZEILEN<br />

6539<br />

6540 198C 5E LO E. (HL> I OFF SET AUF NÄCHSTE<br />

6541 1980 23 INC HL I ZEILE HOLEN<br />

6542 198E 56 LO D. (HL> I<br />

6543 198F 23 INC HL<br />

6544 1990 7A LO A.O IOFFSET GLEICH NULL?<br />

6545 1991 B3 OR E I<br />

6546 1992 28 2F JR Z. 2F + 19C3H ALLE ZEILEN EINGEFüGT .<br />

6547<br />

6548 1994 05 PUSH OE ZEILENLÄNGE MERKEN<br />

6549 1995 EB EX OE.HL<br />

6550 1996 19 AOD HL.OE I ZEIGER AUF NÄCHSTE<br />

6551 1997 2B OEC HL I ZEILE ERRECHNEN<br />

6552 1998 2B OEC HL I<br />

6553 1999 22 Al 42 LO (42A1>. HL I ZEIGER AUF NÄCHSTE<br />

6554 I EINZUFüGENDE ZEILE MERKEN<br />

6555<br />

6556 199C EB EX OE.HL<br />

6557 1990 11 Cl 6A LO OE. 6ACl I ZEIGER AUF ZWISCHEN­<br />

6558 lSPEICHER FüR ZEILE<br />

6559 I IM ZWISCHENCODE<br />

6560 19AO 3E OB LO A. OB CODE HEX-ZEILENNUMMER<br />

6561<br />

6562 19A2 12 LO


SEITE 116<br />

BASIC 1Z-0138 V1_0A BASIC 1Z<br />

6618<br />

6619<br />

6620<br />

6621<br />

190A<br />

190B<br />

190C<br />

1900<br />

23<br />

7E<br />

12<br />

13<br />

INC HL<br />

LO A. (HU<br />

LO


SEITE 118 <br />

BASIC 1Z-013B V1_0A <br />

BASIC 1Z<br />

6729 lA49 FE 80 CP 80 ZWISCHENCODE ?<br />

6730<br />

6731 lA4B 38 8F JR C. 8F ~ 19DCH NEIN ~ ZEICHEN üBERTRAGEN<br />

6732<br />

6733 lA4D 23 INC HL ZWISCHENCODE üBESPRINGEN<br />

<strong>MZ</strong>-80 K - Zwischencode umsetzen in Zwischencode für <strong>MZ</strong>-700<br />

6734 lA4E E5 PUSH HL ZEIGER AUF K-PROGRAMM MERK.<br />

6735 lA4F 21 91 lA LD HL. lA91 ZEIGER AUF UMSETZTABELLE<br />

6736<br />

6737<br />

6738 lA52 D6 80 SUB A. 80 IZWISCHENCODE IN ZÄHLER<br />

6739 I UMSETZEN<br />

6740 lA54 47 LD B.A ZÄHLER. WIEVIELTER TEXT<br />

6741 lA55 28 07 JR Z. 07 ~ lA5EH ZEIGER STEHT AUF TEXT<br />

6742<br />

6743 lA57 7E LD A. (HU EIN ZEICHEN AUS TABELLE<br />

6744 lA58 B7 OR A TEXTENDE ?<br />

6745 lA59 23 INC HL ZEIGER AUF TABELLE<br />

6746 lA5A 20 FB JR NZ. FB ~ lA57H TEXTENDE SUCHEN<br />

6747<br />

6748 lA5C 10 F9 DJNZ F9 ~ lA57H RICHTIGEN TEXT SUCHEN<br />

6749<br />

6750 lA5E 7E LD A. (HU ZEICHEN AUS TABELLE HOLEN<br />

6751 lA5F B7 OR A TEXTENDE 7<br />

6752 lA60 28 05 JR Z. 05 ~ lA67H TEXT üBERTRAGEN<br />

6753<br />

6754 lA62 12 LD


6824<br />

6825<br />

6826<br />

6827<br />

6828<br />

6829<br />

683 0<br />

6831<br />

6832<br />

6833<br />

6834<br />

6835<br />

6836<br />

6837<br />

683 8<br />

6839<br />

6840<br />

6841<br />

6842<br />

6843<br />

6844<br />

6845<br />

6846<br />

6847<br />

6848<br />

6849<br />

6850<br />

6851<br />

6852<br />

6853<br />

6854<br />

6855<br />

6856<br />

6857<br />

6858<br />

6859<br />

6860<br />

6861<br />

6862<br />

6863<br />

6864<br />

6865<br />

6866<br />

6867<br />

SEITE 120<br />

lAA8<br />

00<br />

lAA9<br />

lAAA<br />

84<br />

00<br />

lAAB<br />

lAAC<br />

8E<br />

00<br />

lAAD<br />

lAAE<br />

99<br />

00<br />

lAAF<br />

lABO<br />

98<br />

00<br />

lABl<br />

lAB2<br />

9D<br />

00<br />

lAB3<br />

lAB4<br />

B4<br />

00<br />

lAB5<br />

lAB6<br />

B5<br />

00<br />

lAB7<br />

lAB8<br />

lAB9<br />

FE<br />

A5<br />

00<br />

lABA<br />

lABB<br />

AO<br />

00<br />

lABC<br />

lABD<br />

96<br />

00<br />

lABE<br />

lABF<br />

lACO<br />

lACl<br />

C7<br />

FF<br />

C7<br />

00<br />

lAC2<br />

lAC3<br />

91<br />

00<br />

IAC4<br />

lAC5<br />

85<br />

00<br />

lAC6<br />

lAC7<br />

IAC8<br />

FE<br />

A6<br />

00<br />

lAC9<br />

lACA<br />

lACB<br />

FE<br />

A2<br />

00<br />

lACC<br />

lACD<br />

lACE<br />

FE<br />

A3<br />

00<br />

IACF<br />

lADO<br />

IADI<br />

C3<br />

28<br />

00<br />

lAD2<br />

lAD3<br />

CE<br />

00<br />

BASIC 1Z-013B V1_0A BASIC 1Z<br />

Te::tende<br />

INPUT<br />

6891<br />

6892<br />

6893<br />

6894<br />

6895<br />

lAEB<br />

IAEC<br />

lAED<br />

lAEE<br />

IAEF<br />

FE<br />

A4<br />

00<br />

00<br />

00<br />

Zwischencode<br />

Textende<br />

Vorbyte Tabelle zwei<br />

Zwischencode CLR<br />

Te:


BASIC 1Z-013B V1_ OA BASIC 1Z<br />

SEITE 122 11 <br />

6910 lAFE Fl Zwischencode 6957 1B20 Al<br />

6913 1801 00 Textende 6958 182E 28<br />

6959 182F 00<br />

6914 1802 F3 Zwischencode >=<br />

6915 1803 00 Textende 6960 1830 FF<br />

6961 1831 AB<br />

6916 1804 F4 Zwischencode 6962 1832 28<br />

6917 IB05 00 Te>:tende 6963 IB33 00<br />

6918 1806 F5 Zwischencode > 6964 1834 FF<br />

6919 1807 00 Textende 6965 1835 AO<br />

6966 1836 28<br />

6920 1808 F6 Zwischencode < 6967 1837 00<br />

6921 1809 00 Textende<br />

6968 1838 FF<br />

6922 180A EC Zwischencode AND 6969 1839 89<br />

6923 1808 00 Textende 6970 1B3A 28<br />

6971 1838 00<br />

6924 180C E8 Zwischencode OR<br />

6925 1800 00 Textende 6972 IB3C E6<br />

6973 1830 28<br />

6926 180E ED Zwischli!ncode NOT 6974 183E 00<br />

6927 180F 00 Te:


SEITE 124<br />

BASIC 1 Z-(~13B V1.0A<br />

BASIC 1 Z-<br />

Zeichenkette mit Descripto<br />

7002 IB5A FF Vorbyte Tabelle drei<br />

mit Descriptor <br />

7010 IB62 FF 7050 188A .47 LO 8.A<br />

7011 1863 80 Zwischencode INT<br />

7051 IB88 4F LD C.A<br />

7012 IB64 28 7052 188C 23 INC HL<br />

Textende<br />

7013 1865 00 7053 lEe80 lA LD A. <<br />

7054 lEe8E 77 LD (HL<br />

Vorbyte Tabelle drei<br />

7014 1866 FF 7055 1B8F 13 INC OE<br />

7015 IB67 8C Zwischencode LOG<br />

7056 1B90 10 FA DJNZ FA<br />

7016 IB68 28 7057<br />

Textende<br />

7017 1869 00 7058 IB92 El POP HL<br />

7059 1893 7E LD A. (H<br />

Vorbyte Tabelle drei<br />

7018 186A FF 7060 1894 B9 CF' C<br />

7019 1868 85 Zwischencode LN<br />

7061 1895 28 45 JR Z.<br />

7020 lE6C 28 7062<br />

7021 1860 00 Textende<br />

7063 IB97 E5 PUSH H<br />

7064 IB98 87 OR A<br />

7022 186E FF Vorbyte Tabelle drei<br />

7065 IB99 C4 EC 18 CALL N<br />

7023 IB6F 81 ; Zwischencode A8S<br />

7066<br />

7024 1870 28 7067<br />

7025 IB71 00 Textende<br />

7026 1872 FF Vorbyte Tabelle drei<br />

7070<br />

7027 1873 8B Zwischencode SGN<br />

7068 IB9C EI POP HL<br />

7069 IB9D 3A OF 11 LD A. (<br />

7028 1874 28 7072 18AO B7 OR A<br />

Textende<br />

7029 1875 00 7073 IBAI 28 36 JR Z.<br />

7074<br />

Vorbyte Tabelle drei<br />

7030 IB76 FF 7075 1BA3 E5 PUSH H<br />

7031 1877 87 Zwischencode SOR<br />

7076 18A4 ED 4B B3 6A LD BC.<br />

7032 1878 28 7077 <br />

7033 1879 00 Te>:tende<br />

7078 <br />

7079 <br />

7034 IB7A 00 7080 IBA8 ED 42 SBC HL<br />

7081<br />

7035 1878 00 7082 IBAA EB EX DE.H<br />

7083 18A8 2A B7 6A LD HL.<br />

I<br />

7084<br />

7036 IB7C FF Vorbyte Tabelle drei<br />

7085<br />

7037 187D 8E Zwischencode PAI<br />

7086 IBAE 2B DEC HL<br />

7038 IB7E 28 7087 IBAF 2B DEC HL<br />

7039 187F 3 1 7088 1880 73 LO (HL<br />

7040 1880 29 7089 IB81 23 INC HL<br />

Textende<br />

7041 1881 eo c, ' 7090 1882 72 LD (HL><br />

7091 IB83 23 INC HL<br />

7092 1884 EO 48 85 6A LO BC.<br />

7093<br />

7094<br />

7095<br />

7096 18B8 B7 OR A<br />

7097 1889 Dl POP DE<br />

7098 18BA E5 PUSH H<br />

7099 IBBB ED 42 SBC HL<br />

7100<br />

7071


SEITE 126<br />

BASIC 1Z-013B V1.0A<br />

BASIC 1Z<br />

7101 lBBD<br />

7102 IBBE<br />

7103 lBBF<br />

7104 IBCO<br />

7105 IBCl<br />

7106 IBC2<br />

7107 lBC3<br />

7108 IBC4<br />

7109 lBC5<br />

7110<br />

7111<br />

7112 lBC8<br />

7113 IBC9<br />

7114<br />

7115<br />

7116 lBCC<br />

7117<br />

7118 lBCE<br />

7119 1BCF<br />

7120<br />

7121 lBDl<br />

7122 IBD2<br />

7123<br />

7124<br />

7125 IBD5<br />

7126<br />

7127<br />

7128 IBD8<br />

7129<br />

7130<br />

7131<br />

7132<br />

7133<br />

7134<br />

7135<br />

7136<br />

7137<br />

7138<br />

7139<br />

7140<br />

7141<br />

7142<br />

7143<br />

7144<br />

7145<br />

7146<br />

7147<br />

7148<br />

7149<br />

7150<br />

7151<br />

7152<br />

IBD9<br />

lBDB<br />

EB<br />

77<br />

47<br />

23<br />

73<br />

23<br />

72<br />

EI<br />

11 OF<br />

13<br />

CD 00<br />

36 00<br />

23<br />

36 00<br />

23<br />

22 03<br />

22 B7<br />

C9<br />

36<br />

C9<br />

11<br />

58<br />

38<br />

6A<br />

EX DE.HL<br />

LD (HU.A<br />

LD B.A<br />

INC HL<br />

LD (HU.E<br />

INC HL<br />

LD (HU.D<br />

POP HL<br />

LD OE. 110F<br />

INC OE<br />

CALL 5800<br />

LD (HU. 00<br />

INC HL<br />

LD (HU. 00<br />

INC HL<br />

LD (38D3).HL<br />

LD (6AB7),HL<br />

RET<br />

00 LD (HU,<br />

RET<br />

;<br />

STRINGLÄNGE EINTRAGEN<br />

LÄNGE STRING<br />

IOFFSET AUF STRINGTEXT<br />

I IN DESCRIPTOR EINTRAGEN<br />

ZEIGER FüR STRINGTEXT<br />

ZEIGER AUF STRING<br />

LÄNGE üBERSPRINGEN<br />

ITEXT VON (OE) NACH<br />

I (HL) üBERTRAGEN<br />

00 I LÄNGE NULL<br />

IDESCRIPTOR<br />

Stringtext in Stringtextbereich eintragen<br />

IBDC<br />

IBDD<br />

IBDE<br />

180F<br />

IBEO<br />

18E3<br />

18E4<br />

IBE7<br />

IBE8<br />

lBE9<br />

23<br />

5E<br />

23<br />

56<br />

2A<br />

19<br />

11<br />

41<br />

13<br />

C3<br />

85<br />

OF<br />

00<br />

6A<br />

11<br />

58<br />

INC HL<br />

LD E. (HU<br />

INC HL<br />

LD 0, (HU<br />

LD HL, (6AB5)<br />

ADD HL.DE<br />

LD OE, 110F<br />

LD B,C<br />

INC OE<br />

JP 5800<br />

;<br />

lENDE STRINGTEXTBEREICH<br />

I EINTRAGEN<br />

ANFANG STRINGARBEITSBEREICH<br />

ENDE STRINGTEXTBEREICH<br />

IN VARIABLEN­<br />

EINTRAGEN<br />

IOFFSET AUF STRING AUS<br />

I VARIABLENDESCRIPTOR<br />

I HOLEN<br />

ANFANG STRINGTEXTBEREICH<br />

ZEIGER AUF STRING ERRECHNEN<br />

I ZEIGER AUF ZWISCHEN­<br />

I SPEICHER MIT NEUEM<br />

ISTRINGTEXT<br />

TEXTLÄNGE '<br />

TEXTLÄNGE üBERSPRINGEN<br />

ISTRING VON (OE) NACH<br />

I (HL) üBERTRAGEN<br />

7153<br />

7154<br />

7155<br />

7156<br />

7157<br />

7158<br />

7159<br />

7160<br />

7161<br />

7162<br />

7163<br />

7164<br />

7165<br />

7166<br />

7167<br />

7168<br />

7169<br />

7170<br />

7171<br />

7172<br />

7173<br />

7174<br />

7175<br />

7176<br />

7177<br />

7178<br />

7179<br />

7180<br />

7181<br />

IBFl<br />

IBF2<br />

lBF3<br />

IBF4<br />

IBF5<br />

lBF8<br />

lBF9<br />

IBFA<br />

lBFB<br />

lBFC<br />

IBFD<br />

lBFE<br />

lBFF<br />

lCOO<br />

lCOl<br />

lC04<br />

lC05<br />

lC07<br />

lC08<br />

lC09<br />

lCOA<br />

lC08<br />

lCOC<br />

23<br />

5E<br />

23<br />

56<br />

2A<br />

19<br />

2B<br />

2B<br />

50<br />

54<br />

09<br />

C5<br />

05<br />

EB<br />

2A<br />

B7<br />

ED<br />

40<br />

44<br />

EB<br />

01<br />

05<br />

28<br />

B5<br />

B7<br />

52<br />

02<br />

6A<br />

6A<br />

INC HL<br />

LD E. (H<br />

INC HL<br />

LD D. (H<br />

LD HL.<br />

ADD HL<br />

DEC HL<br />

DEC HL<br />

LD E.L<br />

LD D,H<br />

ADD HL<br />

PUSH BC<br />

PUSH OE<br />

EX DE.H<br />

LD HL.<br />

OR A<br />

SBC HL.<br />

LD C.L<br />

LD B.H<br />

EX DE.H<br />

POP OE<br />

PUSH OE<br />

JR Z. 0<br />

7182 lCOE ED BO LDIR<br />

7183<br />

7184<br />

lCl0<br />

lCll<br />

lC12<br />

01<br />

Cl<br />

2A 87 6A<br />

POP OE<br />

POP BC<br />

LD HL.<br />

7185<br />

7186<br />

7187<br />

7188<br />

7189 lC15 B7 OR A<br />

7190 lC16 ED 42<br />

SBC HL.<br />

7206<br />

7207 1C27 23 INC HL<br />

String mit Variablendescriptor (HL) löschen 7208 1C28 5E<br />

LD E. (H<br />

7209 lC29 23<br />

INC HL<br />

lBEC 4E<br />

LD C. (HU<br />

STRINGLÄNGE HOLEN<br />

7210 lC2A 56<br />

LD D. (H<br />

lBED 06 00<br />

LD B. 00<br />

BC ENTHÄLT LÄNGE<br />

lC28 87<br />

OR A<br />

lC2C EB<br />

EX DE.H<br />

1C2D ED 42<br />

SBC HL.<br />

IBEF<br />

lBFO<br />

03<br />

03<br />

INC BC<br />

INC BC<br />

I FüR OFFSET AUF VARIABLEN­<br />

IDESCRIPTOR CORRIGIEREN<br />

7191<br />

7192<br />

7193<br />

7194<br />

7195<br />

7196<br />

7197<br />

7198<br />

7199<br />

7200<br />

7201<br />

7202<br />

7203<br />

7204<br />

7205<br />

7211<br />

7212<br />

7213<br />

7214<br />

lC18<br />

lC18<br />

lC1C<br />

lClD<br />

lClE<br />

lClF<br />

1C20<br />

lC21<br />

1C22<br />

1C25<br />

lC26<br />

22<br />

EB<br />

5E<br />

23<br />

56<br />

7A<br />

B3<br />

C8<br />

2A<br />

19<br />

7E<br />

B7<br />

B3<br />

6A<br />

6A<br />

LD (6AB<br />

EX OE.H<br />

LD E. (H<br />

INC HL<br />

LD O. (H<br />

LD A.O<br />

OR E<br />

RET Z<br />

LD HL.<br />

ADD HL.<br />

LD A. (H<br />

I<br />

I<br />

I


SEITE 128<br />

BASIC 1Z-013B V1_0A BASIC 1Z<br />

7215 lC2F EB EX DE.HL testen. ob nächstes Progra<br />

7216 lC30 72 LD (HL>. D ICORRIGIERTEN OFF SET<br />

7217 1C31 2B DEC HL IWIEDER IN VARIABLEN­ 7270 lC66 CD 14 54 CALL<br />

7218 lC32 73 LD (HL>.E IDESRIPTOR EINTRAGEN 7271<br />

7219 lC33 C5 PUSH BC GELöSCHTE LÄNGE RETTEN 7272<br />

7220 lC34 4F LD C.A STRINGLÄNGE 7273 lC69 B7 OR A<br />

7221 lC35 06 00 LD B. 00 7274 lC6A C8 RET Z<br />

7222 7275 lC6B FE 3A CP 3A<br />

7223 1C37 2A B5 6A LD HL. (6AB5) ANFANG STRINGTEXTBEREICH 7276 <br />

7224<br />

7277 lC6D C9 RET <br />

7225 <br />

7226 1C3A 19 ADD HL.DE ZEIGER AUF ANFANG STRING <br />

7227 lC3B 09 ADD HL.BC ZEIGER AUF NÄCHSTEN STRING Befehl RUN <br />

7228 lC3C Cl POP BC GELöSCHTE LÄNGE HOLEN <br />

7229 1C3D 18 DD JR DD -+- 1CICH I UNTERSUCHEN. OB WEITERE 7278 lC6E C2 07 38 JP NZ<br />

7230 IDESRIPTOREN ZU CORRIGIEREN 7279<br />

7280 <br />

7281 lC71 ED 5B BF 6A LD OE<br />

Anfang Befehlsroutine entsprechend Zwischencode im Accu holen 7282 <br />

7283 <br />

7231 lC3F 23 INC HL ZWISCHENCODE üBERSPRINGEN 7284 <br />

7232 lC40 FE FF CP FF VORBYTE TABELLE DREI 7285 lC75 CD 85 1C CALL<br />

7233 7286<br />

7234 lC42 CA IB 24 JP Z. 241B BEFEHL AUS TABELLE DREI 7287 <br />

7235 7288 lC78 ED 7B 89 6A LD SP<br />

7236 7289<br />

7237 1C45 11 07 32 LD OE. 3207 I ZEIGER AUF TABELLE MIT 7290 <br />

7238 IANFANGSADRESSEN BEFEHLE 7291 <br />

7239 lAUS TABELLE ZWEI 7292 1C7C 21 FF FF LD HL<br />

7240 lC48 FE FE CP FE VORBYTE TABELLE ZWEI 7293 <br />

7241 7294 <br />

7242 1C4A 20 04 JR NZ, 04 + lC50H NICHT TABELLE ZWEI 7295 lC7F E5 PUSH<br />

7243 7296 1C80 E5 PUSH<br />

7244 lC4C 7E LD A. (HL> EIGENTLICHEN ZWISCHENCODE 7297 lCB1 EB EX DE<br />

7245 1C4D 23 INC HL PROGRAM<strong>MZ</strong>EIGER 7298 lCB2 C3 FE 18 JP 18<br />

7246 1C4E 18 08 JR 08 + 1C58H IANFANGSDRESSE AUS TABELL~ 7299 <br />

7247 I HOLEN UND ROUTINE AUFRUFEN 7300 <br />

7248 1C50 FE EO CP EO IGRöSSTER ZUGELASSENER<br />

7249 IBEFEHLSZWISCHENCODE<br />

7250 1C52 02 FE 20 JP Ne, 20FE I KEIN BEFEHL + Alle Flags auf Anfangsbed<br />

7251 I SYNTAX - FEHLER<br />

7252 7301 lC85 E5 PUSH<br />

7253 lC55 11 47 31 LD OE, 3147 I ZEIGER AUF TABELLE MIT 7302 lC86 D5 PUSH<br />

7254 IANFANGSADRESSEN DER 7303 lC87 CD 4E 22 CALL<br />

7255 IBEFEHLSROUTINEN 7304 <br />

7256 lC58 D6 80 SUB A, 80 I ZWISCHENCODE UMSETZEN IN 7305 <br />

7257 I ZÄHLER WIEVIELTE ADRESSE 7306 lC8A CD BE 25 CALL<br />

7258 lC5A E5 PUSH HL PROGRAM<strong>MZ</strong>EIGER MERKEN 7307<br />

7259 lC5B EB EX DE,HL ZEIGER TABELLE NACH HL 7308 <br />

7260 lC5C 5F LD E,A ZWISCHENCODEZÄHLER 7309 1C8D 21 00 00 LD HL<br />

7261 lC5D 16 00 LD D, 00 7310 <br />

7262 7311 <br />

7263 lC5F 19 ADD HL,DE I ZEIGER AUF TABELLENWERT 7312 lC90 22 EA 3B LD (3B<br />

7264 lC60 19 ADD HL,DE I ERRECHNEN 7313 <br />

7265 lC61 7E LD A, (HL> IADRESSE AUS TABELLE 7314 <br />

7266 lC62 23 INC HL I HOLEN 7315 lC93 2B DEC HL<br />

7267 fC63 66 LD H, (HL> I 7316 lC94 22 2A 27 LD (27<br />

7268 lC64 6F LD L,A I 7317 <br />

7269 lC65 E3 EX (SP) ,HL ; MIT PROGRAM<strong>MZ</strong>EIGER VERTAU. 7318 <br />

7319 lC97 AF XOR A<br />

7320 lC98 32 2E 27 LD (2<br />

7321


SEITE 130 <br />

7322 <br />

7323 lC9B 32 DE <br />

7324 <br />

7325 <br />

7326 lC9E 32 D9 <br />

7327 <br />

7328 <br />

7329 lCAl 32 D8 <br />

7330 <br />

7331 <br />

7332 lCA4 32 DF <br />

7333 <br />

7334 <br />

7335 lCA7 32 F2 <br />

7336 <br />

7337 <br />

7338 lCAA 32 00 <br />

7339 <br />

7340 <br />

7341 lCAD 32 01 <br />

7342 <br />

7343 <br />

7344 lCBO 32 42 <br />

7345 <br />

7346 <br />

7347 lCB3 21 OA <br />

7348 <br />

7349 <br />

7350 lCB6 22 E2 <br />

7351 <br />

7352 <br />

7353 lCB9 22 E4 <br />

7354 <br />

7355 <br />

7356 lCBC Dl <br />

7357 lCBD El <br />

7358 lCBE C9 <br />

Befehl FOR<br />

7359 lCBF Cl <br />

7360 1CCO EO 43 <br />

7361 <br />

7362 <br />

7363 <br />

7364 lCC4 CO 59 <br />

7365 <br />

7366 <br />

7367 lCC7 ED 43 <br />

7368 <br />

7369 <br />

7370 <br />

7371 lCCB 00 21 <br />

7372 <br />

7373 <br />

7374 <br />

7375 lCCF 00 39 <br />

7376 <br />

7377 lCD1 22 4D <br />

7378 <br />

7379 <br />

BASIC 1Z-013B<br />

38 LD (38DE>.A<br />

38 LD (38D9>.A<br />

38 LD (38D8>.A<br />

38 LD (38DF>.A<br />

38 LD (38F2>.A<br />

39 LD (3900>.A<br />

39 LD (3901>.A<br />

5B LD (5B42>.A<br />

00 LD HL. OOOA<br />

38 LD (38E2>.HL<br />

38 LD (38E4).HL<br />

POP DE<br />

POP HL<br />

RET<br />

POP BC<br />

60 1D LD (1060). BC<br />

19 CALL 1959 <br />

FB 38 LO (38FB>.BC <br />

00 00 LO IX. 0000<br />

ADO IX.SP<br />

1D LD (1040). HL<br />

V1_0A<br />

CONT - FLAG <br />

ON ERROR - FLAG <br />

AUTO - FLAG <br />

FEHLER - NUMMER <br />

• NULL - FLAG<br />

• (Zeitschleife nach PRINT> <br />

OPTION BASE - FLAG <br />

OPTION BASE <br />

10 <br />

LETZTE EDITORZEILENNUMMER<br />

OFFSET FüR AUTO<br />

• GERETTETE REGISTER HOLEN<br />

•<br />

• RüCKSPRUNGAORESSE HOLEN<br />

UND IN ROUTINE EINTRAGEN<br />

• SCHLEIFEN-VARIABLE <br />

'ANFANGSWERT ZUWEISEN <br />

• (LET - Routine)<br />

I ZEIGER AUF SCHLEIFEN­<br />

I VAR I ABLE MERKEN<br />

c ISTACKPOINTER NACH IX <br />

I HOLEN <br />

• •<br />

c PROGRAM<strong>MZ</strong>EIGER MERKEN<br />

7380 <br />

7381 <br />

7382 <br />

7383 <br />

7384 <br />

7385 <br />

7386 <br />

7387 <br />

7388 <br />

7389 <br />

7390 <br />

7391 <br />

7392 <br />

7393 <br />

7394 <br />

7395 <br />

73 96 <br />

73 97 <br />

7 398 <br />

7399 <br />

7400 <br />

7401 <br />

740 2 <br />

7403 <br />

7404 <br />

7405 <br />

7406 <br />

740 7 <br />

7408 <br />

7409 <br />

7410 <br />

7411 <br />

7412 <br />

741 3 <br />

7414 <br />

7415 <br />

7416 <br />

7417 <br />

7418 <br />

7419 <br />

7420 <br />

7421 <br />

7422 <br />

7423 <br />

7424 <br />

7425 <br />

7426 <br />

7427 <br />

7428 <br />

7429 <br />

7430 <br />

743 1 <br />

7432 <br />

7433 <br />

7434 <br />

7435 <br />

7436 <br />

7437 <br />

7438 <br />

7439 <br />

7440 <br />

7 441 <br />

lCD4<br />

1CD7<br />

1CDA<br />

1CDD<br />

1CDE<br />

1CEO<br />

1CE2<br />

lCE5<br />

lCE6<br />

lCE8<br />

lCEA<br />

1CED<br />

1CFO<br />

1CFl<br />

1CF2<br />

1CF4<br />

1CF6<br />

1CF9<br />

1CFB<br />

lCFD<br />

1DOO<br />

ID02<br />

1D04<br />

1D07<br />

IDOA<br />

IDOC<br />

IDOD<br />

1D10<br />

BASIC<br />

DD 5E 00<br />

DD 56 01<br />

21 FF FF<br />

B7 <br />

ED 52 <br />

28 22 <br />

21 12 FF <br />

B7 <br />

ED 52 <br />

20 1A <br />

DD 5E 06 <br />

DD 56 07<br />

ES<br />

87 <br />

ED 42 <br />

28 07<br />

11 12 00 <br />

DD 19 <br />

18 D7 <br />

11 12 00 <br />

DD 19 <br />

DD F9 <br />

2A 4D 1D <br />

CD 14 54 <br />

FE EO <br />

23 <br />

C2 FE 20 <br />

CD 8B 52 <br />

1Z-<br />

LD E. (I<br />

LD D. (I<br />

LD HL.<br />

OR A<br />

SBC HL.<br />

JR Z. 2<br />

LD HL.<br />

OR A<br />

SBC HL.<br />

JR NZ.<br />

LD E.(IX<br />

LD D.(IX<br />

EX DE.H<br />

OR A<br />

SBC HL.B<br />

JR Z. 0<br />

LD DE.<br />

ADD IX.D<br />

JR D7<br />

LD DE.<br />

ADD IX.D<br />

LD SP,IX<br />

LD HL. <<br />

CALL 54<br />

CP EO<br />

INC HL<br />

JP NZ.<br />

CALL 52<br />


SEITE<br />

7442<br />

7443 1013<br />

7444 1014<br />

7445 1015<br />

7446 1016<br />

7447<br />

7448<br />

7449 1019<br />

7450<br />

7451<br />

7452 101C<br />

7453<br />

7454 101E <br />

7455 101F <br />

7456 1020 <br />

7457 <br />

7458 1022 <br />

7459 <br />

7460 <br />

7461 1025 <br />

7462 <br />

7463 1027 <br />

7464 1028 <br />

7465 <br />

7466 <br />

7467 1028 <br />

7468 <br />

7469<br />

7470 102E<br />

7471 102F<br />

7472<br />

7473<br />

7474 1032<br />

7475 1033<br />

7476 1034<br />

7477<br />

7478<br />

7479 1037<br />

7480<br />

7481<br />

7482 103A<br />

7483<br />

7484 103C<br />

7485 1030<br />

7486<br />

7487<br />

7488 1040<br />

7489 1041<br />

7490 1042<br />

7491 1043<br />

7492<br />

7493<br />

7494 1046<br />

7495<br />

7496 1048<br />

7497<br />

7498<br />

7499 104B<br />

7500 104C<br />

7501<br />

7502<br />

7503 104F<br />

132<br />

BASIC 1Z-013B<br />

F5<br />

E5<br />

EB<br />

01 05 00<br />

PUSH AF<br />

PUSH HL<br />

EX OE.HL<br />

LO 8C. 0005<br />

11 20 27<br />

LO OE. 2720<br />

EO 80<br />

LOIR<br />

El<br />

F1<br />

FE EI<br />

POP HL <br />

POP AF <br />

CP El <br />

11 77 30<br />

LO OE. 3077<br />

20 04<br />

JR NZ. 04 ~ 1028H<br />

23<br />

CO 88 52<br />

INC HL <br />

CALL 5288 <br />

22 40 10<br />

LO (1040). HL<br />

09<br />

21 F8 FF<br />

EXX <br />

LO HL. FFFB <br />

39<br />

E8<br />

21 20 27<br />

ADO HL.SP <br />

EX OE.HL <br />

LO HL. 2720 <br />

01 05 00<br />

LO BC. 0005<br />

EO 80<br />

LOIR<br />

09<br />

21 F6 FF<br />

EXX <br />

LO HL. FFF6 <br />

39<br />

F9<br />

EB<br />

01 05 00<br />

ADO HL.SP <br />

LO SP.HL <br />

EX OE.HL <br />

LO BC. 0005 <br />

ED BO<br />

LOIR<br />

2A FB 38<br />

LD HL, (38FB)<br />

ES<br />

21 00 00<br />

PUSH HL <br />

LO HL. 0000 <br />

E5<br />

PUSH HL<br />

V1_0A<br />

I NACH OE <br />

NÄCHSTES PROGRAMMBYTE <br />

PROGRAM<strong>MZ</strong>EIGER MERKEN <br />

ZEIGER AUF WERT NACH HL <br />

LÄNGE REAL-WERT <br />

I ZEIGER AUF ZWISCHEN­<br />

I SPEICHER FüR STACK <br />

ENDE SCHLEIFE MERKEN<br />

PROGRAM<strong>MZ</strong>EIGER HOLEN<br />

~ NÄCHSTES PROGRAMMBYTE<br />

STEP (Zwischencode)<br />

I ZEIGER AUF PLUS EINS <br />

I IM REAL - FORMAT <br />

KEIN STEP ANGEGEBEN<br />

STEP üBERSPRINGEN<br />

I AUSDRUCK AUSWERTEN UND<br />

I ZEIGER AUF ERGEBNIS<br />

INACH HL<br />

PROGRAM<strong>MZ</strong>EIGER MERKEN<br />

OFFSET FüR SCHLEIFENENDE<br />

ZEIGER AUF STELLE FüR ENDE<br />

NACH OE<br />

I ZEIGER AUF ZWISCHEN­<br />

I SPEICHER MIT WERT<br />

ISCHLEIFENENOE<br />

LÄNGE REAL-ZAHL<br />

ISCHLEIFENENOE FüR NEXT<br />

lAUF STACK ABLEGEN<br />

OFFSET FüR SCHRITTWEITE<br />

ZEIGER FüR SCHRITTWEITE<br />

STACKPOINTER DAMIT SETZEN<br />

LÄNGE REAL-ZAHL<br />

l ISCHRITTWEITE FüR NEXT <br />

lAUF STACK ABLEGEN <br />

I ZEIGER AUF SCHLEIFEN­<br />

I VAR I A8LE HOLEN <br />

UND AUF STACK ABLEGEN<br />

I PROGRAM<strong>MZ</strong>E I GER<br />

I (wird eingetragen)<br />

AUF STACK ABLEGEN<br />

7504<br />

7505<br />

7506<br />

7507<br />

7508<br />

7509<br />

7510<br />

7511<br />

7512<br />

7513<br />

7514<br />

7515<br />

7516<br />

7517<br />

7518<br />

7519<br />

7520<br />

7521<br />

7522<br />

7523<br />

7524<br />

7525<br />

7526<br />

7527<br />

7528<br />

7529<br />

7530<br />

7531<br />

7532<br />

7533<br />

7534<br />

7535<br />

7536<br />

7537<br />

7538<br />

7539<br />

7540<br />

7541<br />

7542<br />

7543<br />

7544<br />

7545<br />

7546<br />

7547<br />

7548<br />

7549<br />

7550<br />

7551<br />

7552<br />

7553<br />

7554<br />

7555<br />

7556<br />

7557<br />

7558<br />

7559<br />

7560<br />

7561<br />

1050<br />

1053<br />

1054<br />

1057<br />

1058<br />

105B<br />

105C<br />

1060<br />

1061<br />

1062<br />

1064<br />

1066<br />

1069<br />

106C<br />

Befehl<br />

106F<br />

1071<br />

1074<br />

1075<br />

1079<br />

107A<br />

107B<br />

107E<br />

1082<br />

1084<br />

1088<br />

BASIC<br />

2A EO 38<br />

E5<br />

21 12 FF<br />

E5<br />

21 00 00<br />

39<br />

EO 5B 03 38<br />

25<br />

25<br />

EO 52<br />

3E OB<br />

OA BB 20<br />

2A 40 10<br />

C3 00 00<br />

NEXT<br />

3E 05<br />

32 65 6A<br />

Cl<br />

EO 43 E2 10<br />

F5<br />

Cl<br />

22 40 10<br />

00 21 00 00<br />

00 39<br />

00 22 01 10<br />

00 5E 00<br />

1Z-<br />

LO HL. (<br />

PUSH HL<br />

LO HL.<br />

PUSH HL<br />

LO HL.<br />

AOO HL.S<br />

LO DE, (<br />

OEC H <br />

OEC H <br />

SBC HL.O<br />

LD A, 0<br />

JP C. 2<br />

LO HL. (<br />

JP 0000<br />

LO A, 0<br />

LD (6A6<br />

POP BC<br />

LD (lDE<br />

PUSH AF<br />

POP BC<br />

LO (104<br />

LO IX.<br />

AOO IX,S<br />

LO (100<br />

LO E. (IX


SEITE<br />

7562<br />

7563 108B<br />

7564<br />

7565<br />

7566 108E<br />

7567<br />

7568<br />

7569 1091<br />

7570 1092<br />

7571<br />

7572 ID94<br />

7573<br />

7574<br />

7575 ID97<br />

7576 ID98<br />

7577 1099<br />

7578<br />

7579<br />

7580 109C<br />

7581<br />

7582<br />

7583 109F<br />

7584<br />

7585<br />

7586 IDA2<br />

7587 10A3<br />

7588<br />

7589<br />

7590 10A6<br />

7591<br />

7592<br />

7593 10A9<br />

7594<br />

7595<br />

7596 10AC<br />

7597 lOAD<br />

7598<br />

7599<br />

7600 IDBO<br />

7601<br />

7602 IDB2<br />

7603<br />

7604 10B4<br />

7605 10B5<br />

7606<br />

7607<br />

7608 IDB8<br />

7609 IDB9<br />

7610 IDBA<br />

7611<br />

7612<br />

7613<br />

7614 lOBE<br />

7615<br />

7616<br />

7617 10Cl<br />

7618<br />

7619 10C3<br />

7620<br />

7621 10C5<br />

7622 10C6<br />

7623<br />

134<br />

00 56<br />

21 12<br />

B7<br />

EO 52<br />

C2 C8<br />

C5<br />

Fl<br />

C2 FA<br />

OD 5E<br />

OD 56<br />

EB<br />

22 DF<br />

00 5E<br />

00 56<br />

EB<br />

01 08<br />

00 09<br />

DO E5<br />

01<br />

CD AF<br />

13<br />

lA<br />

OD 2A<br />

11 00<br />

00 19<br />

00 E5<br />

01<br />

CB 7F<br />

BASIC 1Z-013B<br />

01 LO 0, (I X+01><br />

FF LO HL, FF12<br />

OR A<br />

SBC HL,OE<br />

20 JP NZ, 20C8<br />

PUSH BC<br />

POP AF<br />

ID JP NZ, 10FA<br />

04 LD E, (IX+04)<br />

05 LD D, (IX+05)<br />

EX OE,HL<br />

10 LO (10DF), HL<br />

06 LO E, (I X+06)<br />

07 LD 0, (IX+07)<br />

EX DE,HL<br />

00 LD BC, 0008<br />

AOD IX,BC<br />

PUSH IX<br />

POP OE ;<br />

50 CALL 50AF<br />

INC OE<br />

LD A. <br />

00 LD OE. 0000<br />

AOO IX,OE<br />

PUSH IX<br />

POP DE<br />

BIT 7, A ;<br />

V1_0A<br />

COOE FOR - OATEN<br />

CARRY-FLAG ZURüCKSETZEN<br />

GLEICH STEUERWORT ?<br />

INEIN ~ FEHLER 13<br />

I NEXT ohne FOR<br />

IBEFEHLSENOEFLAG<br />

AUF NAMEN UNTERSUCHEN<br />

IPROGRAM<strong>MZ</strong>EIGER AUF<br />

I ANFANG SCHLEIFE AUS<br />

IDATENSATZ HOLEN<br />

NACH HL<br />

UNO IN ROUTINE EINTRAGEN<br />

I ZEIGER AUF LAUFVARIA8LE<br />

I DER SCHLEIFE HOLEN<br />

NACH HL<br />

OFFSET ZUR SCHRITTWEITE<br />

ZEIGER AUF SCHRITTWEITE<br />

I ZEIGER AUF SCHRITT­<br />

I WEITE NACH OE<br />

ZEIGER AUF MSB MANTISSE<br />

MSB MANTISSE STEP<br />

I ZEIGER AUF ANFANG FOR­<br />

IDATENSATZ HOLEN<br />

OFFSET ZUM SCHLEIFENENOE<br />

ZEIGER AUF SCHLEIFENENOE<br />

I NACH OE<br />

I<br />

VORZEICHEN SCHRITTWEITE<br />

BASIC<br />

7624 IDC8 ­<br />

20 01<br />

7625<br />

7626 10CA EB<br />

7627 IDCB CD 4A 5E<br />

7628<br />

7629<br />

7630 IDCE 38 14<br />

7631<br />

7632 10DO -31 00 00<br />

7633<br />

7634<br />

7635 1003 21 02 00<br />

7636<br />

7637<br />

7638 10D6 39 7639 10D7 7E<br />

7640 10D8 23<br />

7641 IDD9 66<br />

7642 10DA 6F<br />

7643 1008 22 EO 38<br />

7644<br />

7645<br />

7646 lODE 21 00 00<br />

7647<br />

7648<br />

7649 IDEl C3 00 00<br />

7650<br />

7651<br />

Schleife beenden<br />

7652 IDE4 11 12 00<br />

7653<br />

7654<br />

7655 10E7 2A 01 ID<br />

7656<br />

7657<br />

7658 IDEA 19<br />

7659 10EB F9<br />

7660 10EC 2A 40 10<br />

7661<br />

7662<br />

7663 IDEF CO 14 54<br />

7664<br />

7665<br />

7666 10F2 FE 2C<br />

7667<br />

7668 IDF4 20 EB<br />

7669<br />

7670 IDF6 23<br />

7671 10F7 22 40 10<br />

7672<br />

7673<br />

7674 IDFA DD 21 00 00<br />

7675<br />

7676<br />

7677<br />

7678 1DFE DD 39<br />

7679<br />

7680 lEOO DD 22 D1 10<br />

7681<br />

1Z-<br />

JR NZ,<br />

EX OE,H<br />

CALL 5E<br />

JR C, 1<br />

LD SP,<br />

LD HL,<br />

ADD HL,<br />

LO A. (H<br />

INC HL<br />

LD H, (H<br />

LO L.A<br />

LD (38E<br />

LD HL,<br />

JP 0000<br />

LD OE,<br />

LD HL. (<br />

ADO HL,<br />

LO SP,H<br />

LD HL, (<br />

CALL 54<br />

CP 2C<br />

JR NZ,<br />

INC HL<br />

LO (104<br />

LO IX,<br />

AOO IX.<br />

LO (ID0<br />

I<br />

I<br />

I<br />

I<br />

I<br />

I


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


SEITE 138<br />

BASIC 1Z-013B<br />

Befehl PRINT<br />

7786 lE6A AF XOR A<br />

7787 lE6B 32 19 18 LD (1819) ,A<br />

7788<br />

7789<br />

7790 lE6E 3A 50 00 LD A, ,A<br />

7822 lE8E 18 52 JR 52 -+ lEE2H<br />

7823<br />

Bei PRINT auf Bildschirm auf angegebene<br />

Hintergrundfarbe untersuchen<br />

7824 1E90 FE 5B CP SB<br />

7825<br />

7826 lE92 C2 E2 1E JP NZ, lEE2<br />

7827<br />

7828<br />

7829 1E95 23 INC HL<br />

7830 lE96 CD 14 54 CALL 5414<br />

7831<br />

7832<br />

7833 lE99 FE 2C CP 2C<br />

7834<br />

7835 lE9B 23 INC HL<br />

7836 1E9C 28 20 JR Z, 20 -+ lEBEH<br />

7837<br />

7838 1E9E 2B DEC HL<br />

7839 lE9F CD 50 4D CALL 4D50<br />

7840<br />

V1.0A<br />

ACCU AUF NULL <br />

AUSGABEFLAG <br />

ZEICHEN/HINTERGRUNDFARBE <br />

I ZEICHENSATZ VERGESSEN <br />

I (Bi t 7 enthäl t Zei chens. ) <br />

I AKTUELLE ZEICHEN/HINTER­<br />

I GRUNDFARBE FüR PRINT <br />

IPROGRAM<strong>MZ</strong>EIGER AUF <br />

I NÄCHSTES RELEVANTES <br />

tZEICHEN SETZEN <br />

I (Zwi schencode) <br />

NICHT PRINT I<br />

PROGRAM<strong>MZ</strong>EIGER <br />

IPROGRAM<strong>MZ</strong>EIGER AUF <br />

I NÄCHSTES RELEVANTES <br />

I ZEICHEN SETZEN <br />

P (PRINTER) <br />

PROGRAM<strong>MZ</strong>EIGER <br />

DRUCKER <br />

T


SEITE 140 <br />

BASIC 1Z-013B <br />

7903 <br />

7904 <br />

7905 lEEl 23 INC HL<br />

7906 lEE2 CD 66 1C CALL 1C66<br />

7907 <br />

7908 <br />

7909 lEE5 CA EC IF JP Z, 1FEC<br />

7910 <br />

7911 <br />

7912 lEE8 7E LD A, (HU<br />

7913 1EE9 FE 3B CP 3B<br />

7914 <br />

7915 lEEB CA C7 IF JP Z. IFC7 <br />

7916 <br />

7917 <br />

7918 lEEE FE 2C CP 2C <br />

7919 <br />

7920 1EFO CA C7 IF JP Z, 1FC7 <br />

7921 <br />

7922 <br />

7923 lEF3 FE E6 CP E6 <br />

7924 <br />

7925 lEF5 28 79 JR Z. 79 ... 1F70H <br />

7926 <br />

7927 1EF7 FE E3 CP E3 <br />

7928 <br />

7929 lEF9 CA 30 27 JP Z, 273 0 <br />

7930 <br />

7931 <br />

7932 1EFC C5 PUSH BC <br />

7933 1EFD CD 8B 52 CALL 5288 <br />

7934 <br />

7935 <br />

7936 1FOO Cl POP BC <br />

7937 1F01 3A 65 6A LD A, (6A65)<br />

7938 <br />

793 9 <br />

7940 IF04 B7 OR A<br />

7941 1F05 CA EC 1F JP Z, 1FEC<br />

7942 <br />

7943 <br />

7944 1F08 FE 03 CP 03 <br />

7945 <br />

7946 IFOA CA 33 20 JP Z. 2033 <br />

7947 <br />

7948 <br />

7949 IFOD E5 PUSH HL <br />

7950 1FOE EB EX DE,HL <br />

7951 IFOF CD 69 3C CALL 3C69 <br />

7952 <br />

7953 <br />

7954 IF12 E1 POP HL<br />

7955 1F13 lA LD A. <br />

RRA <br />

LD (HL><br />

EX AF.A<br />

CALL 17D<br />

POP AF <br />

RLCA <br />

RLC (HU<br />

RRA <br />

LD (HL>.<br />

POP HL <br />

RET <br />

8004 1F44 08 <br />

8005 1F45 C3 6F 46 <br />

8006 <br />

8007 <br />

EX AF,AF<br />

JP 466F


SEITE 142 <br />

BASIC 1Z-013B V1.0A <br />

Zeichen im Accu auf Drucker ausgeben <br />

Wenn Steuerzeichen ~ in richtges Zeichen für Plotter umsetzen <br />

8008 1F48 08 EX AF.AF' ASCII-ZEICHEN HOLEN <br />

8009 IF49 FE 11 CP 11 Cursor runter ? <br />

8010 <br />

8011 IF4B OE 09 LD C. 09 I CODE SCHRIFTBREITE <br />

8012 I VERKLE I NERN <br />

8013 IF4D 28 ID JR Z. ID ~ IF6CH ZEICHEN AN DRUCKER AUSGEBEN <br />

8014 <br />

8015 IF4F FE 12 CP 12 Cursor hoch <br />

8016 <br />

8017 IF51 OE OB LD C, OB I CODE SCHRIFTBREITE <br />

8018 I VERGRöSSERN <br />

8019 IF53 28 17 JR Z, 17 + IF6CH ZEICHEN AN DRUCKER AUSGEBEN <br />

8020 <br />

8021 IF55 FE 15 CP 15 Home ? <br />

8022 <br />

8023 IF57 OE OF LD C. OF CODE SEITENVORSCHUB<br />

8024 <br />

8025 IF59 28 11 JR Z, 11 ~ IF6CH ZEICHEN AN DRUCKER AUSGEBEN <br />

8026 <br />

8027 IF5B FE 16 CP 16 Clear ? <br />

8028 <br />

8029 IF5D C2 78 16 JP NZ, 1678 I NICHT Clear ~ <br />

8030 I ZEICHEN IM ACCU AUSGEBEN <br />

8031 <br />

8032 1F60 3E OC LD A. OC I CODE BREITSCHRIFT <br />

8033 I AUFHEBEN <br />

8034 IF62 CD 78 16 CALL 1678 IASCII IM ACCU AUF DRUCKER <br />

8035 I AUSGEBEN <br />

8036 <br />

8037 IF65 3E OA LD A, OA ; CODE ZEILENVORSCHUB <br />

8038 · <br />

8039 IF67 CD 78 16 CALL 1678 IASCII IM ACCU AUF DRUCKER <br />

8040 I AUSGEBEN <br />

8041 <br />

8042 1F6A OE 03 LD C, 03 CODE ZEILENRüCKSCHUB <br />

8043 <br />

8044 IF6C 79 LD A,C UMGESETZTES ZEICHEN HOLEN <br />

8045 IF6D C3 78 16 JP 1678 , I ZEICHEN IM ACCU AUF <br />

8046 I DRUCKER AUSGEBEN <br />

8047 <br />

Befehl PRINT TAB<br />

8048 IF70 3E 20 LD A, 20 ; Spac6! <br />

8049 <br />

80501F72 32 B8 1F LD (lFB8),A ; I ALS AUSZUGEBENDES <br />

8051 I ZEICHEN MERKEN <br />

8052 <br />

8053 1F75 3E 28 LD A, 28 140 (MAXIMALE SPALTEN­<br />

8054 I NR. AUF VIDEO) <br />

8055 1F77 32 A5 IF LD (lFA5).A • IN ROUTINE EINTRAGEN <br />

8~6<br />

8057 <br />

8058 IF7A 3A 19 18 LD A. (1819) AUSGABE - FLAG <br />

8059 <br />

8060 <br />

8061 1F7D B7 OR A ; AUSGABE AUF BILDSCHIRM ? <br />

8062 IF7E 28 18 JR Z, 18 ~ 1F98H JA + PRINT TAB AUF VIDEO <br />

BASXC 1Z<br />

8063 j<br />

8064 IF80 FE 54 CP 54<br />

8065 <br />

8066 IF82 28 OA JR Z. O<br />

8067 <br />

8068 IF84 3E AO LD A. A<br />

8069<br />

8070 IF86 32 A5 IF LD (lFA<br />

8071<br />

8072 <br />

8073 1F89 3A BE 16 LD A. (1<br />

8074 <br />

8075 <br />

8076 IF8C 18 12 JR 12<br />

8077<br />

8078 1F8E 3E FF LD A. F<br />

8079<br />

8080 IF90 32 A5 IF LD (lFA<br />

8081 <br />

8082 <br />

8083 IF93 CD 4E 46 CALL 46<br />

8084<br />

8085 <br />

8086 IF96 18 08 JR 08<br />

8087<br />

8088 IF98 3 E 13 LD A. 1<br />

8089 <br />

8090 IF9A 32 B8 IF LD (lFB<br />

8091<br />

8092 <br />

8093 IF9D 3A 54 00 LD A. (0<br />

8094 <br />

8095 <br />

8096 IFAO F5 PUSH AF<br />

8097 IFAl CD 4E 20 CALL 20<br />

8098<br />

8099 <br />

8100 IFA4 FE 28 CP 28<br />

8101<br />

8102 IFA6 38 05 JR C. 0<br />

8103 <br />

8104 IFA8 3E 03 LD A. 0<br />

8105 <br />

8106 IFAA C3 08 21 JP 2108<br />

8107 <br />

8108 <br />

errechnen wieviel Zeichen f<br />

und Zeichen ausgeben <br />

8109 IFAD Dl POP OE<br />

8110 IFAE 92 SUB 0<br />

8111 IFAF OA E2 lE JP C. 1<br />

8112<br />

8113<br />

8114 IFB2 B7 OR A<br />

8115 IFB3 CA E2 lE JP Z. 1


SEITE 144 <br />

BASIC 1Z-013B V1.0A <br />

8116 I UNTERSUCHEN, OB WEITERE<br />

8117 I PRINT - TEILE<br />

8118 1F86 57 LD D,A ANZAHL AUSZUGEBENDE ZEICHEN<br />

8119 IF87 3E 13 LD A, 13 I AUSZUGEBENDES ZEICHEN<br />

8120 I


SEITE 146 <br />

BASIC 1Z-013B V1.0A <br />

8215 INÄCHSTEN 10er TAB STELLEN <br />

8216 <br />

8217 2019 C3 B8 16 JP 16B8 I AUSGABE AUF BILDSCHIRM <br />

8218 ' lAUF NÄCHSTEN lOer TAB <br />

8219 <br />

8220 201C 3A 50 00 LO A,


SEITE 148<br />

BASIC 1Z-013B<br />

8315<br />

8316 207C 22 F7 38 LD (38F7),HL<br />

8317<br />

8318<br />

8319 207F 2A E6 38 LD HL, (38E6)<br />

8320<br />

8321<br />

8322 2082 22 F5 38 LD (38F5),HL<br />

8323<br />

8324<br />

8325 2085 CD 09 00 CALL 0009<br />

8326<br />

8327<br />

8328 2088 11 Al 21 LO OE, 21Al<br />

8329<br />

8330<br />

8331 208B CD 51 00 CALL 0051<br />

8332<br />

8333<br />

8334 208E 2A E6 38 LD HL, (38E6)<br />

8335<br />

8336<br />

8.337 2091 23 INC HL<br />

8338 2092 7D LD A,L<br />

8339 2093 B4 OR H<br />

8340 2094 CA 5F 18 JP Z, 185F<br />

8341<br />

8342<br />

8343 2097 3E 01 LO A, 01<br />

8344<br />

8345 2099 32 09 38 LO (3809),A<br />

8346<br />

8347<br />

8348 209C C3 73 21 JP 2173<br />

8349<br />

8350<br />

Befehl CONT<br />

8351 209F Dl POP OE c<br />

8352 20AO 3A D9 38 LO A, (3809)<br />

8353<br />

8354<br />

8355 20A3 B7 oR A<br />

8356 20A4 CA E3 20 JP Z, 20E3<br />

8357<br />

8358<br />

8359 20A7 2A F5 38 LO HL, (38F5)<br />

8360<br />

8361<br />

8362 20AA 22 E6 38 LO (38E6),HL<br />

8363<br />

8364<br />

8365 20AD 2A F7 38 LO HL, (38F7)<br />

8366<br />

8367<br />

8368 20BO 22 EO 38 LD (38EO),HL<br />

8369<br />

8370<br />

8371 20B3 2A F3 38 LD HL, (38F3)<br />

8372<br />

V1_0A<br />

FüR CONT MERKEN<br />

AKTUELLE ZEILENNUMMER<br />

FüR CONT MERKEN<br />

I NEUE ZEILE AUSGEBEN, WENN<br />

I CURSOR NICHT AUF ANFANG<br />

I ZEILE STEHT<br />

TEXT BREAK<br />

TEXT (OE) AUSGEBEN<br />

AKTUELLE ZEILENNUMMER<br />

I IN DIREKTER PROGRAMM­<br />

I IERUNG ?<br />

I<br />

JA ~ WARMSTART BASIC<br />

COOE CONT MöGLICH<br />

CoNT - FLAG<br />

ZEILENNUMMER AUSGEBEN<br />

STACK CoRRIGIEREN<br />

CoNT - FLAG<br />

CoNT MöGLICH ?<br />

INEIN + FEHLER 17<br />

I·CoNT nicht möglich<br />

ZEILENNUMMER FüR CONT<br />

I ALS AKTUELLE ZEILEN­<br />

INUMMER VORGEBEN<br />

I ZEIGER AUF NÄCHSTE ZEILE<br />

I FüR CONT<br />

I ZEIGER AUF NÄCHSTE ZEILE<br />

I EINTRAGEN<br />

PROGRAM<strong>MZ</strong>EIGER FüR CONT<br />

BASIC 1Z-<br />

8373<br />

9374 2086 C3 25 19 JP 1925<br />

8375<br />

8376<br />

Fehlertabelleneinsprünge<br />

8377 20B9 3E 06 LO A, 06<br />

8378<br />

8379 20BB 8380<br />

EO 7B 89 6A LD SP, (6<br />

8381<br />

8382<br />

8383 20BF 8384<br />

21 FF FF LD HL, F<br />

8385<br />

8386 20C2 E5 PUSH HL<br />

8.387 20C3 ED 73 05 38 LO (38D5<br />

8388<br />

8389<br />

8390<br />

8391 20C7 21<br />

8392 20C8 3E 00 LD A, 00<br />

8393<br />

8394 20CA 21<br />

8395 20CB 8396<br />

3E 10 LD A, 10<br />

8397 20CD 21<br />

8398 20CE 3E 07 LO A, 07<br />

8399<br />

8400 2000 21<br />

8401 2001 8402<br />

3E 03 LO A, 03<br />

8403 2003 21<br />

8404<br />

8405 2004 3E 15 LO A, 15<br />

8406 2006 21<br />

8407 2007 3E 01 LO A. 01<br />

8408<br />

8409 2009 21<br />

8410<br />

8411 200A 3E 01 LO A, 01<br />

8412 200C 21<br />

8413 2000 3E 01 LD A. 01<br />

8414<br />

8415 20DF 21<br />

8416 20EO 3E OE LD A. OE<br />

8417<br />

8418 20E2 21<br />

8419<br />

8420 20E3 3E 11 LO A, 11<br />

8421 20E5 21<br />

8422<br />

8423 20E6 3E 05 LO A, 05<br />

8424 20E8 21<br />

8425 20E9 3E 01 LO A. 01<br />

8426<br />

8427 20EB 21<br />

8428<br />

8429 20EC 3E 01 LO A, 01<br />

8430 20EE 21


SEITE 150<br />

BASIC 1Z-013B<br />

8431 20EF 2108H<br />

3E 14 LD A. 14<br />

8432<br />

8433 20F1 21<br />

8434 20F2 3E 08 LO A. 08<br />

8435<br />

8436 20F4 21<br />

8437 20F5 3E 02 LD A. 02<br />

8438<br />

8439 20F7 21<br />

8440 20F8 3E 06 LD A. 06<br />

8441<br />

8442 20FA 21<br />

8443 20FB 3E 03 LD A. 03<br />

8444<br />

8445 20FD 21<br />

8446 20FE 3E 01 LD A, 01<br />

8447<br />

8448 2100 21<br />

8449 2101 3E 03 LD A. 03<br />

8450<br />

8451 2103 18 03 JR 03 ~ 8452<br />

Befehl ERROR<br />

8453 2105 CD 50 40 CALL 4050<br />

8454<br />

8455<br />

Aufgetretenen Fehler behandeln<br />

8456 2108 EO 7B 05 38 LO SP, (3805)<br />

8457<br />

8458<br />

8459<br />

8460 210C 4F LD C.A<br />

8461 2100 21 00 00 LD HL. 0000<br />

8462<br />

8463<br />

8464 2110 22 83 50 LD (5D83),HL<br />

8465<br />

8466<br />

8467 2113 2A E6 38 LD HL, (38E6)<br />

8468<br />

8469<br />

8470 2116 23 INC HL<br />

8471 2117 7D LD A.L<br />

8472 2118 B4 OR H<br />

8473 2119 79 LD A,C<br />

8474 211A 28 22 JR Z. 22 ~ 213EH<br />

8475<br />

8476 211C 2A E6 38 LD HL, (38E6)<br />

8477<br />

8478<br />

8479 211F 22 EA 38 LD (38EA),HL<br />

8480<br />

8481<br />

8482 2122 22 E2 38 LD (38E2).HL<br />

8483<br />

8484<br />

V1.0A<br />

I FEHLER 20 <br />

IRESUME nicht ausführbar <br />

I FEHLER 8 <br />

IProgrammzeile zu lang <br />

I FEHLER 2 <br />

lüberlauf bei Berechnung <br />

I FEHLER 6 <br />

I Speicher zu klein <br />

I FEHLER 3 <br />

I Datenfehler <br />

I FEHLER <br />

I Syntax - Fehl er <br />

I FEHLER 3 <br />

IDatenfehler <br />

FEHLER BEHANDELN <br />

EIN-BYTE-WERT NACH DE/ACCU<br />

ISTACKPOINTER AUF WERT<br />

IBEI ANFANG BEFEHL SETZEN<br />

FEHLERNUMMER <br />

CODE NICHT IN FN <br />

I ZEIGER AUF PARAMETER<br />

I DER AKTUELLEN FUNKTION<br />

• AKTUELLE ZEILENNUMMER<br />

I IN DIREKTER <br />

I PROGRAMMIERUNG ? <br />

• I<br />

FEHLERNUMMER <br />

JA ~ FEHLER AUSGEBEN <br />

AKTUELLE ZEILENNUMMER<br />

ZEILENNUMMER BEI FEHLER<br />

I LETZTE ANGESPROCHENE <br />

I ZEILE FüR EDITOR <br />

8485 2125<br />

8486<br />

8487<br />

8488 2128<br />

8489<br />

8490<br />

8491 2128<br />

8492<br />

8493<br />

8494 212E<br />

8495<br />

8496<br />

8497 2131<br />

8498<br />

8499<br />

8500 2134<br />

8501 2135<br />

8502<br />

8503<br />

8504 2138<br />

8505 2139<br />

8506<br />

8507 213B<br />

8508<br />

8509 2 13 D<br />

8510 21 3E<br />

8511<br />

8512 2140<br />

9513<br />

8514 2142<br />

8515<br />

8516<br />

8517 2145<br />

8518<br />

9519 2147<br />

8520<br />

8521 2149<br />

8522<br />

8523<br />

8524 214C<br />

8525<br />

8526 214E<br />

8527<br />

8528 2150<br />

8529<br />

8530<br />

8531 2153<br />

8532<br />

8533 2155<br />

853 4 2156<br />

8535<br />

8536 2158<br />

8537 2159<br />

8538<br />

8539 215B<br />

8540 215C<br />

8541 2150<br />

8542 215E<br />

8543<br />

8544 2160<br />

8545<br />

85 46 2162<br />

BASIC<br />

2A EO 38<br />

22 EC 38<br />

2A FO 38<br />

22 EE 38<br />

32 F2 38<br />

08<br />

3A 08 38<br />

3C<br />

FE 02<br />

28 4F<br />

08<br />

FE 47<br />

30 OE<br />

11 72 4B<br />

FE 19<br />

38 OC<br />

11 00 4C<br />

D6 2A<br />

30 05<br />

11 72 4B<br />

3E 01<br />

B7<br />

28 F8<br />

3D<br />

28 OD<br />

08<br />

lA<br />

13<br />

FE 80<br />

28 03<br />

B7<br />

1Z-<br />

LD HL. (<br />

LD (38EC<br />

LD HL. (<br />

LD (38E<br />

LD (38F<br />

EX AF.A<br />

LD A, (38<br />

INC A<br />

CP 02<br />

JR Z. 4F<br />

EX AF,A<br />

CP 47<br />

JR NC,<br />

LD DE.<br />

CP 19<br />

JR C. OC<br />

LD OE.<br />

SUB A.<br />

JR Ne.<br />

LD OE, 4<br />

LO A, 01<br />

OR A <br />

JR Z. F<br />

DEC A <br />

JR Z. 0<br />

EX AF.AF<br />

LD A,


SEITE 152<br />

BASIC 1Z-013B V1.0A BASIC 1Z<br />

8547<br />

8548<br />

2163 20 F7 JR NZ. F7 ~ 215CH NEIN ~ TEXTENDE SUCHEN 8598<br />

8599<br />

8549 2165 08 EX AF.AF' ZÄHLER HOLEN 8600 2198 BO n<br />

8550<br />

8551<br />

8552<br />

8553<br />

8554<br />

8555<br />

8556<br />

8557<br />

8558<br />

2166 18 FO JR FO ~ 2158H PRüFEN. OB ZEIGER STIMMT 8601<br />

8602<br />

2168<br />

2169<br />

216B<br />

2160<br />

1A<br />

FE 80<br />

28<br />

CD<br />

E3<br />

09 00<br />

LD<br />

CP<br />

A.


SEITE 154 <br />

BASIC 1Z-013B V1.0A<br />

BASIC 1<br />

IJA<br />

8708<br />

8650 21CA CA 5F 18 JP Z, 185F<br />

~ WARMSTART BASIC<br />

I (Di e Abfrage muss vor dem<br />

8709 2205 05 PUSH<br />

8651 <br />

I Retten der Werte stehen)<br />

8710 2206 23 INC H<br />

8652 8711 2207 CD 65 40 CALL<br />

8653 21CO 3E 01 LD A, 01 CODE CONT MöGLICH<br />

8712<br />

8654 8713<br />

8655 21CF 32 09 38 LD (38D9),A CONT - FLAG<br />

8714 220A 4B LD C<br />

8656 8715 220B 42 LD B<br />

8657 8716 220C 01 POP D<br />

8658 2102 C3 5F 18 JP 185F WARMSTART BASIC <br />

8717 2200 CD 66 1C CALL<br />

8659 8718<br />

8660 8719<br />

8720 2210 C2 FE 20 JP N<br />

8721<br />

Befehl AUTO 8722 <br />

8723 2213 79 LO A<br />

8661 2105 11 OA 00 LD OE, OOOA ~ 10 (ANFANGSZEILENNUMMER)<br />

8724 2214 BO OR B<br />

8662 8725 2215 CA 01 21 JP Z<br />

8663 8726<br />

8664 2108 01 OA 00 LD BC, OOOA 10 (OFFSET) <br />

8727 <br />

8665 8728 2218 ED 53 E2 38 LO (3<br />

8666 8729 <br />

8667 210B 28 30 JR Z, 30 ~ 220DH IANFANGSZEILENNUMMER UND <br />

I OFFSET NICHT ANGEGEBEN<br />

8730<br />

8668 <br />

(Komma)<br />

8731<br />

8669 2100 FE 2C CP 2C <br />

8732221C ED 43 E4 38 LO (3<br />

8670 8733<br />

8671 210F 20 08 JR NZ, OB ~ 21ECH ANFANGSZEILENNR. ANGEGEBEN<br />

8734 <br />

8672 <br />

PROGRAM<strong>MZ</strong>EIGER<br />

8735<br />

8673 21El 23 INC HL<br />

ZWEI-BYTE-WERT NACH OE<br />

8736 2220 3E 01 LD A<br />

8674 21E2 CD 65 40 CALL 4065 <br />

8737 <br />

8675 8738 2222 32 DF 38 LD (3<br />

8676 8739<br />

8677 21E5 42 LO B,O I ANGEGEBENEN OFFSET<br />

8740<br />

8678 21E6 4B LO C,E I NACH BC<br />

ANFANGSZEILENNUMMER ZEHN<br />

8741 2225 Fl POP A<br />

8679 21E7 11 OA 00 LD OE, OOOA<br />

8742 2226 C3 76 18 JP 1<br />

8680 8743<br />

8681 <br />

JR 21<br />

8744<br />

~ 220DH I ZEILENNUMMER UND OFFSET <br />

8682 21EA 18 21 <br />

8683 <br />

I FüR AUTO MERKEN <br />

8684 21EC FE 2E CP 2E (Punkt)<br />

überprüfen, ob im AUTO -<br />

8685 wenn vorhanden, kompette<br />

8686 21EE ED 5B E2 38 LD OE, (38E2) I LETZTE üBER EOITOR­<br />

8687 I FUNKTION ANGESPROCHENE<br />

IZEILENNUMMER<br />

8745 2229 3A DF 38 LD A<br />

8688 8746<br />

8689 <br />

JR Z, 09<br />

8747<br />

~ 21FOH ZEILENNR. ALS ANFANGSZ.NR.<br />

8690 21F2 28 09 8748 222C B7 OR A<br />

8691 8749 2220 C8 RET<br />

FE OB CP 08 INTEGER-ZEILENNUMMER ?<br />

8692 21F4 8750 222E C3 46 36 JP 36<br />

8693 8751<br />

8694 21F6 C2 FE 20 JP NZ, 20FE NEIN ~ SYNTAX - FEHLER<br />

8752<br />

8695 <br />

8696 <br />

8697 21F9 23 INC HL ; CODEZEICHEN üBERSPRINGEN<br />

Limit und Rechenspeichera<br />

8698 21FA 5E LO E. (HL> IZEILENNUMMER HOLEN<br />

8699 21FB 23 INC HL I <br />

8753 2231 22 B8 6A LO (6<br />

8700 21FC 56 LO D, (HL> ~ I <br />

PROGRAM<strong>MZ</strong>EIGER<br />

8754<br />

8701 21FO 23 INC HL<br />

8755<br />

8702 21FE CD 14 54 CALL 5414 IPROGRAM<strong>MZ</strong>EIGER AUF <br />

I NÄCHSTES RELEVANTES ,<br />

8756 2234 25 DEC H<br />

8703 <br />

I ZEICHEN SETZEN<br />

8757 2235 22 89 6A LD (6<br />

8704 8758<br />

8705 2201 FE 2C CP 2C (Komma) ?<br />

8759 <br />

8706 8760 2238 C9 RET <br />

8707 2203 20 08 JR NZ, 08 ~ 2200H KEIN OFFSET ANGEGEBEN


SEITE 156 <br />

Alles löschen<br />

8761 2239 2A BF <br />

8762 <br />

8763 <br />

8764 223C 36 00 <br />

8765 <br />

8766 223E 23 <br />

8767 223F 36 00 <br />

8768 <br />

8769 2241 23 <br />

8770 2242 22 B3 <br />

8771 <br />

8772 <br />

8773 2245 C3 4E <br />

8774 <br />

8775 <br />

Befehl NEW<br />

8776 2248 CO 39 <br />

8777 <br />

8778 <br />

8779 224B C3 4D <br />

8780 <br />

8781 <br />

Befehl CLR<br />

8782 224E E5 <br />

8783 224F D5 <br />

8784 2250 2A B3 <br />

8785 <br />

8786 <br />

8787 2253 36 00 <br />

8788 <br />

8789 2255 23 <br />

8790 2256 22 B5 <br />

8791 <br />

8792 <br />

8793 2259 3A D7 <br />

8794 <br />

8795 <br />

8796 225C 47 <br />

8797 2250 04 <br />

8798 225E 11 10 <br />

8799 <br />

8800 <br />

8801 2261 36 00 <br />

8802 <br />

8803 2263 19 <br />

8804 2264 10 FB <br />

8805 <br />

8806 2266 22 DA <br />

8807 <br />

8808 <br />

8809 2269 36 00 <br />

8810 <br />

8811 226B 23 <br />

8812 226C 36 00 <br />

BASIC 1Z-013B<br />

6A LD HL. (6ABF)<br />

Lp (HL>. 00<br />

INC HL<br />

LD (HL>. 00<br />

INC HL<br />

6A LD (6AB3).HL<br />

22 JP 224E<br />

22 CALL 2239 <br />

18 JP 184D<br />

PUSH HL<br />

PUSH DE<br />

6A LD HL. (6AB3)<br />

LD (HL>. 00<br />

INC HL<br />

6A LD (6AB5).HL<br />

38 LD A. (38D7><br />

LD B.A <br />

INC B <br />

01 LD DE. 0110 <br />

LO (HL>. 00<br />

ADD HL.DE ,<br />

DJNZ FB + 2261H<br />

38 LD (38DA).HL •<br />

LD (HL>. 00<br />

INC HL<br />

LD (HL>. 00<br />

V1.0A<br />

BASIC - PROGRAMMANFANG<br />

I BASIC-PROGRAMM LöSCHEN<br />

,, ,<br />

ZEIGER AUF VARIABLE<br />

CLR - ROUTINE<br />

ALLES LöSCHEN<br />

WARMSTART BASIC<br />

PROGRAM<strong>MZ</strong>EIGER RETTEN<br />

REGISTER RETTEN<br />

'ZEIGER AUF VARIABLEN­<br />

, BEREICH<br />

CODE ENDE VARIABLE<br />

ANFANG STRINGTEXTBEREICH<br />

ANZAHL DEFINIERTE DATEIEN<br />

ANZAHL DATEIEN<br />

FüR EINGABEPUFFER CORRIG.<br />

IRESERVIERUNGSLÄNGE<br />

I JE DATEI<br />

CODE DATEI NICHT BELEGT<br />

ZEIGER AUF NÄCHSTEN DATENS.<br />

I WEITER OATEIPUFFER<br />

I FREIHALTEN<br />

ANFANG STRINGTEXTE<br />

I CODE KEINE STRINGS <br />

I VORHANDEN EINTRAGEN <br />

I <br />

I <br />

BAS~C 1<br />

8813 <br />

8814 226E 23 INC H<br />

8815 226F 22 B7 6A LD (6<br />

8816 <br />

8817 <br />

8818 2272 22 D3 38 LO (3<br />

8819<br />

8820<br />

8821 2275 01 POP D<br />

8822 2276 El POP H<br />

8823 2277 C9 RET<br />

Wenn Trace-Flag gesetzt +<br />

8824 2278 CB 47 BIT O<br />

8825 <br />

8826 227A C4 87 22 CALL<br />

8827 <br />

8828 <br />

8829 227D C9 RET <br />

8efehl TRON<br />

8830 227E 3E 01 LD A<br />

8831 <br />

8832 2280 18 01 JR 01<br />

8833 <br />

Befehl TROFF<br />

8834 2282 AF XOR A<br />

8835 2283 32 DD 38 LD (3<br />

8836 <br />

8837 <br />

8838 2286 C9 RET <br />

Aktuelle Zeilennummer für<br />

8839 2287 F5 PUSH<br />

8840 2288 E5 PUSH<br />

8841 2289 3E 5B LD A.<br />

8842 <br />

8843 228B CD D3 17 CALL<br />

8844<br />

8845 <br />

8846 228E 2A E6 38 LD H<br />

8847 <br />

8848 <br />

8849 2291 CD A7 21 CALL<br />

8850<br />

8851<br />

8852 2294 CD 51 00 CALL<br />

8853 <br />

8854 <br />

8855 2297 3E 50 LD A<br />

8856 <br />

8857 2299 CD D3 17 CALL<br />

8858


SEITE 158<br />

BASIC 1Z-013B V1.0A BASIC 1<br />

8859 Bef eh 1 INPUT<br />

8860 229C El POP HL I GERETTETE REGISTER HOLEN<br />

8861 2290 Fl POP AF I 8906 22CA AF XOR A<br />

8862 229E C9 RET 8907 22CB 32 5E 26 LD (2<br />

8908<br />

8909<br />

Befehl OPTION BASE (wird nicht dekodiert) 8910<br />

8911<br />

8863 8864<br />

8865<br />

229F 3A 01 39 LD A. (3901) FLAG OPTION BASE 8912<br />

8913<br />

8914<br />

8867 22A2 8866<br />

B7<br />

OR<br />

JP A<br />

GESETZT ?<br />

8915<br />

22A3 C2 CE 20 NZ. 20CE<br />

I SCHON OPTION BASE ANGE­<br />

8916<br />

22CE CD 14 54 CALL<br />

2201 FE FB CP F<br />

2203 CA 65 23 JP Z.<br />

8868 I GEBEN ODER VARIABLE geDIMt 8917<br />

8869 I~ FEHLER 7 ARRAY-FEHLER 8918 2206 E5 PUSH<br />

8870<br />

23<br />

INC HL<br />

PROGRAM<strong>MZ</strong>EIGER<br />

8919 2207 2A B7 6A LD HL<br />

8871 22A7<br />

22A6 CD 50 4D CALL 4D50<br />

EIN-BYTE-WERT NACH DE/ACCU<br />

8920<br />

8872 8921<br />

8873<br />

8922 220A 22 D3 38 LD (3<br />

8874 22AA B7 OR A OPTION BASE 0 ?<br />

8875 22AB 28 05 JR Z. 05 ~ 22B2H WERT IST OK 8923<br />

8924<br />

8876 8925 22DO El POP H<br />

8877 22AD FE 02 CP 02 OPTION BASE 1 ? 8926 22DE CD 14 54 CALL<br />

8878 8927<br />

8879 22AF 02 01 21 JP NC. 2101 ZU GROSS ~ DATENFEHLER 8928<br />

8880 8929 22E1 FE 22 CP 2<br />

8881 8930<br />

8882 22B2 32 42 5B LD (5B42).A OPTION BASE MERKEN 8931 22E3 CC BB 22 CALL<br />

8883 8932<br />

8884 8933<br />

8885 22B5 3E 01 LD A. 01 CODE OPTION BASE GESETZT 8934 22E6 20 OB JR NZ<br />

8886 8935<br />

8887 22B7 32 01 39 LD (3901>.A FLAG OPTION BASE 8936 22E8 CD 14 54 CALL<br />

8888<br />

8937<br />

8889 8938<br />

8890 22BA C9 RET 8939 22EB FE 3B CP 3<br />

8940<br />

8941 22ED 23 INC H<br />

(HL) stehenden Stringausdruck auswerten und Stringtext ausgeben 8942 22EE 28 09 JR Z.<br />

8943<br />

8891 22BB CD BC 40 CALL 4DBC ISTRINGAUSDRUCK AUSWERTEN 8944 22FO C3 FE 20 JP 20<br />

8892 I UND ZEIGER AUF STRING 8945<br />

8893 I BERE I TSTELLEN 8946<br />

8894 22BE 78 LD A.B ANZAHL ZEICHEN TEXT<br />

8895 22BF B7 OR A GLEICH NULL ?<br />

8896 22CO<br />

8897 22C1<br />

C8<br />

lA<br />

RET Z<br />

LD A.


SEITE<br />

8962 2302<br />

8963<br />

8964<br />

8965 2305<br />

8966<br />

8967 2307<br />

8968<br />

8969<br />

8970 230A<br />

8971<br />

8972 230C<br />

8973 2300<br />

8974 230E<br />

8975 230F<br />

8976<br />

8977<br />

8978 2312<br />

8979<br />

8980<br />

8981 2315<br />

8982 2316<br />

8983 2317<br />

8984<br />

8985<br />

8986 231A<br />

8987<br />

8988<br />

8989 2310<br />

8990 231E<br />

8991<br />

8992<br />

8993 2321<br />

8994 2322<br />

8995 2323<br />

8996 2324<br />

8997<br />

8998 2326<br />

8999<br />

9000<br />

9001 2329<br />

9002 232A<br />

9003 2328<br />

9004 232C<br />

9005 2320<br />

9006 232E<br />

9007 232F<br />

9008<br />

9009<br />

9010<br />

9011 2333<br />

9012 2334<br />

9013<br />

9014<br />

9015 2337<br />

9016 2338<br />

9017<br />

9018 233A<br />

9019<br />

9020 233C<br />

9021<br />

9022 233E<br />

9023 233F<br />

160<br />

CD 05<br />

28 05<br />

CD 32<br />

18 Fl<br />

AF<br />

F5<br />

E5<br />

2A 85<br />

11 10<br />

19<br />

E8<br />

CD FA<br />

DA 69<br />

05<br />

2A 26<br />

28<br />

7E<br />

87<br />

28 21<br />

32 77<br />

28<br />

28<br />

46<br />

28<br />

4E<br />

28<br />

ED 43<br />

E3<br />

CD 14<br />

87<br />

28 14<br />

FE 2C<br />

20 03<br />

23<br />

18 03<br />

BASIC 1Z-013B<br />

27 CALL 2705<br />

JR Z. 05 • 230CH<br />

33 CALL 3332<br />

JR Fl • 22FDH<br />

XOR A<br />

PUSH AF<br />

PUSH HL<br />

6A LD HL. (6AB5)<br />

00 LD OE. 0010<br />

ADD HL.DE<br />

EX DE.HL<br />

00 CALL OOFA<br />

20 JP C. 2069<br />

PUSH OE<br />

27 LD HL. (2726)<br />

DEC HL<br />

LD A. (HL><br />

OR A<br />

JR Z. 21 • 2347H<br />

26 LD (2677).A<br />

DEC HL<br />

DEC HL<br />

LD B. (HU<br />

DEC HL<br />

LD C. (HU<br />

DEC HL<br />

74 26 LD (2674).8C<br />

EX (SP).HL<br />

54 CALL 5414<br />

OR A ;<br />

JR Z. 14 • 234EH<br />

CP 2C<br />

JR NZ. 03 • 2341H :<br />

INC HL<br />

JR 03 • 2344H<br />

V1_0A<br />

I üBERPRüFEN. OB NÄCHSTES<br />

IPROGRAMMBYTE GLEICH<br />

IBEFEHLSENDEZEICHEN IST<br />

KEINE WEITEREN VARIABLEN<br />

SYNTAX Komma<br />

I WEITERE VARIABLE BEREIT­<br />

ISTELLEN<br />

CODE ENDE VARIABLENWERTE<br />

AUF STACK ABLEGEN<br />

PROGRAM<strong>MZ</strong>EIGER MERKEN<br />

ANFANG STRINGTEXT8E~E!CH<br />

OFFSET ZUM EINGABEPUFFER<br />

ZEIGER AUF EINGABEPUFFER<br />

NACH OE<br />

I ZEILE VON TASTATUR HOLEN<br />

IUND ZEIGER IN OE AUF<br />

I EIGENTLICHE EINGA8E STELL.<br />

BREAK GEDRüCKT<br />

ZEIGER AUF EINGEGEB. TEXT<br />

I ZEIGER AUF ANFANG<br />

I VARIABLENWERTE<br />

ZEIGER AUF TYPWERT<br />

TYPWERT HOLEN<br />

GLEICH NULL<br />

lALLEN VARIABLEN WERTE .<br />

I ZUGEWIESEN<br />

VARIABLENARTCODE EINTRAGEN<br />

I ZEIGER AUF ADRESSEN­<br />

I WERT STELLEN<br />

I ZEIGER AUF VARIA8LE<br />

I HOLEN<br />

ZEIGER AUF VARIABLE MERKEN<br />

I ZEIGER IN HL AUF<br />

I NÄCHSTES RELEVANTES<br />

I ZEICHEN SETZEN<br />

Textende ?<br />

ZU WENIG WERTE EINGEGE8EN<br />

(Komma) ?<br />

ZEIGER STEHT AUF WERT<br />

Komma üBERSPRINGEN<br />

I DER VARIABLEN KEINEN<br />

BASIC 1Z<br />

9024<br />

9025 2341 CD 33 26 CALL<br />

9026<br />

9027<br />

9028 2344 E3<br />

EX (S<br />

9029 2345 18 08 JR OB<br />

9030<br />

903 1 2347 01 POP O<br />

9032 2348 E1 POP H<br />

9033 2349 ED 78 26 27 LD SP<br />

9034<br />

903 5<br />

9036<br />

9037 2340 C9 RET<br />

9038 234E 11 13 27 LD OE<br />

903 9<br />

9040<br />

9041 2351 CD 51 00 CALL<br />

9042<br />

9043<br />

9044 2354 2A 85 6A LD HL<br />

9045<br />

9046<br />

9047 2357 11 10 00 LD OE<br />

9048<br />

9049<br />

9050 23 5A 19 ADD H<br />

9051 23 5B EB EX DE<br />

9052 23 5C CD FA 00 CALL O<br />

9053<br />

9054<br />

9055 235F DA 69 20 JP C.<br />

9056<br />

9057<br />

9058 23 62 EB EX DE<br />

9059 2363 18 CF JR CF<br />

9060<br />

Bei INPUT auf INPUT/T unte<br />

9061 2365 23 INC HL<br />

9062 2366 CD 14 54 CALL 5<br />

9063<br />

9064<br />

9065 2369 FE 54 CP 54<br />

90 66<br />

9067 236B C2 FE 20 JP NZ.<br />

9068<br />

9069<br />

9070 236E 23 INC HL<br />

9071 236F CD OB 58 CALL 5<br />

9072<br />

9073<br />

9074 2372 32 77 26 LD (26<br />

9075<br />

9076<br />

90 77 2375 ED 43 74 26 LO (26<br />

9078<br />

9079<br />

I


SEITE 162<br />

BASIC 1Z-013B V1.0A<br />

BASIC 1Z<br />

9080<br />

9081<br />

9082<br />

9083<br />

9084<br />

2379<br />

237A<br />

E5<br />

21 OF 11<br />

PUSH HL<br />

LD HL, 110F<br />

PROGRAM<strong>MZ</strong>EIGER RETTEN<br />

ZEIGER AUF ZWISCHENSPEICHER<br />

9142 23B6 CO RET NZ<br />

9085 237D 01 00 FE LD BC, FEOt) 9146 23BA CD OA 24 CALL 2<br />

9086 9147<br />

9087<br />

9148<br />

9088 2380 FE 03 CP 03 CODE <strong>MZ</strong>-80 K - DATEI ?<br />

9149 23BD 38 E9 JR C.<br />

9089<br />

9090<br />

9091<br />

9092<br />

9093<br />

2382<br />

2384<br />

28<br />

CD<br />

50<br />

OE 24<br />

JR Z, 50<br />

CALL 240E<br />

~ 23D4H I <strong>MZ</strong>-80 K - DATEI LESEN<br />

I (hat andere Endezeichen )<br />

lEIN ZEICHEN AUS DATEIlPUFFER<br />

BEREITSTELLEN<br />

9094<br />

9095 2387 FE 22 CP 22 (AnfUhrungszeichen)<br />

9096<br />

9097 2389 28 60 JR Z, 60 ~ 23EBH DATEN MIT " BEGONNEN<br />

9098<br />

2388 CD 13 24 CALL 2413<br />

9099<br />

9100<br />

9101<br />

9102<br />

9103<br />

9104<br />

9105<br />

238E<br />

2390<br />

2391<br />

28<br />

~8<br />

OD<br />

20 04<br />

JR Z. 18 ~ 23A8H<br />

DEC C<br />

JR NZ. 04 ~ 2397H<br />

IZE.ICHEN IM ACCU AUF<br />

IDATENENDEZEICHEN UNTER­<br />

I SUCHEN<br />

DATENENDE GEFUNDEN<br />

SCHON<br />

JA<br />

9106<br />

9107 2393 FE 20 CP 20 Space ?<br />

9108<br />

9109<br />

9110<br />

9111<br />

9112<br />

2395<br />

2397<br />

28<br />

FE<br />

23<br />

20<br />

JR<br />

CP<br />

Z. 23<br />

20<br />

IM TEXT ?<br />

~ 23BAH :,IBIS ENDE DATEN<br />

I UND VERGESSEN<br />

: Space ?<br />

LESEN<br />

9143<br />

9144<br />

9145<br />

9150<br />

9151<br />

9152<br />

9153<br />

9154<br />

9155<br />

9156<br />

9157<br />

9158<br />

9159<br />

9160<br />

9161<br />

9162<br />

9163<br />

23B7<br />

23B8<br />

23BF<br />

23C1<br />

23<br />

18 B5<br />

FE<br />

28<br />

20<br />

F7<br />

INC HL<br />

JR B5<br />

CP<br />

JR<br />

Z,<br />

20<br />

23C3 FE 2C CP 2C<br />

23C5 28 E1 JR Z,<br />

23C7<br />

23C9<br />

FE<br />

28<br />

00<br />

DD<br />

CP 00<br />

JR Z,<br />

23CB FO 35 OB OEC (I<br />

9164<br />

9165<br />

916623CE FD 36 oe 01 LD (IY<br />

9167<br />

9168<br />

9169<br />

2302 18 D4 JR 04<br />

9113 2399 28 02 JR Z, 02 ~ 239DH einen Datensatz aus <strong>MZ</strong> -80<br />

9114<br />

9115 239B OE 01 LD C, 01 9172 2304 CD OE 24 CALL 2<br />

9116<br />

9117<br />

9118<br />

9119<br />

9120<br />

239D<br />

239E<br />

239F<br />

77<br />

23<br />

CD OA 24<br />

LD (HU.A<br />

INC HL<br />

CALL 240A<br />

ZEICHEN MERKEN<br />

ZEIGER FüR TEXT<br />

lEIN ZEICHEN AUS DATEIlPUFFER<br />

BEREITSTELLEN<br />

23D9 28 10 JR Z,<br />

9121 9178<br />

9122 23A2 38 04 JR C. 04 ~ 23A8H ~ ENDE DATEI 9179 23DB CD 13 24 CALL 2<br />

9123<br />

9124<br />

9125<br />

9126<br />

'9127<br />

9128<br />

9129<br />

9130<br />

9131<br />

9132<br />

9133<br />

9134<br />

9135<br />

9136<br />

9137<br />

9138<br />

9139<br />

9140<br />

9141<br />

23A4<br />

23A6<br />

23A7<br />

23A8<br />

23AA<br />

23AD<br />

2380<br />

23B1<br />

23B4<br />

10<br />

77<br />

23<br />

36<br />

21<br />

CD<br />

E1<br />

CD<br />

FE<br />

E5<br />

00<br />

OF 11<br />

33 26<br />

14 54<br />

2C<br />

DJNZ E5 ~ 238BH<br />

LD (HU.A<br />

INC HL<br />

LD (HU. 00 ;<br />

LD HL. 110F<br />

CALL 2633<br />

POP HL<br />

CALL 5414<br />

CP 2C<br />

IWEITERE ZEICHEN AUS<br />

I DATEI EINLESEN<br />

LETZTES ZEICHEN MERKEN<br />

ZEIGER AUF ZWISCHENSPEICHER<br />

Textendezeichen EINTRAGEN<br />

I ZEIGER AUF ZWISCHEN­<br />

I SPEICHER MIT BEREITlGESTELLTEN<br />

DATEN<br />

• I BEREITGESTELLTEN DATEN­<br />

ISATZ NACH EINGETRAGENEN<br />

IVARIABLENWERTEN ZUWEISEN<br />

, PROGRAM<strong>MZ</strong>EIGER HOLEN<br />

IPROGRAM<strong>MZ</strong>EIGER (HL) AUF<br />

I NÄCHSTES RELEVANTES<br />

I ZEICHEN STELLEN<br />

(Komma) ?<br />

9170<br />

9171<br />

9173<br />

9174<br />

9175<br />

9176<br />

9177<br />

9180<br />

9181<br />

9182<br />

9183<br />

9184<br />

9185<br />

9186<br />

9187<br />

9188<br />

9189<br />

9190<br />

9191<br />

9192<br />

9193<br />

9194<br />

23D7<br />

23DE<br />

23EO<br />

23El<br />

23E2<br />

23E5<br />

23E7<br />

23E9<br />

FE<br />

28<br />

T7<br />

23<br />

CD<br />

38<br />

10<br />

18<br />

22<br />

CP<br />

C8 JR Z,<br />

OA<br />

Cl<br />

F2<br />

BD<br />

22<br />

LO (H<br />

INC HL<br />

24 CALL 2<br />

JR C,<br />

OJNZ F<br />

JR BD


SEITE 164 <br />

BASIC 1Z-013B V1.0A <br />

9195 23EB 77 LD (HL>. A " MERKEN<br />

9196 23EC 23 INC HL ZEIGER AU ZWISCHNSPEICHER<br />

~197 23ED 06 FF LD B. FF " VORGABE MAXIMALE ANZAHL<br />

9198 <br />

9199 23EF CD OA 24 CALL 240A lEIN ZEICHEN AUS DATEI­<br />

9200 lPUFFER BEREITSTELLEN <br />

9201 <br />

9202 23F2 38 B4 JR C. B4 ~ 23A8H lENDE DATEI ~ BEREITGE­<br />

9203 ISTELLTEN DATESATZ ZUWEISEN <br />

9204 23F4 77 LD (HL>.A ZEICHEN MERKEN <br />

9205 23F5 23 INC HL ZEIGER AUF ZWISCHENSPEICHER <br />

9206 23F6 FE 22 CP 22 (Anführungszeichen)<br />

9207 <br />

9208 23F8 28 04 JR Z. 04 ~ 23FEH ENDE DATENSATZ <br />

9209 <br />

9210 23FA 10 F3 DJNZ F3 ~ 23EFH WEITERE ZEICHEN EINLESESEN<br />

9211 <br />

92 12 23FC 18 AA JR AA ~ 23A8H I BEREITGESTELLTEN DATESATZ <br />

921 3 I DER VARIABLEN ZUWEISEN <br />

9214 23FE CD OA 24 CALL 240A lEIN ZEICHEN AUS DATEI­<br />

9215 lPUFFER BEREITSTELLEN <br />

9216 <br />

9217 2401 38 A5 JR C. A5 ~ 23A8H ENDE DATEI <br />

9218 <br />

9219 2403 CD 13 24 CALL 2413 I UNTERSUCHEN. OB ACCU <br />

9220 IDATENSATZENDEZEICHEN IST <br />

9221 <br />

9222 2406 28 AO JR Z. AO ~ 23A8H IBEREITGESTELLEN DATENSATZ <br />

9223 I DER VARIABLEN ZUWEISEN <br />

9224 2408 18 Cl JR Cl ~ 23CBH PUFFERZEIGER CORRIGIEREN <br />

9225 <br />

ei n Zeichen aus Dateipuffer bereitstellen<br />

9226 240A CD B5 45 CALL 45B5 I üBERPRüFEN. OB NOCH <br />

9227 I DATEN VORHANDEN SIND <br />

9228 <br />

9229 240D 08 RET C KEINE DATEN MEHR VORHANDEN <br />

9230 240E CD 71 45 CALL 4571 lEIN ZEICHEN AUS DATEI­<br />

9231 lPUFFER BEREITSTELLEN <br />

9232 <br />

9233 2411 B7 OR A CARRY-FLAG ZURüKSETZEN <br />

9234 2412 C9 RET <br />

untersuchen. ob ACCU gleich Datensatzendezeichen ist<br />

9235 2413 B7 OR A Textendezeichen ? <br />

9236 2414 C8 RET Z JA <br />

9237 2415 FE 2C CP 2C (Komma) ? <br />

9238 <br />

9239 2417 C8 RET Z JA <br />

9240 2418 FE OD CP 00 Wagenrücklauf ? <br />

9241 <br />

9242 241A C9 RET <br />

BASIC 1Z<br />

Befehle aus Funktionstabe<br />

9243 241B 7E LD A.<br />

9244 241C 23 INC HL<br />

9245 241D FE BC CP BC<br />

9246 <br />

9247 241F CA 36 25 JP Z.<br />

9248 <br />

9249 <br />

9250 2422 FE CO CP CO<br />

9251 <br />

9252 2424 CA EA 24 JP Z.<br />

9253 <br />

9254 <br />

9255 2427 FE C4 CP C4<br />

9256 <br />

9257 2429 CA 59 24 JP Z.<br />

9258 <br />

9259 <br />

9260 242C C3 FE 20 JP 20F<br />

9261 <br />

9262 <br />

Zwei Ziffern (DE) umsetzen<br />

9263 242F CD 3C 24 CALL 2<br />

9264 <br />

9265 <br />

9266 2432 07 RLCA <br />

9267 2433 07 RLCA<br />

9268 2434 07 RLCA<br />

9269 2435 07 RLCA <br />

9270 2436 4F LD C.A<br />

9271 2437 CD 3C 24 CALL 2<br />

9272 <br />

9273 <br />

9274 243A B1 OR C<br />

9275 243B C9 RET<br />

Ziffer (OE) umsetzen in De<br />

9276 243C lA LD A. <<br />

9277 2430 13 I NC OE<br />

9278 243E 06 30 SUB A.<br />

9279 <br />

9280 2440 38 03 JR C. 0<br />

9281 <br />

9282 2442 FE OA CP OA<br />

9283 <br />

9284 2444 08 RET C <br />

9285 2445 78 LD A.B<br />

9286 2446 C9 RET


SEITE 166<br />

BASIC 1Z-013B V1.0A<br />

BASIC 1Z<br />

9 335<br />

Zeichen


SEITE 168<br />

BASIC 1Z-013B V1_0A<br />

BASIC 1Z<br />

9392 <br />

9393 24B1 OA FB 20 JP C. 20FB I KEINE ZIFFER -+ <br />

9394 IDATENFEHLER<br />

9395<br />

Befehl ????? (Z<br />

Syntax: BefehleSpeiche<br />

9396 24B4 FE OA CP OA ANZAHL ZIFFERN<br />

9450 24EA CD FA 57 CALL 5<br />

9397<br />

9451<br />

9398 24B6 02 FB 20 JP NC. 20FB IKEINE ZIFFER -+<br />

9452<br />

9399 I DATENFEHLER<br />

9453 24ED CD 65 40 CALL 4<br />

9400<br />

9454<br />

9401 24B9 C5 PUSH BC 9455<br />

• REGISTER RETTEN<br />

9402 24BA 4F LO C.A ERSTE ZIFFER MERKEN<br />

9456 24FO CD 32 33 CALL 3<br />

9403 24BB 87 ADO A.A I MAL 2<br />

9457<br />

9404 24BC 87 ADD A.A I MAL 4<br />

9458<br />

9405 24BO 81 ADD A.C 9459 24F3 05 PUSH O<br />

• MAL 5<br />

9406 24BE 87 ADD A.A I MAL 10<br />

9460 24F4 CO 65 4D CALL 4<br />

9407 24BF 4F LD C.A WERT ERSTE NEUE STELLE<br />

9461<br />

9408 24CO lA LD A. (DE) NÄCHSTS TEXTZEICHEN HOLEN<br />

9462<br />

9409 24Cl 13 INC OE ZEIGER AUF RESTTEXT 9463 24F7 CD 04 58 CALL 5<br />

9410 24C2 06 30 SUB A. 30 ASCII UMSETZEN IN DEZIMAL<br />

9464<br />

9411. <br />

9465<br />

9412 .24C4 OA FB 20 JP C, 20FB I KEINE ZIFFER -+ 9466 24FA CD 53 40 CALL 4<br />

9413 I DATENFEHLER 9467<br />

9414<br />

9468<br />

9415 24C7 FE OA CP OA ANZAHL ZIFFERN 9469 24FD F5 PUSH A<br />

9416 9470 24FE CD 14 54 CALL 5<br />

9417 24C9 02 FB 20 JP NC, 20FB KEINE ZIFFER -+ DATENFEHLER<br />

9471<br />

9418 9472<br />

9419<br />

9473 2501 23 INC HL<br />

9420 24CC 81 ADO A.C PLUS ERSTE STELLE<br />

9474 2502 FE F4 CP F4<br />

9421 24CO 4F LD C.A ERGEBNIS MERKEN<br />

9475<br />

9422 24CE 06 00 LO B. 00 BC ENTHÄLT WERT NEUE STELLE<br />

9476 2504 C2 FE 20 JP NZ<br />

9423<br />

9477<br />

9424 2400 09 AOD HL.BC PLUS ALTES ERGEBNIS<br />

9478<br />

9425 2401 Cl POP BC GERETTETES REGISTER HOLEN<br />

9479 2507 CD BC 4D CALL 4<br />

9426 2402 C9 RET 9480<br />

9481<br />

9482 250A Cl POP BC<br />

2 - stellige BCD - Zahl im Accu umrechnen in HEX-Wert 9483 250B E3 EX eS<br />

9484 250C 88 CP B<br />

9427 2403 C5 PUSH BC REGISTER RETTEN<br />

9485 2500 30 01 JR NC<br />

9428 2404 4F LD C.A BCD - DIGIT - WERT<br />

9486<br />

9429 2405 07 RLCA IH-DIGIT AUF L-DIGIT 9487 250F 47 LD B.A<br />

9430 2406 07 RLCA I SCHIEBEN<br />

9488 2510 04 INC B<br />

9431 2407 07 RLCA I 9489 2511 18 04 JR 04<br />

9432 24D8 07 RLCA 9490<br />

9433 2409 E6 OF ANO A. OF • IL-DIGIT MASKIEREN 9491 2513 lA LD A,<br />

9434 9492 2514 77 LD (H<br />

9435 240B 47 LD B.A UND MERKEN 9493 2515 13 INC OE<br />

9436 240C 28 05 JR Z. 05 -+ 24E3H H-DIGIT GLEICH NULL 9494 2516 23 INC HL<br />

9437 9495 2517 10 FA OJNZ F<br />

9496<br />

9438 240E AF XoR A ZÄHLER AUF NULL<br />

9439 240F C6 OA AOD A. OA • IWERT 10er STELLE<br />

9497 2519 El POP HL<br />

9440 I ERRECHNEN 9498 251A C9 RET<br />

9441 24El 10 FC DJNZ FC -+ 24DFH I<br />

9442<br />

9443 24E3 47 LD B.A WERT 10er STELLE<br />

9444 24E4 79 LD A.C BCD-WERT HOLEN<br />

9445 24E5 E6 OF AND A, OF L-DIGIT MASKIEREN<br />

9446<br />

9447 24E7 80 ADD A.B PLUS 10er STELLE<br />

9448 24E8 Cl POP BC GERETTETES REGISTER HOLEN<br />

9449 24E9 C9 RET


SEITE 170<br />

BASIC 1Z-013B V1.0A BASIC 1Z<br />

Befehl<br />

9499 251B<br />

9500<br />

9501 2510<br />

9502<br />

9503 251F<br />

9504 2520<br />

9505<br />

9506<br />

9507 2523<br />

9508<br />

9509<br />

9510<br />

9511<br />

9512<br />

9513<br />

9514<br />

9515<br />

9516<br />

9517<br />

9518<br />

9519<br />

9520<br />

9521<br />

DEF<br />

FE B2<br />

20 07<br />

23<br />

CO 14<br />

C3 E2<br />

54<br />

43<br />

CP B2<br />

JR NZ. 07<br />

INC HL<br />

CALL 5414<br />

JP 43E2<br />

~ 2526H<br />

KEY (Zwischencode)<br />

WEITER UNTERSUCHEN<br />

KEY üBERSPRINGEN<br />

IPROGRAM<strong>MZ</strong>EIGER IN HL<br />

lAUF NÄCHSTES RELEVANTES<br />

I ZEICHEN SETZEN<br />

DEF KEY - ROUTINE<br />

Befehl OEF FN 9566<br />

9567<br />

2526<br />

2528<br />

252B<br />

252C<br />

252D<br />

252E<br />

FE<br />

C2<br />

FF<br />

23<br />

7E<br />

23<br />

FE C7<br />

FE 20<br />

CP<br />

JP<br />

FF<br />

NZ. 20FE<br />

INC HL<br />

LD A. (HU<br />

INC HL<br />

CP C7<br />

VORBYTE TABELLE<br />

SYNTAX - FEHLER<br />

PROGRAM<strong>MZ</strong>EIGER<br />

ZWISCHENCODE HOLEN<br />

PROGRAM<strong>MZ</strong>EIGER<br />

FN (Zwischencode)<br />

9551<br />

9552<br />

9553<br />

9554<br />

9555<br />

9556<br />

9557<br />

9558<br />

9559<br />

9560<br />

9561<br />

9562<br />

9563<br />

9564<br />

9565<br />

DREI 9568<br />

2530 CA 77 5C JP Z. 5C77 DEF FN - ROUTINE 9578<br />

9569<br />

9570<br />

9571<br />

9572<br />

9573<br />

9574<br />

9575<br />

9576<br />

9577<br />

2550<br />

2553<br />

2554<br />

2555<br />

2556<br />

2559<br />

255C<br />

CD<br />

Cl<br />

4F<br />

C5<br />

CD<br />

CD<br />

FE<br />

50<br />

OD<br />

14<br />

F4<br />

40<br />

27<br />

54<br />

CALL<br />

POP B<br />

LO C.A<br />

PUSH<br />

CALL<br />

CALL<br />

CP F<br />

255E C2 FE 20 JP NZ<br />

2561<br />

2562<br />

2565<br />

2566<br />

2567<br />

2568<br />

2569<br />

23<br />

CD BC 4D<br />

D9<br />

Cl<br />

E3<br />

08<br />

CD 7F 52<br />

9522<br />

9523 2533 C3 FE 20 JP 20FE SYNTAX - FEHLER 9581 256D 38 1D JR C.<br />

9524<br />

9582<br />

9525 9583 256F 68 LD L.B<br />

9526<br />

9527<br />

9528<br />

9529<br />

9530<br />

9531<br />

9532<br />

9533<br />

9534<br />

9535<br />

9536<br />

95.37<br />

9538<br />

9539<br />

9540<br />

9541<br />

9542<br />

9543<br />

9544<br />

9545<br />

9546<br />

9547<br />

9548<br />

9549<br />

9550<br />

INC H<br />

CALL<br />

EXX<br />

POP B<br />

EX (S<br />

EX AF<br />

CALL<br />

9579<br />

9580 256C 90 SUB B<br />

9584 2570 20 DEC L<br />

9585 2571 26 00 LD H.<br />

Befehl MIO$ 9586<br />

2536<br />

2539<br />

253C<br />

253E<br />

2541<br />

2542<br />

2545<br />

2548<br />

2549<br />

254C<br />

2540<br />

CD<br />

CD<br />

FE<br />

C2<br />

C5<br />

CD<br />

CD<br />

B7<br />

CA<br />

F5<br />

CD<br />

FA<br />

OB<br />

03<br />

FB<br />

2F<br />

50<br />

01<br />

2F<br />

57<br />

58<br />

20<br />

33<br />

4D<br />

21<br />

33<br />

CALL 57FA<br />

CALL 580B<br />

CP 03<br />

JP NZ. 20FB<br />

PUSH BC<br />

CALL 332F<br />

CALL 4D50<br />

OR A<br />

JP Z. 2101<br />

PUSH AF<br />

CALL .332F<br />

SYNTAX Klammer a.uf<br />

IVARIABLENNAMEN (HL) AUS­<br />

I WERTEN UND ZEIGER AUF<br />

IVARIABLE BEREITSTELLEN<br />

STRINGVARIABLE ?<br />

NEIN ~ DATENFEHLER<br />

ZEIGER AUF VARIABLE MERKEN<br />

SYNTAX Komma<br />

EIN-BYTE-WERT NACH<br />

GLEICH NULL ?<br />

JA ~ DATENFEHLER<br />

AB STELLE MERKEN<br />

SYNTAX Komma<br />

9587 2573 19 ADD H<br />

9588<br />

9589<br />

9590<br />

9591<br />

9592<br />

9593<br />

9594<br />

9595<br />

9596<br />

9597<br />

9598<br />

9599<br />

9600<br />

9601<br />

9602<br />

DE/ACCU 9603<br />

9604<br />

9605<br />

9606<br />

9607<br />

9608<br />

9609<br />

9610<br />

9611<br />

9612<br />

2574<br />

2575<br />

2576<br />

2577<br />

2578<br />

257A<br />

257B<br />

257C<br />

257E<br />

257F<br />

2580<br />

2581<br />

2582<br />

2583<br />

2584<br />

2586<br />

2587<br />

2588<br />

2589<br />

258A<br />

258C<br />

3C<br />

5F<br />

08<br />

B9<br />

38<br />

79<br />

BB<br />

38<br />

7B<br />

E5<br />

D9<br />

El<br />

47<br />

B7<br />

28<br />

lA<br />

77<br />

13<br />

23<br />

10<br />

Ei<br />

01<br />

01<br />

06<br />

FA<br />

INC A<br />

LD E.A<br />

EX AF<br />

CP C<br />

JR C.<br />

LD A.C<br />

CP E<br />

JR C.<br />

LD A.<br />

PUSH<br />

EXX<br />

POP H<br />

LD B.A<br />

OR A<br />

JR Z.<br />

LD A.<br />

LD (H<br />

INC D<br />

INC H<br />

DJNZ<br />

PCP H


SEITE<br />

9613 258D<br />

RES TORE<br />

9614 258E<br />

9615 258F<br />

9616<br />

9617<br />

9618 2592<br />

9619 2593<br />

9620<br />

9621<br />

9622 2596<br />

9623 2597<br />

9624 2598<br />

9625 2599<br />

9626 259A<br />

9627 259B<br />

9628 259C<br />

9629<br />

9630 259E<br />

9631 259F<br />

9632 25AO<br />

9633 25A1<br />

9634 25A2<br />

9635<br />

9636<br />

9637<br />

9638 25A6<br />

9639 25A7<br />

Befehl<br />

9640 25A8<br />

9641<br />

9642<br />

9643 25AB<br />

9644<br />

9645 25AD<br />

9646 25AE<br />

9647<br />

9648 25BO<br />

9649<br />

9650<br />

9651 25B3<br />

9652 25B4<br />

9653 25B5<br />

9654 25B6<br />

9655 25B7<br />

9656 25B8<br />

9657 25B9<br />

9658 25BA<br />

9659 25BB<br />

9660 25BC<br />

9661 25BD<br />

9662 25BE<br />

9663<br />

9664<br />

9665<br />

9666 25C2<br />

172<br />

BASIC 1Z-013B<br />

C9 RET<br />

auf Programmanfang<br />

AF XOR A<br />

32 2E 27 LD (272E).A<br />

E5 PUSH HL<br />

2A BF 6A LD HL. (6ABF)<br />

5E LD E. (HU<br />

23 INC HL<br />

56 LD D. (HU<br />

7A LD A.O<br />

B3 OR E<br />

1B DEC DE<br />

28 04 JR Z. 04 ~ 25A2H<br />

23 INC HL<br />

5E LD E. (HU<br />

2C INC L<br />

56 LD D. (HU<br />

ED 53 2A 27 LD (272A).DE<br />

E1 POP HL<br />

C9 RET<br />

RESTORE<br />

CD 66 1C CALL 1C66<br />

28 E1 JR Z. EI ~ 258EH<br />

23 INC HL<br />

FE OC CP OC<br />

C2 C7 25 JP NZ. 25C7<br />

5E LD E. (HU<br />

23 INC HL<br />

56 LD D. (HU<br />

23 INC HL ;<br />

EB EX OE.HL<br />

23 I NC HL<br />

23 INC HL<br />

4E LD C. (HU<br />

23 INC HL ;<br />

46 LD B. (HU ;<br />

23 INC HL<br />

ED 43 2A 27 LD (272A).BC<br />

CD C4 26 CALL 26C4<br />

V1.0A<br />

NÄCHSTER BEFEHL<br />

CODE KEINE DATEN GELESEN<br />

DATA - FLAG<br />

PROGRAM<strong>MZ</strong>EIGER MERKEN<br />

BASIC - PROGRAMMANFANG<br />

10FFSET AUF NÄCHSTE<br />

I ZEILE HOLEN<br />

I<br />

IOFFSET GLEICH NULL?<br />

KEIN PROGRAMM VORHANDEN<br />

'ZEILENNUMMER DER ERSTEN<br />

'ZEILE HOLEN<br />

I<br />

'ZEILENNUMMER DER DA TA­<br />

I ZEILE MER.


SEITE 174<br />

BASIC 1Z-013B V1_0A BAS~C 1Z<br />

9720<br />

9721<br />

9722<br />

9723<br />

9724<br />

9725<br />

9726<br />

9727<br />

9728<br />

9729<br />

9730<br />

9731<br />

25F8 CA 13 26 JP Z. 2613 IJA<br />

I<br />

+ KEINE DATEN<br />

VORHANDEN<br />

MEHR DATA-Wert aus Programm be<br />

der angegebenen Variablen<br />

25FB 30 20 JR NC. 20 ~ 261DH ZEIGER STEHT AUF DA TA-WERT 9779<br />

9780<br />

25FD 2A BF 6A LD HL. (6ABF) BASIC-PROGRAMMANFANG 9781<br />

2600<br />

2601<br />

2602<br />

2603<br />

7E<br />

23<br />

B6<br />

28 OE<br />

LD A. (HU<br />

INC HL<br />

OR (HU<br />

JR Z. OE + 2613H<br />

IOFFSET GLEICH<br />

I<br />

ENDE PROGRAMM<br />

NULL? 9784<br />

2633 ~D 5B 03 38 LD OE<br />

9782<br />

9783 2637 06 00 LD B.<br />

9785<br />

9786<br />

9787<br />

2639 CD 14 54 CALL<br />

9732 9788 263C FE 22 CP 2<br />

9733 2605 23 INC HL 9789<br />

263E 20 19 JR NZ<br />

9734<br />

9735<br />

9736<br />

9737<br />

9738<br />

2606<br />

2607<br />

2608<br />

2609<br />

5E<br />

23<br />

56<br />

ED 53 2A 27<br />

LD E. (HL)<br />

INC HL<br />

LD<br />

LD<br />

D. (HU<br />

(272A).DE<br />

; I ZEILENNUMMER<br />

IDATA - ZEILE<br />

DER<br />

HOLEN<br />

DATA-ZEILENNUMMER<br />

9739 9795 2643 28 26 JR Z.<br />

9740 9796<br />

9741 2600 23 INC HL ZEIGER AUF BASIC-PROGRAMM 9797 2645 23 INC H<br />

9742 260E CD C4 26 CALL 26C4 I ZEIGER IN HL AUF<br />

9798 2646 FE 22 CP 2<br />

9743<br />

I NÄCHSTES DATA-STATEMENT<br />

9799<br />

9744 I SETZEN 9800 2648 28 05 JR Z.<br />

9745 2611 30 OA JR NC. OA + 261DH ZEIGER STEHT AUF DATA-TEXT 9801<br />

9746 9802 264A 12 LD


SEITE 176<br />

BASIC 1Z-013B V1_0A BASIC 1Z<br />

9834 9890 26A2 EB EX DE<br />

9891 26A3 CD 14 54 CALL 5<br />

Wert im Stringarbeitsbereich der<br />

9835 266B E5 PUSH HL<br />

9836 266C F5<br />

9837 2660 AF<br />

9838 266E 12<br />

LO<br />

9839 266F 78<br />

LD<br />

2670 32 8C 26 LD<br />

9840<br />

9841<br />

eingetragenen Variablen zuweisen<br />

• REGISTER RETTEN<br />

PUSH AF<br />

XOR A<br />

•ACCU AUF NULL<br />


SEITE 178<br />

BASIC 1Z-013B V1.0A BASIC 1Z<br />

9948<br />

9949<br />

9950<br />

9951<br />

9952<br />

9953<br />

26DC<br />

26DD<br />

26DE<br />

26DF<br />

26EO<br />

05<br />

5E<br />

23<br />

56<br />

ED 53 EC 26<br />

PUSH DE<br />

LO E. (HU<br />

INC HL<br />

LO O. (HU<br />

LD (26EC).DE<br />

REGISTER RETTEN<br />

IZEILENNUMMER HOLEN<br />

I<br />

IZEILENNUMMER<br />

I EINTRAGEN<br />

IN ROUTINE<br />

9954<br />

9955 10002<br />

9956 26E4 Dl POP DE GERETTETE REGISTER HOLEN<br />

9957 26E5 18 E7 JR E7 ~ 26CEH WEITER NACH DATEN SUCHEN<br />

9958<br />

9959 26E7 FE 94 CP 94 DATA (Zwischencode) ?<br />

9960<br />

9961 26E9 20 E3 JR NZ. E3 ~ 26CEH I NICHT DATA ~<br />

10006<br />

9962<br />

I WEITER SUCHEN<br />

10007<br />

9963 26EB 11 00 00 LO DE. 0000<br />

IAKTUELLE ZEILENNUMMER<br />

10008<br />

9964 I DER DATA - ZEILE 1~)O9<br />

9965 I (wird eingetragen) 10010<br />

996626EE EO 53 2A 27 LO (272A).OE ZEILENNUMMER DER DATA-ZEILE<br />

9967<br />

9968<br />

9969<br />

9970 26F2 23 INC HL DATA üBERSPRINGEN 10014<br />

997126F3 22 2C 27 LD (272C).HL ZEIGER AUF DATA-TEXT 10015<br />

9972<br />

9973<br />

9974 9975<br />

26F6 3 E 02 LD A. 02 CODE ZEIGER STEHT AUF TEXT<br />

9976 26F8 32 2E 27 LD (272E).A OATA - FLAG 10019<br />

9997<br />

9998<br />

9999<br />

10000<br />

10001<br />

10003<br />

10004<br />

10005<br />

auf Syntax Klammer zu unte<br />

270D<br />

2710<br />

2713<br />

2714<br />

2715<br />

2716<br />

2717<br />

10011 271B<br />

10012 271 C<br />

1~)13<br />

10016<br />

10017<br />

10018<br />

9977 10020<br />

9978<br />

9979 26FB B7 OR A CARRY-FLAG ZURüCKSETZEN 10021 2725 00<br />

9980 26FC Dl POP DE GERETTETES REGISTER HOLEN<br />

9981 26FD C9 RET 10022<br />

10023<br />

2720<br />

2721<br />

CO<br />

C3<br />

3F<br />

20<br />

ru)<br />

14<br />

04<br />

2726 00 00<br />

54<br />

58<br />

86<br />

70 00 00 00<br />

91<br />

28 CO 00 00<br />

00<br />

00 00 00 00<br />

CALL 5<br />

JP 580<br />

?<br />

Spa<br />

9982 26FE 3E 01 LD A. 01 CODE ENDE PROGRAMM 10024 2728 00<br />

9983 10025 2729 00<br />

9984 2700 32 2E 27 LD (272E).A DATA - FLAG<br />

9985<br />

9986<br />

9987 2703 D1 POP DE , GERETTETES REGISTER HOLEN<br />

9988 2704 C9 RET 10028<br />

10029<br />

10026<br />

10027<br />

272A FF FF<br />

272C 00 00<br />

testen. ob nächstes Programmbyte Befehlsendezeichen ist 10030 272E 00<br />

9989 2705 CD 14 54 CALL 5414 IPROGRAM<strong>MZ</strong>EIGER IN HL 10031 272F 00<br />

9990 lAUF NÄCHSTES RELEVANTES<br />

9991 I ZEICHEN STELLEN<br />

9992 2708 9993 2709 B7 OR A ZEILENENDE ca RET Z JA<br />

?<br />

9994 270A FE 3A CP 3A


10035<br />

10036<br />

10041<br />

10043<br />

10044<br />

10046<br />

10047<br />

10048<br />

10051 2743 B7 OR A<br />

10053<br />

10054<br />

10060<br />

10062<br />

10067<br />

10069<br />

10070<br />

10072<br />

10077<br />

10078<br />

10081<br />

10082<br />

10085<br />

10086<br />

10089<br />

FORMAT<br />

10091<br />

10093<br />

10094<br />

10097<br />

10098<br />

10100<br />

10101<br />

10105 2779 21<br />

10106<br />

10107<br />

10109<br />

10111<br />

10112<br />

10114<br />

10116<br />

101 17<br />

10119<br />

10121<br />

10122<br />

10124<br />

10126<br />

10127<br />

10129<br />

10131<br />

10132<br />

10134<br />

10136<br />

10137<br />

10139<br />

10141<br />

10142<br />

10144 <br />

1Z<br />

JP NZ,<br />

CP 26<br />

CP 23<br />

CP 2A<br />

CP<br />

JP Z,<br />

24<br />

CP 2E<br />

CP 2B<br />

2<br />

27<br />

JP Z. 27<br />

JP Z. 27<br />

JP Z, 21<br />

BASIC<br />

Bereitgestellten Zahl-/Stri<br />

USING üBERSPRINGEN 10090 .276A FE 03 CP 03<br />

lAUSDRUCK (HL) AUSWERTEN 10092 276C C2 B4 28<br />

10039 2737 2A B5 6A LD HL, (6AB5) ANFANG STRINGTEXTBEREICH Stringtext entsprechend USI<br />

10040<br />

10095 276F 05 PUSH OE<br />

10096 2770 2A B5 6A LD HL, (<br />

ED 43 74 27 LO (2774),BC 10FFSET AUF AKTUELLE 10099 2773 11 10 00 LD DE,<br />

10102 2776 19 ADD HL,<br />

10103 2777 7E LD A, (H<br />

10104 2778 B7 OR A<br />

GLEICH NULL ? CA (li<br />

JP Z, 2<br />

10108 277C FE 21 CP 21<br />

10110 277E CA E4 27 JP Z, 2<br />

10115 2783 CA 5E 28<br />

36 00 LD (HU. 00 TEXTENDE EINTRAGEN JP Z.<br />

10118 2786 FE 23<br />

10120 2788 CA 01 21<br />

JP Z, 2<br />

10113 2781 FE 26<br />

CALL lC66 I UNTERSUCHEN, OB NÄCHSTES 10125 278D CA CD 27<br />

I SCHUB AUSGEBEN UND 10123 278B FE 2A<br />

10128 2790 FE 24<br />

CA D9 27<br />

IUSING-FORMAT AUSGEBEN JP Z, 27<br />

GERETTETES REGISTER HOLEN CP FB<br />

10130 2792<br />

10135 2797 CA D9 27<br />

10140 279C CA Cl 27<br />

10133 2795 FE FB<br />

10138 279A FE 2E<br />

10143 279F FE 2B<br />

10145 27Al<br />

CA 01 21<br />

I ZEIGER AUF ERGEBNIS NACH<br />

I UNTERSUCHEN, OB NÄCHSTES<br />

10064 2750 Cl POP BC GERETTETES REGISTER HOLEN<br />

10066 IPROGRAMMBYTE ZEILENENDE,<br />

10088 2768 18 E7 JR E7 + 2751H • I UNTERSUCHEN, OB WEITERE<br />

ISTRINGWERT ENTSPRECHEND<br />

CALL 276A I BEREITGESTELLTEN ZAHL-/<br />

10076 2751: CD 8B 52 CALL 528B I AUSDDRUCK AUSWERTEN UNO<br />

JP NC, IFEC IZEILENENOE + ZEILENVOR­<br />

ZEIGER AUF STELLE FORMAT<br />

10073 IBEFEHLSENOEZEICHEN IST<br />

I WERTE ANGEGEBEN SIND<br />

PROGRAM<strong>MZ</strong>EIGER MERKEN<br />

I STELLE USING - FORMAT<br />

• NACH DE BEREITSTELLEN<br />

I UND ZEIGER AUF STRING<br />

10087 2767 EI POP HL • PROGRAM<strong>MZ</strong>EIGER HOLEN<br />

PROGRAM<strong>MZ</strong>EIGER MERKEN<br />

IPROGRAMMBYTE GLEICH<br />

POP HL PROGRAM<strong>MZ</strong>EIGER HOLEN<br />

LD BC, 0010 10FFSET FüR SPEICHER<br />

LÄNGE USING-FORMAT<br />

10E BEREITSTELLEN<br />

10056 2748 77 LD (HU ,A I ZWISCHENSPEICHER<br />

I NÄCHSTER BEFEHL<br />

LO A,


SEITE 182<br />

BASIC 1Z-013B V1.0A<br />

BASIC 1Z<br />

10146<br />

10147<br />

10148 27A4 FE C4 CP C4 (Sonderzeichen ausgeb.) Untersuchen. ob Währungszei<br />

10149<br />

10150 27A6 C2 AF 27 JP NZ, 27AF I NORMALES TEXTZEICHEN 10201 27D9 23 INC HL<br />

10151 I -+ AUSGEBEN 10202 27DA 7E LO A. (H<br />

10152 10203 27DB FE 2A CP 2A<br />

10153 27A9 23 INC HL ZEIGER AUF USING-FORMAT 10204<br />

10154 27AA 7E LD A, (HU NÄCHSTES ZEICHEN HOLEN 10205 2700 CA 01 21 JP Z, 2<br />

10155 27AB B7 OR A FORMAT-ENDE ? 10206<br />

10156 27AC CA 01 21 JP Z, 2101 JA -+ DATENFEHLER 10207<br />

10157 10208 27EO 2B OEC HL<br />

10158 10209 27E1 7E LD A. (H<br />

10159 27AF CD lE IF CALL IFIE , IASCII-ZEICHEN IM ACCU 10210 27E2 18 CB JR CB<br />

10160 lAUF GEWÄHLTEM GERÄT 10211<br />

10161 I AUSGEBEN<br />

10162 27B2 23 INC HL ZEIGER AUF USING-FORMAT<br />

10163 27B3 ED 5B B5 6A LD OE, (6AB5) ANFANG STRINGTEXTBEREICH Ein Zeichen Text entspechen<br />

10164<br />

10165 10212 27E4 E3 EX (SP)<br />

10166 102 13 27E5 7E LD A, (H<br />

10167 27B7 B7 OR A CARRY-FLAG ZURüCKSETZEN 10214 27E6 B7 OR A<br />

10168 27B8 E5 PUSH HL ZEIGER AUF USING-FORMAT 10215 27E7 3E 20 LO A. 2<br />

10169 27B9 ED 52 SBC HL,DE NEUEN OFFSET ERRECHNEN 10216<br />

10170 10217 27E9 28 OB JR Z. O<br />

10171 27BB 22 74 27 LD (2774),HL UND MERKEN 10218<br />

10172 10219 2 7EB 23 INC HL<br />

10173 10220 2 7EC 7E LD A. (H<br />

10174 27BE EI POP HL ZEIGER AUF USING-FORMAT 10221 2 7EO 23 INC HL<br />

10175 27BF 18 B6 JR B6 -+ 2777H WEITER UNTERSUCHEN 10222 27EE 66 LD H. (H<br />

10176 10223 27EF 6F LD L.A<br />

10224 27FO ED 5B B5 6A LD OE, (<br />

10225 <br />

untersuchen, ob Punkt im Zahl format steht 10226 <br />

10227 <br />

10177 27C1 23 INC HL ZEIGER AUF USING-FORMAT 102 28 27F4 19 ADO HL.<br />

10178 27C2 7E LD A, (HU , NÄCHSTES TEXTZEICHEN 10229 27F5 7E LD A. (H<br />

10179 27C3 FE 23 CP 23 # (Nummernzeichen) 10230 27F6 CD lE IF CALL IF<br />

10180 10231<br />

10181 27C5 CA 01 21 JP Z, 2101 ZAHLFORMAT -+ DATENFEHLER 10232<br />

10182 10233 27F9 EI POP HL<br />

10183<br />

10184 27C8 2B DEC HL ZEIGER AUF USING-FORMAT<br />

10185 27C9 3E 2E LD A, 2E (Punkt) 10186<br />

10187 27CB 18 E2 JR E2 -+ 27AFH ZEICHEN IM ACCU AUSGEBEN 10234 27FA 23 INC HL<br />

10188 10235 27FB 7E LD A. (H<br />

10236 27FC B7 OR A<br />

10237 27FO 28 4F JR Z. 4<br />

untersuchen, ob Zweites Schecksperrzeichen angegeben ist 10238<br />

10239 27FF FE 21 CP 21<br />

10189 27CO 23 INC HL ZEIGER AUF USING-FORMAT 10240<br />

10190 27CE 10191 27CF 7E LO A, (HU NÄCHSTES FORMAT-ZEICHEN 10241 FE 2A CP 2A * (Schecksperre) 10242<br />

2801 28 50 JR Z. 5<br />

10192 10243 2803 · FE 23 CP 23<br />

10193 2701 CA 01 21 JP Z • .2101 ZAHLFORMAT + OATENFEHLER 10244<br />

10194 10245 2805 28 4C JR Z. 4<br />

10195 10246<br />

10196 2704 2B OEC HL ZEIGER AUF USING-FORMAT 10247 2807 FE 26 CP 26<br />

10200<br />

10197 2705 3E 2A LD A. 2A *<br />

10248<br />

10198 10249 2809 28 48 JR Z. 4<br />

10199 2707 18 06 JR 06 -+ 27AFH ZEICHEN IM ACCU AUSGEBEN


SEITE 184 <br />

BASIC 1Z-013B V1_0A <br />

10250<br />

10251 280B FE 2B CP 2B : + NÄCHSTES ZEICHEN HOLEN<br />

10289 2831 57 LD D.A UND MERKEN<br />

10290 2832 FE 23 CP 23 * NÄCHSTES FORMATZEICHEN<br />

10299 283B 57 LO O.A MERKEN<br />

10300 283C F1 POP AF ERSTES ZEICHEN HOLEN<br />

10301 283D BA CP 0 VERGLEICHEN<br />

10302 283E 18 07 JR 07 ~ 2847H lüBERPRüFEN. OB ANFANG<br />

10303 I NÄCHSTES FORMAT<br />

BASIC 1Z<br />

GberprUfen. ob zwei Scheck<br />

10304 2840 23 INC HL<br />

10305 2841 7E LO A. (H<br />

10306 2842 57 LO O.A<br />

10307 2843 FE 2A CP 2A<br />

10308<br />

10309 2845 3E 2A LO A.<br />

10310<br />

10311 2847 2B OEC HL<br />

10312 2848 20 OF JR NZ.<br />

10313<br />

10314 284A 7A LO A.O<br />

10315 284B B7 OR A<br />

10316 284C 20 05 JR NZ.<br />

10317<br />

10318 284E 21 10 00 LO HL.<br />

10319<br />

10320<br />

10321 2851 18 07 JR 07<br />

10322<br />

Offset auf Anfang nächstes<br />

10323 2853 EO 5B B5 6A LO OE.<br />

10324<br />

10325<br />

10326<br />

10327 2857 B7 OR A<br />

10328 2858 ED 52 SBC HL<br />

10329<br />

10330 285A 22 74 27 LO (27<br />

10331<br />

10332<br />

10333 2850 C9 RET<br />

mehrere Textzeichen nach U<br />

10334 285E 16 02 LO D.<br />

10335<br />

10336 2860 23 INC HL<br />

10337 2861 7E LD A. (H<br />

10338 2862 FE 26 CP 26<br />

10339<br />

10340 2864 28 08 JR Z.<br />

10341<br />

10342 2866 14 INC 0<br />

10343 2867 FE 20 CP 20<br />

10344<br />

10345 2869 28 F5 JR Z.<br />

10346<br />

10347 2868 C3 01 21 JP 2101<br />

10348<br />

10349


SEITE 186 <br />

BASIC 1Z-013B V1.0A <br />

10350 286E E3 EX (SP) .HL FORMAT + DESCRIPTOR ~<br />

10351 286F 7E LD A. (HL> LÄNGE STRING HOLEN<br />

10352 2870 BA CP D FORMATLÄNGE<br />

10353 2871 38 17 JR C. 17 ~ 288AH STRING IST KüRZER FORMAT<br />

10354<br />

10355 2873 23 INC HL<br />

10356 2874 7E LD A. (HL> 'OFFSET AUF STRING HOLEN<br />

10357 2875 23 INC HL I<br />

10358 2876 66 LD H. (HL> I<br />

10359 2877 6F LD L.A I<br />

10360 2878 C5 PUSH BC REGISTER RETTEN<br />

10361 2879 ED 4B B5 6A LD BC. (6AB5) ANFANG STRINGTEXTBEREICH<br />

10362<br />

10363<br />

10364<br />

10365 287D 09 ADD HL.BC ZEIGER AUF STRING ERRECHNEN<br />

10366 287E Cl POP BC GERETTETES REGISTER HOLEN<br />

10367 287F 7E LD A. (HL> EIN ZEICHEN TEXT HOLEN<br />

10368 2880 CD lE 1F CALL IFIE IASCII-ZEICHEN IM ACCU<br />

10369 lAUF GEWÄHLTEM GERÄT<br />

10370 I AUSGEBEN<br />

10371 2883 23 INC HL ZEIGER AUF TEXTSTRING<br />

10372 2884 15 DEC D RESTANZAHL ZEICHEN<br />

10373 2885 20 F8 JR NZ. F8 ~ 287FH WEITERE ZEICHEN AUSGEBEN<br />

10374<br />

10375 2887 C3 F9 27 JP 27F9 I UNTERSUCHEN. OB TEXT­<br />

10376 IKONSTANTE IM USING-FORMAT<br />

10377<br />

String. der kürzer Format und Rest Spaces ausgeben<br />

10378 288A 5E LD E. (HL> LÄNGE STRING HOLEN<br />

10379 288B 23 INC HL<br />

10380 288C 7E LD A. (HL> I OFF SET AUF STRING<br />

10381 288D 23 INC HL I HOLEN<br />

10382 288E 66 LD H. (HL> I<br />

10383 288F 6F LD L.A I<br />

10384 2890 7B LD A.E STRINGLÄNGE<br />

10385 2891 B7 OR A GLEICH NULL ?<br />

10386 2892 28 15 JR Z. 15 ~ 28A9H NUR Spaces AUSGEBEN<br />

10387<br />

10388 2894 C5 PUSH BC REGISTER RETTEN<br />

10389 2895 ED 48 B5 6A LD BC. (6AB5) ANFANG STRINGTEXTBEREICH<br />

10390<br />

10391<br />

10392<br />

10393 2899 09 ADD HL.BC ZEIGER AUF STRING ERRECHNEN<br />

10394 289A Cl POP BC GERETTETES REGISTER HOLEN<br />

10395 289B 7E LD A. (HL> I EIN ZEICHEN TEXT AUSGEBEN<br />

10396 289C CD lE IF CALL 1FIE 'ASCII-ZEICHEN IM ACCU<br />

10397 lAUF GEWÄHLTEM GERÄT<br />

10398 • AUSGEBEN<br />

10399 289F 23 INC HL ; ZEIGER AUF TEXT<br />

10400 28AO 1D DEC E RESTANZAHL ZEICHEN TEXT<br />

10401 28Al 28 OB JR Z. OB ~ 28AEH ; REST Sp~ces AUSGEBEN<br />

10402<br />

10403 28A3 15 DEC D RESTANZAHL ZEICHEN FORMAT<br />

10404 28A4 20 F5 JR NZ. F5 ~ 289BH 'WEITERE ZEICHEN TEXT<br />

10405 • AUSGEBEN<br />

10406 28A6 C3 F9 27 JP 27F9 $ • UNTERSUCHEN. OB TEXT­<br />

10407 IKONSTANTE IN FORMAT<br />

BASIC 1Z<br />

10408<br />

Bei Stringformat nicht vor<br />

10409 28A9 3E 20 LD A.<br />

10410<br />

10411 28AB CD lE IF CALL I<br />

10412<br />

10413<br />

10414 28AE 15 DEC D<br />

10415 28AF 20 F8 JR NI.<br />

10416<br />

10417 28Bl C3 F9 27 JP 27F<br />

10418<br />

10419<br />

Real-Zahl (OE) entsprechen<br />

10420 28B4 D5 PUSH O<br />

10421 28B5 AF XOR A<br />

10422 28B6 32 48 2A LD (2A<br />

10423<br />

10424<br />

10425 28B9 32 99 2A LD (2A<br />

10426<br />

10427<br />

10428 28BC 32 80 2A LD (2A<br />

10429<br />

10430<br />

lQ431 28BF 32 3E 2A LD (2A<br />

10432<br />

10433<br />

10434 28C2 32 F8 29 LD (29<br />

10435<br />

10436<br />

10437 28C5 32 25 2A LD (2A<br />

10438<br />

10439<br />

10440 28C8 32 43 2A LD (2A<br />

10441<br />

10442<br />

10443 28CB 32 Fl 29 LD (29<br />

10444<br />

10445<br />

10446 28CE 3D DEC A<br />

10447 28CF 32 EE 29 LD (29<br />

10448<br />

10449<br />

10450 28D2 2A B5 6A LD HL.<br />

10451<br />

10452<br />

10453 2805 ED 5B 74 27 LD DE.<br />

10454<br />

10455<br />

10456<br />

10457 28D9 19 ADD HL<br />

10458 28DA 7E LD A.<br />

10459 28DB B7 OR A<br />

10460 28DC CA Ot 21 JP Z.<br />

10461


SEITE 188<br />

BASIC 1Z-013B V1.0A<br />

BASIC 1Z<br />

10462<br />

10463 28DF<br />

10464 -<br />

10465 28El<br />

10466<br />

10467<br />

10468 28E4<br />

10469<br />

10470 28E6<br />

10471<br />

10472<br />

10473 28E9<br />

10474<br />

10475 28EB<br />

10476<br />

10477<br />

10478 28EE<br />

10479<br />

10480 28FO<br />

10481<br />

10482<br />

10483 28F3<br />

10484<br />

10485 28F5<br />

10486<br />

10487<br />

10488 28F8<br />

10489<br />

10490 28FA<br />

10491<br />

10492<br />

10493 28FD<br />

10494<br />

10495 28FF<br />

10496<br />

10497<br />

10498 2902<br />

10499<br />

10500<br />

10501<br />

10502<br />

10503<br />

10504<br />

10505<br />

10506<br />

10507<br />

10508<br />

10509<br />

10510<br />

10511<br />

10512<br />

FE<br />

CA<br />

FE<br />

CA<br />

FE<br />

CA<br />

FE<br />

CA<br />

FE<br />

CA<br />

FE<br />

CA<br />

FE<br />

CA<br />

FE<br />

21<br />

01 21<br />

26<br />

01 21<br />

23<br />

5C 29<br />

2A<br />

17 29<br />

24<br />

3A 29<br />

FB<br />

3A 29<br />

2E<br />

4F 29<br />

28<br />

CP<br />

JP<br />

CP<br />

JP<br />

CP<br />

JP<br />

CP<br />

JP<br />

CP<br />

JP<br />

CP<br />

JP<br />

CP<br />

JP<br />

CP<br />

21<br />

Z. 2101<br />

26<br />

Z. 2101<br />

23<br />

Z. 295C<br />

2A<br />

Z. 2917<br />

24<br />

Z. 293A<br />

FB<br />

Z. 293A<br />

2E<br />

Z. 294F<br />

28<br />

;<br />

(Ein Zeichen String)<br />

STRINGFORMAT + DATENFEHLER<br />

& (mehrere Textzeichen)<br />

STRINGFORMAT + DATENFEHLER<br />

I (Nummernzeichen)<br />

I ANZAHL VORKOMMASTELLEN<br />

I AUSZÄHLEN<br />

* (Schecksperre)<br />

I UNTERSUCHEN. OB ZWEITES<br />

I ZEICHEN ALS FORMAT-ANFANG<br />

$ (Währungszeichen)<br />

I UNTERSUCHEN. 08 ZWEITES<br />

I ZEICHEN ALS FORMAT-ANFANG<br />

L (Währungszeichen)<br />

I UNTERSUCHEN. OB ZWEITES<br />

I ZEICHEN ALS FORMAT-ANFANG<br />

(Punkt)<br />

IUNTERSUCHEN. 08 PUNKT<br />

I IM ZAHLFORMAT STEHT<br />

+ (Vorzeichen plus)<br />

10519<br />

10520<br />

10521<br />

10522<br />

10523<br />

10524<br />

10525<br />

10526<br />

10527<br />

10528<br />

10529<br />

10530<br />

10531<br />

10532<br />

10533<br />

10534<br />

10535<br />

10536<br />

10537<br />

10538<br />

10539<br />

10540<br />

10541<br />

10542<br />

10543<br />

10544<br />

10545<br />

10546<br />

10547<br />

10548<br />

10549<br />

10550<br />

10551<br />

10552<br />

10553<br />

auf zweites Schecksperrzei<br />

2904 CA 45 29 JP Z. 2945 I MERKEN UND ANZAHL VOR­<br />

I KOMMASTELLEN AUSGEBEN bei erstem Währungszeichen<br />

2907<br />

2909<br />

290B<br />

290C<br />

290D<br />

290E<br />

10513 2911 CD lE IF CALL IFIE<br />

IASCII-ZEICHEN IM ACCU<br />

10514 lAUF GEWÄHLTEM GERÄT<br />

10515<br />

10516 2914 23 INC HL ;<br />

18 C3 JR C3 + 28DAH ; WEITER UNTERSUCHEN<br />

10517 2915<br />

10518<br />

FE C4<br />

20 06<br />

23<br />

7E<br />

B7<br />

CA 01<br />

21<br />

CP C4<br />

JR NZ. 06<br />

INC HL<br />

LD A. (HL><br />

OR A<br />

JP Z. 2101<br />

+ 2911H<br />

;<br />

(Nächstes Zeichen ausg.<br />

ZEICHEN AUSGEBEN<br />

ZEIGER AUF USING-FORMAT<br />

NÄCHSTES ZEICHEN HOLEN<br />

FORMAT-ENDE ?<br />

JA + DATENFEHLER<br />

2917<br />

2918<br />

29 19<br />

291A<br />

291C<br />

291E<br />

2921<br />

2922<br />

2923<br />

2924<br />

2926<br />

2928<br />

292A<br />

292C<br />

292E<br />

292F<br />

2930<br />

2933<br />

2935<br />

2938<br />

10554 293A<br />

10555 293B<br />

10556 293C<br />

10557 2930<br />

10558<br />

10559 293F<br />

10560 2940<br />

10561 2941<br />

10562<br />

10563 2943<br />

10564<br />

23<br />

BE<br />

2B<br />

20 F5<br />

3E 01<br />

32 99<br />

23<br />

23<br />

7E<br />

16 02<br />

FE FB<br />

28 04<br />

FE 24<br />

20 3 1<br />

23<br />

14<br />

32 F4<br />

3E 01<br />

32 80<br />

18 25<br />

23<br />

BE<br />

28<br />

20<br />

23<br />

23<br />

16<br />

18<br />

02<br />

02<br />

E8<br />

2A<br />

2A<br />

2A<br />

INC HL<br />

CP (H<br />

DEC HL<br />

JR NZ<br />

LD A.<br />

LD (2A<br />

INC HL<br />

INC HL<br />

LD A.<br />

LD D.<br />

CP FB<br />

JR Z.<br />

CF' 24<br />

JR NZ<br />

INC HL<br />

INC 0<br />

LD (2A<br />

LD -. A •.<br />

LD (2A<br />

JR 25<br />

INC HL<br />

CP (H<br />

DEC HL<br />

JR NZ<br />

INC HL<br />

INC HL<br />

LO D.<br />

JR EB<br />

I AUSGEBEN<br />

ZEIGER AUF USING-FORMAT Vorzeichen vor Zahl format<br />

10565<br />

10566<br />

2945 3E 01 LO A.<br />

10567 2947 32 48 2A LD (2A<br />

10568<br />

10569<br />

10570 294A 23 I NC HL<br />

;


SEITE 190 <br />

BASIC 1Z-013B V1_0A <br />

10571 294B 16 01 LD D. 01 ; EIN VORKOMMASTELLE<br />

10572<br />

10573 2940 18 10 JR 10 ... 295FH I ANZAHL VORKOMMSTELLEN<br />

10574 I AUSZÄHLEN<br />

bei Punkt untersuchen. ob im Zahl format<br />

10575 294F 23 INC HL ZEIGER AUF USING-FORMAT<br />

10576 2950 7E LD A. (HL> NÄCHSTES FORMAT-ZEICHEN<br />

10577 2951 2B DEC HL ZEIGER AUF USING-FORMAT<br />

10578 2952 FE 23 CP 23 # (Nummernzeichen><br />

10579<br />

10580 2954 3E 2E LD A. 2E (Punkt)<br />

10581<br />

10582 2956 20 B9 JR NZ. B9 ... 2911H INICHT ZAHLFORMAT ...<br />

10583 I ZEICHEN AUSGEBEN<br />

10584 2958 16 00 LD D. 00 I VORGABE VORKOMMASTELLEN<br />

10585<br />

10586 295A 18 03 JR 03 ... 295FH VORKOMMASTELLEN MERKEN<br />

10587<br />

Anzahl VorkommastelIen aus Format auszählen<br />

10588 295C 16 01 LD D. 01 VORGABE ANZAHL STELLEN<br />

10589<br />

10590 295E 23 INC HL ZEIGER AUF USING-FORMAT<br />

10591 295F EB EX OE.HL NACH OE<br />

10592 2960 25 OEC H ZÄHLER VORKOMMASTELLEN<br />

10593 2961 24 INC H ZÄHLER VORKOMMASTELLEN<br />

10594 2962 1A LD A. <br />

10616<br />

10617 2979 20 08 JR NZ. 08 ... 2983H AUF PLUS UNTERSUCHEN<br />

10618<br />

10619 297B 3E 01 LD A. 01 CODE VORZEICHEN<br />

10620<br />

10621 2970 32 3E 2A LD (2A3E>.A FLAG - HINTEN ANGEGEBEN<br />

10622<br />

BASIC 1Z<br />

10623<br />

10624 2980 13 INC O<br />

10625 2981 18 10 JR 10<br />

10626<br />

10627 29B3 FE 2B CP 2<br />

10628<br />

10629 2985 20 OC JR NZ<br />

10630<br />

10631 2987 .3A 48 2A LO A.<br />

10632<br />

10633<br />

10634 298A B7 OR A<br />

10635 2988 20 06 JR NZ<br />

10636<br />

10637 2980 3E 01 LO A,<br />

10638<br />

1063 9 298F 32 43 2A LO (2<br />

10640<br />

10641<br />

10642 2992 13 INC O<br />

10643 2993 IB OEC O<br />

10644 2994 7C LO A,<br />

10645 2995 32 25 2A LO (2<br />

10646<br />

10647<br />

10648 2998 18 33 JR 33<br />

10649<br />

NachkommastelIen auszähle<br />

10650 299A 7C LO A,<br />

10651 299B 32 25 2A LD (2<br />

10652<br />

10653<br />

10654 299E 26 FF LD H.<br />

10655<br />

10656 29AO 24 INC H<br />

10657 29A1 lA LD A.<br />

10658 29A2 13 INC D<br />

10659 29A3 FE 23 CP 2<br />

10660<br />

10661 29A5 28 F9 JR Z.<br />

10662<br />

10663 29A7 FE 20 CP 2<br />

10664<br />

10665 29A9 20 08 JR NZ<br />

10666<br />

10667 29AB 3E 01 LD A.<br />

10668<br />

10669 29AO 32 3E 2A LO (2<br />

10670<br />

10671<br />

10672 29BO 13 INC O<br />

10673 29B1 18 10 JR 10<br />

10674


SEITE 192<br />

BASIC 1Z-013B V1_0A BASIC 1Z<br />

10675<br />

10676<br />

10677<br />

10678<br />

10679<br />

10680<br />

10681<br />

10682<br />

10683<br />

10684<br />

10685<br />

10686<br />

10687<br />

10688<br />

10689<br />

10690<br />

10691<br />

10692<br />

10693<br />

10694<br />

29B3<br />

29B5<br />

29B7<br />

29BA<br />

29B8<br />

29BD<br />

29BF<br />

29C2<br />

29C3<br />

29C4<br />

29C5<br />

FE<br />

20<br />

3A<br />

B7<br />

20<br />

3E<br />

32<br />

13<br />

2B<br />

OC<br />

48<br />

06<br />

01<br />

43<br />

2A<br />

2A<br />

1B<br />

7C<br />

32 EE 29<br />

CP 2B<br />

JR NZ. OC ~<br />

LD A. (2A48)<br />

OR A<br />

JR NZ. 06 ~<br />

LO A. 01<br />

LO (2A43).A<br />

INC OE<br />

DEC OE<br />

LO A.H<br />

LO (29EE).A<br />

29C3H<br />

29C3H<br />

+ (Vorzeichen plus)<br />

INACHKOMMASTELLEN MERKEN<br />

I UND AUF EXPONENT UNTERS.<br />

FLAG + VORNE ANGEGEBEN<br />

GESETZT ?<br />

IJA ~ VORZEICHEN WIRD<br />

IVOR ZAHL GESCHRIEBEN<br />

CODE VORZEICHEN<br />

FLAG + HINTEN ANGEGEBEN<br />

ZEIGER AUF USING-FORMAT<br />

ZEIGER<br />

ANZAHL<br />

MERKEN<br />

AUF USING-FORMAT<br />

NACHKOMMASTELLEN<br />

10731<br />

10732<br />

10733<br />

10734<br />

10735<br />

10736<br />

10737<br />

10738<br />

10739<br />

10740<br />

10741<br />

10742<br />

10743<br />

10744<br />

10745<br />

10746<br />

10747<br />

10748<br />

10749<br />

10750<br />

10695 1~751<br />

10696 29C8 18 03 JR 03 ~ 29COH AUF EXPONENTEN UNTERSUCHEN 10752<br />

10697 10753<br />

10754<br />

10755<br />

10698 29CA D1<br />

POP DE<br />

ZEIGER AUF USING-FORMAT<br />

10756<br />

10699 29CB 18 12 JR 12 ~ 29DFH<br />

ZAHL AUFBEREITEN<br />

10757<br />

10700 10758<br />

10759<br />

10701<br />

10702<br />

10703<br />

10704<br />

10705<br />

10706<br />

10707<br />

10708<br />

10709<br />

10710<br />

10711<br />

29EC<br />

29ED<br />

29EF<br />

29FO<br />

29F2<br />

29F3<br />

29F6<br />

29F7<br />

29F9<br />

29FA<br />

29FC<br />

29FD<br />

29FE<br />

2A01<br />

2A02<br />

2A04<br />

2A05<br />

57<br />

3E<br />

5F<br />

3E<br />

C5<br />

CD<br />

Cl<br />

3E<br />

B7<br />

28<br />

00<br />

00<br />

7E<br />

00<br />

41<br />

3E<br />

C5<br />

D5<br />

3A 25 2A<br />

6F<br />

26 00<br />

19<br />

11 26 6A<br />

10760 2A08 OE 00 LD C.<br />

auf Exponenten im USING - Format untersuchen 10761<br />

29CD<br />

29CF<br />

2900<br />

29D1<br />

2902<br />

2904<br />

2906<br />

2907<br />

26<br />

D5<br />

1A<br />

13<br />

FE<br />

20<br />

25<br />

20<br />

04<br />

5E<br />

F4<br />

LD H. 04<br />

PUSH OE<br />

LD A, (DE)<br />

INC DE<br />

CP 5E<br />

JR NZ. F4<br />

DEC H<br />

JR NZ. F7<br />

~<br />

29CAH<br />

:<br />

;<br />

VIER EXPONENTZEICHEN<br />

ZEIGER AUF ANFANG FORMAT<br />

EIN ZEICHEN FORMAT HOLEN<br />

ZEIGER AUF USING-FORMAT<br />

~ (Exponentenzeichen)<br />

IKEIN EXPONENT-FORMAT ~<br />

I ZEIGER AUF ANFANG HOLEN<br />

RESTANZAHL MINUS EINS<br />

lAUF WEITERE ZEICHEN<br />

I VERGLEICHEN<br />

LD O.A<br />

LD A.<br />

LO E.A<br />

LD A.<br />

PUSH B<br />

CALL 3<br />

POP BC<br />

LD A.<br />

OR A<br />

JR Z.<br />

PUSH B<br />

PUSH D<br />

LD A.<br />

LD<br />

LD<br />

L.A<br />

H.<br />

ADD HL<br />

LD OE.<br />

10762 2AOA 2B DEC HL<br />

2AOB 06 03<br />

LD B.<br />

F7<br />

~ 29DOH<br />

10712<br />

F5<br />

10713 29D9 F1<br />

POP AF<br />

; ZEIGER AUF ANFANG VERWERFEN<br />

10775<br />

10714 290A 3E 01<br />

LD A. 01<br />

CODE EXPONENT AUFBEREITEN<br />

10776 2A18 7E<br />

LD<br />

10715<br />

10777 2A19 FE 20<br />

CP<br />

10716 290C 32 F1 29 LD (29F1).A ; FLAG EXPONENT AUSGEBEN 10778<br />

10717<br />

10779 2AIB 28 07 JR Z.<br />

10718<br />

10780<br />

10719 29DF E1 POP HL ZEIGER AUF REAL-ZAHL<br />

10781 2AID 3E 2C LD A.<br />

10720<br />

10721<br />

10722<br />

10723<br />

10724<br />

10725<br />

10726<br />

10727<br />

10728<br />

10729<br />

10730<br />

29EO<br />

29El<br />

29E2<br />

29E3<br />

29E5<br />

29E6<br />

29E9<br />

05<br />

23<br />

7E<br />

CB BE<br />

2B<br />

32<br />

3A<br />

75<br />

25<br />

2A<br />

2A<br />

PUSH OE<br />

INC HL<br />

LD A. (HU<br />

RES 7. (HU ;<br />

DEC HL<br />

LD (2A75).A<br />

LD A. (2A25)<br />

ZEIGER AUF USING-FORMAT<br />

ZEIGER AUF MANTISSE<br />

MSBYTE MANTISSE HOLEN<br />

VORZEICHEN ZAHL AUF PLUS<br />

; ZEIGER WIEDER AUF EXPONENT<br />

VORZEICHEN DER ZAHL MERKEN<br />

ANZAHL VORKOMMASTELLEN<br />

10763<br />

10764<br />

10765<br />

10766<br />

10767<br />

10768<br />

10769<br />

10770<br />

10771<br />

10772<br />

10773<br />

10774<br />

10782<br />

10783<br />

10784<br />

10785<br />

10786<br />

10787<br />

10788<br />

10789<br />

10790<br />

10791<br />

10792<br />

2AOD<br />

2AOE<br />

2A10<br />

2A12<br />

2A13<br />

2A14<br />

2A15<br />

2A16<br />

2AIF<br />

2A20<br />

2A21<br />

2A22<br />

2A24<br />

2A26<br />

2A27<br />

7E<br />

FE<br />

28<br />

OC<br />

12<br />

13<br />

2B<br />

10<br />

20<br />

12<br />

12<br />

13<br />

OC<br />

18 E7<br />

3E<br />

B9<br />

DA<br />

00<br />

DB 2A<br />

LD A.<br />

CP 20<br />

JR Z.<br />

INC C<br />

LD <br />

JP<br />

A.<br />

C<br />

C.<br />

~


SEITE 194<br />

BASIC 1Z-013B V1.0A<br />

10793<br />

10794<br />

10795<br />

10796<br />

10797<br />

10798<br />

10799<br />

10800<br />

10801<br />

10802<br />

10803<br />

10804<br />

10805<br />

10806<br />

10807<br />

10808<br />

2A2A<br />

2A2B<br />

2A2C<br />

2 A2E<br />

2A2F<br />

2A30<br />

2A31<br />

2A34<br />

2A35<br />

2A36<br />

2A37<br />

2A38<br />

2A39<br />

41<br />

6F<br />

26 00<br />

01<br />

05<br />

19<br />

11<br />

2B<br />

lA<br />

77<br />

2B<br />

13<br />

10<br />

26<br />

6A<br />

LD<br />

LD<br />

LD<br />

B,C<br />

L,A<br />

H, 00<br />

POP DE<br />

PUSH OE<br />

ADD HL,DE<br />

LD OE, 6A26<br />

DEC HL<br />

LD A, ,A<br />

DEC HL<br />

INC DE<br />

DJNZ FA ~ 2A35H<br />

LÄNGE TEXT MIT Komma<br />

ANZAHL VORKOMMASTELLEN<br />

ZEIGER AUF ANFANG ZAHL<br />

WIEDER MERKEN<br />

ZEIGER AUF DEZIMALPUNKT<br />

I ZEIGER AUF ZWISCHEN­<br />

I SPEICHER MIT Komma-TEXT<br />

ZEIGER AUF VORKOMMASTELLEN<br />

EIN ZEICHEN TEXT HOLEN<br />

ALS VORKOMMASTELLE EINTRAG.<br />

ZEIGER AUF VORKOMMASTELLEN<br />

ZEIGER AUF TEXT<br />

WEITERE ZEICHEN üBERTRAGEN<br />

10809<br />

FA<br />

10810<br />

10811 2A3B 01 POP DE ZEIGER AUF ASCII-ZAHL<br />

10812 2A3C Cl<br />

POP BC<br />

GERETTETES REGISTER HOLEN<br />

10813 2A30 3E 00<br />

LD A, 00<br />

IFLAG - HINTEN ANGEGEBEN<br />

10814<br />

I (w ird eingetragen)<br />

10815 2A3F B7<br />

OR A<br />

GESETZT ?<br />

10816 2A40 20 3 0 JR NZ, 30 ~ 2A7FH IJA T VORZEICHEN HINTER<br />

10817 I ZAHL SCHREIBEN<br />

10818 2A42 3E 00 LD A, 00 IFLAG + HINTEN ANGEGEBEN<br />

10819<br />

I (wird eingetragen)<br />

10820<br />

10821<br />

10822<br />

10823<br />

10824<br />

10825<br />

10826<br />

10827<br />

10828<br />

10829<br />

10830<br />

10831<br />

10832<br />

10833<br />

10834<br />

10835<br />

10836<br />

10837<br />

10838<br />

10839<br />

10840<br />

10841<br />

10842<br />

10843<br />

10844<br />

10845<br />

10846 2A5E D5 PUSH DE ZEIGER ANFANG ASCII-ZAHL<br />

10847<br />

10848<br />

10849<br />

10850<br />

10851<br />

10852<br />

10853<br />

10854<br />

2A44<br />

2A45<br />

2A47<br />

2A49<br />

2A4A<br />

2A4C<br />

2A4F<br />

2A50<br />

2A52<br />

2A53<br />

2A55<br />

2A57<br />

2A59<br />

2A5B<br />

2A5F<br />

2A60<br />

2A61<br />

2A63<br />

2A65<br />

B7<br />

20<br />

3E<br />

B7<br />

20<br />

3A<br />

07<br />

30<br />

lA<br />

FE<br />

26<br />

28<br />

FE<br />

C2<br />

1A<br />

13<br />

FE<br />

28<br />

FE<br />

3 8<br />

00<br />

28<br />

75<br />

2D<br />

20<br />

2D<br />

05<br />

30<br />

DB<br />

20<br />

FA<br />

30<br />

2A<br />

2A<br />

OR A<br />

JR NZ, 38 ~ 2A7FH<br />

LD A, 00<br />

OR A<br />

JR NZ, 28 T 2A74H<br />

LD A. (2A75)<br />

RLCA<br />

JR NC. 20 T 2A7FH<br />

LD A.


SEITE 196<br />

BASIC 1Z-013B V1.0A BASIC 1Z<br />

10909<br />

10910<br />

10911<br />

10912<br />

2A9D<br />

2A9E<br />

2A9F<br />

D5<br />

1A<br />

FE 20<br />

PUSH OE<br />

LD A.


SEITE 198<br />

BASIC 1Z-013B V1.0A<br />

BASIC 1Z<br />

11015<br />

11016<br />

11 017<br />

2B07<br />

2B08<br />

2809<br />

CE<br />

52<br />

45<br />

N<br />

R<br />

E<br />

Befehl RESTORE (85)<br />

1107'7 21345 41 A<br />

11018 2BOA 53 S 11081 2B49 CD M<br />

11019 2808 54<br />

T<br />

11082 2B4A 52<br />

R<br />

11020 2BOC 4F<br />

o<br />

11083 21348 45<br />

E<br />

CD<br />

11021 2BOO<br />

11022 2BOE<br />

11023 280F<br />

11024<br />

11025<br />

11026<br />

2810<br />

2B11<br />

2812<br />

11027 2B13<br />

11028 2814<br />

11029 2B15<br />

11030 2816<br />

1103 1 2B17<br />

1103 2 2818<br />

1103 3 2B19<br />

1103 4 281A<br />

11035 2B1B<br />

11036 2BIC<br />

11037 2 BI0<br />

11038 2B1E<br />

11039 281F<br />

11040 2 B20<br />

11041 2B21<br />

11042 2B22<br />

11043 2B23<br />

11044 2824<br />

11045 2B25<br />

11046 2B26<br />

11047 2B27<br />

11048 2828<br />

11049 2B29<br />

11050 282A<br />

11051 282B<br />

11052 2B2C<br />

11053 2 B20<br />

11054 2B2E<br />

11055 2 82F<br />

11056 2830<br />

11057 2831<br />

11058 2832<br />

11059 2833<br />

11060 2B34<br />

11061 2B35<br />

11062 2 B36<br />

11063 2 B37<br />

11064 2838<br />

11065 2B3 9<br />

11066 2B3A<br />

11067 2838<br />

11068 2B3C<br />

11069 2830<br />

11070 283E<br />

11071 2B3F<br />

11072 2B40<br />

11073 2B41<br />

11074 2B42<br />

11075 2843<br />

11076 2844<br />

52<br />

C5<br />

52<br />

45<br />

53<br />

55<br />

40<br />

C5<br />

4C<br />

49<br />

53<br />

04<br />

80<br />

44<br />

45<br />

4C<br />

45<br />

54<br />

C5<br />

52<br />

45<br />

4E<br />

55<br />

CO<br />

41<br />

55<br />

54<br />

CF<br />

80<br />

46<br />

4F<br />

02<br />

4E<br />

45<br />

58<br />

04<br />

50<br />

52<br />

49<br />

4E<br />

04<br />

80<br />

49<br />

4E<br />

50<br />

55<br />

04<br />

80<br />

49 I<br />

C6<br />

44<br />

41<br />

54<br />

Cl<br />

52<br />

45<br />

R<br />

E<br />

R Befehl RESUME (86)<br />

E<br />

S<br />

U<br />

M<br />

E<br />

L<br />

o<br />

E<br />

L<br />

E<br />

T<br />

E<br />

R<br />

E<br />

N<br />

U<br />

M<br />

A<br />

U<br />

T<br />

o<br />

F<br />

o<br />

R<br />

E<br />

X<br />

T<br />

P<br />

R<br />

P<br />

U<br />

T<br />

;<br />

c<br />

Befehl<br />

Frei<br />

Befehl<br />

Befehl<br />

Befehl<br />

Frei<br />

Befehl<br />

Befehl<br />

Befehl<br />

Frei<br />

Befehl<br />

LIST<br />

OELETE<br />

RENUM<br />

AUTO<br />

FOR<br />

NEXT<br />

PRINT<br />

INPUT<br />

(87)<br />

(89)<br />

(8A)<br />

(8B)<br />

(80)<br />

(8E)<br />

(8F)<br />

(91)<br />

Frei<br />

Befehl IF (93)<br />

F<br />

o Befehl OATA (94)<br />

A<br />

T<br />

A<br />

R<br />

E<br />

Befehl REAO (95)<br />

11078<br />

11079<br />

11080<br />

11084<br />

11085<br />

11086<br />

11087<br />

11088<br />

11089<br />

2846<br />

2B47<br />

21348<br />

2B4C<br />

2B40<br />

2B4E<br />

2B4F<br />

2850<br />

2851<br />

11090 2852<br />

11091 2B53<br />

11092 2B54<br />

11093 2B55<br />

11094 2B56<br />

11095 2 B57<br />

11096 2858<br />

11097 2 B59<br />

11098 285A<br />

11099 2 958<br />

11100 2B5C<br />

11101 2850<br />

11102 285E<br />

11103 285F<br />

11104 2 B60<br />

11105 2 861<br />

1110 6 2 862<br />

11107 2 863<br />

11108 2864<br />

11109 2B65<br />

11110 2 B66<br />

11111 2867<br />

11112 2868<br />

11113 2869<br />

11114 2 B6A<br />

11115 286B<br />

1 1116 286C<br />

11117 2 B60<br />

11118 2B6E<br />

11119 2B6F<br />

11120 2870<br />

11121 2B71<br />

11122 2872<br />

11123 2873<br />

11124 2874<br />

11125 2875<br />

11126 2 876<br />

11127 2877<br />

11128 2B78<br />

11129 2B79<br />

11130 2B7A<br />

11131 2878<br />

11132 287C<br />

111 3 3 2870<br />

11134 287E<br />

11135 287F<br />

11136 2B80<br />

1113 7 2881<br />

11138 2882<br />

C4<br />

44<br />

49<br />

45<br />

4E<br />

C4<br />

53<br />

54<br />

4F<br />

00<br />

43<br />

4F<br />

4E<br />

04<br />

43<br />

4C<br />

03<br />

80<br />

4F<br />

CE<br />

4C<br />

45<br />

04<br />

4E<br />

45<br />

07<br />

50<br />

4F<br />

4B<br />

C5<br />

4F<br />

46<br />

C6<br />

40<br />

4F<br />

44<br />

C5<br />

53<br />

4B<br />

49<br />

00<br />

50<br />

4C<br />

4F<br />

04<br />

4C<br />

49<br />

4E<br />

C5<br />

52<br />

4C<br />

49<br />

4E<br />

C5<br />

40<br />

4F<br />

56<br />

o<br />

r<br />

M<br />

E<br />

N<br />

o<br />

S<br />

T<br />

o<br />

P<br />

C<br />

o<br />

N<br />

T<br />

C<br />

L<br />

S<br />

o<br />

N<br />

L<br />

E<br />

T<br />

N<br />

E<br />

W<br />

P<br />

o<br />

K<br />

E<br />

o<br />

F<br />

F<br />

M<br />

o<br />

o<br />

E<br />

S<br />

K<br />

L<br />

o<br />

T<br />

L<br />

R<br />

L<br />

N<br />

E<br />

M<br />

o<br />

V<br />

P<br />

P<br />

I<br />

S<br />

T<br />

I<br />

N<br />

T<br />

I<br />

N<br />

I<br />

I<br />

N<br />

E<br />

I


SEITE 200<br />

BASIC 1Z-013B V1_0A<br />

BASIC 1 Z<br />

11139 2B83 C5 E<br />

11140 2B84<br />

11201 2BC1 47<br />

G<br />

52 R Befehl RMOVE (A8)<br />

11202 2BC2<br />

11141 2885<br />

C5<br />

40<br />

E<br />

M<br />

11203 2BC3<br />

11142 2B86 4F<br />

80<br />

0<br />

11204 2BC4<br />

11143 2887<br />

43<br />

56<br />

C<br />

V<br />

11205 2BC5<br />

11144 2B88<br />

4F 0<br />

C5 E<br />

11206 2BC6<br />

11145 2B89<br />

4E<br />

54<br />

N<br />

T Befehl TRON (A9)<br />

11207 28C7<br />

11146 2B8A<br />

53<br />

52<br />

S<br />

R<br />

11208 28C8<br />

11147 2B88 4F<br />

4F 0<br />

0<br />

11209 28C9 4C<br />

11148 2B8C CE<br />

L<br />

N 11210 2BCA C5 E<br />

11149 2B80 54 T Befehl TROFF (AA) 11211 2BCB 80<br />

11150 2B8E 52 R 11212 2BCC 4F 0<br />

11151 2B8F 4F 0<br />

11213 2BCO 55 U<br />

11152 2B90 46 F<br />

11214 2BCE 54 T<br />

11153 2B91 C6 F<br />

11215 2BCF A3 #<br />

11154 2B92 49 I Befehl INPtt (AB)<br />

11216 2BOO 43 C<br />

11155 2B93 4E N<br />

11217 2BOl 49 I<br />

11156 2B94 50 P 11218 2B02 52 R<br />

11157 2B95 A3 #<br />

11219 2B03 43<br />

11158 2B96<br />

C<br />

80 Frei 11220 2B04 4C<br />

11159 2B97<br />

L<br />

47 G Befehl GET (AO)<br />

11221 2B05 C5<br />

11160 2B98<br />

E<br />

45 E<br />

11222 2B06 54<br />

11161 2B99<br />

T<br />

04 T<br />

11223 2B07 45<br />

11162 2B9A 50<br />

E<br />

P Befehl PCOLOR (AE) c-..,..<br />

11224 2B08 -.J • .,)<br />

11163 2B9B 43<br />

S<br />

C<br />

11225 2B09<br />

11164 2B9C<br />

04 T<br />

4F 0<br />

11226 2BOA<br />

11165 2B90<br />

50<br />

4C<br />

P<br />

L<br />

11227 2BOB<br />

11166 2B9E<br />

41<br />

4F<br />

A<br />

0<br />

11228 2BOC 47 G<br />

11167 2B9F 02 R<br />

11168 2BAO<br />

11229 2BDO<br />

50<br />

C5<br />

P<br />

E<br />

Befehl PHOME (AF)<br />

11230 2BOE<br />

11169 2BAl<br />

80<br />

48 H<br />

11231 2BOF<br />

11170 2BA2 4F<br />

80<br />

0<br />

11232 2BEO<br />

11171 2BA3<br />

45<br />

40<br />

E<br />

M<br />

11233 2BEl<br />

11172 2BA4<br />

52 R<br />

C5 E<br />

11234 2BE2 41<br />

11173 2BA5 48<br />

A<br />

H Q Befehl HSET (BO)<br />

11235 2BE3<br />

11174 2BA6<br />

53<br />

53<br />

S<br />

S<br />

11236 2BE4<br />

11175 2BA7 45<br />

C5 E<br />

E<br />

11237 2BE5 45<br />

11176 2BA8<br />

E<br />

04 T<br />

11238 2BE6 52 R<br />

11177 2BA9 47 G Befehl GPRINT (B1> 11239 2BE7 52<br />

11178 2BAA<br />

R<br />

50 P<br />

11240 2BE8 4F 0<br />

11179 2BAB 52 R<br />

11241 2BE9<br />

11180 2BAC<br />

02 R<br />

49 I<br />

11242 2BEA 80<br />

11181 2BAO 4E N<br />

11243 2BEB<br />

11182 2BAE<br />

55<br />

04<br />

U<br />

T<br />

11244 2BEC 53<br />

11183 2BAF 4B<br />

S<br />

K Befehl KEV (B2)<br />

11245 2BEO 02<br />

11184 2BBO 45<br />

R<br />

E<br />

11246 2BEE 42<br />

11185 2BBI 09<br />

B<br />

Y<br />

11247 2BEF 59 Y<br />

11186 2BB2 41 A Befehl AXIS (B3)<br />

11248 2BFO<br />

11187 2BB3<br />

C5<br />

58<br />

E<br />

X<br />

11249 2BFI<br />

11188 2BB4<br />

80<br />

49 I<br />

11189 2BB5<br />

11250 2BF2 80<br />

03 S<br />

11251 2BF3<br />

11190 2BB6 4C<br />

44 0<br />

L Befehl LOAD (B4)<br />

11252 2BF4 45<br />

11191 2BB7 4F<br />

E<br />

0<br />

11192 2BB8<br />

11253 2BF5<br />

41<br />

C6<br />

A<br />

F<br />

11193 2BB9<br />

11254 2BF6<br />

C4<br />

80<br />

0<br />

11194 2BBA 53<br />

11255 2BF7 80<br />

S<br />

11195 2BBB 41 • Befehl SAVE (B:5) 11256 2BF8<br />

A<br />

80<br />

11196 2BBC 56<br />

11257 2BF9<br />

V<br />

80<br />

11197 2BBO C5<br />

11258 2BFA 80<br />

E<br />

11198 2BBE 40<br />

11259 2BFB 80<br />

M ; Befehl MERGE (B6)<br />

11199 2BBF 45<br />

11260 2BFC 57<br />

E<br />

W<br />

11200 2BCO<br />

11261 2BFO<br />

52<br />

4F<br />

R<br />

0<br />

11262 2BFE 50 P


SEITE 202<br />

11263 2BFF<br />

11264 2COO<br />

11265 2C01<br />

11266 2C02<br />

11267 2C03<br />

11268 2C04<br />

11269 2C05<br />

11270 2C06<br />

11271 2C07<br />

11272 2C08<br />

11273 2C09<br />

11274 2COA<br />

11275 2COB<br />

11276 · 2COC<br />

11277 2COO<br />

11278 2COE<br />

11279 2COF<br />

11280 2C10<br />

11281 2C11<br />

11282 2C12<br />

11283 2C13<br />

11284 2C14<br />

11285 2C15<br />

11286 2C16<br />

11287 2C17<br />

11288 2C18<br />

11289 2C19<br />

11290 2C1A<br />

11 29 1 2C 1 B<br />

11292 2C1C<br />

11293 2C10<br />

11294 2C1E<br />

11295 2C1F<br />

11296 2C20<br />

11297 2C21<br />

11298 2C22<br />

11299 2C23<br />

11300 2C24<br />

11301 2C25<br />

11302 2C26<br />

11303 2C27<br />

11 304 2C28<br />

11305 2C29<br />

11306 2C2A<br />

11307 2C2B<br />

11308 2C2C<br />

11309 2C20<br />

11310 2C2E<br />

11311 2C2F<br />

11312 2C30<br />

11313 2C31<br />

11314 2C32<br />

11315 2C33<br />

11316 2C34<br />

11317 2C35<br />

11318 2C36<br />

11319 2C37<br />

11320 2C38<br />

11321 2C39<br />

11322 2C3A<br />

11323 2C3B<br />

11324 2C3C<br />

45<br />

CE<br />

43<br />

4C<br />

4F<br />

53<br />

C5<br />

52<br />

4F<br />

50<br />

45<br />

CE<br />

80<br />

80<br />

80<br />

80<br />

80<br />

80<br />

80<br />

80<br />

4B<br />

49<br />

4C<br />

CC<br />

80<br />

80<br />

80<br />

80<br />

80<br />

80<br />

54<br />

CF<br />

53<br />

54<br />

45<br />

00<br />

54<br />

48<br />

45<br />

CE<br />

55<br />

53<br />

49<br />

4E<br />

C7<br />

80<br />

80<br />

54<br />

41<br />

C2<br />

53<br />

50<br />

C3<br />

80<br />

80<br />

80<br />

4F<br />

02<br />

41<br />

4E<br />

C4<br />

80<br />

BASIC 1Z-013B V1.0A BASIC 1Z<br />

E<br />

N<br />

C<br />

L<br />

o<br />

S<br />

E<br />

R<br />

o<br />

P<br />

E<br />

N<br />

K<br />

L<br />

T<br />

o<br />

S<br />

T<br />

E<br />

P<br />

T<br />

H<br />

E<br />

N<br />

U<br />

S<br />

I<br />

N<br />

G<br />

T<br />

A<br />

B<br />

S<br />

P<br />

C<br />

o<br />

R<br />

A<br />

N<br />

o<br />

Befehl CLOSE<br />

Befehl ROPEN<br />

Frei<br />

Frei<br />

Frei<br />

Frei<br />

Frei<br />

; Frei<br />

Frei<br />

Frei<br />

Befehl KILL<br />

Frei<br />

Frei<br />

Frei<br />

Frei<br />

Frei<br />

Frei<br />

Befehl TO<br />

Befehl STEP<br />

Befehl THEN<br />

; Befehl USING<br />

= Frei<br />

Frei<br />

• Befehl TAB<br />

a Befehl SPC<br />

Frei<br />

Frei<br />

Frei<br />

,Befahl OR<br />

• Befehl AND<br />

Frei für NOT<br />

(CF)<br />

(00)<br />

(09)<br />

(EO)<br />

(EU<br />

(E2)<br />

(E3)<br />

(E6)<br />


SEITE 204<br />

BASIC 1Z-013B V1_0A<br />

BASIC 1Z<br />

Befehle V<br />

11383 2C77 80 Frei <br />

Tabelle der mit 11384 2C78 80 Frei 12457 30A9 49 I<br />

11385 2C79 80 Frei 12458 30AA 4E N <br />

11386 2C7A 80 Frei 12459 30AB 04 T <br />

11387 2C7B 80 Frei 12460 30AC 41 A<br />

11388 2C7C 80 Frei 12461 30AO 42 B <br />

11389 2C70 80 Frei 12462 30AE 03 S <br />

11390 2C7E 80 Frei 12463 30AF 53 S<br />

11391 2C7F 80 Frei 12464 30BO 49 I <br />

11392 2C80 40 M Befehl MUSIC (A2) 12465 30Bl CE N <br />

11393 2C81 55 U 12466 30B2 43 C<br />

11394 2C82 53 S 12467 30B3 4F 0 <br />

11395 2C83 49 I 12468 30B4 03 S <br />

11396 2C84 C3 C 12469 30B'5 54 T<br />

11397 2C85 54 T Befehl TEMPO (A3) 12470 30B6 41 A<br />

11398 2C86 45 E 12471 30B7 CE N )<br />

11399 2C87 40 M 12472 30B8 4C L<br />

11400 2C88 50 P 12473 30B9 CE N<br />

11401 2C89 CF 0 12474 30BA 45 E<br />

11402 2C8A 43 C Befehl CURSOR (A4)<br />

12475 30BB 58 X<br />

11403 2C8B 55 U =<br />

12476 30BC 00 P<br />

11404 2C8C 52 R 12477 30BO 53 S<br />

11405 2C80 53 S 12478 30BE 51 Q<br />

11406 2C8E 4F 0 12479 30BF 02 R<br />

11407 2C8F 02 R 12480 30CO 52 R<br />

11408 2C90 56 V Befehl VERIFY (A5)<br />

=<br />

12481 30C1 4E N<br />

11409 2C91 45 E 12482 30C2 C4 0<br />

11410 2C92 52 R 12483 30C3 50 P<br />

11411 2C93 49 I 12484 30C4 45 E<br />

11412 2C94 46 F 12485 30C5 45 E<br />

11413 2C95 09 Y 12486 30C6 CB ( •. K .><br />

11414 2C96 43 C Befehl CLR (A6) 12487 30C7 41 A<br />

11415 2C97 4C L 12488 30C8 54 T<br />

11416 2C98 02 R 12489 30C9 CE N )<br />

11417 2C99 4C L Befehl LIMIT (A7) 12490 30CA 53 S<br />

11418 2C9A 49 I 12491 30CB 47 G<br />

11419 2C9B 40 M 12492 30CC CE N<br />

11420 2C9C 49 I 12493 30CO 4C L<br />

11421 2C9D 04 T 12494 30CE 4F 0<br />

11422 2C9E 80<br />

=<br />

Frei 12495 30CF C7 G<br />

11423 2C9F 80 Frei 12496 3000 80<br />

11424 2CAO 80 Frei 12497 3001 50 P<br />

11425 2CA1 80 =<br />

Frei 12498 3002 41 A<br />

11426 2CA2 80 Frei 12499 3003 C9 I<br />

11427 2CA3 80 Frei 12500 3004 52 R<br />

11428 '2CA4 42 B Befehl BOOT (AE) 12501 3005 41 A<br />

11429 2CA5 4F 0 12502 3006 C4 0<br />

11430 2CA6 4F 0 12503 3007 80<br />

11431 2CA7 04 T 12504 3008 80<br />

11432 2CA8 FF Tabellenende 12505 3009 80<br />

12506 300A 80<br />

12507 300B 80<br />

12508 300C 45 E<br />

12509 3000 4F 0<br />

Der Bereich $2CA9 - $30A8 wird zur Zeit noch nicht genutzt. ~I 12510 300E C6 F<br />

12511 300F 80<br />

12512 30EO 80<br />

12513 30El 80<br />

12514 30E2 80<br />

12515 30E3 80<br />

12516 30E4 80


SEITE 206<br />

BASIC 1Z-013B V1.0A<br />

12517 30E5 80 Frei<br />

12518 30E6 80 Frei<br />

12519 30E7 4A J Befehl JOY (9E)<br />

12520 30E8 4F 0<br />

12521 30E9 D9 Y<br />

12522 30EA 80 Frei<br />

12523 30EB 43 C Befehl CHR$ (AO)<br />

12524 30EC 48 H<br />

12525 30EO 52 R<br />

12526 30EE A4 $<br />

12527 30EF 53 S Befehl STR$ (Al><br />

12528 30FO 54 T<br />

12529 30Fl 52 R<br />

12530 30F2 A4 $<br />

12531 30F3 48<br />

H<br />

Befehl •<br />

HEX$ (A2)<br />

12532 30F4 45<br />

E<br />

12533 30F5 58 X<br />

12534 30F6 A4 $<br />

12535 30F7 80 Frei<br />

12536 30F8 80 ; Frei<br />

12537 30F9 80 ; Frei<br />

12538 30FA 80 Frei<br />

12539 30FB 80 ; Frei<br />

12540 30FC 80 Frei<br />

12541 30FO 80 Frei<br />

12542 30FE 80 Frei<br />

12543 30FF 41 A Befehl ASC (AB)<br />

12544 3100 53 S<br />

12545 3101 C3 C<br />

12546 3 102 4C Befehl LEN (AC)<br />

12547 3103 45 E<br />

12548 3104 CE N<br />

12549 3105 56 V Befehl VAL (AO)<br />

12550 3106 41 A<br />

12551 3107 CC L<br />

12552 3108 80 Frei<br />

12553 3109 80<br />

Frei<br />

12554 310A 80<br />

• Frei<br />

Frei<br />

80<br />

12555 310B<br />

12556 310C<br />

80<br />

• Frei<br />

Frei<br />

12557 3100 45 E Befehl ERN (B3)<br />

12558 310E 52 R<br />

12559 310F CE N<br />

12560 3110 45 E , Befahl ERL (B4)<br />

12561 3111 52 R<br />

12562 3112 CC L<br />

12563 3113<br />

53<br />

Befehl SIZE (B5)<br />

12564 3114 49<br />

12565 3115 5A Z<br />

12566 3116 C5 E<br />

12568 3118 80 Frei<br />

12567 3117 80 Frei<br />

, 12569 3119 80 Frei<br />

12570 311A 80 Frei<br />

12571 311B 4C L Befehl LEFTS (BA)<br />

12572 311C 45 E<br />

12573 3110 46 F<br />

12574 311E 54 T<br />

12575 311F A4 $<br />

12576 3120 52<br />

R<br />

Befahl •<br />

·RIGHT$ (BB)<br />

12577 3121 49<br />

I<br />

12578 3122 47 (3<br />

S<br />

•<br />

I<br />

12579 3123<br />

12580 3124<br />

12581 3125<br />

12582 3 126<br />

12583 3127<br />

12584 3 128<br />

12585 3129<br />

12586 312A<br />

12587 312B<br />

12588 3 12C<br />

12589 3120<br />

12590 3 12E<br />

12591 312F<br />

12592 3130<br />

12593 3131<br />

12594 3132<br />

12595 3133<br />

12596 3134<br />

12597 313 5<br />

12598 3136<br />

12599 31 3 7<br />

12600 3 13 8<br />

12601 3139<br />

12602 3 13 A<br />

12603 3 13B<br />

12604 3 13C<br />

12605 3130<br />

12606 3 13 E<br />

12607 3 13 F<br />

12608 3 140<br />

12609 3141<br />

12610 3 142<br />

12611 3 143<br />

12612 3144<br />

12613 3 145<br />

12614 3 146<br />

48<br />

54<br />

A4<br />

40<br />

49<br />

44<br />

A4<br />

80<br />

80<br />

80<br />

80<br />

80<br />

80<br />

53<br />

54<br />

52<br />

49<br />

4E<br />

47<br />

A4<br />

54<br />

49<br />

A4<br />

80<br />

80<br />

46<br />

CE<br />

80<br />

80<br />

80<br />

80<br />

80<br />

80<br />

80<br />

80<br />

FF<br />

BASIC 1<br />

H <br />

T <br />

$ <br />

M <br />

I <br />

D <br />

$ <br />

S <br />

T <br />

R<br />

I<br />

N<br />

G<br />

$<br />

T<br />

$<br />

F<br />

N<br />

I


SEITE 208 <br />

BASIC 1Z-013B V1_0A <br />

Tabelle mit Anfangsadressen der einzelnen 8efehlsroutinen<br />

12615 3147 07 38 Adresse GOTO<br />

12616<br />

12617 3149 CD 36 Adresse GOSUB<br />

12618<br />

12619 3148 FE 20 Adresse GD<br />

12620<br />

12621 314D 6E 1C Adresse RUN<br />

12622<br />

12623 314F 94 36 Adresse RETURN<br />

12624<br />

12625 3151 A8 25 Adresse RES TORE<br />

12626<br />

12627 3153 FB 36 Adresse RESUME<br />

12628<br />

12629' 3155 02 41 Adresse LIST<br />

12630<br />

12631 3157 FE 20 Adresse Syntax - Fehler<br />

12632<br />

12633 3159 56 34 Adresse DELETE<br />

12634<br />

12635 315B 71 34 Adresse RENUM<br />

12636<br />

12637 315D D5 21 Adresse AUTO<br />

12638<br />

12639 315F FE 20 Adresse Syntax - Fehler<br />

12640<br />

12641 3161 BF lC Adresse FOR<br />

12642<br />

12643 3163 6F 10 Adresse NEXT<br />

12644<br />

12645 3165 6A 1E Adresse PRINT<br />

12646<br />

12647 3167 FE 20 Adresse Syntax - Fehler<br />

12648<br />

12649 3169 CA 22 Adresse INPUT<br />

12650<br />

12651 316B FE 20 Adresse Syntax - Fehler<br />

12652<br />

12653 316D 3F 38 Adresse IF<br />

12654<br />

12655 316F 23 33 Adresse DATA<br />

12656<br />

12657 3171 E3 25 Adresse READ<br />

1265B<br />

12659 3173 EA 5A Adresse OlM<br />

12660<br />

12661 3175 23 33 Adresse REM<br />

12662<br />

12663 3177 B7 21 Adresse END<br />

12664<br />

12665 3179 71 20 Adresse STOP<br />

12666<br />

12667 317B 9F 20 Adresiie CONT<br />

12668<br />

12669 317D CE 38 Adresse CLS<br />

12670<br />

12671 317F FE 20 ~ Adresse Syntax - Fehler<br />

12672<br />

12673 3181 92 37 Adresse ON<br />

12674<br />

BASIC 1Z<br />

12675 3183 59 19<br />

12676<br />

12677 3185 48 22<br />

12678<br />

12679 3187 07 33<br />

12680<br />

12681 3189 FE 20<br />

12682<br />

12683 3188 00 4D<br />

12684<br />

12685 3180 2C 4E<br />

12686<br />

12687 318F 31 3A<br />

12688<br />

12689 3191 8C 4E<br />

12690<br />

12691 3193 FE 4E<br />

12692<br />

12693 3 195 05 4F<br />

12694<br />

12695 3 197 14 4F<br />

12696<br />

12697 3 199 7E 22<br />

12698<br />

12699 3 198 82 22<br />

12700<br />

12701 319D 50 33<br />

12702<br />

12703 3 19F FE 20<br />

12704<br />

12705 3 1A1 89 33<br />

12706<br />

12707 31A3 1B 4F<br />

12708<br />

12709 31A5 50 4F<br />

12710<br />

12711 3 1A7 64 4F<br />

12712<br />

12713 3 1A9 76 4F<br />

12714<br />

12715 31AB 21 43<br />

12716<br />

1 2717 31AO FC 4F<br />

12718<br />

12719 31AF 01 41<br />

12720<br />

12721 31B1 A4 42<br />

12722<br />

12723 31B3 AB 41<br />

12724<br />

12725 31B5 FE 20<br />

12726<br />

12727 31B7 CB 39<br />

1272 8<br />

12729 31B9<br />

1273 0<br />

FE 20<br />

1273 1 31BB 39 33<br />

12732<br />

12733 3180 50 50<br />

12734<br />

12735 31BF 27 52<br />

12736


SEITE 210<br />

12737 31Cl 3B 52<br />

12738<br />

12739 31C3 FE 20<br />

12740<br />

12741 31C5 FE 20<br />

12742<br />

12743 31C7 FE 20<br />

12744<br />

12745 31C9 05 21<br />

12746<br />

12747 31CB FE 20<br />

12748<br />

12749 31CO 05 33<br />

12750<br />

12751 31CF C2 13<br />

12752<br />

12753 3101 FE 20<br />

12754<br />

12755 3103 FE 20<br />

12756<br />

12757 3105 IB 25<br />

12758<br />

12759 3107 FE 20<br />

12760<br />

12761 3109 FE 20<br />

12762<br />

12763 310B FE 20<br />

12764<br />

12765 310D FE 20<br />

12766<br />

12767 31DF FE 20<br />

12768<br />

12769 31El FE 20<br />

12770<br />

12771 31E3 A3 46<br />

12772<br />

12773 31E5 45 45<br />

12774<br />

12775 31E7 OF 46<br />

12776<br />

12777 31E9 FE 20<br />

12778<br />

12779 31EB FE 20<br />

12780<br />

12781 31ED FE 20<br />

12782<br />

12783 31EF FE 20<br />

12784<br />

12785 31F1 FE 20<br />

12786<br />

12787 31F3 FE 20<br />

12788<br />

12789 31F5 FE 20<br />

12790<br />

12791 31F7 FE 20<br />

12792<br />

12793 31F9 FE 20<br />

12794<br />

12795 31FB FE 20<br />

12796<br />

12797 31FO FE 20<br />

12798<br />

BASIC 1Z-013B V1.0A<br />

Adresse PAGE<br />

Adresse Syntax ­<br />

Adresse Syntax<br />

Adresse ERASE<br />

Adresse ERROR<br />

Adres!iie ELSE<br />

Adres!iie USR<br />

Adresse BVE<br />

Adresse Syntax ­<br />

Adresse Syntax ­<br />

Adr,esse DEF<br />

Adresse Syntax ­<br />

Adresse Syntax ­<br />

Adresse Syntax ­<br />

Adresse Syntax ­<br />

Adresse Syntax<br />

Adresse Syntax ­<br />

Adresse WOPEN<br />

Adresse CLOSE<br />

Adresse ROPEN<br />

Adre!iise Syntax ­<br />

Adresse Syntax ­<br />

Adresse Syntax<br />

Adresse Syntax<br />

Adres;se Syntax ­<br />

Adresse Syntax ­<br />

Adresse Syntax ­<br />

Adresse Syntax<br />

Adre!ise KILL<br />

Adresse Syntax ­<br />

Adresse Syntax<br />

Fehler <br />

Fehler <br />

Fehler <br />

Fehler <br />

Fehler<br />

Fehler<br />

Fehler<br />

Fehler<br />

Fehler<br />

Fehler<br />

Fehler<br />

Fehler<br />

Fehler<br />

Fehler<br />

Fehler<br />

Fehler<br />

Fehler<br />

Fehler<br />

Fehler<br />

Fehler<br />

BASIC 1 Z<br />

12799 3 1FF<br />

12800<br />

12801 3201<br />

12802<br />

12803 3203<br />

12804<br />

12805 3205<br />

12806<br />

FE<br />

FE<br />

FE<br />

FE<br />

20<br />

20<br />

20<br />

20<br />

Anfangsadressen der Routin<br />

12807 3207 FE 20 <br />

12808 <br />

12809 3209 02 39<br />

12810 <br />

12811 320B 35 39 <br />

12812 <br />

12813 320D 73 44 <br />

12814 <br />

12815 320F FE 20 <br />

12816 <br />

12817 3211 FE 20 <br />

12818 <br />

12819 3213 FE 20 <br />

12820 <br />

12821 3215 FE 20 <br />

12822 <br />

12823 3217 FE 20 <br />

12824 <br />

12825 3219 FE 20 <br />

12826 <br />

12827 321B FE 20 <br />

12828 <br />

12829 3210 FE 20 <br />

12830 <br />

12831 321F FE 20 <br />

12832 <br />

12833 3221 FE 20 <br />

12834 <br />

12835 3223 FE 20<br />

12836<br />

12837 3225 FE 20<br />

12838<br />

12839 3227 FE 20 <br />

12840<br />

12841 3229 FE 20<br />

12842<br />

12843 322B FE 20<br />

12844<br />

12845 322D FE 20<br />

12846<br />

12847 322F FE 20<br />

12848<br />

12849 3231 FE 20<br />

12850<br />

12851 3233 FE 20<br />

12852<br />

12853 3235 FE 20<br />

12854<br />

12855 3237 FE 20<br />

12856


SEITE 212<br />

BASIC 1Z-013B V1_0A<br />

12857 3239 ­<br />

­<br />

­<br />

FE 20 Adresse Syntax<br />

12858<br />

12859 3238 FE 20 Adresse Syntax<br />

12860<br />

12861 323D FE 20 Adresse Syntax<br />

12862<br />

12863 323F FE 20 Adresse Syntax<br />

12864<br />

12865 3241 FE 20 Adresse Syntax<br />

12866<br />

12867 3243 FE 20 Adresse Syntax 12868<br />

12869 3245 FE 20 Adresse Syntax 12870<br />

12871 3247 FE 20 Adresse Syntax<br />

12872<br />

12873 3249 FE 20 Adresse Syntax<br />

12874<br />

12875 3248 3C 44 Adresse MUSIC<br />

12876<br />

12877 3240 63 44 Adresse TEMPO<br />

12878<br />

12879 324F 6C 33 Adresse CURSOR<br />

12880<br />

12881 3251 01 42 Adresse VERIF'(<br />

12882<br />

12883 3253 4E 22 Adresse CLR <br />

12884 <br />

12885 3255 08 34 Adresse LIMIT<br />

12886<br />

12887 3257 FE 20 Adresse Syntax<br />

12888<br />

12889 3259 FE 20 Adresse Syntax 12890<br />

12891 3258 FE 20 Adresse Syntax <br />

12892 <br />

12893 3250 FE 20 Adresse Syntax <br />

12894 <br />

12895 325F FE 20 Adresse Syntax <br />

12896 <br />

12897 3261 FE 20 Adresse Syntax <br />

12898 <br />

12899 3263 6A 3A Adresse BOOT <br />

12900 <br />

Anfangsadressen der Routinen für· Befehle mit Vorbyte FFH<br />

12901 3265 77 62 Adresse INT <br />

12902 <br />

12903 3267 72 62 Adresse A8S <br />

12904 <br />

12905 3269 C6 63 Adresse SIN <br />

12906 <br />

12907 326B BO 63 Adresse cas <br />

12908 <br />

12909 3260 BO 64 Adresse TAN <br />

12910 <br />

12911 326F 36 67 Adresse LN <br />

12912 <br />

12913 3271 15 66 Adresse EXP <br />

12914 <br />

Fehler<br />

Fehler<br />

Fehler<br />

Fehl er<br />

Fehler<br />

Fehler<br />

Fehler<br />

Fehler<br />

Fehler<br />

Fehler<br />

Fehler<br />

Fehler<br />

Fehler<br />

Fehler<br />

Fehler<br />

12915 3273<br />

12916<br />

12917 3275<br />

12918<br />

12919 3277<br />

12920<br />

12921 3279<br />

12922<br />

12923 3278<br />

12924<br />

12925 3270<br />

12926<br />

12927 327F<br />

12928<br />

12929 3281<br />

12930<br />

12931 3283<br />

12932<br />

12933 3285<br />

12934<br />

12935 3287<br />

12936<br />

12937 3289<br />

12938<br />

12939 328B<br />

12940<br />

12941 3280<br />

12942<br />

12943 328F<br />

12944<br />

12945 3291<br />

12946<br />

12947 3293<br />

12948<br />

12949 3295<br />

12950<br />

12951 3297<br />

12952<br />

12953 3299<br />

12954<br />

12955 3298<br />

12956<br />

12957 3290<br />

12 958<br />

12959 329F<br />

12960<br />

12961 32A1<br />

12962<br />

12963 32A3<br />

12964<br />

12965 32A5<br />

12966<br />

12967 32A7<br />

12968<br />

12969 32A9<br />

12970<br />

12971 32AB<br />

12972<br />

12973 32AO<br />

12974<br />

12975 32AF<br />

12976<br />

BASIC 1Z-<br />

00 62<br />

00 65<br />

85 65<br />

EE 62<br />

7A 65<br />

2A 67<br />

FE 20<br />

A2 65<br />

90 65<br />

FE 20<br />

FE 20<br />

FE 20<br />

FE 20<br />

FE 20<br />

FE 20<br />

FE 20<br />

FE 20<br />

FE 20<br />

FE 20<br />

FE 20<br />

FE 20<br />

FE 20<br />

FE 20<br />

A3 39<br />

FE 20<br />

FE 20<br />

77 56<br />

EC 55<br />

FE 20<br />

FE 20<br />

FE 20


SEITE 214<br />

12977 32B1 FE 20<br />

12978<br />

12979 32B3 FE 20<br />

12980<br />

12981 32B5 FE 20<br />

12982<br />

1298.3 32B7 FE 20<br />

12984<br />

12985 32B9 FE 20<br />

12986<br />

12987 32BB AO 56<br />

12988<br />

12989 32BO AC 56<br />

12990<br />

12991 32BF B4 56<br />

12992<br />

12993 32C1 FE 20<br />

12994<br />

12995 32C3 FE 20<br />

12996<br />

12997 32C5 FE 20<br />

12998<br />

12999 32C7 FE 20<br />

13000<br />

13001 32C9 FE 20<br />

13002<br />

13003 32CB 62 55<br />

13004<br />

13005 32CO 6A 55<br />

13006<br />

13007 32C~ 48 55<br />

13008<br />

13~)9 3201 FE 20<br />

13010<br />

13011 3203 FE 20<br />

13012<br />

13013 3205 FE 20<br />

13014<br />

13015 3207 FE 20<br />

13016<br />

13017 3209 C7 56<br />

13018<br />

13019 320B E4 56<br />

13020<br />

13021 3200 02 57<br />

13022<br />

13023 320F FE 20<br />

1.3024<br />

13025 32E1 FE 20<br />

13026<br />

13027 32E3 FE 20<br />

13028<br />

13029 32E5 FE 20<br />

13030<br />

13031 32E7 FE 20<br />

13032<br />

13033 32E9 FE 20<br />

13034<br />

13035 32EB FE 20<br />

13036<br />

13037 32EO 3F 57<br />

13038<br />

BASIC 1Z-013B<br />

V1_0A<br />

Adresse Syntax ­<br />

Adresse Syntax ­<br />

Adresse Syntax ­<br />

Adresse Syntax<br />

Adresse Syntax ­<br />

Adresse ASC<br />

Adresse LEN<br />

Adresse VAL<br />

Adresse Syntax ­<br />

Adresse Syntax ­<br />

Adresse Syntax ­<br />

Adresse Syntax ­<br />

Adresse Syntax ­<br />

Adresse ERN<br />

Adresse ERL<br />

Adresse SIZE<br />

Adresse Syntax ­<br />

Adresse Syntax<br />

Adresse Syntax<br />

Adresse Syntax ­<br />

•<br />

Adresse LEFT$<br />

Adresse RIGHT$<br />

Adresse MID$<br />

Adresse Syntax ­<br />

Adresse Syntax ­<br />

Adresse Syntax ­<br />

Adresse Syntax ­<br />

Adresse Syntax ­<br />

Adresse Syntax ­<br />

Adresse STRING$<br />

Adresse TI$<br />

Fehler<br />

·Fehler<br />

Fehler<br />

Fehler<br />

Fehler<br />

Fehler<br />

Fehler<br />

Fehler<br />

Fehler<br />

Fehler<br />

Fehler<br />

Fehler<br />

Fehler<br />

Fehler<br />

Fehler<br />

Fehler<br />

Fehler<br />

Fehler<br />

Fehler<br />

Fehler<br />

13039 32EF<br />

13040<br />

13041 32F1<br />

13042<br />

13043 32F3<br />

13044<br />

13045 32F5<br />

13046<br />

13047 32F7<br />

13048<br />

13049 32F9<br />

13050<br />

13051 32FB<br />

13052<br />

13053 32FO<br />

13054<br />

13055 32F~<br />

13056<br />

13057 3301<br />

13058<br />

13059 3303<br />

13060<br />

Befehl<br />

13061 3305<br />

13062<br />

13063<br />

13064 3308<br />

13065<br />

13066<br />

13067 330B<br />

13068 330C<br />

13069 3300<br />

13070<br />

13071 330F<br />

13072<br />

13073 3 311<br />

13074 3312<br />

13075<br />

13076<br />

13077 3315<br />

13078<br />

13079<br />

13080 3318<br />

13081 .3319<br />

13082<br />

13083<br />

13084 331C<br />

13085 3310<br />

13086<br />

13087<br />

13088 3320<br />

13089 3321<br />

13090 3322<br />

BASIC 1Z<br />

FE 20<br />

FE 20<br />

F7 5C<br />

FE 20<br />

FE 20<br />

FE 20<br />

FE 20<br />

FE 20<br />

FE 20<br />

FE 20<br />

FE 20<br />

USR<br />

CO FO 57 CALL 57<br />

CO 65 40 CALL 40<br />

05 PUSH DE<br />

23 INC HL<br />

FE 29 CP 29<br />

28 OB JR Z. O<br />

2B DEC HL<br />

CD 32 33 CALL 33<br />

CD BC 40 CALL 40B<br />

48 LO C.B<br />

CD 04 58 CALL 58<br />

E3 EX (SP)<br />

CD 22 33 CALL 33<br />

E1 POP HL<br />

C9 RET<br />

E9 JP (HL>


SEITE 216 <br />

BASIC 1Z-013B <br />

Befehl REM / DATA<br />

13091 3323 <br />

2B DEC HL <br />

13092 3324 CD 80 38 CALL 3880 <br />

13093 <br />

13094 <br />

13095 3327 B7 OR A <br />

13096 3328 37 SCF <br />

13097 3329 C8 RET Z <br />

13098 332A FE 3A CP 3A<br />

13099 <br />

13100 332C C8 RET Z<br />

13101 3320 18 F5 JR F5 .. 3324H ~ 13102 <br />

Syntax untersuchung auf Komma<br />

13103 332F <br />

CD 14 54 CALL 5414 <br />

13104 <br />

13105 <br />

13106 3332 FE 2C CP 2C <br />

13107 <br />

13108 3334 C2 FE 20 JP NZ. 20FE <br />

13109 <br />

13110 <br />

13111 3337 23 INC HL ~ 13112 3338 C9 RET <br />

Befehl OUT *<br />

13113 3339 CD 50 4D CALL 4D50 <br />

13114 <br />

13115 <br />

13116 333C FE EO CP EO<br />

13117 <br />

13118 333E 38 05 JR C. 05 .. 3345H<br />

13119 <br />

13120 3340 FE E7 CP E7 <br />

13121 <br />

13122 3342 DA 01 21 JP C. 2101 <br />

13123 <br />

13124 <br />

13125 3345 CO 2F 33 CALL 332F <br />

13126 <br />

13127 <br />

13128 3348 05 PUSH DE <br />

13129 3349 CO 50 40 CALL 4D50 <br />

13130 <br />

13131 <br />

13132 334C Cl POP BC<br />

13133 3340 EO 79 OUT (C).A <br />

13134 <br />

13135 334F C9 RET<br />

V1.0A<br />

PROGRAM<strong>MZ</strong>EIGER<br />

IPROGRAM<strong>MZ</strong>EIGER IN HL<br />

lAUF NÄCHSTES BEFEHLS­<br />

I BYTE STELLEN<br />

ZEILENENDE ?<br />

CODE ZEILENENDE<br />

ZEILENENDE<br />

(Doppelpunkt)<br />

BEFEHLSENDE<br />

ENDE BEFEHL SUCHEN<br />

IPROGRAM<strong>MZ</strong>EIGER AUF<br />

I NÄCHSTES RELEVANTES<br />

I ZEICHEN SETZEN<br />

(Komma)<br />

SYNTAX - FEHLER<br />

Komma üBERSPRINGEN<br />

EIN-BYTE-WERT NACH DE/ACCU<br />

ANFANG UMSCHALTPORTS<br />

PORTNUMMER IST OK<br />

ENDE UMSCHALTPORTS<br />

I UMSCHAL TPORT ..<br />

I DATENFEHLER<br />

SYNTAX Komma<br />

PORT-NUMMER MERKEN<br />

EIN-BYTE-WERT NACH DE/ACCU<br />

PORT-NUMMER HOLEN<br />

WERT AUF PORT AUSGEBEN<br />

Befehl<br />

13136 3350 <br />

13137 <br />

13139 <br />

13139 3353 <br />

13140 <br />

13141 <br />

13142 3356 <br />

13 143 3357 <br />

13144 <br />

13145 <br />

13146 335A <br />

13147 <br />

13148 335C <br />

13149 <br />

13150 <br />

13151 ' 335F <br />

13152 3360 <br />

13153 3361 <br />

13154 3362 <br />

13155 3363 <br />

13 156 <br />

13157 3365 <br />

13158 <br />

13159 3367 <br />

13160 <br />

13161 <br />

13162 336A <br />

13163 336B <br />

Befehl<br />

13164 336C <br />

13165 <br />

13166 <br />

13 167 336F <br />

13168 <br />

13169 3371 <br />

13170 <br />

13171 <br />

13172 3374 <br />

13173 <br />

13 174 <br />

13175 3377 <br />

13176 <br />

13177 <br />

13178 337A <br />

13179 <br />

13180 <br />

13181 337D <br />

13182 <br />

13193 <br />

13184 3380 <br />

13185 <br />

13186 3382 <br />

13187 <br />

13188 <br />

13189 3385 <br />

1319(1 <br />

13191 <br />

BASIC<br />

INP# <br />

CD 50 40 <br />

CD 2F 33 <br />

05 <br />

CD OB 58 <br />

FE 05 <br />

C2 FB 20 <br />

E3 <br />

C5 <br />

E3 <br />

Cl <br />

ED 58 <br />

16 00 <br />

CO 82 3 A<br />

EI<br />

C9<br />

CURSOR <br />

CD 50 40 <br />

FE 28 <br />

D2 01 21 <br />

32 54 00 <br />

CD 14 54 <br />

CD 32 33 <br />

CD 50 4D<br />

FE 19 <br />

D2 01 21 <br />

32 55 00 <br />

1Z<br />

CALL 4<br />

CALL 3<br />

PUSH O<br />

CALL 5<br />

CP 05<br />

JP NZ<br />

EX (S<br />

PUSH<br />

EX (S<br />

POP BC<br />

IN E.<br />

LD D.<br />

CALL<br />

POP H<br />

RET<br />

CALL<br />

CF' 2<br />

JP NC<br />

LD (0<br />

CALL<br />

CALL<br />

CALL<br />

CP 1<br />

JP NC<br />

LD (0


SEITE 218 <br />

13192 3388 C9 <br />

Befehl GET<br />

13193 3389 CO OB <br />

13194 <br />

13195 <br />

13196 338C 32 65 <br />

13197 <br />

13198 <br />

13199 338F FE 05 <br />

13200 <br />

13201 3391 CA BE <br />

13202 <br />

13203 <br />

13204 3394 E5 <br />

13205 3395 C5 <br />

13206 3396 3E FF <br />

13207 <br />

13208 3398 CD 58 <br />

13209 <br />

13210 <br />

13211 339B 87 <br />

13212 339C 28 00 <br />

13213 <br />

13214 339E 2A 03 <br />

13215 <br />

13216 <br />

13217 33Al 77 <br />

13218 33A2 ED 4B <br />

13219 <br />

13220 <br />

13~21<br />

13222 33A6 B7 <br />

13223 33A7 ED 42 <br />

13224 <br />

13225 33A9 3E 01 <br />

13226 <br />

13227 33A8 ED 58 <br />

13228 <br />

13229 <br />

13230 <br />

13231 33AF EB <br />

13232 3380 77 <br />

13233 3381 23 <br />

13234 3382 73 <br />

13235 3383 23 <br />

13236 3384 72 <br />

13237 3385 2A B9 <br />

13238 <br />

13239 <br />

13240 3388 Dl <br />

13241 33B9 CD 82 <br />

13242 <br />

13243 <br />

13244 338C E1 <br />

13245 33BD C9 <br />

BASIC 1Z-013B<br />

RET<br />

58 CALL 580B<br />

6A LO (6A65).A<br />

CP 05<br />

33 JP Z. 338E<br />

PUSH HL<br />

PUSH BC<br />

LO A. FF<br />

00 CALL 0058<br />

OR A<br />

JR Z. 00 ~ 33ABH<br />

38 LO HL. (3803)<br />

LO (HU.A<br />

85 6A LD BC. (6AB5)<br />

OR A<br />

SBC HL.8C<br />

LO A. 01<br />

89 6A LO OE. (6A89)<br />

EX DE.HL<br />

LD (HU.A<br />

INC HL<br />

LD (HU.E<br />

INC HL<br />

LD (HU.D<br />

6A LD HL. (6A89)<br />

POP OE <br />

18 CALL 1B82 <br />

POP HL<br />

RET<br />

V1_0A<br />

NÄCHSTER BEFEHL<br />

IVARIABLENNAME (HL) AUS­<br />

I WERTEN UNO ZEIGER AUF <br />

I VARIABLE BEREITSTELLEN <br />

TYP IM WERTFLAG MERKEN <br />

REAL - VARIABLE ?<br />

GET ZAHL<br />

PROGRAM<strong>MZ</strong>EIGER MERKEN<br />

ZEIGER AUF VARIA8LE<br />

I CODE TASTATURABFRAGE<br />

I MIT ENTPRELLEN<br />

ABFRAGE. 08 TASTE GEDRUCKT<br />

GEDRUCKTE TASTE <br />

KEINE TASTE GEDRUCKT <br />

ANFANG STRINGARBEITSBEREICH<br />

ZEICHEN EINTRAGEN<br />

ANFANG STRINGTEXTBEREICH<br />

CARRY-FLAG ZURUCKSETZEN<br />

OFFSET AUF TEXT ERRECHNEN<br />

LÄNGE EIN ZEICHEN<br />

ZEIGER AUF RECHENSPEICHER<br />

, TEXTLÄNGE EINTRAGEN<br />

IOFFSET AUF TEXT<br />

; 'EINTRAGEN<br />

I <br />

'ZEIGER AUF FUR TASTEN­<br />

ITEXT AUFGEBAUTEN <br />

IDESCRIPTOR <br />

; ZEIGER AUF VARIABLENDESCR.<br />

I ZEICHEN DER VARIABLEN<br />

I ZUWEISEN<br />

PROGRAM<strong>MZ</strong>EIGER HOLEN <br />

NÄCHSTER 8EFEHL <br />

BASIC<br />

GET Zahl-Variable<br />

13246 <br />

13247 <br />

13248 <br />

13249 <br />

13250 <br />

13251 <br />

13252 <br />

13253 <br />

13254 <br />

13255 <br />

13256 <br />

13257 <br />

13258 <br />

13259 <br />

13260 <br />

13261 <br />

13262 <br />

13263 <br />

13264 <br />

13265 <br />

13266 <br />

13267 <br />

13268 <br />

13269 <br />

13270 <br />

33BE E5 <br />

33BF C5 <br />

33CO 3E FF <br />

33C2 CO 58 00<br />

33C5 06 30 <br />

33C7 38 04<br />

33C9 FE OA<br />

33CB 38 01<br />

33CO AF <br />

33CE 5F <br />

33CF 16 00 <br />

3301 EI <br />

3302 CD 82 3A <br />

3305 E1 <br />

3306 C9 <br />

Befehl POKE<br />

13271 <br />

13272 <br />

13273 <br />

13274 <br />

13275 <br />

13276 <br />

13277 <br />

13278 <br />

13279 <br />

13280 <br />

13281 <br />

13282 <br />

13283 <br />

13284 <br />

13285 <br />

13286 <br />

13287 <br />

13288 <br />

13289 <br />

13290 <br />

13291 <br />

13292 <br />

13293 <br />

13294 <br />

13295 <br />

13296 <br />

13297 <br />

13298 <br />

13299 <br />

13300 <br />

13301 <br />

3307 FE 40 <br />

3309 20 24 <br />

33DB 01 FD 33 <br />

33DE ED 43 FO 33 <br />

33E2 23 <br />

33E3 CO 65 40 <br />

33E6 CD 32 33 <br />

33E9 D5 <br />

33EA CD 50 40 <br />

33ED 01 <br />

33EE E8 <br />

33EF CD F2 00 <br />

FD 33 <br />

33F2 EB <br />

33F3 13 <br />

33F4 CD 14 54 <br />

1Z<br />

PUSH H<br />

PUSH B<br />

LD A.<br />

CALL 0<br />

SU8 A.<br />

JR C.<br />

CP OA<br />

JR C.<br />

XOR A<br />

LD E.A<br />

LO D.<br />

POP HL<br />

CALL 3<br />

POP HL<br />

RET<br />

CP 40<br />

JR NZ.<br />

LD BC.<br />

LD (33<br />

INC HL<br />

CALL 4<br />

CALL 3<br />

PUSH D<br />

CALL 4<br />

POP DE<br />

EX DE.H<br />

CALL 0<br />

3<br />

EX OE.H<br />

INC OE<br />

CALL 5


SEITE 220<br />

BASIC 1Z-013B<br />

13302<br />

13303 33F7 FE 2C CP 2C<br />

13304<br />

13305 33F9 CO RET NZ<br />

13306 33FA 23 INC HL<br />

13307 33FB 18 EC JR EC 13308<br />

13309 33FD 77 LD (HL>.A<br />

13310 33FE C9 RET<br />

13311 33FF 01 F2 00 LD BC. 00F2<br />

13312<br />

13313<br />

13314 3402 ED 43 FO 33 LD (33FO).BC<br />

13315 <br />

13316 <br />

13317 <br />

13318 3406 18 DB JR OB ~ 33E3H <br />

13319 <br />

13320 3408 CA 4E 22 JP Z. 224E <br />

13321 <br />

13322 <br />

Befehl LIMIT<br />

133 23 340B E5<br />

13324 340C CD 14 54 <br />

13325 <br />

13326 <br />

PUSH HL <br />

CALL 5414 <br />

13327 340F FE 4D CP 4D <br />

13328 <br />

13329 3411 20 18 JR NZ. 18 ~ 342BH<br />

13330<br />

13331 3413 23 INC HL <br />

13332 3414 CD 14 54 CALL 5414 <br />

13333 <br />

13334 <br />

13335 3417 FE 41 CP 41 <br />

13336 <br />

13337 3419 20 10 JR NZ. 10 ~ 342BH<br />

13338<br />

13339 341B 23 INC HL<br />

13340 341C CD 14 54 CALL 5414<br />

13341<br />

13342<br />

13343 341F FE 58 CP 58<br />

13344<br />

13345 3421 ~ 342BH<br />

20 08 JR NZ. 08 13346<br />

13347 3423 23 INC HL <br />

13348 3424 01 POP OE <br />

13349 3425 E5 PUSH HL <br />

13350 3426 21 00 FF LD HL. FFOO <br />

13351 <br />

13352 <br />

13353 3429 18 lC JR 1C ~ 3447H <br />

13354 <br />

V1_0A<br />

I ZEICHEN SETZEN <br />

(Komma) ? <br />

NÄCHSTER BEFEHL <br />

PROGRAM<strong>MZ</strong>EIGER <br />

WEITERE DATEN ANGEGEBEN <br />

WERT IM RAM ABLEGEN<br />

• I ROUTINE AUF POKE IM<br />

IBILDSPEICHER UMSTELLEN<br />

I <br />

I <br />

POKE AUSFüHREN<br />

VARIABLEN LöSCHEN<br />

PROGRAM<strong>MZ</strong>EIGER <br />

IPROGRAM<strong>MZ</strong>EIGER AUF <br />

I NÄCHSTES RELEVANTES <br />

I ZEICHEN SETZEN <br />

M (MAX) <br />

• NICHT LIMIT MAX<br />

PROGRAM<strong>MZ</strong>EIGER<br />

; IPROGRAM<strong>MZ</strong>EIGER AUF <br />

'NÄCHSTES RELEVANTES <br />

'ZEICHEN SETZEN <br />

A (MAX) <br />

; NICHT LIMIT MAX<br />

PROGRAM<strong>MZ</strong>EIGER<br />

IPROGRAM<strong>MZ</strong>EIGER IN HL<br />

lAUF NÄCHSTES RELEVANTES<br />

I ZEICHEN SETZEN<br />

X (MAX)<br />

NICHT LIMIT MAX<br />

PROGRAM<strong>MZ</strong>EIGER<br />

; ALTEN PROGRAM<strong>MZ</strong>EIGER VERG.<br />

PROGRAM<strong>MZ</strong>EIGER MERKEN<br />

ADRESSE FüR LIMIT MAX<br />

LI MIT MERKEN<br />

13355<br />

13356<br />

13357<br />

13358<br />

13359<br />

13 360<br />

13 361<br />

13362<br />

13363<br />

13364<br />

13365<br />

13366<br />

13367<br />

13368<br />

13369<br />

133 70<br />

13371<br />

13372<br />

13373<br />

13374<br />

13 375<br />

13376<br />

13377<br />

13378<br />

13379<br />

1338 0<br />

1338 1<br />

13382<br />

1338 3<br />

13384<br />

133 85<br />

13386<br />

13387<br />

13388<br />

133 89<br />

13390<br />

133 91<br />

133 92<br />

13393<br />

13394<br />

133 95<br />

13396<br />

13397<br />

13398<br />

13399<br />

13400<br />

13401<br />

13402<br />

13403<br />

13404<br />

13405<br />

13406<br />

13407<br />

13 408<br />

13 409<br />

1341 0<br />

LIMIT<br />

3 42B<br />

342C<br />

3 42F<br />

3430<br />

3 43 3<br />

3434<br />

3436<br />

3439<br />

343C<br />

343D<br />

3 43E<br />

343F<br />

3440<br />

3 441<br />

3443<br />

3446<br />

3447<br />

344A<br />

3 448<br />

3 44C<br />

3450<br />

3453<br />

3454<br />

3455<br />

Befehl<br />

3456<br />

3459<br />

3 45C<br />

3 45F<br />

3460<br />

3 461<br />

3462<br />

BASIC<br />

mit Angabe von<br />

E1<br />

CD 65 4D<br />

E5<br />

2A BD 6A<br />

B7<br />

ED 52<br />

DA B9 20<br />

2A B7 6A<br />

24 <br />

24 <br />

24 <br />

24 <br />

B7 <br />

ED 52 <br />

02 01 21<br />

EB<br />

CD 3 1 22<br />

E1<br />

D1<br />

ED 7B B9 6A<br />

01 FF FF<br />

C5<br />

D5<br />

C9<br />

DELETE<br />

CA FE 20<br />

CD 2F 35<br />

CD EF 35<br />

E8 <br />

59 <br />

50 <br />

CD 74 69 <br />

1Z<br />

Adre<br />

POP H<br />

CALL<br />

PUSH<br />

LD HL<br />

OR A <br />

SBC H<br />

JP C.<br />

LD HL<br />

INC H<br />

INC H<br />

INC H<br />

INC H<br />

OR A <br />

SBC H<br />

JP NC<br />

EX DE<br />

CALL -<br />

POP H<br />

POP D<br />

LD SP<br />

LD BC<br />

PUSH<br />

PUSH<br />

RET <br />

JP Z.<br />

CALL<br />

CALL<br />

EX DE<br />

LD E.C<br />

LD D.<br />

CALI_


13411<br />

13412<br />

13413<br />

13414<br />

13415<br />

SEITE 222<br />

13416 3468<br />

13417<br />

13418<br />

13419 346B<br />

13420 346C<br />

13421 3460<br />

13422 346E<br />

13423<br />

13424<br />

13425 3471<br />

13426<br />

13427<br />

13428 3474<br />

13429<br />

13430<br />

13431<br />

13432 3478<br />

13433<br />

13434<br />

13435<br />

13436 347C<br />

13437<br />

13438 347E<br />

13439<br />

13440<br />

13441<br />

13442 3482<br />

13443<br />

13444 3484<br />

13445<br />

13446 3486<br />

13447<br />

13448 3488<br />

13449<br />

13450<br />

13451 348B<br />

13452<br />

13453<br />

13454<br />

13455 348F<br />

13456<br />

13457<br />

13458 3492<br />

13459<br />

13460 3494<br />

13461<br />

13462<br />

BASIC 1Z-013B V1.0A<br />

3465 C3 40 18 JP 1840 WARMSTART BASIC<br />

Zeilennummer bereitstellen mit Untersuchung auf ungleich Null<br />

CD<br />

7A<br />

B3<br />

CO<br />

C3<br />

65<br />

01<br />

40<br />

21<br />

CALL 4065<br />

LD A,D<br />

OR E<br />

RET NZ<br />

JP 2101<br />

ZWEI-BYTE-WERT NACH OE<br />

IZEILENNUMMER<br />

I GLEICH NULL ?<br />

NEIN + OK<br />

INICHT ERLAUBTE ZEILEN­<br />

INUMMER + DATENFEHLER<br />

13465<br />

13466<br />

13467<br />

13468<br />

13469<br />

13470<br />

13471<br />

349B<br />

3490<br />

FE<br />

28<br />

BASIC 1Z<br />

2C<br />

10<br />

CP 2C<br />

JR Z.<br />

349F CD 68 34 CALL 3<br />

13472<br />

13473<br />

13474 34A2 ED 53 DC 34 LD (34<br />

13475<br />

13476<br />

13477<br />

13478<br />

13479<br />

13480<br />

13481<br />

13482<br />

13483<br />

13484<br />

13485<br />

Befehl RENUM 13486<br />

11<br />

ED<br />

ED<br />

lE<br />

ED<br />

28<br />

FE<br />

28<br />

CD<br />

ED<br />

CD<br />

28<br />

CD<br />

OA<br />

53<br />

53<br />

00<br />

53<br />

33<br />

2C<br />

10<br />

68<br />

53<br />

66<br />

23<br />

2F<br />

00<br />

ED<br />

FF<br />

DC<br />

34<br />

ED<br />

1C<br />

33<br />

34<br />

34<br />

34<br />

34<br />

LD OE, OOOA<br />

LD (34ED),DE<br />

LD (34FF),DE<br />

LD E, 00<br />

LD (34DC),DE<br />

JR Z, 33 + 34B7H<br />

CP 2C<br />

JR Z, 10 + 3498H<br />

CALL 3468<br />

LD (34ED),DE<br />

CALL 1C66<br />

JR Z, 23 + 34B7H<br />

CALL 332F<br />

13463 3497 2B<br />

DEC HL<br />

PROGRAM<strong>MZ</strong>EIGER<br />

13464 3498 CD 13 54 CALL 5413 IPROGRAM<strong>MZ</strong>EIGER AUF<br />

10<br />

NEUE ANFANGSZEILENNUMMER<br />

OFFSET<br />

= NULL<br />

AB ALTE ZEILENNUMMER<br />

IKEINE ZAHLEN ANGEGEBEN<br />

1+ STANDARTWERTE BENUTZEN<br />

(Komma)<br />

'KEINE NEUE ANFANGSZEILEN­<br />

I NUMMER ANGEGEBEN<br />

'ZWEI-BYTE-WERT UNGLEICH<br />

I NULL BEREITSTELLEN<br />

NEUE ANFANGSZEILENNUMMER<br />

• I üBERPRüFEN, OB NÄCHSTES<br />

IPROGRAMMBYTE GLEICH<br />

IBEFEHLSENDEZEICHEN IST<br />

• I KEINE WEITEREN WERTE<br />

I ANGEGEBEN<br />

~ SYNTAX KOMMA<br />

13487<br />

13488<br />

13489<br />

13490<br />

13491<br />

13492<br />

13493<br />

13494<br />

13495<br />

13 496<br />

13497<br />

13498<br />

13499<br />

13500<br />

13501<br />

13502<br />

13503<br />

13504<br />

13505<br />

13506<br />

13507<br />

13508<br />

13509<br />

13510<br />

13511<br />

13512<br />

1351 3<br />

13514<br />

135 15<br />

13516<br />

13517<br />

13518<br />

13519<br />

13520<br />

13521<br />

13522<br />

13523<br />

13524<br />

13525<br />

13526<br />

34A6<br />

34A9<br />

34AB<br />

34AE<br />

34AF<br />

34BO<br />

34B3<br />

34B7<br />

34B8<br />

34BB<br />

3 4BC<br />

34BF<br />

34CO<br />

34C2<br />

34C5<br />

34C8<br />

34CB<br />

34CC<br />

34CD<br />

34CE<br />

34CF<br />

3400<br />

34D2<br />

3403<br />

3404<br />

34D5<br />

34D6<br />

CD<br />

28<br />

CD<br />

2B<br />

23<br />

CO<br />

ED<br />

E5<br />

2A<br />

EB<br />

2A<br />

B7<br />

ED<br />

DA<br />

CD<br />

2A<br />

5E<br />

23<br />

56<br />

7A<br />

B3<br />

28<br />

EB<br />

19<br />

2B<br />

EB<br />

23<br />

66<br />

OC<br />

2F<br />

68<br />

53<br />

DC<br />

EO<br />

52<br />

01<br />

22<br />

BF<br />

37<br />

1C<br />

33<br />

34<br />

FF<br />

34<br />

34<br />

21<br />

35<br />

6A<br />

34<br />

CALL 1<br />

JR Z.<br />

CALL 3<br />

DEC<br />

INC<br />

HL<br />

HL<br />

CALL 3<br />

LD (34<br />

PUßH H<br />

LO" HC<br />

EX DE<br />

LD HL<br />

OR A<br />

SBC H<br />

JP C.<br />

CALL 3<br />

LO HL<br />

LD E.<br />

INC HL<br />

LD D.<br />

LD A.D<br />

OR E<br />

JR Z.<br />

EX DE<br />

ADO H<br />

OEC HL<br />

EX OE<br />

INC HL


SEITE 224<br />

BASIC 1Z-013B V1_0A<br />

13527 34D7 4E LD C. (HU IZEILENNUMMER DER ZEILE<br />

13528 34D8<br />

I HOLEN<br />

13529 3 4D9<br />

13530 34DA<br />

13531 34DB<br />

13532<br />

13533<br />

13534 34DE<br />

13535 34DF<br />

13536<br />

13537 34El<br />

13538 34E2<br />

13539<br />

13540 34E4<br />

13541<br />

13542 34E6<br />

13543 34E7<br />

13544<br />

13545 34E9<br />

13546 34EA<br />

13547 34EB<br />

13548 34EC<br />

23<br />

46<br />

E5<br />

21 00 00<br />

B7<br />

ED 42<br />

EI<br />

28 05<br />

38 03<br />

EB<br />

18 E2<br />

2B<br />

2B<br />

2B<br />

01 00 00<br />

INC HL<br />

LD B. (HU<br />

PUSH HL<br />

LD HL. 0000<br />

OR A<br />

SBC HL.BC<br />

POP HL<br />

JR Z. 05 + 34E9H<br />

JR C. 03 + 34E9H<br />

EX DE.HL<br />

JR E2 + 34CBH<br />

DEC HL<br />

DEC HL<br />

DEC HL<br />

LD BC. 0000<br />

ZEIGER AUF ZEILE MERKEN<br />

lAB ALTE ZEILENNUMMER<br />

I (Wert wird eingetragen)<br />

CARRY-FLAG ZURüCKSETZEN<br />

I üBERPRüFEN. OB ZEILENNR.<br />

I GEÄNDERT WERDEN SOLL<br />

ZEIGER AUF ANFANG ZEILE<br />

ZEILENNUMMER ÄNDERN<br />

ZEILENNUMMER ÄNDERN<br />

NÄCHSTE ZEILE TESTEN<br />

I ZEIGER WIEDER AUF<br />

I ANFANG ZEILE<br />

I NEUE ANFANGSZEILENNUMMER<br />

13549 I (Wird eingetragen)<br />

13550<br />

13551 34EF 5E LD E. (HL> IOFFSET AUF NÄCHSTE ZEILE<br />

I HOLEN<br />

13552 34FO<br />

13553 34Fl<br />

13554 34F2<br />

13555 34F3<br />

13556 34F4<br />

13557<br />

13558 34F6<br />

13559 34F7<br />

13560 34F8<br />

13561 34F9<br />

13562 34FA<br />

13563 34FB<br />

13564 34FC<br />

13565 34FD<br />

13566 34FE 21 00 00 LD HL. 0000 IOFFSET<br />

13567<br />

I (Wird eingetragen)<br />

13568<br />

13569 3501<br />

13570 3502<br />

13571<br />

13572 3504<br />

13573 3505<br />

13574 3506<br />

13575 3507<br />

13576<br />

13577 3509<br />

13578<br />

13579<br />

13580 350C<br />

13581 350D<br />

23<br />

56<br />

7A<br />

B3<br />

28<br />

EB<br />

19<br />

2B<br />

EB<br />

23<br />

71<br />

23<br />

70<br />

13<br />

09<br />

38 OA<br />

4D<br />

44<br />

EB<br />

18 E6<br />

CD 2F<br />

EI<br />

C9<br />

35<br />

INC HL<br />

LD D. (HU<br />

LD A.D<br />

OR E<br />

JR Z. 13<br />

EX DE.HL<br />

ADD HL.DE<br />

DEC HL<br />

EX DE.HL<br />

INC HL<br />

LD (HU. C<br />

INC HL .<br />

LD (HU.B<br />

+ 3509H<br />

ADD HL.BC<br />

JR C. OA + 350EH<br />

LD C.L<br />

LD B.H<br />

EX DE.HL<br />

JR E6 + 34EFH<br />

CALL 352F<br />

POP HL<br />

RET<br />

=<br />

•<br />

I GLEICH NULL ?<br />

I<br />

ENDE PROGRAMM<br />

I ZEIGER AUF NÄCHSTE<br />

I ZEILE ERRECHNEN<br />

INEUE ZEILENNUMMER<br />

I EINTRAGEN<br />

NÄCHSTE NEUE ZEILENNR.<br />

ZEILENNUMMER ZU GROSS<br />

INEUE ZEILENNUMMER<br />

I NACH BC üBERTRAGEN<br />

NÄCHSTE ZEILE ÄNDERN<br />

I ZEIGER AUF ZEILEN IM<br />

IPROGRAMM IN ZEILEN­<br />

INUMMERN UMSETZEN<br />

PROGRAM<strong>MZ</strong>EIGER HOLEN<br />

NÄCHSTER BEFEHL<br />

ERR.<br />

BASIC 1Z<br />

Bei Fehler in RENUM Program<br />

13582<br />

1.3583<br />

13584<br />

13585<br />

13586<br />

13587<br />

13588<br />

13589<br />

13590<br />

13591<br />

13592<br />

13593<br />

13594<br />

13595<br />

13596<br />

13597<br />

13598<br />

13599<br />

13600<br />

13601<br />

350E<br />

3511<br />

3514<br />

3517<br />

3519<br />

351C<br />

351F<br />

21 OA<br />

22 FF<br />

22 ED<br />

2E 00<br />

22 OC<br />

CD B7<br />

C3 01<br />

00<br />

3 4<br />

34<br />

34<br />

34<br />

21<br />

LD HL.<br />

LD (34<br />

LD (34<br />

LD L.<br />

LD (34<br />

CALL 3<br />

JP 2101<br />

Zeilennummern im Programm<br />

13602<br />

13603<br />

13604<br />

13605<br />

13606<br />

13607<br />

13608<br />

13609<br />

13610<br />

13611<br />

13612<br />

13613<br />

13614<br />

3522<br />

3523<br />

3524<br />

3527<br />

3 52A<br />

3 52C<br />

3520<br />

352E<br />

05<br />

E5<br />

21<br />

22<br />

18<br />

EI<br />

Dl<br />

C9<br />

74<br />

58<br />

OB<br />

3 5<br />

35<br />

PUSH O<br />

PUSH H<br />

LD HL.<br />

LD (35<br />

JR OB<br />

POP HL<br />

POP OE<br />

RET<br />

Zeiger auf Zeilen im Progra<br />

13615 352F<br />

13616 3530<br />

13617 3531<br />

13618<br />

13619<br />

13620 3534<br />

13621<br />

13622<br />

13623 3537<br />

13624<br />

13625<br />

13626 353A<br />

13627 353B<br />

D5<br />

E5<br />

21 5A<br />

22 58<br />

2A BF<br />

2B<br />

23<br />

35<br />

3 5<br />

6A<br />

PUSH O<br />

PUSH H<br />

LD HL.<br />

LD (35<br />

LD HL.<br />

DEC HL<br />

INC HL<br />

13628 353C 13629 3530 7E<br />

23<br />

LD A. (<br />

INC HL<br />

13630 353E B6 OR (HU<br />

13631 353F 28 EB JR Z.<br />

13632<br />

13633 3541 23 INC HL<br />

,<br />

I<br />

I<br />

I<br />

I


SEITE 226<br />

BASIC 1Z-013B V1.0A BASIC 1Z<br />

13634 3542 5E LD E. (HU IZEILENNUMMER DER<br />

I ZEILE HOLEN<br />

13635 3543<br />

13636 3544<br />

13637 3545<br />

13638<br />

13639<br />

13640<br />

13641 3549<br />

13642<br />

13643<br />

13644 354C<br />

13645 354D<br />

13646<br />

13647 354F<br />

13648<br />

13649 3551<br />

13650<br />

13651 3553<br />

13652<br />

13653 3555<br />

13654<br />

13655 3557<br />

13656<br />

13657<br />

13658 355A<br />

13659<br />

13660 355C<br />

13661<br />

13662 355E<br />

23<br />

56<br />

ED 53 AC 35<br />

CD 80 38<br />

B7<br />

28 EC<br />

FE OB<br />

28 04<br />

FE OC<br />

20 F2<br />

C3 5A 35<br />

(74 35)<br />

INC HL<br />

LD D. (HU<br />

LD (35AC).DE<br />

CALL 3880<br />

OR A<br />

JR Z. EC .. 353BH<br />

CP OB<br />

JR Z. 04 .. 3557H<br />

CP OC<br />

JR NZ. F2 .. 3549H<br />

JP 355A<br />

(3574)<br />

Zeiger auf Zeile umsetzen in Zeilennummer<br />

FE<br />

28<br />

2B<br />

OB<br />

EB<br />

CP OB<br />

JR Z. EB<br />

DEC HL<br />

.. 3549H<br />

I<br />

IMOMENTANE ZEILENNUMMER<br />

I FüR FEHLERAUSGABE IN<br />

I ROUTINE EINTRAGEN<br />

I ZEIGER IN HL AUF NÄCHSTES<br />

I RELEVANTE PROGRAMMBYTE<br />

I STELLEN<br />

ZEILENENDE ?<br />

NÄCHSTE ZEILE BEARBEITEN<br />

CODE ZEILENNUMMER<br />

CODE ZEIGER AUF ZEILE<br />

WEITER UNTERSUCHEN<br />

I RICHTIGES UMSETZSTüCK<br />

I AUFRUFEN<br />

I (Adresse wird eingetragen)<br />

CODE ZEILENNUMMER ?<br />

I ST I MMT SCHON ..<br />

I WEITER UNTERSUCHEN<br />

13663 355F 5E LD E. (HU I ZEIGER AUF ZEILE HOLEN<br />

13664 3560<br />

13665 3561<br />

13666 3562<br />

13667 3563<br />

13668 3564<br />

13669 3565<br />

13670 3566<br />

13671 3567<br />

13672 3568<br />

13673 3569<br />

13674 356A<br />

13675 356B<br />

13676 356C<br />

13677 356D<br />

13678 356E<br />

13679<br />

13680 3570<br />

13681 3571<br />

13682 3572<br />

13683<br />

23<br />

56<br />

E5<br />

EB<br />

23<br />

23<br />

5E<br />

23<br />

56<br />

EI<br />

72<br />

2B<br />

73<br />

2B<br />

36<br />

23<br />

23<br />

18<br />

OB<br />

D5<br />

INC HL<br />

LD D. (HU<br />

PUSH HL<br />

EX OE.HL<br />

INC HL<br />

INC HL<br />

LD E. (HU<br />

INC HL<br />

LD D. (HU<br />

POP HL<br />

LD (HU.O<br />

DEC HL<br />

LD (HU.E<br />

OEC HL<br />

LD (HU. OB<br />

INC HL<br />

INC HL<br />

JR 05 .. 3549H<br />

ZEIGER AUF PROGRAMM<br />

IOFFSET. AUF NÄCHSTE<br />

I ZEILE üBERSPRINGEN<br />

I ZEILENNUMMER DER<br />

I ZEILE HOLEN<br />

ZEIGER AUF PROGRAMM<br />

I ZEILENNUMMER IN<br />

I PROGRAMM EINTRAGEN<br />

CODE ZEILENNUMMER EINTRAGEN<br />

I ZEILENNUMMER üBERSPRINGEN<br />

I<br />

I REST PROGRAMM UNTERSUCHEN<br />

I UND UMSETZEN<br />

13684 3574<br />

13685<br />

13686 3576<br />

13687<br />

13688 3578<br />

13689 3579<br />

13690 357A<br />

13691<br />

13692<br />

13693 3570<br />

13694 357E<br />

13695 357F<br />

13696 3580<br />

13697 3 581<br />

13698<br />

13699 3583<br />

13700<br />

13 701<br />

13702 3586<br />

13703<br />

13704 3588<br />

13705 3589<br />

13706 358A<br />

13707 358B<br />

13708<br />

137 09<br />

1371 0<br />

13711<br />

1371 2<br />

13713<br />

13714<br />

Zeilennummer umsetzen in Z<br />

3580<br />

358E<br />

358F<br />

3590<br />

3591<br />

13715 3593<br />

13716 3594<br />

13717<br />

13718<br />

13719 3597<br />

13720<br />

13721<br />

13722 359A<br />

13723<br />

13724 359C<br />

13725<br />

13726<br />

137 2 7 359F<br />

13728<br />

13729<br />

13730 35A2<br />

13731<br />

13732<br />

FE<br />

28<br />

2B<br />

E5<br />

CD<br />

50<br />

54<br />

70<br />

B4<br />

28<br />

CO<br />

38<br />

EB<br />

E1<br />

2 B<br />

36<br />

23<br />

OC<br />

01<br />

60<br />

34<br />

BB<br />

OB<br />

7 3<br />

23<br />

72<br />

18 OF<br />

3 A<br />

35<br />

CP OC<br />

JR Z.<br />

OEC HL<br />

PUSH H<br />

CALL 3<br />

LD E.L<br />

LO O.H<br />

LD A.L<br />

OR H<br />

JR Z.<br />

CALL 35<br />

JR C.<br />

EX OE.H<br />

POP HL<br />

DEC HL<br />

OC LO (HU<br />

INC HL<br />

LD INC HL<br />

(HU<br />

LD (HU<br />

JR DF<br />

Fehl e rmeldung Zeile nicht<br />

EB<br />

11 59<br />

CD 5 1<br />

3 E 20<br />

CO D3<br />

CD A7<br />

CD 51<br />

4C<br />

00<br />

17<br />

21<br />

00<br />

EX OE.H<br />

LO DE.<br />

CALL 00<br />

LD A. 2<br />

CALL 1<br />

CALL 21<br />

CALL 00<br />

13733 35A5 11 96 2 1 LD DE.<br />

1373 4<br />

13735<br />

13736 35A8 CD 51 00 CALL 00<br />

1373 7<br />

1373 8<br />

137 3 9 3 5AB 2 1 00 00 LD HL.<br />

I<br />

I<br />

I<br />

I


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


SEITE 230 <br />

BASIC 1Z-013B V1_0A <br />

13853 3610 28 08 JR Z. 08 ~ 3627H WEITER UNTERSUCHEN<br />

13854<br />

13855 361F FE 2C CP 2C (Komma)<br />

13856<br />

13857 3621 CA FE 20 JP Z. 20FE SYNTAX - FEHLER<br />

13858<br />

13859<br />

13860 3624 4B LO C.E IANFANGSZEILENNUMMER ALS<br />

13861 3625 42 LD B.O IENDZEILENNUMMER VORGEBEN<br />

13862 3626 C9 RET<br />

13863 3627 23 INC HL ZEIGER AUF TEXT<br />

13864 3628 CO 66 lC CALL 1C66 I üBERPRüFEN. OB ZEICHEN<br />

13865 I (HL) GLEICH BEFEHLS­<br />

13866 lENDEZEICHEN IST<br />

1.3867 362B C8 RET Z KEINE ENDZEILENNR ANGEGEBEN<br />

13868 362C FE 2E CP 2E (Punkt)<br />

13869<br />

13870 362E 20 06 JR NZ. 06 ~ 3636H WEITER UNTERSUCHEN<br />

13871<br />

13872 3630 EO 4B E2 38 LD BC. (38E2) I LETZTE EDITORZEILENNUMMER<br />

13873 I (AUTO-ZEI LENNUMMER)<br />

13874<br />

13875<br />

13876 3634 23 INC HL PROGRAM<strong>MZ</strong>EIGER<br />

13877 3635 C9 RET<br />

13878 3636 FE OB CP OB CODE ZEILENNUMMER ?<br />

13879<br />

13880 3638 20 04 JR NZ. 04 ~ 360EH NEIN ~ SYNTAX - FEHLER<br />

13881<br />

13882 363A 23 INC HL PROGRAM<strong>MZ</strong>EIGER<br />

13883 363B 4E LO C. (HL> I ZEILENNUMMER HOLEN<br />

13884 363C 23 INC HL I<br />

13885 3630 46 LO B. (HL> I<br />

13886 363E 23 INC HL PROGRAM<strong>MZ</strong>EIGER<br />

13887 363F C9 RET<br />

Befehl EOIT


SEITE 232<br />

BASIC 1Z-013B V1.0A BASIC 1Z<br />

Cursor auf Anfang des ausgegebenen Textes stellen Beim Suchen von GOSUB-Dat<br />

13961<br />

13962<br />

13963<br />

13964<br />

13965<br />

13966<br />

13967<br />

3689<br />

368A<br />

368B<br />

368C<br />

78<br />

B7<br />

C8<br />

3E 14<br />

LD A,8<br />

OR A<br />

RET Z<br />

LD A, 14<br />

ANZAHL<br />

GLEICH<br />

FERTIG<br />

Cursor<br />

AUSGEGEBENE<br />

NULL ?<br />

links<br />

ZEICHEN<br />

14013<br />

14014<br />

14015<br />

14016<br />

14017<br />

368E CD D3 17 CALL 1703 ZEICHEN IM ACCU AUSGEBEN 14018<br />

14019<br />

36BO<br />

36BE<br />

36BF<br />

08<br />

OB<br />

3E<br />

12<br />

DEC BC<br />

DEC BC<br />

LD A.<br />

36Cl B9<br />

CF' C<br />

36C2 20 F5 JR NZ.<br />

13968 14020 36C4 E8 EX DE<br />

13969 3691 10 FB DJNZ FB + 368EH I WEITERE Cursor links 14021 36C5 21 10 00 LO HL<br />

13970 I AUSGEBEN 14022<br />

13971 3693 C9 RET 14023<br />

14024 36C8 39 ADD H<br />

14025 36C9 F9 LD SP.<br />

Befehl RETURN 14026<br />

14027<br />

13972 3694 DD EI POP IX I RüCKSPRUNGADRESSE VOM 14028<br />

13973 I STACK HOLEN<br />

13974<br />

13975<br />

13976<br />

13977<br />

13978<br />

13979<br />

3696<br />

3697<br />

3698<br />

3699<br />

369A<br />

Cl<br />

03<br />

78<br />

B1<br />

28 ID<br />

POP<br />

INC<br />

LD<br />

OR<br />

JR<br />

8C<br />

8C<br />

WERTCODE VOM<br />

GLEICH ENDE<br />

A,B<br />

C<br />

Z, ID + 3689H JA + RETURN<br />

FEHLER<br />

STACK<br />

STACK<br />

ohne GOSUB<br />

36CA<br />

36CB<br />

EB<br />

18 C9<br />

HOLEN<br />

? 8efehl GOSU8<br />

14029<br />

14030<br />

14031<br />

13980 369C 03 INC BC GLEICH GOSU8-DATENSATZ ? 14032<br />

13981<br />

J3982<br />

3 69D<br />

369E<br />

78<br />

BI<br />

LD<br />

OR<br />

A,B<br />

C<br />

14033<br />

14034<br />

36CO<br />

36CE<br />

3601<br />

.3602<br />

E5<br />

CO 23 33<br />

13983 369F 20 lC JR NZ, lC + 368DH NEIN ~ AUF FOR-DATEN<br />

14035 3603 Cl<br />

POP 8C<br />

13984<br />

UNTERSUCHEN<br />

14036 3604 05<br />

PUSH D<br />

13985 36Al CD 14 54 CALL 5414 PROGRAM<strong>MZ</strong>EIGER AUF 14037 3605 09 EXX<br />

13986<br />

NÄCHSTES RELEVANTES<br />

14038 3606 2A EO 38 LD HL.<br />

13987<br />

ZEICHEN SETZEN<br />

14039<br />

13988<br />

13989<br />

14040<br />

14041<br />

13990<br />

13991<br />

36A4<br />

36A5<br />

36A6<br />

EB<br />

EI<br />

22 E6 38<br />

EX DE,HL<br />

POP HL<br />

LD (38E6),HL<br />

PROGRAM<strong>MZ</strong>EIGER NACH OE<br />

ALTE ZEILENNUMMER HOLEN<br />

IALS AKTUELLE ZEILEN­<br />

INUMMER VORGEBEN<br />

14042<br />

14043<br />

3609<br />

360A<br />

E8<br />

EI<br />

E5<br />

2A E6 38<br />

13992 14044<br />

13993 36A9 EI POP HL ALTEN ZEIGER HOLEN 14045 3600 E5 PUSH H<br />

13994 36AA 22 EO 38 LD (38EO),HL tALS ZEIGER AUF NÄCHSTE 14046 360E 21 FE FF LD HL.<br />

13995<br />

IZEILE MERKE N<br />

14047<br />

13996 14048<br />

13997 36AD EI POP HL ALTEN PROGRAM<strong>MZ</strong>EIGER HOLEN 14049 36El E5 PUSH H<br />

13998 36AE DD E5 PUSH IX I RüCKSPRUNGADRESSE AUF 14050 36E2 21 00 00 LD HL.<br />

13999 IBEFEHLSDECODIERROUTINE 14051<br />

14000 36BO FE 3A CP 3A


SEITE 234<br />

BASIC 1Z-013B<br />

14069 36F5 C3 07 38 JP 3807<br />

14070<br />

14071<br />

14072 36F8 C3 FE 20 JP 20FE<br />

14073<br />

14074<br />

Befehl RESUME<br />

14075 36FB 3A D8 38 LD A. (38D8)<br />

14076<br />

14077<br />

14078 36FE FE 02 CP 02<br />

14079<br />

14080 3700 DA D4 20 JP C. 2004<br />

14081<br />

14082<br />

14083 3703 3D DEC A<br />

14084 3704 32 D8 38 LD (38D8).A<br />

14085<br />

14086<br />

14087 3707 CD 66 lC CALL 1C66<br />

14088<br />

14089<br />

14090 370A EB EX DE.HL<br />

14091 3 70B 2A EA 38 LD HL. (38EA)<br />

14092<br />

14093<br />

14094 370E 22 E6 38 LD (38E6),HL<br />

14095<br />

14096<br />

14097 3711 2A EC 38 LD HL, (38EC)<br />

14098<br />

14099<br />

14100 3714 22 EO 38 LD (38EO),HL<br />

14101<br />

14102<br />

14103 3717 2A EE 38 LD HL, (38EE)<br />

14104<br />

14105<br />

14106 371A 20 04 JR NZ. 04 + 3720H •<br />

14107<br />

14108 371C Cl POP BC<br />

14109 371D C3 29 19 JP 1929<br />

14110<br />

14111<br />

14112 3720 FE 8E CP 8E<br />

14113<br />

14114 3722 CA 23 33 JP Z, 3323<br />

14115<br />

14116<br />

14117 3725 EB EX DE,HL ,<br />

14118 3726 C3 07 38 JP 3807<br />

14119<br />

14120<br />

V1.0A<br />

GOTO - ROUTINE<br />

SYNTAX - FEHLER<br />

ON-ERROR-GOTO FLAG<br />

CODE FEHLER AUFGETRETEN<br />

I FEHLER 21<br />

IRESUME OHNE FEHLER<br />

STATUS AUF ON ERROR GOTO<br />

UND WIEDER MERKEN<br />

I UNTERSUCHEN, OB NÄCHSTES<br />

IPROGRAMMBYTE GLEICH<br />

IBEFEHLSENDEZEICHEN IST<br />

PROGRAM<strong>MZ</strong>EIGER NACH DE<br />

ZEILENNUMMER BEI FEHLER<br />

AKTUELLE ZEILENNUMMER<br />

I ZEIGER AUF NÄCHSTE ZEILE<br />

I BEI FEHLER<br />

ZEIGER AUF NÄCHSTE ZEILE<br />

PROGRAM<strong>MZ</strong>EIGER BEI FEHLER<br />

SPEZIELLER RESUME<br />

STACK CORRIGIEREN<br />

BEFEHL ERNEUT AUSFüHREN<br />

NEXT (Zwi schencode)<br />

IPROGRAM<strong>MZ</strong>EIGER AUF<br />

I ANFANG NÄCHSTER BEFEHL<br />

I STELLEN<br />

ALTEN PROGRAM<strong>MZ</strong>. NACH HL<br />

GOTO - ROUTINE<br />

Befehl<br />

14121 3729<br />

14122<br />

14123<br />

14124 372C<br />

14125<br />

14126 372E<br />

14127<br />

14128 3730<br />

14129<br />

14130 3732<br />

14131<br />

14132<br />

14133 3735<br />

14134<br />

14135<br />

14136 3738<br />

14137<br />

14138 373A<br />

14139<br />

14140<br />

14141 373D<br />

14142<br />

14143<br />

14144 3740<br />

14145<br />

14146 3742<br />

14147<br />

14148 3744<br />

14149 .3745<br />

14150 3746<br />

14151<br />

14152<br />

14153 3749<br />

14154 3 74A<br />

14155 374B<br />

14156<br />

14157 3740<br />

14158<br />

14159<br />

14160 3750<br />

14161<br />

14162<br />

14163 3753<br />

14164<br />

14165<br />

14166 3756<br />

14167<br />

14168 3758<br />

14169<br />

14170<br />

14171 375B<br />

14172 375C<br />

14173 3750<br />

14174 375E<br />

BASIC<br />

ON ERROR<br />

CD 13 54<br />

FE 80<br />

28 00<br />

FE 82<br />

C2 FE 20<br />

CD 13 54<br />

FE EO<br />

C2 FE 20<br />

CD 13 54<br />

FE OB<br />

20 1B<br />

23<br />

E5<br />

CD 60 3 A<br />

70<br />

B4<br />

28 2F<br />

CO BB 35<br />

DA CB 20<br />

22 E8 38<br />

3E 01<br />

32 D8 38<br />

E1<br />

23<br />

23<br />

C9<br />

1Z<br />

CALL 5<br />

CP 80<br />

JR Z.<br />

CP 82<br />

JP NZ<br />

CALL 5<br />

CP EO<br />

JP NZ.<br />

CALL 5<br />

CP OB<br />

JR NZ<br />

INC HL<br />

PUSH H<br />

CALL 3<br />

LD A.L<br />

OR H<br />

JR Z,<br />

CALL 3<br />

JP C.<br />

LD (38<br />

LD A,<br />

LD (38<br />

POP HL<br />

INC HL<br />

INC HL<br />

RET


SEITE 236<br />

BASIC 1Z-013B<br />

ON ERROR GOTO Label<br />

14175 375F FE 22 CP 22<br />

14176<br />

14177 3761 C2 CB 20 JP NZ. 20CB<br />

14178<br />

14179<br />

14180 3764 E5 PUSH HL<br />

14181 3765 CO 67 3A CALL 3A67<br />

14182<br />

14183<br />

14184 3768 21 00 00 LD HL. 0000<br />

14185<br />

14186<br />

14187 376B 22 E8 38 LD (38E8).HL<br />

14188<br />

14189<br />

14190 376E E1 POP HL<br />

14191 376F CO C5 38 CALL 38C5<br />

14192<br />

14193<br />

14194 3772 B7 OR A<br />

14195 3773 28 01 JR Z. 01 + 3776H<br />

14196<br />

14197 3775 23 INC HL<br />

14198 3776 3E 01 LO A. 01<br />

14199<br />

14200 3778 32 08 38 LD (3808>.A<br />

14201<br />

14202<br />

14203 377B C9 RET<br />

ON ERROR GOTO 0<br />

14204 377C 3A 08 38 LD A. (38D8)<br />

14205<br />

14206<br />

14207 377F 30 DEC A<br />

14208 3780 28 06 JR Z. 06 + 3758H<br />

14209<br />

14210 3782 AF XOR A<br />

14211 3783 32 08 38 LD (38D8).A<br />

14212<br />

14213<br />

14214 3786 2A EA 38 LD HL. (38EA)<br />

14215<br />

14216<br />

14217 3789 22 E6 38 LD (38E6).HL<br />

14218<br />

14219<br />

14220 378C 3A F2 38 LD A. (38F2)<br />

14221<br />

14222<br />

14223 378F C3 08 21 JP 2108<br />

14224<br />

14225<br />

V1.0A<br />

(Anführungszeichen)<br />

IKEIN LABEL + FEHLER 16<br />

IZEILENNUMMER NICHT VORH.<br />

PROGRAM<strong>MZ</strong>EIGER <br />

I SYNTAX - FEHLER <br />

I (ROUTINE FüR LABELS <br />

I FEHLT> <br />

ZEIGER AUF ON-ERROR-ZEILE <br />

PROGRAM<strong>MZ</strong>EIGER <br />

IPROGRAM<strong>MZ</strong>EIGER AUF 2tes <br />

IA~FüHRUNGSZEICHEN ODER <br />

IZEILENENDE STELLEN <br />

ZEILENENDE ? <br />

JA <br />

ANFüHRUNGSZEICHEN üBERSPR. <br />

CODE ON ERROR GOTO GESETZT <br />

ON ERROR GOTO FLAG <br />

ON ERROR GOTO FLAG <br />

GESETZT ? <br />

JA + NEUEN STATUS MERKEN <br />

ACCU AUF NULL<br />

~ ON ERROR FLAG<br />

ZEILENNUMMER BEI FEHLER<br />

AKTUELLE ZEILENNUMMER<br />

I NUMMER DES AUFGETRETENEN<br />

I FEHLERS<br />

FEHLER AUSGEBEN<br />

Befehl<br />

14226 3792<br />

14227<br />

14228<br />

14229 3795<br />

14230<br />

14231 3797<br />

14232<br />

14233 3799<br />

14234<br />

14235<br />

14236 379C<br />

14237 379D<br />

14238 379E<br />

14239<br />

14240 37AO<br />

14241<br />

14242<br />

14243 37A3<br />

14244<br />

14245 37A5<br />

14246<br />

14247 37A7<br />

14248<br />

14249<br />

14250 37AA<br />

14251<br />

14252 37AC<br />

14253<br />

14254 37AE<br />

14255<br />

14256 37BO<br />

14257<br />

14258 37B2<br />

14259<br />

14260<br />

14261 37B5<br />

14262 37B6<br />

14263 37B7<br />

14264 37B8<br />

14265<br />

14266'<br />

14267 37BB<br />

14268<br />

14269 37BD<br />

14270 37BE<br />

14271 37BF<br />

14272<br />

14273 37C1<br />

14274 37C2<br />

14275<br />

14276<br />

14277 37C5<br />

14278 37C6<br />

14279 37C7<br />

14280 37C8<br />

14281 37C9<br />

14282<br />

14283 37CB<br />

14284 37CC<br />

14285 37CO<br />

BASIC<br />

ON<br />

CD 14 54<br />

FE Cl<br />

28 90<br />

CD 65 4D<br />

4B<br />

42<br />

FE 87<br />

D2 FE 20<br />

FE 82<br />

20 10<br />

CD 13 54<br />

lE 81<br />

FE E4<br />

28 06<br />

FE EO<br />

C2 FE 20<br />

10<br />

7B<br />

E5<br />

21 47 31<br />

D6 80<br />

87<br />

5F<br />

16 00<br />

19<br />

CD 60 3A<br />

E3<br />

23<br />

78<br />

B7<br />

20 22<br />

79<br />

B7<br />

28 lE<br />

1<br />

CALL<br />

CP C<br />

JR Z,<br />

CALL<br />

LD C<br />

LD B<br />

CP 8<br />

JP N<br />

CP 8<br />

JR N<br />

CALL<br />

LO E,<br />

CP E<br />

JR Z.<br />

CP E<br />

JP N<br />

DEC E<br />

LO A<br />

PUSH<br />

LO H<br />

SUB A<br />

ADD A<br />

LD E.<br />

LD 0,<br />

ADD H<br />

CALL<br />

EX (S<br />

INC H<br />

LO A<br />

OR A<br />

JR N<br />

LD A<br />

OR A<br />

JR Z


SEITE<br />

14286 <br />

14287 37CF<br />

14288 3700 <br />

14289 3701 <br />

14290 3702 <br />

14291 <br />

14292 <br />

14293 3705 <br />

14294 <br />

14295 3707 <br />

14296 <br />

14297 3709 <br />

14298 <br />

14299 37DB<br />

14300 <br />

14301 3700 <br />

14302 <br />

14303 37DF<br />

14304 <br />

14305 <br />

14306 37E2<br />

14307 37E3<br />

14308 37E4<br />

14309 <br />

14310 <br />

14311 37E7<br />

14312 <br />

14313 37E9<br />

14314 37EA<br />

14315 <br />

14316 37EC<br />

14317 37ED<br />

14318 37EE<br />

14319 <br />

14320 <br />

14321 37Fl <br />

14322 <br />

14323 <br />

14324 37F4 <br />

14325 37F5 <br />

14326 <br />

14327 37F7 <br />

14328 <br />

Befehl<br />

14329 37F9 <br />

14330 <br />

14331 <br />

14332 37FC <br />

14333 37FD <br />

14334 <br />

14335 37FF <br />

14336 <br />

14337 <br />

14338 3802 <br />

14339 <br />

14340 3804 <br />

14341 <br />

238 <br />

47 <br />

05 <br />

C8 <br />

CD 14 <br />

FE 22 <br />

28 18 <br />

FE OB <br />

28 05 <br />

FE OC <br />

C2 FE <br />

23 <br />

23 <br />

CD 13 <br />

FE 2C<br />

23 <br />

28 E4 <br />

2B <br />

Dl <br />

C3 23 <br />

CD C5<br />

B7<br />

28 F6<br />

18 EB<br />

GO <br />

CD 14 <br />

23 <br />

FE E4 <br />

CA CD<br />

FE EO<br />

C2 FE<br />

BASIC 1Z-013B<br />

LD B.A <br />

DEC B <br />

RET Z <br />

54 CALL 5414 <br />

CP 22 <br />

JR Z. 18 ~ 37FIH <br />

CP OB <br />

JR Z. 05 ~ 37E2H <br />

CP OC <br />

20 JP NZ. 20FE<br />

INC HL <br />

INC HL <br />

54 CALL 5413 <br />

CP 2C<br />

INC HL<br />

JR Z. E4 ~ 37DOH<br />

DEC HL <br />

POP DE <br />

33 JP 3323 <br />

38 CALL 38C5<br />

OR A<br />

JR Z. F6 ~ 37EDH<br />

JR EB ~ 37E4H<br />

54 CALL 5414 <br />

INC HL c<br />

CP E4<br />

36 JP Z. 36CD ~<br />

CP EO<br />

20 JP NZ. 20FE<br />

V1.0A<br />

ZÄHLER WIEVIELTE ADRESSE<br />

MINUS EINS<br />

STEHT AUF ADRESSE<br />

'PROGRAM<strong>MZ</strong>EIGER AUF<br />

• NÄCHSTES RELEVANTES<br />

• ZEICHEN SETZEN<br />

(Anführungszeichen)<br />

ENDE LABEN SUCHEN<br />

CODE INTEGER-ZEILENNUMMER<br />

ZEILENNUMMER üBERSPRINGEN<br />

CODE ZEIGER AUF ZEILE<br />

SYNTAX - FEHLER<br />

, ZEILENNUMMER/ZEIGER<br />

I üBERSPR I NGEN<br />

'PROGRAM<strong>MZ</strong>EIGER AUF<br />

'NÄCHSTES RELEVANTE<br />

I ZEICHEN SETZEN<br />

(Komma)<br />

PROGRAM<strong>MZ</strong>EIGER<br />

WEITERE ADRESSEN ANGEGEBEN<br />

PROGRAM<strong>MZ</strong>EIGER CORRIGIEREN<br />

STACK CORRIGIEREN<br />

• ANFANG DES NÄCHSTEN<br />

• BEFEHLS SUCHEN<br />

• ZEIGER IN HL AUF ENDE<br />

• LABEL STELLEN<br />

ZEILENENDE ? <br />

NÄCHSTEN BEFEHL ABARBEITEN <br />

• UNTERSUCHEN. OB WEITERE<br />

• ZEILENNUMMERN ANGEGEBEN<br />

IPROGRAM<strong>MZ</strong>EIGER AUF<br />

• NÄCHSTES RELEVANTES<br />

• ZEICHEN SETZEN<br />

PROGRAM<strong>MZ</strong>EIGER<br />

SUB (Zwischencode)<br />

GOSUB - ROUTINE<br />

TO (Zwi$chencode)<br />

SYNTAX - FEHLER<br />

14342 <br />

Befehl<br />

14343 3807 <br />

14344 <br />

143 45 <br />

14346 380A <br />

143 47 380B <br />

14348 <br />

14349 3800 <br />

14350 <br />

14351 380F <br />

14352 <br />

14353 <br />

14354 3812 <br />

14355 <br />

14356 <br />

14357 381 5 <br />

14358 3816 <br />

14359 <br />

14360 <br />

14361 3819 <br />

143 6 2 <br />

14363 <br />

14364 381C <br />

14365 <br />

14366 <br />

14367 381F <br />

14368 <br />

14369 3 82 1 <br />

14370 <br />

143 71 3823 <br />

14372 <br />

14373 <br />

14374 3826 <br />

14375 3827 <br />

14376 3828 <br />

14377 3829 <br />

14378 382A <br />

14379 382 8 <br />

14380 <br />

143 81 382D <br />

14.382 38 2E <br />

143 8 3 <br />

14384 <br />

14385 3 83 1 <br />

14386 <br />

14387 <br />

14388 383 4 <br />

14389 3 83 5 <br />

14390 3836 <br />

143 91 3837 <br />

14392 38 38 <br />

14393 38 39 <br />

14394 <br />

14395 383B <br />

BASIC<br />

GOTO<br />

CD 14 54 <br />

23 <br />

FE OC <br />

20 12 <br />

CD 60 3A<br />

22 EO 38 <br />

AF <br />

32 D9 38 <br />

C3 FE 18 <br />

2A ElF 6A<br />

18 Fl<br />

FE OB<br />

C2 F8 36 <br />

5E <br />

23 <br />

56 <br />

7A <br />

B3 <br />

28 EF <br />

EB <br />

CD BB 35 <br />

DA CB 20 <br />

ES <br />

72 <br />

2B <br />

73 <br />

2B <br />

3 6 OC <br />

EB<br />

1Z<br />

CALL<br />

INC H<br />

CP O<br />

JR N<br />

CALL<br />

LD (3<br />

XOR A<br />

LD (3<br />

JP 1<br />

LD H<br />

JR'· F<br />

CP<br />

JP N<br />

LD E<br />

INC<br />

LD D<br />

LD A<br />

OR E<br />

JR Z<br />

EX D<br />

CALL<br />

JP C<br />

EX D<br />

LD (<br />

DEC<br />

LD (<br />

DEC<br />

LD (<br />

EX D


SEITE 240<br />

BASIC 1Z-013B V1.0A BASIC 1Z<br />

14396 383C C3 12 38 JP 3812 SPRUNG ZUR ZEILE Zeilenende oder zum IF geh<br />

14397<br />

14398<br />

14441 3869 14442<br />

CD 80 38 CALL 3<br />

Befehl IF<br />

14399 383F<br />

14400<br />

14401<br />

14402 3842<br />

14403 3843<br />

14404 3844<br />

14405 3845<br />

14406<br />

14407 3847<br />

14408 3848<br />

14409<br />

14410 384A<br />

14411<br />

14412 384C<br />

14413 3840<br />

14414<br />

14415<br />

14416 3850<br />

14417<br />

14418 3852<br />

14419<br />

14420 3854<br />

14421<br />

14422 3856<br />

14423<br />

14424 3858<br />

14425<br />

14426 385A<br />

14427<br />

14428 385C<br />

14429 3850<br />

14430<br />

14431<br />

14432 3860<br />

14433 3861<br />

14434<br />

14435<br />

14436 3864<br />

14437<br />

14438 3866<br />

14439<br />

14440<br />

CO 8B 52<br />

08<br />

1A<br />

B7<br />

28 19<br />

08<br />

FE E2<br />

20 10<br />

23<br />

CO 14 54<br />

FE OB<br />

28<br />

FE<br />

28<br />

FE<br />

28<br />

F1<br />

C3<br />

B6<br />

OC<br />

B2<br />

22<br />

AE<br />

25 19<br />

CALL 528B<br />

EX AF.AF'<br />

LO A.


SEITE 242<br />

BASIC 1Z-013B<br />

14496 38AO 30 18 JR NC, 18 ~ 38BAH<br />

14497<br />

14498 38A2 23 INC HL<br />

14499 38A3 23 INC HL<br />

14500 38A4 C9 RET<br />

Zeiger in HL auf Ende des Befehls stellen<br />

14501 38A5 ~ 38B2H<br />

38A5H<br />

7E LD A, (HL><br />

14502 38A6 B7 OR A<br />

14503 38A7 C8 RET Z<br />

14504 38A8 FE 3A CP 3A<br />

14505<br />

14506 38AA C8 RET Z<br />

14507 38AB FE 22 CP 22<br />

14508<br />

14509 38AD 28 03 JR Z, 03 14510<br />

14511 38AF 23 INC HL<br />

14512 38BO 18 F3 JR F3 ~ 14513<br />

14514 38B2 CD C5 38 CALL 38C5<br />

14515<br />

14516<br />

14517 38B5 B7 OR A<br />

14518 3886 C8 RET Z<br />

14519 3887 23 INC HL<br />

14520 3888 18 EB JR EB ~ 38A5H<br />

14521<br />

Zahl im interen Format überspringen<br />

14522 388A E6 OF ANO A. OF<br />

14523<br />

14524 38BC 85 AOD A,L<br />

14525 38BD 6F LD L.A<br />

14526 388E 3E 00 LO A. 00<br />

14527<br />

14528 38CO 8C ADC A.H<br />

14529 38C1 67 LD H,A<br />

14530 38C2 3E 20 LD A. 20<br />

14531<br />

14532 38C4 C9 RET<br />

Zeiger in HL auf zweites Anführungszeichen<br />

14533 38C5 ~ 38C5H<br />

23 INC HL<br />

14534 38C6 7E LD A. (HL><br />

14535 38C7 B7 OR A<br />

14536 38C8 C8 RET Z ;<br />

14537 38C9 FE 22 CP 22<br />

14538<br />

14539 38CB C8 RET Z<br />

14540 38CC 18 F7 JR F7 14541<br />

V1_0A<br />

ZAHL IM INTERNEN FORMAT<br />

IPROGRAM<strong>MZ</strong>EIGER HOCHZÄHLEN<br />

I (Zeilennr/Zeiger überspro)<br />

NÄCHSTES PROGRAMMBYTE<br />

GLEICH NULL ?<br />

ZEILENENOE<br />

(Doppelpunkt)<br />

ENDE BEFEHL<br />

(Anführungszeichen)<br />

I ZWEITES Anführungs­<br />

Izeichen SUCHEN<br />

PROGRAMMBYTE üBERSPRINGEN<br />

BEFEHLSENDE SUCHEN<br />

IZEIGER IN HL AUF ZWEITES<br />

IAnführungszeichen STELLEN<br />

ZEILENENDE ?<br />

JA<br />

" üBERSPRINGEN<br />

BEFEHLSENDE SUCHEN<br />

LÄNGE ZAHL MASKIEREN<br />

PLUS L-BYTE ZEIGER<br />

ERGEBNIS MERKEN<br />

I EVENTUELLEN üBERTRAG<br />

CORRIGIEREN<br />

• Space ALS ZEICHEN VORGEBEN<br />

oder Zeilenende stellen<br />

PROGRAM<strong>MZ</strong>EIGER<br />

NÄCHSTES PROGRAMMBYTE<br />

GLEICH NULL ?<br />

ZEILENENOE<br />

(Anführungszeichen)<br />

ZEICHEN GEFUNDEN<br />

WEITER SUCHEN<br />

Befehl<br />

14542 38CE<br />

14543<br />

14544 38DO<br />

14545<br />

14546<br />

14547 38D3<br />

14548<br />

14549 3805<br />

14550<br />

14551 3807<br />

14552 3808<br />

14553 38D9<br />

14554 38DA<br />

14555<br />

14556 380C<br />

14557 380D<br />

14558 38°0E<br />

14559 38DF<br />

14560 38~0<br />

14561<br />

14562 38E2<br />

14563<br />

14564 38E4<br />

14565<br />

14566 38E6<br />

14567<br />

14568 38E8<br />

14569<br />

14570 38EA<br />

14571<br />

14572 38EC<br />

14573<br />

14574 38EE<br />

14575<br />

14576 38FO<br />

14577<br />

14578 38F2<br />

BASIC<br />

CLS<br />

3E 16 LD<br />

C3 12 00 JP<br />

00 00<br />

00 00<br />

01<br />

00<br />

00<br />

OO~)<br />

00<br />

00<br />

00<br />

00<br />

00 00<br />

00 00<br />

00 00<br />

00 00<br />

00 00<br />

00 00<br />

00 00<br />

00 00<br />

00 00<br />

00<br />

1Z<br />

A.<br />

001


SEITE 244<br />

14579 38F3 00 00<br />

14580<br />

14581 38F5 00 00<br />

14582<br />

14583 38F7 00 00<br />

14584<br />

14585 38F9 00<br />

14586 38FA 00<br />

14587 38FB 00 00<br />

14588<br />

14589 38FD 00<br />

14590 38FE 00<br />

14591 38FF 00<br />

14592 3900 00<br />

14593 3901 00<br />

Befehl SET<br />

14594 3902 CD 5B<br />

14595<br />

14596<br />

14597 3905 E5<br />

14598 3906 06 01<br />

14599<br />

14600 3908 CB 3A<br />

14601<br />

14602 390A 30 02<br />

14603<br />

14604 390C CB 20<br />

14605<br />

14606 390E CB 3B<br />

14607<br />

14608 3910 30 04<br />

14609<br />

14610 3912 CB 20<br />

14611<br />

14612 3914 CB 20<br />

14613<br />

14614 3916 CD SE<br />

14615<br />

14616<br />

14617 3919 CB DC<br />

14618<br />

14619 391B CD EA<br />

14620<br />

14621<br />

14622 391E E6 8F<br />

14623<br />

14624 3920 Bl<br />

14625 3921 CD F2<br />

14626<br />

14627<br />

14628 3924 CB 9C<br />

14629<br />

BASIC 1Z-013B<br />

39<br />

CALL 395B<br />

PUSH HL<br />

LD B. 01<br />

SRL 0<br />

JR NC. 02 ~ 390EH<br />

SLA B<br />

SRL E<br />

JR NC. 04 ~ 3916H<br />

SLA B<br />

SLA B<br />

39 CALL 398E<br />

SET 3.H<br />

00<br />

CALL OOEA<br />

AND A. BF<br />

00<br />

OR C<br />

CALL 00F2<br />

RES 3.H<br />

V1.0A<br />

PROGRAM<strong>MZ</strong>EIGER FüR CONT<br />

ZEILENNUMMER FüR CONT<br />

I ZEIGER AUF NÄCHSTE<br />

I ZEILE FüR CONT<br />

~ IZWISCHENSPEICHER FüR<br />

I ZEIGER AUF SCHLEIFENVAR.<br />

ZÄHLER FüR NULL-BEFEHL<br />

OPTION BASE FLAG<br />

I XIV - KOORDINATE UND<br />

IZEICHENFARBE BEREITSTELLEN<br />

PROGRAM<strong>MZ</strong>EIGER<br />

VORGABE FüR PIXELWERT<br />

X- KOORDINATE DURCH ZWEI<br />

ERSTE ZEICHENHÄLFE<br />

PIXELWERT CORRIGIEREN<br />

V-KOORDINATE DURCH ZWEI<br />

OBERE ZEICHENHÄLFE<br />

~ IPIXELWERT CORRIGIEREN<br />

; I<br />

I<br />

; IBILDSPEICHERPOSITION<br />

lAUS KOORDINATEN ERRECHNEN<br />

KOORDINATE AUF FARBSPEICHER<br />

I ZEICHEN AUS FARBSPEICHER<br />

I~L~<br />

~ ZEICHENFARBE AUSBLENDEN<br />

PLUS NEUE ZEICHENFARBE<br />

I ZEICHEN/HINTERGRUNDFARBE<br />

I IN FARBSPEICHER EINTRAGEN<br />

ZEIGER AUF BILDSPEICHER<br />

14630<br />

14631<br />

14632<br />

14633<br />

14634<br />

14635<br />

14636<br />

14637<br />

14638<br />

14639<br />

14640<br />

14641<br />

14642<br />

14643<br />

14644<br />

14645<br />

14646<br />

14647<br />

14648<br />

14649<br />

14650<br />

14651<br />

14652<br />

14653<br />

14654<br />

14655<br />

14656<br />

14657<br />

14658<br />

14659<br />

14660<br />

14661<br />

14662<br />

14663<br />

14664<br />

14665<br />

14666<br />

14667<br />

14668<br />

14669<br />

14670<br />

14671<br />

14672<br />

14673<br />

14674<br />

14675<br />

14676<br />

14677<br />

14678<br />

14679<br />

14680<br />

14681<br />

14682<br />

3926<br />

3929<br />

392B<br />

392D<br />

392F<br />

3930<br />

3933<br />

3934<br />

Befehl<br />

3935<br />

3 9.38<br />

3939<br />

393B<br />

393D<br />

393F<br />

3941<br />

3943<br />

3945<br />

3947<br />

3949<br />

394C<br />

394F<br />

3951<br />

3953<br />

3955<br />

3956<br />

3959<br />

395A<br />

BASIC<br />

CD EA 00<br />

FE FO<br />

30 02<br />

3E FO<br />

BO<br />

CD F2 00<br />

El<br />

C9<br />

RESET<br />

CD 5B 39<br />

E5<br />

06 FE<br />

CB 3A<br />

30 02<br />

CB 10<br />

CB 3B<br />

30 04<br />

CB 10<br />

CB 10<br />

CD BE 39<br />

CD EA 00<br />

FE FO<br />

30 02<br />

3E FO<br />

AO<br />

CD F2 00<br />

EI<br />

C9<br />

1Z<br />

CALL OO<br />

CP FO<br />

JR NC.<br />

LD A, F<br />

OR B<br />

CALL O<br />

POP HL<br />

RET<br />

CALL 39<br />

PUSH HL<br />

LD B, F<br />

SRL 0<br />

JR Ne,<br />

RL B<br />

SRL E<br />

JR NC,<br />

RL B<br />

RL B<br />

CALL 39<br />

CALL OO<br />

CP FO<br />

JR NC,<br />

LD A. F<br />

AND B<br />

CALL OO<br />

POP HL<br />

RET


SEITE 246<br />

BASIC 1Z-013B V1.0A<br />

BASIC 1Z<br />

X/Y - Koordinate und Zeichenfarbe bereitstellen<br />

aus Koordinaten in 0 und E<br />

14734 398E D5<br />

CALL 4050 EIN-BYTE-WERT NACH DE/ACCU<br />

PUSH DE<br />

14683 395B CD 50 4D<br />

14735 398F 16 00 LD D. 0<br />

14684 14736<br />

14685 147.37 3991 62 LD H.D<br />

FE 50 CP 50 80 (X-KOORDINATE MAXIMAL)<br />

14686 395E 14738 3992 6B LD L.E<br />

14687<br />

14688 3960 D2 01 21 JP NC. 2101 ZU GROSS + DATENFEHLER<br />

14739 3993 29 ADD HL<br />

14740 3994 29 ADD HL<br />

14689 14741 3995 19 ADD HL<br />

14690 14742 ·3996 29 ADD HL<br />

14691 3963 F5 PUSH AF X-KOORDINATE PUNKT<br />

14743 3997 29 ADD HL<br />

14692 3964 7E LD A. (HL> NÄCHSTES PROGRAMMBYTE<br />

14744 .3998 29<br />

CALL 3332 SYNTAX Komma<br />

ADD HL.<br />

14693 3965 CD 32 33<br />

14745 3999 01 POP DE<br />

14694 14746 399A 5A LD E.D<br />

14695<br />

EIN-BYTE-WERT NACH DE/ACCU<br />

14747 399B 16 00 LD D. 0<br />

14696 3968 CD 50 4D CALL 4050<br />

14748<br />

14697 14749 399D 19 ADD HL<br />

14698<br />

100 (Y-KOORDINATE MAXIMAL)<br />

14750 399E 11 00 DO LD DE.<br />

14699 396B FE 64 CP 64<br />

14751<br />

14700<br />

JP NC. 2101 ZU GROSS + DATENFEHLER<br />

14752<br />

14701 396D D2 01 21<br />

14753 39Al 19 ADD HL<br />

14702 14754 39A2 C9 RET<br />

14703<br />

14704 3970 5F LD E.A Y-KOORDINATE<br />

14705 3971 F1 POP AF X-KOORDINATE HOLEN<br />

Befehl JOY<br />

14706 3972 57<br />

LD D.A UND MERKEN<br />

14707 3973 3A 50 00 LD A. (005D)<br />

ZEICHEN/HINTERGRUNDFARBE<br />

14755 39A3 E5 PUSH HL<br />

14708 14756 39A4 CD 21 3D CALL 3D<br />

14709<br />

ZEICHENFARBE MASKIEREN<br />

14757<br />

14710 3976 E6 70 AND A. 70<br />

14711<br />

UND MERKEN<br />

14759 39A7 7C LD A.H<br />

14712 3978 4F LD C.A<br />

14760 3 9A8 B7 oR A<br />

14713 3979 7E LD A. (HL> NÄCHSTES PROGRAMM BYTE<br />

14761 39A9 C2 01 21 JP NZ,<br />

14714 397A FE 2C CP 2C (Komma) ?<br />

14762<br />

14715 14763<br />

14716 3 97C CO RET NZ KEINE FARBE ANGEGEBEN<br />

14764 39AC 70 LD A.L<br />

14717 397D 23 INC HL Komma üBERSPRINGEN<br />

14765 39AD FE 08 CP 08<br />

14718 397E 05 PUSH DE X/Y -KOORDINATE<br />

EIN-BYTE-WERT NACH DE/ACCU<br />

14766<br />

14719 397F CD 50 40 CALL 4050<br />

14767 39AF D2 01 2 1 JP NC.<br />

14720 14768<br />

14758<br />

14721<br />

X/Y - KOORDINATE<br />

14769<br />

14722 3982 01 POP OE<br />

14770 39B2 CD 61 00 CALL 00<br />

14723 3983 FE 08 CP 08 FARBE MAXIMAL<br />

14771<br />

14724 14772<br />

14725 3985 02 01 21 JP NC. 2101 ZU GROSS + DATENFEHLER<br />

14773 39B5 E1 POP HL<br />

14726 14774 3986 38 OE JR C. O<br />

14727 14775<br />

14728 3988 07 RLCA I FARBE AUF H-NIBBLE<br />

14776 3 988 28 OC JR Z. O<br />

14729 .3989 07 RLCA I SCHIEBEN<br />

14777<br />

14730 398A 07 RLCA I<br />

14778 3 9BA 11 FF FF LD DE.<br />

14731 398B 07 RLCA I<br />

14779<br />

14732 398C 4F LD C.A ZEICHENFARBE<br />

14780<br />

14733 398D C9 RET<br />

14781 39BD CD 82 3A CALL 3A<br />

14782<br />

14783<br />

14784 39CO 3E 05 LD A. 0<br />

14785<br />

14786 39C2 32 65 6A LD (6A<br />

14787<br />

14788<br />

14789 39C5 C9 RET


SEITE 248<br />

BASIC 1Z-013B V1_0A<br />

BASIC 1Z<br />

14790 39C6 5F LD E,A ABGEFRAGTER WERT<br />

39C7 16 00<br />

LD 0, 00<br />

14791<br />

14792<br />

14793<br />

14794<br />

14795<br />

14796<br />

14797<br />

14798<br />

14799<br />

14800<br />

14801<br />

14802<br />

14803<br />

14804<br />

14805<br />

14806<br />

39C9<br />

18<br />

F2<br />

Befehl CONSOLE<br />

39CB<br />

39CD<br />

39CF<br />

39D2<br />

39D5<br />

28<br />

3E<br />

32<br />

3A<br />

06<br />

2E<br />

01<br />

4E<br />

56<br />

19<br />

00<br />

00<br />

JR<br />

JR<br />

LD<br />

LD<br />

LD<br />

LD<br />

F2<br />

~ 39BDH IWERT IN<br />

I IN REAL<br />

Z, 2E ~ 39FBH<br />

A, 01<br />


SEITE 250<br />

BASIC 1Z-013B V1.0A BASIC 1Z<br />

14897 3A31<br />

14898<br />

14899 3A33<br />

14900<br />

14901 3A35<br />

14902<br />

Befehl PLOT<br />

14903 3A37<br />

14904<br />

14905<br />

14906 3A3A<br />

14907 3A3B<br />

14908<br />

14909<br />

14910<br />

14911<br />

14912<br />

14913<br />

14914<br />

3A3E<br />

3A3F<br />

FE<br />

28<br />

FE<br />

C2<br />

90<br />

OB<br />

Al<br />

FE 20<br />

AF<br />

32 40 00<br />

23<br />

C9<br />

CP 90<br />

JR Z. OB ~<br />

CP Al<br />

JP NZ. 20FE<br />

XOR A<br />

LD (0040).A<br />

INC<br />

RET<br />

Parallelausgabe einschalten<br />

3A40H<br />

ON (Zwischencode)<br />

PARALLELAUSGABE EINSCHALTEN<br />

OFF


SEITE 252 <br />

BASIC 1Z-013B V1.0A <br />

14989<br />

14990 3A8E 7A LO A,O I NEG OE<br />

14991 3A8F 2F CPL I<br />

14992 3A90 57 LO O.A I<br />

14993 3A91 78 LO A,E I<br />

14994 3A92 2F CPL I<br />

14995 3A93 5F LO E.A I<br />

14996 3A94 13 INC OE I<br />

14997 3A95 3E FF LO A. FF I MASKE FüR MS8 FüR<br />

14998 I NEGATIVE ZAHL<br />

14999 3A97 06 91 LO 8. 91 VORGABE FüR EXPONENT<br />

15000<br />

15001 3A99 05 OEC B EXPONENT MINUS EINS<br />

15002 3A9A C8 7A BIT 7.0 1tes BIT MANTISSE GESETZT<br />

15003<br />

15004 3A9C 20 06 JR NZ, 06 -+ 3AA4H INTERNES FORMAT STIMMT<br />

15005<br />

15006 3A9E C8 13 RL E IMANTISSE MAL ZWEI<br />

15007 I<br />

15008 3AAO C8 12 RL 0 I<br />

15009<br />

15010 3AA2 18 F5 JR F5 -+ 3A99H lüBERPRüFEN, - 08 FORMAT<br />

15011 I STIMMT<br />

15012 3AA4 70 LO (HU ,8 EXPONENT EINTRAGEN<br />

15013 3AA5 23 INC HL ZEIGER AUF MANTISSE<br />

15014 3AA6 A2 ANO 0 VORZEICHEN SETZEN<br />

15015 3AA7 77 LD (HU ,A MSBYTE MANTISSE EINTRAGEN<br />

15016 3AA8 23 INC HL ZEIGER AUF MANTISSE<br />

15017 3AA9 73 LD (HU ,E ZWEITES BYTE MANTISSE<br />

15018 3AAA 28 OEC HL I ZEIGER WIEDER AUF<br />

15019 3AA8 28 OEC HL I EXPONENT<br />

15020 3AAC C9 RET<br />

Zeiger in DE auf nächsten Real - Wert in Tabelle stellen<br />

15021 3 AAO E5 PUSH HL REGISTER RETTEN <br />

15022 3AAE 21 05 00 LD HL. 0005 ; LÄNGE REAL-WERT <br />

15023 <br />

15024 <br />

15025 3A81 19 ADO HL,OE , ZEIGER AUF NÄCHSTEN WERT <br />

15026 3A82 E8 EX DE,HL NACH OE <br />

15027 3A83 E1 POP HL ; GERETTETES REGISTER HOLEN <br />

15028 3A84 C9 RET <br />

Plus Eins im Real - Format nach (OE) übertragen<br />

15029 3A85 21 77 3D LD HL. 3077 ZEIGER AUF +1 (Real-Format)<br />

15030 <br />

15031 <br />

15032 3ABB 01 05 00 LO BC, 0005 • LÄNGE REAL-ZAHL <br />

15033<br />

15034 <br />

15035 3A88 ED 80 LOIR , IZAHLWERT VON (HL) NACH <br />

15036 I (OE) üBERTRAGEN <br />

15037 3A80 C9 RET <br />

BASIC 1Z<br />

UberprGfen. ob ASCII im A<br />

15038 3ABE FE 30 CP 3<br />

15039<br />

15040 3ACO 08 RET C<br />

15041 3AC1 FE 3A CP 3<br />

15042<br />

15043 3AC3 3F CCF<br />

15044 3AC4 C9 RET<br />

Zeichen (OE) nach Accu ho<br />

15045 3AC5 1A LO A.<br />

15046 3AC6 C9 RET<br />

UntersLlchen. ob Zeichen i<br />

15047 3AC7 FE 5F CP 5<br />

15048<br />

15049 3AC9 C8 RET Z<br />

15050 3ACA FE 30 CP 3<br />

15051<br />

15052 3ACC 08 RET C<br />

15053 3ACO FE 5B CP 5<br />

15054<br />

15055 3ACF :.F CCF<br />

15056 3AOO 08 RET C<br />

15057 3AD1 FE 3A CP 3<br />

15058<br />

15059 3AD3 3F CCF<br />

15060 3AD4 00 RET N<br />

15061 3AD5 FE 41 CP 4<br />

15062<br />

15063 3AD7 C9 RET<br />

ASCII-He;-:-Zahl


SEITE 254 <br />

BASIC 1Z-013B V1.0A <br />

15086<br />

15087 3AEF 85 ADO A,L PLUS NEUE STELLE<br />

15088 3AFO 6F LD L,A ERGEBNIS MERKEN<br />

15089 3AF1 3E 00 LO A, 00 • EVENTUELLEN üBERTRAG<br />

15090 • ADDIEREN<br />

15091 3AF3 8C AOC A,H<br />

15092 3AF4 OA F5 20 JP C, 20F5<br />

• üBERLAUF ~ üBERLAUFEHLER<br />

15093<br />

15094<br />

15095 3AF7 67 LD H,A H-BYTE ERGEBNIS MERKEN<br />

15096 3AF8 18 E2 JR E2 ~ 3AOCH NÄCHSTE STELLE UMSETZEN<br />

15097<br />

15098 3AFA 1B OEC OE ZEIGER AUF TEXT CORRIGIEREN<br />

15099 3AFB EB EX OE,HL ZEIGER NACH HL; WERT OE<br />

15100 3AFC E3 EX (SP),HL ZEIGER AUF STELLE FüR WERT<br />

15101 3AFD CD 82 3A CALL 3A82 I INTEGER-WERT IN OE UM­<br />

15102 ISETZEN IN REAL-WERT<br />

15103 I NACH (HU<br />

15104 3800 D1 POP DE ZEIGER AUF RESTTEXT<br />

15105 3801 3E 05 LD A, 05 COOE REAL-WERT<br />

15106<br />

15107 3803 C9 RET<br />

ASCII-Zeichen im Accu umsetzen in HEX-Wert<br />

15108 3B04 06 30 SUB A, 30 I ASCII-ZEICHEN UMSETZEN<br />

15109 I IN DEZIMAL<br />

15110 3B06 D8 RET C KEIN HEX-WERT<br />

15111 3B07 FE OA CP OA 0-9 ?<br />

15112<br />

15113 3809 3F CCF ERGEBNIS UMKEHREN<br />

15114 3BOA 00 RET NC HEX - WERT<br />

15115 3BOB FE 11 CP 11 KLEINER A ?<br />

15116<br />

15117 3BOO 08 RET C KEIN HEX-WERT<br />

15118 3BOE 06 07 SUB A, 07 FüR A-F CORRIGIEREN<br />

15119<br />

15120 3B10 FE 10 CP 10 o - F ?<br />

15121<br />

15122 3B12 3F CCF = ERGEBNIS UMKEHREN<br />

15123 3B13 C9 RET<br />

ASCII-Text (OE) umsetzen in Real-Zahl-Wert nach (HL)<br />

15124 3B14 CD 87 50 CALL 5087 • (HL) REAL-WERT NULL<br />

15125 'EINTRAGEN<br />

15126<br />

15127 3B17 32 81 6A LO (6A8l> ,A ANZAHL STELLEN<br />

15128<br />

15129<br />

15130 3BIA 32 82 6A LO (6A82),A ~ FLAG STELLEN ANGEGEBEN<br />

15131<br />

15132<br />

15133 3B10 32 83 6A LO (6A83),A FLAG REAL-ZAHL<br />

15134<br />

15135<br />

15136 3B20 32 84 6A LD (6A84),A OEZIMALPUNKT-FLAG<br />

15137<br />

15138<br />

15139 3823<br />

15140<br />

15141 3B25<br />

15142<br />

15143<br />

15144 3B28<br />

15145<br />

15146<br />

15147 3828<br />

15148<br />

15149 3B2D<br />

15150<br />

15151 382F<br />

15152<br />

15153 3831<br />

15154<br />

15155 3B33<br />

15156<br />

15157<br />

15158 3B36<br />

15159<br />

15160<br />

15161 3839<br />

15162<br />

15163 3B3B<br />

15164<br />

15165<br />

15166 383E<br />

15167<br />

15168 3840<br />

15169<br />

15170 3B42<br />

15171 3843<br />

15172 3B44<br />

15173<br />

15174 3 B46<br />

15175 3847<br />

15176 3848<br />

15177<br />

15178 3 84A<br />

15179<br />

15180 3 84C<br />

15181<br />

15182<br />

15183 384F<br />

15184 3850<br />

15185<br />

15186 3852<br />

15187<br />

15188 3B54<br />

15189<br />

15190 3856<br />

15191<br />

15192<br />

15193 3B59<br />

15194<br />

BASIC<br />

3E 05<br />

32 65 6A<br />

CD 62 3C<br />

FE 28<br />

28 F9<br />

FE 20<br />

20 06<br />

CO 28 38<br />

C3 91 50<br />

FE 24<br />

CA 08 3A<br />

FE 30<br />

20 06<br />

1A<br />

13<br />

18 F8<br />

1A<br />

13<br />

FE 20<br />

20 06<br />

3A 80 6A<br />

87<br />

28 F4<br />

FE 2E<br />

28 18<br />

CD BE 3A<br />

38 56<br />

1<br />

LD A<br />

LD (6<br />

CALL<br />

CP 2<br />

JR Z<br />

CP 2<br />

JR N<br />

CALL<br />

JP 50<br />

CP 2<br />

JP Z<br />

CP 3<br />

JR N<br />

LD A<br />

INC D<br />

JR Fa<br />

LO A<br />

INC D<br />

CP 2<br />

JR NZ<br />

LD A.<br />

OR A<br />

JR Z,<br />

CP 2<br />

JR Z,<br />

CALL<br />

JR C,


SEITE 256<br />

BASIC 1Z-013B V1_0A BASIC 1Z<br />

15195<br />

15196<br />

15197<br />

15198<br />

15199<br />

15200<br />

15201<br />

15202<br />

15203<br />

15204<br />

15205<br />

15206<br />

15207<br />

15208<br />

15209<br />

15210<br />

15211<br />

15212<br />

15213<br />

15214<br />

15215<br />

152 16<br />

15217<br />

15218<br />

15219<br />

15220<br />

15221<br />

3858<br />

3850<br />

3860<br />

3B63<br />

3865<br />

3B68<br />

3 B68<br />

3B6C<br />

06<br />

CD<br />

CD<br />

3E<br />

32<br />

3A<br />

3C<br />

32<br />

30<br />

OA<br />

4E<br />

01<br />

82<br />

81<br />

81<br />

3D<br />

3C<br />

6A<br />

6A<br />

6A<br />

SU8 A. 30<br />

CALL 3DOA<br />

CALL 3C4E<br />

LD A. 01<br />

LD (6A82).A<br />

LD A. (6A8l><br />

INC A<br />

LD (6A81).A<br />

ASCII UMSETZEN IN DEZIMAL<br />

ALTES TEILERGE8NIS * 10<br />

I WERT NEUE STELLE DAZU<br />

I ADDIEREN<br />

CODE STELLE UMGESETZT<br />

FLAG STELLEN ANGEGEBEN<br />

ANZAHL STELLEN<br />

PLUS EINS<br />

UND WIEDER MERKEN<br />

3B6F 18 05 JR D5 -+ 3B46H INÄCHSTES ZEICHEN<br />

I UNTERSUCHEN<br />

3 871<br />

3873<br />

15222 3 876<br />

15223 3B77<br />

15224 3B78<br />

15225 3B79<br />

15226<br />

15227<br />

15228<br />

15229<br />

15230<br />

15231<br />

3B7B<br />

3B7D<br />

3E<br />

32<br />

0 1<br />

4F<br />

1A<br />

13<br />

FE 20<br />

20<br />

3A<br />

84 6A<br />

06<br />

80 6A<br />

LD<br />

LD<br />

A. 01<br />

(6A84>.A<br />

LD C.A<br />

LD A. .A FLAG STELLE ANGEGEBEN 15302<br />

15303<br />

15250<br />

15251 3893<br />

15252 3894<br />

15253 3895<br />

15254<br />

F5<br />

3E 01<br />

F1<br />

F5<br />

3A 82 6A<br />

PUSH AF<br />

LD A. 01<br />

POP AF<br />

PUSH AF<br />

LD A. (6A82)<br />

; ZAHLWERT RETTEN<br />

CODE STELLE ANGEGEBEN<br />

GERETTETE ZAHL HOLEN<br />

ZAHLWERT RETTEN<br />

FLAG STELLEN ANGEGEBEN<br />

15299<br />

15300<br />

15301<br />

15304<br />

15305<br />

15306<br />

15307<br />

15308<br />

38C3<br />

3 BC4 ,<br />

lA<br />

FE 2D<br />

6A<br />

JR F8<br />

CP<br />

JR<br />

4<br />

Z.<br />

DEC D<br />

LD A.<br />

LD<br />

CP<br />

A.<br />

2<br />

3 8Cb 28 09 JR Z.<br />

3 8C8<br />

3 8CA<br />

3 BCC<br />

FE<br />

28<br />

CD<br />

2B<br />

05<br />

BE 3 A<br />

CP 2B<br />

JR Z.<br />

CALL


SEITE<br />

15309<br />

15310<br />

15311 3BCF<br />

15312<br />

15313 3BOl<br />

15314<br />

15315 3B03<br />

153 16<br />

15317<br />

15318 3B06<br />

15319 3B07<br />

15320<br />

15321<br />

15322 3BOA<br />

15323<br />

15324<br />

15325 3BOO<br />

15326<br />

15327<br />

15328 3BEO<br />

15329 3BEI<br />

15330 3BE2<br />

15331<br />

15332 3BE4<br />

15333<br />

15334 3BE6<br />

15335<br />

15336 3BE8<br />

15337<br />

15338 3BEA<br />

15339 3BEB<br />

15340<br />

15341<br />

15342 3BEE<br />

15343<br />

15344<br />

15345 38Fl<br />

15346 38F2<br />

15347 3BF3<br />

15348 3BF4<br />

15349<br />

15350 38F6<br />

15351<br />

15352 3BF8<br />

15353<br />

15354 3BFA<br />

15355<br />

15356 3BFC<br />

15357 3BFO<br />

15358<br />

15359<br />

15360 3COO<br />

15361 3C01<br />

15362 3C02<br />

15363<br />

15364<br />

15365 3C05<br />

15366<br />

15367<br />

15368 3C08<br />

15369<br />

15370<br />

258<br />

BASIC 1Z-0138<br />

38 E4 JR C. E4 ~ 3BB5H<br />

3E 01 LD A. 01<br />

32 84 6A LD (6A84).A<br />

E5 PUSH HL<br />

21 El 5F LD HL. 5FE1<br />

22 31 3C LD (3C31>. HL<br />

21 00 00 LD HL. 0000<br />

1A LD A. . HL<br />

EI POP HL<br />

lA LD A.


SEITE 260 <br />

BASIC 1Z-013B V1.0A <br />

15427 3C43 F1 POP AF<br />

15428 3C44 C9 RET<br />

HL HL + OE mit Untersuchung auf überlauf<br />

15429 3C45 19 ADO HL.OE ZAHLEN ADDIEREN<br />

15430 3C46 00 RET NC ERGEBNIS OK<br />

15431 3C47 18 02 JR 02 ~ 3C4BH üBERLAUFFEHLER<br />

15432<br />

HL HL + HL mit Untersuchung auf überlpuf<br />

15433 3C49 29 AOD HL.HL ZAHLEN ADDIEREN<br />

1543 4 3C4A DO RET NC ERGEBNIS OK<br />

15435 3C4B C3 F5 20 JP 20F5 üBERLAUF FEHLER<br />

15436<br />

15437<br />

Dezimal - Wert im Accu zur Real - Zahl (HL) addieren<br />

15438 3C4E 05 PUSH DE REGISTER RETTEN<br />

15439 3C4F E5 PUSH HL ZEIGER AUF REAL-ZAHL<br />

15440 3C50 21 66 6A LO HL. 6A66 ZEIGER AUF ZWISCHENSPEICHER<br />

15441<br />

15442<br />

15443 3C53 5F LO E.A DEZIMAL- ZIFFER<br />

15444 3C54 16 00 LO O. 00<br />

15445<br />

15446 3C56 CD 82 3 A CALL 3A82 IHEX-WERT IN DE UMSETZEN<br />

15447 I IN REAL-ZAHL NACH (HL)<br />

15448<br />

15449 3C59 EB EX OE.HL ZEIGER AUF WERT NACH OE<br />

15450 3C5A E1 POP HL ZEIGER AUF REAL-ZAHL<br />

15451 3C5B C5 PUSH BC REGISTER RETTEN<br />

15452 3C5C CD AF 50 CALL 50AF ; + - ROUTINE<br />

15453<br />

15454<br />

15455 3C5F Cl POP BC<br />

15456 3C60 01 POP OE<br />

15457 3C61 C9 RET<br />

Zeiger in OE auf nächstes relevantes Zeichen setzen<br />

15458 3C62 1A LO A. (OE) EIN ZEICHEN HOLEN <br />

15459 3C63 FE 20 CP 20 Space ? <br />

15460 <br />

15461 3C65 13 INC OE ZEIGER AUF TEXT <br />

15462 3C66 28 FA JR Z. FA ~ 3C62H I NÄCHSTES RELEVANTES <br />

15463 I ZEICHEN HOLEN <br />

15464 3C68 C9 RET <br />

BASIC 1Z-<br />

Real - Zahl (HL) Llmsetzen i<br />

15465 3C69 3E 05 LO A. 0<br />

15466<br />

15467 3C6B 32 65 6A LO (6A6<br />

15468<br />

15469<br />

15470 3C6E 7E LD A. (H<br />

15471 3C6F 87 OR A<br />

15472 3C70 28 04 JR Z. 0<br />

15473<br />

15474 3C72 23 INC HL<br />

15475 3C73 7E LO A. (H<br />

15476 3C74 2B OEC HL<br />

15477 3C75 07 RLCA<br />

15478 3C76 3E 20 LO A. 2<br />

15479<br />

15480 3C78 30 05 JR NC.<br />

15481<br />

15482 3C7A CO 91 50 CALL 50<br />

15483<br />

15484<br />

15485 3C7D 3E 20 LD A. 2<br />

15486<br />

15487 3C7F F5 PUSH AF<br />

15488 3C80 CD AF 3F CALL 3F<br />

15489<br />

15490<br />

15491 3C83 CD 3A 40 CALL 40<br />

15492<br />

15493<br />

15494 3C86 F1 POP AF<br />

15495 3C87 1B OEC OE<br />

15496 3C88 12 LO


SEITE 262 <br />

BASIC 1Z-013B V1.0A <br />

15517 3C9D 38 F1 JR C, F1 + 3C90H ERGBNIS IST NULL<br />

15518<br />

15519 3C9F 7E<br />

LD A, (HU EXPONENT HOLEN<br />

1552.0 3CAO FE AO CP AO<br />

15521<br />

15522 3CA2 30 EF JR NC, EF + 3C93H I ZAHL HAT KEINE NACHKOMMA­<br />

15523<br />

15524 3CA4 23 INC HL<br />

15525 3CA5 CD D3 3C CALL 3CD3<br />

15526<br />

15527<br />

ISTELLEN<br />

ZEIGER AUF MANTISSE<br />

IDREI BYTE MANTISSE AUS<br />

IRAM (HL) NACH REGISTER<br />

I LADEN<br />

ZEIGER AUF ENDE MANTISSE<br />

15528 3CA8 E5 PUSH HL<br />

15529 3CA9 6E<br />

LD L, (HU VIERTES BYTE MANTISSE LADEN<br />

15530 3CAA 06 00 LD B, 00<br />

15531<br />

15532 3CAC CB 3B SRL E<br />

15533<br />

15534 3CAE CB 1A RR 0<br />

15535<br />

1553 6 3 CBO CB 19 RR C<br />

1553 7<br />

15538 3 CB2 CB 1D RR L<br />

15539<br />

ZÄHLER WIE OFT GESCHOBEN<br />

I MANTISSE UM EIN BIT<br />

I NACH RECHTS SCHIEBEN<br />

I (ei n Bi t vergessen)<br />

155 40 3CB4 3 C INC A<br />

EXPONENT PLUS EINS<br />

15541 3 CB5 04 <br />

INC B ZÄHLER WIE OFT GESCHOBEN<br />

15542 3CB6 FE AO CP AO <br />

15543 <br />

15544 3 CB8 20 F2 JR NZ. F2 + 3 CACH WEITER SCHIEBEN <br />

15545 <br />

15546 3CBA CB 25<br />

SLA L<br />

15547<br />

15548 3CBC CB 11 RL C<br />

15549<br />

1555 0 3 CBE CB 12 RL 0<br />

15551 <br />

15552 3 CCO CB 13 RL E I<br />

15553 <br />

I MANTISSE WIEDER AUF<br />

I RICHTIGE WERTIGKEIT<br />

I SCHIEBEN<br />

15554 3CC2 10 F6 DJNZ F6 + 3CBAH WEITER SCHIEBEN <br />

15555<br />

15556 3CC4 70<br />

LD A,L VIERTES BYTE MANTISSE<br />

15557 3 CC5 EI POP HL<br />

ZEIGER AUF ENDE MANTISSE<br />

15558 3 CC6 77<br />

LD (HU ,A VIERTES BYTE MANTISSE MERK.<br />

15559 3CC7 2B OEC HL<br />

ZEIGER AUF MANTISSE<br />

15560 3 CC8 CD CD 3C CALL 3CCD<br />

IDREI BYTE MANTISSE AUS<br />

15561<br />

I REGISTER NACH RAM (HL)<br />

15562<br />

I ABLEGEN<br />

JR C6 + 3C93H GERETTETE REGISTER HOLEN<br />

15563 3CCB 18 C6 <br />

15564 <br />

drei Byte aus Registern nach RAM (HL) übertragen<br />

15565 3CCD 71 LD (HU ,C<br />

I BYTES AUS REGISTERN<br />

15566 3CCE 2B <br />

DEC HL I IM RAM (HL) ABLEGEN<br />

15567 3CCF 72 LD (HU.O I<br />

15568 3CDO 2B DEC HL<br />

15569 3CDl 73 LD (HU ,E<br />

15570 3CD2 C9 RET<br />

I<br />

I<br />

I<br />

I<br />

I<br />

I<br />

BASIC 1Zdrei<br />

Byte aus RAM (HL) nach<br />

15571 3C03 5E LD E, (H<br />

15572 .3CD4 23 INC HL<br />

15573 3CD5 56 LD D, (H<br />

15574 .3CD6 23 INC HL<br />

15575 3CD7 4E LD C, (H<br />

15576 3C08 23 INC HL<br />

15577 3CD9 C9 RET<br />

NachkommastelIen der Zahl (<br />

15578 3CDA 7E LD A, (H<br />

15579 3COB B7 OR A<br />

15580 3CDC C8 RET Z<br />

15581 3CDD 2 3 INC HL<br />

15582 3CDE 7E LO A, (H<br />

15583 3CDF CB BE RES 7, (<br />

15584<br />

15585 3CE1 2B DEC HL<br />

15586 3CE2 F5 PUSH AF<br />

15587 3CE3 CD EC 3C CALL 3C<br />

15588<br />

15589<br />

15590 3CE6 F1 POP AF<br />

15591 3 CE7 07 RLCA<br />

15592 3CE8 DO RET NC<br />

15593 3CE9 C3 91 5D JP 5091<br />

15594<br />

15595<br />

Nachkommastellen des positiv<br />

15596 3CEC C5 PUSH BC<br />

15597 3CED E5 PUSH HL<br />

155'78 3CEE D5 PUSH DE<br />

15599 3CEF 7E LO A, (H<br />

15600 3CFO FE 81 CP 81<br />

15601<br />

15602 3CF2 DA 93 3C JP C, 3<br />

15603<br />

15604<br />

15605 3CF5 11 66 6A LD DE,<br />

15606<br />

15607<br />

15608 3CF8 E5 PUSH HL<br />

15609 3CF9 CD B8 3 A CALL 3A<br />

15610<br />

15611<br />

15612 3CFC 21 66 6A LD HL,<br />

15613<br />

15614<br />

15615 3CFF CO 97 3C CALL 3C<br />

15616<br />

15617<br />

15618 3D02 D1 POP DE<br />

15619 3003 EB EX DE,H<br />

15620 3D04 CO A6 5D CALL 5D<br />

156 21<br />

15622


SEITE 264<br />

BASIC 1Z-013B V1_0A<br />

15623 3007 C3 93 3C JP 3C93 GERETTETE REGISTER HOLEN<br />

15624<br />

15625<br />

Wert (HL) mal 10<br />

15626 300A F5 PUSH AF NEUE STELLE MERKEN<br />

15627 300B C5 PUSH BC REGISTER RETTEN<br />

15628 300C 05 PUSH OE ZEIGER AUF REST ASCII-TEXT<br />

15629 3000 11 72 3D LO OE. 3072 ZEIGER AUF +10 (Real)<br />

15630<br />

15631<br />

15632 3010<br />

CO EI 5F CALL 5FEI I * - ROUTINE<br />

I (HL> = (HL> * EXPONENT HOLEN<br />

15640 3018 FE 91 CP 91 IGRöSSTER UMSETZBARER<br />

15641 I EXPONENT<br />

15642 301A 38 05 JR C. 05 ~ 3021H ZAHL UMSETZBAR<br />

15643<br />

15644 301C 3F CCF CODE FEHLER SETZEN<br />

15645 3010 21 00 00 LO HL. 0000 VORGABE WERT NULL<br />

15646<br />

15647<br />

15648 3020 C9 RET<br />

Vorzeichenbehafteten Real - Wert (HL) umsetzen in Integer nach HL<br />

15649 3021 23 INC HL ZElGER AUF MANTISSE<br />

15650 3022 CB 7E BIT 7. (HL> ZAHL POSITIV ?<br />

15651<br />

15652 3024 28 OB JR Z. OB ~ 3031H JA<br />

15653<br />

15654 3026 CO 31 30 CALL 3031 , I BETRAG DER REAL ZAHL<br />

15655 I (HL> UMSETZEN IN INTEGER<br />

15656 I NACH HL<br />

15657 3029 7C LO A.H 12er COMPLEMENT OES<br />

15658 302A 2F CPL I WERTES BILOEN<br />

15659 302B 67 LO H.A I<br />

15660 302C 70 LO A.L , I<br />

15661 3020 2F CPL I<br />

15662 3D2E 6F LO L.A I<br />

15663 3 02F 23 INC HL I<br />

15664 3030 C9 RET<br />

BASIC 1Z-<br />

Betrag der Real-Zahl (HL> u<br />

15665 3031 2B OEC HL<br />

15666 3032 7E LO A. (H<br />

15667 3033 FE 91 CP 91<br />

15668<br />

15669 3035 02 F5 20 JP NC.<br />

15670<br />

15671<br />

15672 3038 FE 81 CP 81<br />

15673<br />

15674 3 03A 3 8 EO JR C. E<br />

15675<br />

15676 303C F5 PUSH AF<br />

15677 3030 23 INC HL<br />

15678 303E 7E LO A. (H<br />

15679 303F 23 INC HL<br />

15680 3040 6E LO L. (H<br />

15681 3 041 67 LO H.A<br />

15682 3 042 Fl POP AF<br />

15683 3 043 CB FC SET 7.H<br />

15684<br />

15685 3045 FE 90 CP 90<br />

15686<br />

15687 3047 C8 RET Z<br />

15688 3048 3C INC A<br />

15689 3 049 CB 3C SRL H<br />

15690<br />

15691 304B CB 10 RR L<br />

15692<br />

15693 3040 18 F6 JR F6<br />

15694<br />

Konstanten fUr Zahlumsetzr<br />

15695 304F 9B<br />

15696 3050 3E BC 20 00<br />

15697<br />

15698<br />

15699<br />

15700 3054 98<br />

15701 3055 18 96 80 00<br />

15702<br />

15703<br />

15704<br />

15705 3059 94<br />

15706 305A 74 24 00 00<br />

15707<br />

15708<br />

15709<br />

15710 305E 91<br />

15711 305F 4 3 50 00 00<br />

157 12<br />

15713<br />

15714<br />

15715 3063 8E<br />

15716 3064 lC 40 00 00<br />

157 17<br />

1571 8<br />

15719<br />

15720 3068 8A


SEITE 266<br />

BASIC 1Z-013B V1_0A BASIC 1Z<br />

15721 3069 7A 00 00 00 Mantisse 1000<br />

15779 30A3 15722 15780<br />

CD B2 3D CALL 3<br />

15723 15781<br />

15724 15782 3DA6 7D LO A.L<br />

15725 3060 87 Exponent 100 15783 30A7 Dl POP OE<br />

15726 306E 48 00 00 00 Mantisse 100<br />

15784 30A8 F6 30 OR 30<br />

15727 15785<br />

15728 15786 30AA 12 LD


SEITE<br />

15833<br />

15834 3DDA<br />

15835<br />

15836<br />

15837 3DDD<br />

15838<br />

15839<br />

15840 3DEO<br />

15841<br />

15842 3DE2<br />

15843<br />

15844<br />

15845 3DE5<br />

15846 3DE6<br />

15847<br />

15848 3DE8<br />

15849 3DE9<br />

15850<br />

15851<br />

15852 3DEC<br />

15853<br />

15854<br />

15855 3DEF<br />

15856 3DFO<br />

15857 3DF1<br />

15858 3DF2<br />

15859 3DF3<br />

15860 3DF4<br />

15861<br />

15862 3DF6<br />

15863 3 DF7<br />

15864<br />

15865 3DF9<br />

15866 3DFA<br />

15867 3DFB<br />

15868 3DFC<br />

15869<br />

15870 3DFE<br />

15871<br />

15872 3EOO<br />

15873 3E01<br />

15874 3E02<br />

15875<br />

15876 3E04<br />

15877 3E05<br />

15878 3E06<br />

15879 3E07<br />

15880<br />

15881 3E09<br />

15882<br />

15883 3EOB<br />

15884<br />

15885 3EOD<br />

15886<br />

15887 3EOF<br />

15888<br />

15889 3E11<br />

15890 3E12<br />

15891 3E13<br />

15892<br />

15893 3E15<br />

15894<br />

268<br />

11 77<br />

CD 8A<br />

30 06<br />

CD OA<br />

05<br />

18 F2<br />

C5<br />

CD AF<br />

CD 3A<br />

Cl<br />

D5<br />

EB<br />

7E<br />

B7<br />

28 03<br />

23<br />

18 F9<br />

2B<br />

7E<br />

23<br />

FE 30<br />

20 02<br />

04<br />

2B<br />

3E 45<br />

77<br />

23<br />

78<br />

06 2B<br />

CB 7F<br />

28 04<br />

ED 44<br />

06 2D<br />

70<br />

23<br />

36 30<br />

D6 OA<br />

BASIC 12-013B<br />

3D LD DE. 3D77<br />

3C CALL 3C8A<br />

JR NC. 06 ~ 3DE8H<br />

3D CALL 3DOA<br />

DEC B<br />

JR F2 ~ 3DDAH<br />

PUSH BC<br />

3F CALL 3FAF<br />

40 CALL 403A<br />

POP BC<br />

PUSH DE<br />

EX DE.HL<br />

LD A, (HL><br />

OR A<br />

JR Z, 03 ~ 3DF9H<br />

INC HL<br />

JR F9 ~ 3DF2H<br />

DEC HL<br />

LD A. (HL><br />

INC HL<br />

CP 30<br />

JR NZ, 02 ~ 3E02H<br />

INC B<br />

DEC HL<br />

LD A. 45<br />

LD (HL> ,A<br />

INC HL<br />

LD A.B<br />

LD B. 2B ;<br />

BIT 7,A<br />

JR Z. 04 ~ 3E11H<br />

NEG<br />

LD B. 2D ;<br />

LD (HL>, B<br />

INC HL<br />

LD (HL>, 30<br />

SUB A, OA<br />

V1_0A<br />

ZEIGER AUF +1 (Real)<br />

IZAHLEN (HL) UND (DE)<br />

I VERGLEICHEN<br />

WERT (HL) IST >= +1<br />

WERT (HL) MAL 10<br />

EXPONENTENZÄHLER MINUS EINS<br />

I UNTERSUCHEN, OB WERT<br />

I (HL) GRöSSER GLEICH +1<br />

EXPONENTENZÄHLER MERKEN<br />

IZAHL (HL) AUFBEREITEN<br />

I IN ASCII, WENN OHNE<br />

I EXPONENTEN MöGLICH<br />

IREST ZAHL AUFBEREITEN<br />

I IN ASCII<br />

EXPONENTENZÄHLER HOLEN<br />

ZEIGER AUF ANFANG ZAHL<br />

NACH DE<br />

EIN ZEICHEN ZAHL<br />

ENDE ZAHLTEXT ?<br />

JA<br />

ZEIGER AUF ZAHLTEXT<br />

ENDE ZAHLTEXT SUCHEN<br />

ZEIGER AUF LETZTE STELLE<br />

STELLE HOLEN<br />

ZEIGER AUF FREIE STELLE<br />

STELLE GLEICH NULL ?<br />

NEIN<br />

EXPONENTENZÄHLER PLUS EINS<br />

ZEIGER AUF ZAHLTEXT<br />

E (Exponent)<br />

EINTRAGEN<br />

ZEIGER FüR ZAHLTEXT<br />

EXPONENTENZÄHLER HOLEN<br />

+ (Vorzeichen plus)<br />

ZÄHLER POSITIV ?<br />

EXPONENT POSITIV<br />

12er COMPLEMENT DES<br />

I EXPONENTENZÄHLERS BILDEN<br />

- (Vorzeichen minus)<br />

VORZEICHEN EXPONENT EINTR.<br />

ZEIGER FüR ZAHLTEXT<br />

IERSTE STELLE EXPONENT<br />

I VORGEBEN<br />

I STELLENWERT VOM ZÄHLER<br />

I ABZIEHEN<br />

15895 3E17 38<br />

15896<br />

15897 3E19 34<br />

15898 3E1A 18<br />

15899<br />

15900 3E1C C6<br />

15901<br />

15902 3E1E 23<br />

15903 3E1F 77<br />

15904 3 E20 23<br />

15905 3 E21 36<br />

15906<br />

15907 3E23 Dl<br />

15908 3E24 C9<br />

Hex - Wert<br />

15909 3E25 E5<br />

15910 3E26 5E<br />

15911 3E27 23<br />

15912 3E28 56<br />

15913 3E29 EB<br />

15914 3E2A CD<br />

15915<br />

15916<br />

15917 3E2D EI<br />

15918 3E2E C9<br />

Hex - Wert<br />

15919 3E2F 11<br />

15920<br />

15921<br />

15922 3E32 D5<br />

15923 3E33 CD<br />

15924<br />

15925<br />

15926 3E36 Dl<br />

15927 3E37 C3<br />

15928<br />

15929<br />

Integer ­<br />

15930 3E3A E5<br />

15931 3E3B 5E<br />

15932 3E3C 23<br />

15933 3E.3D 56<br />

15934 3E3E CS<br />

15935<br />

15936 3E40 28<br />

15937<br />

15938 3E42 2 1<br />

15939<br />

15940<br />

1594 1 3E45 B7<br />

15942 3E46 ED<br />

15943<br />

15944 3E48 CD<br />

BASIC 1Z<br />

03 JR C,<br />

INC (H<br />

F9 JR F9<br />

3A ADD A<br />

INC HL<br />

INC HL<br />

LD (H<br />

00 LD (H<br />

POP DE<br />

RET<br />

CHL) umsetzen<br />

PUSH<br />

LD E.<br />

INC HL<br />

LD D.<br />

EX DE<br />

2F 3E CALL 3<br />

POP HL<br />

RET<br />

in HL um setze~<br />

26 6A LD DE<br />

PUSH<br />

86 3 D CALL<br />

POP DE<br />

9E 40 JP 409<br />

Wert CHL) umsetz<br />

PUSH<br />

LD E.<br />

INC HL<br />

LD D.<br />

7A BIT 7<br />

E7 JR Z.<br />

00 00 LD HL<br />

OR A<br />

52 SBC H<br />

2F 3E CALL


SEITE 270<br />

BASIC 1Z-013B<br />

15945<br />

15946<br />

15947 3E4B 1B OEC OE<br />

15948 3E4C 3E 20 LO A, 20<br />

15949<br />

15950 3E4E 12 LO <br />

15970 3E62 20 05 JR NZ, 05 ~ 15971<br />

15972 3E64 23 INC HL<br />

15973 3E65 10 FA DJNZ FA ~ 3E61H<br />

15974<br />

15975 3E67 18 09 JR 09 ~ 3E72H<br />

15976<br />

15977 3E69 78 LD A.B<br />

15978 3E6A 32 81 6A LD (6A8l>. A<br />

15979<br />

15980<br />

15981 3E60 3E 01 LD A. 01<br />

15982<br />

15983 3E6F 32 82 6A LD (6A82).A<br />

15984<br />

15985<br />

15986 3E72 3E 2E LD A. 2E<br />

15987<br />

15988 3E74 32 36 6A LD (6A36).A<br />

15989<br />

15990<br />

15991 3E77 EI POP HL<br />

15992 3E78 CD DA 3C CALL 3CDA<br />

15993<br />

15994<br />

15995 3E7B C3 FF 3F JP 3FFF<br />

15996<br />

15997<br />

V1.0A<br />

ISETZEN IN ASCII NACH<br />

I ZWISCHENSPEICHER<br />

ZEIGER AUF STELLE VOR ZAHL<br />

(Vorzeichen Minus)<br />

VOR ASCII-ZAHLWERT EINTR.<br />

ZEIGER AUF INTEGER-ZAHLWERT<br />

ZEIGER AUF REAL-ZAHLWERT<br />

IREAL-ZAHL (HL) UMSETZEN<br />

I IN 15-BIT-INTEGER<br />

ZEIGER AUF ZWISCHENSPEICHER<br />

MERKEN <br />

I INTEGER-WERT IN HL <br />

IUMSETZEN IN ASCII (DE) <br />

ZEIGER AUF ASCII-TEXT<br />

o (NULL><br />

FüNF ZEICHEN VERGLEICHEN<br />

STELLE GLEICH NULL ? <br />

RELEVANTE STELLE <br />

ZEIGER AUF ZAHL<br />

WEITERE STELLEN VERGLEICHEN<br />

ZAHL IST NULL<br />

RELEVANTE ANZAHL STELLEN<br />

MERKEN<br />

CODE STELLEN VORHANDEN<br />

FLAG STELLEN ANGEGEBEN<br />

;.


SEITE 272<br />

BASIC 1Z-013B V1_0A<br />

16054<br />

16055<br />

16056<br />

16057<br />

16058<br />

16059<br />

16060<br />

16061<br />

16062<br />

16063<br />

16064<br />

16065<br />

16066<br />

16067<br />

16068<br />

16069<br />

3EB7<br />

3EB8<br />

3EBB<br />

3EBE<br />

3ECO<br />

3EC3<br />

3EC4<br />

EI<br />

11 6E<br />

CO 8A<br />

30 06<br />

CD OA<br />

05<br />

18 F2<br />

6A<br />

3C<br />

3D<br />

POP HL<br />

LD OE. 6A6E<br />

CALL 3C8A<br />

JR NC. 06 ~ 3EC6H<br />

CALL 300A<br />

OEC B<br />

JR F2 ~ 3EB8H<br />

ZEIGER AUF REAL-WERT<br />

I ZEIGER AUF<br />

I NORM I ERUNGSFAKTOR<br />

I ZAHLEN (HL) UND (OE)<br />

I VERGLE I CHEN<br />

I REAL-WERT GRöSSER<br />

I NORMIERUNGSFAKTOR<br />

REAL-ZAHL (HL) MAL 10<br />

EXPONENTENZÄHLER MINUS EINS<br />

TESTEN. OB WERT NORMIERT<br />

16070<br />

16071<br />

16072<br />

16073<br />

3EC6<br />

3EC7<br />

3EC8<br />

Dl<br />

C5<br />

CD 23 3F<br />

POP OE<br />

PUSH BC<br />

CALL 3F23<br />

O=VORKOMMA E=NACHKOMMAANZAH<br />

REGISTER RETTEN<br />

WERT AUFBEREITEN IN ASCII<br />

16074<br />

16075 3ECB Cl POP BC GERETTETES REGISTER HOLEN<br />

16076 3ECC 05<br />

PUSH OE<br />

ZEIGER AUF ASCII-ZAHL<br />

16077 3ECO lA<br />

LO A. <br />

16108 3EEC 2B<br />

OEC HL<br />

16109 3EEO FE 2E CP 2E<br />

16110<br />

16111 3EEF 3E 30<br />

LO A. 30<br />

16112<br />

16113 3EFl 28 02 JR Z. 02 + 3EF5H<br />

NICHT Dezimalpunkt<br />

I ZEIGER AUF<br />

10EZIMALUNKTSTELLE<br />

ZEIGER AUF VORKOMMASTELLE<br />

EINE VORKOMMASTELLE HOLEN<br />

1 ' (EINS)<br />

I ZEIGER AUF ANFANG ZAHL<br />

I<br />

VORKOMMASTELLEN VORHANDEN<br />

STELLE FüR VORZEICHEN<br />

1 (Eins)<br />

ZEIGER AUF VORZEICHENSTELLE<br />

EXPONENTEN EINTRAGEN<br />

EINE NACHKOMMASTELLE<br />

ZEIGER AUF NACHKOMMASTELLEN<br />

EINE NACHKOMMASTELLE<br />

ZEIGER AUF NACHKOMMASTELLEN<br />

(Dezimalpunkt)<br />

o (Null)<br />

BASIC 1Z<br />

16114<br />

16115<br />

16116<br />

16117<br />

16118<br />

16119<br />

16120<br />

16121<br />

16122<br />

16123<br />

16124<br />

16125<br />

16126<br />

16127<br />

16128<br />

16129<br />

16130<br />

3EF3<br />

3EF5<br />

3EF6<br />

3EF7<br />

3EF8<br />

3EFA<br />

3EFC<br />

3EFE<br />

3EFF<br />

3FOO<br />

3FOl<br />

3F02<br />

3E<br />

77<br />

23<br />

7E<br />

FE<br />

28<br />

36<br />

EB<br />

04<br />

lA<br />

13<br />

B7<br />

20<br />

2E<br />

FA<br />

31<br />

LO A,<br />

LO (HL<br />

INC HL<br />

LO A,<br />

CP 2E<br />

JR Z.<br />

LD (H<br />

EX OE<br />

INC B<br />

LO A.<br />

INC OE<br />

OR A<br />

16131 3F03 20 FB JR NZ<br />

16132<br />

16133 3F05<br />

16134 3F06<br />

16135<br />

16136<br />

IB<br />

C3 02 3E<br />

OEC O<br />

JP 3E<br />

Zahl in Real-Format ohne<br />

16137 3F09<br />

16138 3FOA<br />

16139<br />

16140<br />

161 41 3FOO<br />

16142 3FOE<br />

16 143 3FOF<br />

16144 3FI0<br />

16145 3Fl1<br />

16146<br />

16147<br />

16148 3F14<br />

16149 3F15<br />

16150<br />

16151 3F17<br />

16152 3F18<br />

16153<br />

16154<br />

16155 3F1B<br />

16156 3FIC<br />

16157<br />

16158 3FIE<br />

16159 3FIF<br />

16160<br />

16161 3F21<br />

16162 3F22<br />

D5<br />

CD 23 3F<br />

Fl<br />

B7<br />

CO<br />

E5<br />

21 36 6A<br />

2B<br />

3E 30<br />

BE<br />

C2 OB 2A<br />

2B<br />

3E 20<br />

BE<br />

20 F7<br />

El<br />

C9<br />

PUSH<br />

CALL<br />

POP A<br />

OR A<br />

RET N<br />

PUSH<br />

LO HL<br />

OEC H<br />

LO A.<br />

CP (H<br />

JP NZ<br />

OEC H<br />

LO A.<br />

CP (H<br />

JR NZ<br />

POP H<br />

RET<br />

Zahl aufbereiten in ASCII<br />

161 63<br />

16164<br />

16165<br />

161 66<br />

16167<br />

3F23<br />

3F24<br />

3F27<br />

05<br />

CD<br />

DA<br />

AF<br />

DB<br />

3F<br />

2A<br />

PUSH<br />

CALL<br />

JP C.


SEITE<br />

16168<br />

16169<br />

16170 3F2A<br />

16171 3F2B<br />

16172 3F2C<br />

16173<br />

16174 3F2E<br />

16175 3F2F<br />

16176<br />

16177 3F31<br />

16178 3F32<br />

16179<br />

16180<br />

16181 3F35<br />

16182 3F36<br />

16183 3F37<br />

16184<br />

16185 3F39<br />

16186<br />

16187<br />

16188 3F3C<br />

16189<br />

16190 3F3E<br />

16191<br />

16192 3F40<br />

16193 3F41<br />

16194 3F42<br />

16195<br />

16196 3F44<br />

16197<br />

16198 3F46<br />

16199 3F47<br />

16200<br />

16201<br />

16202 3F4A<br />

16203 3F4B<br />

16204<br />

16205 3F4D<br />

16206<br />

16207 3F4F<br />

16208<br />

16209<br />

16210 3F52<br />

16211<br />

16212<br />

16213 3F55<br />

16214 3F56<br />

16215 3F57<br />

16216 3F58<br />

16217<br />

16218 3F5A<br />

16219 3F5B<br />

16220 3F5C<br />

16221 3F5D<br />

16222<br />

16223 3F5F<br />

16224<br />

16225<br />

16226 3F62<br />

16227 3F63<br />

16228 3F64<br />

16229<br />

274<br />

BASIC 1Z-013B<br />

El POP HL<br />

E5 PUSH HL<br />

26 00 LD H. 00<br />

2C INC L<br />

28 01 JR Z. 01 + 3F32H<br />

2D DEC L<br />

11 37 6A LD OE. 6A37<br />

19 ADD HL.DE<br />

7E LD A. (HU<br />

36 00 LD (HU. 00<br />

11 36 30 LD DE. 3036<br />

(36 30) (LD (HU. 30)<br />

FE 35 CP 35<br />

38 OF JR C. OF + 3F4FH<br />

2B DEC HL<br />

7E LD A. (HU<br />

FE 2E CP 2E<br />

28 FA JR Z. FA + 3F40H<br />

3C INC A<br />

CA DB 2A JP Z. 2ADB<br />

77 LD (HU.A<br />

FE 3A CP 3A<br />

28 EB JR Z. EB + 3F3AH<br />

21 OE 11 LD HL. 110E<br />

11 00 20 LD DE. 2000<br />

72 LD (HU.D<br />

23 INC HL<br />

ID DEC E<br />

20 FB JR NZ. FB + 3F55H<br />

E1 POP HL<br />

E5 PUSH HL<br />

SC LD E.H<br />

16 00 LD D. 00<br />

21 OF 11 LD HL . 110F<br />

19 ADD HL.DE<br />

E5 PUSH HL<br />

21 2D 6A LD HL. 6A2D<br />

V1.0A<br />

I üBERLAUF FEHLER<br />

IH ANZAHL VORKOMMASTELLEN<br />

IL ANZAHL NACHKOMMASTELL.<br />

ANZAHL NACHKOMMASTELLEN<br />

I ZEIGER AUF ERSTE AUFBE­<br />

IREITETE NACHKOMMASTELLE<br />

ZEIGER AUF LETZTE STELLE<br />

STELLE HOLEN<br />

TEXTENDE EINTRAGEN<br />

I (I ST BESSER ALS SPRUNG)<br />

INULL EINTRAGEN<br />

5 (4/5tel RUNDUNG)<br />

NICHT RUNDEN<br />

ZEIGER AUF VORHERIGE STELLE<br />

STELLE HOLEN<br />

(Dezimalpunkt)<br />

JA + ZIFFER SUCHEN<br />

STELLE PLUS EI NS<br />

IZAHLANFANG +<br />

I üBERLAUF-FEHLER<br />

NEUE ZIFFER EINTRAGEN<br />

üBERLAUF AUFGETRETEN<br />

IJA + AUF VORHERIGE<br />

I STELLE ADDIEREN<br />

I ZEIGER AUF SPEICHER FüR<br />

I AUFBEREITUNG NACH FORMAT<br />

120 Space<br />

100 256 Zeichen<br />

IZWISCHENSPEICHER MIT<br />

ISpace VORINITIIEREN<br />

1<br />

1<br />

IH = ANZAHL VORKOMMASTELLEN<br />

IL = ANZAHL NACHKOMMASTELL.<br />

ANZAHL VORKOMMASTELLEN<br />

1 ZEIGER AUF SPEICHER FüR<br />

IFORMATIERTE ZAHL<br />

ZEIGER AUF DEZIMALPUNKTST.<br />

DEZIMALPUNKTSTELLE MERKEN<br />

ZEIGER AUF ASCII-ZAHL<br />

16230<br />

16231 3F67<br />

16232<br />

16233 3F69<br />

16234 3F6A<br />

16235<br />

16236 3F6C<br />

16237 3F6D<br />

16238<br />

16239 3F6F<br />

162 40<br />

16241 3F71<br />

16242<br />

16243 3F73<br />

16244 3F74<br />

16245 3F75<br />

16246<br />

16247 3F77<br />

16248 3F78<br />

16249 3F79<br />

16250 3F7A<br />

16251 3F7B<br />

16252 3F7C<br />

16253<br />

16254 3F7E<br />

16255<br />

16256<br />

16257 3F81<br />

16258 3F82<br />

16259 3F8 3<br />

16260 3F84<br />

16261 3F85<br />

16262<br />

16263 3F87<br />

16264­<br />

16265 3F89<br />

16266<br />

16267 3F8B<br />

16268 3F8C<br />

16269 3F8D<br />

16270<br />

16271 3F8F<br />

16272<br />

16273 3F91<br />

16274 3F92<br />

16275<br />

16276<br />

16277 3F95<br />

16278 3F96<br />

16279 3F97<br />

16280 3F98<br />

16281<br />

16282 3F9A<br />

16283 3F98<br />

16284<br />

16285<br />

16286 3F9E<br />

16287<br />

16288 3FAO<br />

16289 3FA 1<br />

16290 3 FA2<br />

16291<br />

BASIC<br />

36 20<br />

~ ....<br />

L·J<br />

16 07<br />

7E<br />

FE 30<br />

20 06<br />

36 20<br />

23<br />

15<br />

20 F5<br />

E1<br />

E5<br />

43<br />

78<br />

B7<br />

28 17<br />

11 3 6 6A<br />

2B <br />

1B <br />

lA <br />

77 <br />

FE 20 <br />

28 OC<br />

10 F6<br />

18 <br />

1A <br />

FE 20 <br />

28 04<br />

3C <br />

C2 DB 2A <br />

E1 <br />

Dl <br />

lC <br />

28 OF <br />

43 <br />

11 37 6A <br />

36 2E<br />

..::;.,) <br />

05 <br />

28 05 <br />

1Z<br />

LD (HU<br />

INC HL<br />

LD D. 0<br />

LD A. (H<br />

CP 30<br />

JR NZ.<br />

LD (HU<br />

INC HL<br />

DEC D<br />

JR NZ.<br />

POP HL<br />

PUSH HL<br />

LD B.E<br />

LD A.B<br />

OR A <br />

JR Z.<br />

LD DE,<br />

DEC HL<br />

DEC DE<br />

LD A. <<br />

LD (HU<br />

CP 20<br />

JR Z.<br />

DJNZ F<br />

DEC DE<br />

LD A. <<br />

CP 20<br />

JR Z.<br />

INC A<br />

JP NZ,<br />

POP HL<br />

POP DE<br />

INC E<br />

JR Z,<br />

LD B,E<br />

LD DE,<br />

LD (H<br />

INC HL<br />

DEC B<br />

JR Z,


SEITE 276<br />

BASIC 1Z-013B V1_0A<br />

16292 3FA4 1A LD A. (DE) lEINE NACHKOMMASTELLE<br />

162 93 3FA5 13 INC OE I üBERTRAGEN<br />

16294 3FA6 77 LD (HL>. A I<br />

16295 3FA7 18 F7 JR F7 ~ 3FAOH I UNTERSUCHEN. OB WEITERE<br />

16296 INACHKOMMASTELLEN<br />

16297 3FA9 36 00 LD (HL>. 00 TEXTENDEZEICHEN EINTRAGEN<br />

16 298<br />

16299 3FAB 11 OF 11 LD DE. 110F I ZEIGER AUF ANFANG AUF BE­<br />

16300 IREITETE ZAHL IM USING­<br />

1630 1 I FORMAT (TEILWEISE)<br />

163 02 3 FAE C9 RET<br />

Zahl aufbereiten in ASCII. wenn ohne Exponent möglich<br />

16303 3FAF 22 7E 6A LD (6A7E).HL ZEIGER AUF REAL-ZAHLWERT<br />

16304<br />

16305<br />

16306 3FB2 AF XOR A ACCU AUF NULL<br />

16307 3FB 3 32 81 6A LD (6A81).A ANZAHL VORKOMMASTELLEN<br />

163 08<br />

16309<br />

163 10 3 FB6 32 8 2 6A LD (6A82).A FLAG STELLE AUFBEREITET<br />

163 11<br />

16312<br />

16313 3 FB9 E5 PUSH HL ZEIGER AUF REAL-ZAHLWERT<br />

1631 4 3 FBA 2 1 2D 6A LD HL. 6A2D I ZEIGER AUF ZWISCHEN­<br />

163 15 I SPEICHER FüR ASCII­<br />

1631 6 IZAHLWERT<br />

163 17 3 FBD 36 FF LD (HL>. FF CODE ZAHLANFANG EINTRAGEN<br />

163 18<br />

163 19 3FBF 06 2 1 LD B. 2 1 33 ZE I CHEN LÄNGE<br />

16320<br />

16321 3 FC1 3E 3 0 LD A. 30 o (NULL><br />

1632 2<br />

16323 3 FC3 23 INC HL I SPEICHER MIT NULL<br />

16324 3 FC4 77 LD (HL>. A I VORINITIIEREN<br />

16325 3FC5 10 FC DJNZ FC ~ 3 FC3 H I<br />

16326<br />

16327 3FC7 3E 2E LD A. 2E (Dezimal punkt)<br />

16328<br />

16329 3FC9 32 36 6A LD (6A36).A EINTRAGEN<br />

16330<br />

16331<br />

16332 3FCC E1 POP HL ZEIGER AUF REAL-ZAHL<br />

16333 3 FCD 7E LD A. (HL> EXPONENTEN HOLEN<br />

16334 3FCE B7 OR A GLEICH NULL ?<br />

16335 3 FCF C8 RET Z ZAHL GLEICH NULL<br />

1633 6 3 FDO 11 4F 3 D LD DE. 3D4F ZEIGER AUF .1E+09 (Real)<br />

16337<br />

1633 8<br />

16339 3FD3 CD 4A 5E CALL 5E4A IZAHLEN (HL) UND (DE)<br />

16340 I VERGLE I CHEN<br />

16341<br />

16342 3FD6 3F CCF ERGEBNIS UMKEHREN<br />

16343 3FD7 D8 RET C ZU GROSS FüR OHNE EXPONENT<br />

16344 3FD8 11 81 3D LD DE. 3D81 ZEIGER AUF .1E- 07 (Real)<br />

16345<br />

16346<br />

163 47 3FDB CD 4A 5E CALL 5E4A IZAHLEN (HL) UND (DE)<br />

163 48 I VERGLEICHEN<br />

163 49<br />

16350 3 FDE<br />

16351 3FDF<br />

16352<br />

16353<br />

16354 3FE2<br />

16355 3FE3<br />

16356<br />

163 57<br />

163 58 3FE6<br />

16359 3FE7<br />

16360 3FE8<br />

16361<br />

16362 3 FEA<br />

16363<br />

163 64 3FEC<br />

163 65<br />

16366 3FEE<br />

16367<br />

16368<br />

16369 3FF1<br />

16370<br />

16371<br />

16372<br />

16373 3FF5<br />

16374<br />

16375<br />

16376 3FF8<br />

16377<br />

16378<br />

16379 3FFB<br />

16380<br />

16381<br />

16382 3FFE<br />

16383 3FFF<br />

16384<br />

16385<br />

16386<br />

16387 4003<br />

16388<br />

16389<br />

16390 4006<br />

16391 4007<br />

16392<br />

16393 4009<br />

16394<br />

16395<br />

16396 400C<br />

16397<br />

16398 400E<br />

16399 400F<br />

16400<br />

16401<br />

16402 401 2<br />

16403<br />

16404<br />

16405 4015<br />

16406<br />

16407<br />

16408 4018<br />

16409<br />

16410 401A<br />

BASIC<br />

D8<br />

11 6E 6A<br />

D5<br />

CD 88 3A<br />

E1<br />

7E<br />

FE 81<br />

3 8 13<br />

FE 90<br />

DA 51 3E<br />

DD 21 2E 6A<br />

11 54 3D<br />

CD C6 40<br />

CD F8 40<br />

00<br />

DD 21 3 7 6A<br />

11 4F 3 ~<br />

C5<br />

DD E5<br />

CD E1 5F<br />

DD E1 <br />

Cl <br />

CD AD 3 A <br />

CD C6 40<br />

CD F8 40<br />

38 E9 <br />

C9 <br />

1Z-<br />

RET C<br />

LD OE.<br />

PUSH OE<br />

CALL 3A<br />

POP HL<br />

LD A. (H<br />

CP 81<br />

JR C. 1<br />

CP 90<br />

JP C. 3<br />

LD IX.<br />

LD DE.<br />

CALL 40<br />

CALL 40<br />

RET NC<br />

LD IX.<br />

LD DE.<br />

PUSH BC<br />

PUSH IX<br />

CALL 5F<br />

POP IX<br />

POP BC<br />

CALL 3A<br />

CALL 40<br />

CALL 40<br />

JR C.<br />

RET


SEITE 278<br />

BASIC 1Z-013B V1_0A<br />

BASIC 1Z-<br />

Real - Zahl (HL) umsetzen in AACCI nac Zwischenspeicher 16465<br />

16466 4052 18 F5 JR F5 ~<br />

16411 401B 3E 05 LD A, 05 CODE REAL - WERT 16467<br />

16412<br />

16413 4010 32 65 6A 16414<br />

LD (6A65),A WERT - FLAG<br />

16468 4054 FE 30 CP 30<br />

16415<br />

16416<br />

16417<br />

16418<br />

16419<br />

16420<br />

16421<br />

16422<br />

16423<br />

16424<br />

16425<br />

16426<br />

16427<br />

16428<br />

16429<br />

16430<br />

16431<br />

1643 2<br />

16433<br />

16434<br />

16435<br />

16436<br />

16437<br />

16438<br />

4020<br />

4021<br />

4024<br />

4025<br />

4028<br />

4029<br />

402C<br />

402F<br />

4030<br />

4031<br />

4034<br />

4035<br />

4036<br />

E5<br />

11 76 6A<br />

D5<br />

CD<br />

EI<br />

CD<br />

CD<br />

EI<br />

C9<br />

11<br />

12<br />

1 B<br />

C9<br />

B8 3A<br />

AF<br />

37<br />

3 F<br />

40<br />

PUSH HL<br />

LD OE, 6A76<br />

PUSH OE<br />

CALL 3AB8<br />

POP HL<br />

CALL 3FAF<br />

CALL<br />

POP<br />

RET<br />

HL<br />

4037<br />

36 6A LD OE, 6A36<br />

LD (DE),A<br />

DEC DE<br />

RET<br />

Rest der Real - Zahl aufbereiten in ASCII<br />

16439 4037 DA C7 3D<br />

16440<br />

16441<br />

16442 403A 2A 7E 6A<br />

16443<br />

16444<br />

16445 403D 7E<br />

16446 403E B7<br />

16447 403F 28 FO<br />

16448<br />

16449 4041 11 2E 6A<br />

16450<br />

16451<br />

16452 4044<br />

16453 4045<br />

16454 4046<br />

16455<br />

16456<br />

16457<br />

16458<br />

16459<br />

16460<br />

16461<br />

16462<br />

16463<br />

16464<br />

4049<br />

404A<br />

404B<br />

IB<br />

EB<br />

11 01 00<br />

23<br />

7E<br />

FE<br />

JP C, 3DC7<br />

LD HL, (6A7E)<br />

LD A, (HL)<br />

OR A<br />

JR Z, FO ~ 4031H<br />

LD DE, 6A2E<br />

DEC DE<br />

EX DE,HL<br />

LD DE, 0001<br />

INC HL<br />

LD A, (HU<br />

CP 2E<br />

ZEIGER AUF REAL-ZAHL<br />

I ZEIGER AUF ZWISCHEN­<br />

I SPEICHER FüR REAL-ZAHL<br />

MERKEN<br />

I REAL-ZAHL VON (HL) NACH<br />

I (OE) üBERTRAGEN<br />

ZEIGER AUF REAL-ZAHL<br />

I REAL-ZAHL UMSETZEN IN<br />

IASCII, WENN OHNE<br />

I EXPONENT MöGLICH<br />

IREAL ZAHL AUFBEREITEN<br />

I IN ASCI I<br />

ZEIGER AUF REAL-ZAHL<br />

I ZEIGER AUF<br />

IDEZIMALPUNKTSTELLE<br />

TEXTENDE EINTRAGEN<br />

ZEIGER AUF NULL<br />

I REAL-ZAHL UMSETZEN IN<br />

IASCII IN EXPONENTlAL­<br />

I DARSTELLUNG<br />

ZEIGER AUF REAL- ZAHL HOLEN<br />

EXPONENT REAL-ZAHL<br />

GLEICH NULL ?<br />

IJA ~ TEXTENDE AUF<br />

IDEZIMALPUNKT EINTRAGEN<br />

I ZEIGER AUF ZWISCHEN­<br />

I SPEICHER MIT ASCII-ZAHL<br />

FüR SCHLEIFE CORRIGIEREN<br />

NACH HL<br />

I VORGABE FüR ZÄHLER<br />

I ANZAHL VORKOMMASTELLEN<br />

ZEIGER AUF ASCII-ZAHL<br />

EINE ZIFFER HOLEN<br />

(Dezimal punkt) ?<br />

16469<br />

16470<br />

16471<br />

16472<br />

16473<br />

16474<br />

16475<br />

16476<br />

16477<br />

16478<br />

16479<br />

16480<br />

16481<br />

16482<br />

16483<br />

16484<br />

16485<br />

16486<br />

4056<br />

4058<br />

4059<br />

405C<br />

4050<br />

405E<br />

4060<br />

4062<br />

406'+<br />

4065<br />

4066<br />

28<br />

19<br />

11<br />

Fl<br />

19<br />

7E<br />

36 30<br />

FE<br />

38<br />

08 00<br />

35<br />

OF<br />

28<br />

7E<br />

FE 2E<br />

JR Z, F<br />

AOD HL,D<br />

LD DE, 0<br />

ADD HL,D<br />

LD A, (H<br />

LD (HU<br />

CP<br />

JR<br />

35<br />

C, O<br />

DEC HL<br />

LD A, (H<br />

CP 2E<br />

16487<br />

16488 4068 28 FA JR Z. FA<br />

16489<br />

16490<br />

16491<br />

16492<br />

16493<br />

16494<br />

406A<br />

406B<br />

4060<br />

406E<br />

16495<br />

16496 4070<br />

16497<br />

16498 4072<br />

16499 4073<br />

16500<br />

16501<br />

16502 4076<br />

16503 4077<br />

16504 4078<br />

16505<br />

16506 407A<br />

16507 407B<br />

16508<br />

16509 407D<br />

165 10<br />

1651 1<br />

16512 4080<br />

16513<br />

16514 4082<br />

16515 4083<br />

16516 4084<br />

16517<br />

16518<br />

16519<br />

16520<br />

16521<br />

16522<br />

4086<br />

4087<br />

3C<br />

28<br />

77<br />

FE<br />

40<br />

3 A<br />

28 EC<br />

23<br />

11 36 6A<br />

EB<br />

B7<br />

ED 52<br />

EB<br />

38 05<br />

21 36 6A<br />

18 17<br />

2B<br />

7E<br />

FE 2E<br />

2B<br />

28<br />

INC A<br />

JR Z, 4<br />

LD (HU<br />

CP 3A<br />

JR Z, E<br />

INC HL<br />

LD DE,<br />

EX DE,H<br />

oR A<br />

SBC HL,<br />

EX DE,H<br />

JR C, 0<br />

LD HL,<br />

JR 17<br />

DEC HL<br />

LD A. (H<br />

CP 2E<br />

DEC HL<br />

JR Z. O<br />

2E<br />

OF<br />

404D 20 05 JR NZ, 05 ~ 4054H NICHT DEZIMALPUNKT<br />

4089 23<br />

INC HL<br />

408A FE 30<br />

CP 30<br />

404F 11 00 00 LO DE, 0000 CODE KEINE VORKOMMASTELLEN 16523<br />

16524 408C 28 E5 JR Z. E


SEITE 280<br />

BASIC 1Z-013B<br />

16525<br />

16526 408E E5 PUSH HL<br />

16527 408F 11 3F 6A LD OE, 6A3F<br />

16528<br />

16529<br />

16530 4092 ED 52 SBC HL,OE<br />

16531<br />

16532 4094 EI POP HL<br />

16533 4095 D2 C7 3D JP NC, 3DC7<br />

16534<br />

16535<br />

16536 4098 23 INC HL<br />

16537 4099 36 00 LD (HU, 00<br />

16538<br />

16539 4098 11 2E 6A LD DE, 6A2E<br />

16540<br />

16541<br />

16542 409E 1A LD A,


16636<br />

16637<br />

16639<br />

16641 4101 00<br />

16644<br />

16645<br />

16647<br />

16648<br />

16650<br />

16652<br />

16655<br />

16656<br />

16658<br />

16660<br />

16661<br />

16664<br />

16665<br />

Befehl LIST<br />

16666 411A 3A CB 40 LD A, (40CB)<br />

1666'7<br />

16668<br />

16670<br />

16672<br />

16673<br />

16675<br />

16676<br />

16678<br />

16679<br />

16680<br />

16682<br />

16683<br />

16684<br />

16687<br />

16688<br />

16696<br />

16714<br />

16716<br />

16722<br />

16724<br />

16725<br />

16728<br />

16734<br />

16739<br />

16740<br />

16742<br />

16743<br />

16745<br />

16746<br />

INC HL<br />

LD HL,<br />

POP HL<br />

LD HL,<br />

JR NC,<br />

CALL 2<br />

16702 413E E8 EX OE,HL<br />

16736 4160 EB EX DE,H<br />

LD E, (HL<br />

2A BF 6A LD HL, (6<br />

PUSH HL<br />

BASIC 1Z -<br />

16689 4131 5E<br />

16690 4132 23<br />

16691 4133 56 LO 0, (HL<br />

JP Z, 41<br />

16697<br />

16698 413A EB EX DE,HL<br />

19 ADD HL,D<br />

LO 0, (H<br />

LD E, (H<br />

PUSH HL<br />

16703 413F 05 PUSH OE<br />

16701 4130 2B DEC HL <br />

16707 4143 23 INC HL<br />

16705 4141 23 INC HL<br />

16692 4134 23 INC HL<br />

16693 4135 7A LD A,D<br />

16694 4136 B3 OR E<br />

16699 4138<br />

16700 413C 2B OEC HL<br />

16713 4149 EO 52 SBC HL,<br />

16715 414B 38 06 JR C, 0<br />

16717 4140 28 04 JR Z, 0<br />

16720 4150 E1 POP HL<br />

16721 4151 18 OE JR OE<br />

16712 4148 B7 OR A<br />

16723 4153 21 00 00<br />

16726 4156 B7 OR A<br />

16727 4157 EO 52 S8C HL,<br />

16729 4159 30 04<br />

16730<br />

16735 415F EI POP HL<br />

16737 4161 05 PUSH O<br />

22 E2 38 LD (38<br />

16731 415B EI POP HL<br />

16732 415C EI POP HL<br />

16695 4137 CA A5 41<br />

16708 4144 E5<br />

16706 4142 56<br />

16685 4120 E5<br />

SEITE 282<br />

BASIC 1Z-013B V1.0A<br />

UberprUfen, ob Restwert gleich Null oder schon neun Stellen<br />

(Maximal Anzahl plus eine Stelle zum Runden) aufbereitet 16686 412E<br />

16632 40F8 7E LO A, (HLl<br />

16633 40F9 87 OR A<br />

16634 40FA C8 RET Z<br />

16635 40FB 3A 81 6A LD A, (6A81)<br />

EXPONENT RESTWERT HOLEN<br />

GLEICH NULL ?<br />

RESTWERT GLEICH NULL<br />

I ANZAHL AUF8EREITETE<br />

I STELLEN<br />

16638 40FE FE 09 CP 09 GLEICH NEUN ?<br />

16640 4100 C9 RET<br />

16642 4102 AF XOR A<br />

16643 4103 32 19 18 LO (1819) ,A<br />

16646 4106 CO 14 54 CALL 5414<br />

16649 4109 FE FB CP FB<br />

ACCU AUF NULL 16704 4140 5E<br />

AUSGABE - FLAG<br />

16651 4108 20 15 JR NZ, 15 ~ 4122H NICHT I<br />

16653 4100 23 INC HL<br />

16654 410E CD 14 54 CALL 5414<br />

IPROGRAM<strong>MZ</strong>EIGER AUF<br />

I NÄCHSTES RELEVANTES 16709 4145 21 00 00<br />

16719 414F EI<br />

16738 4162<br />

16741 4165 CD A7 21<br />

16744 4168 CD E2 17 CALL 1<br />

I ZEICHEN STELLEN 16710<br />

16711<br />

I (Zwischencode)<br />

I üBERSPRINGEN<br />

IPROGRAM<strong>MZ</strong>EIGER AUF<br />

I NÄCHSTES RELEVANTES<br />

16657 4111 FE 50 CP 50 P (Printer)<br />

16659 4113 C2 FE 20 JP NZ, 20FE IFALSCHES ZEICHEN ~<br />

16662 4116 23 INC HL<br />

16663 4117 32 19 18 LO (1819>,A<br />

I ZEICHEN SETZEN 16718<br />

I SYNTAX - FEHLER<br />

PROGRAM<strong>MZ</strong>EIGER<br />

IP IM AUSGA8EFLAG MERKEN<br />

DRUCKER-MODUS-FLAG<br />

16669 4110 FE 02 CP 02<br />

IM GRAPHIK-MODUS ?<br />

16671 411F CA F7 4F JP Z, 4FF7<br />

IJA" FEHLER 68 16733 415D 18 46 JR 46<br />

I DRUCKER MODUS FEHLER<br />

16674 4122 CD EF 35 CALL 35EF<br />

I ANFANGS- UND ENOZEILEN­<br />

I NUMMER BEREITSTELLEN<br />

16677 4125 EO 53 46 41 LO (4146),OE<br />

IANFANGSZEILENNUMMER<br />

I IN ROUTINE EINTRAGEN<br />

16681 4129 EO 43 54 41 LO (4154),BC<br />

I ENDZEILENNUMMER<br />

I IN ROUTINE EINTRAGEN


SEITE<br />

16747 416B<br />

16748<br />

16749 4160<br />

16750<br />

16751<br />

16752 4170<br />

16753 4171<br />

16754<br />

16755<br />

16756 4174<br />

16757 4175<br />

16758<br />

16759<br />

16760 4178<br />

16761 4179<br />

16762<br />

16763<br />

16764 417C<br />

16765 4170<br />

16766<br />

16767 417F<br />

16768 4180<br />

16769 4181<br />

16770<br />

16771 4183<br />

16772<br />

16773<br />

16774 4186<br />

16775 4187<br />

16776<br />

16777 4189<br />

16778<br />

16779<br />

16780 418C<br />

16781<br />

16782<br />

16783 418F<br />

16784 4190<br />

16785 4191<br />

16786<br />

16787<br />

16788 4194<br />

16789<br />

16790 4196<br />

16791<br />

16792 4198<br />

16793<br />

16794 419A<br />

16795<br />

16796<br />

16797 4190<br />

16798 419E<br />

16799 419F<br />

16800<br />

16801<br />

16802 41A2<br />

16803<br />

16804<br />

16805 41A5<br />

16806 41A6<br />

16807 41A7<br />

16808<br />

284<br />

BASIC 1Z-013B<br />

3E 20 LO A, 20<br />

CO 03 17 CALL 1703<br />

El POP HL<br />

11 OF 11 LO DE, 110F<br />

05 PUSH DE<br />

CO CO 49 CALL 49CD<br />

01 POP DE<br />

3A 19 18 LD A. (1819)<br />

B7 ~ 4189H<br />

oR A<br />

20 OA JR NZ, OA lA ~ 418CH<br />

LD A.


SEITE 286<br />

BASIC 1Z-013B V1_0A<br />

BASIC 1Z-<br />

16863<br />

16864<br />

16865<br />

16866<br />

16867<br />

16868<br />

16869<br />

16870<br />

16871<br />

16872<br />

16873<br />

16874<br />

16875<br />

16876<br />

16877<br />

16878<br />

16879<br />

16880<br />

16881<br />

16882<br />

41DF<br />

41E2<br />

41E5<br />

41E7<br />

41E9<br />

41EB<br />

41ED<br />

41EE<br />

16883<br />

16884 41F4<br />

16885<br />

16886<br />

16887 41F7<br />

16888<br />

16889<br />

16890 41FA<br />

16891 41FB<br />

16892<br />

16893 41FD<br />

16894<br />

16895<br />

16896 4200<br />

16897<br />

16898<br />

16899 4203<br />

16900<br />

16901 4205<br />

16902<br />

16903 4207<br />

16904<br />

16905<br />

16906 420A<br />

16907<br />

16908 420C<br />

16909<br />

16910 420E<br />

16911<br />

16912<br />

16913 4211<br />

16914<br />

16915<br />

16916<br />

16917<br />

16918<br />

16919<br />

16920<br />

16921<br />

16922<br />

16923<br />

16924<br />

CD<br />

3A<br />

FE<br />

28<br />

FE<br />

28<br />

AF<br />

32<br />

3F<br />

FC<br />

01<br />

45<br />

04<br />

DF<br />

47<br />

OF<br />

A3 42<br />

CALL 473F<br />

LD A. . HL<br />

LD A. (OFFC)<br />

CP 02<br />

JR Z. 46 ~ 424DH<br />

LD A. (42A3)<br />

CP 01<br />

JR Z. 42 ~ 4250H<br />

LD HL. (6ABF)<br />

LD (1010).HL<br />

LIMIT - ADRESSE<br />

VORGABE FüR STACK ETC.<br />

CARRY-FLAG ZURüCKSETZEN<br />

I HöCHSTE BENUTZTBARE<br />

IRAM-ADRESSE ERRECHNEN<br />

UND IN ROUTINE EINTRAGEN<br />

PROGRAMMTYP - FLAG HOLEN<br />

<strong>MZ</strong>-80 K BASIC-PROGRAMM<br />

IJA ~ PROGRAMM LADEN<br />

I UND CONVERTIEREN<br />

FLAG LOAD/MERGE/CONVERT<br />

MERGE ?<br />

I PROGRAMM ZUM VORHANDENEN<br />

I PROGRAMM DAZULADEN<br />

I ZEIGER AUF<br />

IBASIC PROGRAMMANFANG<br />

ALS LADEADRESSE EINTRAGEN<br />

4214 ED 4B OE 10 LD BC. (100E) ; PROGRAMMLÄNGE HOLEN<br />

4218<br />

421B<br />

CD<br />

DA<br />

2A<br />

79<br />

00<br />

47<br />

CALL 002A<br />

JP C. 4779<br />

• PROGRAMM VOM BAND LADEN<br />

FEHLER AUFGETRETEN<br />

16942 422E<br />

16943<br />

16944<br />

16945 4231<br />

16946 4232<br />

16947 4233<br />

16948<br />

16949<br />

. 16950<br />

16951 4237<br />

16952 4238<br />

16953<br />

16954 423A<br />

16955<br />

16956 423C<br />

16957<br />

16958<br />

16959 423F<br />

16960 4240<br />

16961 4241<br />

16962<br />

16963<br />

16964<br />

16965 4245<br />

16966<br />

16967<br />

16968 4248<br />

16969<br />

16970<br />

16971 424B<br />

16972 424C<br />

2A<br />

ED<br />

10<br />

5B<br />

19<br />

22 B3<br />

CD 4E<br />

E1<br />

C9<br />

10<br />

OE 10<br />

6A<br />

22<br />

2A 10 10<br />

E5<br />

05<br />

ED 5B BB 6A<br />

B7<br />

ED 52<br />

3E 12<br />

DA 08 21<br />

01<br />

E1<br />

ED 4B OE 10<br />

CD 2A 00<br />

DA 7E 47<br />

E1<br />

C9<br />

LD<br />

LD<br />

HL. (<br />

DE.<br />

ADD HL<br />

LD (6A<br />

CALL 22<br />

POP HL<br />

RET<br />

LD HL.<br />

PUSH H<br />

PUSH O<br />

LD OE.<br />

OR. A<br />

SBt HL<br />

LD A.<br />

JP C.<br />

POP DE<br />

POP HL<br />

LD BC.<br />

CALL 0<br />

JP C.<br />

POP H<br />

RET<br />

<strong>MZ</strong>-80 K BASIC-Programm vo<br />

16973 4240<br />

16974<br />

16975<br />

16976 4250<br />

16977<br />

16978<br />

32<br />

21<br />

A3<br />

00<br />

42<br />

00<br />

LD<br />

LD<br />

(4<br />

HL


SEITE<br />

16979 4253<br />

16980<br />

16981<br />

16982<br />

16983 4257<br />

16984 4258<br />

16985<br />

16986 425A<br />

16987<br />

16988<br />

16989 425D<br />

16990<br />

16991<br />

16992 4260<br />

16993<br />

16994<br />

16995<br />

16996 4264<br />

16997 4265<br />

16998 4266<br />

16999 4267<br />

17000 4268<br />

17001 4269<br />

17002 426A<br />

17003<br />

17004 426C<br />

17005<br />

17006<br />

17007 426F<br />

17008<br />

17009<br />

17010 4272<br />

17011<br />

17012<br />

17013<br />

17014 4276<br />

17015<br />

17016<br />

17017 4279<br />

17018<br />

17019<br />

17020 427C<br />

17021<br />

17022<br />

17023 42 7F<br />

17024<br />

17025 4281<br />

17026<br />

17027 4283<br />

17028<br />

17029<br />

17030 4286<br />

17031<br />

17032<br />

17033 4289<br />

1703 4<br />

17035<br />

17036 428C<br />

17037 428D<br />

17038<br />

17039<br />

288 <br />

BASIC 1Z-013B<br />

ED SB OE 10 LD DE. (100E) <br />

B7 oR A<br />

ED 52 SBC HL.DE<br />

22 10 10 LD (1010).HL<br />

22 Al 42 LD (42Al).HL<br />

ED 5B B3 6A LD DE. (6AB3)<br />

14 INC D<br />

14 INC D<br />

14 INC D<br />

14 INC D<br />

14 INC D<br />

B7 oR A<br />

ED 52 SBC HL.DE<br />

DA B9 20 JP C. 20B9<br />

2A 10 10 LD HL. (1010)<br />

ED 4B OE 10 LD BC. (100E)<br />

CD 2A 00 CALL 002A<br />

DA 79 47 JP C. 4779<br />

3A FC OF LD A. (OFFC)<br />

FE 05 CP 05<br />

28 09 JR Z. 09 ~ 428CH<br />

11 90 42 LD DE. 4290<br />

CD 51 00 CALL 0051<br />

CD 06 00 CALL 0006<br />

EI POP HL<br />

C3 76 18 JP 1876<br />

V1.0A<br />

PROGRAMMLÄNGE<br />

CARRY-FLAG ZURüCKSETZEN<br />

LADEADRESSE ERRECHNEN<br />

UND EINTRAGEN<br />

I ZEIGER AUF EINZUFüGENDE<br />

IBASIC-PRoGRAM<strong>MZ</strong>EILEN<br />

I ZEIGER AUF ENDE BIS­<br />

IHERIGES PROGRAMM<br />

I PLUS 5 * 256 BYTE<br />

I ALS RESERVE<br />

I<br />

CARRY-FLAG ZURüCKSETZEN<br />

I üBERPRüFEN. OB BEREICHE<br />

ISICH NICHT üBERLAPPEN<br />

(FEHLER 6<br />

I SPEICHER ZU KLEIN<br />

ZEIGER AUF LADEBEREICH<br />

PROGRAMMLÄNGE<br />

PROGRAMM VOM BAND LADEN<br />

FEHLER AUFGETRETEN<br />

PROGRAMMTYP - FLAG<br />

<strong>MZ</strong>-700 BASIC- PROGRAMM?<br />

JA ~ ZEILEN EINFüGEN<br />

TEXT CoNVERTING TEXT<br />

TEXT (DE) AUSGEBEN<br />

ZEILENVORSCHUB AUSGEBEN<br />

PROGRAM<strong>MZ</strong>EIGER HOLEN<br />

I ZEILEN (KONVERTIEREN UND)<br />

I EINFüGEN<br />

17040 4290<br />

1704 1 4291<br />

17042 4292<br />

17043 4293<br />

17044 4294<br />

17045 4295<br />

17046 4296<br />

17047 4297<br />

17048 4298<br />

17049 4299<br />

17050 429A<br />

17051 429B<br />

17052 429C<br />

17053 429D<br />

17054 429E<br />

17055 429F<br />

17056 42AO<br />

17057 42Al <br />

17058 <br />

17059 42A3<br />

Befehl<br />

17060 42A4<br />

'1706 1<br />

17062<br />

17063 42 A7<br />

17064 42A8<br />

17065<br />

17066<br />

17067 42 AB<br />

17068<br />

17069 42 AD<br />

17070<br />

17071<br />

17072 42 BO<br />

17073<br />

17074<br />

17075 42B3<br />

17076 4284<br />

170 77<br />

17078<br />

17079 42 B7<br />

17080 42B8<br />

17081<br />

17082 428A<br />

17083<br />

17084<br />

17085 428D<br />

17086 428E<br />

17087<br />

17088<br />

17089 42Cl<br />

17090 42C2<br />

1709 1<br />

17092<br />

17093 42C5<br />

BASIC<br />

43<br />

4F<br />

4E<br />

56<br />

45<br />

52<br />

54<br />

49<br />

4E<br />

47<br />

20<br />

54<br />

45<br />

58<br />

54<br />

00<br />

00<br />

00 00<br />

00<br />

SAVE<br />

CD 2F 35<br />

E5 <br />

21 FC OF <br />

3 6 05<br />

2A BF 6A<br />

22 10 10<br />

EB <br />

2A B3 6A <br />

B7<br />

ED 52<br />

2 2 OE 10<br />

EI<br />

CD Cl 46<br />

ES<br />

2A 10 10<br />

ED 4B OE 10<br />

1Z-<br />

C<br />

o<br />

N<br />

V<br />

E<br />

R<br />

T<br />

I<br />

N<br />

G<br />

T<br />

E <br />

X <br />

T<br />

Spac<br />

CALL 35<br />

PUSH HL<br />

LD HL.<br />

LD (HL<br />

LD HL.<br />

LD (10<br />

EX DE.H<br />

LD HL.<br />

oR A<br />

SBC HL<br />

LD (10<br />

POP HL<br />

CALL 4<br />

PUSH H<br />

LD HL.<br />

LD BC.<br />

I<br />

I


SEITE 290<br />

BASIC 1Z-013B<br />

17094<br />

17095<br />

17096<br />

17097 42C9 CD 24 00 CALL 0024<br />

17098<br />

17099<br />

17100 42CC DA 7E 47 JP C. 477E<br />

17101<br />

17102<br />

17103 42CF EI POP HL<br />

17104 4200 C9 RET<br />

Befehl VERIFV<br />

17105 42Dl ~ 42F7H<br />

CD 2F 35 CALL 352F<br />

17106<br />

17107<br />

17108 42D4 CD 06 46 CALL 46D6<br />

17109<br />

17110<br />

17111 4207 E5 PUSH HL<br />

17112 42D8 11 16 43 LD DE. 4316<br />

17113<br />

17114<br />

17115 42DB 21 FC OF LD HL. OFFC<br />

17116<br />

17117<br />

17118 420E CD 3F 47 CALL 473F<br />

17119<br />

17120<br />

17121 42E1 ED 48 OE 10 LD BC. (100E)<br />

17122<br />

17123<br />

17124<br />

17125 42E5 3A FC OF LO A. (OFFC)<br />

17126<br />

17127<br />

17128 42E8 2A BF 6A LD HL. (6ABF)<br />

17129<br />

17130<br />

17131 42EB FE 05 CP 05<br />

17132<br />

17133 42EO 28 08 JR Z. 08 17134<br />

17135 42EF FE 01 CP 01<br />

17136<br />

17137 42Fl C2 CC 41 JP NZ. 41CC<br />

17138<br />

17139<br />

17140 42F4 2A 10 10 LD HL. (1010)<br />

17141<br />

17142<br />

17143 42F7 CD 2D 00 CALL 002D<br />

17144<br />

17145<br />

17146 42FA DA 7E 47 JP C. 477E<br />

17147<br />

17148<br />

17149 42FD CD 09 00 CALL 0009 ;<br />

17150<br />

17151<br />

V1_0A<br />

'PROGRAMM AUF BAND<br />

I SCHREIBEN<br />

FEHLER AUFGETRETEN<br />

PROGRAM<strong>MZ</strong>EIGER<br />

NÄCHSTER BEFEHL<br />

I ZEIGER AUF ZEILEN IM<br />

I PROGRAMM UMSETZEN IN<br />

IZEILENNUMMERN<br />

IPROGRAMMNAMEN BEREIT­<br />

ISTELLEN UND RICHTIGE<br />

I t


17207<br />

17209<br />

17210 433A 18 06 .JR 06 • 4342H UND AUSGEBEN<br />

17211<br />

17212 433C 3E 31 LD A. 31<br />

17213<br />

<br />

17294 438E 1A LO A. <br />

JR Z. 29<br />

OE 00 LO C. 00<br />

36 2B LO (HL><br />

17295 438F 77 LD (HU<br />

LD C. 0<br />

EX DE.HL<br />

17285 4385 36 29 LO (HL><br />

Te>:t der Taste (HL) nach Zw<br />

17314 43A2 79 LD A.C<br />

17315 43A3 FE FF CP FF<br />

17311 439F 23 INC HL<br />

17307 439B Cl POP BC<br />

17304 4398 23 INC HL<br />

LD (HU<br />

PUSH BC<br />

17293 4380 23 INC HL<br />

23 INC HL<br />

18 F4 JR F4<br />

17273 4379 FE 22 CP 22<br />

17278 437E FE 01 CP 01<br />

17269 4375 FE 20 CP 20<br />

78 LD A.B<br />

17317 43A5 28 37<br />

17318<br />

17319 43A7 B7 OR A<br />

17275 4378 28 25 JR Z.<br />

17282 4382 El7 OR A<br />

17308 439C C9 RET<br />

17263 436F B7 OR A<br />

17309 4390 36 22<br />

17302 4396 36 22<br />

17291 438B 36 22<br />

17298 4392 OE 01<br />

17283 4383 28 06<br />

17280 4380 28 OC<br />

17271 4377 38 29<br />

17266 4372 28 29<br />

17277 4370 79<br />

17268 4374 lA<br />

17260 436C EB<br />

17261 436D C5<br />

17288 4388<br />

17287 4387<br />

17264 4370<br />

17262 436E<br />

SEITE 292<br />

BASIC 1Z-013B V1_0A<br />

17206 4336 28 04 JR Z. 04 • 433CH JA<br />

17226 434A 3E 3D LD A. 3 0 (Gleich)<br />

17227 17279<br />

1723 1 434F 79 LO A.C TASTENNUMMER<br />

17232 4350 CD 24 44 CALL 4424 IHL AUF TEXT OER TASTE<br />

17235 4353 46 LO B. (HL> TEXTLÄNGE HOLEN<br />

17208 4338 C6 31 ADD A. 31 NUMMER UMSETZEN IN ASCII<br />

17214 433E CO 03 17 CALL 1703 IASCII-ZEICHEN IM ACCU<br />

17217 4341 30 OEC A o


SEITE<br />

17320 43A8<br />

1T!.21<br />

17322 43AA<br />

17323<br />

17324 43AC<br />

17325 43AD<br />

17326<br />

17327 43AF<br />

17328 43BO<br />

17329<br />

17330 43B2<br />

17331 43B3<br />

17332<br />

17333 43B5<br />

17334 43B6<br />

17335<br />

17336 43B8<br />

17337 43B9<br />

17338<br />

17339 43BB<br />

17340 43BC<br />

17341<br />

17342 43BE<br />

17343 43BF<br />

17344 43CO<br />

17345 43Cl<br />

17346 43C2<br />

17347 43C3<br />

17348 43C4<br />

17349<br />

17350 43C6<br />

17351<br />

17352<br />

17353 43C9<br />

17354 43CA<br />

17355 43CB<br />

17356 43CC<br />

17357 43CD<br />

17358<br />

17:359 43CF<br />

17360 4300<br />

17361 4301<br />

17362 4302<br />

17363<br />

17.364 4304<br />

17365 4305<br />

17366 4306<br />

17367<br />

17368 4308<br />

17369<br />

17370 430A<br />

17371<br />

17372 430C<br />

17373<br />

17374 430E<br />

17375<br />

17376 43EO<br />

17377<br />

294<br />

BASIC 1Z-013B<br />

28 06 JR Z. 06 ~ 43BOH<br />

36 22 LD (HL>. 22<br />

23 INC HL<br />

36 2B LD (HL>. 2B :<br />

23 INC HL<br />

36 43 LO (HL>. 43<br />

23 INC HL<br />

36 48 LD (HL>. 48<br />

23 INC HL<br />

36 52 LD (HL>. 52<br />

23 INC HL<br />

36 24 LO (HL>. 24<br />

23 INC HL<br />

36 28 LD (HL>. 28<br />

23 INC HL<br />

05 PUSH OE<br />

E5 PUSH HL<br />

C5 PUSH BC<br />

EB EX DE.HL<br />

6E LD L. (HL><br />

26 00 LD H. 00<br />

CD A7 21 CALL 21A7<br />

Cl ~ 4304H<br />

POP BC<br />

E1 POP HL<br />

lA LD A. . A<br />

13 INC OE<br />

23 INC HL<br />

18 F7 JR F7 ~ 43CBH<br />

Dl POP OE<br />

13 INC OE<br />

OE FF LD C. FF<br />

10 9A DJNZ 9A ~ 4374H<br />

36 29 LD (HL>. 29<br />

18 BA JR BA ~ 4398H<br />

36 2C LD (HU. 2C<br />

18 DC JR OC ~ 43BEH<br />

V1_0A<br />

JA ~ CHR$ EINTRAGEN<br />

(AnfUhrungszeichen)<br />

ZEIGER AUF ZWISCHENSPEICHER<br />

+ (Plus)<br />

ZEIGER AUF ZWISCHENSPEICHER<br />

C (CHR$ ()<br />

ZEIGER AUF ZWISCHENSPEICHER<br />

H (CHR$ ()<br />

ZEIGER AUF ZWISCHENSPEICHER<br />

R (CHR$ ()<br />

ZEIGER AUF ZWISCHENSPEICHER<br />

$ (CHR$ ()<br />

ZEIGER AUF ZWISCHENSPEICHER<br />

( (CHR$ ()<br />

ZEIGER AUF ZWISCHENSPEICHER<br />

ZEIGER AUF TASTENTEXT<br />

ZEIGER AUF ZWISCHENSPEICHER<br />

TEXTFLAG / RESTTEXTLÄNGE<br />

ASCII-ZEICHEN HOLEN<br />

HL ENTHÄLT ZEICHENWERT<br />

I INTEGER-WERT IN HL AUF­<br />

IBEREITEN IN ASCII NACH<br />

I ZWISCHENSPEICHER<br />

TEXTFLAG / RESTTEXTLÄNGE<br />

ZEIGER AUF TEXT-Z-SPEICHER<br />

EIN ZEICHEN ASCII-ZAHL<br />

GLEICH NULL ?<br />

ENDE ZAHL<br />

ZIFFER üBERTRAGEN<br />

ZEIGER AUF ASCII-ZAHL<br />

ZEIGER AUF TEXT-Z-SPEICHER<br />

UNTERSUCHEN. ZAHLENDE<br />

ZEIGER AUF TASTENTEXT<br />

AUF NÄCHSTES ZEICHEN<br />

CODE IM CHR$<br />

WEITERE ZEICHEN AUFBEREITEN<br />

(Klammer zu)<br />

TEXTENDEZEICHEN EINTRAGEN<br />

(Komma)<br />

CHR$ - WERT AUFBEREITEN<br />

Befehl<br />

17378 43E2<br />

17379<br />

17380<br />

17381 43E5<br />

17382<br />

17383 43E7<br />

17384 43E8<br />

17385<br />

17386<br />

17387 43EB<br />

17388<br />

17389<br />

17390 43EE<br />

17391 43EF<br />

17392<br />

17393<br />

17394 43F2<br />

17395<br />

17396<br />

17397 43F5<br />

17398<br />

17399<br />

17400 43F8<br />

17401<br />

17402 43FA<br />

17403<br />

17404<br />

17405 43FO<br />

17406 43FE<br />

17407 43FF<br />

17408 4400<br />

17409<br />

17410 4402<br />

17411<br />

17412<br />

17413 4405<br />

17414 4406<br />

17415<br />

17416<br />

17417 4409<br />

17418 440A<br />

17419<br />

17420<br />

17421 4400<br />

17422 440E<br />

17423 440F<br />

17424<br />

17425 4411<br />

17426<br />

17427 4413<br />

17428<br />

17429 4415<br />

17430 4416<br />

17431 4417<br />

17432<br />

17433 4419<br />

17434 441A<br />

17435 441B<br />

17436 441C<br />

17437 441D<br />

BASIC<br />

DEF t


SEITE 296<br />

BASIC 1Z-013B V1_0A<br />

BASIC 1Z-<br />

17438 441E 23<br />

17439 441F 10 FA<br />

17440<br />

17441 4421 E1<br />

17442 4422 FB<br />

17443 4423 C9<br />

INC HL<br />

DJNZ FA ~ 441BH<br />

POP HL<br />

EI<br />

RET<br />

ZEIGER AUF TASTENSPEICHER<br />

WEITERE ZEICHEN üBERTRAGEN<br />

PROGRAM<strong>MZ</strong>EIGER HOLEN<br />

NÄCHSTER BEFEHL<br />

Zeiger auf Zwischenspeicher für Funktionstastentext nach<br />

Tastennummer im Accu nach HL bereitstellen<br />

17444 4424 87<br />

17445 4425 87<br />

17446 4426 87<br />

17447 4427 87<br />

17448 4428 21 22 13<br />

17449<br />

17450<br />

17451 442B 85<br />

ADD A.A<br />

ADD A.A<br />

ADD A.A<br />

ADD A.A<br />

LD HL. 1322<br />

ADD Po.L<br />

LD L,A<br />

TASTENNUMMER * 2<br />

4<br />

8<br />

* 16<br />

ZEIGER AUF ANFANG<br />

SPEICHERBEREICHE FiJR<br />

FüNKTIONSTASTENTEXTE<br />

ZEIGER AUF RICHTIGEN<br />

SPEICHERBEREICH FüR<br />

17487 444F<br />

17488 4450<br />

17489<br />

17490<br />

17491 4453<br />

17492<br />

17493<br />

17494 4456<br />

17495 4457<br />

17496<br />

17497<br />

17498 445A<br />

17499<br />

17500 445C<br />

17501<br />

17502 445E<br />

1750:.<br />

17504 4460<br />

17505<br />

17506 4462<br />

17452 442C 6t=<br />

17453 442D 3E 00 LD A. 00 FUNKTIONTASTETEXT<br />

ERRECHNEN Befehl<br />

17454<br />

17455<br />

17456<br />

17457<br />

442F<br />

4430<br />

4431<br />

17458 4432<br />

17459 4433<br />

17460 4434<br />

17461 4435<br />

17462 4436<br />

17463 4437<br />

17464 4438<br />

17465 4439<br />

17466 443A<br />

8C<br />

67<br />

C9<br />

44<br />

45<br />

46<br />

20<br />

4B<br />

45<br />

59<br />

28<br />

00<br />

ADC A,H<br />

LD H,A<br />

RET<br />

D<br />

E<br />

F<br />

K<br />

E<br />

Y<br />

Space<br />

DEF KEY(<br />

Textende<br />

17467 443B 23 INC HL PROGRAM<strong>MZ</strong>EIGER<br />

17507 4463<br />

17508<br />

17509<br />

17510 4466<br />

17511 4467<br />

17512<br />

17513<br />

17514 446A<br />

17515<br />

17516 446C<br />

17517<br />

17518<br />

17519 446F<br />

12<br />

11 OF 11<br />

CD 30 00<br />

E1<br />

CD 14 54<br />

FE 3B<br />

28 DD<br />

FE 2C<br />

28 D9<br />

C9<br />

TEMPO<br />

LD


SEITE 298<br />

BASIC 1Z-013B V1.0A BASIC 1Z<br />

17541<br />

17542 4485 21 5D 00 LD HL. 0050<br />

• ZEIGER AUF STELLE FüR 17603<br />

17543<br />

• ZEICHEN/HINTERGRUNDFARBE<br />

17604<br />

17544<br />

17545 4488 22 33 45 17605<br />

LD (4533).HL<br />

MERKEN<br />

17606<br />

17546 17607<br />

17547<br />

17548<br />

17549<br />

448B<br />

448C<br />

E1<br />

18 40<br />

POP HL<br />

JR 40 .. 44CEH<br />

PROGRAM<strong>MZ</strong>EIGER HOLEN<br />

• ANGEGEBENE FARBEN<br />

17608<br />

17609<br />

17610<br />

44C4<br />

44C5<br />

44C8<br />

E1<br />

CD 14 54<br />

44CA C2 FE 20 JP NZ,<br />

17550 448~ CD 50 40 • AUSWERTEN<br />

17611<br />

CALL 4D50<br />

17551<br />

EIN-BYTE-WERT NACH DE/ACCU<br />

17612<br />

17552<br />

1761 3 44CD 23 INC HL<br />

17553<br />

17554 4491 FE 28 17614 44CE CD 14 54 CALL 5<br />

CP 28<br />

X-KOORDINATE MAXIMAL<br />

17615<br />

17555<br />

17556 4493 02 01 21 17616<br />

JP NC. 2101<br />

~ ZU GROSS.. DATENFEHLER<br />

17617 44D1 FE 2C CP 2C<br />

17557 17618<br />

17558<br />

17559 4496 32 35 45 17619 44D3 23<br />

INC HL<br />

LD (4535),A<br />

X-KOORDINATE MERKEN<br />

17620 4404 28 2B JR Z,<br />

17560 17621<br />

17561<br />

17562<br />

17563<br />

17564<br />

17565<br />

17566<br />

17567<br />

17568<br />

17569<br />

17570<br />

17571<br />

4499 CO 14 54 CALL 5414<br />

449C<br />

449E<br />

44Al<br />

44A2<br />

FE<br />

C2<br />

2C<br />

FE 20<br />

23<br />

CD 14 54<br />

CP<br />

JP<br />

2C<br />

NZ, 20FE<br />

INC HL<br />

CALL 5414<br />

'PRORAM<strong>MZ</strong>EIGER AUF<br />

• NÄCHSTES RELEVANTES<br />

• ZEICHEN STELLEN<br />

(Komma)<br />

SYNTAX - FEHLER<br />

PROGRAM<strong>MZ</strong>EIGER<br />

'PROGRAM<strong>MZ</strong>EIGER AUF<br />

17622<br />

17623<br />

17624<br />

17625<br />

17626<br />

17627<br />

17628<br />

17629<br />

17630<br />

1763 1<br />

17632<br />

44D6<br />

44D7<br />

44DA<br />

44DC<br />

44 DF<br />

44EO<br />

FE<br />

2C<br />

2B<br />

CD 50 40<br />

17572 • NÄCHSTES RELEVANTES 17633 44E1 17 RLA<br />

17573 44A5 FE 2C<br />

• ZEICHEN STELLEN<br />

1763 4 44E2 17<br />

RLA<br />

CP 2C<br />

17574<br />

(Komma)<br />

17635 44E3 E6 70<br />

AND A,<br />

17575 44A7 CA FE 20<br />

17636<br />

JP Z. 20FE<br />

17576<br />

• KEINE ZWEITE KOORDINATE<br />

17637 44E5 47<br />

LO B,A<br />

17577 • ANGEGEBEN .. SYNTAX FEHLER 1763 8 44E6 E5 PUSH H<br />

44AA CD 50 4D<br />

44E7 2A 3 3 45 LD HL,<br />

CALL 4D50<br />

EIN-BYTE-WERT NACH DE/ACCU<br />

17578<br />

17579<br />

17580<br />

17581 44AD FE 25<br />

17642<br />

CP 25<br />

17582<br />

Y-KOORDINATE MAXIMAL<br />

17643<br />

17583<br />

17584 44AF D2 01 21 JP NC. 2101<br />

ZU GROSS .. DATENFEHLER<br />

17585 17646<br />

44B2 32 36 45 LO (4536),A<br />

; Y-KOODINATE MERKEN<br />

17586<br />

17587<br />

17588<br />

17589 44B5<br />

17590 4486<br />

17591<br />

17592<br />

17593 4489<br />

17594 44BA<br />

1759~<br />

17596<br />

17597 448D<br />

17598<br />

17599 44BF<br />

"17600 44CO<br />

17601 44Cl<br />

17602<br />

E5<br />

2A 35 45<br />

D5<br />

CO CS 05<br />

16 D8<br />

19<br />

01<br />

22 33 45<br />

PU8H HL<br />

LO HL. (4535)<br />

PU8H DE<br />

CALL 05C5<br />

LO O. 08<br />

ADD HL.DE<br />

POP OE<br />

LD (4533),HL<br />

;<br />

PROGRAM<strong>MZ</strong>EIGER MERKEN<br />

X/Y - KOORDINATE<br />

REGISTER RETTEN<br />

'BILDSPEICHEROFFSET AUF<br />

'ANFANG ZEILE AUS KOORDI­<br />

• NATEN ERRECHNEN<br />

ANFANG FARBSPEICHER<br />

ZEIGER AUF FARBSPEICHER<br />

GERETTETES REGISTER HOLEN<br />

• ZEIGER AUF STELLE FüR<br />

• FARBE MERKEN<br />

17639<br />

17640<br />

17641<br />

44EA<br />

44E8<br />

FE<br />

02<br />

17<br />

17<br />

08<br />

7C<br />

FE 08<br />

01 21<br />

POP HL<br />

CALL 5<br />

CP<br />

2C<br />

DEC HL<br />

CALL 4<br />

CP<br />

JP<br />

RLA<br />

RLA<br />

LD<br />

CP<br />

08<br />

NC,<br />

A,H<br />

D8<br />

17644<br />

17645 44ED 30 08 JR NC,<br />

17647<br />

17648<br />

17649<br />

17650<br />

17651<br />

17652<br />

17653<br />

17654<br />

17655<br />

17656<br />

17657<br />

17658<br />

17659<br />

17660<br />

17661<br />

17662<br />

17663<br />

17664<br />

44EF<br />

44FO<br />

44F2<br />

44F3<br />

44F4<br />

44F5<br />

44F7<br />

44FA<br />

44FC<br />

44FO<br />

4500<br />

7E<br />

E6 8F<br />

BO<br />

77<br />

E1<br />

18<br />

CD<br />

E6<br />

BO<br />

CD<br />

E1<br />

OA<br />

EA<br />

8F<br />

F2<br />

00<br />

00<br />

LD A, (<br />

AND A,<br />

OR B<br />

LD (H<br />

POP HL<br />

JR OA<br />

CALL O<br />

AND A,<br />

OR B<br />

CALL O<br />

POP HL<br />

~<br />

~


17666<br />

17667<br />

17669<br />

17671<br />

17674<br />

17675<br />

17678<br />

17679<br />

17681<br />

17683<br />

17684<br />

17686<br />

17690<br />

17691<br />

17694<br />

17696<br />

17699<br />

17705<br />

17706<br />

17708<br />

17711<br />

17712<br />

17716<br />

IM FARBSPEICHER ?<br />

17720<br />

17721<br />

17722<br />

17724<br />

17725<br />

17727<br />

17729<br />

17730<br />

17735<br />

17736<br />

17738<br />

17740<br />

17741<br />

17743<br />

17745<br />

17747<br />

17748<br />

17750<br />

17752<br />

17754<br />

17755<br />

17757<br />

17759<br />

17762<br />

17763<br />

17766<br />

17767<br />

17769<br />

17770<br />

17772<br />

17773<br />

17774 <br />

Befehl<br />

CLOSE<br />

OR A<br />

RET<br />

JR ~Z;<br />

CALL 4<br />

2<br />

LD A. (IY<br />

36 lA LD (HU<br />

17758 455E FD E5 PUSH IY<br />

CALL 46<br />

FD 7E 00 LD A, ZEICHEN/HINTERGRUNDFARBE<br />

CD 66 lC CALL lC66 I üBERPRüFEN. OB NÄCHSTES<br />

HINTERGRUNDFARBE MERKEN<br />

IBEFEHLSENDEZEICHEN IST<br />

LD HL. (4533) 'ZEIGER AUF STELLE FüR<br />

JP NC. 2101 ZU GROSS ~ DATENFEHLER<br />

KEINE HINTERGRUNDFARBE<br />

PUSH HL PROGRAM<strong>MZ</strong>EIGER MERKEN<br />

'PROGRAMMBYTE GLEICH<br />

• NÄCHSTES RELEVANTES<br />

E6 07 AND A. 07 'FA~BWERT MASKIEREN<br />

IPROGRAM<strong>MZ</strong>EIGER AUF<br />

E6 F8 AND A. F8 ; 'HINTERGRUNDFARBE<br />

FARBWERT MAXIMAL<br />

I ZEICHEN STELLEN<br />

, (überflüssig)<br />

23 INC HL PROGRAM<strong>MZ</strong>EIGER<br />

H-BYTE ZEIGER<br />

'FARBE HOLEN<br />

SEITE 300 <br />

BASIC 1Z-013B V1.0A <br />

BO OR B PLUS NEUE HINTERGRUNDFARBE<br />

IZEICHEN IM FARBSPEICHER<br />

I VERGESSEN<br />

(Komma)<br />

JR NZ. 01 ~ 4509H KEIN KOMMA<br />

17695 451F 30 07 JR NC. 07 ~ 4528H JA<br />

17700 4524<br />

17701 4525 77<br />

17702 4526 El<br />

LD (HU ,A NEUEN FARBWERT MERKEN<br />

POP HL PROGRAM<strong>MZ</strong>EIGER HOLEN<br />

I ZEICHEN AUS FARB­<br />

NÄCHSTER BEFEHL<br />

17703 4527 C9 RET ~<br />

17704 4528 CD EA 00 CALL OOEA<br />

17707 452B E6 F8<br />

AND A. F8 IHINTERGRUNDFARBE<br />

BO OR B PLUS NEUE FARBWERT<br />

I VERGESSEN<br />

, ABLEGEN<br />

17709 452D<br />

17710 452E CO F2 00 CALL 00F2<br />

17713 4531 El POP HL PROGRAM<strong>MZ</strong>EIGER HOLEN<br />

X-KOORDINATE COLOR<br />

17714 4532 C9<br />

RET NÄCHSTER BEFEHL<br />

17715 4533 00 00 'ZEIGER AUF STELLE<br />

I FüR FARBE<br />

17717 4535 00<br />

17718 4536 00 Y-KOORDINATE COLOR<br />

17665 4501 CD 14 54 CALL 5414<br />

17693 451D FE 08 CP D8<br />

17692 451C 7C LD A.H<br />

17687 4517 47 LD B.A<br />

17680 4510 FE 08 CP 08<br />

17668 4504 FE 2C CP 2C<br />

17676 450C C8 RET Z<br />

17689 4519 2A 33 45<br />

17682 4512 D2 01 21<br />

17670 4506 20 01<br />

17697 4521 7E<br />

17688 4518 E5<br />

17698 4522<br />

17685 4515<br />

17672 4508<br />

17673 4509


SEITE 302 <br />

BASIC 1Z-013B V1_0A <br />

17775 456F El POP HL PROGRAM<strong>MZ</strong>EIGER HOLEN <br />

17776 4570 C9 RET NÄCHSTER BEFEHL <br />

ein Zeichen aus Dateipuffer bereitstellen<br />

17777 4571 E5 PUSH HL I REGISTER RETTEN <br />

17778 4572 C5 PUSH BC I <br />

17779 4573 CD B5 45 CALL 45B5 I üBERPRüFEN, OB NOCH <br />

17780 I ZEICHEN IM PUFFER SIND <br />

17781 <br />

17782 4576 DA 89 45 JP C, 4589 INEIN ~ FEHLER 63 <br />

17783 I OUT OF FILE ERROR <br />

17784 <br />

17785 4579 CD 96 46 CALL 4696 I ZEIGER AUF DATEI-PUFFER <br />

17786 lAUF NÄCHSTES ZEICHEN <br />

17787 I BERE I TSTELLEN <br />

17788 457C 7E LD A, (HL) ZEICHEN AUS PUFFER HOLEN <br />

17789 457D FD 34 OB INC (IY+081 OFFSET AUF PUFFER PLUS 1 <br />

17790 <br />

17791 <br />

17792 4580 20 04 JR NZ, 04 ~ 4586H NOCH ZEICHEN IM PUFFER <br />

17793 <br />

17794 4582 FD 36 OC 00 LD (IY+OC1, 00 CODE PUFFER LEER <br />

17795 <br />

17796 <br />

17797 <br />

17798 4586 Cl POP BC I GERETTETE REGISTER HOLEN <br />

17799 4587 El POP HL I <br />

17800 4588 C9 RET <br />

17801 4589 3E 3F LD A, 3F I FEHLER 63 <br />

17802 laUT OF FILE ERROR <br />

17803 458B C3 08 21 JP 2108 FEHLER BEHANDELN <br />

17804 <br />

17805 <br />

17806 458E 04 DATEI-TYP-FLAG<br />

bei <strong>MZ</strong>-80 K - Datei überprüfe.n, ob noch Zeichen im Puffer sind<br />

17807 458F FD 7E OC LD A, (IY+OCl FLAG PUFFER LEER <br />

17808 <br />

17809 <br />

17810 4592 B7 OR A ; GESETZT ? <br />

17811 4593 20 18 JR NZ, 18 ~ 45ADH NaCH DATEN IN PUFFER <br />

17812 <br />

17813 4595 01 90 00 LD BC, 0090 OFFSET ZUR PUFFERSTELLE <br />

17814 <br />

17815 <br />

17816 4598 09 ADD HL,BC ZEIGER AUF PUFFERSTELLE <br />

17817 4599 01 80 00 LD BC, 0080 ; BLOCKLÄNGE BEI <strong>MZ</strong>-80 K <br />

17818 <br />

17819 <br />

17820 459C CD 4F 47 CALL 474F ITEXTAUSGABEFLAG FüR <br />

17821 I BAND SETZEN <br />

17822 <br />

17823 459F CD 2A 00 CALL 002A I NÄCHSTEN BLOCK VOM BAND <br />

17824 I LESEN <br />

BASIC 1Z-<br />

17825 <br />

17826 45A2 DA 7E 47 JP C, 47<br />

17827 <br />

17828 <br />

1782945A5 FD 36 OB 80 LD (IY+O<br />

17830 <br />

17831 <br />

17832 <br />

17833 45A9 FD 36 OC 01 LD (IY+C<br />

17834 <br />

17835 <br />

17836 <br />

17837 45AD CD 96 46 CALL 46<br />

17838 <br />

17839 <br />

17840 45BO 7E LD A, (H<br />

17841 45B1 FE FF CP FF<br />

17842 <br />

17843 4583 18 3C JR 3C<br />

17844 <br />

übeprUfen, ob noch Zeichen<br />

17845 4585 C5 <br />

PUSH BC<br />

17846 45B6 D5 PUSH DE<br />

17847 4587 E5 PUSH HL<br />

17848 45B8 CD 26 46 CALL 46<br />

17849 <br />

17850 <br />

17851 45 BB FD E5 PUSH IY<br />

17852 <br />

17853 45BD E1 POP HL<br />

17854 45BE 3 A 8E 45 LD A, (4<br />

17855 <br />

17856 <br />

17857 45C1 FE 03 CP 03<br />

17858 <br />

17859 45C3 28 CA JR Z, C<br />

17860 <br />

17861 45C5 01 OE 00 LD BC.<br />

17862 <br />

17863 <br />

17864 45C8 09 ADD HL,<br />

17865 45C9 FD 7E OC LD A, (I<br />

17866 <br />

17867 <br />

17868 45CC B7 OR A<br />

17869 45CD 20 00 JR NZ,<br />

17870 <br />

17871 45CF ES PU6H HL<br />

17872 45DO CD Fa 45 CAL~ 4~<br />

17873 <br />

17874 <br />

17875 45D3 E1 POP- HL<br />

17876 4504 FD 36 08 00 LP CIY+<br />

17877 <br />

17878 <br />

17879 <br />

17880 45D8 FD 3 6 oe 01 LD (IY+<br />

17881 <br />

17882


SEITE 304<br />

BASIC 1Z-013B V1.0A<br />

BASIC 1Z-0<br />

17883<br />

17884<br />

17885<br />

17886<br />

17887<br />

17888<br />

17889<br />

17890<br />

17891<br />

17892<br />

17893<br />

17894<br />

17895<br />

17896<br />

17897<br />

17898<br />

17899<br />

17900<br />

17901<br />

17902<br />

45DC<br />

45DD<br />

45DE<br />

45DF<br />

45EO<br />

45El<br />

45E3<br />

45E6<br />

45E7<br />

45E8<br />

45E9<br />

45EA<br />

45EB<br />

17903<br />

17904 45FO<br />

17905 45Fl<br />

17906 45F2<br />

17907 45F3<br />

17908 45F4<br />

17909 45F5<br />

7E<br />

23<br />

A6<br />

3C<br />

B7<br />

20 OF<br />

01<br />

09<br />

7E<br />

2B<br />

OD<br />

B7<br />

28<br />

00<br />

FA<br />

LD A, (HU<br />

INC HL<br />

AND (HU<br />

INC A<br />

OR<br />

I BLOCK ZÄHLER<br />

• 65535 ?<br />

GLEICH<br />

17937<br />

17938<br />

17939<br />

17940<br />

17941<br />

4613<br />

4614<br />

F1<br />

18 E9<br />

A<br />

Blockzähler plus eins<br />

JR NZ, A<br />

OF + 45F2H • NEIN + NICHT LETZTER BLOCK 01 LD BC, 0100<br />

ADD HL,BC<br />

LD A, (HU<br />

DEC HL<br />

DEC C<br />

OR A<br />

JR Z, FA + 45E7H<br />

PUFFERLÄNGE<br />

ZEIGER AUF ENDE PUFFER<br />

EIN ZEICHEN HOLEN<br />

ZEIGER AUF PUFFER<br />

ZÄHLER ZEICHEN IM PUFFER<br />

ZEICHEN GLEICH NULL ?<br />

ZEICHEN IM PUFFER SUCHEN<br />

17942<br />

1794.3<br />

17944<br />

17945<br />

17946<br />

17947<br />

17948<br />

17949<br />

4616<br />

4619<br />

461A<br />

461D<br />

FD<br />

CO<br />

FD<br />

C9<br />

34 OE<br />

34 OF<br />

POP AF<br />

JR E9 .;.<br />

45ED FD 7E OB LD A, (IY+OB) OFFSET AUF PUFFER letzten Block. auf Band schre<br />

B9<br />

3F<br />

Ei<br />

Dl<br />

Cl<br />

C9<br />

CP C<br />

CCF<br />

POP HL<br />

POP DE<br />

POP BC<br />

RET<br />

nächsten Block vom Band lesen<br />

ZEICHEN IM<br />

I GERETTETE<br />

17910 45F6 01 02 01 LD BC, 0102 BLOCKLÄNGE<br />

17911<br />

17912<br />

17913 45F9<br />

17914<br />

17915<br />

17916 45FC<br />

17917<br />

17918<br />

17919 45FF<br />

17920<br />

17921<br />

17922 4602<br />

CD<br />

CD<br />

DA<br />

C9<br />

4F<br />

2A<br />

7E<br />

47<br />

00<br />

47<br />

CALL 474F<br />

CALL 002A<br />

JP C, 477E<br />

RET<br />

vollen Puffer auf Band schreiben<br />

PUFFER<br />

REGISTER HOLEN<br />

'TEXTAUSGABEFLAG FüR<br />

• BAND SETZEN<br />

BLOCK VOM BAND LESEN<br />

FEHLER AUFGETRETEN<br />

17950<br />

17951<br />

17952<br />

17953<br />

17954<br />

17955<br />

17956<br />

17957<br />

461E<br />

4620<br />

4621<br />

4622<br />

4623<br />

4624<br />

17958 4626<br />

17959 4627<br />

17960<br />

17961<br />

17962 462A<br />

17963<br />

17964<br />

17965 '462D<br />

17966<br />

17967 462F<br />

17968<br />

17969<br />

17970 4632<br />

3E<br />

77<br />

23<br />

77<br />

2B<br />

18<br />

FF<br />

DD<br />

INC<br />

RET<br />

INC<br />

RET<br />

(IY+<br />

NZ<br />

(IY+<br />

LD A, FF<br />

LD (HU,<br />

INC HL<br />

LD (HU ,<br />

DEC HL<br />

JR DD +<br />

Überprüfen, ob Band-Datei zu<br />

F5<br />

CD<br />

FD<br />

FE<br />

C2<br />

45<br />

7E<br />

49<br />

40<br />

46<br />

01<br />

46<br />

PUSH AF<br />

CALL 46<br />

LD A, (IY<br />

CP 49<br />

JP NZ,<br />

Fl<br />

POP AF<br />

17971 4633 C9 RET<br />

17923<br />

17924 4603 01 02 01 LD BC, 0102 BLOCKLÄNGE überprüfen, ob Banddatei zu<br />

17925<br />

17926 4606<br />

17927<br />

17928<br />

17929 4609<br />

17930<br />

17931<br />

17932 460C<br />

17933 460D<br />

17934<br />

17935<br />

17936 4610<br />

CD<br />

CD<br />

F5<br />

CD<br />

CD<br />

4F 47<br />

24 00<br />

58 47<br />

16 46<br />

CALL<br />

CALL<br />

PUSH<br />

CALL<br />

CALL<br />

474F<br />

0024<br />

AF<br />

4758<br />

4616<br />

;<br />

;<br />

•<br />

•<br />

'TEXTAUSGABEFLAG FüR<br />

• BAND SETZEN<br />

BLOCK AUF BAND SCHREIBEN<br />

ERGEBNISFLAG MERKEN<br />

PUFFER LöSCHEN<br />

BLOCK ZÄHLER PLUS EINS<br />

17972 4634<br />

17973 4635<br />

17974<br />

17975<br />

17976 4638<br />

17977<br />

17978<br />

17979 463B<br />

17980<br />

17981 463D<br />

17982<br />

F5<br />

CD<br />

FD<br />

FE<br />

CA<br />

45 46<br />

7E 01<br />

4F<br />

32 46<br />

PUSH AF<br />

CALL 46<br />

LD A, (I<br />

CP 4F<br />

JP Z, 4<br />

•I<br />

I<br />

I


17983<br />

17987<br />

17988<br />

17990<br />

17991<br />

17993 4649 3E 18 LD A. 18<br />

17994<br />

17997<br />

17998 464E CD 37 45 CALL 4537<br />

17999<br />

18000<br />

18001 4651 LD A. (IY+OD) , BAND-CURSOR-ZÄHLER HOLEN<br />

18002<br />

18003<br />

18005 4655 CD 34 46 CALL 4634<br />

18006<br />

18007<br />

18011<br />

18012<br />

18014<br />

18015<br />

18017<br />

laQ~O<br />

1802 ~<br />

18023<br />

18Q~5<br />

18027<br />

18028<br />

3E FF<br />

I IST<br />

18037<br />

18042<br />

18051<br />

18053<br />

18057 <br />

18063<br />

18071<br />

18074<br />

18076<br />

18079<br />

IY<br />

18075 469B 06 00 LD B. 00<br />

18081 46Al 09 ADD HL.B<br />

18077 469D 09 ADD HL.B<br />

18078 469E FD 4E OB LD C. (IY<br />

ASCII - Zeichen im Accu an Ba<br />

18045 467D 77 LD (HU.A<br />

INC (IY+O<br />

SEITE 306<br />

BASIC 1Z-013B<br />

V1_0A BASIC 1Z-0<br />

LO A. OD<br />

18032 4670 D5 PUSH DE<br />

18033 4671 C5 PUSH BC<br />

18034 4672 F5 PUSH AF<br />

18031 466F E5 PUSH HL<br />

17984 4640 3E 18 18029 4660 3E OD<br />

LD A. 18<br />

17985<br />

FEHLER 24 LESEFEHLER 77 18030<br />

17986 4642 C3 08 21 JP 2108 FEHLER BEHANDELN<br />

UberprUfen. ob Band -<br />

Datei eröffnet ist<br />

17989 4645 CD 37 45 CALL 4537 18035 4673 CD 34 46 CALL 4634<br />

18046 467E F5 PUSH AF<br />

18047 467F FO 34 OB INC (IY+O<br />

I ABFRAGE. OB BAND-DATEI<br />

• ERöFFNET IST 18036<br />

17992 4648 CO RET NZ IST ERöFFNET 18038 4676 FD 34 OD<br />

FEHLER 24 LESEFEHLER 77 18039<br />

17995 464B C3 08 21 18040<br />

JP 2108<br />

17996<br />

; FEHLER BEHANDELN 1804 1 4679 CD 96 46 CALL 4696<br />

CALL 475<br />

CD 03 46 CALL 460<br />

18058 468A 09 AOO HL.B<br />

Zeiger auf Puffer auf aktue<br />

JR NZ. 0<br />

18054 4686 El POP HL<br />

18055 4687 01 OE 00 LD BC. O<br />

18056 <br />

OE 10 LD C. 1<br />

FO E5 PUSH IY<br />

18072 4698 EI POP HL<br />

18068 4694 E1 POP HL<br />

Cl POP BC<br />

Fl POP AF<br />

18043<br />

18044 467C F1 POP AF<br />

18050 4682 20 OD<br />

18052 4684<br />

Aktuelle Position auf Bandpuffer holen<br />

FD 7E 00<br />

18004 4654 C9 RET<br />

I ZEIGER AUF DATEI-FLAGS 18048<br />

I BERE I TSTELLEN 18049<br />

Ausgabe auf Band auf nächsten 8ter - Tab<br />

• 'UBERPRUFEN. OB BAND­ 18059 468B<br />

'DATEI ZUM SCHREIBEN 18060<br />

I ERöFFNET IST 18061<br />

19008 4658 3E 20 LD A. 20<br />

18009<br />

I 9pac:e 18062 468E CD 58 47<br />

18066 4692<br />

18065 4691<br />

18010 465A CD cF 46 CALL 466F , I ZEICHEN IM ACCU AN 18064<br />

'BAND-DATEI AUSGEBEN<br />

~e013 46~D FD 7E 00 LD A. (IY+OD) • BAND-CURSOR HOLEN 18067 4693 D1 POP DE<br />

18070 4696 FD E5 PUSH<br />

18082 46A2 C9 RET<br />

18069 4695 C9 RET<br />

18073 4699<br />

16016 4660 E6 07 AND A. 07 , AUF 8ter TAB SETZEN<br />

19018 4662 Ce RET Z • STEHT AUF TAB-POSITION<br />

leOl~ 4663 18 F3 JR F:5 .. 4658H , WEITER Spac:•• AUSGEBEN<br />

Z ~il~nvorsc:h~b ~n e.nd ~uMg.b.n<br />

lS021 466~ CD ~4 46 CALL 4634<br />

180~4 4669 1.,0 A. FF<br />

18026 466A FD 77 00 LD ( IY+OO).A<br />

IOBERPROFEN. OB BAND-DATEI<br />

I ZUM SCHREIBEN ER~FFNET<br />

VORGABE FUR BAND-CURSOR<br />

BAND-CURSOR MERKEN 18080


SEITE 308<br />

BASTe 1Z-013B V1.0A<br />

8efeh l WOPEN<br />

1 80R~ 46A3<br />

18084<br />

18085 46A5<br />

18086<br />

18087<br />

18088 46A8<br />

18089<br />

18090<br />

18091 46A8<br />

3E<br />

32<br />

CD<br />

E5<br />

04<br />

FC<br />

2C<br />

OF<br />

17<br />

LD A, 04<br />

LD (OFFC),A<br />

CALL 172C<br />

PUSH HL<br />

CODE <strong>MZ</strong>-700-DATEI<br />

DATEI-TYP-FLAG<br />

I DATEI KENNUNG AUS DATEN<br />

I (HL) AUFBERE I TEN<br />

PROGRAM<strong>MZ</strong>EIGER MERKEN<br />

18092 46AC CD 37 45 CALL 4537 I ABFRAGE. OB BAND-DATEI<br />

18093<br />

IERöFFNET IST<br />

18094<br />

18095<br />

18096<br />

18097<br />

18098<br />

18099<br />

18100<br />

18101<br />

18102<br />

18103<br />

18104<br />

18105<br />

18106<br />

18107<br />

18108<br />

18109<br />

18110<br />

18111<br />

18112<br />

46AF<br />

4681<br />

46B4<br />

46B8<br />

46BB<br />

46BC<br />

46CO<br />

20<br />

CD<br />

FD<br />

CD<br />

EI<br />

FD<br />

C9<br />

7C<br />

64<br />

36<br />

C4<br />

36<br />

47<br />

01<br />

46<br />

00<br />

4F<br />

01<br />

JR NZ. 7C + 472DH<br />

CALL 4764<br />

LD (IY+Ol). 4F<br />

CALL 46C4<br />

POP HL<br />

LD (IY+OO), 01<br />

RET<br />

I SCHON ERöFFNET ~<br />

I FEHLER 49<br />

IDATEIFLAGS UND PUFFER<br />

I LöSCHEN<br />

10 (SCHREIBEN)<br />

I ALS DATEI-RICHTUNGS-FLAG<br />

I DATEI KENNUNG AUF<br />

I BAND SCHRE I BEN<br />

PROGRAM<strong>MZ</strong>EIGER HOLEN<br />

CODE DATEI ERöFFNET<br />

Programmnamen bereitstellen und Kennung schreiben"<br />

1811 3<br />

18114<br />

18115<br />

18116<br />

18117<br />

18118<br />

18119<br />

18120<br />

18121<br />

18122<br />

18123<br />

18124<br />

18125<br />

18126<br />

18127<br />

18128<br />

18129<br />

18130<br />

18131<br />

46Cl<br />

46C4<br />

46C5<br />

46C8<br />

46CB<br />

46CE<br />

4601<br />

CD<br />

E5<br />

21<br />

01<br />

CD<br />

CD<br />

DA<br />

2C<br />

FC<br />

80<br />

4F<br />

21<br />

7E<br />

17<br />

OF<br />

00<br />

47<br />

00<br />

47<br />

CALL 172C<br />

PUSH HL<br />

LD HL, OFFC<br />

18132 4604 EI<br />

POP HL<br />

18133 4605 C9 RET<br />

LD BC, 0080<br />

CALL 474F<br />

CALL 0021<br />

JP C. 477E<br />

I DATE I KENNUNG AUS DATEN<br />

I (HU AUFBEREITEN<br />

PROGRAM<strong>MZ</strong>EIGER MERKEN<br />

I ZEIGER AUF ZWISCHEN­<br />

I SPEICHER FüR KENNUNG<br />

LÄNGE PROGRAMMKENNUNG<br />

•<br />

ITEXTAUSGABEFLAG FüR<br />

I BAND SETZEN<br />

KENNUNG AUF BAND SCHREIBEN<br />

FEHLER AUFGETRETEN<br />

PROGRAM<strong>MZ</strong>EIGER HOLEN<br />

BASIC 1Z-0<br />

Datei-Namen bereitstellen und<br />

18 134<br />

18135<br />

18136<br />

18137<br />

18138<br />

18139<br />

18140<br />

18141<br />

18142<br />

46D6<br />

46D9<br />

46DA<br />

46DD<br />

46DE<br />

CD<br />

E5<br />

CD<br />

EI<br />

C9<br />

2C<br />

08<br />

17<br />

47<br />

CALL 172C<br />

PUSH HL<br />

CALL 4708<br />

POP HL<br />

RET<br />

Befehl ROPEN<br />

18143 46DF<br />

18144<br />

1814546El<br />

18 146<br />

18147<br />

18148 46E4<br />

18149<br />

18150<br />

18151 46E7<br />

181 52 46E8<br />

181 53<br />

181 54<br />

18 155 46EB<br />

18156<br />

18157 46ED<br />

18158<br />

18159<br />

18160 46FO<br />

181 61<br />

181 62<br />

18163<br />

181 64<br />

18165<br />

18166<br />

18167<br />

18168<br />

18169<br />

18170<br />

18171<br />

18172<br />

18173<br />

18174<br />

18175<br />

18176<br />

181 77<br />

18178<br />

18179<br />

18180<br />

181 81<br />

181 82<br />

IB183<br />

46F4<br />

46F7<br />

46FA<br />

46F"D<br />

46FF<br />

4701<br />

4703<br />

4706<br />

3E<br />

32<br />

CD<br />

E5<br />

CD<br />

20<br />

CD<br />

FD<br />

CD<br />

3A<br />

32<br />

FE<br />

28<br />

FE<br />

C2<br />

18<br />

00<br />

FC<br />

2C<br />

37<br />

40<br />

64<br />

36<br />

08<br />

FC<br />

8E<br />

04<br />

BA<br />

03<br />

CC<br />

B3<br />

OF<br />

17<br />

45<br />

47<br />

0149<br />

47<br />

OF<br />

45<br />

41<br />

LD A, 00<br />

LD (OFFC)<br />

CALL 172C<br />

PUSH HL<br />

CALL 4537<br />

JR NZ, 40<br />

CALL 4764<br />

LD (IY+O<br />

CALL 4708<br />

LD A, (OF~<br />

LD (458E)<br />

CP 04<br />

JR Z, BA<br />

CP 03<br />

JP NZ, 41<br />

JR B3 +


SEITE 310 <br />

BASIC 1Z-013B V1_0A <br />

richtige Kennung nach vorgegebenem Namen vom Band lesen<br />

18184 4708 21 OF 11 LD HL. 110F I ZEIGER AUF ZWISCHEN­<br />

18185 I SPEICHER FüR KENNUNG<br />

18186<br />

18187 470B 01 80 00 LD BC. 0080 ; LÄNGE KENNUNG<br />

18188<br />

18189<br />

18190 470E CD 4F 47 CALL 474F ITEXTAUSGABEFLAG FüR<br />

18191 I BAND SETZEN<br />

18192<br />

18193 4711 CD 27 00 CALL 0027 KENNUNG VON BAND LESEN<br />

18194<br />

18195<br />

18196 4714 38 68 JR C. 68 + 477EH FEHLER AUFGETRETEN<br />

18197<br />

18198 4716 11 OE 18 LD DE. 180E TEXT Found<br />

18199<br />

18200<br />

18201 4719 CD 3F 47 CALL 473F I IN DIREKTER PROGRAMM­<br />

18202 I IERUNG + Found UND<br />

18203 I FILE-NAMEN AUSGEBEN<br />

18204 471C CD EE 16 CALL 16EE. I VORGEGEBENEM FILE-NAMEN<br />

18205 IMIT GELESENEM VERGLEICHEN<br />

18206<br />

18207 471F 20 E7 JR NZ. E7 + 4708H I FALSCHER NAME +<br />

18208 I NÄCHSTE KENNUNG LESEN<br />

18209 4721 21 OF 11 LD HL. 110F I ZEIGER AUF GELESENE<br />

18210 I KENNUNG<br />

18211<br />

18212 4724 11 FC OF LD DE. OFFC I ZEIGER AUF SPEICHER<br />

18213 I FüR KENNUNG<br />

18214<br />

18215 4727 01 80 00 LD BC. 0080 LÄNGE KENN UNG<br />

18216<br />

18217<br />

18218 472A ED BO LDIR KENNUNG MERKEN<br />

18219<br />

18220 472C C9 RET<br />

18221 472D 3E 2B LD A. 2B • FEHLER 49<br />

18222<br />

18223 472F C3 08 21 JP 2108 FEHLER BEHANDELN<br />

18224<br />

18225<br />

Na men der geöffneten Datei merken<br />

18226 4732 11 FC OF LD DE. OFFe I ZEIGER AUF SPEICHER<br />

18227 I FüR KENNUNG<br />

18228<br />

18229 4735 01 20 00 LD BC. 0020 LÄNGE DATEIKENNUNGSDATEN<br />

18230<br />

18231<br />

18232 4738 E5 PUSH HL • ZEIGER AUF TEXT<br />

18233 4739 ED BO LDIR ; I DATEN NACH SPEICHER<br />

1823 4 I üBERTRAGEN<br />

18235 473B EI POP HL ZEIGER AUF TEXT<br />

18236 473C C3 BB 46 JP 46B8 DATEI ERöFFNET MERKEN<br />

18237<br />

BASIC 1Z-0<br />

18238<br />

in direkter Programmierung Te<br />

18239 473F<br />

18240 <br />

18241<br />

CD 46 47<br />

18242 4742 CC C8 16<br />

18243 <br />

18244 <br />

18245 4745 C9<br />

CALL 4746<br />

CALL Z. 1<br />

RET<br />

testen. ob in direkter Progra<br />

18246 4746 E5<br />

18247 4747 2A E6 38 <br />

18248 <br />

18249 <br />

PUSH HL<br />

LD HL. (3<br />

18250 474A 23<br />

INC HL<br />

18251 474B 7C<br />

LD A.H<br />

18252 474C 85<br />

OR L<br />

18253 474D E1<br />

POP HL<br />

18254 474E C9 RET<br />

Textausgabeflag fUr Band set<br />

(im Programm werden Texte wi<br />

18255 474F F5<br />

18256 4750 CD 46 47<br />

18257<br />

18258<br />

18259 4753 32 50 00 LD<br />

18260<br />

18261<br />

18262 4756 Fl<br />

18263 4757 C9<br />

PUSH AF<br />

CALL 474<br />

POP AF<br />

RET<br />


SEITE 312<br />

BASIC 1Z-013B V1.0A<br />

Dateiflags und<br />

Band-Puffer löschen<br />

18276 4764<br />

18277 4765<br />

18278 4766<br />

18279<br />

18280 4768<br />

18281 4769<br />

18282<br />

18283 476B<br />

18284 476C<br />

18285 476D<br />

18286 476E<br />

18287<br />

18288 4770<br />

18289<br />

18290 4772<br />

18291 4773<br />

18292 4774<br />

18293<br />

18294 4776<br />

18295 4777<br />

18296 4778<br />

E5<br />

C5<br />

FD E5<br />

E1<br />

06 10<br />

AF<br />

77<br />

23<br />

10 FC<br />

06 00<br />

77<br />

23<br />

10 FC<br />

Cl<br />

E1<br />

C9<br />

PUSH HL<br />

PUSH BC<br />

PUSH IY<br />

POP HL<br />

LD B. 10<br />

XOR A<br />

LD (HL>. A<br />

INC HL<br />

DJNZ FC + 476CH<br />

LD B. 00<br />

LD (HL> ,A<br />

INC HL<br />

DJNZ FC + 4772H<br />

POP BC<br />

POP HL<br />

RET<br />

I REGISTER RETTEN<br />

I ZEIGER AUF DATEI-FLAGS<br />

ANZAHL FLAGS<br />

ACCU AUF NULL<br />

I DATE I FLAGS LöSCHEN<br />

256 ZEICHEN (?ufferlänge)<br />

IBAND-DATEI-PUFFER<br />

I LöSCHEN<br />

I GERETTETE REGISTER HOLEN<br />

Bandfehler behandeln<br />

18297 4779 F5<br />

18298 477A CD 39 22<br />

18299<br />

18300<br />

18301 477D F1<br />

18302 477E 08<br />

18303 477F AF<br />

18304 4780 32 19 18<br />

18305<br />

18306<br />

18307 4783 CD 37 45<br />

18308<br />

18309<br />

18310 4786 FD 36 00 00<br />

18311<br />

18312<br />

18313<br />

18314 478A 08<br />

18315 478B FE 02<br />

18316<br />

18317 478D C2 69 20<br />

18318<br />

18319<br />

18320 4790 3E 18<br />

18321<br />

18322 4792 C3 08 21<br />

18323<br />

18324<br />

PUSH AF<br />

CALL 2239<br />

POP AF<br />

EX AF,AF'<br />

XOR A<br />

LD (1819),A<br />

CALL 4537<br />

LD


SEITE 314<br />

BASIC 1Z-013B V1.0A<br />

BASIC 1Z-<br />

18385<br />

Text<br />

Wenn<br />

(OE)<br />

ja ..<br />

auf Basic - Befehl<br />

in richtigen Zwisc<br />

18386<br />

18387<br />

18388<br />

18389<br />

18390<br />

18391<br />

18392<br />

18393<br />

18394<br />

18395<br />

18396<br />

18397<br />

18398<br />

18399<br />

18400<br />

18401<br />

18402<br />

18403<br />

18404<br />

18405<br />

18406<br />

18407<br />

18408<br />

18409<br />

47D2<br />

47D4<br />

47D6<br />

47D8<br />

47DB<br />

47DD<br />

47DE<br />

47DF<br />

47EO<br />

47E1<br />

47E4<br />

47E6<br />

18410 47EA<br />

18411 47EB<br />

18412 47EC<br />

18413<br />

18414<br />

18415 47EF<br />

18416<br />

18417 47Fl<br />

18418<br />

18419<br />

18420 47F4<br />

18421 47F5<br />

18422<br />

18423<br />

18424 47F8<br />

18425<br />

18426<br />

18427 47FB<br />

18428<br />

18429<br />

18430<br />

18431<br />

18432<br />

18433<br />

36 E4<br />

18 02<br />

36 8F<br />

CD 37<br />

18 Cl<br />

77<br />

Cl<br />

Dl<br />

C9<br />

CD 2B<br />

28 F7<br />

18 B6<br />

49<br />

LD (HU. E4<br />

JR 02 .. 47D8H<br />

LD (HU. 8F<br />

CALL 4937<br />

JR Cl .. 479EH ;<br />

LD (HU. A<br />

POP BC<br />

POP OE<br />

RET<br />

49 CALL 4928<br />

JR Z. F7 .. 47DDH<br />

JR B6 .. 479EH<br />

~ (Zwischencode)<br />

ZEIGER UND ZÄHLER CORR.<br />

PRINT (Zwischencode)<br />

(ZEIGER UND ZÄHLER<br />

( CORRIGIEREN<br />

WEITER UMSETZEN<br />

ZEILENENDE EINTRAGEN<br />

• GERETTETES REGISTER HOLEN<br />

ZEIGER AUF ASCII-TEXT<br />

I TEXT BIS ZUM 2ten 11<br />

I üBERTRAGEN<br />

IZEILENENDE .. MERKEN UND<br />

I GERETTETE REGISTER HOLEN<br />

WEITER UMSETZEN<br />

18434 4802<br />

18435 4803<br />

18436<br />

18437<br />

18438 4806<br />

1843 9<br />

18440<br />

18441 4809<br />

18442<br />

18443 480B<br />

18444<br />

18445<br />

18446 480E<br />

18447<br />

18448<br />

18449 4811<br />

18450<br />

18451 481 3<br />

18452<br />

18453 4815<br />

18454<br />

18455<br />

18456 4818<br />

18457<br />

C5<br />

01 F5 2A<br />

CD F4 48<br />

30 39<br />

01 54 2C<br />

CD<br />

OE<br />

F4<br />

FE<br />

30 OA<br />

01 A9 30<br />

CD F4 48<br />

PUSH BC<br />

LD BC. 2<br />

CALL 48F<br />

JR NC. 3<br />

LD BC. 2<br />

48 CALL 48F<br />

LD C. FE<br />

JR NC. O<br />

LD BC.<br />

CALL 48<br />

47E8 18 B4 JR 84 .. 479EH WEITER üBERSETZEN 18458<br />

18459 481B OE FF LD C. F<br />

47FD<br />

4800<br />

Cl<br />

lA<br />

CD C7<br />

38 OC<br />

CD 36<br />

1A<br />

CD BE<br />

DA 9E<br />

18 F4<br />

CD 36<br />

18 9C<br />

3A<br />

49<br />

3A<br />

47<br />

POP BC<br />

LD A.


SEITE 316<br />

BASIC 1Z-013B V1_0A<br />

BASIC 1Z-<br />

18493 18551<br />

18552<br />

18494<br />

18495<br />

18496<br />

18497<br />

18498<br />

18499<br />

483E<br />

4841<br />

18500 4844<br />

18501 4845<br />

CO<br />

C3<br />

78<br />

Cl<br />

36<br />

OE<br />

49<br />

48<br />

CALL 4936<br />

JP 48DE<br />

LD A.B<br />

POP BC<br />

I ZEICHEN IM ACCU FüR<br />

I Z-CODE-ZEILE MERKEN<br />

IUNO ZEIGER CORRIGIEREN<br />

I TEXT BIS ENDE BEFEHL<br />

lOHNE ZU üBERSETZEN<br />

I üBERNEHMEN<br />

ZWISCHENCODE MERKEN<br />

ZEILENLÄNGE HOLEN<br />

18502 4846 CD 38 49 CALL 4938 I ZWISCHENCODE IM ACCU<br />

18503<br />

I MERKEN UND ZEIGER<br />

18504<br />

ICORRIGIEREN<br />

18505 4849<br />

18506<br />

18507 484B<br />

18508<br />

18509<br />

18510 484E<br />

18511<br />

18512 4850<br />

18513'<br />

18514<br />

18515 4853<br />

18516<br />

18517 4855<br />

18518<br />

18519 4857<br />

18520<br />

18521 4859<br />

18522<br />

18523 485B<br />

18524<br />

18525 4850<br />

18526<br />

18527 485F<br />

18528<br />

FE<br />

CA<br />

FE<br />

CA<br />

FE<br />

28<br />

FE<br />

28<br />

FE<br />

30<br />

FE<br />

97<br />

OE<br />

94<br />

OE<br />

C2<br />

70<br />

E2<br />

29<br />

80<br />

89<br />

87<br />

48<br />

48<br />

CP<br />

JP<br />

CP<br />

JP<br />

CP<br />

JR<br />

CP<br />

JR<br />

CP<br />

JR<br />

CP<br />

97<br />

Z. 48DE<br />

94<br />

Z. 48DE<br />

C2<br />

Z. 70 ~ 48D4H<br />

E2<br />

Z. 29 ~ 4884H<br />

80<br />

NC. 89 ~ 47E8H<br />

87<br />

REM


18609<br />

18611<br />

18612<br />

18614<br />

18616<br />

18619<br />

18624<br />

18626<br />

18628<br />

18630<br />

18632<br />

18635<br />

18637<br />

18638<br />

18646<br />

18651<br />

IM<br />

18660<br />

18662<br />

18665<br />

18667<br />

18669<br />

18670<br />

18672<br />

18673<br />

18675<br />

18681<br />

18696 <br />

18698 <br />

18705<br />

22<br />

JR NZ,<br />

JR EA<br />

PUSH H<br />

A<br />

JR NZ.<br />

LD C.<br />

INC Oe<br />

JR Z,<br />

18702 490E FE 2E CP 2E<br />

18703<br />

18668 48EC CD 2F 49 CALL 49<br />

LD A, auf Basic-Befeh<br />

05 PUSH D<br />

18682 48FA Dl POP DE<br />

18685 48FD 7E LD A. (<br />

CD C8 49 CALL 49<br />

18706 4912 91 SUB C<br />

69 LD L.C<br />

60 LD H.B<br />

18709 49 15 FE 80 CP 8<br />

18688<br />

18689 4901 01 POP DE<br />

18700 490C 23 INC H<br />

18684 48FC 04 INC B<br />

18704 4910 28 OF JR Z.<br />

18697 4909 28 FA JR Z.<br />

LO A.<br />

18680 48F8 06 7F LD B.<br />

18671 48EF CA DD 47 JP Z,<br />

C9 RET<br />

18691 4903 37 SCF<br />

18642 4802 18 CA JR CA ~ 489EH • lAUF WEITERE ZEILENNUMMERN 18686 48FE 3C INC<br />

18618 'TEXT MERKEN 18664 48E8 FE 22 CP<br />

18701 4913 2 8 Fl<br />

18708<br />

18687 48FF 20 05<br />

18674 48F2 18 EA<br />

18666 48EA 20 F2<br />

ASCII - Tex t<br />

18699 490B 4E<br />

18701 4900 13<br />

18694 4906 lA<br />

18676 48F4 E5<br />

18608 I UND ZEIGER CORRIGIEREN 18654 48DE lA<br />

18693 4905<br />

18644 48D4 2B DEC HL • ZEIGER AUF Z-CODE ELSE 18692 4904<br />

18690 4902<br />

18679 48F7<br />

CD BE 3A CALL 3A8E I TESTEN. OB ASCII 18677 48F5<br />

18634 I ACCU GLEICH ZIFFER IST 18678 48F6<br />

18658 48E2<br />

18655 48DF<br />

CD 28 49 CALL 4928 ILABEL IM ZWISCHENCOOE­ 1866.3<br />

18613 48B5 FE 22 CP 22 (Anführungszeichen) 18659<br />

I (HL) üBERTRAGEN 18657<br />

18610 48B2 CD 3E 49 CALL 493E ISpaces VON (OE) NACH 18656<br />

18623 'GERETTETE REGISTER HOLEN<br />

18621 lAUF ZEILENNUMMER UNTERS.<br />

18627 48C3 38 07 JR C. 07 . ~ 48CCH KEINE ZEILENNUMMER MEHR<br />

CD 83 49 CALL 4983 , IA9CII-ZEILENNUMMER UM­<br />

18607 48AF CD 36 49 CALL 4936 ITEXTZEICHEN MERKEN (P)<br />

C3 DD 47 JP 47DD • lENDE ZEILE MERKEN UND<br />

18639 48CF<br />

18640 ISETZEN IN HEX UND MIT<br />

18648 48D8 77 LO (HU.A ; Z-CODE ELSE EINTRAGEN<br />

18620 48BC 20 EO JR NZ~ EO ~ 489EH I NICHT ZEILENENDE ~<br />

18649 48D9 CD 38 49 CALL 4938 I ZEIGER UND ZÄHLER<br />

(HU. 3A


SEITE 320<br />

BASIC 1Z-013B V1.0A<br />

18710<br />

18711 4917 28 OE<br />

18712<br />

18713 4919 2B<br />

18714 491A 7E<br />

18715 491B 07<br />

18716 491C 23<br />

18717 4910 30 FB<br />

18718<br />

18719 491F 18 09<br />

18720<br />

18721 4921 78<br />

18722 4922 FE EE<br />

18723<br />

18724 4924 30 F3<br />

18725<br />

18726 4926 3F<br />

18727 4927 E1<br />

18728 4928 El<br />

18729 4929 70<br />

18730 492A C9<br />

JR Z. OE ~ 4927H<br />

OEC HL<br />

LD A. (HL><br />

RLCA<br />

INC HL<br />

JR NC. FB -+ 491AH<br />

JR 09 -+­ 48FAH<br />

LD A.B<br />

CP EE<br />

JR NC. F3 ~ 4919H<br />

CCF<br />

POP HL<br />

POP HL<br />

LD (HL> .8<br />

RET<br />

• JA ~ BEFEHL GEFUNDEN<br />

ZEIGER AUF TABELLE<br />

EIN ZEICHEN AUS TABELLE<br />

BEFEHLSENDE ?<br />

ZEIGER AUF TABELLE<br />

BEFEHLSENDE SUCHEN<br />

I NÄCHSTEN BEFEHL AUS<br />

I TABELLE VERGLEICHEN<br />

; ZWISCHENCODE HOLEN<br />

SONDERZEICHENBEFEHL ?<br />

IJA ~ ABKüRZUNG NICHT<br />

I ERLAUBT<br />

CODE BEFEHL GEFUNDEN<br />

ZEIGER ANFANG TEXT V~RGESS.<br />

ZEIGER FüR ZWISCHENCODE<br />

ZWISCHENCODE EINTRAGEN<br />

Text bis zum 2ten<br />

Anführungzeichen oder<br />

Zeilenende übertragen<br />

18731 492B<br />

18732 492C<br />

18733<br />

18734<br />

18735 492F<br />

18736 4930<br />

18737 4931<br />

18738 4932<br />

18739<br />

18740 4934<br />

18741<br />

18742 4936<br />

18743 4937<br />

18744 4938<br />

18745 4939<br />

18746 493A<br />

18747 4938<br />

18748<br />

18749<br />

77<br />

CD 37 49<br />

lA<br />

B7<br />

C8<br />

FE 22<br />

20 F5<br />

77<br />

13<br />

23<br />

OC<br />

CO<br />

C3 F2 20<br />

LD (HL>. A<br />

CALL 4937<br />

LD A. (OE)<br />

OR A<br />

RET Z<br />

CP 22<br />

JR NZ. F5 + 4928H<br />

LD (HU .A<br />

INC DE<br />

INC HL<br />

INC C<br />

RET NZ<br />

JP 20F2<br />

•<br />

ZEICHEN EINTRAGEN<br />

I ZEIGER UND ZEILENLÄNGE<br />

I CORRIGIEREN<br />

EIN ZEICHEN ASCII-TEXT<br />

• ZEILENENDE ?<br />

JA<br />

(Anführungszeichen)<br />

INICHT TEXTENDE ~ ZEICHEN<br />

I MERKEN UND TEXTENDE SUCHEN<br />

ZEICHEN IN Z-CODE MERKEN<br />

ZEIGER AUF ASCII-TEXT<br />

ZEIGER FüR ZWISCHENCODE<br />

ZEILENLÄNGE PLUS EINS<br />

NOCH OK<br />

I GRöSSER 2~6 ~<br />

I ZEILE ZU LANG FEHLER<br />

Spaces<br />

von übertragen<br />

18750 493E<br />

18751 493F<br />

18752<br />

18753 4941<br />

18754 4942<br />

lA<br />

FE<br />

CO<br />

77<br />

CD<br />

20<br />

LD A.


SEITE 322 <br />

BASIC 1Z-013B V1_0A <br />

BASIC 1Z-<br />

Auf ELSE untersuchen<br />

Zeilennummer- .C • I WERT MERKEN<br />

18850 49A2 23 INC HL<br />

18899<br />

I<br />

18851 49A3 70<br />

18900 4904<br />

LD (HU.B<br />

OE 00<br />

I<br />

LO C. 00<br />

'? 18901<br />

188~2 49A4 23 INC HL.. , ZEIGER FüR ZWISCHENCODE ' J 18902 4906 7E LD A. (HL<br />

18853 49A:3 Cl POP BC , ZEILENLÄNGE HOLEN ''I'<br />

' t' 18903 4907 FE 27 CP 27<br />

188S4 49A6 81 ADD A.·C , PLUS ANZAHL FüR WERT<br />

'I<br />

18855 49A7 DA F2 20<br />

18904<br />

JP C. 20F2 I I ZEILE HAT MEHR ALS 2S6 1' 1<br />

18856<br />

18857 IPROGRAM<strong>MZ</strong>EILE ZU LANG 1<br />

18858 49AA 4F LD C.A • NEUE ZEILENLÄNGE MERKEN<br />

,i<br />

18905 4909 28 4B JR Z. 4B<br />

I ZEICHEN ... FEHLER 8 ;1:: 18906<br />

18907 490B 23 INC HL<br />

18859 49AB 1B<br />

~<br />

DEC OE<br />

18908 490C 87<br />

ZEIGER AUF ASCII-TEXT<br />

OR A<br />

,I ~I 18909 4900 28 25 JR Z. 25<br />

18860 49AC 1A LD A.


SEITE 324<br />

BASIC 1Z-013B<br />

18917<br />

18918<br />

18919 49E7 FE 22 CP 22<br />

18920<br />

18921 49E9 28 ~B JR Z. 5B ~ 4A46H<br />

18922<br />

18923 49EB FE 3A CP 3A<br />

18924<br />

18925 49ED 28 69 JR Z, 69 ~ 4A58H<br />

18926<br />

18927 49EF FE 97 CP 97<br />

18928<br />

18929 49F1 28 2E JR Z, 2E + 4A21H<br />

18930<br />

18931 49F3 FE 94 CP 94<br />

18932<br />

18933 49F5 28 2A JR Z, 2A ~ 4A21H<br />

18934<br />

18935 49F7 FE E4 CP E4<br />

18936<br />

18937 49F9 28 OE JR Z, OE ~ 4A09H<br />

18938<br />

18939 49FB FE 80 CP 80<br />

18940<br />

18941 49FD 30 OE JR NC. OE ~ 4AODH<br />

18942<br />

18943 49FF CD E3 4A CALL 4AE3<br />

18944<br />

18945<br />

18946 4A02 18 D2 JR D2 + 49D6H<br />

18947<br />

18948 4A04 12 LD eDE) ,A<br />

18949 4A05 Cl POP BC<br />

18950 4A06 Dl POP DE<br />

18951 4A07 EI POP HL<br />

18952 4A08 C9 RET<br />

18953 4A09 3E FF LD A, FF<br />

18954<br />

18955 4AOB 18 F2 JR F2 + 49FFH<br />

18956<br />

einen Zwischencode umsetzen in ASCII<br />

189~7 4AOD FE FE CP FE<br />

189~8<br />

18959 4AOF 38 OB JR C. OB ~ 4A1CH<br />

18960<br />

18961 4Al1 3C INC A<br />

18962 4A12 01 A9 30 LD BC. 30A9<br />

18963<br />

18964<br />

18965 4A15 28 03 JR Z. 03 ~ 4A1AH<br />

18966<br />

18967 4A17 01 54 2C LD BC. 2C54<br />

18968<br />

18969<br />

18970 4AIA 7E LD A, (HU<br />

V1.0A<br />


SEITE 326<br />

BASIC 1Z-013B V1_0A BASIC 1Z-0<br />

19021 4A40 28 B5<br />

19022<br />

19023 4A4F 23<br />

19024 4A50 88<br />

19025 4A51 28 AC<br />

19026<br />

19027 4A53 CO E3 4A<br />

19028<br />

19029<br />

19030 4A56 18 F3<br />

19031<br />

19032 4A58<br />

19033 4A59<br />

19034 4A5A<br />

19035<br />

19036 4A5C<br />

19037<br />

12<br />

7E<br />

FE C2<br />

CA 06 49<br />

19038<br />

19039 4A5F CD E6 4A<br />

19040<br />

19041<br />

19042 4A62 C3 02 4A<br />

19043<br />

19044<br />

JR Z. 85 • 4A04H<br />

INC HL<br />

CP 8<br />

JR Z. AC ~ 49FFH<br />

CALL 4AE3<br />

JR F3 ~ 4A48H<br />

LO (OE).A<br />

LO A. (HU<br />

CP C2<br />

JP Z. 4906<br />

CALL 4AE6<br />

JP 4A02<br />

Zahl konstante umsetzen in ASCII<br />

19045 4A65 FE 15<br />

19046<br />

19047 4A67 28 44<br />

19048<br />

19049 4A69 FE OB<br />

19050<br />

19051 4A6B 30 05<br />

19052<br />

19053 4A6D 3D<br />

CP 15<br />

JR Z. 44 ~ 4AAOH<br />

CP 08<br />

JR NC. 05 ~ 4A72H<br />

OEC A<br />

JA + FERTIG<br />

ZEIGER AUF Z-CODE ZEILE<br />

Anführungszeichen ?<br />

IJA ~ ZEICHEN MERKEN<br />

IUNO RESTZEILE UMSETZEN<br />

IASCII-ZEICHEN IM ACCU<br />

I FüR ASCII-TEXT-ZEILE<br />

I MERKEN<br />

TEXTKONSTANTENENDE SUCHEN<br />

$ MERKEN<br />

NÄCHSTES Z-CODE ZEICHEN<br />

ELSE


19135<br />

19136<br />

19140<br />

19141<br />

19143<br />

19145<br />

19151<br />

19152<br />

19156<br />

19161<br />

19163<br />

19164<br />

19168<br />

19170 <br />

19176<br />

19177<br />

19180<br />

19181<br />

19187<br />

19189<br />

19193<br />

19194<br />

19197<br />

19199<br />

19202<br />

19207<br />

19214<br />

19215<br />

19217<br />

19218<br />

19221<br />

19222<br />

19229<br />

1923 0<br />

19238<br />

19240<br />

19241 <br />

Hex ­<br />

CP 30<br />

LO C.E<br />

LD A,L<br />

RRCA<br />

RRCA<br />

AND A.<br />

0<br />

Hex-Wert umsetzen in ASCII - H<br />

19220 4B14 CO IB 4B CALL 4B<br />

EB EX DE.HL<br />

19195 4AFB CO 13 4B CALL 4B1<br />

19196<br />

19219 4813 05 PUSH DE<br />

LO A. 24<br />

CALL 4A<br />

19216 4BI0 C3 A2 4A JP 4AA2<br />

19232 4B20 F5 PUSH A<br />

19239 4B27 CD 20 4B CALL 4<br />

19212 4BOC 08 EX AF.A<br />

LO A,


SEITE 330 <br />

BASIC 1Z-013B V1.0A <br />

19242 4B2A F1 POP AF WERT HOLEN<br />

19243 4B28 E6 OF AND A. OF I L-NIBBLE MASKIEREN<br />

19244<br />

19245 4B2D C6 30 ADD A. 30 UMSETZEN IN ASCII<br />

19246<br />

19247 4B2F FE 3A CP 3A l 0 - 9 ?<br />

19248<br />

19249 4B31 38 02 JR C. 02 ~ 4B35H JA ~ ZEICHEN OK<br />

19250<br />

19251 4833 C6 07 ADD A. 07 FüR A - F CORRIßIEREN<br />

19252<br />

19253 4835 12 LD (DE).A ASCII-ZEICHEN MERKEN<br />

19254 4836 13 INC DE , ZEIGER FüR ASCII-TEXT<br />

192:i5 4837 C9 RET<br />

(DE) angegebene Dezimal-Zeilennummer umsetzen in HEX nach BC<br />

19256 4838 E5 PUSH HL REGISTER RETTEN<br />

19257 4839 CD 48 48 CALL 4B4B IDEZIMAL-ASCII (DE) UM­<br />

19258 ISETZEN IN HEX-WERT NACH HL<br />

19259<br />

19260 4B3C 4D LD C.L I WERT NACH BC<br />

19261 483D 44 LD B.H<br />

19262 483E 18 DEC DE • I ZEIGER AUF ASCII-TEXT<br />

19263 4B3F IB DEC DE I<br />

19264 4B40 EI POP HL 9ERETTETES REGISTER HOLEN<br />

19265 4841 1A LD A. <br />

19294<br />

19295 4B5F CD 6E 4B CALL 486E I HL * 2<br />

BASIC 1<br />

19296<br />

19297 <br />

19298 4862 09 ADD<br />

19299 4863 38 06 JR C<br />

19300<br />

19301 4B65 4F LD C<br />

19302 4866 06 00 LD 8<br />

19303 <br />

19304 4868 09 ADD<br />

19305 4869 30 E3 JR N<br />

19306<br />

19307 4868 C3 F5 20 JP 20<br />

19308 <br />

19309 <br />

HL * 2 mit Untersuchung<br />

19310 4B6E 29 ADD H<br />

19311 486F DO RET N<br />

19312 4870 18 F9 JR F9<br />

19313<br />

Texte für Fehlermeldungen<br />

19314 4872 53 S<br />

19315 4B73 BD <br />

y <br />

19316 4B74 BO n<br />

19317 4B75 96 t<br />

19318 4B76 Al a <br />

19319 4877 98 x <br />

19320 4B78 20 Sp<br />

19321 4B79 92 e<br />

19322 487A 9D r<br />

19323 4B7B 9D r<br />

19324 487C B7 o<br />

19325 4B7D 9D r<br />

19326 487E 00<br />

19327 487F 4F o<br />

19328 4880 AB v<br />

19329 4B81 92 e<br />

19330 4B82 9D r<br />

19331 4B83 20 Sp<br />

19332 4B84 AA f<br />

19333 4B85 B8 1<br />

19334 4886 87 o<br />

19335 4B87 A3 w<br />

19336 4B88 20 Sp<br />

19337 4B89 92 e<br />

19338 4B8A 9D r<br />

19339 4B8B 9D r<br />

19340 4B8C B7 o<br />

19341 4B8D 9D r<br />

19342 4B8E 00<br />

19343 4B8F 49<br />

19344 4890 B8<br />

19345 4B91 B8<br />

19346 4892 92 e<br />

19347 4B93 97 9


BO<br />

a<br />

e<br />

0<br />

r<br />

i<br />

I<br />

S<br />

t<br />

r<br />

r<br />

e<br />

n<br />

t<br />

h<br />

M<br />

e<br />

m<br />

0<br />

r<br />

i<br />

t<br />

e<br />

r<br />

a<br />

c<br />

~.~ :~'<br />

~ ,<br />

I ,<br />

1<br />

"<br />

1-<br />

I<br />

19421 4BOO 4C L<br />

19426 4BE2 B8 I<br />

"/ 19430 4BE6 96 t<br />

19433 48E9 92 e<br />

19443 4BF3 55 U<br />

19450 4BFA A6 i<br />

19451 48F8 BO n<br />

19462 4C06 52 R<br />

e<br />

BASIC 1Z<br />

19445 4BF5 20 Sp<br />

19405 48CO 41 A<br />

19406 4BCE 90 ,..<br />

19407 48CF 90 ,..<br />

19408 4800 Al a<br />

19409 4801 BO y<br />

19410 4B02 20 Sp<br />

19411 4803 9C d<br />

19412 4B04 92 e<br />

19413 4805 AA f<br />

19414 4806 20 Sp<br />

19415 4B07 92 e<br />

19416 4B08 90 ,..<br />

19417 4B09 90 r<br />

19418 4BOA B7<br />

0<br />

19419 480B 90 r<br />

19420 480C 00<br />

19422 4BOE A6<br />

19423 4BOF BO n<br />

19424 4BEO 92 e<br />

19425 4BEl 20 Sp<br />

19427 4BE3 92 e<br />

19428 4BE4 BO n<br />

I 19429 48E5 97 9<br />

19432 4BE8 20 Sp<br />

19444 4BF4 42 B<br />

" 19431 48E7 98 h<br />

19434 4BEA 90 r<br />

19435 48EB 90 r<br />

19436 4BEC B7<br />

0<br />

19437 4BEO 90 r<br />

19438 4BEE 00<br />

19439 4BEF 80<br />

19440 48FO 47 G<br />

19441 4BFI 4F 0<br />

19442 48F2 53 S<br />

19446 4BF6 BO n<br />

19447 4BF7 " 92<br />

19448 48F8 A4 s<br />

19449 4BF9 96 t<br />

19452 48FC 97 9<br />

19453 4BFO 20 S<br />

19454 48FE 92 e<br />

19455 4BFF 90 r<br />

19456 4COO 90 r<br />

19457 4C01 87<br />

0<br />

19458 4C02 90 r<br />

19459 4C03 00<br />

19460 4C04 46 F<br />

19461 4C05 4F 0<br />

Text für Fehler 4 <br />

Text für Fehler 5<br />

BASIC 1Z-013B V1.0A<br />

Te)(tende<br />

19349 4B9:5 B8 1<br />

19351 4897 9C d<br />

Space<br />

19352 4B98 Al a<br />

19353 4B99 96 t<br />

19354 4B9A Al a<br />

19357 4B90 90 r<br />

Space<br />

19358 4B9E 90 r<br />

19365 4BA5 90 r<br />

19366 4BA6 A6<br />

19367 4BA7 BO n<br />

20 " Space<br />

19368 4BA8 97 9<br />

19370 4BAA B8<br />

19371 48A8 92<br />

19372 4BAC BO<br />

9 ~ t<br />

; Text für Fehler 6<br />

Textende<br />

Textende<br />

19373 4BAO 97<br />

19374 48AE 96<br />

19375 4BAF 98<br />

19376 48BO 20<br />

Space<br />

20 '"Space<br />

19377 4B81 92 e<br />

19378 48B2 90<br />

19379 4883 90 r <br />

19380 48B4 87 0<br />

19381 4B85 90<br />

19382 48B6 00<br />

19383 48B7 40<br />

19384 4BB8 92<br />

19385 4B89 B3<br />

19386 4BBA B7<br />

19387 48BB 90<br />

19390 4BBE 9F c<br />

19393 4BCl Al<br />

19394 48C2 9F<br />

19395 4BC3 A6<br />

19396 4BC4 96<br />

Al<br />

•<br />

9E p<br />

19397 48C5 BO<br />

19398 48C6 20<br />

19399 4BC7 92<br />

19400 4BC8 9D<br />

19401 48C9 90 r<br />

'"Space<br />

19402 4BCA B7 0<br />

19404 4BCC 00<br />

90 r<br />

19363 4BA3 53<br />

19364 4BA4 96<br />

SEITE 332<br />

19362 4BA2 80<br />

19361 4BAl 00<br />

19359 489F B7<br />

19360 4BAO 90<br />

19355 4B98 20<br />

19356 4B9C 92<br />

19350 4896 20<br />

19348 4B94 Al<br />

19403 48CB<br />

19392 48CO<br />

19391 4B8F<br />

19388 4BBC<br />

19389 48BO<br />

19369 4BA9


T<br />

,<br />

BASIC<br />

o::-r:::­<br />

19533 4C40 9F<br />

Text für Fehler 12 19538 4C52 20 S<br />

19546 4C5A 80<br />

R Text für Fehler 14 19570 4C72 BO n<br />

T<br />

R<br />

r<br />

r<br />

19576 4C78 81) <br />

19~77 4C79<br />

Q <br />

i<br />

u<br />

0<br />

n<br />

~<br />

1<br />

n<br />

m<br />

c<br />

t<br />

U<br />

e<br />

S<br />

Sj:<br />

S"'<br />

1<br />

19522 4C42 ....J....J<br />

1952"3 4C43 BO n<br />

19524 4C44 20 S<br />

19525 4C45 9C d<br />

19526 4C46 92<br />

19527 4C47 AA f<br />

19528 4C48 2E<br />

19529 4C49 20 S<br />

19530 4C4A AA f<br />

19531 4C48 A5 u<br />

19532 4C4C BO n<br />

19534 4C4E 96<br />

19535 4C4F A6<br />

C Textende 19536 4C50 B7<br />

0<br />

19537 4C51 BO n<br />

19539 4C53 92 e<br />

19540 4C54 90 r<br />

19541 4C55 90 r<br />

19542 4C56 97<br />

19543 4C57 90 r<br />

19544 4C58 00<br />

19547 4C5B 20<br />

19548 4C5C 9C d<br />

19549 4C50 92 e<br />

19550 4C5E AA f<br />

19551 4C5F 2E<br />

19552 4C60 20<br />

19553 4C61 B8<br />

19554 4C62 A6 i<br />

19555 4C63 BO<br />

19556 4C64 92<br />

Textende 19557 4C65 20 • 91<br />

19558 4C66 BO n<br />

Text für Fehler 13 19559 4C67 A5 u<br />

19560 4C68 83<br />

19561 4C69 2E<br />

19562 4C6A 92<br />

•<br />

19563 4C6B 90 r<br />

19565 4C60 87 Q<br />

19566 4C6E 90 r<br />

19508 4C34 00 ; Textende 19568 4C70 43 C<br />

19569 4C71 Al<br />

,jl <br />

Textende<br />

19571 4C73 27<br />

19572 4C74 96 t<br />

19573 4C7:!i 20<br />

19~74 4C76 9F c<br />

19575 4C77 B7<br />

19578 4C7A Ab<br />

96 "t<br />

19579 4C7B 80 n<br />

19580 4C7C A5<br />

i r rS81 4C70 92 e<br />

SEITE 334<br />

BASIC 1Z-013B V1.0A<br />

19470 4COE 20 Space<br />

19472 4C10 9D r<br />

19473 4C11 90 r<br />

19474 4C12 B7 0<br />

19475 4C13 9D r<br />

19476 4C14 00<br />

19477 4C15 44 D<br />

19478 4C16 45 E<br />

19479 4C17 46 F<br />

19480 4C18 20 Spaee<br />

19481 4C19 46 F<br />

19482 4C1A 4E N<br />

19483 4C1B 20 Spaee<br />

19484 4C1C BO n <br />

19485 4C10 92 e 19545 4C59 55 U<br />

19486 4C1E A4 s<br />

19487 4C1F 96 t<br />

19488 4C20 A6<br />

19489 4C21 BO n<br />

19490 4C22 97 9<br />

19491 4C23 20 Spaee<br />

19492 4C24 92 e<br />

19493 4C25 90 r<br />

19494 4C26 90 r<br />

19495 4C27 B7 0<br />

19496 4C28 90 r<br />

19497 4C29 00<br />

19498 4C2A 4E N<br />

19499 4C2B 45 E<br />

19500 4C2C 58 X <br />

19501 4C20 54<br />

19502 4C2E<br />

19503 4C2F 92 <br />

20 Spaee<br />

19504 4C30 90 r<br />

19505 4C31 90 r<br />

19506 4C32 B7<br />

19507 4C33 90 r <br />

e 19564 4C6C 90 ,.<br />

0<br />

19567 4C6F 00<br />

19515 4C3B 20 Spaee<br />

19509 4C35 52<br />

19510 4C36 4:5 E<br />

19511 4C37 :54<br />

19512 4C38 :55 U<br />

19:513 4C39 52<br />

19514 4C3A 4E N<br />

19516 4C3C 92 e<br />

19517 4C30 90 r<br />

19518 4C3E 9D<br />

19519 4C3F 87 0<br />

19520 4C40 9D<br />

19521 4C41 00<br />

19468 4COC 58 X<br />

19469 4COO 54 T<br />

19467 4COB 45 E<br />

19466 4COA 4E N<br />

19471 4COF 92 e<br />

19464 4C08 2E<br />

19465 4C09 2E<br />

19463 4C07 2E


SEITE<br />

19582 4C7E<br />

19583 4C7F<br />

19584 4C80<br />

19585 4C81<br />

19586 4C82<br />

19587 4C83<br />

19588 4C84<br />

19589 4C85<br />

19590 4C86<br />

19591 4C87<br />

19592 4C88<br />

19593 4C89<br />

19594 4C8A<br />

19595 4C8B<br />

19596 4C8C<br />

19597 4C80<br />

19598 4C8E<br />

19599 4C8F<br />

19600 4C90<br />

19601 4C91<br />

19602 4C92<br />

19603 4C93<br />

19604 4C94<br />

19605 4C95<br />

19606 4C96<br />

19607 4C97<br />

19608 4C98<br />

19609 4C99<br />

19610 4C9A<br />

19611 4C9B<br />

19612 4C9C<br />

19613 4C90<br />

19614 4C9E<br />

19615 4C9F<br />

19616 4CAO<br />

19617 4CA1<br />

19618 4CA2<br />

19619 4CA3<br />

19620 4CA4<br />

19621 4CA5<br />

19622 4CA6<br />

19623 4CA7<br />

19624 4CA8<br />

1962:5 4CA9<br />

19626 4CAA<br />

19627 4CAB<br />

19628 4CAC<br />

19629 4CAO<br />

19630 4CAE<br />

19631 4CAF<br />

19632 4CBO<br />

19633 4CB1<br />

19634 4CB2<br />

19635 4CB3<br />

19636 4CB4<br />

19637 4CB5<br />

336<br />

00<br />

40<br />

92<br />

B3<br />

B7<br />

90<br />

BO<br />

20<br />

9E<br />

90<br />

B7<br />

96<br />

92<br />

9F<br />

96<br />

A6<br />

B7<br />

BO<br />

00<br />

49<br />

BO<br />

A4<br />

96<br />

90<br />

A5<br />

9F<br />

96<br />

A6<br />

B7<br />

BO<br />

20<br />

92<br />

9D<br />

90<br />

B7<br />

90<br />

00<br />

43<br />

Al<br />

BO<br />

27<br />

96<br />

20<br />

52<br />

45<br />

53<br />

55<br />

40<br />

45<br />

20<br />

92<br />

90<br />

90<br />

B7<br />

9D<br />

00<br />

BASIC 1Z-013B V1_0A<br />

t<br />

Textende<br />

19638 4CB6<br />

19639 4CB7<br />

M Text für Fehler 18<br />

19640 4CB8<br />

19641 4CB9<br />

e 19642 4CBA<br />

m 19643 4CBB<br />

0 19644 4CBC<br />

r 19645 4CBO<br />

y<br />

19646 4CBE<br />

Space 19647 4CBF<br />

P 19648 4CCO<br />

r 19649 4CCl<br />

o. 19650 4CC2<br />

e 19651 4CC3<br />

C<br />

t 19652 4CC4<br />

0<br />

19653 4CC5<br />

n<br />

Textende<br />

19654 4CC6<br />

19655 4CC7<br />

t<br />

Text für Fehler 19<br />

19656 4CC8<br />

19657 4CC9<br />

n 19658 4CCA<br />

fi<br />

19659 4CCB<br />

t 19660 4CCC<br />

r 19661 4CCO<br />

u 19662 4CCE<br />

C<br />

19663 4CCF<br />

19664 4COO<br />

0<br />

19665 4COl<br />

n 19666 4C02<br />

Spiiace<br />

19667 4C03<br />

e 19668 4C04<br />

r 19669 4CD5<br />

r 19670 4C06<br />

0<br />

19671 4CD7<br />

r 19672 4C08<br />

I Textende<br />

19673 4C09<br />

C<br />

iia 19674 4COA<br />

; Text für Fehler 20<br />

19675 4COB<br />

19676 4COC<br />

n 19677 4COO<br />

t 19678 4COE<br />

19679 4COF<br />

SPiiace<br />

19680 4CEO<br />

R<br />

19681 4CE1<br />

E 19682 4CE2<br />

S<br />

U<br />

r<br />

19683 4CE3<br />

M<br />

E<br />

19684 4CE4<br />

SPiiace<br />

• 19685 4CE5<br />

r 19686 4CE6<br />

Q<br />

r I Te)(tende<br />

19687 4CE7<br />

19688 4CE8<br />

52<br />

45<br />

53<br />

55<br />

40<br />

45<br />

20<br />

92<br />

90<br />

90<br />

B7<br />

90<br />

00<br />

80<br />

80<br />

52<br />

45<br />

41<br />

44<br />

20<br />

92<br />

90<br />

90<br />

B7<br />

90<br />

00<br />

41<br />

B8<br />

90<br />

92<br />

Al<br />

9C<br />

BO<br />

20<br />

B7<br />

9E<br />

92<br />

BO<br />

20<br />

92<br />

90<br />

90<br />

B7<br />

90<br />

00<br />

80<br />

80<br />

80<br />

80<br />

80<br />

80<br />

BASIC 1Z<br />

R<br />

E<br />

S<br />

U<br />

M<br />

E<br />

0<br />

r<br />

e<br />

r<br />

r<br />

Sp<br />

R<br />

E<br />

A<br />

0<br />

0<br />

r<br />

e<br />

r<br />

r<br />

Sp<br />

A<br />

r<br />

r<br />

e<br />

a<br />

d<br />

y<br />

Sp<br />

p<br />

e<br />

n<br />

Sp<br />

0<br />

0<br />

e<br />

r<br />

r<br />

I


BASIC 1Z-013B V1_0A BASIC 1Z-<br />

SEITE 338 .1<br />

19689 4CE9 80 ; Text für Fahler 50 19736 4018 90 r<br />

, 19737 4019 92 e<br />

19690 4CEA 80 Text für Fehler 51 19738 401A Al a<br />

19739 401B 9C d<br />

19691 4CEB 80 ; Text für Fehler ~2 19740 401C BO y<br />

19741 4010 00<br />

19692 4CEC 80 ; Text für Fehler 53<br />

19693 4CEO 80 Text für Fehler ~4<br />

, 19742 401E 80<br />

19743 401F 4F 0<br />

19694 4CEE 80 ; Text für Fehler 55 19744 4020 A5 u<br />

19745 4021 96 t<br />

19695 4CEF 80 , Text für Fehler 56 19746 4022 20 Spac<br />

19747 4023 B7 0<br />

19696 4CFO 80 19748 4024 AA f<br />

• Text für Fehler ~7<br />

19749 4025 20 Spac<br />

19697 4CFl 80 ; Text für Fehler 58 19750 4026 9E p<br />

19751 4027 Al a<br />

19698 4CF2 80 Text für Fehler 59 • 19752 4028 9E p<br />

19 753 4029 92 e<br />

19699 4CF3 80 Text für Fehler 60 • 19754 402A 90 r<br />

19 755 402B 00<br />

19700 4CF4 80 , Text für Fehler 61<br />

19756 4D2C 50 P<br />

19701 4CF5 80 Text für Fehler 62 19757 4020 90 r<br />

, 19758 402E A6<br />

19702 4CF6 4F 0 Text für Fehler 64 19759 402F BO n<br />

19703 4CF7 A~ u ' 19760 4030 96 t<br />

19704 4CF8 96 t 19761 4031 92 · e<br />

1970:5 4CF9 20 SPtice 1976 2 4032 90 r<br />

19706 4CFA B7 0 19763 4033 20 Spac<br />

19707 4CFB AA f 19764 4034 B3 m<br />

19708 4CFC 20 SPtlce 19765 4035 B7 0<br />

19709 4CFO AA f I 19766 4036 9C d<br />

19710 4CFE Ac t '1<br />

197 67 4037 92 e<br />

19711 4CFF B8 1 19768 4038 20 Spac<br />

19712 4000 92 e 19769 4039 92 e<br />

1971:5 4001 20 SPtlc. 19770 403A 90 r<br />

19714 4002 92 19771 403B 90 r<br />

•<br />

1971f5 4003 9D r 19772 403C B7 0<br />

19716 4004 9D r 19773 4030 90 r<br />

19717 4005 81 0 19774 403E 00<br />

19718 4006 90 r<br />

19719 4001 00 T.xt.nd. 19775 403F 80<br />

19776 4040 43 C<br />

1912 0 4D08 80 Text für Fehler 64 l' 19777 4041 98 h<br />

'J 19778 4042 92 e<br />

, 1912 1 4D09 :50 P T.xt für Fehl.r 65<br />

.1<br />

1 . 19779 4043 9F c<br />

19722 4DOA 90 r<br />

't<br />

19780 4044 A9 k<br />

1972:3 4D08 AQ t 19781 4045 20 Spac<br />

1912 4 4DOC 80 n 19782 4046 A4 s<br />

1972 15 4DOD 96 t 19783 4047 A5 u<br />

19'12 6 4DOl; '2<br />

19784 4048 B3 m<br />

1912 7 4DOF 90 ,.•<br />

19785 4049 20 Spac<br />

1912 6 4D10 20 .,..c:.<br />

19786 404A 92 e<br />

191~9 4D11 ~6 i 19787 4048 90 r<br />

19730 4012 A4 19788 404C 90 r<br />

•<br />

197~1 4Dl::S 20 SP.c:. 19789 4040 87 0<br />

197~2 4D14 BO n 19790 404E 90 r<br />

1913 3 4010 87 0 19791 404F 00<br />

19734 4016 9~ t<br />

19735 4017 20 Space


SEITE 340 <br />

BASIC 1Z-013B V1_0A <br />

Ausdruck (HL) auswerten und I-Byte-Wert nach DE/Accu<br />

19792 4D50 CD 65 4D CALL 4D65 2 BYTE NACH DE<br />

19793<br />

19794<br />

19795 4D53 7A LD A. D H-BYTE WERT<br />

19796 4D54 B7 OR A GLEICH NULL ?<br />

19797 4D55 C2 01 21 JP NZ. 2101 NEIN ~ DATENFEHLER<br />

19798<br />

19799<br />

19800 4D58 7B LD A.E L-BYTE WERT<br />

19801 4D59 C9 RET<br />

BASIC 1Z<br />

19839<br />

19840 4D80 CD 69 3C CALL 3C<br />

19841<br />

19842<br />

19843 4083 1A LD A. <<br />

19844 4D84 FE 00 CP 00<br />

19845<br />

19846 4086 28 06 JR Z.<br />

19847<br />

19848 4088 CD 7E 16 CALL 1<br />

19849<br />

19850<br />

19851 4D8B 13 INC OE<br />

19852 4D8C 18 F5 JR F5<br />

19853<br />

19854 4D8E EI POP HL<br />

19855 4D8F Fl POP AF<br />

19856 4090 C9 RET<br />

Wert in OE auf gesetzte Gr<br />

19857 4091 E5 PUSH HL<br />

19858 4092 21 10 00 LD HL.<br />

19859 (E7 03)<br />

19860 (EO 01)<br />

19861 4D95 CB 7A BIT 7.0<br />

19862<br />

19863 4D97 20 06 JR NZ.<br />

19864<br />

19865 4D99 87 OR A<br />

19866 409A EO 52 SBC HL<br />

19867<br />

19868 409C DA 01 21 JP C. 2<br />

19869<br />

19870<br />

19871 4D9F 05 PUSH DE<br />

19872 40AO 21 01 00 LD HL.<br />

19873 (19 FC)<br />

19874 (20 FE)<br />

19875 4DA3 CB 7C BIT 7. H<br />

19876<br />

19877 40A5 20 OF JR NZ.<br />

19878<br />

19879 40A7 CB 7A BIT 7,0<br />

19880<br />

19881 40A9 C2 01 21 JP NZ.<br />

19882<br />

1988 3<br />

L9884 40AC B7 OR A<br />

19885 4DAD EB EX OE.H<br />

19886 40AE ED 52 SBC HL<br />

19887<br />

19888 40BO DA 01 21 JP C. 2<br />

19889<br />

l r~89 0<br />

1'189 1 4DB3 01 POP OE<br />

19892 4084 EI POP HL<br />

19893 40B5 C9 RET<br />

Ausdruck (HL) auswerten und 2-Byte - Wert nach DE <br />

ohne vorherige Zwischenergebnisse zu vergessen <br />

19802 4D5A CD 9D 52 CALL 529D AUSDRUCK (HL) AUSWERTEN<br />

19803<br />

19804<br />

19805 4D5D EB EX DE.HL ZEIGER FüR ERGEBNIS NACH DE<br />

19806 4D5E 01 FB FF LD BC. FFFB -5 (LÄNGE ERGEBNIS)<br />

19807<br />

19808<br />

19809 4D61 09 ADD HL.8C ZEIGER AUF ERGEBNIS<br />

19810 4D62 EB EX DE.HL NACH DE<br />

19811 4D63 18 03 JR 03 ~ 4D68H I SYNTAX REAL-WERT UND UM­<br />

19812 I SETZEN IN HEX-WERT NACH DE<br />

Ausdruck (HL) auswerten und 2 Byte-Wert nach DE bereitstellen<br />

19813 4D65 CO 8B 52 CALL 528B 'AUSDRUCK (HL) AUSWERTEN<br />

19814 I UND ZEIGER AUF ERGEBNIS<br />

19815 'BEREITSTELLEN <br />

19816 4D68 F5 PUSH AF NÄCHSTES PROGRAMM8YTE<br />

19817 4D69 E5 PUSH HL PROGRAM<strong>MZ</strong>EIGER MERKEN <br />

19818 4D6A EB EX DE.HL ZEIGER AUF ERGEBNIS NACH HL<br />

19819 4D6B CE 9B 5D CALL 5D9B 'SYNTAX-UNTERSUCHUNG AUF <br />

19820 'ERGEBNIS GLEICH REAL-WERT <br />

19821 <br />

19822 406E CO 21 3D CALL 3D21 'REAL-WERT (HL) UMSETZEN <br />

19823 , IN HEX-WERT NACH HL <br />

19824 <br />

19825 4D71 EB EX DE.HL • HEX-WERT NACH OE <br />

19826 4D72 EI POP HL P~OGRAM<strong>MZ</strong>EIGER HOLEN <br />

19827 4D73 F1 POP AF NÄCHSTES PROGRAMMBYTE HOLEN<br />

19828 4074 C9 RET<br />

Wert bereitstellen und als ASCII-Wert an Drucker übergeben<br />

19829 4D75 CO 65 40 CALL 4D65 2 BYTE-WERT NACH OE <br />

19830 <br />

19831 <br />

19832 4078 F5 PUSH AF <br />

• NÄCHSTES PR08RAMMBYTE <br />

19833 4D79 E5 PUSH HL PROGRAM<strong>MZ</strong>EIGER MERKEN <br />

19834 4D7A 2A B9 6A LO HL, (6AB9) 'ZEIGER AUF ANFANG <br />

19835 I RECHENSPE I CHER <br />

19836 <br />

19837 4070 CO 82 3A CALL 3A82 'HEX-WERT IN DE UMSETZEN<br />

19838<br />

I IN REAL-WERT NACH (HL)


SEITE 342<br />

BASIC 1Z-013B<br />

19894 4DB6 CB 7A BIT 7. D<br />

19895<br />

19896 4DB8 28 F9 JR Z. F9 ~ 4DB3H<br />

19897<br />

19898 4DBA 18 FO JR FO ~ 4DACH<br />

19899<br />

Stringausdruck auswerten und Zeiger auf<br />

19900 4DBC CD 8B 52 CALL 528B<br />

19901<br />

19902<br />

19903 4DBF F5 PUSH AF<br />

19904 4DCO CD 7A 5D CALL 5D7A<br />

19905<br />

19906<br />

19907 4DC3 E5 PUSH HL<br />

19908 4DC4 EB EX DE.HL<br />

19909 4DC5 CD 7F 52 CALL 527F<br />

19910<br />

19911<br />

19912 4DC8 El POP HL<br />

19913 4DC9 F1 POP AF<br />

19914 4DCA C9 RET<br />

19915 4DCB 01<br />

19916 4DCC 01<br />

19917 4DCD 4E<br />

19918 4DCE 00 NOP<br />

19919 4DCF 00 NOP<br />

Befehl MODE<br />

19920 4DDO 3A 4D 00 LD A. (0040)<br />

19921<br />

19922<br />

19923 4DD3 B7 OR A<br />

19924 4DD4 C2 F7 4F JP NZ. 4FF7<br />

19925<br />

19926<br />

19927 4DD7 CD 14 54 CALL 5414<br />

19928<br />

19929<br />

19930 4DDA 23 INC HL<br />

1993 1 4DDB FE 47 CP 47<br />

19932<br />

19933 4DDD CA 5F 4E JP Z. 4E5F<br />

19934<br />

19935<br />

19936 4DEO FE ~4 CP 54<br />

19937<br />

19938 4DE2 C2 FE 20 JP NZ. 20FE<br />

19939<br />

19940<br />

19941 4DE5 3E 01 LD A. 01<br />

19942<br />

V1_0A<br />

ZU PRüFENDER WERT NEGATIV ?<br />

NEIN ~ WERT OK<br />

WERT üBERPRüFEN<br />

String bereitstellen<br />

lAUSDRUCK (HL) AUSWERTEN<br />

IUND ZEIGER AUF ERGEBNIS<br />

I NACH DE BEREITSTELLEN<br />

NÄCHSTES PROGRAMMBYTE<br />

I SYNTAX UNTERSUCHUNG AUF<br />

I ERGEBNIS VOM TYP STRINB '<br />

PROGRAM<strong>MZ</strong>EIGER MERKEN<br />

ZEIGER AUF DESCRIPTOR<br />

I ZEIGER AUF STRING NACH<br />

IDESCRIPTOR (HL) NACH<br />

IDE BEREITSTELLEN<br />

PROGRAM<strong>MZ</strong>EIGER HOLEN<br />

NÄCHSTES PROGAMMBYTE<br />

DRUCKER MODUS FLAG<br />

TEXTGRöSSENFLAG<br />

PARALLELAUSGABEFLAG DRUCKER<br />

GESETZT ?<br />

• IJA ~ FEHLER 68 <br />

I DRUCKER MODUS FEHLER <br />

IPROGRAM<strong>MZ</strong>EIGER IN HL<br />

lAUF NÄCHSTES RELEVANTES<br />

I ZEICHEN SETZEN<br />

PROGRAM<strong>MZ</strong>EIGER<br />

G (MODE G)<br />

MODE G<br />

T (MODE T)<br />

SYNTAX - FEHLER<br />

CODE TEXTMODUS<br />

19943 4DE7<br />

19944<br />

19945<br />

19946 4DEA<br />

19947<br />

19948<br />

19949 4DED<br />

19950 4DEE<br />

19951<br />

19952 4DFO<br />

19953<br />

19954 4DF2<br />

19955<br />

19956 4DF4<br />

19957<br />

19958 4DF6<br />

19959<br />

19960 4DF8<br />

1996 1<br />

19962<br />

19963 4DFB<br />

19964<br />

19965<br />

19966 4DFE<br />

19967<br />

19968<br />

19969 4EOl<br />

19970<br />

1997 1<br />

19972 4E04<br />

19973<br />

19974 4E06<br />

19975<br />

19976<br />

19977 4E09<br />

19978<br />

19979<br />

19980 4EOC<br />

19981<br />

19982 4EOE<br />

~99 83<br />

19984 4El0<br />

.L9985<br />

19986 4E12<br />

19987<br />

t9988 4E14<br />

19989<br />

lr~9 90 4E16<br />

1999 1<br />

19992 4E18<br />

1?993<br />

19994<br />

19995 4E1B<br />

19996<br />

19997<br />

,rt'998 4E1E<br />

19999<br />

BASIC<br />

32 CB 4D<br />

CD 14 54<br />

23<br />

FE 4E<br />

28 09<br />

FE 4C<br />

28 05<br />

FE 53<br />

C2 FE 20<br />

32 CD 4D<br />

CD 66 1C<br />

C2 FE 20<br />

3E 01<br />

CD 7E 16<br />

3A CD 4D<br />

FE 4E<br />

28 11<br />

FE 4C<br />

3E OB<br />

28 08<br />

3E 09<br />

CD 7E 16<br />

CD 7E 16<br />

CD 7E 16<br />

1Z-<br />

LD (4DC<br />

CALL 54<br />

INC HL<br />

CP 4E<br />

JR Z. 0<br />

CP 4C<br />

JR Z. 0<br />

CP 53<br />

JP NZ.<br />

LD (4DC<br />

CALL 1C<br />

JP NZ.<br />

LD A, 0<br />

CALL 16<br />

LD A. (4<br />

CP 4E<br />

JR Z. 1<br />

CP 4C<br />

LD A. O<br />

JR Z. 0<br />

LD A. 0<br />

CALL 16<br />

CALL 16<br />

CALL 16


SEITE<br />

MODE<br />

20001 4E21<br />

20002<br />

20003 4E23<br />

20004<br />

20005<br />

20006 4E26<br />

20007<br />

20008 4E28<br />

20009<br />

20010<br />

20011 4E2B<br />

Befehl<br />

20012 4E2C<br />

20013<br />

20014<br />

20015 4E2F<br />

20016<br />

20017 4E3l<br />

20018<br />

20019<br />

20020 4E34<br />

20021<br />

20022<br />

20023 4E37<br />

20024 4E38<br />

20025 4E39<br />

20026 4E3A<br />

20027<br />

20028 4E3C<br />

20029<br />

20030 4E3E<br />

20031<br />

20032 4E40<br />

20033<br />

20034<br />

20035 4E43<br />

20036<br />

20037<br />

20038 4E46<br />

20039<br />

20040<br />

20041 4E49<br />

20042<br />

20043 4E4B<br />

20044<br />

20045 4E4D<br />

20046<br />

20047 4E4F<br />

20048<br />

20049<br />

20050 4E52<br />

20051 4E:53<br />

20052<br />

20053 4E55<br />

344<br />

TN<br />

3E OA<br />

CD 7E<br />

3E 03<br />

CD 7E<br />

C9<br />

SKIP<br />

3A CB<br />

FE 01<br />

C2 F7<br />

CD 65<br />

7B<br />

B7<br />

C8<br />

FE EC<br />

30 05<br />

FE 15<br />

02 01<br />

CD 66<br />

C2 FE<br />

CB 7B<br />

20 09<br />

3E OA<br />

CD 7E<br />

10<br />

20 F8<br />

C9<br />

BASIC 1Z-013B<br />

LD A. OA<br />

16 CALL 167E<br />

LD A. 03<br />

16 CALL 167E<br />

RET<br />

40 LD A, (4DCB)<br />

CP 01<br />

4F JP NZ. 4FF7<br />

40 CALL 4D65<br />

LD A.E <br />

OR A <br />

RET Z <br />

CP EC <br />

' JR NC. 0:5 + 4E43H<br />

CP 15 ;<br />

21 JP NC, 2101<br />

lC CALL lC66<br />

20 JP NZ. 20FE<br />

BIT 7.E<br />

JR NZ. 09 + 4E56H<br />

LD A. OA ;<br />

16 CALL 167E •<br />

DEC E :<br />

JR NZ, F8 + 4E4DH ;<br />

RET<br />

V1_0A<br />

I NORMALMODUS (Wenn nur<br />

I OA gesendet wird><br />

IASCII-ZEICHEN IM ACCU<br />

lOHNE ZU ZÄHLEN AN<br />

I DRUCKER AUSGEBEN<br />

ZEllENRüCKSCHUB<br />

IASCII-ZEICHEN IM ACCU<br />

lOHNE ZU ZÄHLEN AN<br />

I DRUCKER AUSGEBEN<br />

DRUCKER MODUS FLAG<br />

IM TEXTMODUS ?<br />

INEIN + FEHLER 68<br />

I DRUCKER MODUS FEHLER<br />

IZWEI-BYTE-WERT NACH OE<br />

I (sollte eigentlich<br />

I Adresse $4050 sein)<br />

L-BYTE WERT<br />

GLEICH NULL ?<br />

JA + FERTIG<br />

- 20 ?<br />

WERT IST OK<br />

+ 20 ?<br />

ZU GROSS + DATENFEHLER<br />

I üBERPRüFEN. OB NÄCHSTES<br />

IPROGRAMMBYTE GLEICH<br />

IBEFEHLSENDEZEICHEN IST<br />

SYNTAX - FEHLER<br />

WERT NEGATIV ?<br />

JA + ZEILENRüCKSCHUB<br />

ZEILENVORSCHUB<br />

IASCII-ZEICHEN IM ACCU<br />

lOHNE ZU ZÄHLEN AN<br />

I DRUCKER AUSGEBEN<br />

RESTZAHL VORSCHüBE<br />

IWEITERE ZEILENVORSCHüBE<br />

I AUSGEBEN<br />

BASIC 1Z<br />

20054<br />

20055<br />

20056<br />

20057<br />

20058<br />

20059<br />

20060<br />

20061<br />

20062<br />

4E56 3E 03 LD A.<br />

4E58<br />

4E58<br />

4E5C<br />

4E5E<br />

CD<br />

lC<br />

20<br />

C9<br />

7E<br />

FS<br />

16 CALL 1<br />

INC E<br />

JR NZ.<br />

RET<br />

Rest MODE G - Routine<br />

20063 '4E5F 23 INC HL<br />

20064 4E60 CD 66 lC CALL lC<br />

20065<br />

20066<br />

20067 4E63 C2 FE 20 JP NZ,<br />

20068<br />

20069<br />

20070 4E66 3 E 02 LD A. 0<br />

20071<br />

20072 4E68 32 CB 40 LD (4D<br />

20073<br />

200 74<br />

20075 4E6B CD 7E 16 CALL 16<br />

20076<br />

20077<br />

20078 4E6E C9 RET<br />

Wert in OE auf V-Koordinate<br />

20079 4E6F E5 PUSH HL<br />

20080 4E70 21 E7 03 LD HL.<br />

20081<br />

20082<br />

~ 00 83 4E73 22 93 40 LD (409<br />

0084<br />

20085<br />

0086 4E76 21 19 FC LD HL.<br />

20087<br />

0088<br />

0089 4E79 22 Al 40 LD (4DA<br />

20090<br />

20091<br />

0092 4E7C EI POP HL<br />

0093 4E7D C3 91 40 JP 4091<br />

"0094<br />

0095<br />

Wert i n OE auf X-Koordinate<br />

4E80 E5 pusH HL<br />

4E81 21 EO 01 LD HL.<br />

4E84 22 93 40 LO (409<br />

4E87 21 20 FE LD HL.


SEITE<br />

20104<br />

20105<br />

20106 4E8A<br />

20107<br />

Befehl<br />

20108 4E8C<br />

20109<br />

20110 4E8E<br />

20111<br />

20112<br />

20113 4E91<br />

20114<br />

20115<br />

20116 4E94<br />

20117<br />

20118 4E96<br />

20119<br />

20120<br />

20121 4E99<br />

20122<br />

20123<br />

20124 4E9C<br />

20125<br />

20126 4E9E<br />

20127<br />

20128 4EAO<br />

20129 4EAl<br />

20130<br />

20131<br />

20132 4EA4<br />

20133 4EA5<br />

20134 4EA6<br />

20135<br />

20136 4EA8<br />

20137<br />

20138<br />

20139 4EAB<br />

20140 4EAC<br />

20141<br />

20142 4EAE<br />

20143<br />

20144<br />

20145 4EB1<br />

20146<br />

20147<br />

20148 4EB4<br />

20149<br />

20150 4EB6<br />

20151<br />

201~2<br />

201~3 4EB9<br />

20154<br />

201~5<br />

201:56 4EBC<br />

20157 4EBO<br />

20158<br />

20159 4EBF<br />

20160<br />

20161<br />

346<br />

18 EO<br />

LI NE<br />

3E 44<br />

32 EO<br />

3A CB<br />

FE 02<br />

C2 F7<br />

CD 14<br />

FE 25<br />

20 23<br />

23<br />

CD 50<br />

7B<br />

3D<br />

FE 10<br />

02 01<br />

1B<br />

3E 4C<br />

CD 7E<br />

CD 78<br />

3E 00<br />

CO 7E<br />

CD 66<br />

C8<br />

FE 2C<br />

C2 FE<br />

BASIC 1Z-013B<br />

JR <br />

ED .. 4E79H<br />

LD <br />

A, 44<br />

4E LD (4EEO), A<br />

40 LO A, (40CB)<br />

CP <br />

02<br />

4F JP NZ, 4FF7<br />

54<br />

CALL 5414<br />

CP 25<br />

JR NZ, 23 .. 4EC3H<br />

40<br />

INC HL<br />

CALL 4050<br />

LD A,E<br />

DEC A<br />

CP 10<br />

21<br />

JP NC, 2101<br />

;<br />

DEC DE<br />

LD A, 4C .<br />

;<br />

16 CALL 167E<br />

;<br />

40 CALL 4D78<br />

LD A, OD<br />

C<br />

16 CALL 167E<br />

•<br />

lC CALL 1C66<br />

;<br />

RET Z<br />

CP 2C<br />

20<br />

JP NZ. 20FE<br />

V1.0A<br />

I IN ROUTINE EINTRAGEN UND<br />

IKOORDINATE IN DE üBERPRüF.<br />

D (Absolute Linie)<br />

IBEFEHLSBUCHSTABEN IN<br />

I ROUTINE EINTRAGEN<br />

DRUCKER MODUS FLAG<br />

IM GRAPHIK-MODUS 7<br />

INEIN .. FEHLER 68 <br />

I DRUCKER MODUS FEHLER <br />

IPROGRAM<strong>MZ</strong>EIGER IN HL <br />

lAUF NÄCHSTES RELEVANTE <br />

I ZEICHEN SETZEN <br />

X (Code Linientyp) <br />

LINIENTYP NICHT ANGEGEBEN <br />

X üBERSPRINGEN <br />

EIN-BYTE-WERT NACH DE/ACCU <br />

LINIENTYPWERT <br />

INTERN VON 0 - 15 <br />

TYPWERT MAXIMAL <br />

ZU GROSS .. DATENFEHLER <br />

TYPWERT CORRIGIEREN <br />

L (Linientyp setzen) <br />

IASCII-ZEICHEN IM ACCU <br />

lOHNE ZU ZÄHLEN <br />

IAN DRUCKER AUSGEBEN <br />

IWERT IN DE UMSETZEN IN <br />

'ASCII UND AN DRUCKER <br />

, AUSGEBEN <br />

W.genrüc:kl auf <br />

IASCII-ZEICHEN IM ACCU <br />

lOHNE ZU ZÄHLEN <br />

IAN DRUCKER AU8GEBEN <br />

I üBERPRüFEN. OB NÄCHSTES <br />

IPROGRAMMBYTE GLEICH <br />

IBEFEHLSENDEZEICHEN IST <br />

NÄCHSTER BEFEHL <br />

(Komma)<br />

SYNTAX FEHLER<br />

2 0 162<br />

20 163<br />

2 0 164<br />

2 01 65<br />

20 166<br />

2 0 167<br />

20 168<br />

20 169<br />

20 170<br />

20 171<br />

20 172<br />

20 173<br />

20 174<br />

20 175<br />

20 176<br />

2 01 77<br />

201 78<br />

20179<br />

20 180<br />

20 181<br />

20 182<br />

20 183<br />

0 184<br />

20 18 5<br />

0 186<br />

0 187<br />

20 188<br />

01 89<br />

0 190<br />

0 191<br />

01 92<br />

0 193<br />

""0 194<br />

0 195<br />

0 196<br />

0 197<br />

" 0 198<br />

0 199<br />

0200<br />

020 1<br />

0202<br />

0203<br />

020 4<br />

0 205<br />

0206<br />

0 207<br />

0208<br />

0209<br />

02 10<br />

02 1 1<br />

02 12<br />

02 13<br />

02 14<br />

4EC2<br />

4EC3<br />

4EC6<br />

4EC9<br />

4ECC<br />

4ECD<br />

4EDO<br />

4ED2<br />

4ED4<br />

4ED7<br />

4EOA<br />

4EDD<br />

4EDE<br />

4EDF<br />

4EEl<br />

4EE4<br />

4EE5<br />

4EE6<br />

4EE9<br />

4EEB<br />

4EEE<br />

4EEF<br />

4EF2<br />

4EF4<br />

4EF7<br />

4EFA<br />

4EFB<br />

4EFC<br />

BASIC<br />

23<br />

CO 65 40<br />

CD 32 .~ .~<br />

CD 80 4E<br />

05<br />

CD 65 40<br />

FE 2C<br />

28 06<br />

CD 66 1C<br />

C2 FE 20<br />

CO 6F 4E<br />

Cl<br />

D5<br />

3E 44<br />

CD 7E 16<br />

59<br />

50<br />

CD 78 40<br />

3E 2C<br />

CD 7E 16<br />

01<br />

CD 78 40<br />

3E OD<br />

CD 7E 16<br />

CD 66 1C<br />

C8<br />

23<br />

18 C5<br />

1Z<br />

INC H<br />

CALL<br />

CALL<br />

CALL<br />

PUSH<br />

CALL<br />

CP 2<br />

JR Z.<br />

CALL<br />

JP NZ<br />

CALL<br />

POP B<br />

PUSH<br />

LD A.<br />

CALL<br />

LD E,C<br />

LO D,<br />

CALL<br />

LO A,<br />

CALL<br />

POP D<br />

CALL<br />

LD A,<br />

CALL<br />

CALL<br />

RET Z<br />

INC H<br />

JR C5<br />

l<br />

l<br />

,


SEITE 348<br />

BASIC 1Z-013B<br />

Befehl RLINE<br />

20222 4EFE 3E 4A LD A. 4A <br />

20223 <br />

20224 4FOO 32 EO 4E LD (4EEO).A<br />

20225 <br />

20226 <br />

20227 4F03 18 8C JR 8C -+ 4E91H <br />

20228 <br />

Befehl MOVE<br />

20229 4F05 3E 4D LD A. 4D<br />

20230<br />

20231 4F07 32 EO 4E LD (4EEO).A<br />

20232<br />

20233<br />

20234 4FOA 3A CB 4D LD A. (4DCB) ;<br />

20235<br />

20236<br />

20237 4FOD FE 02 CP 02<br />

20238<br />

20239 4FOF C2 F7 4F JP NZ. 4FF7<br />

20240<br />

20241<br />

20242 4F12 18 AF JR AF -+ 4EC3H<br />

20243<br />

Befehl RMOVE<br />

20244 4F14 3E 52 LD A. 52<br />

20245<br />

20246 4F16 32 EO 4E LD (4EEO).A<br />

20247<br />

20248<br />

20249 4F19 18 EF JR EF -+ 4FOAH<br />

20250<br />

Befehl PCOLOR<br />

20251 4F1B CD 504D CALL 4D50<br />

20252<br />

20253<br />

20254 4F1E 7B LD A.E<br />

20255 4F1F FE 04 CP 04<br />

20256<br />

20257 4F21 D2 01 21 JP NC. 2101<br />

20258<br />

20259<br />

20260 4F24 CD 66 lC CALL 1C66<br />

20261<br />

20262<br />

20263 4F27 20264<br />

C2 FE 20 JP NZ. 20FE •<br />

20265<br />

20266 4F2A 3A CB 4D LD A. (4DCB)<br />

20267<br />

20268<br />

20269 4F2D FE 02 CP 02 ;<br />

V1.0A<br />

J (Relative Linie)<br />

'BEFEHLSBUCHSTABEN IN<br />

• ROUTINE EINTRAGEN<br />

EINSPRUNG IN LINE-ROUTINE<br />

M (Bewegung Druckkopf)<br />

'BEFEHLSBUCHSTABEN IN<br />

• ROUTINE EINTRAGEN<br />

DRUCKER MODUS FLAG<br />

IM GRAPHIK - MODUS ?<br />

'NEIN -+ FEHLER 68<br />

• DRUCKER MODUS FEHLER<br />

EINSPRUNG IN LINE-ROUTINE<br />

R (Relative Bewegung)<br />

'BEFEHLSBUCHSTABEN IN<br />

• ROUTINE EINTRAGEN<br />

EINSPRUNG IN MOVE-ROUTINE<br />

EIN-BYTE-WERT NACH DE/ACCU<br />

WERT HOLEN<br />

FARBWERT MAXIMAL<br />

ZU GROSS -+ DATENFEHLER<br />

• üBERPRüFEN. OB NÄCHSTES<br />

IPROGRAMMBVTE GLEICH<br />

'BEFEHLSENDEZEICHEN IST<br />

SYNTAX - FEHLER<br />

DRUCKER MODUS FLAG<br />

IM GRAPHIK-MODUS ?<br />

BASIC 1Z<br />

20270<br />

20271 4F2F 28 OE JR Z.<br />

20272<br />

20273 4F31 CD 21 4E CALL 4E<br />

20 274<br />

20275<br />

20276 4F34 3E 02 LD A. 0<br />

20277<br />

20278 4F36 CD 7E 16 CALL 1<br />

20279<br />

20280<br />

2028 1 4F39 CD 3F 4F CALL 4F<br />

20282<br />

20283<br />

20284 4F3C C3 04 4E JP 4E04<br />

20285<br />

20286<br />

Stiftfarbe in E an Plotter<br />

20287 4F3F 3E 43 LD A. 4<br />

~02 88<br />

0289 4F41 CD 7E 16 CALL 1<br />

4F44 7B LD A.E<br />

4F45 F6 30 OR 30<br />

4F47 CD 7E 16 CALL 1<br />

4F4A 3E 00 LD A. O<br />

4F4C CD 7E 16 CALL 1<br />

4F4F C9 RET<br />

Befehl PHOME<br />

4F50 3A CB 4D LD A. (4<br />

4F53 FE 02 CP 02<br />

4F55 C2 F7 4F JP NZ.<br />

4F58 CD 66 lC CALL lC<br />

4F5B C2 FE 20 JP NZ.<br />

4F5E 3E 48 LD A. 4<br />

4F60 CD 7E 16 CALL 16<br />

4F63 C9 RET


SEITE<br />

Befehl<br />

20324 4F64<br />

20325<br />

20326<br />

20327 4F67<br />

20328<br />

20329 4F69<br />

20330<br />

20331<br />

20332 4F6C<br />

20333<br />

20334<br />

20335 4F6F<br />

20336<br />

20337<br />

20338 4F72<br />

20339<br />

20340 4F74<br />

20341<br />

Befehl<br />

20342 4F76<br />

20343<br />

20344<br />

20345 4F79<br />

20346<br />

20347 4F7B<br />

20348<br />

20349 4F7D<br />

20350<br />

20351<br />

20352 4F80<br />

20353<br />

20354 4F82<br />

20355<br />

20356 4F84<br />

20357 4F85<br />

20358<br />

20359<br />

20360 4F88<br />

20361<br />

20362 4F8A<br />

20363<br />

20364<br />

20365 4F8D<br />

20366 4F8E<br />

20367<br />

20368<br />

20369 4F91<br />

20370<br />

20371<br />

20372 4F94<br />

20373<br />

20374<br />

20375 4F97<br />

20376<br />

20377 4F99<br />

20378<br />

20379<br />

350<br />

HSET<br />

3A CB 40<br />

FE 02<br />

C2 F7 4F<br />

CD 66 lC<br />

C2 FE 20<br />

3E 49<br />

18 EA<br />

GPRINT<br />

3A CB 40<br />

FE 02<br />

20 7A<br />

CD 14 54<br />

FE 5B<br />

20 4A<br />

23<br />

CD 50 4D<br />

FE 40<br />

02 01 21<br />

05<br />

CO 14 54<br />

CD 32 33<br />

CD 50 40<br />

FE 04<br />

02 01 21<br />

BASIC 1Z-013B<br />

LO A. (4DCB)<br />

CP<br />

02<br />

JP<br />

NZ. 4FF'l ;<br />

CALL 1C66<br />

JP NZ. 20FE ,<br />

;<br />

LD A. 49<br />

JR<br />

EA + 4F60H<br />

LD A. (40CB)<br />

CP 02<br />

JR NZ. 7A +<br />

4FF7H<br />

CALL 5414<br />

CP SB<br />

JR NZ. 4A +<br />

4FCEH<br />

INC HL<br />

CALL 4050<br />

CP 40<br />

JP NC. 2101<br />

PUSH OE<br />

CALL 5414<br />

CALL 3332<br />

CALL 4D50<br />

•<br />

CP 04<br />

JP NC. 2101<br />

V1_0A<br />

DRUCKER MODUS FLAG<br />

IM GRAPHIK-MODUS<br />

INEIN + FEHLER 68 <br />

I DRUCKER MODUS FEHLER <br />

I UNTERSUCHEN. OB NÄCHSTES<br />

IPROGRAMMBYTE GLEICH<br />

IBEFEHLSENOEZEICHEN IST<br />

SYNTAX FEHLER<br />

I (INITIALIZE)<br />

I ZEICHEN AN DRUCKER<br />

I AUSGEBEN<br />

DRUCKER MODUS FLAG<br />

IM GRAPHIK-MODUS ?<br />

INEIN + FEHLER 68<br />

I DRUCKER MODUS FEHLER<br />

IPROGRAM<strong>MZ</strong>EIGER IN HL<br />

lAUF NÄCHSTES RELEVANTES<br />

I ZEICHEN SETZEN<br />

C (Zeichengröße/-lage)<br />

I KEINE WERTE FüR ZEICHEN­<br />

IGRöSSE UND -LAGE ANGEGEBEN<br />

[ üBERSPRINGEN<br />

EIN-BYTE-WERT NACH DE/ACCU<br />

64 (Zeichengröße max)<br />

ZU GROSS + DATENFEHLER<br />

ZEICHENGRöSSE MERKEN<br />

IPROGRAM<strong>MZ</strong>EIGER IN HL<br />

lAUF NÄCHSTES RELEVANTES<br />

I ZEICHEN SETZEN<br />

SYNTAX Komma<br />

EIN-BYTE-WERT NACH OE/ACCU<br />

ZEICHENLAGE MAXIMAL<br />

ZU GRaSS + DATENFEHLER<br />

20380 4F9C<br />

20381 4F9D<br />

2 03 82<br />

20383<br />

20384 4FAO<br />

20385<br />

20386 4FA2<br />

20387<br />

203 88<br />

20389 4FA5<br />

20390 4FA6<br />

20391 4FA7<br />

20392 4FA8<br />

20393 4FA9<br />

20394<br />

20395 4FAB<br />

20396<br />

20397<br />

20398 4FAE<br />

20399<br />

20400<br />

2040 1 4FB l<br />

20402<br />

20 403 4FB3<br />

20 40 4<br />

20 405<br />

20406 4FB6<br />

20407 4FB7<br />

20408<br />

20409 4FB9<br />

204 10<br />

204 11<br />

204 12 4FBC<br />

204 13<br />

204 14<br />

204 15 4FBF<br />

204 16<br />

204 17 4FC1<br />

204 18<br />

" 04 19<br />

0420 4FC4<br />

2042 1<br />

20422<br />

20423 4FC7<br />

20424 4FC8<br />

20 425<br />

20426 4FCA<br />

20427<br />

0428<br />

,.;0429 4FCO<br />

20430 4FCE<br />

":1043 1<br />

043 2<br />

20433 4FDl<br />

043 4<br />

20435<br />

0436 4FD4<br />

20437<br />

0438 4FD6<br />

0439<br />

0440 4FD8<br />

" 044 1<br />

BASIC<br />

05<br />

CD 14 54<br />

FE 50<br />

C2 FE 20<br />

23<br />

Cl<br />

01<br />

C5<br />

3E 53<br />

CD 7E 16<br />

CD 78 40<br />

3 E 2C<br />

CO 7E 16<br />

01<br />

3 E 51<br />

CD 7E 16<br />

CD 78 40<br />

3E 00<br />

CD 7E 16<br />

CD 66 lC<br />

C8<br />

FE 2C<br />

C2 FE 20<br />

23<br />

CD BC 40<br />

CD 66 lC<br />

28 05<br />

FE 2C<br />

C2 FE 2 0<br />

1Z<br />

PUSH<br />

CALL<br />

CP 5<br />

JP NZ<br />

INC H<br />

POP B<br />

POP O<br />

PUSH<br />

LD A.<br />

CALL<br />

CALL<br />

LO A.<br />

CALL<br />

POP O<br />

LO A.<br />

CALL<br />

CALL<br />

LD A.<br />

CALL<br />

CALL<br />

RET Z<br />

CP 2<br />

JP NZ<br />

INC H<br />

CALL<br />

CALL<br />

JR Z.<br />

CP 2<br />

JP NZ


SEITE<br />

20442<br />

20443 4FDB<br />

20444 4FDC<br />

20445 4FDD<br />

20446<br />

20447 4FDF<br />

20448<br />

20449 4FE 1<br />

20450<br />

20451<br />

20452 4FE4<br />

20453 4FE:5<br />

20454<br />

20455<br />

20456 4FE8<br />

20457 4FE9<br />

20458<br />

20459 4FEB<br />

20460<br />

20461 4FED<br />

20462<br />

20463<br />

20464 4FFO<br />

20465<br />

20466<br />

20467 4FF3<br />

20468 4FF4<br />

20469 4FF5<br />

20470<br />

,<br />

20471 4FF7<br />

20472<br />

20473 4FF9<br />

20474<br />

20475<br />

Befehl<br />

20476 4FFC<br />

20477<br />

20478<br />

20479 4FFF<br />

20480<br />

20481 5001<br />

20482<br />

20483<br />

20484 5004<br />

20485<br />

20486<br />

20487 5007<br />

20488<br />

20489 5009<br />

20490<br />

20491<br />

20492 ~OOC<br />

20493 500D<br />

20494<br />

,<br />

2049~<br />

20496 5010<br />

20497<br />

352<br />

78<br />

B7<br />

28 11<br />

3E 50<br />

CD 7E<br />

1A<br />

CD 7E<br />

13<br />

10 F9<br />

3E OD<br />

CD 7E<br />

CD 66<br />

C8<br />

23<br />

18 D7<br />

3E 44<br />

C3 08<br />

AXIS<br />

3A CB<br />

FE 02<br />

C2 F7<br />

CD 50<br />

FE 02<br />

D2 01<br />

F5<br />

CD 14<br />

CD 32<br />

BASIC 1Z-013B<br />

LD A.B<br />

OR A<br />

JR Z. 11 + 4FFOH<br />

LD A. 50<br />

16<br />

CALL 167E<br />

16<br />

LD A,


SEITE 354<br />

BASIC 1Z-013B V1.0A BASIC 1Z<br />

Befehl CIRCLE Y-Koordinate Mittelpunkt f<br />

20560<br />

20561<br />

20562<br />

20563<br />

20564<br />

20565<br />

20566<br />

20567<br />

20568<br />

20569<br />

20570<br />

20571<br />

20572<br />

20573<br />

20574<br />

5050<br />

5053<br />

5055<br />

5057<br />

5058<br />

505B<br />

505E<br />

3A<br />

FE<br />

20<br />

ES<br />

11<br />

21<br />

CD<br />

CB<br />

02<br />

AO<br />

00<br />

04<br />

82<br />

40<br />

00<br />

52<br />

3A<br />

LD A. (4DCB)<br />

CP 02<br />

JR NZ. AO ~<br />

PUSH HL<br />

LD OE. 0000<br />

LD HL. 5204<br />

CALL 3A82<br />

4FF7H<br />

• DRUCKER MODUS FLAG<br />

• IM GRAPHIK-MODUS ?<br />

INEIN ~ FEHLER 68<br />

I DRUCKER MODUS FEHLER<br />

PROGRAM<strong>MZ</strong>EIGER RETTEN<br />

0 (Vorgabe Anfanggwinkel)<br />

I ZEIGER AUF SPEICHER<br />

I FüR ANFANGSWINKEL<br />

• I INTEGER-WERT IN DE UM­<br />

20575 ISETZEN IN REAL-WERT<br />

20576<br />

20577 5061 11 68 01 LD DE. 0168<br />

20578<br />

20579<br />

20580<br />

20581<br />

20582<br />

20583<br />

20584<br />

20585<br />

20586<br />

20587<br />

20588<br />

20589<br />

20590<br />

20591<br />

20592<br />

20593<br />

20594<br />

20595<br />

20596<br />

20597<br />

20598<br />

20599<br />

20600<br />

20601<br />

20602<br />

5064<br />

5067<br />

506A<br />

5060<br />

5070<br />

5073<br />

21<br />

CD<br />

21<br />

11<br />

CD<br />

El<br />

09<br />

82<br />

72<br />

OE<br />

B8<br />

52<br />

3A<br />

3D<br />

52<br />

3A<br />

LD HL. :5209<br />

CALL 3A82<br />

LD HL. 3D72<br />

LD DE. 520E<br />

CALL 3AB8<br />

POP HL<br />

X-Koordinate Mittelpunkt für CIRCLE bereitstellen<br />

5074<br />

5077<br />

20603 S07A<br />

507B<br />

20604<br />

20605<br />

20606<br />

20607<br />

20608<br />

20609<br />

20610<br />

507E<br />

507F<br />

5082<br />

CD<br />

CD<br />

8B<br />

32<br />

52<br />

33<br />

ES<br />

21 F5 51<br />

EB<br />

CD<br />

El<br />

B8 3A<br />

CALL<br />

CALL<br />

:528B<br />

3332<br />

PUSH HL<br />

LD HL. 51F5<br />

EX DE.HL<br />

CALL 3AB8<br />

POP HL<br />

INACH (HL)<br />

360 (Vorgabe Endwinkel)<br />

I ZEIGER AUF SPEICHER<br />

I FüR ENDW I NKEL<br />

I INTEGER-WERT IN DE<br />

IUMSETZEN IN REAL­<br />

I WERT NACH (HL)<br />

ZEIGER AUF +10 (Real)<br />

I ZEIGER AUF SPEICHER<br />

IFüR SCHRITTWINKEL<br />

I REAL-WERT VON (HL)<br />

INACH (DE) UBERTRAGEN<br />

PROGRAM<strong>MZ</strong>EIGER HOLEN<br />

• I AUSDRUCK AUSWERTEN UND<br />

I ZEIGER AUF ERGEBNIS<br />

I BERE I TSTELLEN<br />

, SYNTAX Komma<br />

PROGRAM<strong>MZ</strong>EIGER RETTEN<br />

I ZEIGER AUF SPEICHER FüR<br />

IX-KOODINATE MITTELPUNKT<br />

I REAL-WERT VON (HL)<br />

INACH (OE) üBERTRAGEN<br />

PROGRAM<strong>MZ</strong>EIGER HOLEN<br />

20611<br />

20612<br />

20613<br />

20614<br />

20615<br />

20616<br />

20617<br />

20618<br />

20619<br />

20620<br />

20621<br />

20622<br />

20623<br />

2 0624<br />

20625<br />

20626<br />

20627<br />

20628<br />

20629<br />

20630<br />

2063 1<br />

20632<br />

0633<br />

" 0634<br />

0635<br />

20636<br />

20637<br />

0638<br />

20639<br />

20640<br />

20641<br />

20642<br />

20643<br />

20644<br />

20645<br />

20646<br />

20647<br />

0648<br />

20649<br />

20650<br />

" 0651<br />

20652<br />

20653<br />

" 0654<br />

20655<br />

20656<br />

20657<br />

2 0658<br />

5083<br />

5086<br />

5089<br />

508A<br />

508D<br />

508E<br />

5091<br />

CD<br />

CD<br />

ES<br />

21<br />

EB<br />

CD<br />

El<br />

8B<br />

32<br />

FA<br />

B8<br />

52<br />

33<br />

51<br />

3A<br />

CALL 5<br />

CALL 3<br />

PUSH H<br />

LD HL.<br />

EX DE.<br />

CALL 3<br />

POP HL<br />

Radius für CIRCLE bereitst<br />

5092<br />

5095<br />

5096<br />

5097<br />

509A<br />

509B<br />

509E<br />

50Al<br />

50A2<br />

50A5<br />

50A6<br />

50A8<br />

50AA<br />

50AB<br />

CD<br />

E5<br />

F5<br />

21<br />

EB<br />

CO<br />

3A<br />

07<br />

DA<br />

8B<br />

FF<br />

B8<br />

00<br />

01<br />

F1<br />

FE 2C<br />

20<br />

El<br />

23<br />

52<br />

51<br />

3A<br />

52<br />

21<br />

CALL 5<br />

PUSH H<br />

PUSH A<br />

LD HL.<br />

EX DE.H<br />

CALL 3<br />

LD A. (<br />

RLCA<br />

JP C.<br />

POP<br />

CP<br />

AF<br />

2C<br />

3A JR NZ,<br />

POP HL<br />

INC HL<br />

Anfangswinkel für CIRCLE b<br />

50AC<br />

50AF<br />

5080<br />

50Bl<br />

CD<br />

ES<br />

F5<br />

21<br />

8B<br />

04<br />

52<br />

52<br />

CALL 5<br />

PUSH H<br />

PUSH A<br />

LD HL.<br />

20659<br />

20660 50B4 EB EX DE.<br />

20661 50B5 CD B8 3A CALL 3<br />

20662<br />

I<br />

l<br />

,


SEITE 356<br />

20663<br />

20664 50B8 Fl<br />

20665 50B9 FE 2C<br />

20666<br />

20667 50BB 20 27<br />

20668<br />

20669 5080 EI<br />

20670 508E 23<br />

Endwinkel für<br />

20671 508F CO 8B<br />

20672<br />

20673<br />

20674 50C2 E5<br />

20675 50C3 F5<br />

20676 50C4 21 09<br />

20677<br />

20678<br />

20679 50C7 EB<br />

20680 50C8 CD B8<br />

20681<br />

20682<br />

20683 50CB Fl<br />

20684 50CC FE 2C<br />

20685<br />

20686 50CE 20 14<br />

20687<br />

20688 5000 EI<br />

20689 5001 23<br />

Schrittwinkel<br />

20690 5002 CD 8B<br />

20691<br />

20692<br />

20693 5005 E5<br />

20694 5006 2 1 OE<br />

20695<br />

20696<br />

20697 5009 EB<br />

20698 50DA CD B8<br />

20699<br />

20700<br />

20701 5000 3A OF<br />

20702<br />

20703<br />

20704 50EO 07<br />

20705 50E1 DA 01<br />

20706<br />

20707<br />

20708 50E4 EI<br />

20709 ~OE5 CD 66<br />

20710<br />

20711<br />

20712 50E8 C2 FE<br />

20713<br />

20714<br />

20715 50EB E5<br />

BASIC 1Z-013B<br />

POP AF I<br />

CP 2C<br />

JR NZ, 27 ~ 50E4H<br />

POP HL<br />

INC HL<br />

CIRCLE bereitstellen<br />

52 CALL 528B<br />

PUSH HL<br />

PUSH AF<br />

52 LO HL, 5209<br />

EX OE,HL<br />

3A CALL 3AB8<br />

POP AF <br />

CP 2C <br />

JR NZ, 14 ~ 50E4H<br />

POP HL<br />

INC HL<br />

für CIRCLE bereitstellen<br />

52 CALL 528B I<br />

PUSH HL<br />

52 LO HL, 520E<br />

EX DE,HL<br />

3A CALL 3AB8 •<br />

~2 LO A, (520F)<br />

RLCA I<br />

21 JP C, 2101<br />

POP HL ,<br />

lC CALL lC66<br />

20 JP NZ, 20FE<br />

PUSH HL<br />

V1_0A<br />

NÄCHSTES PROGRAMMBYTE<br />

(Komma)<br />

KEINE WEITEREN PARAMETER<br />

PROGRAM<strong>MZ</strong>EIGER HOLEN<br />

Komma üBERSPRINGEN<br />

I AUSDRUCK AUSWERTEN UND<br />

I ZEIGER AUF ERGEBNIS<br />

I NACH OE BEREITSTELLEN<br />

PROGRAM<strong>MZ</strong>EIGER<br />

NÄCHSTES PROGRAMMBYTE<br />

I ZEIGER AUF SPEICHER<br />

IFüR ENDWINKEL<br />

I REAL-WERT VON (HL)<br />

INACH (OE) üBERTRAGEN<br />

NÄCHSTES PROGRAMMBYTE<br />

(Komma)<br />

KEI NE WEITEREN PARAMETER<br />

PROGRAM<strong>MZ</strong>EIGER HOLEN<br />

Komma üBERSPRINGEN<br />

I AUSDRUCK AUSWERTEN UND<br />

I ZEIGER AUF ERGEBNIS<br />

I NACH OE BEREITSTELLEN<br />

PROGRAM<strong>MZ</strong>EIGER RETTEN<br />

I ZEIGER AUF SPEICHER<br />

IFüR SCHRITTWINKEL<br />

I REAL-WERT VON (HL)<br />

INACH (OE) üBERTRAGEN<br />

MSB MANTISSE SCHRITTWINKEL<br />

VORZEICHEN NACH CARRY<br />

ISCHRITTWINKEL NEGATIV<br />

1+ DATENFEHLER<br />

PROGRAM<strong>MZ</strong>EIGER HOLEN<br />

lüBERPRüFEN, OB NÄCHSTES<br />

IPROGRAMMBYTE GLEICH<br />

IBEFEHLSENDEZEICHEN IST<br />

SYNTAX - FEHLER<br />

PROGRAM<strong>MZ</strong>EIGER MERKEN<br />

Kreis<br />

20716 50EC<br />

20717<br />

20718<br />

2071 9 50EF<br />

20720<br />

':)0721<br />

0722 50F2<br />

0723<br />

0724<br />

"0725 50F5<br />

0726 50F6<br />

0727<br />

0728<br />

0729 50F9<br />

0730<br />

073 1<br />

0732 50FC<br />

0733<br />

0734<br />

0735 50FF<br />

0736<br />

0737<br />

'0738 5102<br />

0739<br />

0740<br />

0741 5105<br />

0742<br />

0743<br />

0744 5108<br />

0745<br />

0746<br />

~7 47 510B<br />

0748<br />

0749<br />

0750 510E<br />

0751<br />

0752<br />

0753 5111<br />

0754 5112<br />

0755<br />

0756 5114<br />

0757<br />

0758<br />

0759 5117<br />

0760<br />

0761<br />

0762 511A<br />

0763<br />

0764<br />

0765 5110<br />

0766<br />

0767<br />

_0768 5120<br />

0769<br />

0770<br />

0771 5123<br />

0772<br />

0773 5125<br />

...0774<br />

0775<br />

BASIC 1Z<br />

nach bereitgestellten<br />

21 09 52<br />

LD HL,<br />

11 04 52<br />

LD OE,<br />

3A OE 52<br />

LD A, (5<br />

B7<br />

C4 4A 5E<br />

OR A<br />

CALL NZ<br />

DA 01 21<br />

JP C, 2<br />

CD AB 51<br />

CALL 51<br />

21 13 52<br />

LD HL,<br />

22 72 51<br />

LD (517<br />

21 18 52<br />

LD HL,<br />

22 7C 51<br />

LO (517<br />

CD 6E 51<br />

CALL 51<br />

3A OE 52<br />

LD A, (5<br />

B7<br />

28 34<br />

OR A<br />

JR Z, 3<br />

21 04 52<br />

LD HL,<br />

11 OE 52<br />

LD OE,<br />

CD AF 50<br />

CALL 5D<br />

11 09 52<br />

LD OE.<br />

CD 4A 5E<br />

CALL 5E<br />

30 00<br />

JR NC.<br />

CD AB 51<br />

CALL SIA


BASIC 1Z-013B V1_0A<br />

SEITE 358 BASIC 1Z-<br />

20776<br />

20777<br />

20778<br />

5128 CD 6B 51<br />

CALL 516B ILINIE<br />

• PUNKT<br />

ZUM ERRECHNETEN<br />

Z I EHEN<br />

20779<br />

20780 512B CD lE 00 CALL 001E ABFRAGE. BREAK GEDRUCKT<br />

20829<br />

20830<br />

20831<br />

515D 22 72 51 LD (5172<br />

20832 5160 21 18 52 LD HL. 5<br />

20781 20833<br />

20782<br />

20783<br />

20784<br />

20785<br />

20786<br />

20787<br />

20788<br />

20789<br />

20790<br />

20791<br />

20792<br />

20793<br />

20794<br />

20795<br />

20796<br />

512E<br />

5130<br />

5131<br />

20<br />

EI<br />

C9<br />

E4<br />

5132 CD 3A 51<br />

JR NZ.<br />

POP HL<br />

RET<br />

E4 ~ 5114H IWEITERE POLYGONSTüCKE<br />

I ZEICHNEN<br />

PROGRAM<strong>MZ</strong>EIGER HOLEN<br />

NÄCHSTER BEFEHL<br />

CALL 513A ~ IX/Y-KOORDINATE DES<br />

I ENDPUNKTES ERRECHNEN<br />

5135 CD 6B 51 CALL 516B ILINIE ZUM<br />

I ZEICHNEN<br />

5138<br />

5139<br />

EI<br />

C9<br />

POP<br />

RET<br />

ENDPUNKT<br />

HL PROGRAM<strong>MZ</strong>EIGER HOLEN<br />

NÄCHSTER BEFEHL<br />

513A 21 09 52 LD HL. 5209 I ZEIGER AUF SPEICHER<br />

I FüR ENDWINKEL<br />

20834<br />

20835<br />

20836<br />

20837<br />

20838<br />

20839<br />

20840<br />

20841<br />

20842<br />

5163<br />

5166<br />

5169<br />

516A<br />

22<br />

CD<br />

EI<br />

C9<br />

7C<br />

6B<br />

51<br />

51<br />

LD (517C<br />

CALL 516<br />

POP<br />

RET<br />

HL<br />

20843 516B 3E 44 LD A. 44<br />

20844<br />

20845<br />

20846<br />

20847<br />

20848<br />

20849<br />

516D<br />

516E<br />

21<br />

3E 4D LD A. 4D<br />

20850<br />

20797 513D 11 04 52 LD DE. 5204<br />

20851<br />

20798<br />

I ZEIGER AUF SPEICHER<br />

20852 5174 CD 21 3D CALL 3D2<br />

20799<br />

IFUR ANFANGSWINKEL<br />

20853<br />

20800<br />

20801 5140 01 05 00 LD BC. 0005<br />

20854<br />

LÄNGE REAL-ZAHL<br />

20855 5177 E5 PUSH HL<br />

20802 20856 5178 CD 9D 51 CALL 519<br />

5143 ED BO<br />

LDIR<br />

20803<br />

20804<br />

20805<br />

20806<br />

20807<br />

5145<br />

C3<br />

AB 51<br />

JP 51AB<br />

Schrittwinkel gleich Null ~ An f angspunkt.<br />

und Endpunkt mit Linie verbinden<br />

IENDWINKEL ALS ANFANGS­<br />

IWINKEL VORGEBEN<br />

IX/Y-KOORDINATE AUS<br />

I MITTELPUNKT. RADIUS UND<br />

IANFANGSWINKEL ERRECHNEN<br />

20857<br />

20858<br />

20859<br />

20860<br />

20861<br />

20862<br />

20863<br />

Mittelpunkt 20864<br />

20865<br />

5170<br />

5171<br />

517B<br />

517E<br />

5181<br />

5182<br />

F5<br />

21 F5<br />


SEITE 360 <br />

BASIC 1Z-013B V1_0A <br />

20889<br />

20890 519A C3 7E 16 JP 167E IASCII-ZEICHEN IM ACCU<br />

20891 lOHNE ZU ZÄHLEN AN<br />

20892 I DRUCKER AUSGEBEN<br />

Untersuchen. ob Wert in HL im 8ereich -1000 < HL < +1000 liegt<br />

20893 519D EB EX OE.HL WERT NACH OE<br />

20894 519E 21 E7 03 LD HL. 03E7 999<br />

20895<br />

20896<br />

20897 51Al E5 PUSH HL ; MERKEN<br />

20898 51A2 19 ADD HL.DE<br />

20899 51A3 El POP HL 999<br />

20900 51A4 D8 RET C WERT GRöSSER -1000<br />

20901 51A5 ED 52 SBC HL.DE<br />

20902<br />

20903 51A7 DO RET NC WERT KLEINER +1000<br />

20904 51A8 C3 01 21 JP 2101 DATENFEHLER<br />

20905<br />

20906<br />

X/V-Koordinate des aktuellen Punktes aus Mittelpunkt.<br />

Radius und Anfangswinkel errechnen<br />

20907 51AB s)<br />

ED 5B B9 6A LD DE. (6AB9) I HöCHSTE BENUTZBARE<br />

20908 I RAM-ADRESSE<br />

20909 I


SEITE 362<br />

BASIC 1Z-013B<br />

V1_0A BASIC 1Z<br />

21000 <br />

21001 5209 00 <br />

Befehl PAGE<br />

21002 520A 00<br />

Exponent Endwinkel <br />

21003 Mantisse Endwi nl:el 2 1051 523B 3A CB 40 LD A. (<br />

21004 2 1052 <br />

21005 2 1053 <br />

21006 520E 00<br />

2 1054 523E FE 01 CP 01<br />

21007 520F Exponent<br />

00 00 00 00<br />

SCHRITTWINKEL 2 1055<br />

21008 Mantisse SCHRITTWINKEL 2 105& 5240 C2 F7 4F JP NZ.<br />

21009 2 1057<br />

21010 21058<br />

21011 5213 00<br />

21059 5243 CO 65 40 CALL 4<br />

21012 5214 I Exponent 21060<br />

00 00 00 00<br />

21013 <br />

I Manti sse 21061<br />

21014 IAKTUELLE X-KOORDINATE 21062 5246 7B LD A.E<br />

21015 2 1063 5247 B7 OR A<br />

21016 5218 00<br />

21064 5248 CA 01 21 JP Z.<br />

21017 5219 I Exponent<br />

00 00 00 00<br />

2 1065<br />

21018<br />

I Manti öse 2 1066<br />

21019 I AKTUELLE Y-KOORDINATE , 2 1067 524B FE 49 CP 49<br />

~<br />

21020 1<br />

.1 <br />

21 068 <br />

21 069 524D D2 01 21 JP NC.<br />

21070 <br />

21021 521D 00 <br />

21071<br />

NOP ',I<br />

Ifl<br />

21022 521E 00<br />

21 072 5250 CD -66 1C CALL lC<br />

NO? ,J<br />

21023 521F 00<br />

21073<br />

NOP<br />

21024 5220 00<br />

21074<br />

NOP<br />

21025 5221 00<br />

2 1075 5253 C2 FE 20 JP NZ.<br />

NOP .~ "1076<br />

.:: 1078 5256 3E 09 LD A.<br />

1077<br />

::1026 5222 44<br />

:1<br />

D<br />

21027 5223 30<br />

2 1079<br />

0<br />

21028 5224 2C<br />

2 1080 5258 CO 7E 16 CALL 1<br />

I,<br />

l<br />

21029 5225 30 <br />

2 1081<br />

0<br />

) 2 1082<br />

2103 0 5226 OD WagenrücklaLlf " 1083 525B CD 7E 16 CALL 1<br />

1084<br />

Befehl<br />

TEST V. ,.. 1085<br />

2 1086 525E CD 78 4D CALL 4<br />

2103 1 5227 <br />

~H 08 7<br />

3A CB 40 LD A, (40CB)<br />

21032<br />

DRUCKER MODUS FLAG jl 1088<br />

21033<br />

21034 522A FE 01 CP 01<br />

~ 108 9 5261 3E OD LD A.<br />

21035 IM TEXT-MODUS ? ~ 109 1 5263 CD 7E 16 CALL 1<br />

~ 1092<br />

21036 522C C2 F7 4F JP NZ, 4FF7<br />

21037<br />

INEIN + FEHLER 68 ~ 1093<br />

21038 <br />

• DRUCKER MODUS FEHLER ~l l094 5266 C9 RET<br />

21039 522F CD 66 1C CALL lC66<br />

21040 lüBERPRüFEN, OB NÄCHSTES<br />

21041 IPROGRAMMBYTE GLEICH ~! !095 5267 50 P<br />

21042 5232 IBEFEHLSENDEZEICHEN IST ')1096 5268 52 R<br />

C2 FE 20 JP NZ. 20FE SYNTAX - FEHLER ~1 1097 5269 49 I<br />

21043<br />

21044<br />

~ 109 0<br />

~l l09 8 526A 4E N<br />

t.' 1099 526B 54 T<br />

21045 5235 3E 04 LD A. 04 CODE DRUCKERTEST ~110 0<br />

21046<br />

526C 45 E<br />

~ 110 1 526D 52 R<br />

21047 5237 CD 7E 16 CALL 167E 'ASCII-ZEICHEN IM ACCU ~ 1102<br />

21048<br />

526E 20 Sp4l<br />

lOHNE ZU ZÄHLEN AN ~1103<br />

21049<br />

526F 40 M<br />

• DRUCKER AUSGEBEN ~ 110 4 5270 4F 0<br />

21050 523A C9 RET NÄCHSTER BEFEHL ~I :'1105 5271 44 0<br />

1106 5272 45 E<br />

1107 5273 20 Spac<br />

1108 5274 45 E


SEITE 364<br />

BASIC 1Z-013B V1.0A<br />

BASIC 1Z<br />

2 1157 52A5 Dl POP DE<br />

21109 5275 52 R<br />

21 158 52A6 CD 10 53 CALL 5<br />

21110 5276 52 R<br />

21 159<br />

21111 5277 4F o<br />

21 160<br />

21112 5278 52 R<br />

21 161 52A9 FE EE CP EE<br />

21113 5279 21 21 162<br />

21114 527A 21<br />

Textende<br />

211 63 52AB D8 RET C<br />

21115 527B 00<br />

Vergleichsbefehl<br />

21116 527C 54 T<br />

21117 527D 2E 2 1164 52AC F5 PUSH A<br />

21118 527E 4D o<br />

21165 52AD 3A 65 6A LO A.<br />

211 66<br />

2 1167<br />

Zeiger auf String nach Descriptor (HL) nach OE bereitstellen<br />

2 11 68 52BO F5 PUSH A<br />

2 1169 52Bl 23 INC HL<br />

21119 527F' 46 LD B. (HU STRINGLÄNGE HOLEN<br />

2 11 70 52B2 CD 10 53 CALL 5<br />

21120 5280 23 INC HL<br />

I OFFSET AUF STRING HOLEN<br />

2 1171<br />

21121 5281 5E LD E. (HU<br />

2 1172<br />

21122 5282 · 23 INC HL I<br />

2 11 73 52B5 Cl POP BC<br />

21123 5283 56 LD D. (HU I<br />

2 1174 52B6 E3 EX (SP<br />

21124 5284 2A B5 6A LD HL. (6AB5) ANFANG STRINGTEXTBEREICH<br />

2 1175 52B7 F5 PUSH A<br />

21125 2 1176 52B8 E5 PUSH H<br />

21126 2 11 77 52B9 CD Bl 58 CALL 5<br />

21127 5287 19 ADD HL.DE ; ZEIGER AUF STRING ERRECHNEN<br />

2 1178<br />

21128 5288 EB EX DE.HL NACH DE<br />

2 1179<br />

21129 5289 78 LD A.B STRINGLÄNGE<br />

21180 52BC CD 4A 5E CALL 5<br />

21130 528A C9 RET<br />

Ausdruck auswerten und Zeiger auf Ergebnis bereitstellen<br />

21181<br />

2 1182<br />

1183 52BF 08 EX AF<br />

1184 52CO Fl POP "AF<br />

1185 52Cl FE F6 CP F6<br />

21131 528B ED 5B B7 6A LD OE. (6AB7) ; ANFANG STRINGARBEITSBEREICH<br />

1186<br />

21132 " 1187 52C3 20 lE JR NZ.<br />

21133 1188<br />

21134<br />

21135528F ED 53 D3 38 LD (38D3).DE I ZEIGER AUF<br />

21136 ISTRINGARBEITSBEREICH<br />

Auswertung Vergleich <<br />

21137<br />

21138 11 89 52C5 08 EX AF<br />

21139 5293 ED 5B B9 6A LD DE. (6AB9) ANFANG RECHENSPEICHER<br />

11 90 52C6 38 16 JR C.<br />

21140 1191<br />

21141<br />

21142<br />

21143 5297 D5 PUSH DE , ZEIGER AUF ERGEBNIS MERKEN<br />

Ergebnis Vergleich nicht e<br />

21144 5298 CO 90 52 CALL 529D AUSDRUCK (HL) AUSWERTEN<br />

21145 1192 52C8 01 00 00 LD BC.<br />

21146 1193<br />

21147 529B D1 POP DE ZEIGER AUF ERGEBNIS<br />

1194<br />

21148 529C C9 RET 1195 52CB 71 . LD (H<br />

1196 52CC 23 INC HL<br />

1197 52CD 70 LO (H<br />

Ausdruck mit allen Prioritäten auswerten 1198 52CE 23 INC HL<br />

1199 52CF AF XOR A<br />

21149 529D D5 PUSH OE • ZEIGER FüR ERGEBNIS MERKEN<br />

1200 5200 77 LO (H<br />

21150 529E ED 5B D3 38 LO DE. (38D3) I ZEIGER AUF<br />

1201 52Dl 23 INC HL<br />

21151 ISTRINGARBEITSBEREICH<br />

1202 52D2 77 LD (H<br />

21152 1203 52D3 23 INC HL<br />

21153 1204 52D4 77 LD (HL<br />

21154 52A2 CD DF 58 CALL 58DF lüBERPRüFEN. OB ADRESSE<br />

1205 5205 3E 05 LD A.<br />

21155 I IN OE NICHT MIT STACK<br />

1206<br />

21156 I COLLI DI ERT


SEITE 366<br />

BASIC 1Z-013B V1.0A<br />

BASIC 1Z<br />

21207 5207 32 65 6A LO (6A65).A WERT - FLAG<br />

21208<br />

21209<br />

21210<br />

21211<br />

21212<br />

21213<br />

520A<br />

520B<br />

520C<br />

Fl<br />

El<br />

18 CB<br />

POP AF<br />

POP HL<br />

JR CB .. 52A9H<br />

NÄCHStES PROGRAMMBYTE<br />

PROGRAM<strong>MZ</strong>EIGER HOLEN<br />

I UNTERSUCHEN. OB WEITERE<br />

IVERGLEICHSBEFEHLE<br />

21243 52FB<br />

21244 52FC<br />

21245<br />

21246 52FE<br />

21247<br />

Auswertung Vergleich =><br />

08<br />

30 EO<br />

18 C8<br />

EX<br />

JR<br />

JR<br />

AF<br />

NC<br />

C8<br />

21214<br />

21215<br />

21216<br />

21217 52E1<br />

21218<br />

21219<br />

21220<br />

21221<br />

21222<br />

Ergebnis Vergleich erfüllt vorgeben<br />

520E 01 81 80 LO BC. 8081 I VORGABE FüR -1<br />

I <br />

52E3<br />

52E5<br />

18 E8 JR E8 .. 52CBH WERT EINTRAGEN<br />

FE<br />

20<br />

F5<br />

07<br />

CP<br />

JR<br />

F5<br />

NZ. 07 .. 52EEH<br />

> <br />

21223 52E7 08 EX AF.AF' ERGEBNIS VERGLEICH HOLEN<br />

21224 52E8 28 OE JR Z. OE .. 52C8H VERGLEICH NICHT ERFüLLT<br />

21225<br />

21226 52EA 38 OC JR C. OC .. 52C8H VERGLEICH NICHT ERFüLLT<br />

21227<br />

21228 52EC 18 FO JR FO .. 520EH VERGLEICH ERFüLLT<br />

21229<br />

?<br />

21248<br />

21249<br />

2 1250 5302<br />

21251<br />

5300 FE FO CP F<br />

38 07 JR C.<br />

Auswertung Vergleich =<<br />

2 1252 5304 08 EX AF<br />

28 07 JR Z.<br />

2 1253 5305<br />

21254<br />

21255 5307<br />

21256<br />

21257 5309<br />

21258<br />

21 259 530B<br />

21260 530C<br />

2 1261<br />

2 1262 530E<br />

2 1263<br />

38 05<br />

18 BO<br />

JR C.<br />

JR BO<br />

Auswertung Funktion <br />

08<br />

28 BA<br />

18 CE<br />

EX AF<br />

JR Z.<br />

JR · CE<br />

21230 52EE FE F4 CP F4 (Zwischencode) ?<br />

21231<br />

21232 52FO 20 05 JR NZ. 05 .. 52F7H NEIN<br />

21233<br />

21234 52F2<br />

2123552F3<br />

21236<br />

21237 52F~<br />

21238<br />

Auswertung Vergleich<br />

08<br />

28 E9<br />

18 01<br />

EX<br />

JR<br />

JR<br />

AF.AF'<br />

Z. E9 .. 520EH<br />

01 .. 52C8H<br />

• ERGEBNIS VERGLEICH HOLEN<br />

VERGLEICH ERFüLLT<br />

VERGLEICH NICHT ERFüLLT<br />

21239 52F7 FE F2 CP F2 => >= 7<br />

21240<br />

21241 52F9 38 05 JR C. 05 .. 5300H NEIN<br />

2 1264<br />

2 1265<br />

Ausdruck mit Priorität 4<br />

.<br />

5310 CO 3B 53 CALL<br />

2 1266<br />

21267 5313 FE F7 CP F<br />

2 1268<br />

2 1269 5315 08 RET C<br />

2 1270 5316 3A 65 6A LO A.<br />

21 271<br />

21 272 •<br />

21 273 5319<br />

2 1274 531A<br />

21 275 531B<br />

21 276<br />

F5<br />

23<br />

28<br />

10<br />

zweites Argument für<br />

21242 21 277 5310 CO 3B 53 CALL<br />

2 1278<br />

21279<br />

2 1280 5320 Cl POP B<br />

21 281 5321 F5 PUSH<br />

21 282 5322 E5 PUSH<br />

21 283 5323 CO Bl 58 CALL<br />

21 284<br />

PUSH<br />

INC H<br />

JR Z.


SEITE 368 <br />

BASIC 1Z-013B V1.0A <br />

21285 <br />

21286 5326 CD A6 5D CALL 5DA6 - ROUTINE <br />

21287 <br />

21288 <br />

21289 5329 EI POP HL ; PROGRAM<strong>MZ</strong>EIGER HOLEN <br />

21290 532A Fl POP AF NÄCHSTES PROGRAMMBYTE <br />

21291 532B 18 E6 JR E6 + 5313H lAUF WEITERE AUSDRüCKE <br />

21292 IMIT PRIORITÄT 4 UNTERSUCH. <br />

Zweiten Parameter für + - Routine bereitstellen<br />

21293 532D CD 3B 53 CALL 533B lAUSDRUCK MIT PRIORITÄT 3 <br />

21294 10DER HöHER AUSWERTEN <br />

21295 <br />

21296 5330 Cl POP BC WERTFLAG ERSTER AUSDRUCK <br />

21297 5331 F5 PUSH AF NÄCHSTES PROGRAMM BYTE <br />

21298 5332 E5 PUSH HL PROGRAM<strong>MZ</strong>EIGER MERKEN <br />

21299 5333 CD BI 58 CALL 58Bl I ZEIGER AUF LETZTE ZWEI <br />

21300 I ARGUMENTE BEREITSTELLEN <br />

21301 <br />

21302 5336 CD AF 5D CALL 5DAF ; + - ROUTINE <br />

21303 <br />

21304 <br />

21305 5339 18 EE JR EE + 5329H GERETTETE REGISTER HOLEN <br />

21306 <br />

Ausdruck mit Priorität 3 und höher auswerten<br />

21307 533B CD 67 53 CALL 5367 lAUSRUCK MIT PRIORITÄT 2 <br />

21308 I UND HöHER AUSWERTEN <br />

21309 <br />

21310 533E FE FB CP FB * /


SEITE 370<br />

BASIC 1Z-013B V1.0A BASIC 1Z<br />

Ausdruck auf eingebaute Funktion. selbst<br />

oder Variable mit Vorzeichen untersuchen<br />

definierte Funktion Ausdruck<br />

Variable<br />

auf eingebaute Fu<br />

untersuchen und W<br />

21383<br />

21384<br />

21385<br />

21386<br />

21387<br />

5387<br />

5388<br />

23<br />

CD<br />

14<br />

54<br />

INC HL<br />

CALL 5414<br />

PROGRAM<strong>MZ</strong>EIGER<br />

IPROGRAM<strong>MZ</strong>EIGER IN HL<br />

lAUF NÄCHSTES RELEVANTES<br />

(ZEICHEN STELLEN<br />

+ (Vorzeichen phIs) ?<br />

21433<br />

21 434<br />

21 435<br />

21436<br />

21437<br />

21438<br />

5388 FE F7 CP F7 ;<br />

21388<br />

21389 538D 28 F8 JR Z. F8 ~ 5387H JA ~ VERGESSEN<br />

21439<br />

21390<br />

21 440<br />

21391 538F FE F8<br />

CP F8<br />

(Zwischencode)<br />

21 441<br />

21392<br />

2 1442<br />

21393 5391 20 26 JR NZ, 26 ~ 5389H NICHT VORZEICHEN MINUS<br />

21 443<br />

21394<br />

2 1444<br />

21395 5393 23 INC HL PROGRAM<strong>MZ</strong>EIGER 2 1445<br />

5394 CD 88 53 CALL 5388<br />

AUSDRUCK (HL) AUSWERTEN<br />

21396<br />

21397<br />

,21398<br />

2 1446<br />

2 1447<br />

21448<br />

2 1449<br />

21399 ~ 5376H<br />

5397 18 DD JR DD I VORZEICHEN DES LETZTEN<br />

21400 IAR6UMENTES UMKEHREN 21450<br />

2 1451<br />

53B9<br />

53BC<br />

53BF<br />

53C2<br />

53C3<br />

53C6<br />

53C7<br />

53CA<br />

53CB<br />

CD<br />

CA<br />

CD<br />

08<br />

3A<br />

66 1C<br />

FE 20<br />

CC<br />

65<br />

53<br />

6A<br />

B7<br />

CA FE 20<br />

08<br />

C9<br />

CALL l<br />

JP Z.<br />

CALL 5<br />

EX AF,<br />

LD A. (<br />

OR<br />

JP<br />

A<br />

Z.<br />

EX AF,<br />

RET<br />

21401<br />

21402<br />

21403<br />

21404<br />

21405<br />

21406<br />

21407<br />

21408<br />

21409<br />

Ausdruck mit Priorität 1 oder höher auswerten<br />

5399 CD B9 53 CALL 53B9 (AUSDRUCK AUF KONSTANTE.<br />

lEINGEBAUTE FUNKTION ODER<br />

lVARIABLE UNTERSUCHEN<br />

539C FE FD CP FD ; ~ (Zwischencode)<br />

539E<br />

539F<br />

53AO<br />

CO<br />

23<br />

3A 65 6A<br />

RET NZ<br />

INC HL<br />

LD A. (6A65)<br />

NICHT POTENZIERUNG<br />

PROGRAM<strong>MZ</strong>EIGER<br />

WERTFLAG ERSTES ARGUMENT<br />

21452<br />

2 1453<br />

1454<br />

Wert der eingebauten Funkt<br />

Variablen bereitstellen<br />

53CC<br />

53CO<br />

21455<br />

2 1456 53DO<br />

~ 1457 53D1<br />

1458<br />

AF<br />

32 65 6A<br />

E5<br />

2A BB 6A<br />

XOR A<br />

LO (6A<br />

PUSH H<br />

LD HL.<br />

21410 1459<br />

21411 53A3 FE 03 CP 03 STRINGWERT 7 1460 53D4 37 SCF<br />

21412<br />

ED 52<br />

SBC HL<br />

21413 53A5 CA FB 20 JP Z. 20FB<br />

; JA ~ DATENFEHLER<br />

DA F8 20 JP C. 2<br />

21414<br />

21415<br />

21416<br />

21417<br />

21418<br />

21419<br />

21420<br />

21421<br />

21422<br />

21423<br />

21424<br />

21425<br />

21426<br />

21427<br />

21428<br />

21429<br />

21430<br />

21431<br />

21432<br />

53A8<br />

53A9<br />

53AC<br />

53AD<br />

53AE<br />

53AF<br />

53B2<br />

53B5<br />

5386<br />

53B7<br />

F5<br />

CD<br />

Cl<br />

F5<br />

E5<br />

CD<br />

CD<br />

E1<br />

Fl<br />

18<br />

88<br />

B1<br />

F5<br />

E3<br />

53<br />

58<br />

61<br />

PUSH AF<br />

CALL 5388<br />

POP BC<br />

PUSH AF<br />

PUSH HL<br />

CALL 58Bl<br />

CALL 61F5<br />

POP HL<br />

POP AF<br />

JR E3 ~ 539CH<br />

;<br />

;<br />

WERTFLAG MERKEN<br />

I AUSDRUCK AUF EINGEBAUTE<br />

IFUNKTION. KONSTANTE ODER<br />

I VARIABLE UNTERSUCHEN<br />

TYPFLAG ERSTER WERT<br />

NÄCHSTES PROGRAMMBYTE<br />

PROGRAM<strong>MZ</strong>EIGER MERKEN<br />

(ZEIGER AUF LETZTE ZWEI<br />

I ARGUMENTE BEREITSTELLEN<br />

~ - ROUTINE<br />

PROGRAM<strong>MZ</strong>EIGER HOLEN<br />

NÄCHSTES PROGRAMMBYTE HOLEN<br />

I UNTERSUCHEN. OB WEITERE<br />

I ARGUMENTE MIT GLEICHER PR.<br />

1461 5305<br />

1462<br />

1463 5307<br />

1464<br />

1465<br />

1466 53DA<br />

1467 53DB<br />

1468 53DC<br />

1469<br />

1470 53DE<br />

1471 53DF<br />

1472 53EO<br />

1473<br />

1474 53E2<br />

1475 53E3<br />

1476<br />

1477<br />

1478 53E6<br />

1479<br />

1480 53E8<br />

1481 53E9<br />

" 1482<br />

1483<br />

1484<br />

1485<br />

53EB<br />

53EC<br />

E1<br />

D5<br />

06<br />

12<br />

13<br />

10<br />

D1<br />

CD<br />

FE<br />

23<br />

28<br />

05<br />

FC<br />

14<br />

F7<br />

F8<br />

2B<br />

FE E4<br />

54<br />

POP HL<br />

PUSH DE<br />

LD B. 0<br />

LD (OE<br />

INC DE<br />

DJNZ FC<br />

POP OE<br />

CALL 54<br />

CP F7<br />

INC HL<br />

JR Z. F<br />

DEC<br />

CP<br />

HL<br />

E4<br />

" 1486 53EE CA lA 54 JP Z. 5<br />

~


SEITE 372 <br />

BASIC 1Z-013B V1_0A <br />

21487<br />

21488<br />

21489 53F1 FE 08 CP 08<br />

21490<br />

21491 53F3 30 39 JR NC. 39 ~ 542EH IKEINE EIN-ZIFFERIGE<br />

21492 IZAHLKONSTANTE<br />

21493 53F5 87 OR A ZEILENENDE 7<br />

21494 53F6 C8 RET Z JA<br />

21495 53F7 23 INC HL PROGRAM<strong>MZ</strong>EIGER<br />

21496 53F8 3D oEC A INTEGER-WERT CORRIGIEREN<br />

21497 53F9 06 00 Lo 8. 00 I BC ENTHÄLT I NTEGER-loJERT<br />

21498 I<br />

21499 53FB 4F LD C.A I<br />

21500 53FC E5 PUSH HL I PROGRAM<strong>MZ</strong>EIGER MERKEN<br />

21501 53Fo 05 PUSH OE ZEIGER FüR ERGEBNIS<br />

21502 53FE E8 EX DE.HL<br />

21503 53FF 59 LD E.C I INTEGER-WERT NACH 8C<br />

21504 5400 50 LD D.B I<br />

21505 5401 CD 82 3A CALL 3A82 I INTEGER-WERT IN DE UM­<br />

21506 ISETZEN IN REAL-WERT<br />

21507<br />

21508 5404 01 POP DE ZEIGER AUF ERGEBNIS<br />

21509 5405 E1 POP HL PROGRAM<strong>MZ</strong>EIGER HOLEN<br />

21510 5406 3E 05 LD A. 05 CODE REAL-WERT<br />

21511<br />

21512 5408 32 65 6A LD (6A65).A WERT-FLAG<br />

21513<br />

21514<br />

21515 5408 E8 EX DE.HL<br />

215 16 540C 01 05 00 LD 8C. 0005 LÄNGE ERGEBNIS<br />

21517<br />

21518<br />

21519 540F 09 ADD HL.BC ERGEBNIS RETTEN <br />

21520 5410 EB EX DE.HL <br />

21521 5411 18 01 JR 01 ~ 5414H <br />

21522 <br />

(P~og~amm-)Zeiger in HL auf nächstes ~elevantes Zeichen setzen<br />

21523 5413 23 INC HL PROGRAM<strong>MZ</strong>EIGER<br />

21524 5414 7E LD A. (HU NÄCHSTES PROGRAMMBYTE<br />

21525 5415 FE 20 CP 20 Space ?<br />

21526<br />

21527 5417 28 FA JR Z. FA ~ 5413H I RELEVANTES ZEICHEN SUCHEN<br />

21528<br />

21529 5419 C9 RET<br />

We~t für ~ vorgeben<br />

21530 541A EB EX DE.HL <br />

21531 541B 36 81 LD (HU. 81 +1 VORGEBEN <br />

21532 <br />

21533 541D 3E 05 LD A. 05 CODE REAL-WERT <br />

21534 <br />

21535 541F 32 65 6A LD


SEITE 374<br />

BASIC 1Z-013B V1.0A<br />

21593 5459 FE 22 CP 22 (Anführungszeichen)<br />

21594<br />

21595 545B 20 29 JR NZ, 29 ~ 5486H KEINE STRINGKONSTANTE<br />

21596<br />

Angegebene Stringkonstante bereitstellen<br />

21597 5450 23 INC HL PROGRAM<strong>MZ</strong>EIGER<br />

21598 545E 05 PUSH OE ZEIGER FüR ERGEBNIS<br />

21599 545F E5 PUSH HL PROGRAM<strong>MZ</strong>EIGER MERKEN<br />

21600 5460 CO C4 58 CALL 58C4 I LÄNGE DER STRINGKON­<br />

21601 ISTANTEN AUSZÄHLEN<br />

21602<br />

21603 5463 E3 EX (SP),HL<br />

21604 5464 E5 PUSH HL ZEIGER AUF ANFANG STRING<br />

21605 5465 2A 03 38 LD HL, (3803) I ZEIGER AUF<br />

21606 ISTRINGARBEITSBEREICH<br />

21607<br />

21608 5468 C5 PUSH BC LÄNGE STRING MERKEN<br />

21609 5469 EO 4B B5 6A LD BC, (6AB5) I ZEIGER AUF ANFANG<br />

21610 ISTRINGTEXTBEREICH<br />

21611<br />

21612<br />

2161 3 5460 B7 OR A CARRY-FLAG ZURüCKSETZEN<br />

21614 546E EO 42 SBC HL,BC OFF SET AUF STRING ERRECHNEN<br />

21615<br />

21616 5470 Cl POP BC LÄNGE STRING HOLEN<br />

21617 5471 EB EX OE,HL ZEIGER FüR ERGEBNIS NACH HL<br />

21618 5472 70 LO (HL>, B STRINGLÄNGE EINTRAGEN<br />

21619 5473 23 INC HL<br />

21620 5474 73 LD (HU,E IOFFSET AUF STRING IN<br />

21621 5475 23 INC HL IDESCRIPTOR EINTRAGEN<br />

21622 5476 72 LO (HU,D I<br />

21623 5477 2A 03 38 LO HL, (38D3) I ZEIGER AUF<br />

21624 ISTRINGARBEITSBEREICH<br />

21625<br />

21626 547A 01 POP OE ZEIGER AUF ANFANG STRING<br />

21627 547B CO 00 58 CALL 58DO ISTRINGKONSTANTE IN<br />

21628 ISTRINGARBEITSBEREICH<br />

21629 I üBERTRAGEN<br />

21630 547E 22 D3 38 LO (38D3),HL I ZEIGER AUF STRING­<br />

21631 IARBEITSBEREICH MERKEN<br />

21632<br />

21633 5481 EI POP HL PROGRAM<strong>MZ</strong>EIGER HOLEN<br />

21634 5482 3E 03 LD A, 03 CODE STRING<br />

21635<br />

21636 5484 18 CF JR CF ~ 5455H ~ TYP DES ERGEBNIS MERKEN<br />

21637<br />

21638 5486 FE 28 CP 28 (Klammer auf)<br />

21639<br />

21640 5488 C2 43 5B JP NZ, 5B43 lAUF VARIABLENNAMEN<br />

21641 I UNTERSUCHEN<br />

21642<br />

BASIC 1Z-<br />

Ausdruck in Klammern vorran<br />

21643 548B 23 INC HL<br />

21644 548C CD 9D 52 CALL 52<br />

21645<br />

2 1646<br />

2 1647 548F FE 29 CP 29<br />

2 1648<br />

21649 5491 C2 FE 20 JP NZ,<br />

2 1650<br />

21651<br />

21652 5494 C3 13 54 JP 5413<br />

21653<br />

1654<br />

auf eingebaute Funktion unt<br />

21655 5497 FE E7 CP E7<br />

1656<br />

1657 5499 CA 3A 56 JP Z, 5<br />

1658<br />

1659<br />

1660 549C FE FF CP FF<br />

1661<br />

1662 549E CO RET NZ<br />

" 1663 549F 23 INC HL<br />

1664 54AO 7E LD A, (H<br />

1665 54A1 FE AB CP AB<br />

1666<br />

1667 54A3 30 6C JR NC.<br />

1668<br />

1669 54A5 FE 88 CP 88<br />

1670<br />

" 1671 54A7 28 4F JR Z, 4<br />

1672<br />

1673 54A9 FE AO CP AO<br />

1674<br />

1675 54AB CA 88 55 JP Z, 5<br />

1676<br />

1677<br />

1678 54AE FE 89 CP 89<br />

2 1679<br />

1680 54BO F5 PUSH AF<br />

1681 54B1 20 07 JR NZ,<br />

21682<br />

1683 54B3 23 INC HL<br />

21684 54B4 7E LO A, (H<br />

21685 54B5 FE 40 CP 40<br />

2 1686<br />

21687 54B7 28 1C JR Z, 1<br />

21688<br />

21689 54B9 2B OEC HL<br />

2 1690 54BA CD F9 57 CALL 57<br />

21691<br />

21692<br />

21693 54BD CD 90 52 CALL 52<br />

2 1694<br />

21695<br />

2 1696 54CO CD 04 58 CALL 58<br />

21697<br />

2 1698


SEITE 376 <br />

BASIC 1Z-013B V1.0A <br />

21699 54C3 CD 9B 5D CALL 5D9B c SYNTAX REAL-WERT <br />

21700 <br />

21701 <br />

21702 54C6 F1 POP AF ZWISCHENCOOE FUNKTION <br />

21703 54C7 D5 PUSH DE ZEIGER FüR ERGEBNIS MERKEN <br />

21704 54C8 E5 PUSH HL PROGRAM<strong>MZ</strong>EIGER MERKEN <br />

21705 54C9 21 FB FF LD HL. FFFB -5 (LÄNGE REAL-WERT) <br />

21706 <br />

21707 <br />

21708 54CC 19 AOD HL.DE ZEIGER AUF ARGUMENT ERRECH. <br />

21709 54CD CD 37 55 CALL 5537 I EINGEBAUTE FUNKTION <br />

21710 I AUFRUFEN <br />

21711 <br />

21712 5400 E1 POP HL PROGRAM<strong>MZ</strong>EIGER HOLEN <br />

21713 5401 Dl POP DE ZEIGER FüR ERGEBNIS HOLEN <br />

21714 54D2 C3 14 54 JP 5414 IPROGRAM<strong>MZ</strong>EIGER IN HL <br />

21715 lAUF NÄCHSTES RELEVANTES <br />

21716 I ZEICHEN SETZEN <br />

Funktion PEEK;i) (PEEK über RAM-Bereich)<br />

21717 54D5 F1 POP AF FUNKTION VERGESSEN <br />

21718 54D6 D5 PUSH OE ZEIGER FüR ERGEBNIS <br />

21719 54D7 CD F9 57 CALL 57F9 SYNTAX Klammer auf <br />

21720 <br />

2 1721 <br />

21722 54DA CD 9D 52 CALL 5290 lAUSDRUCK (HL) MIT ALLEN <br />

21723 I~RIORITÄTEN AUSWERTEN <br />

21724 <br />

21725 54DD CD 04 58 CALL 5804 SYNTAX Klammer zu <br />

21726 <br />

21727 <br />

2 1728 54EO CO 98 50 CALL 509B SYNTAX REAL-WERT <br />

21729 <br />

21730 <br />

21731 54E3 EB EX DE.HL <br />

21732 54E4 E3 EX (SP) .HL <br />

21733 54E5 05 PUSH DE ZEIGER FüR ERGEBNIS <br />

21734 54E6 E5 PUSH HL ZEIGER AUF ADRESSE <br />

21735 54E7 CD 21 3D CALL 3D21 I REAL - WERT (HL) UMSETZEN <br />

21736 I HEX-WERT NACH HL <br />

21737 <br />

21738 54EA 40 LD C.L I ADRESSE NACH BC <br />

21739 54EB 44 LD B.H I <br />

21740 54EC E1 POP HL ZEIGER FüR ERGEBNIS <br />

21741 54EO OA LO A. (BC) WERT AUS RAM HOLEN <br />

21742 54EE 5F LO E.A <br />

21743 54EF 16 00 LD O. 00 <br />

21744 <br />

21745 54F1 CD 82 3A CALL 3A82 • IHEX-WERT IN OE UMSETZEN <br />

21746 I IN REAL-WERT NACH (HL) <br />

21747 <br />

21748 54F4 3E 05 LD A. 05 CODE REAL-WERT <br />

21749 <br />

21750 54F6 18 08 JR 08 .. 5400H GERETTETE REGISTER HOLEN <br />

21751 <br />

BASIC 1Z-<br />

Funktionsdekodierung RND<br />

21752 54F8 F5<br />

21753 54F9 23 <br />

21754 54FA CD 14 54 <br />

2 1755 <br />

2 1756 <br />

2 1757 54FD FE 28 <br />

2 1758 <br />

2 1759 54FF 20 03 <br />

21 760 <br />

2 1761 5501 23 <br />

21762 5502 18 B9 <br />

2 1763 <br />

PUSH AF<br />

INC HL<br />

CALL 54<br />

CP 28<br />

JR NZ.<br />

INC HL<br />

JR B9<br />

2 1764 5504 3E 05 <br />

2 1765 <br />

2 1766 5506 32 65 6A <br />

2 1767 <br />

2 1768 <br />

2 1769 5509 EB <br />

21 770 550A 01 05 00 <br />

2 1771 <br />

21 772 <br />

21 773 5500 09 <br />

LD A.<br />

LO (6A<br />

EX OE.H<br />

LO BC.<br />

AOO HL<br />

OE.<br />

21 774 550E EB EX <br />

JR B5<br />

21 775 550F 18 B5 <br />

21 776 <br />

2 1777 5511 FE 83 <br />

2 1778 <br />

2 1779 5513 30 14 <br />

21 780 <br />

CP B3<br />

JR NC.<br />

Funktio'nsdekodierung ASC<br />

21 781 5515 F5 PUSH A<br />

21 782 5516 CO F9 57 CALL 5<br />

2 1783 <br />

2 1784 <br />

2 1785 5519 CO 90 52 CALL<br />

2 1786 <br />

21 787 <br />

21 788 551C CO 04 58 CALL<br />

21 789 <br />

21 790 <br />

21 791 551F 3A 65 6A LD A.<br />

2 1792 <br />

2 1793 <br />

2 1794 5522 FE 03 CP 0<br />

21 795 <br />

2 1796 5524 C2 FB 20 JP NZ<br />

21797 <br />

21 798 <br />

21 799 5527 18 90 JR 9D<br />

2 1800


SEITE 378<br />

BASIC 1Z-013B V1_0A<br />

BASIC 1Z-<br />

21801<br />

21802<br />

21803<br />

21804<br />

5529<br />

552B<br />

FE<br />

30<br />

BA<br />

06<br />

CP<br />

JR<br />

BA<br />

NC, 06 ~ 5533H<br />

Funktionsdekodierung ERN ERL SIZE<br />

LEFT$<br />

WEITER<br />

<br />

INC HL<br />

LD H, (HL><br />

LD L,A<br />

EX (SP),HL<br />

RET<br />

EX DE,HL<br />

LD HL. 0000<br />

ADD HL,SP<br />

LD BC, (3803)<br />

OR A<br />

SBC HL.BC<br />

•<br />

•<br />

•<br />

•<br />

I ZEIGER AUF TABELLE MIT<br />

IANFANGSADRESSEN DER<br />

I EINGEBAUTEN FUNKTIONEN<br />

OFFSET MAL ZWEI<br />

PLUS ANFANG TABELLE<br />

IANFANGSADRESSE DER<br />

I ROUTINE AUS TABELLE<br />

I HOLEN<br />

I<br />

ADRESSE + PROGRAM<strong>MZ</strong>EIGER<br />

ROUTINE AUFRUFEN<br />

PROGRAM<strong>MZ</strong>EIGER NACH OE<br />

ISTACKPOINTER HOLEN<br />

I ZEIGER AUF STRING­<br />

IARBEITSBEREICH HOLEN<br />

CARRV-FLAG ZURüCKSETZEN<br />

DIFFERENZ ERRECHNEN<br />

21844 5554 B7 OR A CARRV-FLAG ZURüCKSETZEN<br />

21845 5555 01 00 01 LD BC. 0100 VORGABE FüR ARBEITSBEREICH<br />

21846<br />

21847<br />

21848<br />

21849<br />

21850<br />

21851<br />

21852<br />

~<br />

2 1866<br />

2 1867<br />

2 1868<br />

5565<br />

5566<br />

2 1869<br />

21870 556E<br />

21 871<br />

2 1872<br />

2 1873 5571<br />

2 1874<br />

21875 5573<br />

21876<br />

21877<br />

2 1878 5576<br />

2 1879 5577<br />

21880<br />

2 1881 5579<br />

21882 557A<br />

2 1883 557B<br />

2 1884<br />

2 1885<br />

21886<br />

2 1887<br />

21 888<br />

21 889<br />

21 890<br />

5558 ED 42 SBC HL.BC FREIE ANZAHL ERRECHNEN 21896<br />

2 1897<br />

555A EB<br />

EX DE,HL<br />

21 898<br />

555B 18 11 JR 11 UMSETZEN<br />

NACH DE<br />

IHEX-WERT IN OE<br />

I IN REAL-WERT<br />

557E<br />

557F<br />

5582<br />

2 1891<br />

2 1892 5584<br />

2 1893 5585<br />

2 1894<br />

2 1895<br />

5F<br />

16 00<br />

CD 82 3A<br />

3E 05<br />

32 65 6A<br />

23<br />

CB 7E<br />

2B<br />

C8<br />

11 6E 6A<br />

EB<br />

CD 87<br />

36 91<br />

50<br />

EB<br />

C3 AF 5D<br />

Funktion CHR.<br />

2 1899 558B<br />

2 1900 558C<br />

LD<br />

LD E,A<br />

0, 0<br />

CALL 3A<br />

LD A,<br />

LD (6A<br />

INC HL<br />

BIT 7.<br />

DEC HL<br />

RET Z<br />

LD DE.<br />

EX DE,<br />

.CALL 5<br />

LD (HL<br />

EX<br />

JP<br />

DE.<br />

5DA<br />

5588 CD F9 57 CALL 5<br />

37<br />

F5<br />

SCF<br />

PUSH A<br />

,<br />

I<br />

I


SEITE 380<br />

21901 5580 D5<br />

21902 558E CD 5A<br />

21903<br />

21904<br />

21905 5591 FE 29<br />

21906<br />

21907 5593 28 OC<br />

21908<br />

21909 5595 FE 2C<br />

21910<br />

21911 5597 C2 FE<br />

21912<br />

21913<br />

21914 559A 23<br />

21915 5598 CO 53<br />

21916<br />

21917<br />

21918 559E 01<br />

21919 559F 18 E8<br />

21920<br />

21921 55A1 23<br />

21922 55A2 CD 53<br />

21923<br />

21924<br />

21925 55A5 01<br />

21926 55A6 F5<br />

21927 55A7 09<br />

21928 55A8 11 OF<br />

21929<br />

21930<br />

21931 55A8 06 00<br />

21932<br />

21933 55AD F1<br />

21934 55AE 38 05<br />

21935<br />

21936 5580 12<br />

21937 5581 13<br />

21938 5582 04<br />

21939 5583 18 F8<br />

21940<br />

21941 5585 48<br />

21942 5586 2A 03<br />

21943<br />

21944<br />

21945 5589 E5<br />

21946 55BA 1B<br />

21947 558B IA<br />

21948 55BC 77<br />

21949 55BD 23<br />

21950 55BE 10 FA<br />

21951<br />

21952 55CO 01<br />

21953 55Cl CD C7<br />

21954<br />

21955<br />

21956 55C4 C3 14<br />

21957<br />

21958<br />

BASIC 1Z-013B<br />

PUSH DE<br />

4D CALL 4D5A<br />

CP 29<br />

JR Z. OC ~ 55A1H<br />

CP 2C<br />

20 JP NZ. 20FE<br />

INC HL<br />

40 CALL 4053<br />

POP DE<br />

JR EB ~ 558CH<br />

INC HL<br />

40 CALL 4D53<br />

POP DE<br />

PUSH AF<br />

EXX<br />

11 LD DE. 110F<br />

LD B. 00 •<br />

POP AF<br />

JR C. 05 ~ 55B5H •<br />

LO


SEITE 382 <br />

BASIC 1Z-013B V1.0A <br />

22015 55FF 48 LD C.B LÄNGE HEX-ASCII-TEXT<br />

22016 5600 2A 03 38 LO HL. (3803) I ZEIGER AUF<br />

22017 ISTRINGARBEITSBEREICH<br />

22018<br />

22019 5603 E5 PUSH HL MERKEN<br />

22020 5604 CD 00 58 CALL 5800 I IN S ANGEGEBENE ANZAHL<br />

22021 I ZEICHEN VON (OE) NACH<br />

22022 I (HL) üBE~TRAGEN<br />

22023 5607 EB EX DE.HL<br />

22024 5608 E1 POP HL ZEIGER AUF STRING<br />

22025 5609 D9 EXX<br />

22026 560A Dl POP OE ZEIGER FüR DESCRIPTOR<br />

22027 560B D9 EXX<br />

22028 560C C3 CB 55 JP 55CB IDESCRIPTOR FüR ERGEBNIS<br />

22029 I AUFBAUEN<br />

22030<br />

22031 560F CD 21 3D CALL 3021 IREAL-WERT (HL) UMSETZEN<br />

2203 2 I IN INTEGER NACH HL<br />

22033<br />

2203 4 5612 11 OF 11 LD OE. 110F I ZEIGER AUF ZWISCHEN­<br />

22035 I SPEICHER FüR HEX-WERT<br />

22036<br />

22037 5615 C9 RET<br />

Hex-Wert in HL umsetzen in Hex-ASCII-Zeichenfolge nach (OE)<br />

22038 5616 05 PUSH OE ZEIGER AUF ASCII-SPEICHER<br />

22039 5617 7C LD A.H H- BYTE WERT<br />

22040 5618 CO 29 56 CALL 5629 IH-NIBsLE UMSETZEN<br />

22041 I IN ASCII NACH (OE)<br />

22042<br />

22043 561B 7C LO A.H H-BYTE WERT<br />

22044 561C CO 2D 56 CALL 562D IL-NIBBLE UMSETZEN<br />

22045 I IN ASCII NACH (DE)<br />

22046<br />

22047 561F 7D LD A.L L-BYTE WERT<br />

22048 5620 CD 29 56 CALL 5629 IH- NIBSLE UMSETZEN<br />

22049 I IN ASCII NACH (OE)<br />

22050<br />

22051 5623 70 LO A.L L- BYTE WERT<br />

22052 5624 CD 2D 56 CALL 5620 IL-NIBBLE UMSETZEN<br />

22053 I IN ASCII NACH (OE)<br />

22054<br />

22055 5627 Dl POP OE ZEIGER AUF ASCII-TEXT<br />

2 2056 5628 C9 RET<br />

H-Nibble des Hex - Wertes im Accu umsetzen in ASCII nach (DE)<br />

22057 5629 07 RLCA IH-NIBBLE AUF L-NIBBLE<br />

22058 562A 07 RLCA I SCHIEBEN<br />

22059 562B 07 RLCA I<br />

22060 562C 07 RLCA I<br />

22061 5620 E6 OF ANO A. OF L-NIBBLE MASKIEREN<br />

22062<br />

22063 562F C6 30 ADO A. 30 UMSETZEN IN ASCII<br />

22064<br />

22065 5631 FE 3A CP 3A 0-9 ?<br />

22066<br />

BASIC 1Z<br />

22067 5633 38 02 JR C.<br />

22068<br />

22069 5635 C6 07 AOO A<br />

22070<br />

22071 5637 12 LO


SEITE 384 <br />

BASIC 1Z-013B V1_0A <br />

Oescriptor für Leerstring aufbauen<br />

22118 5666 E1 POP HL ZEIGER FüR OESCRIPTOR<br />

22119 5667 CO 87 50 CALL 5087 (HL) 5 BYTE NULL EINTRAGEN<br />

22120<br />

22121<br />

22122 566A C3 E5 55 JP 55E5 CODE STRING VORGEBEN<br />

22123<br />

22124<br />

Real-Wert (HL) umsetzen in Integer mit Untersuchung auf kleiner 256<br />

22125 566D CD OF 56 CALL 560F • IREAL-WERT (HL) UMSETZEN <br />

22126 I IN INTEGER NACH HL <br />

22127 <br />

22128 5670 7C LD A.H H-BYTE WERT <br />

22129 5671 B7 OR A GLEICH NULL ? <br />

22130 5672 C2 01 21 JP NZ. 2101 I ZU GRaSS ~ DATENFEHLER. <br />

22131 <br />

22132 <br />

22133 5675 7D LD A.L L-BYTE WERT <br />

22134 5676 C9 RET <br />

Befehl STR$<br />

22135 5677 E5 PUSH HL ZEIGER AUF ARGUMENT <br />

22136 5678 CO 69 3C CALL 3C69 IREAL-ZAHL (HL) UMSETZEN <br />

22137 I IN ASCII NACH ZWISCHEN­<br />

22138 I SPEICHER <br />

22139 567B 1A LD A. (OE) VORZEICHEN HOLEN <br />

22140 567C FE 20 CP 20 Space ? <br />

22141 <br />

22142 567E 20 01 JR NZ. 01 ~ 5681H RELVANTES ZEICHEN <br />

22143 <br />

22144 5680 13 INC OE I Space VERGESSEN <br />

22145 5681 2A D3 38 LO HL. (38D3) I ZEIGER AUF <br />

22146 ISTRINGARBEITSBEREICH <br />

22147 <br />

22148 5684 06 00 LD B. 00 VORGABE FüR LÄNGENZÄHLER <br />

22149 <br />

22150 5686 1A LD A. (DE) EIN ZEICHEN TEXT HOLEN <br />

22151 5687 B7 OR A TEXTENDE ? <br />

22152 5688 28 06 JR Z. 06 ~ 5690H JA <br />

· 22153<br />

22154 568A 77 LD (HL>.A I ZEICHEN üBERTRAGEN<br />

22155 568B 13 INC DE ZEIGER AUF ZAHL<br />

22156 568C 23 INC HL ZEIGER AUF ARBEITSBEREICH<br />

22157 568D 04 INC B ZÄHLER ANZAHL ZEICHEN<br />

22158 568E 18 F6 JR F6 ~ 5686H IUNTERSUCHEN. OB WEITERE<br />

22159 I ZEICHEN<br />

22160 5690 78 LD A.B LÄNGE ZAHLTEXT<br />

22161 5691 B7 OR A GLEICH NULL ?<br />

22162 5692 CA 66 56 JP Z. 5666 • IJA ~ DESCRIPTOR FüR<br />

22163 ILEERSTRING VORGEBEN<br />

22164<br />

22165 5695 EO 5B D3 38 LO DE. (3803) I ZEIGER AUF<br />

22166 ISTRINGARBEITSBEREICH<br />

22167<br />

22168<br />

22169 5699 09 EXX<br />

BASIC 1Z~<br />

22170 569A 01 POP OE<br />

22 171 569B 09 EXX<br />

22172 569C 48 LO C.B<br />

22173 5690 C3 C7 55 JP 55C7<br />

22 174<br />

22175<br />

Funktion ASC<br />

22 176 56AO E5 PUSH HL<br />

22177 56Al CD 7F 52 CALL 52<br />

22178<br />

22179<br />

22180 56A4 B7 OR A<br />

22181 56A5 28 01 JR Z. 0<br />

22 182<br />

22183 56A7 1A LO A.


SEITE 386<br />

BASIC 1Z-013B V1.0A<br />

Funktion LEFT$<br />

22215 56C7 CD E5 57 CALL 57E5 IISTRING UND 2-BYTE-WERT<br />

22216 I BERE I TSTELLEN<br />

22217<br />

22218 56CA SYNTAX Klamme~ zu<br />

CD 04 58 CALL 5804 22219<br />

22220<br />

DE 57 CALL 57DE<br />

22221 56CD CD<br />

22222<br />

22223<br />

22224 56DO EB<br />

22225 56D1 7E<br />

22226 56D2 B9<br />

22227 56D3 30<br />

22228<br />

22229 56D5 4F<br />

22230 5606 71<br />

22231 56D7 01<br />

22232<br />

22233<br />

22234 56DA 3E<br />

22235<br />

22236 56DC 09<br />

22237 56DD EB<br />

22238 56DE 32<br />

22239<br />

22240<br />

22241 56El C3<br />

22242<br />

22243<br />

01<br />

05 00<br />

03<br />

65 6A<br />

14 54<br />

EX DE.HL<br />

LD A. (HL><br />

CP C<br />

JR NC. 01 ~<br />

I<br />

LD C.A<br />

LD (HL> .C<br />

LD BC. 0005<br />

L<br />

LD A. 03<br />

ADD HL.BC<br />

EX DE.HL<br />

LD (6A65).A<br />

JP 5414<br />

56D6H<br />

I üBERPRüFEN. OB WERT IN<br />

IBC KLEINER 2~6 IST<br />

STRINGLÄNGE HOLEN<br />

ANGEGEBENER LEFT$-WERT<br />

STRING IST LÄNGER<br />

STRINGLÄNGE VORGEBEN<br />

NEUE STRINGLÄNGE<br />

LÄNGE DESCRIPTOREINTRAG<br />

CODE STRING<br />

DESCRIPTOR RETTEN<br />

ZEIGER NACH OE<br />

TYP-WERT MERKEN<br />

IPROGRAM<strong>MZ</strong>EIGER IN HL<br />

lAUF NÄCHSTES RELEVANTES<br />

I ZEICHEN SETZEN<br />

Funktion<br />

RIGHT$<br />

22244<br />

22245<br />

22246<br />

22247<br />

22248<br />

22249<br />

22250<br />

22251<br />

22252<br />

22253<br />

22254<br />

22255<br />

22256<br />

22257<br />

22258<br />

22259<br />

22260<br />

22261<br />

22262<br />

22263<br />

22264<br />

22265<br />

22266<br />

22267<br />

22268<br />

22269<br />

22270<br />

56E4<br />

56E7<br />

56EA<br />

56ED<br />

56EE<br />

56EF<br />

56FO<br />

56F2<br />

56F3<br />

56F4<br />

56F5<br />

56F6<br />

56F7<br />

56F8<br />

56F9<br />

56FB<br />

56FC<br />

56FD<br />

CD<br />

CD<br />

CD<br />

E5<br />

04<br />

DE<br />

EB<br />

7E<br />

91<br />

30 02<br />

AF<br />

4E<br />

71<br />

23<br />

86<br />

77<br />

23<br />

3E 00<br />

8E<br />

57<br />

58<br />

57<br />

77<br />

01 03 00<br />

CALL<br />

I<br />

BASIC 1Z<br />

22271<br />

22272 5700 18 D8 JR D8<br />

22273<br />

Funktion MID$<br />

"<br />

:<br />

J.:<br />

CALL<br />

CALL<br />

57E5<br />

5804<br />

57DE<br />

EX DE.HL<br />

LD A. (HL><br />

SUB C<br />

JR NC. 02<br />

XOR A<br />

LD C. (HL><br />

LD (HL>. C<br />

INC HL<br />

ADD A. (HL><br />

LD (HL> .A<br />

INC HL<br />

LD A. 00<br />

ADC A, (HL><br />

LD<br />

LD<br />

(HL> ,A<br />

BC, 0003<br />

~ 56F4H<br />

I<br />

ISTRING UND 2- BYTE-WERT<br />

I BERE I TSTELLEN<br />

SYNTAX Klammer zu<br />

I üBERPRüFEN. OB WERT IN<br />

IBC KLEINER 256 IST<br />

LÄNGE STRING HOLEN<br />

ANGEGEBENE LÄNGE RIGHT$<br />

STRING IST LÄNGER<br />

KEIN ZEICHEN VERGESSEN<br />

NEUE LÄNGE GLEICH ALTE<br />

NEUE LÄNGE EINTRAGEN<br />

ZEIGER AUF OFFSET<br />

10FFSET AUF STRING<br />

I CORRIGIEREN<br />

I<br />

I<br />

I<br />

I<br />

I<br />

LÄNGE STRING-DESCRIPTOR<br />

, ~ "<br />

>r<br />

1 ,<br />

I .<br />

";~<br />

";'~<br />

" /<br />

~; ;1'<br />

' ,I<br />

'.<br />

' ~<br />

'i 1j<br />

I'<br />

-<br />

"" .<br />

"i<br />

)'<br />

I<br />

1 ; 1<br />

:1 1<br />

,<br />

' "<br />

. 1<br />

,"<br />

! '<br />

.J<br />

\'<br />

d el i<br />

!<br />

;),<br />

22274 5702<br />

22275<br />

22276<br />

22277 5705<br />

22278<br />

22279<br />

22280 5708<br />

22281 5709<br />

22282<br />

22283<br />

22284 570C<br />

22285 570D<br />

22286 570E<br />

22287<br />

22288 5710<br />

22289<br />

22290 5712<br />

22291<br />

22292<br />

22293 5715<br />

22294 5716<br />

22295 5717<br />

22296<br />

22297<br />

22298 571A<br />

22299 571B<br />

22300 571C<br />

22301<br />

22302<br />

22303 571F<br />

22304<br />

22305<br />

22306 5722<br />

22307<br />

22308<br />

22309 5725<br />

22310 5726<br />

22311<br />

22312<br />

CD E5 57<br />

CD DE 57<br />

B7<br />

CA 01 21<br />

F5<br />

7E<br />

FE 29<br />

28 24<br />

CD 32 33<br />

05<br />

EB<br />

01 05 00<br />

09<br />

EB<br />

CD 5A 4D<br />

CD<br />

CD<br />

D1<br />

Cl<br />

04<br />

53<br />

58<br />

4D<br />

CALL 5<br />

CALL 5<br />

OR A<br />

JP Z.<br />

PUSH A<br />

LD A. (H<br />

CP 29<br />

JR Z.<br />

CALL 3<br />

PUSH D<br />

EX DE,H<br />

LD BC,<br />

ADD HL<br />

EX DE,H<br />

CALL 4D<br />

CALL 5<br />

CALL 4D<br />

POP DE<br />

POP BC<br />

I<br />

I<br />

l<br />

22313<br />

223 14<br />

2231 5<br />

I<br />

22316<br />

22317<br />

2231 8<br />

223 19<br />

22320<br />

22321<br />

22322<br />

22323<br />

22324<br />

22325<br />

5727<br />

5728<br />

5729<br />

572A<br />

572B<br />

I<br />

I<br />

I<br />

5720<br />

572E<br />

572F<br />

5731<br />

5732<br />

5733<br />

5734<br />

4F<br />

EB<br />

7E<br />

90<br />

38 OE<br />

3C<br />

B9<br />

30 01<br />

4F<br />

78<br />

3D<br />

18 BE<br />

LD C.A<br />

EX DE.H<br />

LD A. (H<br />

SUB B<br />

JR C.<br />

INC A<br />

CP C<br />

JR NC.<br />

LD C.A<br />

LD A.B<br />

DEC A<br />

JR BE


SEITE 388<br />

BASIC 1Z-013B V1_0A BASIC 1Z-<br />

22326 5736 23 INC HL Klammer zu üBERSPRINGEN 22382 576E IB DEC DE<br />

22327<br />

22328<br />

5737 3E FF LD A, FF 255 ALS LÄNGE VORGEBEN 22383 576F<br />

22384 5770<br />

1A<br />

3C<br />

LD A,


22442<br />

22443<br />

22445<br />

22446<br />

22450<br />

22451<br />

22455<br />

22456<br />

22459<br />

22463<br />

22474<br />

22476<br />

22477<br />

22479<br />

22480<br />

22483<br />

22485 <br />

22490<br />

22497<br />

22498<br />

22502<br />

22503<br />

22506<br />

22507<br />

22509<br />

22510<br />

22512<br />

22515<br />

22516<br />

22523<br />

22524<br />

22526<br />

22530<br />

22531<br />

22533<br />

22538 <br />

22536 5808 C3 FE 20 JP 20FE<br />

22537<br />

Syntaxuntersuchung auf Klam<br />

22529 5801 C3 FE 20 JP 20FE<br />

Syntaxuntersuchung auf Klam<br />

I ZEICHEN STELLEN 22522 57FA CD 14 54 CALL 54<br />

überprüfen, ob Wert in BC k<br />

22508 57EC CD 32 33 CALL 33<br />

BASIC 1Z-<br />

22505 57E9 CD 90 52 CALL 52<br />

OFFSET AUF STRING ERRECHNEN 22504 57E8 05 PUSH OE<br />

22514 57F2 CO 5A 40 CALL 40<br />

22511 57EF CO 7A 50 CALL 50<br />

22501 57E5 CD FA 57 CALL 57<br />

22532 5804 FE 29 CP 29<br />

22534 5806 23 INC HL<br />

22525 57FO FE 28 CP 28<br />

CARRY-FLAG ZURüCKSETZEN 22527 57FF 23 INC HL<br />

22521 57F9 23 INC HL<br />

22517 57F5 4B LO C.E<br />

22518 57F6 42 LO B,O<br />

22519 57F7 01 POP OE<br />

22499 57E3 79 LO A.C<br />

Stringwert und 2-Byte-Wert<br />

22535 5807 C8 RET Z<br />

22494 570E 78 LO A,B<br />

22528 5800 C8 RET Z<br />

22496 57EO C2 01 21 JP NZ.<br />

22495 570F B7 OR A<br />

22520 57F8 C9 RET<br />

22500 57E4 C9 RET<br />

I 22513<br />

ZEIGER AUF NÄCHSTE STELLE<br />

22478 57CE C3 14 54 JP 5414 IPROGRAM<strong>MZ</strong>EIGER IN HL AUF<br />

LO OE. (6AB5) ANFANG STRINGTEXTBEREICH<br />

LO OE, 0006 LÄNGE AUFGEBAUTER STRING<br />

CARRY-FLAG ZURüCKSETZEN<br />

OB WERT<br />

IGRöSSER STELLENWERT<br />

LO (HU, E IOFFSET AUF STRING IN<br />

10ESCRIPTOR EINTRAGEN<br />

36 06 LO (HU, 06 LÄNGE NACH OESCRIPTOR<br />

AOO HL,BC RESTWERT CORRIGIEREN<br />

I WERT STELLE EIN MAL<br />

ISTRINGARBEITSBEREICH<br />

I NÄCHSTES RELEVANTES<br />

ISTRINGARBEITSBEREICH<br />

22472 57C8 El POP HL PROGRAM<strong>MZ</strong>EIGER HOLEN<br />

LO A, 03 ERGEBNIS TYP STRING<br />

ZEIGER FüR ERGEBNIS<br />

LO


SEITE 392 <br />

BASIC 1Z-013B V1.0A <br />

Variablennamen (HL) auswerten und Zeiger auf Variable <br />

nach BC; Variablenartcode nach Accu bereitstellen <br />

22539 580B ED 5B B7 6A LD DE. (6AB7) I ZEIGER AUF ANFANG<br />

22540 ISTRINGARBEITSBEREICH<br />

22541<br />

22542<br />

22543580F ED 53 D3 38 LD (38D3).DE I ZEIGER AUF<br />

22544 ISTRINGARBEITSBEREICH<br />

22545<br />

22546<br />

22547 5813 ED 5B B9 6A LD DE. (6AB9) I ZEIGER AUF<br />

22548 I RECHENSPE I CHER<br />

22549<br />

22550<br />

22551 5817 CD 14 54 CALL 5414 IPROGRAM<strong>MZ</strong>EIGER IN HL AUF<br />

22552 I NÄCHSTES RELEVANTES<br />

22553 I ZEICHEN STELLEN<br />

22554 581A FE 41 CP 41 ANFANG BUCHSTABEN<br />

22555<br />

22556 581C DA FE 20 JP C, 20FE IKEIN BUCHSTABE +<br />

22557 I SYNTAX - FEHLER<br />

22558<br />

22559 581F FE 5B CP 5B ENDE BUCHSTABEN<br />

22560<br />

22561 5821 D2 FE 20 JP NC. 20FE IKEIN BUCHSTABE +<br />

22562 ISYNTAX - FEHLER<br />

22563<br />

22564 5824 D5 PUSH DE ZEIGER MERKEN<br />

22565 5825 CD 8B 58 CALL 588B IVARIABLENNAMEN (HL) IM<br />

22566 IZWISCHENSPEICHER BEREIT­<br />

22567 I STELLEN<br />

22568 5828 7E LD A, (HU NÄCHSTES PROGRAMMBYTE<br />

22569 5829 FE 28 CP 28 ( (Klammer auf)<br />

22570<br />

22571 582B CA F4 58 JP Z. 58F4 INDIZIERTE VARIABLE<br />

22572<br />

22573<br />

22574 582E E5 PUSH HL PROGRAM<strong>MZ</strong>EIGER MERKEN<br />

22575 582F CD 06 5C CALL 5C06 VARIABLE SUCHEN<br />

22576<br />

22577<br />

22578 5832 30 06 JR NC, 06 + 583AH VARIABLE NICHT GEFUNDEN<br />

22579<br />

22580 5834 79 LD A,C TYPFLAG NACH ACCU<br />

22581 5835 4D LD C,L I ZEIGER AUF VARIABLE<br />

22582 5836 44 LD B,H • NACH BC<br />

22583 5837 EI POP HL PROGRAM<strong>MZ</strong>EIGER HOLEN<br />

22584 5838 01 POP DE GERETTETES REGISTER HOLEN<br />

22585 5839 C9 RET<br />

Neue Variable einfügen<br />

22586 583A IA LD A,


SEITE 394<br />

BASIC 1Z-013B V1_0A<br />

BASIC 1Z<br />

Va~iablennamen (HL) im Zwischenspeiche~ bereitstellen Zeiger auf letzten zwei Ar<br />

22654 587E CD 14 54 CALL 5414 IPROGRAM<strong>MZ</strong>EIGER IN HL AUF 22705 58Bl 21 FB FF LD HL.<br />

22655 I NÄCHSTES RELEVANTE 22706<br />

22656<br />

22657<br />

22658<br />

22659<br />

22660<br />

5881 FE 41 CP 41<br />

I ZEICHEN STELLEN<br />

ANFANG BUCHSTABEN<br />

5883 DA FE 20 JP C. 20FE 'KEIN BUCHSTA8E +<br />

'SYNTAX - FEHLER<br />

22707<br />

22708<br />

22709<br />

22710<br />

22711<br />

22661 22712<br />

22662 5886 FE 5B CP 5B ENDE BUCHSTABEN 22713<br />

22663<br />

58B4<br />

58B5<br />

58B6<br />

58B7<br />

19<br />

EB<br />

05<br />

21 FB FF<br />

ADD HL<br />

EX DE.<br />

PUSH O<br />

LD HL.<br />

22714 58BA 19 ADD HL<br />

22664 5888 02 FE 20 JP NC. 20FE IKEIN BUCHSTABE +<br />

22715 58BB D1<br />

POP DE<br />

22665<br />

I SYNTAX - FEHLER<br />

22716 58BC 3A 65 6A LD A. (<br />

22666 22717<br />

22667<br />

22668<br />

588B 11 OF 11 LD OE. 110F ZEIGER AUF ZWISCHENSPEICHER 22718<br />

22719 58BF B8 CP 8<br />

22669 22720 58CO C8 RET Z<br />

22670 588E 06 00 LD B. 00 • ZÄHLER ANZAHL ZEICHEN 22721 58Cl C3 FB 20 JP 20F<br />

22671 22722<br />

22672 5890 13 INC OE ZEIGER AUF ZWISCHENSPEICHER 22723<br />

22673 5891 7E<br />

LD A. (HU<br />

NÄCHSTES PROGRAMMBYTE HOLEN<br />

22674 5892 CD C7 3A CALL 3AC7<br />

'UNTERSUCHEN. OB ACCU<br />

Länge der Zeichenkette (HL<br />

22675<br />

'GLEICH VARIABLENNAME­<br />

22676<br />

'ZEICHEN IST 22724 58C4 06 FF LD B.<br />

22677 5895 38 OB JR C. OB + 58A2H KEIN VARIABLENNAMENZEICHEN 22725<br />

22678<br />

22726 58C6 04 INC B<br />

22679 5897<br />

22680 5898<br />

22681 5899<br />

22682 589A<br />

12<br />

04<br />

78<br />

FE 03<br />

LD (OE). A<br />

INC B<br />

LD A.8<br />

CP 03<br />

ZEICHEN MERKEN<br />

ZÄHLER ANZAHL ZEICHEN<br />

ZÄHLER HOLEN<br />

LÄNGE MAXIMAL<br />

22683 22731 58CB FE 22 CP 22<br />

589C 38 01 JR C. 01 + 589FH NOCH OK<br />

22684<br />

22685<br />

22686<br />

22727<br />

22728<br />

22729<br />

22730<br />

22732<br />

22733<br />

22734<br />

589E 05<br />

DEC B<br />

ZÄHLER MINUS EINS<br />

22687 589F 23 INC HL ZEIGER AUF PROGRAMMTEXT 22735<br />

22688 58AO 18 EE JR EE + 5890H IWEITERE ZEICHEN<br />

22689 I UNTERSUCHEN<br />

58C7<br />

58C8<br />

58C9<br />

58CA<br />

58CD<br />

58CE<br />

7E<br />

87<br />

C8<br />

23<br />

C8<br />

18 F6<br />

LD A.<br />

OR A<br />

RET Z<br />

INC HL<br />

RET Z<br />

JR F6<br />

String mit Länge in B von<br />

22690 58A2 11 OF 11 LD DE. 110F 'ZEIGER AUF SPEICHER 22736 5800 78 LD A:B<br />

'MIT VARIABLENNAMEN<br />

22691<br />

22692<br />

22693<br />

22694<br />

22695<br />

22696<br />

22697<br />

22698<br />

22699<br />

22700<br />

58A5<br />

58A6<br />

58A7<br />

58A8<br />

58AA<br />

58AC<br />

58AD<br />

EB<br />

70<br />

EB<br />

OE 05<br />

FE<br />

CO<br />

OE<br />

24<br />

EX<br />

LD<br />

EX<br />

LD<br />

DE.HL<br />

(HU.B<br />

DE.HL<br />

C. 05<br />

CP 24<br />

RET NZ<br />

LD C. 03<br />

LÄNGE VOR NAME EINTRAGEN<br />

CODE REAL- VARIA8LE<br />

$ (Kennung String)<br />

KEINE STRINGVARIABLE<br />

CODE STRING-VARIABLE<br />

22701<br />

03<br />

22702 22748<br />

22703 58AF 23<br />

INC HL PROGRAM<strong>MZ</strong>EIGER 22749<br />

22704 58BO C9<br />

RET<br />

22750<br />

22737 58D1<br />

22738 5802<br />

22739 5803<br />

22740 58D4<br />

22741 5805<br />

22742 58D6<br />

22743 5807<br />

22744<br />

22745<br />

22746<br />

22747<br />

5809<br />

58DA<br />

58DD<br />

58DE<br />

B7<br />

C8<br />

1A<br />

77<br />

13<br />

23<br />

10 FA<br />

EB<br />

CD DF 58<br />

EB<br />

C9<br />

OR A<br />

RET Z<br />

LD A.<br />

LD (H<br />

INC OE<br />

INC HL<br />

DJNZ F<br />

EX DE<br />

CALL 5<br />

EX DE<br />

RET


SEITE 396<br />

BASIC 1Z-013B V1_0A<br />

überprüfen. ob Adresse in OE mit Stack collidiert<br />

22751 58DF<br />

22752 58EO<br />

22753<br />

22754<br />

22755 58E3<br />

22756 58E4<br />

22757 58E5<br />

22758 58E6<br />

22759<br />

22760 58E8<br />

22761 58E9<br />

22762 58EA<br />

22763<br />

22764<br />

E5<br />

21<br />

39<br />

25<br />

25<br />

ED<br />

E1<br />

DO<br />

C3<br />

00<br />

52<br />

B9<br />

00<br />

20<br />

PUSH HL<br />

LD HL. 0000<br />

ADD HL.SP<br />

DEC H<br />

DEC H<br />

SBC HL.DE<br />

POP HL<br />

RET NC<br />

JP 20B9<br />

REGISTER RETTEN<br />

'STACKPOINTER HOLEN<br />

•• VORGABE FüR ARBEITS­<br />

• BEREICH<br />

ADRESSE üBERPRüFEN<br />

GERETTETES REGISTER HOLEN<br />

ADRESSE IST OK<br />

• FEHLER 6<br />

'SPEICHER ZU KLEIN<br />

Dimensionierung bereitstellen und Variable dimensionieren<br />

22765 58ED<br />

22766<br />

22767<br />

22768<br />

22769 58F1<br />

22770 58F2<br />

22771<br />

ED<br />

D5<br />

18<br />

5B<br />

08<br />

B9 6A LD DE. (6AB9)<br />

PUSH DE<br />

JR 08 ~ 58FCH<br />

• ZEIGER AUF ANFANG<br />

I RECHENSPE I CHER<br />

ZEIGER AUF RECHENSPEICHER<br />

EINSPRUNG IN ROUTINE<br />

Wert dimensionierte Variable bereitstellen<br />

22772 58F4<br />

22773 58F5<br />

22774<br />

22775<br />

22776 58F8<br />

22777 58F9<br />

22778<br />

22779<br />

22780 58FC<br />

22781<br />

22782 58FE<br />

22783 58FF<br />

22784 5900<br />

22785 5901<br />

22786 5902<br />

22787<br />

22788<br />

22789 5905<br />

22790<br />

22791<br />

22792 5908<br />

22793 5909<br />

22794 590A<br />

22795 590B<br />

22796 590C<br />

22797 590D<br />

22798 590E<br />

22799<br />

22800<br />

22801 5911<br />

22802 5912<br />

AF<br />

32<br />

23<br />

22<br />

06<br />

09<br />

E1<br />

E5<br />

E5<br />

2A<br />

11<br />

E5<br />

1A<br />

77<br />

13<br />

23<br />

47<br />

CD<br />

Dl<br />

22<br />

41<br />

3D<br />

00<br />

D3<br />

OF<br />

DO<br />

D3<br />

5B<br />

5B<br />

38<br />

11<br />

58<br />

38<br />

XOR A<br />

LD (5B41>. A<br />

INC HL<br />

LO (5B3D).HL<br />

LD B. 00<br />

EXX<br />

POP HL<br />

PUSH HL<br />

PUSH HL<br />

LD HL. (38D3)<br />

LD DE. 110F<br />

PUSH HL<br />

LD A. .A<br />

INC OE<br />

INC HL<br />

LD B.A<br />

CALL 58DO<br />

POP DE<br />

LD (38D3).HL<br />

CODE AUFRUF<br />

FLAG DIM - AUFRUF<br />

Klammer auf üBERSPRINGEN<br />

PROGRAM<strong>MZ</strong>EIGER MERKEN<br />

ZÄHLER DIMENSIONEN<br />

• ZEIGER AUF RECHENSPEICHER<br />

•<br />

; • ZEIGER AUF<br />

ISTRINGARBEITSBEREICH<br />

• ZEIGER AUF SPEICHER<br />

IMIT VARIABLENNAMEN<br />

; ZEIGER FüR VARIABLENNAMEN<br />

; I LÄNGE VARIABLENNAME NACH<br />

ISTRINGARBEITSBEREICH<br />

ZEIGER AUF NAMEN<br />

ZEIGER AUF ARBEITSBEREICH<br />

LÄNGE NAME<br />

• IVARIABLENNAMEN NACH<br />

ISTRINGARBEITSBEREICH<br />

I üBERTRAGEN<br />

ZEIGER AUF VARIABLENNAMEN<br />

I ZEIGER AUF<br />

BASIC 1Z<br />

22803<br />

22804<br />

22805<br />

22806<br />

22807<br />

22808<br />

22809<br />

22810<br />

22811<br />

22812<br />

22813<br />

22814<br />

22815<br />

22816<br />

22817<br />

22818<br />

22819<br />

22820<br />

5915<br />

5918<br />

5919<br />

591A<br />

591C<br />

5910<br />

591E<br />

591F<br />

5920<br />

5921<br />

5922<br />

2A<br />

EB<br />

B7<br />

ED<br />

E3<br />

E5<br />

D9<br />

Dl<br />

D5<br />

C5<br />

ED<br />

B5<br />

52<br />

4B<br />

6A<br />

3D 5B<br />

LO HL<br />

EX DE<br />

OR A<br />

SBC H<br />

EX (S<br />

PUSH<br />

EXX<br />

POP D<br />

PUSH<br />

PUSH<br />

LD BC<br />

22821<br />

22822 5926 3A 41 5B LD A.<br />

22823<br />

22824<br />

22825<br />

22826<br />

22827<br />

22828<br />

22829<br />

5929<br />

592A<br />

592B<br />

C5<br />

F5<br />

ED 4B 26 6A<br />

PUSH<br />

PUSH<br />

LO BC<br />

22830<br />

22831 592F C5 PUSH<br />

22832 5930 CD 5A 40 CALL<br />

22833<br />

22834<br />

22835 5933 CB 7A BIT 7<br />

22836<br />

C2 B9 20 JP NZ<br />

22837 5935<br />

22838<br />

22839<br />

22840 5938<br />

22841 5939<br />

22842 593A<br />

22843<br />

22844<br />

22845<br />

22846 593E<br />

22847 593F<br />

22848<br />

22849<br />

22850 5942<br />

22851 5943<br />

22852<br />

22853<br />

22854<br />

22855 5947<br />

22856 5948<br />

22857 5949<br />

22858<br />

22859 594B<br />

22860<br />

22861 594D<br />

22862<br />

22863 594F<br />

22864<br />

08<br />

Cl<br />

ED<br />

Fl<br />

32<br />

Cl<br />

ED<br />

08<br />

23<br />

FE<br />

28<br />

FE<br />

C2<br />

43<br />

41<br />

43<br />

29<br />

1C<br />

2C<br />

FE<br />

26<br />

5B<br />

3D<br />

20<br />

6A<br />

5B<br />

EX AF<br />

POP B<br />

LD (6<br />

POP A<br />

LD (5<br />

POP BC<br />

LD (5B<br />

EX AF<br />

INC H<br />

CP 2<br />

JR Z.<br />

CP 2C<br />

JP NZ<br />

•I


SEITE 398<br />

BASIC 1Z-013B V1.0A<br />

22865<br />

22866<br />

22867<br />

22868<br />

22869<br />

22870<br />

22871<br />

22872<br />

22873<br />

22874<br />

22875<br />

22876<br />

22877<br />

22878<br />

22879<br />

22880<br />

22881<br />

22882<br />

22883<br />

22884<br />

22885<br />

22886<br />

22887<br />

22888<br />

5952<br />

5953<br />

5954<br />

5955<br />

5957<br />

5959<br />

Cl<br />

04<br />

78<br />

FE<br />

38<br />

3E<br />

04<br />

05<br />

03<br />

POP BC<br />

INC B<br />

LD A.B<br />

CP 04<br />

JR C. 05<br />

LD A. 03<br />

~ 595EH<br />

ANZAHL DIMENSIONEN<br />

PLUS EINS<br />

ANZAHL HOLEN<br />

MAXIMALE ANZAHL<br />

NOCH OK<br />

FEHLER 3 DATENFEHLER<br />

5958 C3 08 21 JP 2108 FEHLER BEHANDELN<br />

595E<br />

595F<br />

5960<br />

5961<br />

5962<br />

5963<br />

5964<br />

5965<br />

5966<br />

5967<br />

09<br />

E1<br />

01<br />

D9<br />

05<br />

D9<br />

D5<br />

E5<br />

D9<br />

18 B6<br />

EXX<br />

POP HL<br />

POP OE<br />

EXX<br />

PUSH OE<br />

EXX<br />

PUSH DE<br />

PUSH HL<br />

EXX<br />

JR B6 -+ 591FH<br />

ZEIGER FüR ERGEBNIS<br />

OFF SET AAF VARIABLENNAMEN<br />

INDEX / DIMENSION<br />

OFFSET AUF VARIA8LENNAMEN<br />

ZEIGER FüR ERGEBNIS<br />

INÄCHSTEN INDEX/DIMENSION<br />

I BERE I TSTELLEN<br />

22889 5969<br />

22890 596A<br />

22891 5968<br />

22892 596C<br />

22893 596D<br />

22894 596E<br />

22895 596F<br />

22896 5970<br />

22897 5971<br />

22898 5972<br />

22899<br />

22900<br />

22901 5975<br />

22902 5976<br />

22903 5977<br />

22904 5978<br />

22905<br />

22906<br />

22907 597B<br />

22908 597C<br />

22909 5970<br />

22910 597E<br />

22911 597F<br />

22912<br />

22913 5981<br />

22914 5982<br />

22915<br />

22916 5984<br />

22917<br />

22918<br />

22919 5987<br />

22920<br />

22921 5989<br />

22922<br />

22923<br />

22~24 598C<br />

Cl<br />

D9<br />

E1<br />

Dl<br />

D9<br />

04<br />

D5<br />

E5<br />

D9<br />

2A<br />

19<br />

46<br />

04<br />

11<br />

7E<br />

12<br />

13<br />

23<br />

10<br />

D9<br />

CB<br />

CD<br />

CB<br />

D2<br />

78<br />

B5<br />

OF<br />

FA<br />

F9<br />

06<br />

B9<br />

F3<br />

6A<br />

11<br />

5C<br />

59<br />

POP BC<br />

EXX<br />

POP HL<br />

POP DE<br />

EXX<br />

INC B<br />

PUSH DE<br />

PUSH HL<br />

EXX<br />

LD HL, (6AB5)<br />

ADD HL,DE<br />

LD B, (HU<br />

INC B<br />

LD OE, 110F<br />

LD A, (HU<br />

LO (OE) ,A<br />

INC DE<br />

INC HL<br />

DJNZ FA -+ 597BH<br />

EXX<br />

SET 7,C<br />

CALL 5C06<br />

RES 7,C<br />

JP NC, 59F3<br />

LD A,B<br />

;<br />

•<br />

ANZAHL DIMENSIONEN<br />

ZEIGER FüR ERGEBNIS<br />

OFFSET AUF VARIABLENNAMEN<br />

ANZAHL DIMENSIONEN PLUS<br />

INDEX / DIMENSION<br />

PROGRAM<strong>MZ</strong>EIGER ABLEGEN<br />

ANFANG STRINGTEXTBEREICH<br />

ZEIGER AUF VARIABLENNAMEN<br />

LÄNGE NAME HOLEN<br />

FüR LÄNGE CORRIGIEREN<br />

I ZEIGER AUF ZWISCHEN­<br />

I SPEICHER FüR VARIABLEN­<br />

INAMEN<br />

I LÄNGE UND VARIABLENNAMEN<br />

I NACH ZWISCHENSPEICHER<br />

I üBERTRAGEN<br />

COOE INDIZIERTE VARIABLE<br />

IVARIABLE IN VORHANDENEN<br />

I VARIABLEN SUCHEN<br />

VARIABLE NICHT GEFUNDEN<br />

JETZIGE ANZAHL DIMENSIONEN<br />

22925<br />

22926<br />

22927<br />

22928<br />

22929<br />

22930<br />

22931<br />

22932<br />

22933<br />

22934<br />

22935<br />

22936<br />

22937<br />

22938<br />

22939<br />

22940<br />

22941<br />

22942<br />

22943<br />

22944<br />

22945<br />

22946<br />

22947<br />

22948<br />

22949<br />

22950<br />

22951<br />

22952<br />

22953<br />

22954<br />

22955<br />

22956<br />

22957<br />

22958<br />

22959<br />

22960<br />

22961<br />

22962<br />

22963<br />

22964<br />

22965<br />

22966<br />

22967<br />

22968<br />

22969<br />

22970<br />

22971<br />

22972<br />

22973<br />

22974<br />

22975<br />

22976<br />

22977<br />

22978<br />

22979<br />

22980<br />

22981<br />

22982<br />

22983<br />

22984<br />

22985<br />

22986<br />

598D<br />

598E<br />

5991<br />

5992<br />

5993<br />

5994<br />

5997<br />

5998<br />

599B<br />

599C<br />

599D<br />

599E<br />

599F<br />

59AO<br />

59Al<br />

59A2<br />

59A3<br />

59A4<br />

59A5<br />

59A8<br />

59A9<br />

59AA<br />

59AD<br />

59AE<br />

59AF<br />

59BO<br />

59B2<br />

59B5<br />

59B6<br />

59B7<br />

59BA<br />

59BB<br />

59BC<br />

59BE<br />

59BF<br />

59CO<br />

59Cl<br />

59C2<br />

59C4<br />

59C6<br />

59C8<br />

59C9<br />

59CA<br />

BASIC 1Z<br />

BE<br />

C2<br />

CE<br />

20<br />

CP (H<br />

JP NZ<br />

23<br />

EB<br />

El<br />

22<br />

26<br />

6A<br />

INC HL<br />

EX DE<br />

POP HL<br />

LD (6A<br />

D9<br />

21 00 00<br />

EXX<br />

LD HL<br />

09<br />

EB<br />

5E<br />

23<br />

56<br />

23<br />

E3<br />

D5<br />

D9<br />

Dl<br />

CD 13 5B<br />

EXX<br />

EX DE<br />

LD E,<br />

INC HL<br />

LD D.<br />

INC HL<br />

EX (SP<br />

PUSH D<br />

EXX<br />

POP DE<br />

CALL 5<br />

D9<br />

EB<br />

CD<br />

E7<br />

59<br />

EXX<br />

EX OE<br />

CALL 5<br />

EB<br />

E5<br />

B7<br />

ED<br />

52<br />

EX DE<br />

PUSH H<br />

OR A<br />

SBC H<br />

D2 Dl 20 JP NC<br />

D9<br />

01<br />

CD<br />

OF<br />

SB<br />

EXX<br />

POP DE<br />

CALL 5<br />

D9<br />

El<br />

10<br />

DF<br />

EXX<br />

POP HL<br />

OJNZ D<br />

ES<br />

D9<br />

79<br />

50<br />

CB<br />

77<br />

PUSH H<br />

EXX<br />

LO A,C<br />

LD D,B<br />

BIT 6,<br />

20<br />

14<br />

JR NZ<br />

E6<br />

OF<br />

AND A<br />

5F<br />

F5<br />

CD<br />

13<br />

SB<br />

LD E,A<br />

PUSH A<br />

CALL 5<br />

;<br />

I<br />

I


SEITE 400<br />

BASIC 1Z-013B V1_0A<br />

22987<br />

22988<br />

22989 59CD E5 PUSH HL OFFSET AUF WERT<br />

22990 59CE D9 EXX<br />

22991 59CF Cl POP BC OFFSET AUF WERT<br />

22992 59DO F1 POP AF VARIABLENTYP<br />

22993 59D1 E1 POP HL ZEIGER AUF FELD<br />

22994 59D2 09 ADD HL,BC ZEIGER AUF WERT<br />

22995 59D3 4D LD C,L I NACH BC<br />

22996 59D4 44 LD B,H I<br />

22997 59D5 2A 26 6A LD HL, (6A26) PROGRAM<strong>MZ</strong>EIGER HOLEN<br />

22998<br />

22999<br />

23000 59D8 D1 POP DE ZEIGER FüR ERGEBNIS<br />

23001 59D9 C9 RET<br />

23002 59DA 5E LD E, (HU I LÄNGE FN HOLEN<br />

23003 59DB 23 INC HL I<br />

23004 59DC 56 LD D, (HU I<br />

23005 59DD E1 POP HL ZEIGER AUF FELD<br />

23006 59DE 4D LD C,L I NACH BC<br />

23007 59DF 44 LD B.H I<br />

23008 59EO 73 LD (HU,E<br />

23009 59E1 23 INC HL<br />

23010 59E2 72 LD (HU,D<br />

23011 59E3 E6 OF AND A, OF TYP MASKIEREN<br />

23012<br />

23013 59E5 18 EE JR EE ~ 59D5H PROGRAM<strong>MZ</strong>EIGER HOLEN<br />

23014<br />

Wert in DE entsprechend OPTION BASE corrigieren<br />

23015 59E7 3A 42 5B LD A, (5B42) OPTION - BASE<br />

23016<br />

23017<br />

23018 59EA B7 oR A GLEICH NULL ?<br />

23019 59EB C8 RET Z INDEX STIMMT<br />

23020 59EC 7A LD A,D I INDEX GLEICH NULL ?<br />

23021 59ED B3 OR E I<br />

23022 59EE CA Dl 20 JP Z, 20D1 IJA + DATENFEHLER<br />

23023 I FLAG DIM/AUFRUF<br />

23029<br />

23030<br />

23031 59F7 B7 OR A AUFRUF ?<br />

23032 59F8 CA D1 20 JP Z. 20D1 ; IJA + FEHLER 3<br />

23033 I DATENFEHLER<br />

23034<br />

23035 59FB EI POP HL IPROGRAM<strong>MZ</strong>EIGER MERKEN<br />

23036 59FC 22 26 6A LD (6A26),HL I<br />

23037<br />

23038<br />

23039 59FF<br />

23040 5AOO<br />

23041<br />

23042<br />

23043<br />

23044 5A04<br />

23045 5A05<br />

23046<br />

23047 5A07<br />

23048 5A08<br />

23049 5A09<br />

23050 5AOA<br />

23051 5AOB<br />

23052<br />

23053<br />

23054 5AOE<br />

23055 5AOF<br />

230ti6 5AI0<br />

23057 5A11<br />

23058<br />

23059<br />

23060 5A14<br />

23061 5A15<br />

23062 5A16<br />

23063<br />

23064<br />

23065 5A19<br />

23066 5A1A<br />

23067<br />

23068 5A1C<br />

23069 5AID<br />

23070 5A1E<br />

23071<br />

23072<br />

23073 5A21<br />

23074 5A22<br />

23075<br />

23076 5A24<br />

23077<br />

23078<br />

23079 5A27<br />

23080 5A28<br />

23081<br />

23082<br />

23083 5A2B<br />

23084 5A2C<br />

23085 5A2D<br />

23086 5A2E<br />

23087 5A2F<br />

23088 5A30<br />

23089 5A31<br />

23090 5A32<br />

23091 5A33<br />

23092<br />

23093<br />

23094 5A36<br />

23095 5A37<br />

23096<br />

23097 5A39<br />

23098 5A3A<br />

23099<br />

23100 5A3C<br />

BASIC<br />

D9<br />

ED 5B D3 38<br />

68<br />

26 00<br />

29<br />

19<br />

EB<br />

13<br />

CD DF 58<br />

70<br />

23<br />

D9<br />

21 01 00<br />

D9<br />

Dl<br />

3A 41 5B<br />

B7<br />

20 OC<br />

E5<br />

EB<br />

11 OA 00<br />

37<br />

ED 52<br />

D2 Dl 20<br />

EI<br />

CD E7 59<br />

13<br />

73<br />

23<br />

72<br />

23<br />

D5<br />

D9<br />

Dl<br />

CD 13 5B<br />

D9<br />

10 DC<br />

59<br />

16 00<br />

C5<br />

1Z<br />

EXX <br />

LD DE,<br />

LD L.B<br />

LD H,<br />

ADD HL<br />

ADD HL<br />

EX DE,H<br />

INC DE<br />

CALL 58<br />

LD (HU<br />

INC HL<br />

EXX <br />

LD HL,<br />

EXX <br />

POP DE<br />

LD A, (<br />

OR A <br />

JR NZ,<br />

PUSH H<br />

EX DE,H<br />

LD DE,<br />

SCF <br />

SBC HL<br />

JP NC,<br />

POP HL<br />

CALL 5<br />

INC DE<br />

LD (HU<br />

INC HL<br />

LD (HU<br />

INC HL<br />

PUSH D<br />

EXX <br />

POP DE<br />

CALL 5<br />

EXX <br />

DJNZ D<br />

LD E,C<br />

LD D,<br />

PUSH B


SEITE 402<br />

BASIC 1Z-013B V1.0A BASIC 1Z<br />

23101 5A3D<br />

23102 5A3E<br />

23103 5A3F<br />

23104 5A40<br />

23105<br />

23106<br />

23107<br />

23108<br />

23109<br />

23110<br />

23111<br />

23112<br />

23113<br />

23114<br />

23115<br />

23116<br />

23117<br />

23118<br />

23119<br />

23120<br />

5A43<br />

5A44<br />

5A45<br />

5A46<br />

5A47<br />

5A48<br />

5A4B<br />

5A4C<br />

5A4E<br />

5A4F<br />

D5<br />

D9<br />

Dl<br />

CD<br />

E5<br />

D9<br />

Cl<br />

C5<br />

EB<br />

2A<br />

6E<br />

26<br />

29<br />

3A<br />

13 SB<br />

D3 38<br />

00<br />

OF 11<br />

PUSH<br />

EXX<br />

POP DE<br />

CALL 5B13<br />

DE TYP-LANGE 23163<br />

23164 5A7C Cl POP BC<br />

PUSH HL<br />

EXX<br />

POP BC<br />

PUSH BC<br />

EX DE,HL<br />

LD HL, (38D3)<br />

LD L, (HU<br />

LD H, 00<br />

ADD HL,HL<br />

LD A, (110F)<br />

TYP-LANGE HOLEN<br />

• HL = HL * DE<br />

• (SPEICHERPLATZ FüR FELD<br />

• ERRECHNEN)<br />

GESAMTLANGE<br />

GESAMTLANGE<br />

•<br />

'ZEIGER AUF STRINGARBEITS­<br />

I BEREICH<br />

ANZAHL DIMENSIONEN HOLEN<br />

MAL ZWEI<br />

LANGE FELDNAME<br />

23121 23183<br />

23122 23123<br />

23124 5A52 5A54 C6 85<br />

05<br />

ADD A, 05<br />

ADD A.L<br />

PLUS STAMMDATENLÄNGE<br />

PLUS LÄNGE FüR DIMENSIONEN<br />

23 184<br />

23 185<br />

23186<br />

23125 5A55 6F<br />

LD L,A<br />

ERGEBN I S MER~:EN<br />

23 187<br />

23126 5A56 3E 00<br />

LD A, 00<br />

• EVENTUELLEN üBERTRAG<br />

23188<br />

23127<br />

• CORRIGIEREN<br />

23128<br />

23129<br />

23130<br />

23131<br />

231 3 2<br />

23133<br />

23134<br />

23135<br />

23 13 6<br />

23137<br />

23138<br />

5A58<br />

5A59<br />

5A5A<br />

5A5C<br />

5A5D<br />

5A5F<br />

5A60<br />

5A61<br />

8C<br />

67<br />

38<br />

09<br />

38<br />

E5<br />

19<br />

DA<br />

05<br />

02<br />

B9 20<br />

ADC A,H<br />

LD H,A<br />

JR C, 05 ~<br />

ADD HL,BC<br />

JR C, 02 ~<br />

PUSH HL<br />

ADD HL,DE<br />

JP C. 20B9<br />

23139<br />

23140 5A64 EB EX DE,HL<br />

23141 5A65 CD DF 58 CALL 58DF<br />

23142<br />

23143<br />

23144<br />

23145<br />

23146<br />

23147<br />

23148<br />

23149<br />

23150<br />

23151<br />

23152<br />

23153<br />

5A68<br />

5A69<br />

5A6A<br />

5A6B<br />

ES<br />

D9<br />

E1<br />

ED<br />

4B<br />

B5 6A<br />

PUSH HL<br />

EXX<br />

POP HL<br />

LD BC, (6AB5)<br />

5A61H<br />

5A61H<br />

•<br />

• üBERLAUF ~<br />

• SPEICHER ZU KLEIN<br />

PLUS LANGE FüR FELDDATEN<br />

I üBERLAUF ~<br />

'SPEICHER ZU KLEIN<br />

'FEHLER 6<br />

'SPEICHER ZU KLEIN<br />

'üBEPRüFEN, OB ADRESSE<br />

• IN DE MIT STACK KOLLIDIERT<br />

ANFANG STRINTEXTBEREICH<br />

23165 5A7D<br />

2 3166 5A7E<br />

23167 5A7F<br />

23168 5A80<br />

23 169 5A81<br />

23170 5A82<br />

23171 5A83<br />

23172 5A84<br />

23173<br />

23174 5A86<br />

23 175 5A87<br />

23176 5A88<br />

23177 5A89<br />

23 178 5A8A<br />

23 179 5A8B<br />

23180 5A8C<br />

23181 5A8D<br />

23 182<br />

23189<br />

23190<br />

23 191<br />

2 3192<br />

23 193<br />

23 194<br />

23 195<br />

23196<br />

23 197<br />

23198<br />

231 99<br />

23200<br />

23201<br />

23 202<br />

5A90<br />

5A91<br />

5A92<br />

5A95<br />

5A99<br />

5A9A<br />

5A9B<br />

5A9C<br />

5A9D<br />

5A9E<br />

5AAI<br />

5AA2<br />

D5<br />

D9<br />

D1<br />

60<br />

69<br />

Cl<br />

79<br />

F6 80<br />

77<br />

23<br />

IB<br />

73<br />

23<br />

72<br />

23<br />

11 OF 11<br />

lA<br />

3C<br />

CD C5 5A<br />

5AAF 32 01 39 LD<br />

23154<br />

23155 5A73 ES PUSH HL , ABLEGEN 23217<br />

23156 5A74 D9 EXX 23218 5AB2 D9 EXX<br />

23157<br />

23158<br />

5A6F<br />

5A70<br />

5A71<br />

OB<br />

B7<br />

ED 42<br />

DEC BC<br />

OR A<br />

SBC HL,BC<br />

: CORRIGIEREN<br />

CARRY-FLAG ZURüCKSETZEN<br />

I LÄNGE GESPEICHERTE<br />

'STRINGS ERRECHNEN<br />

23159<br />

23160 5A78 Dl POP DE GESAMTE FELDLÄNGE 23 222<br />

23161<br />

23 162<br />

5A75<br />

5A76<br />

Cl<br />

ED B8<br />

POP BC<br />

LDDR<br />

LÄNGE GESPEICHERTE<br />

'STRINGTEXTBEREICH<br />

'VERSCHIEBEN<br />

5A79 CD CD 5A CALL 5ACD • ZEIGER AUF<br />

'SCHIEDENEN<br />

DIE VER­<br />

BEREICHE<br />

23203<br />

23204<br />

23 205<br />

23206<br />

23207<br />

23208<br />

23209<br />

23210<br />

23 211<br />

23212<br />

23213<br />

23214<br />

23215<br />

23 216<br />

STRINGS 23219<br />

23220<br />

23221<br />

23223<br />

23224<br />

5AA3<br />

5AA4<br />

5AA5<br />

5AA6<br />

5AA7<br />

5AA8<br />

5AA9<br />

5AAA<br />

5AAC<br />

5AAD<br />

5AB3<br />

5AB4<br />

5AB7<br />

5AB8<br />

ED<br />

lA<br />

77<br />

23<br />

13<br />

87<br />

CD<br />

E5<br />

D9<br />

5B<br />

C5<br />

EI<br />

AF<br />

77<br />

23<br />

OB<br />

78<br />

BI<br />

20 F8<br />

77<br />

3E<br />

01<br />

D3 . 38<br />

5A<br />

Dl<br />

3A 41 SB<br />

B7<br />

28 04<br />

PUSH D<br />

EXX<br />

POP DE<br />

LD H,B<br />

LD L,C<br />

POP BC<br />

LD A,C<br />

OR 80<br />

LD (HU<br />

INC HL<br />

DEC DE<br />

LD (HU<br />

INC HL<br />

LD (HU<br />

INC HL<br />

LD DE,<br />

LD A,


SEITE 404 <br />

BASIC 1Z-013B V1.0A <br />

23225<br />

23226 5ABA 2A 26 6A LD HL. (6A26) PROGRAM<strong>MZ</strong>EIqER HOLEN<br />

23227<br />

23228<br />

23229 5ABD C9 RET<br />

23230 5ABE 2A 3D 5B LD HL. (5B3D) IPROGRAM<strong>MZ</strong>EIGER AUF AUFRUF!<br />

23231 I INDEX HOLEN<br />

23232<br />

23233 SAC1 OS PUSH OE ZEIGER FüR ERGEBNIS<br />

23234 5AC2 C3 FC 58 JP 58FC I INDEX AUSWERTEN UND WERT<br />

23235<br />

I VARIABLE BEREITSTELLEN<br />

23236<br />

im Accu angegebene Anzahl Bytes von (OE) nach (HL) übertragen<br />

23237 5AC5 47 LD B.A ANZAHL BYTES ZU üBERTRAGEN<br />

23238 SAC6 1A LD A. . A I<br />

23240 5AC8 13 INC DE I ZEIGER AUF NÄCHSTES BYTE<br />

23241 5AC9 23 INC HL I<br />

23 242 5ACA 10 FA DJNZ FA ~ 5AC6H WEITERE BYTES üBERTRAGEN<br />

23243 <br />

23244 SACC C9 RET <br />

Zeiger auf die verschiedenen Bereiche corrigieren<br />

23245 5ACD 2A D3 38 LD HL. (3803) I ZEIGER AUF<br />

23246 ISTRINGARBEITSBEREICH <br />

23247 <br />

23248 SADO 19 ADD HL.DE CORRIGIEREN <br />

23249 5AD1 22 03 38 LD (38D3).HL UND WIEDER MERKEN <br />

23250 <br />

23251 <br />

23252 SAD4 2A B5 6A LD HL. (6AB5) I ZEIGER AUF ANFANG <br />

23253 ISTRINGTEXTBEREICH<br />

23254 <br />

23255 5AD7 19 ADD HL.DE CORRIGIEREN <br />

23256 5AD8 22 B5 6A LD (6AB5).HL UND WIEDER MERKEN <br />

23257 <br />

23258 <br />

23259 5ADB 2A B7 6A LD HL. (6AB7) I ZEIGER AUF ANFANG <br />

23260 ISTRINGARBEITSBEREICH <br />

23261 <br />

23262 5ADE 19 ADD HL.DE CORRIGIEREN <br />

23263 5ADF 22 B7 6A LD (6AB7).HL UND WIEDER MERKEN <br />

23264 <br />

23265 <br />

23266 5AE2 2A DA 38 LD HL. (38DA) I ZEIGER AUF <br />

23267 I ANFANG TEXTSTRINGS <br />

23268 <br />

23269 SAES 19 ADD HL.DE CORRIGIEREN <br />

23270 5AE6 22 DA 38 LD (380M. HL 1 UND WIEDER MERKEN <br />

23271 <br />

23272 <br />

23273 SAE9 C9 RET <br />

BASIC 1Z-<br />

Befehl OlM<br />

23274 5AEA 3E FF LD A. F<br />

23275<br />

23276 SAEC 32 41 SB LD (SB4<br />

23277<br />

23278<br />

23279 5AEF EB EX DE.H<br />

23280 5AFO lA LD A.


SEITE 406<br />

BASIC 1Z-013B V1_0A BASIC 1Z-<br />

23326<br />

23327<br />

23328<br />

23329<br />

23330<br />

23331<br />

23332<br />

23333<br />

23334<br />

23335<br />

23336<br />

23337<br />

23338<br />

23339<br />

23340<br />

23341<br />

23342<br />

23343<br />

23344<br />

23345<br />

581E<br />

5821<br />

5B22<br />

CD<br />

Cl<br />

C9<br />

23 5B CALL 5B23<br />

POP BC<br />

RET<br />

HL HL * 256 + A * OE<br />

GERETTETES REGISTER HOLEN<br />

HL HL * 256 + A * OE mit Untersuchung auf übertrag<br />

5B23<br />

5B24<br />

5B26<br />

5828<br />

5B29<br />

582B<br />

582C<br />

5B2E<br />

5B2F<br />

B7<br />

28 OE<br />

06 08<br />

29<br />

38 OF<br />

07<br />

30 03<br />

19<br />

38 09<br />

OR A<br />

JR Z. OE ~ 5B34H<br />

LD B. 08<br />

ADO HL.HL<br />

JR C. OF ~ 5B3AH<br />

RLCA<br />

JR NC. 03 ~ 5B31H<br />

ADD HL.DE<br />

JR C. 09 ~ 5B3AH<br />

5B31 ~ 5B28H<br />

10 F5<br />

DJNZ F5 23346<br />

23347 5833 C9 RET<br />

FAKTOR GLEICH NULL ?<br />

IJA ~ NUR ALTES TEIL­<br />

I ERGEBNIS MAL 256<br />

8 BIT MULTIPLIZIEREN<br />

ALTES TEILERGEBNIS * 2<br />

üBERTRAG ~ FEHLER<br />

EIN BIT NACH CARRY<br />

I NICHT GESETZT ~ STELLE<br />

I NICHT ADDIEREN<br />

ZWEITEN FAKTOR ADDIEREN<br />

üBERTRAG ~ FEHLER<br />

WEITER BIT'S MULTIPLIZIEREN<br />

23373<br />

23374<br />

23375<br />

23376<br />

23377<br />

23378<br />

23379<br />

23380<br />

23381<br />

23382<br />

23383<br />

23384<br />

23385<br />

23386<br />

23387<br />

23388<br />

23389<br />

23390<br />

23391<br />

23392<br />

23393<br />

23394<br />

23395<br />

23396<br />

23397<br />

5B4F<br />

5B50<br />

5851<br />

78<br />

81<br />

20 13<br />

LD<br />

OR<br />

JR<br />

A.B<br />

C<br />

NZ.<br />

5853 CD 17 58 CALL 58<br />

5856<br />

5857<br />

5B58<br />

5859<br />

5B5A<br />

5858<br />

5B5C<br />

5B5D<br />

585E<br />

5B5F<br />

5B60<br />

5862<br />

5863<br />

D5<br />

E5<br />

69<br />

60<br />

47<br />

4F<br />

7E<br />

12<br />

23<br />

13<br />

10<br />

El<br />

C3<br />

FA<br />

54 54<br />

PUSH OE<br />

PUSH HL<br />

LD L.C<br />

LD H.B<br />

LD B.A<br />

LD C.A<br />

LD A. (H<br />

LD


SEITE 408<br />

BASIC 1Z-013B V1.0A<br />

23431<br />

23432<br />

23433<br />

23434<br />

5887<br />

5888<br />

C5<br />

CO<br />

7E 58<br />

PUSH 8C<br />

CALL 587E<br />

ANZAHL MERKEN<br />

IVARIABLENNAME (HL) IM<br />

IZWISCHENSPEICHER BEREIT­<br />

I STELLEN<br />

VARIABLENTYP<br />

23435 5B8B 79<br />

LO A,C<br />

23436 588C 01 POP OE FN - PARAMETER - TYP<br />

23437 5B80 BB<br />

CP E<br />

VERGLEICHEN<br />

23438 588E 4B<br />

LO C,E<br />

LETZTEN TYP MERKEN<br />

23439 588F 20 11 JR NZ, 11 ~ 5BA2H TYPEN NICHT GLEICH<br />

23440<br />

23441<br />

23442<br />

23443<br />

23444<br />

23445<br />

23446<br />

23447<br />

23448<br />

23449<br />

23450<br />

23451<br />

23452<br />

23453<br />

23454<br />

23455<br />

23456<br />

23457<br />

23458<br />

23459<br />

23460<br />

23 461<br />

23462<br />

23463<br />

23464<br />

23465<br />

23466<br />

23467<br />

23468<br />

23469<br />

23470<br />

23471<br />

5891<br />

5892<br />

5B93<br />

5B94<br />

5895<br />

5898<br />

5898<br />

5B9E<br />

589F<br />

58AO<br />

58A2<br />

5BA5<br />

58A7<br />

58A9<br />

58A8<br />

5BAO<br />

05<br />

48<br />

OC<br />

E5<br />

2A<br />

11<br />

CO<br />

El<br />

Cl<br />

28<br />

CO<br />

FE<br />

28<br />

FE<br />

28<br />

C3<br />

03<br />

OF<br />

2 E<br />

24<br />

14<br />

29<br />

07<br />

2C<br />

08<br />

FE<br />

38<br />

11<br />

16<br />

54<br />

20<br />

PUSH OE<br />

LO C,B<br />

INC C<br />

PUSH HL<br />

LO HL. (3803)<br />

LO OE. 110F<br />

CALL 162E<br />

POP HL<br />

POP BC<br />

JR Z. 24 ~ 5BC6H<br />

CALL 5414<br />

CP 29<br />

JR Z. 07 ~ 5BBOH<br />

CP 2C<br />

JR Z. 08 ~ 5B85H<br />

JP 20FE<br />

FN-PARAMETER-TYP<br />

ZÄHLER ANZAHL PARAMETER<br />

PLUS EINS<br />

ZEIGER AUF PARAMETER<br />

ZEIGER STRINGARBEITSBEREICH<br />

I ZEIGER AUF VARIABLENNAMEN<br />

I BE I FN-AUFRUF<br />

NAMEN VERGLEICHEN<br />

ZEIGER AUF PARAMETER<br />

FN-PARAMETER-TYP<br />

I VARIABLEN GLEICH<br />

I FN-PARAMETER<br />

IPROGRAM<strong>MZ</strong>EIGER AUF<br />

I NÄCHSTES RELEVANTES<br />

I ZEICHEN STELLEN<br />

) (Klammer zu)<br />

ENOE PARAMETERANGABE<br />

(Komma)<br />

WEITERE PARAMETER ANGEGEBEN<br />

SYNTAX - FEHLER<br />

Variablenname ist nicht FN - Parameter<br />

23472<br />

23473<br />

23474<br />

23475<br />

23476<br />

23477<br />

23478<br />

23479<br />

23480<br />

23481<br />

23482<br />

23483<br />

23484<br />

23485<br />

23486<br />

23487<br />

23488<br />

5BBO<br />

58B3<br />

58B6<br />

58B7<br />

5B88<br />

5BB9<br />

5BBA<br />

5BBB<br />

58BC<br />

5B80<br />

58BF<br />

58CO<br />

2A<br />

11<br />

7E<br />

12<br />

47<br />

23<br />

13<br />

7E<br />

12<br />

10<br />

El<br />

Dl<br />

0 3<br />

OF<br />

FA<br />

3 8<br />

11<br />

LO HL. (3803)<br />

LO OE. 110F<br />

LO A. (HU<br />

LO <br />

LO


SEITE 410 <br />

BASIC 1Z-013B V1_0A <br />

23547 5BFB 22 83 5D LD (5D83).HL I ZEIGER AUF PARARMETER<br />

23548 I DER AKTUELLEN FUNKTION<br />

23549<br />

23550 5BFE El POP HL PROGRAM<strong>MZ</strong>EIGER<br />

23551 5BFF C3 14 54 JP 5414 IPROGRAM<strong>MZ</strong>EIGER AUF<br />

23552 I NÄCHSTES RELEVANTES<br />

23553 I ZEICHEN STELLEN<br />

23554 5C02 D5 PUSH DE ZEIGER FüR ERGEBNIS<br />

23555 5C03 C3 28 58 JP 5828 I ZEIGER AUF WERT VARIABLE<br />

23556 I NACH VARIABLENNAMEN (HL)<br />

23557 I BERE I TSTELLEN<br />

Va~iablennamen • Feldnamen oder Funkionsnamen in vorhandenen<br />

Datensätzen suchen<br />

23558 5C06 2A 83 6A LD HL. (6A83) ZEIGER AUF VARIABLE<br />

23559<br />

23560<br />

23561 5C09 11 OF 11 LD DE. 110F I ZEIGER AUF LÄNGE ZU<br />

23562 I SUCHENDER NAME<br />

23563<br />

23564 5COC 7E LD A. (HL> TYPFLAG DER VARIABLEN HOLEN<br />

23565 5COD 87 OR A BEREICHSENDE ?<br />

23566 5COE C8 RET Z VARIABLE NICHT GEFUNDEN<br />

23567 5COF FE 40 CP 40 FELD ODER FUNKTION ?<br />

23568<br />

23569 5Cll 30 27 JR NC. 27 ~ SC3AH JA<br />

23570<br />

23571 5C13 B9 CP C MIT WERTCODE VERGLEICHEN<br />

23572 5C14 20 19 JR NZ. 19 ~ 5C2FH FALSCHER TYP<br />

23573<br />

23574 5C16 23 INC HL ZEIGER AUF DATENSATZ<br />

23575 5C17 1A LD A.


SEITE 412<br />

BASIC 1Z-013B V1_0A<br />

2364S<br />

23646<br />

23647<br />

23648<br />

23649<br />

236S0<br />

236S1<br />

236S2<br />

236S3<br />

23654<br />

236S5<br />

236S6<br />

236S7<br />

23658<br />

23659<br />

23660<br />

23661<br />

23662<br />

23663<br />

23664<br />

2366S<br />

23666<br />

23667<br />

23668<br />

23669<br />

23670<br />

SCSD<br />

SCSE<br />

SCSF<br />

SC60<br />

SC61<br />

SC62<br />

SC63<br />

SC64<br />

SC67<br />

SC68<br />

5C69<br />

5C6A<br />

5C6B<br />

SC6C<br />

SC6D<br />

SC6E<br />

5C71<br />

SC73<br />

SC74<br />

SC75<br />

5C76<br />

23<br />

EB<br />

19<br />

EB<br />

01<br />

1A<br />

BE<br />

C2 4E SC<br />

C5<br />

47<br />

4F<br />

23<br />

13<br />

1A<br />

BE<br />

C2 46 5C<br />

10<br />

23<br />

Cl<br />

37<br />

C9<br />

INC HL<br />

EX DE.HL<br />

ADD HL.DE<br />

EX DE.HL<br />

POP OE<br />

LD A. <br />

JP NZ. SC4E<br />

PUSH BC<br />

LD B.A<br />

LD C.A<br />

INC HL<br />

INC DE<br />

LD A.


SEITE 414<br />

23765 5C05 IB<br />

23766 5C06 El<br />

23767 5C07 E3<br />

23768 5C08 23<br />

23769 5C09 73<br />

23770 5COA 23<br />

23771 5COS 72<br />

23772 5CO~ 23<br />

23773 5COO 11 OF<br />

23774<br />

23775<br />

23776 5CEO 1A<br />

23777 5CEl 77<br />

23778 5CE2 47<br />

23779 5CE3 13<br />

23780 5CE4 23<br />

23781 5CE5 lA<br />

2 3782 5CE6 77<br />

23783 5CE7 10 FA<br />

23784<br />

23785 5CE9 23<br />

23786 5CEA E5<br />

23787 5CEB 09<br />

23788 5CEC El<br />

23789 5CEO lA<br />

23790 5CEE 77<br />

23791 5CEF 13<br />

23792 5CFO 23<br />

23793 5CFl 10 FA<br />

23794<br />

23795 5CF3 36 00<br />

23796<br />

23797 5CF5 El<br />

23798 5CF6 C9<br />

Funkti on FN<br />

23799 5CF7 05<br />

23800 5CF8 7E<br />

23801 5CF9 CO 81<br />

23802<br />

23803<br />

23804 5CFC OD El<br />

23805<br />

23806 5CFE C5<br />

23807 5CFF CB Fl<br />

23808<br />

23 809 5D01 EO 5B<br />

23810<br />

23811<br />

23812<br />

23813 5005 22 85<br />

23814<br />

23815<br />

23816 5D08 DS<br />

23817 5009 CO 06<br />

23818<br />

23819<br />

23820 5DOC 3E OF<br />

23821<br />

23822 5DOE 02 08<br />

BASIC 1Z-013B<br />

DEC OE<br />

POP HL<br />

EX (SP), HL<br />

INC HL<br />

LD (HU ,E<br />

INC HL<br />

LD (HU ,0<br />

INC HL<br />

11 LD OE. 110F<br />

LO A,


SEITE 416 <br />

BASIC 1Z-013B V1_0A <br />

23885 5040 CO RET NZ FUNKTION HAT KEINE PARAMET.<br />

23886 504E 05 PUSH OE ZEIGER FüR ERGEBNIS MERKEN<br />

23887 504F 06 01 LO B. 01 EINE KLAMMER ZU SUCHEN<br />

23888<br />

23889 5051 C5 PUSH 8C ZÄHLER RETTEN<br />

23890 5052 CO 80 38 CALL 3880 IPROGRAM<strong>MZ</strong>EIGER (HL) AUF<br />

23891 I NÄCHSTES PROGRAMM8YTE<br />

23892 I STELLEN<br />

23893 5055 Cl POP BC PARAMETERZÄHLER HOLE~<br />

23894 5056 87 OR A ZEILENENOE ?<br />

23895 5057 CA FE 20 JP Z. 20FE JA ~ SYNTAX-FEHLER<br />

23896<br />

23897<br />

23898 5.D5A FE 3A CP 3A (Ooppelpunkt)<br />

23899<br />

23900 505C CA FE 20 JP Z. 20FE JA ~ SYNTAX - FEHLER<br />

23901<br />

23902<br />

23903 505F FE 28 CP 28 (Klammer auf)<br />

23904<br />

23905 5061 20 01 JR NZ. 01 ~ 5064H NEIN<br />

23906<br />

23907 5063 04 INC 8 ANZAHL OFFENE KLAMMERN<br />

23908 5064 FE 29 CP 29 ) (Klammer zu)<br />

23909<br />

23910 5066 20 E9 JR NZ. E9 ~ 5051H ENOE PARAMETER SUCHEN<br />

23911<br />

23912 5068 10 E7 OJNZ E7 ~ 5051H I RICHTIGE ANZAHL<br />

23913 I KLAMMER ZU SUCHEN<br />

23914 506A 23 INC HL PROGRAM<strong>MZ</strong>EIGER<br />

23915 506B CO 14 54 CALL 5414 IPROGRAM<strong>MZ</strong>EIGER AUF<br />

23916 I NÄCHSTES RELEVANTE<br />

23917 I ZEICHEN SETZEN<br />

23918 506E 01 POP OE ZEIGER FüR FUNKTION<br />

23919 506F C9 RET<br />

Syntax untersuchung auf Zahl - Wert<br />

23920 5070 FE 03 CP 03 COOE STRING - WERT ?<br />

23921<br />

23922 5072 28 06 JR Z. 06 ~ 507AH IST STRING<br />

23923<br />

23924 5074 FE 03 CP 03 COOE STRING ?<br />

23925<br />

23926 5076 CO RET NZ NICHT STRING ~ OK<br />

23927 5077 C3 F8 20 JP 20F8 FEHLER 3 OATENFEHLER<br />

23928<br />

23929<br />

Synt~xunter&uc~ting auf Ergebnis vom Typ String<br />

23930 507A 3A 65 6A LO A. (6A65) WERT - FLAB <br />

23931 <br />

23932 <br />

23933 5070 FE 03 CP 03 STRING-WERT ? <br />

23934 <br />

23935 507F C8 RET Z JA ~ OK <br />

23936 5080 C3 FB 20 JP 20FB FEHLER 3 OATENFEHLER <br />

23937 <br />

23938 <br />

BASIC 1Z-0<br />

23939 5083 00 00<br />

23940<br />

23941 5085 00 00<br />

23942<br />

(HL> Real - Wert Null eintra<br />

23943 5087 E5 PUSH HL<br />

23944 5088 06 05 LO 8. 05<br />

23945<br />

23946 508A AF XOR A<br />

23947 5088 77 LO (HU.A<br />

23948 508C 23 INC HL<br />

23949 5080 10 FC OJNZ FC<br />

23950<br />

23951 508F E1 POP HL<br />

23952 5090 C9 RET<br />

Vorzeichen des Real - Wertes<br />

23953 5091 7E LO A. (HU<br />

23954 50 Q 2 87 OR A<br />

23955 5093 C8 RET Z<br />

23956 5094 23 INC HL<br />

23957 5095 7E LO A. (HU<br />

23958 5096 EE 80 XOR 80<br />

23959<br />

23960 5D98 77 LO (HU.A<br />

23961 5099 2B OEC HL<br />

23962 509A C9 RET<br />

Syntaxuntersuchung auf Ergeb<br />

23963 509B 3A 65 6A LO A. (6A6<br />

23964<br />

23965<br />

23966 509E FE 03 CP 03<br />

?-3967<br />

23968 50AO 3E 05 LO A. 05<br />

23969<br />

23970 50A2 CO RET NZ<br />

23971 50A3 C3 FB 20 JP 20FB<br />

23972<br />

23973<br />

Funktion (Minus)<br />

23974 50A6 CO 9B 50 CALL 509B<br />

23975<br />

23976<br />

23977 50A9 4F LO C.A<br />

23978 50AA 3E 80 LO A. BO<br />

23979<br />

23980 50AC C3 89 50 JP 50B9<br />

23981<br />

23982


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.


SEITE<br />

24089 5E19<br />

24090 5EIA<br />

24091<br />

24092<br />

24093 5EI0<br />

24094<br />

24095<br />

24096 5E20<br />

24097 5E21<br />

24098 5E22<br />

24099 5E23<br />

24100 5E24<br />

24101 5E25<br />

24102 5E26<br />

24103<br />

24104<br />

24105 5E29<br />

24106 5E2A<br />

24107 5E28<br />

24108 5E2C<br />

24109<br />

24110<br />

24111 5E2F<br />

24112 5E30<br />

24113<br />

24114<br />

24115<br />

24116 5E34<br />

24117<br />

24118<br />

24119<br />

24120 5E38<br />

24121 5E39<br />

24122 5E3A<br />

24123<br />

24124 5E3C<br />

24125 5E30<br />

24126<br />

24127<br />

24128 5E40<br />

24129 5E41<br />

24130 5E42<br />

24131 5E43<br />

24132 5E44<br />

24133 5E45<br />

24134 5E46<br />

24135 5E47<br />

24136 5E48<br />

24137 5E49<br />

Zwei<br />

24138 5E4A<br />

24139<br />

24140<br />

24141 5E4D<br />

24142<br />

24143 5E4F<br />

24144<br />

24145 SES1<br />

24146 SE52<br />

420<br />

EB<br />

2A 03<br />

CD 00<br />

E3<br />

46<br />

23<br />

5E<br />

23<br />

56<br />

2A B5<br />

19<br />

E8<br />

El<br />

CO 00<br />

79<br />

EO 58<br />

EO 4B<br />

ES<br />

B7<br />

EO 42<br />

ES<br />

22 03<br />

El<br />

77<br />

23<br />

73<br />

23<br />

72<br />

2B<br />

2B<br />

01<br />

C9<br />

Zahlen<br />

3A 6S<br />

FE 03<br />

20 34<br />

D5<br />

E5<br />

BASIC 1Z-013B<br />

EX OE.HL <br />

38 LO HL. (3803) <br />

58 CALL 5800<br />

EX (SP) .HL<br />

LO B. (HU<br />

INC HL<br />

LO E. (HU<br />

INC HL<br />

LD O. (HU<br />

6A LD HL. (6AB5)<br />

ADD HL.OE<br />

EX DE.HL<br />

POP HL<br />

58 CALL 5800<br />

LD A.C <br />

03 38 LD OE. (38D3) <br />

85 6A LD BC. (6A85)<br />

EX DE.HL<br />

OR A<br />

SBC HL.8C<br />

EX DE.HL <br />

38 LD (38D3).HL <br />

POP HL<br />

LD (HU.A<br />

INC HL<br />

LD (HU.E<br />

INC HL<br />

LD (HU.D<br />

DEC HL<br />

DEC HL<br />

POP DE<br />

RET<br />

oder Strings vergleichen<br />

6A LD A. (6A65)<br />

CP 03 =<br />

JR NZ. 34 + 5E85H<br />

PUSH OE<br />

PUSH HL<br />

V1_0A<br />

NACH DE<br />

I ZEIGER AUF<br />

ISTRINGARBEITSBEREICH<br />

ISTRING MIT LÄNGE IN B<br />

IVON (DE) NACH (HL)<br />

I üBERTRAGEN<br />

LÄNGE ZWEITER STRING<br />

IOFFSET AUF ZWEITEN STRING<br />

I HOLEN<br />

ANFANG STRINGTEXTBEREICH<br />

ZEIGER AUF STRING ERRECHNEN<br />

NACH DE<br />

ZEIGER AUF ENDE ERSTER STR.<br />

ISTRING MIT LÄNGE IN B<br />

IVON (DE) NACH (HL)<br />

I üBERTRAGEN<br />

LÄNGE NEUER STRING<br />

I ZEIGER AUF<br />

ISTRINGARBEITSBEREICH<br />

ANFANG STRINGTEXT8EREICH<br />

CARRY-FLAG ZURüCKSETZEN<br />

OFFSET AUF STRING ERRECHNEN<br />

ZEIGER ENDE STRING NACH HL<br />

I ZEIGER AUF<br />

ISTRINGAR8EITSBEREICH<br />

ZEIGER FüR ERGEBNIS<br />

NEUE LÄNGE EINTRAGEN<br />

IOFFSET AUF STRING IN<br />

10ESCRIPTOR EINTRAGEN<br />

I<br />

I ZEIGER WIEDER AUF ANFANG<br />

IDESCRIPTOR SETZEN<br />

GERETTETES REGISTER HOLEN<br />

WERT - FLAG<br />

TYP STRING ?<br />

ZAHLEN VERGLEICHEN<br />

ZEIGER AUF ZWEITEN DESCRIP.<br />

ZEIGER AUF ERSTEN DESCRIP.<br />

I<br />

BASIC 1Z<br />

24147 5E53 24148 5E54 1A LD A.


SEITE 422 <br />

BASIC 1Z-013B V1_0A <br />

24205 5E8D 7E LD A, (HL> VORZEICHEN ERSTER WERT<br />

24206 5E8E 28 DEC HL ZEIGER WIEDER AUF EXPONENT<br />

24207 5E8F 07 RLCA VORZEICHEN NACH CARRY<br />

24208 5E90 C9 RET<br />

24209 5E91 7E LD A, (HL> VORZEICHEN ERSTER WERT<br />

24210 5E92 2B DEC HL ZEIGER WIEDER AUF EXPONENT<br />

24211 5E93 07 RLCA VORZEICHEN NACH CARRY<br />

24212 5E94 30 06 JR NC, 06 ~ 5E9CH WERTE SIND POSITIV<br />

24213<br />

24214 5E96 CD 9C SE CALL 5E9C IREAL-ZAHLEN (HL) ' UND (DE)<br />

24215 lOHNE VORZEICHEN VERGLEICH.<br />

24216<br />

24217 5E99 C8 RET Z ZAHLEN GLEICH<br />

24218 5E9A 3F CCF ERGEBNIS UMKEHREN<br />

24219 5E9B C9 RET<br />

Real Zahlen (DE) und (HL) ohne Vorzeichen vergleichen<br />

24220 5E9C D5 PUSH DE<br />

I ZEIGER AUF WERTE<br />

24221 5E9D E5<br />

PUSH HL I MERI MANTISSE ERSTER WERT <br />

2423 0 5EA6 F6 80 OR 80 MSB IT SETZEN<br />

2423 1<br />

2423 2 5EA8 47 LD B,A WERT MERKEN<br />

24233 5EA9 1A LD A, <br />

24292 5EE4 38 07 JR C, 07<br />

24293<br />

24294 5EE6 FE 20 CP 20<br />

24295<br />

24296 5EE8 D2 FC 5D JP NC, 5<br />

24297<br />

24298<br />

24299 5EEB 18 07 JR 07 ~<br />

24300<br />

24301 5EED ED 44 NEG<br />

24302<br />

24303 5EEF FE 20 CP 20<br />

24304<br />

24305 5EF1 D2 EO 5D JP NC. 5<br />

24306<br />

24307<br />

24308 5EF4 08 EX AF,A<br />

24309 5EF5 38 01 JR C, 01


SEITE 424<br />

BASIC 1Z-013B<br />

24310 <br />

24311 5EF7 EB EX DE,HL <br />

24312 5EF8 08 EX AF,AF' <br />

24313 5EF9 C3 92 5F JP 5F92 <br />

24314 <br />

24315 <br />

24316 5EFC ED 7B 5C 6A LD SP, (6A5C)<br />

24317<br />

24318<br />

24319<br />

24320 5FOO FB EI ;<br />

24321 5F01 El POP HL<br />

24322 5F02 01 POP DE<br />

24323 5F03 3A 63 6A LD A, (6A63)<br />

24324<br />

24325<br />

24326 5F06 B7 OR A<br />

24327 5F07 CA F5 20 JP Z, 20F5<br />

24328<br />

24329<br />

24330 5FOA C9 RET<br />

Zahlen (DEl und CHLl addieren<br />

24331 5FOB ~ 5F17H<br />

30 OA JR NC, OA 24332<br />

24333 5FOD ED 44 NEG<br />

24334<br />

24335 5FOF FE 20 CP 20<br />

24336<br />

24337 5F11 D2 EO 5D JP NC, 5DEO<br />

24338<br />

24339<br />

24340 5F14 EB EX DE,HL<br />

24341 5F15 18 05 JR 05 ~ 5FICH<br />

24342<br />

24343 5F17 FE 20 CP 20<br />

24344<br />

24345 5F19 D2 Fe 50 JP NC, 5DFC<br />

24346<br />

24347<br />

24348 5F1C CD 52 5F CALL 5F52<br />

24349<br />

24350<br />

24351 5F1F 7C LD A,H<br />

24352 5F20 09 EXX<br />

24353 5F21 8C ADC A,H<br />

24354 5F22 09 EXX<br />

24355 5F23 67 LD H,A<br />

24356 5F24 70 LD A,L<br />

24357 5F25 09 EXX<br />

24358 5F26 80 ADC A,L ;<br />

24359 5F27 09 EXX<br />

24360 5F28 6F LD L,A<br />

24361 5F29 7A LD A,D<br />

24362 5F2A 09 EXX<br />

24363 5F2B 8A ADC A,D<br />

V1_0A<br />

ZEIGER AUF ARGUMENTE VERT.<br />

EXPONENTENDIFFERENZ HOLEN<br />

I ZAHLEN VONEINANDER<br />

I SUBTRAH I EREN<br />

STACKPOINTER HOLEN<br />

INTERRUPT FREIGEBEN<br />

I ZEIGER AUF ARGUMENTE<br />

I HOLEN<br />

FEHLER 2 üBERLAUFFEHLER<br />

2tes ARGUMENT IST GRöSSER<br />

EXPONETENTDIFFERENZ MAXIMAL<br />

ERGEBNIS 1ST 2tes ARGUMENT<br />

ZEIGER VERTAUSCHEN<br />

I MANTISSEN ANGLEICHEN<br />

IUND ZAHLEN ADDIEREN<br />

EXPONENTENDIFFEREN MAXIMAL<br />

12tes ARGUMENT ZU KLEIN ~<br />

IERGEBNIS IST Ites ARGUMENT<br />

I MANTISSEN ANGLEICHEN UND<br />

IWERTE IN REGISTER LADEN<br />

14tes (LS)BVTE MANTISSEN<br />

I ADDIEREN<br />

ERGEBNIS MERKEN<br />

13tes BVTE MANTISSEN<br />

I ADDIEREN<br />

ERGEBNIS MERKEN<br />

12tes BVTE MANTISSEN<br />

I ADDIEREN<br />

24364 5F2C 09<br />

24365 5F2D 57<br />

24366 5F2E 7B<br />

24367 5F2F D9<br />

24368 5F30 8B<br />

24369 5F31 09<br />

24370 5F32 30<br />

24371<br />

24372 5F34 IF<br />

24373 5F35 CS<br />

24374<br />

24375 5F37 CS<br />

24376<br />

24377 5F39 CB<br />

24378<br />

24379 5F3S OC<br />

24380 5F3C CA<br />

24381<br />

24382<br />

24383 5F3F 5F<br />

24384 5F40 79<br />

24385 5F41 09<br />

24386 5F42 01<br />

24387<br />

24388<br />

24389 5F45 2A<br />

24390<br />

24391<br />

24392 5F48 77<br />

24393 5F49 09<br />

24394 5F4A F3<br />

24395 5F4B F9<br />

24396 5F4C 09<br />

24397 5F4D E5<br />

24398 5F4E 05<br />

24399 5F4F C3<br />

24400<br />

24401<br />

Mantissen<br />

Werte in<br />

24402 5F52 F3<br />

24403 5F53 EO<br />

24404<br />

24405<br />

24406<br />

24407 5F57 08<br />

24408 5F58 23<br />

24409 5F59 F9<br />

24410 5F5A 09<br />

24411 5F5B 01<br />

24412 5F5C CB<br />

24413<br />

24414 5F5E EI<br />

24415 5F5F B7<br />

24416 5F60 08<br />

24417 5F61 FE<br />

24418<br />

24419 5F63 38<br />

24420<br />

BASIC<br />

1Z<br />

OB<br />

EXX<br />

LD<br />

LD<br />

EXX<br />

ADC<br />

EXX<br />

JR<br />

D,A <br />

A,E<br />

A.E<br />

NC.<br />

1A<br />

RRA<br />

RR<br />

0<br />

10<br />

RR<br />

L<br />

lC<br />

RR<br />

H<br />

FC 5E<br />

INC<br />

JP<br />

C<br />

Z. 5<br />

05 00<br />

LD<br />

LD<br />

EXX<br />

LD<br />

E.A<br />

A.C<br />

BC.<br />

59 6A<br />

LD<br />

HL. (<br />

EO 50<br />

LD<br />

ADD<br />

DI<br />

LD<br />

EXX<br />

(HU<br />

HL.<br />

SP.H<br />

PUSH HL<br />

PUSH OE<br />

JP 5DEO<br />

entsprechend Exp<br />

Register laden<br />

01<br />

73 5E 6A LD<br />

(6A<br />

EX<br />

INC<br />

LO<br />

EXX<br />

POP<br />

FB SET<br />

AF.A<br />

HL<br />

SP.H<br />

OE <br />

7,E<br />

POP HL<br />

OR A<br />

08 EX CP AF.A<br />

08<br />

OC JR C. O<br />

I<br />

I<br />

I


SEITE<br />

24421 5F65<br />

24422<br />

24423 5F67<br />

24424 5F68<br />

24425<br />

24426 5F6A<br />

24427 5F6B<br />

24428 5F6C<br />

24429 5F6D<br />

24430<br />

24431 5F6F<br />

24432<br />

24433 5F71<br />

24434 5F72<br />

24435<br />

24436 5F74<br />

24437 5F75<br />

24438 5F76<br />

24439<br />

24440 5F78<br />

24441<br />

24442 5F7A<br />

24443<br />

24444 5F7C<br />

24445<br />

24446 5F7E<br />

24447 5F7F<br />

24448 5F80<br />

24449<br />

24450 5F82<br />

24451 5F83<br />

24452 5F84<br />

24453 5F85<br />

24454 5F86<br />

24455 5F87<br />

24456 5F88<br />

24457<br />

24458 5F8A<br />

24459 5F8B<br />

24460 5F8C<br />

24461<br />

24462<br />

24463<br />

24464 5F90<br />

24465 5F91<br />

Zahl<br />

24466 5F92<br />

24467<br />

24468 5F94<br />

24469<br />

24470<br />

24471 5F97<br />

24472<br />

24473<br />

24474 5F9A<br />

24475 5F9B<br />

24476 5F9C<br />

426<br />

D6 08<br />

08<br />

CB 14<br />

65<br />

6A<br />

53<br />

1E 00<br />

18 EF<br />

B7<br />

28 OE<br />

08<br />

B7<br />

CS 1B<br />

CS 1A<br />

CS 1D<br />

CS 1C<br />

08<br />

3D<br />

20 F2<br />

D9<br />

ES<br />

4E<br />

23<br />

F9<br />

D1<br />

CS FB<br />

EI<br />

08<br />

ED 7B<br />

FB<br />

C9<br />

(DE) von<br />

FE 20<br />

D2 EO<br />

CD 52<br />

7C<br />

D9<br />

9C<br />

BASIC 1Z-013B<br />

SUB A. 08<br />

EX<br />

RL<br />

AF.AF'<br />

H<br />

LD<br />

LD<br />

LD<br />

LD<br />

H.L<br />

L.D<br />

D.E<br />

E. 00<br />

JR EF -+ 5F60H<br />

OR<br />

JR<br />

A<br />

Z. OE<br />

-+ 5F82H<br />

EX<br />

OR<br />

RR<br />

AF.AF'<br />

A<br />

E<br />

RR<br />

D<br />

RR<br />

L<br />

RR<br />

H<br />

EX<br />

DEC<br />

JR<br />

AF.AF'<br />

A<br />

NZ. F2<br />

-+ 5F74H<br />

EXX<br />

EX<br />

LD<br />

INC<br />

LD<br />

POP<br />

SET<br />

DE.HL<br />

C. (HL><br />

HL <br />

SP.HL <br />

DE <br />

7.E<br />

5E 6A<br />

POP<br />

EX<br />

LD<br />

HL ;<br />

AF.AF'<br />

SP. (6A5E)<br />

EI<br />

RET<br />

Zahl<br />

(HL) subtrahieren<br />

CP 20<br />

5D<br />

JP NC. 5DEO<br />

5F CALL 5F52<br />

LD A.H<br />

EXX<br />

SBC A.H<br />

V1_0A<br />

DIFFERENZ MINUS ACHT BIT<br />

REST DIFFERENZ RETTEN<br />

RUNDUNGSBIT NACH CARRY<br />

I MANTISSE UM ACHT BIT<br />

I (1 BYTE) SCHIEBEN<br />

üBERPRüFEN. OS ANGEGLICHEN<br />

DIFFERENZ GLEICH NULL ?<br />

MANTISSEN ANGEGLICHEN<br />

RESTDIFFERENZ RETTEN<br />

CARRY-FLAG ZURüCKSETZEN<br />

I MANTISSE UM EIN BIT<br />

I SCHIEBEN<br />

, I<br />

,<br />

RESTDIFFERENZ HOLEN<br />

MINUS EINS<br />

WEITER ANGLEICHEN<br />

ZEIGER 2tes ARGUMENT<br />

EXPONENTEN HOLEN<br />

ZEIGER AUF MANTISSE<br />

STACKPOINTER SETZEN<br />

MSBYTES MANTISSE HOLEN<br />

MSBIT SETZEN<br />

LSBYTES MANTISSE HOLEN<br />

BIT FüR RUNDUNG HOLEN<br />

STACKPOINTER CORRIGIEREN<br />

INTERRUPT FREIGEBEN<br />

EXPONENTENOIFFERENZ MAXIMAL<br />

'DIFFERENZ ZU GROSS -+<br />

'ERGEBNIS IST Ites ARGUMENT<br />

I MANTISSEN ANGLEICHEN UND<br />

IWERTE IN REGISTER LADEN<br />

14tes (LS) BYTE<br />

'SUBTRAHIEREN<br />

,<br />

BASIC 1Z-<br />

24477 5F9D D9 EXX<br />

24478 5F9E 67 LD H.A<br />

24479 5F9F 70 LD A.L<br />

24480 5FAO D9 EXX<br />

24481 5FA1 9D SBC A.L<br />

24482 5FA2 D9 EXX<br />

24483 5FA3 6F LD L.A<br />

24484 5FA4 7A LO A.D<br />

24485 5FA5 D9 EXX<br />

24486 5FA6 9A SBC A.D<br />

24487 5FA7 D9 EXX<br />

24488 5FA8 57 LD D.A<br />

24489 5FA9 7B LD A.E<br />

24490 5FAA 09 EXX<br />

24491 5FAB 9B SBC A.E<br />

24492 5FAC D9 EXX<br />

24493 5FAD B7 OR A<br />

24494 5FAE 28 16 JR Z. 1<br />

24495<br />

24496 5FBO CB 7F BIT 7.A<br />

24497<br />

24498 5FB2 20 OE JR NZ.<br />

24499<br />

24500 5FB4 CB 14 RL H<br />

24501<br />

24502 5FB6 CB 15 RL L<br />

24503<br />

24504 5FB8 CB 12 RL D<br />

24505<br />

24506 5FBA 17 RLA<br />

24507 5FBB OD OEC C<br />

24508 5FBC C2 BO 5F JP NZ.<br />

24509<br />

24510<br />

24511 5FBF C3 CO 5E JP 5ECO<br />

24512<br />

24513<br />

24514 5FC2 5F LD E.A<br />

24515 5FC3 C3 3F 5F JP 5F3F<br />

24516<br />

24517<br />

Ergebnis für internes Forma<br />

24518<br />

24519<br />

24520<br />

24521<br />

24522<br />

24523<br />

24524<br />

24525<br />

24526<br />

24527<br />

24528<br />

24529<br />

24530<br />

24531<br />

24532<br />

5FC6 79 LD A.C<br />

5FC7 D6 08 SUB A.<br />

5FC9 4F LD C.A<br />

5FCA 7A LD A.D<br />

5FCB 55 LD D.L<br />

5FCC 6C LD L.H<br />

5FCD 26 00 LD H. 0<br />

5FCF 28 02 JR Z. 0<br />

SFD1 30 DA JR NC.<br />

5FD3 C3 CO 5E JP SECO<br />

I<br />

I<br />

I<br />

I


SEITE 428<br />

BASIC 1Z-013B V1_0A<br />

BASIC 1Z<br />

24533<br />

24587 6008 C8 FA<br />

SET 7.D<br />

24588<br />

Vorzeichen Ergebnis für Division oder Multiplikation errechnen<br />

24534 5FD6 4F LO C.A LÄNGE ZAHL<br />

24535 5FD7 23 INC HL I ZEIGER AUF MANTISSEN<br />

24536 5FD8 13 INC DE I STELLEN<br />

24537 5FD9 1A LD A. IMANTISSE Iter WERT<br />

24539 5FD8 32 58 6A LD (6A5B).A VORZEICHEN ERGEBNIS<br />

24540<br />

24541<br />

24542 5FDE 28 DEC HL • ZEIGER WIEDER AUF<br />

24543 5FDF 18 DEC DE I EXPONENTEN STELLEN<br />

24544 5FEO C9 RET<br />

*<br />

Funktion (Multiplikation)<br />

24589 600D 23 INC HL<br />

24590 600E 5E LO E. (H<br />

24591 600F 23 INC HL<br />

24592 6010 E5 PUSH HL<br />

24593 6011 67 LD H.A<br />

24594 6012 6F LD L.A<br />

24595 6013 D9 EXX<br />

24596 6014 El POP HL<br />

24597 6015 56 LD D. (H<br />

24598 6016 23 INC HL<br />

24599 6017 5E LD E. (H<br />

24600 6018 47 LD 8.A<br />

24601 6019 4F LD C.A<br />

24602 601A 67 LD H.A<br />

24603 6018 6F LO L.A<br />

24604 601C D9 EXX<br />

24605 601D DD 7E 00 LD A. EXPONENT Ites ARGUMENT<br />

24619 6028 30 12 JR NC.<br />

24558 5FEE 87 OR A GLEICH NULL<br />

24620 <br />

24559 5FEF CA CO 5E JP Z. 5ECO lEIN FAKTOR GLEICH NULL<br />

24621 602D<br />

+<br />

08 EX AF.A<br />

24560<br />

24622 602E D9<br />

I ERGEBNIS GLEICH NULL<br />

EXX<br />

24561<br />

24623 602F 79<br />

LD A.C<br />

24562 5FF2 1A LD<br />

24624 6030 80<br />

A. PLUS EXPONENT Iter WERT<br />

24633 6039 3E 01 LD A. 01<br />

24572 5FFC 5F LD E.A<br />

24634<br />

L-8YTE EXPONENTENZÄHLER<br />

24573 5FFD 3E 00 LD A. 00 I EVENTUELLEN ü8ERTRAG<br />

24635 6038 32 60 6A LD (6A6<br />

24574 I ERFASSEN<br />

24636<br />

24575 5FFF 8F ADC A.A<br />

24637<br />

I<br />

24576 6000 57 LD D.A<br />

24638 603E<br />

H-8YTE EXPONENTENZÄHLER<br />

08 EX AF.A<br />

24577 6001 ED 53 61 6A LD ( 6A6<br />

24639 603F CB 3A<br />

1) • DE EXPONENT FüR ERGE8NIS SRL D<br />

24578<br />

24640<br />

24579<br />

24641 6041 C8 18 RR E<br />

24580<br />

24642<br />

24581 6005 23 INC HL ZEIGER AUF MANTISSE<br />

24643 6043 D9 EXX<br />

24582 6006 AF XOR A<br />

24644 6044<br />

ACCU AUF NULL<br />

C8 1A RR D<br />

24583 6007 32 60 6A LD (6A60).A<br />

24645<br />

FLAG üBERTRAG AUFGETRETEN<br />

24584<br />

24646 6046 C8 18 RR E<br />

24585<br />

24647<br />

24586 600A 56 LD D. (HL><br />

24648 6048<br />

MSBYTE 1te ZAHL HOLEN<br />

C8 18 RR B<br />

24606<br />

24607


SEITE 430<br />

BASIC 1Z-013B<br />

24649<br />

24650 604A 09 EXX<br />

24651 604B 10 00 OJNZ 00 ~ 602AH<br />

24652<br />

24653 6040 00 23 INC IX<br />

24654<br />

24655 604F 00 7E 00 LD A. (IX+OO)<br />

24656<br />

24657<br />

24658 6052 00 OEC C<br />

24659 6053 20 CF JR NZ. CF ~ 24660<br />

24661 6055 09 EXX<br />

24662 6056 3A 60 6A LO A. (6A60)<br />

24663<br />

24664<br />

24665 6059 B7 OR A<br />

24666 605A 28 16 JR Z. 16 ~ 6072H<br />

24667<br />

24668 605C EO 5B 61 6A LD OE. (6A61)<br />

24669<br />

24670<br />

24671<br />

24672 6060 13 INC OE<br />

24673 6061 EO 53 61 6A LD (6A61).OE<br />

24674<br />

24675<br />

24676<br />

24677 6065 D9 EXX<br />

24678 6066 37 SCF<br />

24679 6067 CB lC RR H<br />

24680<br />

24681 6069 CB 10 RR L<br />

24682<br />

24683 606B 09 EXX<br />

24684 606C CB lC RR H<br />

24685<br />

24686 606E CB lD RR L<br />

24687<br />

24688 6070 CB 19 RR C<br />

24689<br />

24690 6072 CB 79 BIT 7.C<br />

24691<br />

24692 6074 28 lA JR Z. lA ~ 6090H<br />

24693<br />

24694 6076 11 01 00 LO OE. 0001<br />

24695<br />

24696<br />

24697 6079 19 AOD HL.DE<br />

24698 607A 09 EXX<br />

24699 607B 11 00 00 LO DE. 0000<br />

24700<br />

24701<br />

24702 607E ED 5A ADC HL.DE ;<br />

24703<br />

24704 6080 D9 EXX<br />

24705 6081 30 00 JR NC. OD ~ 24706<br />

24707 6083 ED 5B 61 6A LD OE. (6A6l> I<br />

24708<br />

24709<br />

24710<br />

V1_0A<br />

WEITERE BIT'S DIESES BYTE<br />

I ZEIGER AUF MULTIPLIKANT<br />

lAUF NÄCHSTES BYTE<br />

BYTE HOLEN<br />

RESTANZAHL BYTES<br />

WEITERE BYTES<br />

FLAG üBERTRAG AUFGETRETEN<br />

üBERTRAG AUFGETRETEN ?<br />

NEIN<br />

EXPONENT ERGEBNIS<br />

PLUS EINS<br />

UND WIEDER MERKEN<br />

I MANTISSE ENTSPRECHEND<br />

I üBERTRAG MERKEN<br />

MSBIT BYTE 5 (Rundungsbit)<br />

NICHT AUFRUNDEN<br />

I ERGEBNIS AUFRUNDEN<br />

KEIN üBERTRAG<br />

EXPONENT ERGEBNIS<br />

24711 6087<br />

24712 6088<br />

24713<br />

24714<br />

24715<br />

24716 608C<br />

24717 6080<br />

24718<br />

24719 608F<br />

24720 6090<br />

24721<br />

24722 6092<br />

24723<br />

24724 6094<br />

24725<br />

24726<br />

24727 6097<br />

24728<br />

24729<br />

24730 609A<br />

24731 609B<br />

24732<br />

24733<br />

24734 609E<br />

24735<br />

24736<br />

24737 60Al<br />

24738<br />

24739<br />

24740 60A4<br />

24741 60A5<br />

24742<br />

24743<br />

24744 60A8<br />

24745<br />

24746 60AA<br />

24747 60AB<br />

24748<br />

24749 60AO<br />

24750<br />

24751<br />

24752 60BO<br />

24753<br />

24754<br />

24755 60B3<br />

24756<br />

24757<br />

24758 60B6<br />

24759<br />

24760<br />

24761 60B9<br />

247b2 bOBA<br />

247b3 bOB9<br />

24764 60BC<br />

2476::5 6090<br />

24766 bOBE<br />

24767 bOBF<br />

247b8 60CO<br />

24769<br />

24770 bOC2<br />

BASIC<br />

13<br />

ED 53 61 6A<br />

09<br />

26 80<br />

09<br />

00 El<br />

00 E5<br />

DO 75 04<br />

DO 74 03<br />

09<br />

00 75 02<br />

00 74 01<br />

2A 61 6A<br />

B7<br />

11 81 00<br />

ED 52<br />

7C<br />

C6 00<br />

FA C5 60<br />

C2 FC 5E<br />

DD 75 00<br />

C3 EO 50<br />

79<br />

09<br />

43<br />

::5A<br />

57<br />

09<br />

5A<br />

16 00<br />

C3 4D 60<br />

1Z<br />

INC DE<br />

LD (6A<br />

EXX<br />

LD H. 8<br />

EXX<br />

POP IX<br />

PUSH IX<br />

LD


SEITE 432<br />

BASIC 1Z-013B<br />

24771 <br />

24772 <br />

24773 60C5 ED 7B 5C 6A LD SP. (6A5C)<br />

24774<br />

24775<br />

24776<br />

24777 60C9 C3 CO SE JP 5ECO<br />

24778<br />

24779<br />

Funktion / (Division><br />

24780 60CC CD 9B 50 CALL 5D9B<br />

24781<br />

24782<br />

24783 60CF CD D6 5F CALL 5FD6<br />

24784<br />

24785<br />

24786 60D2 D5 PUSH DE<br />

24787 60D3 E5 PUSH HL<br />

24788 6004 ED 73 5C 6A LD (6A5C).SP<br />

24789<br />

24790<br />

24791<br />

24792 6008 1A LD A.


SEITE 434<br />

BASIC 1Z-013B V1.0A BASIC 1Z-0<br />

24885<br />

24886<br />

6135<br />

6136<br />

B7<br />

09<br />

OR A<br />

EXX<br />

CARRY-FLAG ZURüCKSETZEN Ergebnis Divisi o n aufbereiten<br />

24887 6137 EO 52 SBC HL,OE IDIVISOR EIN MAL 2 4943 616F F1 POP AF<br />

24888 I SUBTRAH I EREN 24944 6170 67 LO H,A<br />

24889 6139 09 EXX I 24945 61 7 1 D9 EXX<br />

24890 613A EO 52 SBC HL.OE I 2 4946 6172 Fl POP AF<br />

24891 24947 6173 5F LD E.A<br />

24892 613C 3F CCF 24948 6174 F1 POP AF<br />

24893 6130 38 E7 JR C. E7 + 6126H EIN BIT ERGEBNIS MERKEN 24949 6175 57 LD D,A<br />

24894 24950 6176 F1 POP AF<br />

24895 613F 09 EXX 24951 6177 4F LD C,A<br />

24896 6140 19 ADO HL.OE IRESTDIVIEND CORRIGIEREN 24952 6178 Fl POP AF<br />

24897 6141 09 EXX I 24953 6179 47 LD B.A<br />

24898 6142 ED 5A AOC HL.OE I 24954 617A Fl POP AF<br />

24899 24955 617B CB 78 BIT 7, B<br />

24900 6144 B7 OR A CARRY-FLAG ZURüCKSETZEN 24956<br />

24901 6145 17 RLA EIN BIT ERGEBNIS MERKEN 24957 6 17D 20 13 JR NZ, 1<br />

24902 6146 09 EXX 24958<br />

24903 6147 29 AOO HL,HL I DIVIDEND UM EINE STELLE 24959 6 17F D9 EXX<br />

24904 6148 D9 EXX I SCHIEBEN 24960 6 180 CB 24 SLA H<br />

24905 6149 EO 6A AOC HL,HL I 24961<br />

24906 :24962 6 182 09 EXX<br />

24907 614B 10 07 DJNZ 07 + 6154H WEITERE BITS DIESES BYTE 24963 6183 CB 13 RL E<br />

24908 2 4964<br />

24909 6140 F5 PUSH AF EIN BYTE ERGEBNIS MERKEN 24965 6185 CB 12 RL D<br />

24910 614E 06 08 LO B. 08 8 BIT JE BYTE 24966<br />

24911 24967 6187 CB 11 RL C<br />

24912 6150 00 DEC C RESTANZAHL BYTES 2 4968<br />

24913 6151 CA 6F 61 JP Z. 616F DIVISION DURCHGEFüHRT 24969 6189 CB 10 RL B<br />

24914 2 4970<br />

24915 2 4971 618B 3 0 DEC A<br />

24916 6154 09<br />

EXX<br />

2 4972 618C C2 7B 61 JP NZ, 6<br />

24917 6155 B7<br />

OR A CARRY-FLAG ZURüCKSETZEN<br />

24973<br />

24918 6156 EO 52 SBC HL,DE 24974<br />

24919 24975 618F C3 CO 5E J P 5ECO<br />

24920 6158 09 EXX 24976<br />

24921 6159 EO 52 SBC HL,DE 24977<br />

24922<br />

24923 6158 37 SCF ~ CARRY-FLAG SETZEN<br />

24924 6l5C 17<br />

RLA<br />

EIN BIT ERGEBNIS MERKEN<br />

Er gebnis der Division eventu<br />

24925 6150 10 06<br />

DJNZ 06 + 6165H • WEITERE BITS DIESES BYTE<br />

24926 24978 6192 D9 EXX<br />

24927 615F F5 PUSH AF EIN BYTE ERGEBNIS MERKEN 2 4979 6193 CB 14 RL H<br />

24928 6160 06 08 LD B. 08 ~ 8 BIT JE BYTE 24980<br />

24929 2 4981 6195 D9 EXX<br />

24930 6162 00 DEC C • RESTANZAHL BYTES 24982 6196 30 11 JR NC. 1<br />

24931 6163 28 OA JR Z. OA + 616FH ~ DIVISION DURCHGEFüHRT 24983<br />

24932 2 4984 6198 2 1 01 00 LD HL. 0<br />

2493 3 6165 09 EXX 2 4985<br />

24934 6166 29 ADD HL,HL I DIVIDEND UM EINE STELLE 24986<br />

2 49 ~ 5 6161 09 EXX I SCHIEBEN 24987 619B 19 ADD HL.O<br />

2 49 ~ 6 61Q8 ED 6A ADC HL,HL , I 24988 619C EB EX DE.HL<br />

249 ~ 7 24989 619D 21 00 00 LO HL. 0<br />

24939 616A 24939<br />

38 E8 JR C, E8 + 6154H 24990<br />

24991<br />

2 4940 616C C3 2 1 61 JP 6121 24992 61AO ED 4A ADC HL.B<br />

2494 1 24993<br />

2494 ~ 24994 61A2 44 LD B.H<br />

24995 61A3 4D LD C.L<br />

24996 61A4 30 0 3 JR NC, 0<br />

2 4997<br />

2 4998 61A6 06 80 LD B. 80


SEITE 436 <br />

BASIC 1 Z-C>13B V1.0A <br />

24999<br />

25000 61A8 3C INC A EXPONENT PLUS EINS<br />

25001 61A9 E1 POP HL I ZEIGER FüR ERGEBNIS<br />

25002 61AA E5 PUSH HL I<br />

25003 61AB 77 LD (HU,A EXPONENTEN EINTRAGEN<br />

25004 61AC 23 INC HL<br />

25005 61AO 70 LD (HU,B I MANTISSE ERGEBNIS IM<br />

25006 61AE 23 INC HL I SPEICHER ABLEGEN<br />

25007 61AF 71 LD (HU,C I<br />

25008 61BO 23 INC HL I<br />

25009 61Bl 72 LD (HU,D I<br />

25010 61B2 23 INC HL I<br />

25011 61B3 73 LD (HU,E I<br />

25012 61B4 C3 EO 50 JP 5DEO I VORZEICHEN ERGEBNIS<br />

25013 I EINTRAGEN<br />

25014<br />

Vo~zeichen de~ Real- ode~ Double P~ecision - Zahl abf~agen<br />

25015 61B7 23 INC HL ZEIGER AUF MANTISSE<br />

25016 61B8 CB 7E BIT 7, (HU VORZEICHEN ABFRAGEN<br />

25017<br />

25018 61BA 2B DEC HL ZEIGER WIEDER AUF EXPONENT<br />

25019 61BB C9 RET<br />

Zahl (HU mal zwei<br />

25020 61BC 34 INC (HU EXPONENT PLUS EINS<br />

25021 61BD CO RET NZ ERGEBNIS IST OK<br />

25022 61BE C3 F5 20 JP 20F5 FEHLER 2 üBERLAUFFEHLER<br />

25023<br />

25024<br />

Zahl (HU du~ch zwei<br />

25025 61Cl 7E LD A, (HU EXPONENTEN HOLEN<br />

25026 61C2 B7 OR A GLEICH NULL ?<br />

25027 61C3 C8 RET Z WERT IST GLEICH NULL<br />

25028 61C4 35 DEC (HU EXPONENT MINUS EINS<br />

25029 61C5 CO RET NZ ERGEBNIS IST OK<br />

25030 61C6 C3 87 50 JP 5D87 ERGEBNIS NULL VORGEBEN<br />

25031<br />

25032<br />

Einen Rechenspeiche~ für Rechen~outine reservieren<br />

25033 61C9 E5 PUSH HL ZEIGER AUF RECHENSPEICHER<br />

25034 61CA 11 05 00 LD OE, 0005 ; LÄNGE REAL - WERT<br />

25035<br />

25036<br />

25037 61CD 19 ADD HL,DE EINEN RECHENSPEICHER RESER.<br />

25038 61CE EB EX DE,HL ADRESSE NACH DE<br />

25039 61CF 2A BD 6A LD HL, (6ABD) 'MAXIMAL ERLAUBTE RAM­<br />

25040 , ADRESSE<br />

25041<br />

25042 61D2 2B DEC HL<br />

25043 61D3 ED 52 SBC HL,DE IRECHENSPEICHERADRESSE<br />

25044 I üBERPRüFEN<br />

BASIC 1Z-<br />

25045 61D5 DA F8 20 JP C. 20<br />

25046<br />

25047<br />

25048 61D8 E1 POP HL<br />

25049 61D9 C9 RET<br />

Rechenspeicher für Routinen<br />

25050 61DA E5 PUSH HL<br />

25051 61DB 22 12 6A LD (6A12<br />

25052<br />

• 25053<br />

25054 61DE CD C9 61 CALL 61C<br />

25055<br />

25056 <br />

25057 61El EB EX DE,HL<br />

25058 61E2 22 14 6A LD (6A1<br />

25059<br />

25060 <br />

25061 61E5 CD C9 61 CALL 61C<br />

25062<br />

25063<br />

25064 61E8 EB EX DE,HL<br />

25065 61E9 22 16 6A LD (6A1<br />

25066<br />

25067 <br />

25068 61EC CD C9 61 CALL 61C<br />

25069<br />

25070<br />

25071 61EF ED 53 18 6A LD (6A1<br />

25072<br />

25073<br />

25074<br />

25075 6IF3 EI POP HL<br />

25076 6IF4 C9 RET<br />

Funktion l'<br />

25077 61F5 EB EX DE,HL<br />

25078 61F6 7E LD A, (H<br />

25079 61F7 B7 OR A<br />

25080 61F8 CA 58 62 JP Z, 62<br />

25081<br />

25082<br />

25083 61FB EB EX DE,HL<br />

25084 61FC 7E LD A, (HL<br />

25085 61FD B7 OR A<br />

25086 61FE CA 87 5D JP Z, 5D<br />

25087<br />

25088<br />

25089 6201 CD 87 61 CALL 61B<br />

25090<br />

25091 <br />

25092 6204 28 2C JR Z. 2C<br />

25093


SEITE 438<br />

BASIC 1Z-013B<br />

Basis negativ ~ untersuchen. ob Hochzahl<br />

25094 6206 CO 91 50 CALL 5091<br />

25095<br />

25096<br />

25097 6209 E8 EX OE.HL<br />

25098 620A 05 PUSH OE<br />

25099 6208 E5 PUSH HL<br />

25100 620C 11 6E 6A LO OE. 6A6E<br />

25101<br />

25102<br />

25103 620F CD B8 3A CALL 3AB8<br />

25104<br />

25105<br />

25106 6212 21 6E 6A LO HL. 6A6E<br />

25107<br />

25108<br />

25109 6215 CD BO 62 CALL 62BO<br />

25110<br />

25 111<br />

25112 6218 7E LO A. (HL)<br />

25113 6219 87 oR A<br />

25114 621A C2 01 21 JP NZ. 2101<br />

25115<br />

25116<br />

25117 6210 Ei POP HL<br />

25118 621E E5 PUSH HL<br />

25119 621F CD 21 3D CALL 3021<br />

25120<br />

25121<br />

25122 6222 AF XoR A<br />

25123 6223 C8 10 RR L<br />

25124<br />

25125 6225 IF RRA<br />

25126 6226 01 POP OE<br />

25127 6227 EI POP HL<br />

25128 6228 F5 PUSH AF<br />

25129 6229 CD 32 62 CALL 6232<br />

25130<br />

25131<br />

25132 622C Fl POP AF<br />

25133 622D 23 INC HL<br />

25134 622E B6 oR (HU<br />

25135 622F 77 LI) (HU.A<br />

25136 6230 28 OEC HL<br />

25137 623! C9 RET<br />

2~;'38 6232 ~ 6258H<br />

~ 625EH<br />

E8 EX OE.HL<br />

7.5139 6233 7E LD A. (HL><br />

25140 6234 87 OR A<br />

25141 6235 28 21 JR Z. 21 25142<br />

25143 6237 CD B7 61 CALL 61B7<br />

25144<br />

25145<br />

25146 623A 28 22 JR Z. 22 25147<br />

V1.0A<br />

ganze Zahl ist<br />

• VORZEICHEN DES WERTES<br />

• (HL) UMKEHREN<br />

• (Basis auf Plus)<br />

ZEIGER AUF BASIS <br />

ZEIGER AUF HOCHZAHL <br />

I ZEIGER AUF <br />

I ZWISCHENSPEICHER <br />

• REAL-ZAHL VON (HL) <br />

'NACH (OE) ü8ERTRAGEN <br />

• (Hochzahl merken) <br />

ZEIGER AUF HOCHZAHL <br />

'NACHKOMMAWERT DER REAL­<br />

• ZAHL (HL) ERRECHNEN<br />

EXPONENT ERGEBNIS HOLEN <br />

GLEICH NULL? <br />

• HOCHZAHL NICHT GANZE<br />

• ZAHL ~ DATENFEHLER<br />

• ZEIGER AUF HOCHZAHL<br />

• 'REAL-ZAHL (HL) UMSETZEN<br />

• IN INTEGER NACH HL<br />

'FLAG WERT GERADE/UNGERADE<br />

• NACH ACCU HOLEN<br />

•<br />

•ZEIGER<br />

AUF HOCHZAHL<br />

ZEIGER AUF BASIS<br />

FLAG WERT GERADE/UNGERADE<br />

(HL) ~ (OE) ERRECHNEN<br />

FLAG WERT GERADE/UNGERADE<br />

ZEIGER AUF MANTISSE EREG8N.<br />

• VORZEICHEN ERGEBNIS<br />

I SETZEN<br />

ZEIGER WIEDER AUF EXPONENT<br />

EXPONENT HOCHZAHL HOLEN <br />

GLEICH NULL ? <br />

JA ~ ERGEBNIS GLEICH +1 <br />

• VORZEICHEN DER ZAHL<br />

• (HL) ABFRAGEN<br />

HOCHZAHL POSITIV<br />

BASIC 1Z-<br />

Hochzahl negativ<br />

25148 623 C CD 91 50 CALL 509<br />

25149<br />

25150<br />

25151 623F CD 5E 62 CALL 625<br />

25152<br />

25153<br />

251 54 6242 D5 PUSH OE<br />

2 5155 6243 E5 PUSH HL<br />

25156 6244 11 6E 6A L,.O OE. 6<br />

25157<br />

25158<br />

2 5159 6247 CD 85 3A CALL 3AB<br />

25160<br />

25161<br />

251 62 624A 21 6E 6A LO HL.<br />

25163<br />

251 64<br />

251 65 6240 01 POP OE<br />

251 66 624E CD CC 60 CALL 60C<br />

251 67<br />

251 68<br />

251 69 6251 05 PUSH OE<br />

25170 6252 CD 88 3 A CALL 3A<br />

2517 1<br />

25 172<br />

251 73 6255 EI POP HL<br />

25174 6256 01 POP OE<br />

25175 6257 C9 RET<br />

Ergebnis plus eins vorgeben<br />

25176 6258 05 PUSH DE<br />

25177 6259 CD 85 3A CALL 3A<br />

25178<br />

25179<br />

25 180 625C Ei POP HL<br />

25181 6250 C9 RET<br />

Hochzahl positiv<br />

25 182 625E 05 PUSH OE<br />

25183 625F 11 6E 6A LO OE.<br />

25184<br />

251 85<br />

25186 6262 CD 88 3A CALL 3A<br />

251 87<br />

25188<br />

25189 6265 EI POP HL<br />

25190 6266 CD 36 67 CALL 67<br />

25191<br />

25192<br />

25193 6269 11 6E 6A LD OE.<br />

25194<br />

25195<br />

25196 626C CD EI 5F CALL 5F<br />

25197<br />

25198<br />

25199 626F C3 15 66 JP 6615


SEITE 440<br />

25200 <br />

25201 <br />

Funktion A8S<br />

25202 6272 23<br />

25203 6273 C8 8E<br />

25204<br />

25205 6275 2B<br />

25206 6276 C9<br />

Funktion INT<br />

25207 6277 3A 65 6A<br />

25208<br />

25209<br />

25210 627A FE 02<br />

25211<br />

25212 627C C8<br />

25213 6270 CD B7 61<br />

25214<br />

25215<br />

25216 6280 CA 97 3C<br />

25217<br />

25218<br />

25219 6283 E5<br />

25220 6284 11 6E 6A<br />

25221<br />

25222<br />

25223 6287 CD B8 3A<br />

25224<br />

25225<br />

25226 628A E1<br />

25227 6288 CD 97 3C<br />

25228 <br />

25229 <br />

25230 628E 11 6E 6A<br />

25231<br />

25232<br />

25233 6291 CD 4A 5E<br />

25234<br />

25235<br />

25236 6294 C8<br />

25237 6295 11 77 3D<br />

25238 <br />

25239 <br />

25240 6298 C3 A6 50<br />

25241<br />

' 25242<br />

25243 6298 11 77 3D<br />

25244<br />

25245<br />

25246 629E C3 AF 50<br />

25247<br />

25248<br />

BASIC 1Z-013B<br />

INC HL <br />

RES 7, (HL) <br />

OEC HL <br />

RET <br />

LD A, (6A65)<br />

CP 02<br />

RET Z<br />

CALL 6187<br />

JP Z, 3C97<br />

PUSH HL<br />

LD OE, 6A6E<br />

CALL 3A88<br />

POP HL<br />

CALL 3C97<br />

LO OE, 6A6E<br />

CALL 5E4A<br />

RET Z<br />

LD DE, 3077<br />

JP 5DA6<br />

LO DE, 3077<br />

JP 5DAF<br />

V1_0A<br />

ZEIGER AUF MANTISSE<br />

VORZEICHEN AUF PLUS<br />

ZEIGER WIEDER AUF EXPONENT<br />

WERT - FLAG<br />

INTEGER-WERT ?<br />

HAT KEINE NACHKOMMASTELLEN<br />

• VORZEICHEN DER ZAHL<br />

• (HL) ABFRAGEN<br />

ARGUMENT POSITIV<br />

ZEIGER AUF ARGUMENT<br />

• ZEIGER AUF ZWISCHEN­<br />

• SPEICHER FüR RECHENROUTINE<br />

• REAL-ZAHL VON (HL) <br />

INACH (OE) üBERTRAGEN <br />

ZEIGER AUF ARGUMENT<br />

'NACHKOMMASTELLEN OER<br />

'REAL-ZAHL (HL) VERGESSEN<br />

• ZEIGER AUF ZWISCHEN­<br />

• SPEICHER MIT ARGUMENT<br />

'ZAHLEN (OE) UNO (HL)<br />

• VERGLE I CHEN<br />

ARGUMENT HATTE KEINE NACHK.<br />

ZEIGER AUF +1 (Real-Format)<br />

'REAL-WERT (DE) VOM<br />

'WERT (HL) SUBTRAHIEREN<br />

ZEIGER AUF +1 (Real-Format)<br />

'REAL-WERT (OE) ZUM<br />

'REAL-WERT (HL) AODIEREN<br />

BASIC 1Z<br />

Real - Wert (HL) mit plus e<br />

25249 62Al 11 77 3D LO OE,<br />

25250<br />

25251<br />

25252 62A4 C3 4A 5E JP 5E4A<br />

25253<br />

25254<br />

Integer-Wert des Zahlwertes<br />

25255 62A7 3A 65 6A LD A, (6<br />

25256<br />

25257<br />

25258 62AA FE 02 CP 02<br />

25259<br />

25260 62AC C8 RET Z<br />

25261 62AD C3 97 3C JP 3C97<br />

25262<br />

25263<br />

Funktion FRAC (wird n<br />

25264 6280 3A 65 6A LO A, (6<br />

25265<br />

25266<br />

25267 6283 FE 02 CP 02<br />

25268<br />

25269 6285 28 12 JR Z. 1<br />

25270<br />

25271 62B7 E5 PUSH HL<br />

25272 6288 11 6E 6A LD OE.<br />

25273<br />

25274<br />

25275 628B CD 88 3A CALL 3A<br />

25276<br />

25277<br />

25278 62BE 21 6E 6A LD HL.<br />

25279<br />

25280<br />

25281 62C1 CD 97 3C CALL 3C<br />

25282<br />

25283<br />

25284 62C4 EB EX DE.H<br />

25285 62C5 E1 POP HL<br />

25286 62C6 C3 A6 50 JP 5DA6<br />

25287<br />

25288<br />

Integer - Wert Null (HL) e<br />

25289 62C9 36 00 LD (HU<br />

25290<br />

25291 62C8 23 INC HL<br />

25292 62CC 36 00 LO (HU<br />

25293<br />

25294 62CE 28 DEC HL<br />

25295 62CF C9 RET


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


SEITE<br />

25398<br />

25399<br />

25400 6338<br />

25401<br />

25402<br />

25403 6338<br />

25404 633C<br />

25405<br />

25406<br />

25407 633F<br />

25408 6340<br />

25409 6341<br />

25410 6342<br />

25411<br />

25412<br />

25413 6345<br />

25414 6346<br />

25415<br />

25416 6348<br />

25417<br />

25418<br />

25419 6348<br />

25420 634C<br />

25421<br />

25422<br />

25423 634F<br />

25424 6350<br />

25425<br />

25426<br />

25427 6353<br />

25428<br />

25429<br />

25430 6356<br />

25431<br />

25432<br />

25433 6359<br />

25434<br />

25435<br />

25436 635C<br />

25437<br />

25438<br />

25439 635F<br />

25440<br />

25441<br />

25442 6362<br />

25443<br />

25444<br />

25445 6365<br />

25446 6366<br />

25447<br />

25448<br />

25449 6369<br />

25450<br />

25451<br />

25452 636C<br />

25453 636D<br />

25454<br />

25455<br />

25456 6370<br />

25457<br />

BASIC 1Z-013B<br />

444<br />

CD 4A 5E<br />

CALL<br />

5E4A<br />

F5<br />

CD C9 61<br />

PUSH<br />

CALL<br />

AF <br />

61C9 <br />

F1<br />

E5<br />

D5<br />

CD 88 3A<br />

POP<br />

PUSH<br />

PUSH<br />

CALL<br />

AF<br />

HL<br />

DE<br />

3AS8<br />

Ei<br />

38 14<br />

POP HL<br />

JR C. 14<br />

~ 635CH<br />

CD 98 62<br />

CALL 6298<br />

E3<br />

CD A6 5D<br />

EX (SP).HL<br />

CALL 5DA6<br />

D1<br />

CD CC 60<br />

POP DE<br />

CALL 60CC<br />

CD 84 63<br />

CALL 6384<br />

11 75 65<br />

LD DE. 6575<br />

C3 AF 5D<br />

JP 5DAF =<br />

11 7F 63<br />

LD DE. 637F<br />

CD El 5F<br />

CALL 5FEI<br />

CD 98 62<br />

CALL 629B<br />

E3<br />

11 7F 63<br />

EX<br />

LD<br />

(SP) .HL<br />

DE. 637F ;<br />

CD A6 5D CALL 5DA6<br />

Dl<br />

CD CC 60<br />

POP <br />

CALL <br />

DE<br />

60CC<br />

CD 84 63 CALL 6384<br />

V1_0A<br />

IZAHLEN (HL) UND (DE)<br />

I VERGLE I CHEN<br />

ERGE8NIS VERGLEICH RETTEN<br />

lEINEN RECHENSPEICHER<br />

I BERE I TSTELLEN<br />

ERGEBNIS VERGLEICH<br />

ZEIGER AUF ARGUMENT<br />

ZEIGER AUF RECHENSPEICHER<br />

'ARGUMENT NACH RECHEN­<br />

'SPEICHER üBERTRAGEN<br />

ZEIGER AUF RECHENSPEICHER<br />

WERT IST KLEINER 3/5<br />

I PLUS EINS ZUR ZAHL (HL)<br />

I (ADDIEREN)<br />

- ROUTINE<br />

/ - ROUTINE<br />

ATN-WERT ERRECHNEN<br />

ZEIGER AUF ""/4 (Re",l)<br />

+ - ROUTINE<br />

ZEIGER AUF SQR(2)-1<br />

* - ROUTINE<br />

'PLUS EINS ZUR ZAHL (HL)<br />

, ADDIEREN<br />

ZEIGER AUF SQR(2)-1<br />

- ROUTINE<br />

/ - ROUTINE<br />

ATN-WERT ERRECHNEN<br />

25458<br />

25459 6373<br />

25460<br />

25461<br />

25462 6376<br />

25463<br />

25464<br />

25465 6379<br />

25466<br />

25467<br />

25468 637C<br />

25469<br />

25470<br />

25471 637F<br />

25472 6380<br />

25473<br />

25474<br />

25475<br />

25476 6384<br />

25477 6385<br />

25478 6386<br />

25479<br />

25480<br />

25481 6389<br />

25482 638A<br />

25483 638B<br />

25484 638C<br />

25485<br />

25486<br />

25487 638F<br />

25488 6390<br />

25489 6391<br />

25490 6392<br />

25491<br />

25492<br />

25493 6395<br />

25494<br />

25495<br />

25496<br />

25497 6399<br />

25498 639A<br />

25499 639B<br />

25500<br />

25501<br />

25502 639E<br />

25503<br />

25504<br />

25505 63A1<br />

25506 63A2<br />

25507<br />

25508 63A4<br />

25509 63A5<br />

25510<br />

25511<br />

25512 63A8<br />

25513<br />

BASIC<br />

CD BC 61<br />

11 75 65<br />

CD AF 5D<br />

C3 Cl 61<br />

7F<br />

54 13 CC DO<br />

C5<br />

E5<br />

CD DA 61<br />

El <br />

E5 <br />

D5 <br />

CD B8 3A <br />

E1 <br />

5D <br />

54 <br />

CD E1 5F <br />

ED 5B 16 6A<br />

El <br />

E5 <br />

CD B8 3A <br />

3A 65 6A<br />

3D<br />

FE 04<br />

47<br />

21 43 65<br />

CA 44 64<br />

1Z<br />

CALL 6<br />

LD DE.<br />

CALL 5<br />

JP 61C<br />

PUSH B<br />

PUSH H<br />

CALL 6<br />

POP HL<br />

PUSH H<br />

PUSH. D<br />

CALL 3<br />

POP HL<br />

LD E.L<br />

LD E.H<br />

CALL 5<br />

LD DE.<br />

POP HL<br />

PUSH H<br />

CALL 3<br />

LD A.<br />

DEC A<br />

CP 04<br />

LD B.A<br />

LD HL<br />

JP Z.


SEITE<br />

25514<br />

25515 63AB<br />

25516<br />

25517 63AD<br />

25518<br />

25519<br />

Befehl<br />

25520 63BO<br />

25521 63Bl<br />

25522 6382<br />

25523 63B3<br />

25524 <br />

25525 <br />

25526 63B6<br />

25527 <br />

25528 <br />

25529 6 3 B9<br />

25530<br />

25531<br />

25532 63BC<br />

25533 <br />

25534 <br />

25535 63 BF<br />

25536 <br />

25537 <br />

25538 6 3C2<br />

25539<br />

25540<br />

25541 63C5<br />

Befehl<br />

25542 63 C6<br />

25543 63 C7<br />

25544 6 3C8<br />

25545 63C9<br />

25546 63CA<br />

25547<br />

25548 63CC<br />

25549<br />

25550 63CE<br />

25551 6 3CF<br />

25552<br />

25553<br />

25554 6 3 02<br />

25555 6303<br />

25556<br />

25557<br />

25558 63D6<br />

25559<br />

25560<br />

25561 6309<br />

25562 630A<br />

25563<br />

25564<br />

25565 63DD<br />

25566 630E<br />

25567<br />

446<br />

BASIC 1Z-013B<br />

06 OA LD B, OA <br />

C3 44 64 JP 6444 <br />

COS <br />

C5 PUSH BC <br />

7E LO A, (HU<br />

B7 OR A <br />

CA E2 62 JP Z, 62E2 <br />

11 75 65 LD DE. 6575<br />

CD Cl 61 CALL 61Cl<br />

CD A6 5D CALL 5DA6<br />

CD BC 61 CALL 61BC<br />

CD 91 50 CALL 5D91<br />

Cl POP BC<br />

SIN <br />

C5 PUSH BC <br />

E5 PUSH HL <br />

23 INC HL <br />

7E LO A. (HU<br />

CB BE RES 7. (HU<br />

E6 80 AND A. 80<br />

2F CPL<br />

32 lE 6A LD (6A1E), A<br />

28 DEC HL<br />

CD C9 61 CALL 61C9<br />

21 75 65 LD HL. 6575<br />

D5 PUSH DE<br />

CD B8 3A CALL 3AB8<br />

El POP HL<br />

CO BC 61 CALL 61BC<br />

V1_0A<br />

10 ITERATIONSSCHRITTE<br />

ITERATION AUSFüHREN<br />

REGISTER RETTEN <br />

EXPONENT HOLEN <br />

GLEICH NULL ? <br />

• ARGUMENT GLEICH NULL +<br />

• ERGEBNIS GLEICH NULL?<br />

ZEIGER AUF ~/4 (Real)<br />

ARGUMENT DURCH ZWEI<br />

• - - ROUTINE<br />

• (,"·/4 vom ArgLlment/2 <br />

I abziehen) <br />

ZAHL (HL) MAL ZWEI <br />

• VORZEICHEN DES WERTES<br />

• (HL) UMKEHREN<br />

GERETTETES REGISTER HOLEN<br />

REGISTER RETTEN <br />

ZEIGER AUF ARGUMENT <br />

ZEIGER AUF MANTISSE <br />

MANTISSE HOLEN <br />

VORZEICHEN MASKIEREN<br />

VORZEICHEN ERGEBNIS<br />

ZEIGER WIEDER AUF EXPONENT<br />

• ZEIGER AUF EINEN RECHEN­<br />

• SPEICHER NACH DE BEREIT­<br />

• STELLEN <br />

ZEIGER AUF ~/4


SEITE 448<br />

BASIC 1Z-013B<br />

25630 641E 6480H<br />

El POP HL<br />

25631 641F 05 PUSH OE<br />

25632 6420 11 75 65 LO OE. 6575<br />

25633<br />

25634<br />

25635 6423 CD 4A SE CALL 5E4A<br />

25636<br />

25637<br />

25638 6426 30 65 JR NC. 65 ~ 25639<br />

25640 6428 01 POP OE<br />

25641 6429 ES PUSH HL<br />

25642 642A 05 PUSH OE<br />

25643 642B CD B8 3A CALL 3AB8<br />

25644<br />

25645<br />

25646 642E EI POP HL<br />

25647 642F 50 LO E.L<br />

25648 6430 54 LO O.H<br />

25649 6431 CO EI 5F CALL 5FEl<br />

25650<br />

25651<br />

25652 6434 ED 5B 16 6A LO DE. (6A16)<br />

25653<br />

25654<br />

25655<br />

25656 6438 El POP HL<br />

25657 6439 ES PUSH HL<br />

25658 643A CD B8 3A CALL 3A88<br />

25659<br />

25660<br />

25661 6430 3A 65 6A LO A. (6A65)<br />

25662<br />

25663<br />

25664 6440 47 LO B.A<br />

25665 6441 21 F3 64 LO HL. 64F3<br />

25666<br />

25667<br />

Iterationsroutine für SIN - COS - ATN<br />

25668 6444 C5 PUSH BC<br />

25669 6445 ES PUSH HL<br />

25670 6446 2A 16 6A LO HL. (6A16)<br />

25671<br />

25672<br />

25673 6449 EO 58 18 6A LO OE. (6A18)<br />

25674<br />

25675<br />

25676<br />

25677 6440 CO E1 5F CALL 5FE1<br />

25678<br />

25679<br />

25680 6450 E1 POP HL<br />

25681 6451 E5 PUSH HL<br />

25682 6452 EO SB 14 6A LO OE. (6A14)<br />

25683<br />

25684<br />

25685<br />

25686 6456 05 PUSH OE<br />

25687 6457 CO B8 3A CALL 3AB8<br />

V1_0A<br />

ZEIGER AUF ARGUMEMENT<br />

ZEIGER AUF RECHENSPEICHER<br />

ZEIGER AUF ",·/4


SEITE 450<br />

BASIC 1Z-013B V1_0A BASIC 1Z<br />

Werte für Iteration nach COS - Reihe vorgeben 25797<br />

25798 64C6 CO C9 61<br />

25741 6480 CO Cl 61<br />

CALL 6<br />

CALL 61Cl ZAHL (HL) OURCH ZWEI 25799<br />

25742<br />

25800<br />

25743<br />

25801 64C9<br />

25744 6490<br />

EO 53 lC 6A LO (6A<br />

11 75 65 LO OE. 6575 ZEIGER AUF ...../4 (Real) 25802<br />

25745<br />

25746<br />

25803<br />

25804<br />

25747 6493 CD A6 50 CALL 50A6 - ROUTINE _25805 64CO El POP HL<br />

25748<br />

25749<br />

25750 6496<br />

25806 64CE E5 PUSH H<br />

25807 64CF CO B8 3A CALL 3<br />

CO BC 61 CALL 61SC ZAHL (HL) MAL ZWEI 25808<br />

25751<br />

25752<br />

25809<br />

25753 6499<br />

25810 6402 2A lA 6A<br />

CO F7 50<br />

LO HL.<br />

CALL 50F7 ABS OER ZAHL (HL) BILOEN 25811<br />

25754<br />

25755<br />

25812<br />

25756 649C<br />

25813 6405 EB<br />

01<br />

EX OE<br />

POP OE<br />

25757 6490<br />

ZEIGER AUF RECHENSPEICHER 25814 6406 El<br />

E5<br />

POP HL<br />

PUSH HL ZEIGER AUF ARGUMENT<br />

25758 649E<br />

25815 6407<br />

05<br />

E5 PUSH H<br />

PUSH OE ZEIGER AUF RECHENSPEICHER 25816 6408 CO B8 3A CALL 3<br />

25759 649F CO 88 3A CALL 3AB8<br />

25760<br />

I ARGUMENT NACH RECHEN- 25817<br />

• SPEICHER EINS üBERTRAGEN 25818<br />

25761<br />

25762 64A2<br />

25819 640B<br />

El<br />

2A lC 6A LO HL.<br />

POP HL<br />

25763 64A3<br />

ZEIGER AUF RECHENSPEICHER 25820<br />

50 LO E.L I AUCH NACH OE<br />

25764 64A4<br />

25821<br />

54 LO O.H I 25822 640E CD C6 63 CALL 6<br />

25765 64A5 CD E1 5F CALL 5FEl I * - ROUTINE 25823<br />

25766<br />

25767<br />

I (Ergebni s = Argumentt'2) 25824<br />

25825 64El 01 POP OE<br />

25768 64A8 25769<br />

EO 5B 16 6A LO OE. (6A16)<br />

ZEIGER AUF RECHENSPEICHER 2 25826 64E2 05 PUSH O<br />

25770<br />

25827 64E3 CO B8 3A CALL 3<br />

25828<br />

25829<br />

25771<br />

25772 64AC CD B5 3A CALL 3AB5<br />

25773<br />

IPLUS EINS NACH RECHEN- ' 25830 64E6 2A lA 6A LO HL.<br />

25774<br />

ISPEICHER ZWEI üBERTRAGEN 25831<br />

25832<br />

25775 64AF 01 POP OE<br />

25776 6480<br />

I ZEIGER AUF ARGUMENT 25833 64E9 CD BO 63 CALL 6<br />

05 PUSH OE I 25834<br />

25777 64Bl CO B5 3A CALL 3AS5<br />

25778<br />

PLUS EINS NACH (OE) 25835<br />

25779 <br />

25780 64B4 3A 65 6A<br />

25782<br />

25783 64B7 47 LO B.A<br />

25784 64B8 21 1B 65<br />

25785<br />

25786<br />

25836 64EC EB EX OE.<br />

25837 64EO El POP HL<br />

LO A. (6A65) WERT - FLAG 25838 64EE<br />

25781 CO CC 60 CALL 6<br />

25839<br />

25840<br />

ANZAHL ITERATIONSSCHRITTE 25841 64Ft Cl POP BC<br />

LO HL. 6518 I ZEIGER AUF KONSTANTEN 25842 64F2 C9 RET<br />

I FüR ITERATION COS - REIHE<br />

25787 648B 18 87 JR 87 -+ 6444H<br />

25788<br />

lEINSPRUNG IN ITERATIONS­ Konstanten für Iteration n<br />

I SCHLEIFE<br />

25843 64F3 7E<br />

Funktion TAN<br />

25844 64F4 AA AA AA AB<br />

25845<br />

25789 64BO C5<br />

25846<br />

PUSH BC REGISTER RETTEN<br />

25790 64BE E5<br />

25847<br />

PUSH HL ZEIGER AUF ARGUMENT 25848 64F8 7A<br />

25791 64SF CO C9 61 CALL 61C9<br />

25792<br />

lEINEN RECHENSPEICHER FüR 25849 64F9 08 88 88 89<br />

25793 <br />

I ROUTINE BEREITSTELLEN 25850<br />

25794 64C2 EB 25851<br />

EX OE.HL 25852<br />

25795 64C3 22 lA 6A LO (6AIA).HL I ZEIGER AUF SPEICHER<br />

25796 25853 64FO 74<br />

'FüR COS(ARGUMENT) 25854 64FE 00 00 00 00


SEITE 452<br />

BASIC 1Z-013B V1_0A -\ I<br />

~I. ,J •<br />

,1 I<br />

I ,<br />

BASIC 1Z-<br />

25855<br />

25913 6539 5C<br />

25856 I ." 25914 653A C9 CB A5 46<br />

(-1/7! )<br />

25857<br />

259 15<br />

25916<br />

25858 6502 6E Exponent • 27557319E-05<br />

25859 6503<br />

259 17<br />

38 EF 10 28 Mantisse • 27557319E-05<br />

25860<br />

25918 653E 54<br />

25861<br />

259 19 653F 57 3F 9F 3A<br />

(1/9! )<br />

25862 ": 1<br />

25920<br />

25863 6507<br />

25921<br />

67 Exponent -.25052108E-07 ~ I<br />

25922<br />

25864 6508 07 32 2B 40 Mantisse -.25052108E-07<br />

25865<br />

25866 (-1/11!)<br />

25867<br />

Konstanten für Iteration na<br />

-, ,'.­<br />

25868 650C 60 Exponent • 16059043E-09<br />

25923 6543 7F<br />

25869 6500 30 92 30 90 Mantisse • 16059043E-09<br />

25924 6544<br />

25870<br />

AA AA AA AB<br />

, 1 1<br />

25871<br />

25925<br />

(1 I 13! )<br />

25926<br />

25872<br />

'I 25961<br />

25903 652F 6B Exponent -.27557319E-06<br />

j "'t I ~<br />

25962<br />

25904 6530 93 F2 70 BC Mantisse -.27557319E-06 "<br />

25963 656B 7C<br />

25905<br />

25964 656C 07 94 35 E5<br />

25906 (-1/10! )<br />

I " 25965<br />

25907 .' '<br />

" I ,I, 25966<br />

25908 6534 64 Exponent .20876756E-10 'I<br />

25967<br />

;'ll<br />

25909 6535 OF 76 C7 80 Mantilise .20876756E-10<br />

~ ! 25968 6570 7C<br />

25910 ~ \<br />

25969 6571 43 oe 30 C3<br />

25911 (1/12! ) "~ t 25970<br />

25912<br />

I,


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


SEITE 456<br />

Befehl RND<br />

26064 65DO 7E<br />

26065 65D1 B7<br />

26066 65D2 28 07<br />

26067<br />

26068 65D4 23<br />

26069 65D5 7E<br />

26070 65D6 2B<br />

26071 65D7 CB 7F<br />

26072<br />

26073 65D9 28 OB<br />

26074<br />

26075 65D8 E5<br />

26076 65DC 21 93<br />

26077<br />

26078<br />

26079 65DF 22 IF<br />

26080<br />

26081<br />

26082 65E2 E1<br />

26083 65E3 AF<br />

26084 65E4 ED 4F<br />

26085<br />

26086 65E6 C5<br />

26087 65E7 ED 5B<br />

26088<br />

26089<br />

26090<br />

26091 65EB ED 5F<br />

26092<br />

26093 65ED AA<br />

26094 65EE CB OF<br />

26095<br />

26096 65FO CB OF<br />

26097<br />

26098 65F2 CB OF<br />

26099<br />

26100 65F4 57<br />

26101 65F5 ED 5F<br />

26102<br />

26103 65F7 AB<br />

26104 65F8 CB 07<br />

26105<br />

26106 65FA CB 07<br />

26107<br />

26108 65FC 5A<br />

26109 65FD 57<br />

26110 65FE EO 53<br />

26111<br />

26112<br />

26113<br />

26114 6602 E5<br />

26115 6603 23<br />

26116 6604 CB BA<br />

26117<br />

26118 6606 72<br />

26119 6607 23<br />

26120 6608 73<br />

26121 6609 23<br />

26122 660A EO 5F<br />

26123<br />

BASIC 1Z-013B<br />

LD A. (HL><br />

OR A<br />

JR Z. 07 + 65DBH<br />

INC HL<br />

LD A. (HL><br />

DEC HL<br />

BIT 7.A<br />

JR Z. OB + 65E6H<br />

PUSH HL<br />

41 LO HL. 4193<br />

6A LO (6AIF).HL<br />

POP HL <br />

XOR A <br />

LO R.A <br />

PUSH BC<br />

IF 6A LO DE. (6AIF)<br />

LD A.R<br />

XOR D <br />

RRC A <br />

RRC A<br />

RRC A<br />

LD O.A <br />

LD A.R <br />

XOR E <br />

RLC A <br />

RLC A<br />

LD E.O <br />

LD O.A <br />

IF 6A LD (6AIF).OE <br />

PUSH HL<br />

INC HL •<br />

RES 7.D<br />

LD (HL>.D<br />

INC HL<br />

LD (HL>.E<br />

INC HL<br />

LD A.R<br />

V1.0A<br />

EXPONENT ARGUMENT<br />

GLEICH NULL ?<br />

ARGUMENT GLEICH NULL<br />

ZEIGER AUF MSBYTE MANTISSE<br />

BYTE HOLEN<br />

ZEIGER WIEDER AUF EXPONENT<br />

WERT NEGATIV ?<br />

WERT POS IT I V<br />

ZEIGER AUF ARGUMENT<br />

VORGABE FüR ANFANGSWERT<br />

ZWISCHENWERT RND<br />

ZEIGER AUF ARGUMENT<br />

ACCU AUF NULL<br />

REFRESH-REGISTER SETZEN<br />

REGISTER RETTEN<br />

ZWISCHENWERT RND HOLEN<br />

NEUEN ZWISCHENWERT<br />

ERRECHNEN<br />

NEUEN ZWISCHENWERT MERKEN<br />

ZEIGER AUF ARGUMENT<br />

ZEIGER AUF MANTISSE<br />

VORZEICHEN AUF PLUS<br />

IZWISCHENWERT ALS<br />

I BYTES DER MANTISSE<br />

I EINTRAGEN<br />

I<br />

DRITTES BYTE HOLEN<br />

26124 660C<br />

26125 660D<br />

26126 660E<br />

26127<br />

26128 6610<br />

26129<br />

26130 ·<br />

26131 6613<br />

26132 6614<br />

Befehl<br />

26133 6615<br />

26134 6616<br />

26135 6617<br />

26136 6618<br />

26137<br />

26138<br />

26139 661B<br />

26140 661C<br />

26141 6610<br />

26142<br />

26143<br />

26144 6620<br />

26145<br />

26146 6622<br />

26147 6623<br />

26148<br />

26149<br />

26150 6626<br />

26151<br />

26152<br />

26153 6629<br />

26154 662A<br />

26155<br />

26156<br />

26157 662D<br />

26158 662E<br />

26159<br />

26160<br />

26161 6631<br />

26162 6632<br />

26163<br />

26164<br />

26165 6635<br />

26166 6636<br />

26167<br />

26168<br />

26169 6639<br />

26170 663A<br />

26171 663B<br />

26172<br />

26173<br />

26174 663E<br />

26175 663F<br />

26176<br />

26177<br />

26178 6642<br />

26179 6643<br />

26180 6644<br />

26181 6645<br />

BASIC<br />

77<br />

EI<br />

36 81<br />

CD 95 62<br />

Cl<br />

C9<br />

EXP<br />

C5<br />

7E<br />

B7<br />

CA E2 62<br />

23<br />

7E<br />

32 22 6A<br />

CB BE<br />

2B <br />

11 87 68 <br />

CD EI 5F<br />

E5 <br />

CD C9 61 <br />

05 <br />

CD B8 3A <br />

EI <br />

CD 97 3C <br />

E5 <br />

CO 21 3D <br />

AF <br />

BC <br />

C2 F5 20 <br />

7D <br />

32 21 6A <br />

01 <br />

EI <br />

E5 <br />

CO A6 50 <br />

1Z<br />

LD POP HL<br />

(H<br />

LO (H<br />

CALL 6<br />

POP BC<br />

RET<br />

PUSH<br />

LO A.<br />

OR A<br />

JP Z.<br />

INC H<br />

LO A.<br />

LO (6<br />

RES 7<br />

OEC H<br />

LO OE<br />

CALL<br />

PUSH<br />

CALL<br />

PUSH<br />

CALL<br />

POP H<br />

CALL<br />

PUSH<br />

CALL<br />

XOR A<br />

CP H<br />

JP NZ<br />

LO A.<br />

LO (6<br />

POP D<br />

POP H<br />

PUSH<br />

CALL


SEITE<br />

26182<br />

26183<br />

26184 6648<br />

26185 6649<br />

26186 664A<br />

26187<br />

26188<br />

26189 6640<br />

26190 664E<br />

26191 664F<br />

26192<br />

26193<br />

26194 6652<br />

26195 6653<br />

26196 6654<br />

26197<br />

26198 6656<br />

26199 6657<br />

26200 6658<br />

26201<br />

26202<br />

26203 665B<br />

26204<br />

26205 6650<br />

26206<br />

26~07<br />

26208 6660<br />

26209 6661<br />

26210<br />

26211 6663<br />

26212 6664<br />

26213 6665<br />

26214<br />

26215 6667<br />

26216 6668<br />

26217 6669<br />

26218<br />

26219<br />

26220 666C<br />

26221 6660<br />

26222 666E<br />

26223 666F<br />

26224<br />

26225 6671<br />

26226<br />

26227<br />

26228 6674<br />

26229 6675<br />

26230<br />

26231<br />

26232 6678<br />

26233<br />

26234<br />

26235 6678<br />

26236<br />

26237 6670<br />

26238<br />

26239 667F<br />

26240<br />

26241<br />

26242 6682<br />

26243<br />

458<br />

BASIC 1Z-013B<br />

05 PUSH OE<br />

E5 PUSH HL<br />

CO B5 3A CALL 3AB5<br />

01 POP OE<br />

EI POP HL<br />

CO Cl 61 CALL 61C1<br />

EB EX OE,HL<br />

AF XOR A<br />

06 08 LO B, 08<br />

C5 PUSH BC<br />

F5 PUSH AF<br />

CO 4A 5E CALL 5E4A<br />

38 07 JR C, 07 • 6664H<br />

CO A6 50 CALL 50A6<br />

Fl POP AF<br />

C8 FF SET 7,A<br />

F5 PUSH AF<br />

F1 POP AF<br />

CB 07 RLC A<br />

EB EX OE,HL<br />

F5 PUSH AF<br />

CO Cl 61 CALL 61C1<br />

Fl POP AF<br />

EB EX DE,HL<br />

Cl POP 8C<br />

10 E5 OJNZ E5 + 6656H<br />

32 23 6A LO (6A23),A<br />

05 PUSH DE<br />

11 70 68 LD DE, 687D<br />

3A 65 6A LD A. (6A65)<br />

CB 5F BIT 3.A ~<br />

20 03 JR NZ. 03 + 6682H<br />

11 82 68 LD OE. 6882<br />

CD El 5F CALL 5FE1<br />

V1.0A<br />

ZEIGER AUF RECHENBEREICH<br />

ZEIGER FRAC(ARGUMENT/LN 2)<br />

I PLUS EINS IM RECHEN­<br />

ISPEICHER ABLEGEN<br />

ZEIGER AUF RECHENSPEICHER<br />

ZEIGER FRAC(ARGUMENT/LN 2)<br />

ZAHL (HL) DURCH ZWEI<br />

I ZAHLEN (HL) UNO (DE)<br />

I VERGLE I CHEN<br />

ZAHL (DE) GRöSSER<br />

- ROUTINE<br />

ZAHL (HL) DURCH ZWEI<br />

ZEIGER AUF LN(2) (Real)<br />

WERT - FLAG<br />

DOUBLE PRECISION ?<br />

JA<br />

ZEIGER AUF LN(2) (Real)<br />

* - ROUTINE<br />

26244<br />

26245 6685<br />

26246 6686<br />

26247 6687<br />

26248<br />

26249<br />

26250 668A<br />

26251 668B<br />

26252<br />

26253<br />

26254 668E<br />

26255<br />

26256 6690<br />

26257<br />

26258<br />

26259 6693<br />

26260<br />

26261<br />

26262 6696<br />

26263<br />

26264<br />

26265 6699<br />

26266<br />

26267<br />

26268 669C<br />

26269<br />

26270<br />

26271 669F<br />

26272 66AO<br />

26273 66A1<br />

26274<br />

26275<br />

26276 66A4<br />

26277<br />

26278<br />

26279 66A7<br />

26280<br />

26281<br />

26282 66AA<br />

26283<br />

26284<br />

26285 66AD<br />

26286<br />

26287<br />

26288 66BO<br />

26289 66Bl<br />

26290 66B2<br />

26291<br />

26292<br />

26293 66B5<br />

26294<br />

26295<br />

26296 66B8<br />

26297<br />

26298<br />

26299 66BB<br />

26300<br />

26301<br />

26302 66BE<br />

26303<br />

26304<br />

26305 66Cl<br />

BASIC<br />

D1<br />

D5<br />

CD B8 3A<br />

El<br />

3A 65 6A<br />

CB 5F<br />

CA 18 67<br />

CD BC 61<br />

11 72 3D<br />

CD AF 5D<br />

CD Cl 61<br />

Dl<br />

D5<br />

CO El 5F<br />

11 72 3D<br />

CO Cl 61<br />

CD AF 5D<br />

CD BC 61<br />

01<br />

05 <br />

CD EI 5F <br />

11 78 68 <br />

CO E1 5F<br />

CD BC 61<br />

CD 9B 62<br />

CD Cl 61<br />

1Z<br />

POP DE<br />

PUSH DE<br />

CALL 3A<br />

POP HL<br />

LD A. (6<br />

BIT 3,A<br />

JP Z, 6<br />

CALL 61<br />

LD OE.<br />

CALL 5D<br />

CALL 6<br />

POP OE<br />

PUSH O<br />

CALL 5<br />

LD OE.<br />

CALL 6<br />

CALL 5<br />

CALL 6<br />

POP DE<br />

PUSH O<br />

CALL 5<br />

LO OE.<br />

CALL 5<br />

CALL 6<br />

CALL 6<br />

CALL 6


SEITE 460<br />

BASIC 1Z-013B V1.0A<br />

BASIC 1Z<br />

26306<br />

26307<br />

26308 66C4<br />

26309 66C5<br />

26310 66C6<br />

26311<br />

26312<br />

263 13 66C9<br />

26314<br />

26315<br />

26316 66CC<br />

26317 66CO<br />

26318 66CE<br />

26319<br />

26320<br />

26321 6601<br />

26322<br />

26323<br />

26324 6604<br />

26325 6605<br />

26326 6606<br />

26327 6607<br />

26328<br />

01<br />

05<br />

CO<br />

CD<br />

01<br />

05<br />

CO<br />

CO<br />

E3<br />

EB<br />

05<br />

CO<br />

E1<br />

9B<br />

El<br />

9B<br />

B5<br />

5F<br />

62<br />

5F<br />

62<br />

3A<br />

POP OE<br />

PUSH OE<br />

CALL 5FEl<br />

CALL 629B<br />

POP OE<br />

PUSH OE<br />

CALL 5FEl<br />

CALL 629B<br />

EX (SP).HL<br />

EX OE.HL<br />

PUSH OE<br />

CALL 3AB5<br />

26329<br />

26330 660A El POP HL<br />

26331 660B 11 28 68 LO OE. 6828<br />

26332<br />

26333<br />

26334<br />

26335<br />

26336<br />

26337<br />

26338<br />

26339<br />

26340<br />

26341<br />

26342<br />

263 43<br />

26344<br />

26345<br />

26346<br />

263 47<br />

26348<br />

26349<br />

660E<br />

66El<br />

66E3<br />

66E5<br />

66E7<br />

66E8<br />

66E9<br />

66EC<br />

66EO<br />

3A 23<br />

06 08<br />

CB 07<br />

30 07<br />

F5<br />

C5<br />

CD El<br />

Cl<br />

Fl<br />

6A<br />

5F<br />

LO A. (6A23)<br />

LO B. 08<br />

RLC A<br />

JR NC. 07<br />

PUSH AF<br />

PUSH BC<br />

CALL 5FEl<br />

POP BC<br />

POP AF<br />

~ 66EEH<br />

* - ROUTINE<br />

ZAHL (HL) PLUS EINS<br />

; * - ROUTINE<br />

ZAHL (HL) PLUS EINS<br />

I PLUS EINS NACH (OE)<br />

I üBERTRAGEN<br />

26368 6700<br />

26369<br />

26370<br />

26371 6703<br />

26372<br />

26373 6705<br />

26374 6706<br />

26375 6707<br />

26376 6708<br />

26377 6709<br />

26378<br />

26379<br />

26380 670C<br />

26381 6700<br />

26382 670E<br />

26383<br />

26384<br />

26385 6711<br />

26386 6712<br />

26387 6713<br />

26388<br />

26389<br />

26390 6716<br />

26391 6717<br />

I ZEIGER AUF KONSTANTEN<br />

26392 6718<br />

IFüR EXP-Il~RATION<br />

26393 6719<br />

26394 671A<br />

26395<br />

26396<br />

* - ROUTINE<br />

26350 66EE CO AO 3A CALL 3AAO I ZEIGER IN OE AUF NÄCHSTEN<br />

26351<br />

IWERT IN TABELLE STELLEN<br />

26352<br />

26353 66Fl<br />

26354<br />

26355 66F3<br />

26356<br />

26357<br />

26358 66F6<br />

26359 66F7<br />

26360<br />

26361<br />

26362 66FA<br />

26363 66FB<br />

26364 66FC<br />

26365<br />

10<br />

3A<br />

86<br />

DA<br />

77<br />

01<br />

CD<br />

FO<br />

21<br />

F5<br />

El<br />

6A<br />

20<br />

5F<br />

OJNZ FO ~ 66E3H<br />

LO A. (6A21)<br />

AOO A. (HL><br />

JP C. 20F5<br />

LO (HL>.A<br />

POP OE<br />

CALL 5FEl<br />

26366<br />

26367 66FF Cl POP BC<br />

• FEHLER 2 üBERLAUFFEHLER<br />

EXPONENTEN EINTRAGEN<br />

* - ROUTINE<br />

26397 6710<br />

26398 671E<br />

26399 671F<br />

26400<br />

26401 6721<br />

26402<br />

26403<br />

26404 6724<br />

26405<br />

26406<br />

26407 6727<br />

26408<br />

26409<br />

26410<br />

26411<br />

26412<br />

26413<br />

26414<br />

26415<br />

26416<br />

26417<br />

26418<br />

26419<br />

26420<br />

26421<br />

3A<br />

CB<br />

00<br />

C5<br />

05<br />

E5<br />

CO<br />

01<br />

D5<br />

CO<br />

El<br />

01<br />

CO<br />

Cl<br />

C9<br />

01<br />

05<br />

CO<br />

7E<br />

B7<br />

28<br />

CO<br />

CO<br />

C3<br />

22<br />

07<br />

B8<br />

B5<br />

CC<br />

El<br />

03<br />

Cl<br />

AF<br />

01<br />

6A<br />

3A<br />

3A<br />

60<br />

5F<br />

61<br />

Funktion LOG<br />

672A<br />

672B<br />

672E<br />

6731<br />

6734<br />

6735<br />

C5<br />

CO<br />

11<br />

CO<br />

Cl<br />

C9<br />

50<br />

66<br />

36 67<br />

19 68<br />

Et 5F<br />

LO A.<br />

RLC A<br />

RET N<br />

PUSH<br />

PUSH<br />

PUSH<br />

CALL<br />

POP O<br />

PUSH<br />

CALL<br />

POP H<br />

POP O<br />

CALL<br />

POP B<br />

RET<br />

POP O<br />

PUSH<br />

CALL<br />

LO A.<br />

OR A<br />

JR Z.<br />

CALL<br />

CALL<br />

JP 66<br />

PUSH<br />

CALL<br />

LO OE<br />

CALL<br />

POP B<br />

RET


SEITE 462 <br />

BASIC 1Z-013B V1_0A <br />

Funktion LN<br />

26422 6736 6751H<br />

C5 PUSH BC REGISTER RETTEN<br />

26423 6737 23 INC HL ZEIGER AUF MANTISSE<br />

26424 6738 7E LO A. (HLl MSBYTE MANTISSE ARGUMENT<br />

26425 6739 CB 07 RLC A VORZEICHEN NACH CARRY<br />

26426<br />

26427 6738 DA 01 21 JP C. 2101 I ARGUMENT NEGATIV ~<br />

26428 I DATENFEHLER<br />

26429<br />

26430 673E 2B DEC HL ZEIGER WIEDER AUF EXPONENT<br />

26431 673F 7E LD A. (HLl EXPONENT HOLEN<br />

26432 6740 B7 OR A GLEICH NULL ?<br />

26433 6741 CA 01 21 JP Z. 2101 I ARGUMENT GLEICH NULL<br />

26434 I-+- DATENFEHLER<br />

26435<br />

26436 6744 D6 81 SUB A. 81 I EXPONENTENZÄHLER FüR<br />

26437 I ERGEBNIS ERRECHNEN<br />

26438 6746 32 24 6A LD (6A24).A I<br />

26439<br />

26440<br />

26441 6749 36 81 LD (HLl. 81 INEUEN EXPONENTEN VORGEBEN<br />

26442 • (Wert 1 iegt zwischen 1 u 2<br />

26443 674B AF XOR A<br />

26444 674C 06 08 LD B. 08 8 VERGLEICHSWERTE<br />

26445<br />

26446 674E 11 28 68 LD DE. 6828 ZEIGER AUF SQR(2)<br />

26447<br />

26448<br />

26449 6751 C5 PUSH BC<br />

26450 6752 F5 PUSH AF<br />

26451 6753 CD 4A 5E CALL 5E4A IZAHLEN (HL> UND (DE)<br />

26452 I VERGLEICHEN<br />

26453<br />

26454 6756 38 OF JR C. OF ~ 6767H RESTWERT < VERGLEICHSWERT<br />

26455<br />

26456 6758 E5 PUSH HL ZEIGER AUF RESTWERT<br />

26457 6759 21 28 00 LO HL. 0028 IOFFSET ZUR ENTSPRECHENDEN<br />

26458 • Nten WURZEL AUS 1/2<br />

26459<br />

26460 675C 19 ADD HL.DE ZEIGER AUF TABELLE ERRECHN.<br />

26461 675D EB EX DE.HL<br />

26462 675E E3 EX (SP).HL<br />

26463 675F CO E1 5F CALL 5FE1 * - ROUTINE<br />

26464<br />

26465<br />

26466 6762 01 POP OE<br />

26467 6763 F1 POP AF ANGEPASSTEN EXPONENTEN HOL.<br />

26468 6764 CB FF SET 7.A<br />

26469<br />

26470 6766 F5 PUSH AF<br />

26471 6767 F1 POP AF<br />

26472 6768 CB 07 RLC A<br />

26473<br />

26474 676A CD AD 3A CALL 3AAD •• ZEIGER IN DE AUF NÄCHSTEN<br />

26475 'WERT IN TABELLE STELLEN<br />

26476<br />

26477 676D Cl POP BC<br />

26478 676E 10 E1 DJNZ El ~ 26479<br />

26480 6770 22 12 6A LD (6A12). HL<br />

26481<br />

BASIC 1Z<br />

26482<br />

26483 6773 CO C9 61<br />

26484<br />

26485<br />

26486 6776 EB<br />

26487 6777 5F<br />

26488 6778 16 00<br />

26489<br />

26490 677A CD 82 3A<br />

26491<br />

26492<br />

26493 677D 7E<br />

26494 677E B7<br />

26495 677F 28 03 <br />

26496 <br />

26497 6781 D6 08 <br />

26498 <br />

26499 6783 77<br />

26500 6784 3A 24 6A <br />

26501 <br />

26502 <br />

CALL 6<br />

EX DE<br />

LD E.A<br />

LD D.<br />

CALL 3<br />

LD A.<br />

OR A<br />

JR Z.<br />

SUB A<br />

LD (H<br />

LD A.<br />

26503 6787 FE 80 CP 8<br />

26504 <br />

26505 6789 3 8 02 JR C.<br />

26506 <br />

26507 6788 ED 44 NEG <br />

26508 <br />

PUSH<br />

26509 678D E5<br />

26510 678E CD C9 61<br />

26511 <br />

26512 <br />

26513 6791 EB<br />

26514 6792 22 14 6A<br />

26515 <br />

26516 <br />

26517 6795 5F<br />

26518 6796 16 00 <br />

26519 <br />

26520 6798 CD 82 3A<br />

26521 <br />

26522 <br />

26523 679B 3 A 24 6A <br />

26524 <br />

26525 <br />

26526 679E E6 80 <br />

26527 <br />

26528 67AO 23<br />

26529 67A1 B6<br />

26530 67A2 77<br />

26531 67A3 2 B<br />

26532 67A4 EB<br />

26533 67A5 E1<br />

26534 67A6 CD AF 50 <br />

26535 <br />

26536 <br />

26537 67A9 3A 65 6A <br />

26538 <br />

26539 <br />

26540 67AC 11 8C 68 <br />

26541 <br />

26542 <br />

26543 67AF FE 05<br />

CALL<br />

EX D<br />

LD (6<br />

LD E<br />

LD D<br />

CALL<br />

LD A<br />

AND<br />

INC<br />

OR (<br />

LD (<br />

DEC<br />

EX D<br />

POP<br />

CALL<br />

LO A<br />

LO D<br />

CP


SEITE 464 <br />

BASIC 1Z-013B V1.0A<br />

BASIC 1Z-<br />

26544 26606<br />

26545 67Bl 28 03 JR Z. 03 ~ 67B6H JA 26607 67EF 11 72 3D LO OE.<br />

26546 26608 <br />

26547 67B3 11 70 68 LO OE. 6870 I ZEIGER AUF LN(2) 26609 <br />

26548 I (hier müsste dann Double 26610 67F2 CD BC 61 CALL 61B<br />

26549<br />

26550 67B6 CD E1 5F CALL 5FEl * - ROUTINE<br />

26612 <br />

1 Precision-Wert stehen) 26611<br />

26551 26613 67F5 CD AF 50 CALL 50A<br />

26552 26614 <br />

26553 67B9 E5 PUSH HL 26615 <br />

26554 67BA EO 5B 14 6A LO OE. (6AI4) ZEIGER AUF RECHENSPEICHER 26616 67F8 CD .Cl 61 CALL 61<br />

26555<br />

26617 <br />

26556<br />

26557 26618 <br />

26619 67FB EB EX OE.H<br />

26558 67BE 2A 12 6A LO HL. (6A12) ZEIGER AUF RECHENSPEICHER 26620 67FC 2A 12 6A LO HL. (<br />

26559<br />

26621 <br />

26560 26622 <br />

26561 67Cl E5 PUSH HL 26623 67FF CD E1 5F CALL 5F<br />

26562 67C2 05 PUSH OE 26624 <br />

.26563 67C3 CD B8 3A CALL 3AB8 1 ZAHL VON (HL) NACH (OE) 26625 <br />

26564 1 üBERTRAGEN 26626 6802 11 lE 68 LO OE.<br />

26565<br />

26627 <br />

26566 67C6 El POP HL 26628 <br />

26567 67C7 CD 9B 62 CALL 629B ZAHL (HL) PLUS EINS 26629 6805 CD E1 5F CALL 5F<br />

26568 26630 <br />

26569 26631 <br />

26570 67CA E3 EX (SP).HL 26632 6808 01 POP OE <br />

26571 67CB CD A6 50 CALL 5DA6 - ROUTINE 26633 6809 CD AF 50 CALL 50<br />

26572 26634 <br />

26573 26635 <br />

26574 67CE 01 POP OE 26636 680C Cl POP BC <br />

26575 67CF CD CC 60 CALL 60CC / - ROUTINE 26637 6800 C9 RET <br />

26576 <br />

26577 <br />

26578 6702 05 PUSH OE Funkti on MOO (wird n<br />

26579 6703 CO B8 3A CALL 3AB8 1 ZAHL VON (HL) NACH (OE)<br />

26580 1 üBERTRAGEN 26638 680E CD CC 60 CALL 60<br />

26581<br />

26639 <br />

26582 6706 El POP HL 26640 <br />

26583 6707 05 PUSH OE 26641 6811 05 PUSH OE<br />

26584 6708 50 LD E.L 26642 6812 CD DA 3C CALL 3C<br />

26585 6709 54 LD D.H 26643<br />

26586 670A CD E1 5F CALL 5FEI ; * - ROUTINE 26644<br />

26587 26645 6815 01 POP OE<br />

26588 26646 6816 C3 El 5F JP 5FE1<br />

26589 6700 01 POP OE 26647 <br />

26590 670E E5 PUSH HL 26648 <br />

26591 670F 05 PUSH OE <br />

26592 67EO CD B8 3A CALL 3AB8 I ZAHL VON (HL) NACH (OE) <br />

26593 1 üBERTRAGEN 26649 6819 7F<br />

26594 26650 681A 5E 5B 08 A9 <br />

26595 67E3 EI POP HL 26651 <br />

26596 67E4 11 23 68 LO OE. 6823 ; ZEIGE AUF 5/3 (Real) 26652 <br />

26597 26653 <br />

26598 <br />

26599 67E7 CD AF 50 CALL 5DAF ; + - ROUTINE 26654 681E 7F<br />

26600 26655 681F 4C CC CC CD <br />

26601 26656 <br />

26602 67EA EB EX OE.HL 26657 <br />

26603 67EB EI POP HL 26658 <br />

26604 67EC CD EI 5F CALL 5FEl - ROUTINE <br />

26605 *


SEITE 466<br />

BASIC 1Z-0138 V1_0A<br />

~i<br />

, BASIC 1Z<br />

Ni 26716<br />

26659 6823 81 Exponent 1.6666667 26717<br />

26660 6824 55 55 55 56 Mantisse 1.6666667 26718<br />

26661 26719 685F 80<br />

{<br />

26662 (5/3) 26720 6860 75 25 70 16<br />

26663 26721<br />

26722<br />

26723<br />

Konstanten für EXP - Routine 26724 6864 80<br />

26725 6865 7A 83 B2 OC<br />

26664 6828 81 Exponent 1.4142136 26726<br />

26665 6829 35 04 F3 34 Mantisse 1.4142136 26727<br />

26666 26728<br />

26667 2te Wurzel (2) 26729 6869 80<br />

26668 26730 26669 6820 81 Exponent 1. 1892071 26731<br />

686A 70 3E OC 00<br />

26670 682E 18 37 FO 52 Mantisse 1.1892071 26732<br />

26671 26733<br />

26672 4te Wurzel (2) 26734 686E 80<br />

26673 26735 686F 7E 9E 11 50<br />

26674 6832 81 Exponent 1.0905077 26736<br />

26675 6833 OB 95 Cl E4 Mantisse 1.0905077 26737<br />

26676 26738<br />

26677 6te Wurzel (2). 26739 6873 80<br />

26678 26740 26679 6837 81 Exponent 1.0442738 26741<br />

6874 7F 4E CB 5A<br />

26680 6838 05 AA C3 68 Mantisse 1.0442738 26742<br />

26681 26743<br />

26682 8te Wurzel (2)<br />

26683<br />

26684 683C 81 Exponent 1. 0218972 26744 6878 7A<br />

' I<br />

26685 6830 02 CO 86 99 Mantisse 1.0218972 26745 6879 08 88 88 89<br />

26686 26746<br />

26687 lOte Wurzel (2) 26747<br />

26688 J<br />

'11 I 26748<br />

26689 6841 81 Exponent 1.0108893<br />

26690 6842 01 64 01 F4 Mantisse 1.0108893<br />

26691 26749 6870 80<br />

26692 12te Wurzel (2) 26750 687E 31 72 17 F8<br />

26693 26751<br />

26694 6846 81 Exponent 1.0054299 I<br />

I· i; 26752<br />

26695 6847 00 Bl EO 50 Mantisse 1.0054299 26753<br />

26696<br />

26697 14te Wurzel (2) 26754 6882 80<br />

26698 26755 6883 31 72 17 F8<br />

26699 684B 81 Exponent 1.0027113 26756<br />

26700 684C 00 58 07 03 Mantisse 1.0027113 I . 26757<br />

26701 26758<br />

26702 16te Wurzel (2)<br />

26703<br />

26759 6887 81<br />

26704 6850 80 Exponent 0.70710078 26760 6888 38 AA 38 2A<br />

26705 6851 35 04 F3 34 ; Mantisse 0.70710078<br />

26706<br />

J 26761<br />

26762<br />

26707 2te Wurzel (1/2) 26763<br />

26708<br />

26709 6855 80 Exponent 0.84089641<br />

26710 6856 57 44 FC CB Mantisse 0.84089641 26764 688C 80<br />

26711<br />

26765 6880 31 72 17 F8<br />

26712 4te Wurzel (1/2) 26766<br />

26713<br />

I:<br />

26767<br />

26714 685A 80 Exponent 0.91700404 • I 26768<br />

26715 685B 6A CO C6 E8 Mantisse 0.91700404


SEITE 468<br />

BASIC 1Z-013B V1_0A<br />

BASIC 1Z<br />

ASCII-Zeile (DE) umsetzen in Zwischencode<br />

in P~og~ammspeiche~ einfügen<br />

26769 6891 AF<br />

26770 6892 32 D9 38<br />

26771<br />

26772<br />

XOR A<br />

LD (3809),A<br />

und<br />

ACCU<br />

CONT<br />

AUF NULL<br />

- FLAG<br />

26828 68CC 11 05 00 LD DE.<br />

26829<br />

26830<br />

26831<br />

26832<br />

26833<br />

26834<br />

68CF<br />

6800<br />

68D1<br />

19<br />

E5<br />

ED 4B E2 38<br />

26773 6895 32 D8 38 LD (38D8),A ON ERROR - FLAG<br />

26774 26837 6805 2A BF 6A LD HL.<br />

26775<br />

26776<br />

26777<br />

26778<br />

26779<br />

26780<br />

26781<br />

26782<br />

26783<br />

26784<br />

26785<br />

26786<br />

6898 32 80 6A LD (6riS0). A IFLAG Spaces IN<br />

I üBERSPRINGEN<br />

6898<br />

689E<br />

68Al<br />

68A2<br />

68A3<br />

CD<br />

CD<br />

78<br />

Bl<br />

CA<br />

2F<br />

38<br />

35<br />

4B<br />

CALL 352F<br />

CALL 4B38<br />

LD A,B<br />

OR C<br />

JP Z, 1876<br />

ZAHL<br />

I ZEIGER AUF ZEILEN IM<br />

IPROGRAMM IN ZEILEN­<br />

INUMMERN UMSETZEN<br />

I (OE) VORHANDENE ASC I l­<br />

I ZEILENNUMMER UMSETZEN<br />

I IN HEX NACH BC<br />

I ZEILENNUMMER GLEICH<br />

I NULL?<br />

JA ~ ZEILE AUSFüHREN<br />

26835<br />

26836<br />

26838<br />

26839<br />

ADD HL<br />

PUSH H<br />

LD BC.<br />

26840 68D8 18 05 JR 05<br />

26841<br />

26787<br />

76 18<br />

26788 26849 68E1 56 LD D. (<br />

26789<br />

26790 68A6<br />

26791<br />

26792<br />

26793<br />

26794 68AA<br />

26795 68AB<br />

26796<br />

26797 68AD<br />

26798<br />

26799 ö8AF<br />

26800 68BO<br />

26801 68Bl<br />

26802<br />

26803<br />

26804 6884<br />

26805<br />

26806<br />

26807 68B7<br />

26808 68B8<br />

26809<br />

26810<br />

26811 68BB<br />

26812 68BC<br />

26813 68BD<br />

26814<br />

26815<br />

26816<br />

26817<br />

26818<br />

26819<br />

26820<br />

26821<br />

26822<br />

26823<br />

26824<br />

26825<br />

26826<br />

26827<br />

68CO<br />

68Cl<br />

68C2<br />

b8C3<br />

68C6<br />

68C9<br />

68CA<br />

ED 43 E2 38<br />

1A<br />

FE 20<br />

20 01<br />

13<br />

F5<br />

21 Cl 6A<br />

CD 95 47<br />

E5<br />

2A E2 38<br />

50<br />

54<br />

CD 74 69<br />

E1<br />

Fl<br />

B7<br />

CA<br />

11<br />

87<br />

ED<br />

~C 69<br />

Cl 6A<br />

52<br />

LO (38E2),BC<br />

LD A,


26884<br />

26887<br />

26891<br />

26892<br />

26894<br />

26895<br />

26897<br />

26898<br />

26901<br />

26902<br />

26904<br />

26905<br />

26909<br />

26911<br />

26912<br />

26915<br />

26916<br />

26923<br />

26925<br />

26931<br />

26934<br />

26938<br />

I IN DE NICHT MIT STACK 26942 693E E5 PUSH<br />

ISTRINGARBEITSBEREICH 26946 6942 EB EX DE<br />

I MERI


27003<br />

27004<br />

27012<br />

27020<br />

27032<br />

27033<br />

27035<br />

27038<br />

27047<br />

27048<br />

27050<br />

698DH<br />

I<br />

27053<br />

27055<br />

27063<br />

27075<br />

27078<br />

27080<br />

27084 69CC 2B<br />

27090<br />

27094 <br />

27095 <br />

27098 <br />

27100<br />

27101<br />

27103<br />

27104<br />

27107<br />

27109<br />

27110<br />

27112<br />

27113<br />

DEC H<br />

BASIC 1<br />

27054 69AE 30 DA JR N<br />

27056 69BO 5E LD E<br />

27057 69B1 23 INC<br />

27058 69B2 56 LD D<br />

27059 69B3<br />

23 INC<br />

27060 69B4 7A LD A<br />

27061 69B5 B3 OR E<br />

27062 69B6 28 13 JR Z<br />

27064 69B8 EB EX D<br />

27065 69B9 19 ADD<br />

27066 69BA EB EX D<br />

27067 69BB IB DEC<br />

27068 69BC 1B I;>EC<br />

27069 69BD D5 PUSH<br />

NOCH PROGRAMM VORHANDEN 27070 69BE 5E LD E<br />

27071 69BF 23 INC<br />

27072 69CO 56 \-D D<br />

27073 69Cl EB EX D<br />

27074 69C2<br />

ED 42 SBC H<br />

27076 69C4 E1 POP H<br />

27077 69C5 38 E9 JR C<br />

27079 69C7 28 04 JR Z<br />

27081 69C9 EB EX D<br />

27082 69CA 2B DEC H<br />

27083 69CB 2B DEC H<br />

27085 69CD 01 POP D<br />

I 27086 69CE 05 Pl,ISH<br />

27087 69CF E5 PUSH<br />

27088 69DO B7 OR A<br />

27089 69D1 ED 52 SBC H<br />

27091 69D3 4D LD C<br />

27092 69D4 44 LD B,<br />

27093 69D5 2A 83 6A LD HL<br />

27096 69D8 87 OR A<br />

27097 69D9 ED 42 SBC H<br />

27099 69DB 22 B3 6A LD (6<br />

27102 69DE 2A DA 38 LD HL<br />

27105 69E1 87 OR A<br />

27106 69E2 ED 42 SBC H<br />

27108 69E4 22 DA 38 LD (3<br />

GLEICH ENDZEILENNUMMER 27111 69E7 2A B5 6A LD HL<br />

-+ 69CDH NUR EINE ZEILE LöSCHEN 27114 69EA B7 OR A<br />

PUSH DE ANFANG ZU LöSCHENDER BEREI.<br />

I ZEIGER WIEDER AUF ANFANG<br />

27036 699C E1 POP HL ZEIGER AUF FOLGENDE ZEILE<br />

I GERETTETE REGISTER HOLEN<br />

ZEIGER AUF ENDE BEREICH<br />

18 F8 JR F8 -+ 6985H GERETTETE REGISTER HOLEN<br />

ZEIGER AUF NÄCHSTE ZEILE<br />

21 00 00 LD HL, 0000 IZEILENNUMMER DER ZEILE<br />

-+ 697DH IZEILE IST KLEINER ALS<br />

PUSH HL ZEIGER AUF ENDE ZEILE<br />

ENDZEILENNUMMER HOLEN<br />

2A BF 6A LD HL, (6ABF) BASIC - PROGRAMMANFANG<br />

27009 6981 7B LD A.E IOFFSET GLEICH NULL?<br />

27031 6997 22 A7 69 LO (69A7),HL IN ROUTINE EINTRAGEN<br />

I ZEIGER AUF FOLGENDE<br />

I (Wird eingetragen)<br />

LD C,L IANFANGSZEILENNUMMER<br />

. SBC HL. BC GLEICH ANFANGSZEILE<br />

POP HL ANFANGSZEILENNUMMER<br />

IOFFSET AUF NÄCHSTE<br />

26998 6976 E5 PUSH HL ANFANGSZEILENNUMMER<br />

UND WIEDER MERKEN<br />

5E LO E. (HU I ZEILENNUMMER DER<br />

I ZEILE ERRECHNEN<br />

26996 6974 F5 PUSH AF I REGISTER RETTEN<br />

D1 POP DE ENDZEILENNUMMER<br />

ENDZEILENNUMMER<br />

I ANFANGSZEILE<br />

Zeilen löschen HL Anfangszeilennr. DE Endzeilennr.<br />

27028 6994 23 INC HL I ZEILE HOLEN<br />

I ZE I LE HOLEN<br />

27026 6992 D5 PUSH OE UND MERKEN<br />

BASIC 1Z-013B V1_0A<br />

27001 6979 44 LD B,H I NACH BC<br />

DEC DE I ZEILE<br />

27041 69Al lB DEC DE I<br />

27029 6995 56 LO 0, (HU I<br />

27016 6988 Fl POP AF I<br />

26997 6975 C5 PUSH BC I<br />

27011 6983 20 08 JR NZ, 08 •<br />

27(149 69A9 ED 42 SBC HL.BC<br />

27022 698E 19 ADD HL.OE<br />

27052 69AC 28 1F JR Z. IF<br />

EX DE,HL<br />

27037 699D 38 DE JR C. DE<br />

LD D, (HU<br />

27(105 697D 5E LD E, (HU<br />

27025 6991 EB EX OE,HL<br />

EX OE,HL<br />

27043 69A3 C5 PUSH BC<br />

27051 69AB El POP HL<br />

27042 69A2 Cl POP BC<br />

27039 699F 1B DEC OE<br />

26999 6977 05 PUSH DE<br />

27023 698F 2B OEC HL<br />

27024 6990 2B DEC HL<br />

27018 698A D1 POP OE<br />

27015 6987 Cl POP BC<br />

27008 6980 23 INC HL<br />

27006 697E 23 INC HL<br />

27010 6982 B2 OR D<br />

27017 6989 C9 RET<br />

27034 699A ED 42<br />

27040 69AO 1B<br />

27044 69A4 D5<br />

27045 69A5 E5<br />

27030 6996 EB<br />

SEITE 472<br />

27021 698D EB<br />

27014 6986 Ei<br />

27007 697F 56<br />

27(100 6978 4D<br />

27046 69A6<br />

27027 6993<br />

27019 698B<br />

27013 6985<br />

27002 697A


SEITE 474<br />

BASIC 1Z-013B V1_0A<br />

BASIC 1Z<br />

27115 69EB ED 42 SBC HL.BC ZEIGER CORRIGIEREN<br />

27116<br />

27117 69ED 22 85 6A LD (6AB5).HL UND WIEDER MERKEN<br />

27118 27150 6AOE 00<br />

27119<br />

27120<br />

27121<br />

27122<br />

27123<br />

27124<br />

27125<br />

27126<br />

27127<br />

27128<br />

69FO<br />

69Fl<br />

69F2<br />

69F3<br />

69F4<br />

69F5<br />

69F6<br />

69F7<br />

27129<br />

27130 69FA<br />

27131 69FB<br />

27132<br />

27133 69FD<br />

27134 69FE<br />

27135 69FF<br />

27136 6AOO<br />

27137 6AOl<br />

27138<br />

27139 6A03<br />

27140 6A04<br />

27141<br />

27142<br />

27143<br />

27144<br />

6A07<br />

6A08<br />

6A09<br />

El<br />

01<br />

C5<br />

D5<br />

D5<br />

E5<br />

EB<br />

2A B7 6A<br />

B7<br />

ED 52<br />

4D<br />

44<br />

El<br />

01<br />

ED BO<br />

EB<br />

22 B7 6A<br />

El<br />

Cl<br />

C3 85 69<br />

POP HL<br />

POP DE<br />

PUSH BC<br />

PUSH OE<br />

PUSH DE<br />

PUSH HL<br />

EX<br />

LD<br />

27148<br />

27149<br />

27151<br />

ZEIGER AUF ENDE LöSCHBER.<br />

27152<br />

ZEIGER AUF ANFANG LöSCHBER.<br />

27153<br />

ZU LöSCHENDE LÄNGE<br />

I ZEIGER AUF ANFANG LöSCHB.<br />

I<br />

ZEIGER AUF ENDE LöSCHBER.<br />

DE.HL<br />

HL. (6AB7) I ZEIGER AUF<br />

ISTRINGARBEITSBEREICH<br />

OR A<br />

sec HL.DE<br />

LD C.L<br />

LD B.H<br />

POP HL<br />

POP DE<br />

LDIR<br />

EX DE.HL<br />

LD (6AB7).HL<br />

POP HL<br />

POP BC<br />

JP 6985<br />

CARRY-FLAG ZURüCKSETZEN<br />

I ZU VERSCHIEBENDE TEXT­<br />

I LÄNGE ERRECHNEN<br />

I NACH BC<br />

I<br />

ZEIGER AUF ENDE LöSCHBER.<br />

ZEIGER AUF ANFANG LöSCHBER.<br />

I VORHANDENE TEXTSTRINGS<br />

I UND VARIABLE VERSCHIEBEN<br />

I ZEIGER AUF<br />

ISTRINGARBEITSBEREICH<br />

ZEIGER AUF ANFANG LöSCHBER.<br />

GELöSCHTE LÄNGE<br />

GERETTETE REGISTER HOLEN<br />

27154<br />

27155<br />

27156<br />

27157<br />

27158<br />

27159<br />

27160<br />

27161<br />

27162<br />

27163<br />

27164<br />

27165<br />

27166<br />

Systemspeicherbereiche<br />

6AOC<br />

6AOD<br />

6AOF<br />

6AI0<br />

6Al1<br />

6A12<br />

00<br />

00<br />

00<br />

00<br />

00<br />

00 00<br />

6A14 00 00<br />

27145<br />

27146 27169 6A21 00<br />

27147<br />

27170 6A22 00<br />

27167<br />

27168<br />

6A16<br />

6A18<br />

6AIA<br />

6AIC<br />

6AIE<br />

00 00<br />

00 00<br />

00 00<br />

00 00<br />

00<br />

6A1F 93 41<br />

27171 6A23 00<br />

27172 6A24 00<br />

27173 6A25 00<br />

27174 6A26 00<br />

27175 6A27 00<br />

27176 6A28 00<br />

27177 6A29 00<br />

27178 6A2A 00<br />

27179 6A2B 00<br />

27180 6A2C 00<br />

27181 6A2D 00<br />

27182 6A2E 00<br />

27183 6A2F 00<br />

27184 6A30 00<br />

27185 6A31 00<br />

27186 6A32 00<br />

27187 6A33 00<br />

27188 6A34 00<br />

27189 6A35 00<br />

27190<br />

27191<br />

27192<br />

6A36<br />

6A37<br />

6A38<br />

00<br />

00<br />

00<br />

27193 6A39 00<br />

27194 6A3A 00


SEITE 476<br />

BASIC 1Z-013B V1_0A BASIC 1<br />

27195 6A3B 00 27243 6A6B 00<br />

27196 6A3C 00 27244 6A6C 00<br />

27197 6A3D 00 27245 6A6D 00<br />

27198 6A3E 00<br />

27199 6A3F 27200 6A40 27201 6A41 00<br />

00<br />

00<br />

27202 6A42 00 27249<br />

27203 6A43 00 27250<br />

27204 6A44 00<br />

27205 6A45 00 27251 6A73 00<br />

27206 6A46 00 27252 6A74 27207 6A47 00<br />

, 27253 6A75 00<br />

00<br />

'J, i<br />

27208 6A48 00<br />

00<br />

27209 6A49<br />

27210 6A4A<br />

00<br />

00<br />

27211 6A4B<br />

27212 6A4C 00 27257<br />

27213 6A4D 00 27258<br />

27246 6A6E 00<br />

27247 6A6F 00 00 00<br />

27248<br />

27254 6A76 00<br />

27255 6A77 00 00 00<br />

27256<br />

00<br />

00<br />

27214 6A4E 00 27259 6A7B 00<br />

27215 6A4F<br />

27216 6A50<br />

27217 6A51<br />

27218 6A52<br />

27219 6A53<br />

00<br />

00<br />

00<br />

00<br />

00<br />

27220 6A54 00<br />

27221 6A55<br />

",<br />

1:1<br />

I' j~'<br />

27260 6A7C 00<br />

27261 6A7D 00<br />

27262 6A7E 00 00<br />

27263<br />

00<br />

27264 6A80 00<br />

27222 6A56 00<br />

27223 6A57 00 27265 6A81 00<br />

27224 6A58 00 ZEILENLÄNGEZÄHLER 27266 6A82 00<br />

27225 6A59 00 00 I ZEIGER FüR ERGEBNIS 27267 6A83 00<br />

27226 IRECHENROUTINEN<br />

27227 6A5B 00 VORZEICHEN ERGEBNIS +/­<br />

27268 6A84 00<br />

27269 6A85 00<br />

27228 6A5C 00 00 IZWISCHENSPEICHER FüR 27270 6A86 00<br />

27229 I STACKPOINTER 27271 6A87 00<br />

27272 6A88 00<br />

27230 6A5E 00 00 IZWISCHENSPEICHER FüR 27273 6A89 00<br />

27231 ISTACKPOINTER 27274 6A8A 00<br />

27275 6A8B 00<br />

27232 6A60 00 ; FLAB üBERTRAG AUFGETRETEN 27276 6A8C 00<br />

27233 6A61 00 00 EXPONENT ERGEBNIS *<br />

27278 6A8E 00<br />

27277 6A8D 00<br />

27234 27279 6A8F 00<br />

27280 6A90 00<br />

27235 6A63 00 27281 6A91 00<br />

27282 6A92 00<br />

27236 6A64 00 27283 6A93 00<br />

27284 6A94 00<br />

27237 6A65 08 WERT - FLAG 27285 6A95 00<br />

27286 6A96 00<br />

27238 6A66 00<br />

Exponent ZWISCHENSPEICHER<br />

27287 6A97 00<br />

27239 6A67 00 00 00 00<br />

Manti!:ise ZWISCHENSPEICHER<br />

27288 6A98 00<br />

27240 27289 6A99 00<br />

27241 27290 6A9A 00<br />

27242 27291 6A9B 00<br />

27292 6A9C 00<br />

27293 6A9D 00


SEITE 478<br />

BASIC 1Z-013B V1.0A<br />

BASIC 1<br />

Die folgenden P~og~ammte<br />

27294 6A9E 00 Anlaufen vorhanden und w<br />

27295 6A9F 00<br />

27296 6AAO 00<br />

27297 6AA1 00 Copy~ight - Meldungen<br />

27298 6AA2 00<br />

27299 6AA3 00 27329 6ACl 00 W<br />

27300 6AA4 00 27330 6AC2 00 W<br />

27301 6A~5 00 27331 6AC3 20 S<br />

27302 6AA6 00 27332 6AC4 08<br />

27303 6AA7 00 27333 6AC5 08<br />

27304 6AA8 00 27334 6AC6 08<br />

27305 6AA9 00 27335 6AC7 08<br />

27306 6AAA 00 27336 6AC8 08<br />

27307 6AAS 00 27337 6AC9 08<br />

27308 6AAC 00 27338 6ACA 08<br />

27309 6AAO 00 27339 6ACB 08<br />

27310 6AAE 00 27340 6ACC 08<br />

27311 6AAF 00 27341 6ACO 08<br />

27312 6ASO 00 27342 6ACE 08<br />

27313 6AS1 00 27343 6ACF 08<br />

27314 6AS2 00 27344 6ADO 08<br />

27345 6AD1 08<br />

27315 6AB3 00 00 I ZEIGER AUF VARIABLE/ ij l<br />

27346 6AD2 08<br />

27316 I DEFINIERTE FUNKTIONEN<br />

j ,<br />

27347 6AD3 08<br />

' .I" 27348 6AD4 08<br />

27317 6AS5 00 00 I ZEIGER AUF ANFANG ,p 27349 6AD5 08<br />

27318 ISTRINGTEXTBEREICH 27350 6AD6 08<br />

'., I ~<br />

27351 6AD7 08 <br />

27319 6AS7 00 00 I ZEIGER AUF ANFANG ~!'j ,. 27352 6AD8 08<br />

27320 ISTRINGARSEITSBEREICH<br />

27353 6A09 08<br />

~I,<br />

27354 6AOA 08<br />

27321 6AB9 00 00 I ZEIGER AUF ANFANG<br />

,; ): ,<br />

27355 6AOB 08<br />

27322 I RECHENSPE I CHER 27356 6ADC 08<br />

,I•. ~: I 27357 6ADO 08<br />

27323 6ABB 00 00 LIMIT ,1. ".1 27358 6ADE 08<br />

27324 27359 6AOF 08<br />

27360 6AEO 08<br />

27325 6ABO 00 00 I MAXIMAL NUTZBARE<br />

27361 6AE1 08<br />

27326 I RAM-AORESSE 27362 6AE2 08<br />

{~ I 27363 6AE3 08<br />

27327 6ABF CF 6B BASIC - PROGRAMMANFANG 27364 6AE4 08<br />

27328 27365 6AE5 08<br />

27366 6AE6 08<br />

27367 6AE7 08<br />

27368 6AE8 08<br />

27369 6AE9 08<br />

273 70 6AEA 20 S<br />

273 71 6AEB 20 S<br />

273 72 6AEC 20 S<br />

273 73 6AED 20 S<br />

27374 6AEE 20 S<br />

27375 6AEF 42 B<br />

27376 6AFO 41 A<br />

27377 6AF1 53 9<br />

27378 6AF2 49 I<br />

27379 6AF3 43 C<br />

27380 6AF4 20 S<br />

27381 6AF5 49 I<br />

27382 6AF6 4E N<br />

27383 6AF7 54 T<br />

27384 6AF8 45 E


SEITE 480<br />

27385 6AF9 52<br />

27386 6AFA 50<br />

27387 6AF8 52<br />

27388 6AFC 45<br />

27389 6AFO 54<br />

27390 6AFE 45<br />

27391 6AFF 52<br />

27392 6E/CO 20<br />

27393 6801 20<br />

27394 6802 31<br />

27395 6803 5A<br />

27396 6804 20<br />

27397 6805 30<br />

27398 6806 31<br />

27399 6807 33<br />

27400 6808 42<br />

27401 6809 20<br />

27402 680A 56<br />

27403 6808 31<br />

27404 6BOC 2E<br />

27405 6800 30<br />

27406 6BOE 41<br />

27407 6BOF 20<br />

27408 6810 20<br />

27409 6811 20<br />

27410 6812 20<br />

27411 6813 00<br />

27412 6814 20<br />

27413 6815 20<br />

27414 6B16 20<br />

27415 6817 43<br />

27416 6818 4F<br />

27417 6819 50<br />

27418 681A 59<br />

27419 6818 52<br />

27420 681C 49<br />

27421 6810 47<br />

27422 681E 48<br />

27423 681F 54<br />

27424 6820 20<br />

27425 6821 28<br />

27426 6822 43<br />

27427 6823 29<br />

27428 6824 20<br />

27429 6825 31<br />

27430 6826 39<br />

27431 6827 38<br />

27432 6828 33<br />

27433 6829 20<br />

27434 682A 42<br />

27435 6828 59<br />

27436 682C 20<br />

27437 6820 53<br />

27438 682E 48<br />

27439 682F 41<br />

27440 6830 52<br />

27441 6831 50<br />

27442 6832 20<br />

27443 6833 43<br />

27444 6834 4F<br />

27445 6835 52<br />

27446 6836 50<br />

BASIC 1Z-013B V1.0A<br />

R<br />

P<br />

R<br />

E<br />

T<br />

E<br />

R<br />

1<br />

Z<br />

Space<br />

Space<br />

0<br />

1<br />

3<br />

8<br />

Space<br />

V<br />

1<br />

0<br />

A<br />

Space<br />

SFlace<br />

Space<br />

SFlace<br />

WagenrücklaLlf<br />

SFlace<br />

Space<br />

Space<br />

C<br />

0<br />

P<br />

Y<br />

R<br />

I<br />

G<br />

H<br />

T<br />

1<br />

9<br />

8<br />

3<br />

8<br />

Y<br />

S<br />

H<br />

A<br />

R<br />

P<br />

Space<br />

C<br />

0<br />

R<br />

P<br />

Space<br />

Space<br />

Spoilee<br />

Spaee<br />

I "<br />

I<br />

:/ !;<br />

.." • • ' t<br />

, ~.<br />

'I 1<br />

~ , i<br />

~i }:<br />

,<br />

IJ " .<br />

, I<br />

, ,.<br />

'I<br />

27447 6837 2E<br />

27448 6838<br />

27449 6839<br />

27450 683A<br />

27451 6838<br />

27452 683C<br />

27453 6830<br />

27454 683E<br />

27455 683F<br />

27456 6840<br />

27457 6841<br />

27458 6842<br />

27459 6843<br />

27460 6844<br />

27461 6845<br />

27462 6846<br />

27463 6847<br />

27464 6B48<br />

27465 6849<br />

27466 684A<br />

27467 6848<br />

27468 684C<br />

274p9 6840<br />

27470 684E<br />

27471 684F<br />

27472 6850<br />

27473 6851<br />

27474 6852<br />

27475 6853<br />

27476 6854<br />

27477 6855<br />

27478 6856<br />

27479 6857<br />

27480 6858<br />

27481 6859<br />

27482 685A<br />

27483 6858<br />

27484 685C<br />

27485 6850<br />

27486 685E<br />

27487 685F<br />

27488 6860<br />

27489 6861<br />

27490 6862<br />

27491 6863<br />

27492 6864<br />

27493 6865<br />

27494 6866<br />

27495 6867<br />

27496 6868<br />

27497 6869<br />

27498 686A<br />

27499 6868<br />

27500 686C<br />

27501 6860<br />

27502 686E<br />

27503 686F<br />

27504 6870<br />

27505 6871<br />

27506 6872<br />

27507 6873<br />

27508 6874<br />

20<br />

20<br />

20<br />

20<br />

20<br />

C2<br />

C2<br />

C2<br />

C2<br />

C2<br />

C2<br />

C2<br />

C2<br />

C2<br />

C2<br />

C2<br />

C2<br />

C2<br />

C2<br />

C2<br />

C2<br />

C2<br />

C2<br />

C2<br />

C2<br />

C2<br />

C2<br />

C2<br />

C2<br />

C2<br />

C2<br />

C2<br />

C2<br />

C2<br />

C2<br />

C2<br />

C2<br />

C2<br />

C2<br />

C2<br />

C2<br />

C2<br />

C2<br />

20<br />

00<br />

20<br />

33<br />

36<br />

34<br />

33<br />

39<br />

20<br />

42<br />

59<br />

54<br />

45<br />

53<br />

20<br />

46<br />

52<br />

45<br />

BAsIC 1Z<br />

Spa<br />

Spa<br />

Spa<br />

Spa<br />

Spa<br />

--<br />

----------<br />

-<br />

-<br />

- •-Spo<br />

Wa<br />

Spo<br />

3<br />

6<br />

4<br />

3<br />

9<br />

8<br />

Y<br />

T<br />

E<br />

S<br />

F<br />

R<br />

E<br />

Spoi<br />

Spo<br />

(<br />

C<br />

)<br />

I,<br />

"<br />

I


~<br />

~<br />

~<br />

~<br />

2 27521<br />

2 27522<br />

2 27524<br />

2 27525<br />

2 27527<br />

2 27528<br />

2 27534<br />

2 27537 6891<br />

2 <br />

2 <br />

2<br />

2<br />

2<br />

2 <br />

2<br />

2 <br />

2<br />

2<br />

2<br />

2 <br />

2 <br />

2<br />

2 <br />

2<br />

2 '<br />

I<br />

I<br />

22 54 12 LD (1254) .HL IN BASIC-ROUTINE EINTRAGEN<br />

I RICHTIGE STELLE SCHIEBEN<br />

geladenen Basic-Interpreter an richtige Stelle schieben und starten<br />

LD C.L I LÄNGE BASIC-INTERPRETER<br />

LD DE. 0000 I LÄNGE 8ASIC-INTERPRETER<br />

LD HL. (1171 ) I XIV-KOORDINATE CURSOR<br />

I BASIC-INTERPRETER AN<br />

21 00 12 LD HL. 1200 I ZEIGER AUF GELADENEN<br />

lAUS MONITOR 1Z-013A<br />

I BASIC-INTERPRETER<br />

LD DE. 0000 UHRZEIT AUF 000000<br />

JP 0000 : KALTSTART MONITOR<br />

FLAG AUF VORMITTAG<br />

(Der ROM - Monitor lädt den Basic - Interpreter nach $1200)<br />

I UMSCHALTEN AUF<br />

UHRZEIT SETZEN<br />

IRAM AB $0000<br />

I ERRECHNEN<br />

BASIC 1Z-01313 V1_0A<br />

Textende<br />

Diese Routine steht nach dem Laden bei $7D79.<br />

2 27536 6890 44 LD B.H I<br />

21 79 68 LD HL. 6879 I<br />

~ 27510 6876 OD Wagenrücklauf<br />

~ 27511 6877 OD Wagenrücklauf<br />

2 27530<br />

2 27531<br />

2 27532 688C 87 OR A<br />

2 27533 6B8D EO 52 SBC HL.OE<br />

2 27517 6870 CD 33 00 CALL 0033<br />

:;: 27513 6B79 AF XOR A<br />

27509 6B75 45 E<br />

2 27526 6886 11 00 00<br />

2 27520 6880 2A 71 11<br />

~ 27514 687A 11 00 00<br />

~ 27515<br />

2 27535 688F 4D<br />

SEITE 482<br />

4 27512 6B78 00<br />

2 27529 6889<br />

2 27523 6883<br />

2 27538<br />

2 27539<br />

2 27540 6894 03 EO OUT (EO) .A<br />

2 27541<br />

2 27542 6896 ED 80 LOIR<br />

2 27543<br />

2 27544 6898 C3 00 00 <br />

2 27545<br />

2 27546<br />

2 27518<br />

2 27519<br />

2 27516


Wer das Beste aus seinem mz - 700 / 800 heraushoien<br />

will, kommt um dieses wertvolle Buch nicht herum!<br />

Auf ca 484 Seiten ist alles bestens und in deutsch<br />

dokumentiert von einem der besten Experten auf<br />

diesem Gebiet.<br />

o Wenn sie die versteckten Mögl ichkeiten Ihres Basic<br />

entdecken wollen ,<br />

o wenn Sie eigene Befehle implementieren möchten<br />

oder<br />

o wenn Sie Ihren mz - 700 / 800 besser verstehen<br />

wol len ,<br />

dann brauchen Sie dieses Buch!

Hurra! Ihre Datei wurde hochgeladen und ist bereit für die Veröffentlichung.

Erfolgreich gespeichert!

Leider ist etwas schief gelaufen!