Viel mehr als 33 Programme für den Sinclair Spectrum

108
59ς PRINT эlΣΡ 2i^л , a.л ;
597 PRiNT AT $‚0
700 FOR T=1 TO T(5)
705 IF R 3 Я 3•t rJ f;{ 7 THEN LET X (5
)=:-ý('S)-1
?2д IF R > i AND R5 THEN LET YY=Y ( S ) -U
'=ε 3 5 FOP SO TO 4.5 STEP -.3: BF
EF- .05,I: NEXT 1
д4. IF XX=X AND YY ='ι'' THE N GO TO
1000 ζ1 0
950 PRINT
970 .LET P (5) = P (5) -1 ıλ G
Ii Gt? TO 1100
1 000 LET PX =INT (RNO*O@) +11
1005 .-' IF 10ιл -P :P'τ THEN LET PX=100
1010 LET P (5) =P (5) +PX
1020 LET P =P +PX
1025 FOR 1=0 TO 20: BEEP .01 , -10
BEEP .01 ' -5: BEEP . 01. -50: NE'+-;
τ τ ı
^. іι'3 Бcη LET O=U$R INU