Inhaltsverzeichnis
Werbung
Fortsetzung Listing
60:
Berechnung der Kreiszahl
'z
141
LtA 234
19.234
lade ietzt deren lnhalt
(eine
Zelle weiter)
142
ADD 253
07.253
und addiere,,100"
drauf
143
234
20.234
dieses
wieder
144
LDA 234
05.234
Hilfsadresse
145
vKL240
die aktuelle Stelle in
r?
131
LIA
234
19.234
Inhalt
132
VGR
250
12'250
ist der
Inhalt größer als
,,0"?
133
SPB 136
(86)
1
1.136
falls
ja,
springe
sofort
zur
Subtraktion
134
234
05.234
sonst lade die
Hilfsadresse
1
35
SPU
1
29
(85)
09.1
29
und
springe zurück zu deren
136
86:
SUB
251
08'251
subtrahiere
,,1"
vom lnhalt der
Hilfsadresse
137
234
20'234
und speichere
diesen
wieder
138
LDA
234
05.234
dann
lade
die
Hilfsadresse
selbst
139
251
07'251
und erhöhe
sie
um,,1"
140
234
06'234
und speichere
sie
wieder
149
84:
AIS
240
2O'24O
speichere den neuen .r-Wert wieder
150
LDA
231
05.231
lade den Zitlernzähler
151
251
07'251
und erhöhe ihn um,,1'
152
VKL
244
13'244
ist er noch
kleiner als
die
Maximalzahl?
153
1 1
1
(A7)
11.111
falls ja, zurÜck zum
Addieren/Subtrahieren
154
158
04.158
6
R
155
000
06.000
sPeichere sie
156
248
05.248
lade die
Startadresse
von
r
157
SPU 167
(21)
09.167
und
springe
ins Prüf-Unterprogramm
Vorbereitung des nächsten x-Wertes:
158
R6:
LDA
243
05.243
lade
den
Arithmetik-Modus
159
NEG
14.000
kehre
ihn
für die nächste
Runde um
160
243
06.243
und speichere
ihn
wieder
161
245
19'245
lade die
ersten
Ziffern
von
x
162
VKL
252
13.252
sind sie
noch
kleiner als
,,10"?
163
LIA
249
19'249
lade
mal
schon die letzten beiden x-Ziffern
164
ADD
251
07'251
und erhöhe sie um,,1"
165
SPB
012
(A1)
11.012
in die
neue Runde
01,000
sonst:
HALT
(endlich)!
gleichmäßigen Ziffernverteilung;
speichere übergebenen Wert
als momentane
167
21
:
ABS
236
06.236
Startadresse
168
LDA 244
05.244
lade die
Maximalzahl
146
LtA
234
'l'9.234
lade
mal
schon den lnhalt der
Hilfsadresse
147
136
1
1.136
falls ja, springe zurÜck zur
weiteren
Ubertra
148
83:
SUB 232
Subtraktion:
08.232
subtrahiere
den
169 22:
SUB251
08.251
ere den Akkuinhalt um,,1"
Wert vom
:-Wert
170
ABS 233
06.233
Hilfszelle
45
Werbung
Inhaltsverzeichnis
