Viel mehr als 33 Programme für den Sinclair Spectrum

98
1133 LET k$=k$+i$
11 3ι1 INPUT
1135 PRINT PT 4, 24 K$
11 40 IF LEN K $ =6 THEN GO τ0 12е0
ii GO TO ii
г- 2 00 LET Σ> =:ЈPL τ•. $ г 1 TO 2)
1205 LET E=VPL K# i з TO 4 з
1210 LET F= +JRι K$ í5 т0 6τ
122 0 IF D=P PND E =8 ЯNP C=F THE N
G O TO 170
2000 PRINT RT 0.0;
._ ıč +г 5 FOR X0 TO 5: SEEP 0 ι.^ı ý,- R
ND*20: NEXT Х
200 6 FOR X=0 TO -5 STEP -1: SEEP
î+.01,X: NEXT Х
2010 FOP I =1 TO 5: P L OT 120,120
2011 LET ìf=RNi3+2ς6: LET Y'=RNDf15
DRPU Ol1ER 1; X'-32 0 ,1'-320: PLOT
12ι7 , i21 : DRAtλ OVER 1; X-12 0 ,Y' -12
NEXT I
2 0 1 2 PRLiSE 5
2 3 14 PRINт PT 7, 35; " n ^ n
2020 PRINT PT 5,10;
2025 FOP J =4 TO 1 7 STEP 2
2030PRINT
.. e eti^εLá
aeái ^ei^^e
з 5 NEXT J
20.0 PRINT PT 3,10 .; " a a Ť ",
204.5 FOP ј =4. 4 TO 9'STEP 2
2050 r^R INт .. aar^:a •
2 гί 55 NEXT J
2 050 FOR J=1 0 TO í7 SΣER 2
20 65 PRINT
2070 NEXT J
2050 FOR J=3 TO 12
=' г^-85 PRINT RT J, 12; "
, 3λ, NEXT J
R ј _-г 4 PRINT PT 1 9 , 8,
J^5
=• PRINT PT 18 , 9; ••
^ ,.
=:0 45 PRINT PT i? , 10;
2037 PRINT RT 15,10;"
2038 PRINT PT 1ς,10; "
20 99 PRINT PT 14,10;" "
=1 б0 PRINT PT l3,10; " "
2` 1 1 0 OR ' +=1 T +? 10
20 NEXT _: - PRUSE з 0
21 30 PRINT PT 11,15;" ," "
• 1 з 1 PRINT PT 1 ı^^+, 15; "
2 = 3 2 PRINT PT Э .1 ť ; ' ^:'
2133 PRINT PT 8 . 3 ť+: "
:_:1 з5 RINT PT 11 , 18; "
2135 PRINT PT 10,15;"
η 3:' PRINT RT á,16;"
213S PRINT PT :3 ; 15;"
__,2ι3 PRINT PT 6.0.;
2 3 00 GO TO 1 45
I