home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Publication 16
/
Publication_16_19xx_Civitas_de_Side_B.d64
/
farbflimmern.bas
(
.txt
)
< prev
next >
Wrap
Commodore BASIC
|
2023-02-26
|
137b
|
8 lines
10 ifa=0thena=1:load"flimmern*",8,1
11 print"[147]"chr$(14)
12 forg=0to5
13 printg+1". [198]arbe ";:inputf
14 iff>15orf<0thenprint"[145][145]":goto13
15 poke49153+g*8,f:nextg
16 sys49152