Viel mehr als 33 Programme für den Sinclair Spectrum

126
10 EDROER 1: PAцEй 1: INK 7: =-.
i= 1^r3fl0 : DIM 5$^. i з - Lг Σ1`1 z $ τ. ıØ ,,
• FOR 2ί =1 TO 1Q: LÉT І $ +: K) ='3.3.
NEXT Х : LET 5 $""
20 00 5u8 5000: GL` 5L'►5 1000: --
GO 5Li5 7400.
30 IF p=1 T λiE GO TO 20 0
30 PRUSE ®: LET г $=ZNK.EY$: L ET
_+.$ 3) = Г $: LET 3=3 +i: IF •3 =2 THE
гd PRINT RT O, 0;"5pei._h έ Γ t:^7tt^"
PRUSE 100: GOTO 5000
SO IF Г $ _,., ., DR г
$=..A., тr±εN GLs
TO 2 0
60 GO SUS 3000: 00 SUB 2000: I
F C< 0 OR d0 OR с ? é55 OR d г 2?2 ř
г ±E λ3 P,RINT λY{^ε ; "E.ILO ZU GR055: " P
RUSE 20: INPUT "' GO TO 4 0
70 l?RRLf ._ -REEK 23677 .' d-PEEN. 23
578
80 GO TO 4. 0
200 GO SUB 5000- PR+ š 5E 0. IF It-!
' Б Y $ = "z THE N COPY
2 1ί GO TO 2й ,.
1000 LET І +*: LET t=s +n*n:,,
LET a=Sr, ıR t: LET h =5 0R 5: RETUR
Na
20Φ0 LET o =t -u эε l - ы ±ε m -w ѕn : LET C =
3¢t ;ε t мэε l-u* λı l ,f (h +o) +128: LET d=5
#^^ 1M ЭFS- Ω iF11J^t1si ^ØF 7 г Ch +i? λ ^'^6: :^.
ETURN .
3ε-3ι-^a1 IF c$="?" THEN LET гı = цι ь a
30 1 ί IF г $ =" б " THEN LET ω =',-Q
30 20 IF г $="8" THEN LET ц =u -9
3030 IF ; š=„E.„ т.iε fiJ LET
304-0 IF Γ $ ="?" THEN LET v =" +g
305 ί IF г $ =" 0" THEN LET ы =u -a_
3 0 60 RETURN
=. Q +^^^^ INPUT RT 0 .0; "G,-o2sst? ":
"x-δ'la Cpu πΛ t τ ": t' " У i C λ pu π K t
? ",m"'z-Bl i C λ pU n K t г .. ; п : LET L-τ_
+ ı: ì =L-'1) : PETUP.N
5Qk IF INF.EY$ < y "" THEN GO TO 5:
00
5010 С L3 : LET э =1
502ε, PRINT "Was ø^u2£'ι5 iheR 6í á %'
503Э мRINT '`";^ rττ.ı es Ei td яг a LE,°;
.. , . ..^ P λ t εs2 t ; es E%i _ d . . .. .^ ' i d'
8i ld5 Chτ i Гпт " ' ? ıs f3l 5 -ε t i t λρ ti
n и tP 5RUEn de5 ai:tt'cг tte п ""-
$i ld2s .uf KaSe t t ı " ''"fl LOROer'
? τ:l ťs ı5í Ld25 von"'" !