Back to Main page.
Back to Main tapes page.
2  REM*****BY BILL MCFADDEN ON 1/17/77*****
3  REM*****ALL RIGHTS RESERVED*****
4  REM*****LAST ACCESS 1/17/77*****
5  REM*****ADD NEW CONVERSIONS TO FILE CONVER*****
10  FILES CONVER.B950,NOLIST.B950
20  IF TYP(1)=3 THEN 70
30  ADVANCE #1;1,F
40  GOTO 20
50  DIM A$[72],B$[72],C$[72]
60  REM*****ADD NEW CONVERSIONS*****
70  IF  END #2 THEN 230
80  GOTO TYP(-1) OF 170,170
90  READ #2;A$,B$
100  PRINT A$" TO "B$":"'7;
110  INPUT A
120  GOTO A+2 OF 190,80
130  PRINT '7;
140  PRINT #1;A$,B$,A
150  PRINT #1;B$,A$,1/A
160  GOTO 80
170  READ #1,REC(1)+1
180  GOTO 80
190  INPUT A$
200  INPUT B$
210  INPUT A
220  GOTO 140
230  PRINT #2,1
240  END