
5 8=54272: POKES+24~, 15: POKES., 22121: POKES+ 1.-68 : POKES+5,
15:POKES+6,215
1121POKES+7,120:POKES+8,100:POKES+12,15:POKES+13,215
'~III.~.":I.h'JI:I
15 PRIHT":J": V=53248: POKEV+2L 1
2~ZI FORS 1 =12288TO 1235121 : READQ 1 : POKES 1 , Q1 : HE:":T
25 FORS2= 12352TO 12414 : F.:EAD02: POKES2., 02 :t.JE:":T
30 FORS3=12416TOI2478:READQ3:POKES3,Q3:HEXT
35 POKEV+39,15:POKEV+l,68
,,&lIB
40 PF.:IHTTAB (16(1) "=11 At-! THE
45 P=192
5121FORX=I2IT0347STEP3
55 RX=INT(X/256):LX=X-RX*256
60 POKEV, U<:: POKEV+ 16, f;:>~
7(1 I FP= 192THE~JG08U:E:200
75 IFP=193THEHGOSUB3121121
8121POKE204e,p:FORT=1T06121:HE>~
:35 P=P+l:IFP>194THENP=192
9121HE:":T
95 EHD
1121121DATi''I:3(1.-er, 12121.,63.- (I.-252., 127, 129., 254., 127.- 129, 254,
DAtJC UJO t1iU I'''E
;6Ia
- -"-' !~II
127~189~254~127~255J254
101 DATA63,255,252,31,187J248J3,187,192Jl,255J128,
3,189,192,1,231,128,1,255,121
102 DATA31,255,O,0,124,0,0,254,0,1.199.32.3.131.
224,7,1,192.1.192,0,3,192,121
103 DATA30,12I. 12121,63.0,252,127,129,254,127, 129,254
127J189J254J127J255.. 254
11214DATA63,255,252,31,221,248,3,221~192,1,255,128,
3J255J192~1}195J128}lJ231J3
105 DATA31)255J255)0)124)0)0)254~0)lJ199J0J7J1J128J
7,0,21214,1.128,124,7,128,56
106 DATA30,0.12121,63~0,252,127,129,254.127,129,254.
127)189)254)127)255)254
107 DATA63,255,252,31,221,248.3,221,192,1,255,134.
3,189,204,1,199,152~1,255,48
108 DATI'=!1 .255., 22"1., 1 .-252., 0., 3., 254., 0
109 DATA7,14,0,204,14,O,248,56,0,112,112,O,O.60,O.
-1
20121 POKES+4,129:POKES+4, 128:RETURN
31210
POKE8+11, 129:POKES+l1. 128:RETURN
PROGRAMMING GRAPHICS 167
Komentáře k této Příručce