home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Loadstar 207
/
207.d81
/
ls
(
.txt
)
< prev
next >
Wrap
Commodore BASIC
|
2022-08-26
|
182b
|
4 lines
10 d=peek(186):a$="presenter":c$=chr$(13):poke53280,0:poke53281,0:poke646,0
20 b$="l[207]a$,d"+c$+"r[213]"+c$:forx=1to10:poke630+x,asc(mid$(b$,x)):next:poke198,10:end
10000 d=peek(186):n$="ls":open15,d,15,"s0:"+n$:close15:saven$,d:end