home *** CD-ROM | disk | FTP | other *** search
/ Digital Talk 4 / Digital_Talk_04_1993-12-10_Digital_Talk_de_Side_B.d64 / 9. tass-print / 9.a7ae (.txt)
Encoding:
Commodore BASIC  |  1993-01-01  |  561 b   |  13 lines
  1. 1000 poke53281,0:poke53280,0:poke53272,21
  2. 1010 print"[152][147]       [210][210][210][210][210][210][210][210][210][210][210][210][210][210][210][210][210][210][210][210][210][210][210][210][210][210]
  3. 1020 [153]"        turbo ass - printer v1.0
  4. 1030 print"       [183][183][183][183][183][183][183][183][183][183][183][183][183][183][183][183][183][183][183][183][183][183][183][183][183][183]
  5. 1040 [153]"        (w)'90 by ansgar windgespoke
  6. 1100 poke19,1:input"filename: ";a$:poke19,0
  7. 1110 a$=a$+",r":fora=0tolen(a$)-1:poke2816+a,asc(mid$(a$,a+1,1)):nexta
  8. 1120 poke250,len(a$):print"[152][147]":sys2467
  9. 1130 ifst<>64thenrun
  10. 1140 print" press [space] to print [146]"
  11. 1150 geta$:ifa$<>" "then1150
  12. 1160 sys2464:run
  13.