home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
CBM Funet Archive
/
cbm-funet-archive-2003.iso
/
cbm
/
crossplatform
/
emulators
/
Atari
/
c64.lzh
/
C64
/
PRINT-AT
(
.txt
)
< prev
next >
Wrap
Commodore BASIC
|
1986-02-06
|
264b
|
10 lines
100 for i=49152 to 49177
110 read x: poke i,x: s=s+x: next
120 data 32,253,174, 32,158,183,138, 72, 32,253,174, 32
130 data 158,183,104,168, 24,32,240,255, 32,253,174, 76
140 data 164,170
150 if s<>3566 then print"fehler in datas!": end
160 print "ok!"
170 pr=12*4096
180 sys pr,24,20,"[194]eispiel"