home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Compute! Gazette 1994 March
/
1994-03b.d64
/
xbasic.ml
(
.txt
)
< prev
Wrap
Commodore BASIC
|
2022-09-20
|
438b
|
18 lines
90 rem program for commodore 64 only
100 data 169,160,160,0,132,253,133,254
110 data 177,253,145,253,200,208,249
120 data 230,254,166,254,224,192,208,241
130 data 169,85,141,162,160,141,251,160
140 data 169,65,141,5,161,141,14,161
150 data 169,54,133,1,96
200 for j=828 to 871
210 read x:t=t+x
220 poke j,x
230 next j
240 if t<>7094 then stop
250 sys 828
270 print "[147]basic is now in ram!"
280 print "(with minor changes)"
290 print "poke 1,55 to restore!"
900 rem $033c-0367, 828 to 871