Viel mehr als 33 Programme für den Sinclair Spectrum

50
stimmt, können Sie mittels "PRINT: RANDOMIZE USR scr" ausprobieren.
Der Bildschirm müßte sich mit dem Zeichen "#" füllen.
Das folgende kleine Programm, zusätzlich zur REM-Zeile eingegeben,
ermöglicht ein beliebiges Testen des Programmes. Zeile 15 ermöglicht,
das beliebige Rechteck aus beliebigen Zeichen übereinander geprintet
werden. Es lassen sich recht interessante Graphiken entwickeln.
Nun können Sie die REM-Zeile und Zeile 2 abspeichern, um sie bei
Bedarf wieder zu verwenden. Die Bedeutung der Variablen ergeben
sich aus dem Test-Programm:
2? LmТ _. c г =2 з7 ť'' : LET c h г ="23 7
6: LET z z =23764: LET z t =23 767: L
ЕТ z x =23762: LET z у 1=23761: LET
zy2=23753
10 REM te ь tF г o9 г a?й gis
15 OVER 1
20 INPUT "Z е i chen : "; a$: POKE c
hr,000E a$
32► INPUT "-3t a г i р u гı . t : x _" ; Y -
y="; ц : POKE zX,X: POKE Zy1,y: PO
42' INPUT "F ιη Г bl й t: Z е i C e гı =":Z: "
5 р atten=";s-: POKE zz,z: POND zt.
PRINT ЯT 0,0: PRNDOМ IZE UE'P
5 c Г
SO GO TO 20
3.4 Programm 14: ""Inversion'"
Dieses Programm invertiert blitzartig den ganzen Bildschirm oder einen
Teil desselben. Es ist sehr gut geeignet, Action in Spiele zu bringen.
Als Beispiele mögen MINENFELD und ZX-SECTOR in diesem Buch
dienen.
Zunächst das Programm in Hex-Loader I:
1 REM
2
1 2' LET
LET a п λ =2Ls г η52' ΣЯ $ = "2 τ1304 Ø^δ3δ>_5 η η ^}^rflL7?Lc ε.
? f f7 7231@f9i11Ctf5=9"
20 LET Ко nt; =0: LET г $=$*"*'
:.îØ LET a = i Ω '3
42' LET p =1 Č ?ε (ι-CzDE пı $ -48- (39dг (Ω'
$ " Σ "3 1 i +coоε aг $ г. 27 -4 ε - c3^+ ( П1 $ !:
) ,.. ξ . ,, 3
5@ LεT К >? п t: = Λ>> n Σ г +λ : Pvt:.ε э ,fi