50 PRINT:Q=0:P=1:GOSUB150:GOSUB120:B=A:GOSUB150:GOSUB120:V$=N$+CHR$(B)+CHR$(A)
100 PRINTF$(Q,A);:GOSUB120:IFA<>0ANDP=0THENGOSUB150:GOTO100
110 ONA+1GOTO50:GOTO70:DATA END,FOR,NEXT,DATA