09.03.2013 Aufrufe

Viel mehr als 33 Programme für den Sinclair Spectrum

Viel mehr als 33 Programme für den Sinclair Spectrum

Viel mehr als 33 Programme für den Sinclair Spectrum

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.

Tippen Sie ruhig diese drei <strong>Programme</strong> nacheinander ein und versuchen<br />

Sie, diese zu verstehen:<br />

10 P.EN SQharτ d^<br />

2 έ+ LET Z z =22<br />

,.0 τ ET ^ ^ =32<br />

1 90 FOR x=1 TO г г -2 : FOR у = 1 TO<br />

11sг+ PR I εBT ЯT :c , y; "Я.. NEXT ц : N<br />

E:\T Y<br />

120 FOR x=0 TO ZZ-1<br />

1:3 0 PRINT RT x.'0;<br />

14 ί PRINT RT λt,Z-1:" ц "<br />

150 NEXT Х<br />

160 FOP y= 0 TO Σ; —1<br />

1 7 ϊ+ PRINT RT i , ц ; "3#"<br />

180 PRINT RT zz-2 . ц ;<br />

1á0 NEXT ц<br />

300 DIM ι: (7) : DIN ц C7)<br />

310 L ET x =Z C '2<br />

'320 LET Ч =tf<br />

<strong>33</strong> 0 LET x1=1<br />

340 LET u 1=1<br />

350 IF SCREEN$ ( у +y 1 . x ) ="" TH:.<br />

з LET y 1 = — ц 1<br />

350 IF .=.OREE!'d$ ,.г f τί 13 ="13" THE<br />

LET x 1 =—x1<br />

Z 0 LET X =x + λ: 1: L ET ц = ц + ц 1<br />

3' ' PRINT RT y. К ; "¿^" - -<br />

390 IF X = £ 3 RND у =ц (5) AND л =<br />

ť 2: RND y=y (2) THE ? д 5T

Hurra! Ihre Datei wurde hochgeladen und ist bereit für die Veröffentlichung.

Erfolgreich gespeichert!

Leider ist etwas schief gelaufen!