home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Tiger Disk 72
/
Tiger_Disk_072_20xx_Tiger-Crew-Disk_de_Side_B.d64
/
farb-quadrate
(
.txt
)
< prev
next >
Wrap
Commodore BASIC
|
2023-02-26
|
195b
|
10 lines
10 print"[147]":poke53281,0
20 c$="[159][156][158][129][149][150][151][152][153][154][155]"
30 fori=1to15:printmid$(c$,i,1);
40 print"";
50 forj=1toi:print:next
60 printspc(i*2)" [157][157][157][157][157] [157][157][157][157][157] [157][157][157][157][157] "
70 forj=1to300:next
80 nexti
90 poke198,0:wait198,1:list-80