D00000=0000 D00010=0010 L00200=0200 FIELD 0 *7600 L07600, TAD D07726 6326 L07602, 6322 SNA JMP L07602 7421 6322 6321 CLA CLL CMA 6327 7701 CLL RAL SZL JMP L07625 RAL SZL JMP L07630 RAL SZL CLA JMP L07634 JMP L07600 L07625, TAD P07727 6326 JMP L07637 L07630, CLA CLL CML RAR 6326 CLA CLL RAL IAC JMP L07637 L07634, CLA CLL CML RTR 6326 CLA CLL RTL IAC L07637, CLL RTL D07640, 7001 7421 CLA CLL BSW IAC 6326 6365 6364 6373 NOP AND D07726 SZA CLA JMP L07661 CLA CLL CML RAL IAC 6375 L07655, 6373 JMP L07655 CLA CLL 6365 L07661, 7721 6375 JMS S07716 DCA P07730 JMS S07716 DCA D07731 L07667, JMS S07716 DCA I P07730 7521 TAD I P07730 7521 ISZ P07730 ISZ D07731 JMP L07667 JMS S07716 DCA P07730 L07701, CLA CLL CML RAL IAC 6375 CLA CLL BSW IAC 6327 7721 CIA TAD P07730 SNA CLA JMP I P07727 L07712, TAD D07726 6311 CLA CLL CML RAL IAC JMP L07600 S07716, 0000 L07717, 6373 JMP L07717 AND D07640 SNA CLA JMP L07712 6376 JMP I S07716 D07726, 0010 P07727, L00200 P07730=7730 D07731=7731 *7756 L07756, KCC L07757, KSF JMP L07757 KRB CLL RTL RTL SPA JMP L07757 RTL L07767, KSF JMP L07767 KRS SNL DCA I P07776 DCA P07776 JMP L07756 P07776, D00000 JMP L07701 $