======== Program timing: TP1 Clear SS TP2 SS <- CR, BUS <- PC delay TP3 CR <- BUS <- SS Transfer check PC+1 Clear PR TP4 PR <- CR, BUS <- Storage Clear CS, SC, SS TP5 CS, SC, SS <- BUS <- PR delay Clear AR TP6 start of Operating timing CR <- BUS <- CS, SC, SS Transfer check TP7 TP8 Transfer check ======== ad TP6 TP7 AR <- CR, BUS <- Storage TP8 CR <- BUS <- AR AC <- +AR TP1 TP2 Carry TP3 Arithmetic check TP4 ======== ca TP6 Clear AC TP7 AR <- CR, BUS <- Storage Special Carry TP8 CR <- BUS <- AR AC <- +AR TP1 TP2 Carry TP3 Arithmetic check TP4 ======== su TP6 TP7 AR <- CR, BUS <- Storage TP8 CR <- BUS <- AR AC <- -AR TP1 TP2 Carry TP3 Arithmetic check TP4 ======== cs TP6 Clear AC TP7 AR <- CR, BUS <- Storage TP8 CR <- BUS <- AR AC <- -AR TP1 TP2 TP3 Arithmetic check TP4 ======== mr TP6 Clear BR AC sign TP7 AR <- CR, BUS <- Storage BR <- AC TP8 CR <- BUS <- AR Clear AC AR sign TP1 multiply, stop clock TP2 Carry Roundoff TP3 Clear BR TP4 Product sign ======== mh TP6 Clear BR AC sign TP7 AR <- CR, BUS <- Storage BR <- AC TP8 CR <- BUS <- AR Clear AC AR sign TP1 multiply, stop clock TP2 Carry TP3 TP4 Product sign ======== dv TP6 AC sign TP7 AR <- CR, BUS <- Storage TP8 CR <- BUS <- AR Clear AC AR sign TP1 AC <- -AR TP2 divide, stop clock TP3 Clear AC TP4 Product sign ======== ts TP6 Clear Storage TP7 CR, Storage <- BUS <- AC TP8 CR <- Storage TP1 TP2 TP3 TP4 ======== td - this cannot work, there must be more to it TP6 TP7 CR, Storage <- BUS <- AC TP8 CR <- Storage TP1 TP2 TP3 TP4 ======== sr TP6 AC sign TP7 TP8 TP1 shift right, stop clock TP2 Roundoff TP3 Clear BR TP4 Product sign ======== sl TP6 AC sign TP7 TP8 TP1 shift left, stop clock TP2 Roundoff TP3 Arithmetic check Clear BR TP4 Product sign ======== sp TP6 Clear PC TP7 PC <- BUS <- PR TP8 TP1 TP2 TP3 TP4 ======== cp TP6 Compare TP7 TP8 TP1 TP2 TP3 TP4 ======== sa TP6 TP7 AR <- CR, BUS <- Storage TP8 CR <- BUS <- AR AC <- +AR TP1 TP2 Carry TP3 Special add TP4 Not in 1947: si 0 00000 select in-out unit/stop rs 1 00001 reset bi 2 00010 block transfer in rd 3 00011 read bo 4 00100 block transfer out rc 5 00101 record sd 6 00110 X sum digits cf 7 00111 X change fields ta 10 01010 transfer address AR -> C(x)x ck 11 01011 check AC != C(x): check-register alarm ab 12 01100 X add BR ex 13 01101 exchange AC <-> C(x) cm 20 10100 Clear and add magn. ao 22 10110 add one dm 23 10111 difference magn. slr 27 11011 shift left and roundoff slh 27 11011 shift left and hold srr 28 11100 shift right and roundoff srh 28 11100 shift right and hold sf 29 11101 scale factor clc 30 11110 cycle left and Clear clh 30 11110 cycle left and hold md 31 11111 X multiply digits with no roundoff