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