Directory of image this file is from
This file as a plain text file
P1 DCA NAME+2 6152 JMP I (600) TEMP1,0 DPOINT,0 CNT,-1000 *600 TAD NAMED DCA D1 TAD NAMED+1 DCA D1+1 TAD (7201) DCA D1+2 TAD (NAME) DCA D2 DCA D3 TAD I (7746) AND (7776) DCA I (7746) CDF 10 CIF 10 JMS I (7700)/USR IN 10 CLA CDF 10 CIF 10 JMS I (200) 1 D1, 0 0 7201/DEVICE HANDLER JMP ERR1 CLA TAD D1+1 CDF 10 CIF 10 JMS I (200)/0PEN AND ENTER DEVICE HANDLER 3 D2, NAME D3, 0 JMP ERR2 CLA CLL TAD D2 DCA D6 CDF 10 CIF 00 JMS I D1+2 D4, 5101 D5, 1000 D6,0 JMP ERR3 CLA TAD D1+1 CDF 10 CIF 10/CLOSE FILE JMS I (200) 4 NAME 30 JMP ERR4 JMP DONE NAME, FILENAME PATBUF.SV NAMED, DEVICE DTA0 ERR1, CIF 10 JMS I (200) 7 1 ERR2, CIF 10 JMS I (200) 7 3 ERR3, CIF 10 JMS I (200) 7 7 ERR4, CIF 10 JMS I (200) 7 4 DONE, CDF 10/USR OUT CIF 10 JMS I (200) 11 CDF CIF 00 JMP I (200) $$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$