home *** CD-ROM | disk | FTP | other *** search
/ 64'er / 64ER_CD.iso / 90xx / 9003a.d64 / entpackkorrektur (.txt) < prev    next >
Commodore BASIC  |  1995-03-30  |  133b  |  4 lines
  1. 50 PRINT:Q=0:P=1:GOSUB150:GOSUB120:B=A:GOSUB150:GOSUB120:V$=N$+CHR$(B)+CHR$(A)
  2. 100 PRINTF$(Q,A);:GOSUB120:IFA<>0ANDP=0THENGOSUB150:GOTO100
  3. 110 ONA+1GOTO50:GOTO70:DATA END,FOR,NEXT,DATA
  4.