195



790 ELSE
800 PRINT @Prtr: USING 810:B,R1,R2
810 IMAGE 14X,3(4D.4D,5X)
820 END IF
830 Ind2=0
840 NEXT B
850 Ind2-l
860 PRINT @Prtr:
870 NEXT A
880 END