10 open "YMZ.LST" FOR OUTPUT AS FILE #120 READ R,L,B,ALF,LO30 READ Y1,Y2,Y3,Y4,X1,X2,X3,X4,X5,X640 READ AO,BO,CO,QZ45 READ J1,J2,J3,J4,J5,J6,J746 READ Y5,Y6,Y7,Y8,Y9,Y10,Y1149 INPUT PSI,H,HO50 FA=0