home *** CD-ROM | disk | FTP | other *** search
/ Commodore Disk User Volume 4 #2 / Commodore_Disk_User_Vol.4_2_1990_-.d64 / techno2 (.txt) < prev   
Encoding:
Commodore BASIC  |  1990-01-01  |  338 b   |  14 lines
  1. 110 open4,4
  2. 120 print#4,chr$(27);chr$(120);chr$(49);
  3. 130 print#4,chr$(27);chr$(58);
  4. 135 print#4,chr$(0);chr$(0);chr$(0);
  5. 140 print#4,chr$(27);chr$(38);chr$(0);
  6. 150 print#4,chr$(33);chr$(33);
  7. 160 fori=1to47
  8. 170 readx:print#4,chr$(x);
  9. 180 nexti
  10. 190 print#4,chr$(27);chr$(37);chr$(49);
  11. 220 close4:end
  12. 230 data 128,0,0,0,192,192,192,192,0,0,0,0,0,0,0,0,0,192,192,192,192,0,0,0
  13. 240 data 0,0,0,192,192,192,192,0,0,0,0,0,0,0,0,0,192,192,192,192,0,0,0
  14.