home *** CD-ROM | disk | FTP | other *** search
/ 64'er / 64ER_CD.iso / 87xx / 8708a.d64 / turbo-dir (.txt) < prev   
Encoding:
Commodore BASIC  |  1995-03-30  |  150 b   |  6 lines
  1. 1 PRINT"[147]":OPEN1,8,0,"$":POKE781,1:SYS65478:GETA$,A$:E$=CHR$(0)
  2. 2 GETA$,A$,H$,L$:IFSTTHENSYS65484:CLOSE1:END
  3. 3 PRINTASC(H$+E$)+256*ASC(L$+E$);
  4. 4 GETA$,B$:IFA$THENPRINTA$B$;:GOTO4
  5. 5 PRINTA$:GOTO2
  6.