[ photo 100_1608.JPG 35; =M0M7N; 33; ZERO; NOT; SHLD-3;=E2M7; J6P100; 4; (W becomes U) C6; V1P120; J41#; ZERO; =V1P120; 41; V1P52; NEV; J42#Z; ZERO; =V1P52; 42; ZERO; NOT; NEG; DUP; NOT; (SETB177776); 43; SHA+18; V0P26M6; +; =V0P26M6; DUP; J46=Z; J2P100=Z; V30; JS10P6; J2P100; 5; (W becomes L); ZERO; 51; ZERO; NOT; =V0; SETB177765; J43; 6; (W becomes L, nothing typed) ZERO; NOT; J51; P102; (hold up subprogram until peripheral transfer in programs area can be obeyed. Parameters given in Q7) SET1; JSP10; 2; Q7; JSP103; J1; =Q7; EXIT1; 1; SET1; ZERO; CAB; JS2P10; J2; P103; (chack parameters in N1 before peripheral transfer which may involve programs area) SET4; =RC6; 1; J2C6NZ; EXIT2; 2; V9P0M6Q; JS86P105; DUP; JS88P105; J1; V8P0M6; DUP; SHL-24; J1P45#Z; 3; SETB30000; AND; SETB140000; OR; =K1; ERASE; EXIT2; P104V92; V0=B01010101/23; (HUR); (V1 onwards= constants associated with priorities, in groups of 4) (V1-4= overflow and TR record, etc. V5-8= run time V9-12= PHU time) V13=B0141/11; (NS counters, etc.); V14=B2141/11; V15=B4141/11; V16=B6141/11; V17=1; V18=1; V19=1; V20=1; (CPDAR); (V21-24 = A program unit pre-allocation. For B programs, records types to be [ ------ fold pre-allocated on deallocation by OUT 6) V25=2; V26=2; V27=2; V28=2; (hold-ups); V29=5; V30=5; V31=5; V32=5; (APM); (V33-36= dump for E0 V37-44= current program name V45-52=new program name, transfer parameters, OUT4/10 marker, ec. used only by main subprogram. V53-56=program start time [ ------- end of photo V57-60=streams used by program V61-V4 is OUT 8 OUT16 flag [ sic V65-68 is work space used by OUT 8 for D transfers);