home *** CD-ROM | disk | FTP | other *** search
/ Loadstar 213 / 213.d81 / hello (.txt) < prev    next >
Encoding:
Commodore BASIC  |  2002-01-01  |  199 b   |  6 lines
  1. 10 print"[147]":poke53280,0:poke53281,0:poke646,0
  2. 15 d=peek(186)
  3. 20 a$="hello connect":b$="l[207]a$,d"+chr$(13)+"r[213]"+chr$(13)
  4. 30 forx=1to10:poke630+x,asc(mid$(b$,x)):next:poke198,10:end
  5. 10000 d=peek(186):n$="hello":open15,d,15,"s0:"+n$:close15:saven$,d:end
  6.