Info from Appendix D 58 10 72 10 10 Q S 080200 8/0/0 200 merge constant length 40 10 43 10 10 & L 000300 0/0/0 300 Halt 58 10 52 10 10 Q K 080200 8/0/0 200 merge constant length 2C 18 10 10 15 ' 8 5 1C8005 28/1/0 5 bulk copy alpha to short 16 18 10 10 14 6 8 4 068004 6/1/0 4 select (N) 2C 10 11 10 10 ' 1 1C0100 28/0/0 100 bulk copy short numeric 28 18 11 10 1A H 8 1 10 18810A 24/1/0 10A unconditional jump 16 10 11 11 11 6 1 1 1 060111 6/0/0 111 select (N) 12 10 10 14 10 2 4 020040 2/0/0 40 transfer (A) to N 23 12 10 10 10 C 2 132000 19/0/1 0 input one block/reset timer 2A 18 10 10 10 = 8 1A8000 26/1/0 0 test route N1 10 10 11 10 13 1 3 000103 0/0/0 103 Halt 28 18 11 10 1D H 8 1 : 18810D 24/1/0 10D unconditional jump 10 10 11 10 15 1 5 000105 0/0/0 105 Halt 1F 10 10 10 10 £ 0F0000 15/0/0 0 collate and add 28 18 10 10 11 H 8 1 188001 24/1/0 1 unconditional jump 7E 18 10 10 11 be 8 1 0E8001 14/1/0 1 replace selected bits File: old-paper-tapes/01037-3.leo 10 10 01 1F 04 1 £ 4 0001F4 0/0/0 1F4 Halt 10 10 01 1F 04 1 £ 4 0001F4 0/0/0 1F4 Halt 10 10 02 02 0E 2 2 . 00022E 0/0/0 22E Halt 10 10 01 19 10 1 9 000190 0/0/0 190 Halt 10 10 0B 0B 08 11 11 8 000BB8 0/0/0 BB8 Halt 10 10 01 1F 1C 1 £ + 0001FC 0/0/0 1FC Halt 10 10 10 10 0E . 00000E 0/0/0 E Halt 10 01 10 13 07 1 3 7 001037 0/0/0 1037 Halt 10 10 10 10 01 1 000001 0/0/0 1 Halt 10 10 10 10 13 3 000003 0/0/0 3 Halt 02 10 08 16 15 2 8 6 5 020865 2/0/0 865 transfer (A) to N 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 07 1C 1C 7 + + 0007CC 0/0/0 7CC Halt 1F 07 1F 07 1F £ 7 £ 7 £ 0F7F7F 15/0/3 1F7F collate and add 07 1F 07 1F 07 7 £ 7 £ 7 07F7F7 7/1/3 17F7 augment (N) by (A) 6E 00 00 00 00 be 10 10 01 1F 08 1 £ 8 0001F8 0/0/0 1F8 Halt 10 10 10 07 0E 7 . 00007E 0/0/0 7E Halt 07 0E 10 10 10 7 . 07E000 7/1/3 0 augment (N) by (A) 16 16 16 16 16 6 6 6 6 6 066666 6/0/3 666 select (N) 38 08 01 1F 1C H 8 1 £ + 1881FC 24/1/0 1FC unconditional jump 10 01 1F 1F 1F 1 £ £ £ 001FFF 0/0/0 1FFF Halt 16 10 01 1F 0B 6 1 £ 11 0601FB 6/0/0 1FB select (N) 02 10 10 10 10 2 020000 2/0/0 0 transfer (A) to N 10 16 01 1F 1A 6 1 £ 10 0061FA 0/0/3 1FA set radix 2A 1A 01 1F 04 = 10 1 £ 4 1AA1F4 26/1/1 1F4 set modification register 01 0E 04 10 10 1 . 4 01E400 1/1/3 400 select literal address 38 16 10 08 01 H 6 8 1 186081 24/0/3 81 modify address of next 02 10 10 04 10 2 4 020040 2/0/0 40 transfer (A) to N 16 08 01 1F 08 6 8 1 £ 8 0681F8 6/1/0 1F8 select (N) 02 1A 04 10 04 2 10 4 4 02A404 2/1/1 404 transfer (A) to N 6E 00 00 00 00 be 10 10 02 10 16 2 6 000206 0/0/0 206 Halt 29 02 10 10 02 I 2 2 192002 25/0/1 2 step on and test 38 08 02 10 04 H 8 2 4 188204 24/1/0 204 unconditional jump 2A 1A 01 1F 04 = 10 1 £ 4 1AA1F4 26/1/1 1F4 set modification register 16 08 01 1F 16 6 8 1 £ 6 0681F6 6/1/0 1F6 select (N) 02 1A 04 10 02 2 10 4 2 02A402 2/1/1 402 transfer (A) to N 01 0E 10 10 01 1 . 1 01E001 1/1/3 1 select literal address 07 08 04 10 01 7 8 4 1 078401 7/1/0 401 augment (N) by (A) 38 16 10 08 01 H 6 8 1 186081 24/0/3 81 modify address of next 23 10 10 10 10 C 130000 19/0/0 0 output 2A 10 02 01 13 = 2 1 3 1A0213 26/0/0 213 enter subroutine 29 02 10 10 02 I 2 2 192002 25/0/1 2 step on and test 38 08 02 10 19 H 8 2 9 188209 24/1/0 209 unconditional jump 38 08 01 1F 1C H 8 1 £ + 1881FC 24/1/0 1FC unconditional jump 10 10 10 10 10 000000 0/0/0 0 Halt 6E 00 00 00 00 be 10 10 02 01 04 2 1 4 000214 0/0/0 214 Halt 38 16 10 08 01 H 6 8 1 186081 24/0/3 81 modify address of next 2A 08 10 10 10 = 8 1A8000 26/1/0 0 test route N1 10 10 10 10 01 1 000001 0/0/0 1 Halt 38 08 02 01 04 H 8 2 1 4 188214 24/1/0 214 unconditional jump 38 08 02 01 1F H 8 2 1 £ 18821F 24/1/0 21F unconditional jump 38 08 02 01 0B H 8 2 1 11 18821B 24/1/0 21B unconditional jump 2A 02 02 01 13 = 2 2 1 3 1A2213 26/0/1 213 leave subroutine 38 16 10 08 01 H 6 8 1 186081 24/0/3 81 modify address of next 23 1A 10 10 10 C 10 13A000 19/1/1 0 rewind 10 10 10 10 02 2 000002 0/0/0 2 Halt 38 08 01 1F 1C H 8 1 £ + 1881FC 24/1/0 1FC unconditional jump 01 0E 13 10 10 1 . 3 01E300 1/1/3 300 select literal address 38 16 10 08 13 H 6 8 3 186083 24/0/3 83 modify address of next 02 10 10 04 10 2 4 020040 2/0/0 40 transfer (A) to N 6E 00 00 00 00 be 10 10 02 02 02 2 2 2 000222 0/0/0 222 Halt 16 08 04 10 10 6 8 4 068400 6/1/0 400 select (N) 02 08 13 10 02 2 8 3 2 028302 2/1/0 302 transfer (A) to N 16 10 01 1F 19 6 1 £ 9 0601F9 6/0/0 1F9 select (N) 02 10 13 10 15 2 3 5 020305 2/0/0 305 transfer (A) to N 38 16 10 08 13 H 6 8 3 186083 24/0/3 83 modify address of next 23 10 10 10 10 C 130000 19/0/0 0 output 38 16 10 08 13 H 6 8 3 186083 24/0/3 83 modify address of next 2A 08 10 10 10 = 8 1A8000 26/1/0 0 test route N1 10 10 10 10 13 3 000003 0/0/0 3 Halt 38 08 02 02 08 H 8 2 2 8 188228 24/1/0 228 unconditional jump 10 10 10 10 04 4 000004 0/0/0 4 Halt 10 10 10 10 15 5 000005 0/0/0 5 Halt 38 08 02 01 10 H 8 2 1 188210 24/1/0 210 unconditional jump 10 10 10 10 10 000000 0/0/0 0 Halt 6E 00 00 00 00 be 6E 00 00 00 00 be 0B 13 38 08 02 11 3 H 8 2 0B3882 11/0/1 1882 multiply and subtract File: old-paper-tapes/01037.leo 58 10 32 10 10 Q B 080200 8/0/0 200 merge constant length 70 10 13 10 10 0 3 000300 0/0/0 300 Halt 38 08 10 04 13 H 8 4 3 188043 24/1/0 43 unconditional jump 10 08 10 10 10 8 008000 0/1/0 0 copy registers 38 1C 10 08 10 H + 8 18C080 24/1/2 80 modify address of next 01 16 1F 08 10 1 6 £ 8 016F80 1/0/3 F80 interchange area addresses 29 0E 08 10 10 I . 8 19E800 25/1/3 800 conditional Halt 38 1C 10 08 10 H + 8 18C080 24/1/2 80 modify address of next 23 02 10 10 10 C 2 132000 19/0/1 0 input one block/reset timer 38 1C 10 08 10 H + 8 18C080 24/1/2 80 modify address of next 2A 08 10 10 10 = 8 1A8000 26/1/0 0 test route N1 10 10 10 02 01 2 1 000021 0/0/0 21 Halt 38 19 1F 1C 0B H 9 £ + 11 189FCB 24/1/0 1FCB unconditional jump 10 10 10 02 13 2 3 000023 0/0/0 23 Halt 10 10 10 01 1C 1 + 00001C 0/0/0 1C Halt 38 0D 1F 0D 1F H : £ : £ 18DFDF 24/1/2 1FDF modify address of next 16 19 1F 0E 13 6 9 £ . 3 069FE3 6/1/0 1FE3 select (N) 38 0D 1F 0D 0E H : £ : . 18DFDE 24/1/2 1FDE modify address of next 02 10 10 10 10 2 020000 2/0/0 0 transfer (A) to N 16 19 1F 0D 1C 6 9 £ : + 069FDC 6/1/0 1FDC select (N) 07 19 1F 0D 0E 7 9 £ : . 079FDE 7/1/0 1FDE augment (N) by (A) 16 01 1F 0D 1F 6 1 £ : £ 061FDF 6/0/0 1FDF select (N) 15 01 1F 0D 10 5 1 £ : 051FD0 5/0/0 1FD0 subtract (N) from (A) 3B 13 1F 0D 01 * 3 £ : 1 1B3FD1 27/0/1 1FD1 jump A != Z 02 01 1F 0D 1F 2 1 £ : £ 021FDF 2/0/0 1FDF transfer (A) to N 38 19 1F 1C 08 H 9 £ + 8 189FC8 24/1/0 1FC8 unconditional jump 10 10 10 10 01 1 000001 0/0/0 1 Halt 10 10 10 10 02 2 000002 0/0/0 2 Halt 10 01 0E 0B 16 1 . 11 6 001EB6 0/0/0 1EB6 Halt 10 10 10 01 04 1 4 000014 0/0/0 14 Halt 70 10 75 10 7C 0 V , 00050C 0/0/0 50C Halt 70 10 67 10 02 0 X 2 000702 0/0/0 702 Halt 58 10 07 10 13 Q 7 3 080703 8/0/0 703 merge constant length 70 10 04 10 7A 0 4 ( 00040A 0/0/0 40A Halt 70 10 13 10 5E 0 3 hf 00030E 0/0/0 30E Halt 70 10 04 10 51 0 4 J 000401 0/0/0 401 Halt 40 10 32 10 04 & B 4 000204 0/0/0 204 Halt 70 10 16 10 61 0 6 / 000601 0/0/0 601 Halt 58 10 67 10 54 Q X M 080704 8/0/0 704 merge constant length 70 10 67 10 02 0 X 2 000702 0/0/0 702 Halt 70 10 67 10 58 0 X Q 000708 0/0/0 708 Halt 70 10 76 10 02 0 W 2 000602 0/0/0 602 Halt 70 10 75 10 73 0 V T 000503 0/0/0 503 Halt 70 10 62 10 13 0 S 3 000203 0/0/0 203 Halt 08 10 16 10 58 8 6 Q 080608 8/0/0 608 merge constant length 08 10 13 10 4A 8 3 # 08030A 8/0/0 30A merge constant length 08 10 13 10 43 8 3 L 080303 8/0/0 303 merge constant length 58 10 13 10 51 Q 3 J 080301 8/0/0 301 merge constant length 10 10 62 10 7C S , 00020C 0/0/0 20C Halt 10 10 02 10 7A 2 ( 00020A 0/0/0 20A Halt 70 10 62 10 6D 0 S ; 00020D 0/0/0 20D Halt 40 10 26 10 6D & F ; 00060D 0/0/0 60D Halt 40 10 46 10 75 & O V 000605 0/0/0 605 Halt 40 10 62 10 10 & S 000200 0/0/0 200 Halt 58 10 52 10 10 Q K 080200 8/0/0 200 merge constant length 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 40 10 10 & 000000 0/0/0 0 Halt 40 10 40 10 10 & & 000000 0/0/0 0 Halt 16 08 10 10 19 6 8 9 068009 6/1/0 9 select (N) 02 01 1F 1C 16 2 1 £ + 6 021FC6 2/0/0 1FC6 transfer (A) to N 10 01 1F 0E 10 1 £ . 001FE0 0/0/0 1FE0 Halt 38 19 1F 1C 16 H 9 £ + 6 189FC6 24/1/0 1FC6 unconditional jump 10 10 20 10 10 - 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 1F 10 29 £ I 000F09 0/0/0 F09 Halt 6E 00 00 00 00 be 10 01 0E 0B 16 1 . 11 6 001EB6 0/0/0 1EB6 Halt 10 01 0E 0B 16 1 . 11 6 001EB6 0/0/0 1EB6 Halt 10 01 1F 0D 10 1 £ : 001FD0 0/0/0 1FD0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 01 0E 0B 16 1 . 11 6 001EB6 0/0/0 1EB6 Halt 10 10 10 10 1F £ 00000F 0/0/0 F Halt 10 10 10 10 01 1 000001 0/0/0 1 Halt 10 10 10 10 01 1 000001 0/0/0 1 Halt 10 10 10 10 13 3 000003 0/0/0 3 Halt 01 04 0B 16 01 1 4 11 6 1 014B61 1/0/2 B61 round off 16 01 1F 19 04 6 1 £ 9 4 061F94 6/0/0 1F94 select (N) 02 10 10 08 01 2 8 1 020081 2/0/0 81 transfer (A) to N 01 1A 10 10 10 1 10 01A000 1/1/1 0 add literal address 16 01 1F 01 0E 6 1 £ 1 . 061F1E 6/0/0 1F1E select (N) 6E 00 00 00 00 be 1A 02 01 1F 01 10 2 1 £ 1 0A21F1 10/0/1 1F1 multiply and add 0D 29 0E 10 01 : I . 1 0D9E01 13/1/0 1E01 divide uniform radix 10 29 1C 10 01 I + 1 009C01 0/1/0 1C01 copy registers 10 3B 01 0E 0D * 1 . : 00B1ED 0/1/1 11ED replace registers 13 16 08 10 08 3 6 8 8 036808 3/0/3 808 copy (A) to N 10 02 19 1F 0B 2 9 £ 11 0029FB 0/0/1 9FB Invalid 16 2A 0B 1F 1A 6 = 11 £ 10 06ABFA 6/1/1 BFA select (N) 08 37 1A 10 10 8 G 10 087A00 8/0/3 1A00 merge constant length 10 29 02 10 10 I 2 009200 0/1/0 1200 copy registers 02 38 19 0E 1C 2 H 9 . + 0289EC 2/1/0 9EC transfer (A) to N 01 2A 0B 1F 19 1 = 11 £ 9 01ABF9 1/1/1 BF9 add literal address 16 02 1A 10 10 6 2 10 062A00 6/0/1 A00 select (N) 10 29 02 10 10 I 2 009200 0/1/0 1200 copy registers 02 38 19 0E 1C 2 H 9 . + 0289EC 2/1/0 9EC transfer (A) to N 15 6E 00 00 00 5 be 05E000 5/1/3 0 subtract (N) from (A) 1C 08 2A 0B 1F + 8 = 11 £ 0C8ABF 12/1/0 ABF convert 19 08 02 1A 10 9 8 2 10 0982A0 9/1/0 2A0 multiply uniform radix 10 10 29 02 10 I 2 000920 0/0/0 920 Halt 10 02 38 19 0E 2 H 9 . 00289E 0/0/1 89E Invalid 1C 19 2A 0B 1F + 9 = 11 £ 0C9ABF 12/1/0 1ABF convert 19 1A 16 01 1F 9 10 6 1 £ 09A61F 9/1/1 61F multiply uniform radix 19 15 37 1A 10 9 5 G 10 0957A0 9/0/2 17A0 multiply uniform radix 10 10 29 02 10 I 2 000920 0/0/0 920 Halt 10 02 38 19 0E 2 H 9 . 00289E 0/0/1 89E Invalid 1C 0E 16 19 1F + . 6 9 £ 0CE69F 12/1/3 69F convert 0B 16 02 08 10 11 6 2 8 0B6280 11/0/3 280 multiply and subtract 08 10 02 10 10 8 2 080200 8/0/0 200 merge constant length 10 19 02 10 10 9 2 009200 0/1/0 1200 copy registers 01 01 02 10 10 1 1 2 011200 1/0/0 1200 table look up 01 19 6E 00 00 1 9 be 019E00 1/1/0 1E00 table look up 0E 0D 16 38 19 . : 6 H 9 0ED689 14/1/2 1689 replace selected bits 0E 0D 0E 29 0B . : . I 11 0EDE9B 14/1/2 1E9B replace selected bits 1F 1F 1F 16 01 £ £ £ 6 1 0FFF61 15/1/3 1F61 collate and add 1F 0B 13 3B 01 £ 11 3 * 1 0FB3B1 15/1/1 13B1 collate and add 0E 0B 08 02 01 . 11 8 2 1 0EB821 14/1/1 1821 replace selected bits 1F 0B 1A 38 19 £ 11 10 H 9 0FBA89 15/1/1 1A89 collate and add 1C 04 16 10 10 + 4 6 0C4600 12/0/2 600 convert 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 29 1C I + 00009C 0/0/0 9C Halt 10 10 01 02 01 1 2 1 000121 0/0/0 121 Halt 1F 0B 10 29 1C £ 11 I + 0FB09C 15/1/1 109C collate and add 10 10 02 02 01 2 2 1 000221 0/0/0 221 Halt 1F 0B 01 29 1C £ 11 1 I + 0FB19C 15/1/1 119C collate and add 10 10 04 02 01 4 2 1 000421 0/0/0 421 Halt 1F 0B 02 6E 00 £ 11 2 be 0FB2E0 15/1/1 12E0 collate and add 01 0E 0E 04 29 1 . . 4 I 01EE49 1/1/3 E49 select literal address 1C 10 10 08 02 + 8 2 0C0082 12/0/0 82 convert 01 1F 0B 13 38 1 £ 11 3 H 01FB38 1/1/3 1B38 select literal address 19 0E 0E 08 10 9 . . 8 09EE80 9/1/3 E80 multiply uniform radix 10 10 10 10 38 H 000008 0/0/0 8 Halt 0D 1F 0B 10 16 : £ 11 6 0DFB06 13/1/3 1B06 divide uniform radix 01 1F 15 15 02 1 £ 5 5 2 01F552 1/1/3 1552 select literal address 01 1F 15 04 38 1 £ 5 4 H 01F548 1/1/3 1548 select literal address 0D 1F 0B 10 16 : £ 11 6 0DFB06 13/1/3 1B06 divide uniform radix 01 1F 08 16 02 1 £ 8 6 2 01F862 1/1/3 1862 select literal address 01 1F 08 15 16 1 £ 8 5 6 01F856 1/1/3 1856 select literal address 01 1F 19 1C 38 1 £ 9 + H 01F9C8 1/1/3 19C8 select literal address 1C 10 08 10 02 + 8 2 0C0802 12/0/0 802 convert 10 10 04 10 16 4 6 000406 0/0/0 406 Halt 01 1F 19 0D 6E 1 £ 9 : be 01F9DE 1/1/3 19DE select literal address 10 01 0E 1F 02 1 . £ 2 001EF2 0/0/0 1EF2 Halt 02 10 10 16 07 2 6 7 020067 2/0/0 67 transfer (A) to N 38 1C 10 08 10 H + 8 18C080 24/1/2 80 modify address of next 2A 08 10 10 10 = 8 1A8000 26/1/0 0 test route N1 38 19 1F 10 01 H 9 £ 1 189F01 24/1/0 1F01 unconditional jump 38 19 1F 10 13 H 9 £ 3 189F03 24/1/0 1F03 unconditional jump 38 19 0E 1F 19 H 9 . £ 9 189EF9 24/1/0 1EF9 unconditional jump 10 10 10 10 07 7 000007 0/0/0 7 Halt 02 01 1F 0B 1A 2 1 £ 11 10 021FBA 2/0/0 1FBA transfer (A) to N 38 1C 10 16 07 H + 6 7 18C067 24/1/2 67 modify address of next 02 08 10 01 0E 2 8 1 . 02801E 2/1/0 1E transfer (A) to N 38 1C 10 08 10 H + 8 18C080 24/1/2 80 modify address of next 01 16 19 1C 10 1 6 9 + 0169C0 1/0/3 9C0 interchange area addresses 38 1C 10 08 10 H + 8 18C080 24/1/2 80 modify address of next 23 02 10 10 10 C 2 132000 19/0/1 0 input one block/reset timer 6E 00 00 00 00 be 10 38 19 1F 10 H 9 £ 0089F0 0/1/0 9F0 copy registers 15 10 10 10 10 5 050000 5/0/0 0 subtract (N) from (A) 13 38 19 0E 1F 3 H 9 . £ 0389EF 3/1/0 9EF copy (A) to N 13 01 1A 10 10 3 1 10 031A00 3/0/0 1A00 copy (A) to N 10 38 19 0E 1F H 9 . £ 0089EF 0/1/0 9EF copy registers 13 38 1C 10 08 3 H + 8 038C08 3/1/0 C08 copy (A) to N 10 2A 08 10 10 = 8 00A800 0/1/1 800 replace registers 10 10 10 10 10 000000 0/0/0 0 Halt 19 38 19 1F 10 9 H 9 £ 0989F0 9/1/0 9F0 multiply uniform radix 15 38 19 1F 01 5 H 9 £ 1 0589F1 5/1/0 9F1 subtract (N) from (A) 04 38 19 0E 1F 4 H 9 . £ 0489EF 4/1/0 9EF add (N) to (A) 13 02 01 1F 0B 3 2 1 £ 11 0321FB 3/0/1 1FB copy (A) to N 1A 38 1C 10 16 10 H + 6 0A8C06 10/1/0 C06 multiply and add 07 02 08 10 01 7 2 8 1 072801 7/0/1 801 augment (N) by (A) 0E 6E 00 00 00 . be 0EE000 14/1/3 0 replace selected bits 10 0E 38 1C 10 . H + 00E8C0 0/1/3 8C0 Invalid 08 10 01 16 19 8 1 6 9 080169 8/0/0 169 merge constant length 1C 10 29 0E 08 + I . 8 0C09E8 12/0/0 9E8 convert 10 10 38 1C 10 H + 0008C0 0/0/0 8C0 Halt 08 10 23 02 10 8 C 2 080320 8/0/0 320 merge constant length 10 10 38 19 1F H 9 £ 00089F 0/0/0 89F Halt 01 16 10 10 10 1 6 016000 1/0/3 0 interchange area addresses 10 0B 38 19 0E 11 H 9 . 00B89E 0/1/1 189E replace registers 1F 04 10 15 1F £ 4 5 £ 0F405F 15/0/2 5F collate and add 1A 16 1F 10 10 10 6 £ 0A6F00 10/0/3 F00 multiply and add 16 07 13 01 1F 6 7 3 1 £ 06731F 6/0/3 131F select (N) 0B 08 04 01 1F 11 8 4 1 £ 0B841F 11/1/0 41F multiply and subtract 1A 13 02 01 1F 10 3 2 1 £ 0A321F 10/0/1 121F multiply and add 0B 19 16 01 1F 11 9 6 1 £ 0B961F 11/1/0 161F multiply and subtract 1A 02 6E 00 00 10 2 be 0A2E00 10/0/1 E00 multiply and add 1F 01 1C 02 01 £ 1 + 2 1 0F1C21 15/0/0 1C21 collate and add 1F 0B 04 10 10 £ 11 4 0FB400 15/1/1 1400 collate and add 10 10 10 38 19 H 9 000089 0/0/0 89 Halt 1F 02 01 38 19 £ 2 1 H 9 0F2189 15/0/1 189 collate and add 1F 13 1A 38 19 £ 3 10 H 9 0F3A89 15/0/1 1A89 collate and add 1C 04 1A 16 01 + 4 10 6 1 0C4A61 12/0/2 A61 convert 1F 1A 10 07 01 £ 10 7 1 0FA071 15/1/1 71 collate and add 1F 0B 08 38 1C £ 11 8 H + 0FB88C 15/1/1 188C collate and add 10 16 07 16 08 6 7 6 8 006768 0/0/3 768 set radix 10 10 13 15 01 3 5 1 000351 0/0/0 351 Halt 1F 1A 02 02 01 £ 10 2 2 1 0FA221 15/1/1 221 collate and add 1F 1A 1C 38 1C £ 10 + H + 0FAC8C 15/1/1 C8C collate and add 10 16 07 16 08 6 7 6 8 006768 0/0/3 768 set radix 10 10 15 02 01 5 2 1 000521 0/0/0 521 Halt 1F 1A 0D 6E 00 £ 10 : be 0FADE0 15/1/1 DE0 collate and add 01 1F 02 1A 38 1 £ 2 10 H 01F2A8 1/1/3 12A8 select literal address 1C 10 16 07 16 + 6 7 6 0C0676 12/0/0 676 convert 08 10 10 0B 02 8 11 2 0800B2 8/0/0 B2 merge constant length 01 1F 1A 0E 38 1 £ 10 . H 01FAE8 1/1/3 1AE8 select literal address 1C 10 16 07 16 + 6 7 6 0C0676 12/0/0 676 convert 08 10 10 0D 02 8 : 2 0800D2 8/0/0 D2 merge constant length 01 1F 1A 1F 10 1 £ 10 £ 01FAF0 1/1/3 1AF0 select literal address 15 1F 1A 1C 1F 5 £ 10 + £ 05FACF 5/1/3 1ACF subtract (N) from (A) 01 1F 1A 02 02 1 £ 10 2 2 01FA22 1/1/3 1A22 select literal address 01 1F 0B 15 38 1 £ 11 5 H 01FB58 1/1/3 1B58 select literal address 1C 10 16 07 16 + 6 7 6 0C0676 12/0/0 676 convert 08 10 10 07 02 8 7 2 080072 8/0/0 72 merge constant length 01 1F 0B 1C 38 1 £ 11 + H 01FBC8 1/1/3 1BC8 select literal address 1C 10 16 07 16 + 6 7 6 0C0676 12/0/0 676 convert 08 10 10 19 6E 8 9 be 08009E 8/0/0 9E merge constant length 10 01 1F 13 08 1 £ 3 8 001F38 0/0/0 1F38 Halt 04 01 1F 1A 01 4 1 £ 10 1 041FA1 4/0/0 1FA1 add (N) to (A) 02 01 1F 0B 0D 2 1 £ 11 : 021FBD 2/0/0 1FBD transfer (A) to N 16 19 1F 1A 04 6 9 £ 10 4 069FA4 6/1/0 1FA4 select (N) 38 1C 10 16 07 H + 6 7 18C067 24/1/2 67 modify address of next 15 08 10 01 0E 5 8 1 . 05801E 5/1/0 1E subtract (N) from (A) 3B 01 1F 04 10 * 1 £ 4 1B1F40 27/0/0 1F40 jump A = Z 10 10 10 10 0D : 00000D 0/0/0 D Halt 38 19 0E 1F 13 H 9 . £ 3 189EF3 24/1/0 1EF3 unconditional jump 38 1C 10 16 07 H + 6 7 18C067 24/1/2 67 modify address of next 16 08 10 10 01 6 8 1 068001 6/1/0 1 select (N) 15 01 1F 1A 02 5 1 £ 10 2 051FA2 5/0/0 1FA2 subtract (N) from (A) 15 01 1F 1A 1C 5 1 £ 10 + 051FAC 5/0/0 1FAC subtract (N) from (A) 3B 01 1F 04 07 * 1 £ 4 7 1B1F47 27/0/0 1F47 jump A = Z 10 10 10 10 1F £ 00000F 0/0/0 F Halt 6E 00 00 00 00 be 16 38 19 0E 1F 6 H 9 . £ 0689EF 6/1/0 9EF select (N) 13 38 0D 1F 0B 3 H : £ 11 038DFB 3/1/0 DFB copy (A) to N 08 16 08 10 10 8 6 8 086800 8/0/3 800 merge constant length 02 15 19 1F 19 2 5 9 £ 9 0259F9 2/0/2 19F9 transfer (A) to N 0E 3B 13 1F 15 . * 3 £ 5 0EB3F5 14/1/1 13F5 replace selected bits 08 02 01 1F 0B 8 2 1 £ 11 0821FB 8/0/1 1FB merge constant length 04 16 01 1F 0B 4 6 1 £ 11 0461FB 4/0/3 1FB add (N) to (A) 15 3B 01 1F 15 5 * 1 £ 5 05B1F5 5/1/1 11F5 subtract (N) from (A) 10 10 10 10 01 1 000001 0/0/0 1 Halt 1F 38 19 0E 1F £ H 9 . £ 0F89EF 15/1/0 9EF collate and add 13 16 01 1F 01 3 6 1 £ 1 0361F1 3/0/3 1F1 copy (A) to N 1F 02 01 1F 01 £ 2 1 £ 1 0F21F1 15/0/1 1F1 collate and add 0D 38 0D 1F 0B : H : £ 11 0D8DFB 13/1/0 DFB divide uniform radix 08 16 08 10 10 8 6 8 086800 8/0/3 800 merge constant length 13 6E 00 00 00 3 be 03E000 3/1/3 0 copy (A) to N 15 04 10 10 10 5 4 054000 5/0/2 0 subtract (N) from (A) 10 10 38 19 1F H 9 £ 00089F 0/0/0 89F Halt 15 0B 38 19 0D 5 11 H 9 : 05B89D 5/1/1 189D subtract (N) from (A) 10 10 38 19 0D H 9 : 00089D 0/0/0 89D Halt 04 1A 16 01 1F 4 10 6 1 £ 04A61F 4/1/1 61F add (N) to (A) 1A 02 02 01 1F 10 2 2 1 £ 0A221F 10/0/1 21F multiply and add 0B 04 38 19 1F 11 4 H 9 £ 0B489F 11/0/2 89F multiply and subtract 15 10 38 0D 1F 5 H : £ 0508DF 5/0/0 8DF subtract (N) from (A) 1A 1C 02 10 10 10 + 2 0AC200 10/1/2 200 multiply and add 10 01 16 01 1F 1 6 1 £ 00161F 0/0/0 161F Halt 0B 04 3B 13 1F 11 4 * 3 £ 0B4B3F 11/0/2 B3F multiply and subtract 16 08 38 0D 1F 6 8 H : £ 0688DF 6/1/0 8DF select (N) 1A 1C 16 10 10 10 + 6 0AC600 10/1/2 600 multiply and add 10 10 02 01 1F 2 1 £ 00021F 0/0/0 21F Halt 0B 0B 6E 00 00 11 11 be 0BBE00 11/1/1 1E00 multiply and subtract 1F 16 02 15 01 £ 6 2 5 1 0F6251 15/0/3 251 collate and add 1F 1A 02 38 0D £ 10 2 H : 0FA28D 15/1/1 28D collate and add 1F 1A 1C 02 08 £ 10 + 2 8 0FAC28 15/1/1 C28 collate and add 10 10 10 16 01 6 1 000061 0/0/0 61 Halt 1F 0B 0B 38 0D £ 11 11 H : 0FBB8D 15/1/1 1B8D collate and add 1F 1A 1C 02 10 £ 10 + 2 0FAC20 15/1/1 C20 collate and add 10 10 10 16 01 6 1 000061 0/0/0 61 Halt 1F 0B 15 3B 01 £ 11 5 * 1 0FB5B1 15/1/1 15B1 collate and add 1F 16 0D 16 01 £ 6 : 6 1 0F6D61 15/0/3 D61 collate and add 1F 1A 1F 38 0D £ 10 £ H : 0FAF8D 15/1/1 F8D collate and add 1F 1A 1C 37 08 £ 10 + G 8 0FAC78 15/1/1 C78 collate and add 10 10 10 16 19 6 9 000069 0/0/0 69 Halt 1F 0B 1C 3B 01 £ 11 + * 1 0FBCB1 15/1/1 1CB1 collate and add 1F 07 16 2A 0B £ 7 6 = 11 0F76AB 15/0/3 16AB collate and add 1F 0B 1C 6E 00 £ 11 + be 0FBCE0 15/1/1 1CE0 collate and add 01 1F 07 10 16 1 £ 7 6 01F706 1/1/3 1706 select literal address 01 1F 1A 1F 37 1 £ 10 £ G 01FAF7 1/1/3 1AF7 select literal address 1A 10 10 10 29 10 I 0A0009 10/0/0 9 multiply and add 02 10 10 02 38 2 2 H 020028 2/0/0 28 transfer (A) to N 19 1F 07 01 02 9 £ 7 1 2 09F712 9/1/3 1712 multiply uniform radix 19 1F 0B 1C 02 9 £ 11 + 2 09FBC2 9/1/3 1BC2 multiply uniform radix 19 1F 0B 1C 29 9 £ 11 + I 09FBC9 9/1/3 1BC9 multiply uniform radix 0E 04 10 10 16 . 4 6 0E4006 14/0/2 6 replace selected bits 01 1F 1A 02 15 1 £ 10 2 5 01FA25 1/1/3 1A25 select literal address 01 1F 0B 15 02 1 £ 11 5 2 01FB52 1/1/3 1B52 select literal address 01 1F 0B 15 16 1 £ 11 5 6 01FB56 1/1/3 1B56 select literal address 01 1F 1A 1C 04 1 £ 10 + 4 01FAC4 1/1/3 1AC4 select literal address 01 1F 1A 02 13 1 £ 10 2 3 01FA23 1/1/3 1A23 select literal address 01 1F 1A 1C 15 1 £ 10 + 5 01FAC5 1/1/3 1AC5 select literal address 01 1F 1A 0D 6E 1 £ 10 : be 01FADE 1/1/3 1ADE select literal address 10 01 1F 07 0E 1 £ 7 . 001F7E 0/0/0 1F7E Halt 3B 15 1F 08 15 * 5 £ 8 5 1B5F85 27/0/2 1F85 jump A >= Z 16 01 1F 1A 01 6 1 £ 10 1 061FA1 6/0/0 1FA1 select (N) 07 01 1F 0B 08 7 1 £ 11 8 071FB8 7/0/0 1FB8 augment (N) by (A) 16 01 1F 0B 08 6 1 £ 11 8 061FB8 6/0/0 1FB8 select (N) 15 01 1F 0B 19 5 1 £ 11 9 051FB9 5/0/0 1FB9 subtract (N) from (A) 3B 13 1F 04 07 * 3 £ 4 7 1B3F47 27/0/1 1F47 jump A != Z 38 19 1F 10 15 H 9 £ 5 189F05 24/1/0 1F05 unconditional jump 10 10 10 10 10 000000 0/0/0 0 Halt 38 19 1F 08 08 H 9 £ 8 8 189F88 24/1/0 1F88 unconditional jump 38 19 0D 1A 0D H 9 : 10 : 189DAD 24/1/0 1DAD unconditional jump 16 01 1F 0B 02 6 1 £ 11 2 061FB2 6/0/0 1FB2 select (N) 3B 13 0E 0D 07 * 3 . : 7 1B3ED7 27/0/1 1ED7 jump A != Z 16 01 1F 1A 1F 6 1 £ 10 £ 061FAF 6/0/0 1FAF select (N) 32 10 10 10 04 B 4 120004 18/0/0 4 shift logical 6E 00 00 00 00 be 1C 01 1A 10 10 + 1 10 0C1A00 12/0/0 1A00 convert 1A 02 01 1F 0B 10 2 1 £ 11 0A21FB 10/0/1 1FB multiply and add 1A 16 01 1F 1A 10 6 1 £ 10 0A61FA 10/0/3 1FA multiply and add 07 02 10 10 10 7 2 072000 7/0/1 0 augment (N) by (A) 19 16 19 1F 1A 9 6 9 £ 10 0969FA 9/0/3 9FA multiply uniform radix 1A 13 08 10 10 10 3 8 0A3800 10/0/1 1800 multiply and add 1A 02 10 10 10 10 2 0A2000 10/0/1 0 multiply and add 1A 38 08 10 10 10 H 8 0A8800 10/1/0 800 multiply and add 19 10 10 10 02 9 2 090002 9/0/0 2 multiply uniform radix 10 10 10 10 10 000000 0/0/0 0 Halt 1F 10 10 10 10 £ 0F0000 15/0/0 0 collate and add 04 10 01 1C 04 4 1 + 4 0401C4 4/0/0 1C4 add (N) to (A) 16 10 01 1F 1C 6 1 £ + 0601FC 6/0/0 1FC select (N) 10 10 04 10 10 4 000400 0/0/0 400 Halt 10 6E 00 00 00 be 00E000 0/1/3 0 Invalid 19 1A 10 10 10 9 10 09A000 9/1/1 0 multiply uniform radix 1A 10 10 04 10 10 4 0A0040 10/0/0 40 multiply and add 10 10 1F 01 1F £ 1 £ 000F1F 0/0/0 F1F Halt 1C 10 1F 01 1F + £ 1 £ 0C0F1F 12/0/0 F1F convert 0E 10 19 16 19 . 9 6 9 0E0969 14/0/0 969 replace selected bits 16 19 16 19 16 6 9 6 9 6 069696 6/1/0 1696 select (N) 19 16 10 10 10 9 6 096000 9/0/3 0 multiply uniform radix 01 04 10 10 10 1 4 014000 1/0/2 0 round off 10 02 10 10 10 2 002000 0/0/1 0 Invalid 10 01 10 10 10 1 001000 0/0/0 1000 Halt 01 1C 10 10 10 1 + 01C000 1/1/2 0 subtract literal address 10 10 07 0E 10 7 . 0007E0 0/0/0 7E0 Halt 10 10 10 07 1F 7 £ 00007F 0/0/0 7F Halt 1F 1F 2A 07 1F £ £ = 7 £ 0FFA7F 15/1/3 1A7F collate and add 0B 1A 6E 00 00 11 10 be 0BAE00 11/1/1 E00 multiply and subtract 1F 1A 08 10 10 £ 10 8 0FA800 15/1/1 800 collate and add 10 10 10 10 10 000000 0/0/0 0 Halt 10 1A 10 29 0B 10 I 11 00A09B 0/1/1 9B replace registers 1F 1F 1F 2A 13 £ £ £ = 3 0FFFA3 15/1/3 1FA3 collate and add 1F 1A 0E 10 01 £ 10 . 1 0FAE01 15/1/1 E01 collate and add 1C 0E 08 10 01 + . 8 1 0CE801 12/1/3 801 convert 1C 0E 08 10 01 + . 8 1 0CE801 12/1/3 801 convert 0B 07 1A 10 10 11 7 10 0B7A00 11/0/3 1A00 multiply and subtract 10 10 1F 10 10 £ 000F00 0/0/0 F00 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 01 10 10 1 000100 0/0/0 100 Halt 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 01 1F 0B 16 10 1 £ 11 6 01FB60 1/1/3 1B60 select literal address 10 10 01 19 10 1 9 000190 0/0/0 190 Halt 10 10 02 10 10 2 000200 0/0/0 200 Halt 01 1F 1C 1C 10 1 £ + + 01FCC0 1/1/3 1CC0 select literal address 01 1F 0D 1C 1F 1 £ : + £ 01FDCF 1/1/3 1DCF select literal address 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 13 0E 08 10 3 . 8 003E80 0/0/1 1E80 Invalid 10 07 0D 02 10 7 : 2 007D20 0/0/3 1D20 set radix 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 1C + 00000C 0/0/0 C Halt 04 0E 04 02 10 4 . 4 2 04E420 4/1/3 420 add (N) to (A) 10 04 01 04 10 4 1 4 004140 0/0/2 140 replace (B) by (N) 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 6E be 00000E 0/0/0 E Halt 10 01 1F 1C 04 1 £ + 4 001FC4 0/0/0 1FC4 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 38 1C 10 08 10 H + 8 18C080 24/1/2 80 modify address of next 01 16 1F 1C 10 1 6 £ + 016FC0 1/0/3 FC0 interchange area addresses 29 0E 08 10 10 I . 8 19E800 25/1/3 800 conditional Halt 38 1C 10 08 10 H + 8 18C080 24/1/2 80 modify address of next 23 02 10 10 10 C 2 132000 19/0/1 0 input one block/reset timer 02 01 1F 0D 10 2 1 £ : 021FD0 2/0/0 1FD0 transfer (A) to N 15 01 1F 1C 1F 5 1 £ + £ 051FCF 5/0/0 1FCF subtract (N) from (A) 07 10 10 08 10 7 8 070080 7/0/0 80 augment (N) by (A) 38 19 1F 0D 01 H 9 £ : 1 189FD1 24/1/0 1FD1 unconditional jump 10 10 10 04 10 4 000040 0/0/0 40 Halt 10 10 10 01 1C 1 + 00001C 0/0/0 1C Halt 38 19 0E 0B 16 H 9 . 11 6 189EB6 24/1/0 1EB6 unconditional jump 6E 00 00 00 00 be 10 10 01 1F 04 1 £ 4 0001F4 0/0/0 1F4 Halt 10 10 01 1F 04 1 £ 4 0001F4 0/0/0 1F4 Halt 10 10 02 02 0E 2 2 . 00022E 0/0/0 22E Halt 10 10 01 19 10 1 9 000190 0/0/0 190 Halt 10 10 0B 0B 08 11 11 8 000BB8 0/0/0 BB8 Halt 10 10 01 1F 1C 1 £ + 0001FC 0/0/0 1FC Halt 10 10 10 10 0E . 00000E 0/0/0 E Halt 10 01 10 13 07 1 3 7 001037 0/0/0 1037 Halt 10 10 10 10 01 1 000001 0/0/0 1 Halt 10 10 10 10 13 3 000003 0/0/0 3 Halt 02 10 08 16 15 2 8 6 5 020865 2/0/0 865 transfer (A) to N 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 07 1C 1C 7 + + 0007CC 0/0/0 7CC Halt 1F 07 1F 07 1F £ 7 £ 7 £ 0F7F7F 15/0/3 1F7F collate and add 07 1F 07 1F 07 7 £ 7 £ 7 07F7F7 7/1/3 17F7 augment (N) by (A) 6E 00 00 00 00 be 10 10 01 1F 08 1 £ 8 0001F8 0/0/0 1F8 Halt 10 10 10 07 0E 7 . 00007E 0/0/0 7E Halt 07 0E 10 10 10 7 . 07E000 7/1/3 0 augment (N) by (A) 16 16 16 16 16 6 6 6 6 6 066666 6/0/3 666 select (N) 38 08 01 1F 1C H 8 1 £ + 1881FC 24/1/0 1FC unconditional jump 10 01 1F 1F 1F 1 £ £ £ 001FFF 0/0/0 1FFF Halt 16 10 01 1F 0B 6 1 £ 11 0601FB 6/0/0 1FB select (N) 02 10 10 10 10 2 020000 2/0/0 0 transfer (A) to N 10 16 01 1F 1A 6 1 £ 10 0061FA 0/0/3 1FA set radix 2A 1A 01 1F 04 = 10 1 £ 4 1AA1F4 26/1/1 1F4 set modification register 01 0E 04 10 10 1 . 4 01E400 1/1/3 400 select literal address 38 16 10 08 01 H 6 8 1 186081 24/0/3 81 modify address of next 02 10 10 04 10 2 4 020040 2/0/0 40 transfer (A) to N 16 08 01 1F 08 6 8 1 £ 8 0681F8 6/1/0 1F8 select (N) 02 1A 04 10 04 2 10 4 4 02A404 2/1/1 404 transfer (A) to N 6E 00 00 00 00 be 10 10 02 10 16 2 6 000206 0/0/0 206 Halt 29 02 10 10 02 I 2 2 192002 25/0/1 2 step on and test 38 08 02 10 04 H 8 2 4 188204 24/1/0 204 unconditional jump 2A 1A 01 1F 04 = 10 1 £ 4 1AA1F4 26/1/1 1F4 set modification register 16 08 01 1F 16 6 8 1 £ 6 0681F6 6/1/0 1F6 select (N) 02 1A 04 10 02 2 10 4 2 02A402 2/1/1 402 transfer (A) to N 01 0E 10 10 01 1 . 1 01E001 1/1/3 1 select literal address 07 08 04 10 01 7 8 4 1 078401 7/1/0 401 augment (N) by (A) 38 16 10 08 01 H 6 8 1 186081 24/0/3 81 modify address of next 23 10 10 10 10 C 130000 19/0/0 0 output 2A 10 02 01 13 = 2 1 3 1A0213 26/0/0 213 enter subroutine 29 02 10 10 02 I 2 2 192002 25/0/1 2 step on and test 38 08 02 10 19 H 8 2 9 188209 24/1/0 209 unconditional jump 38 08 01 1F 1C H 8 1 £ + 1881FC 24/1/0 1FC unconditional jump 10 10 10 10 10 000000 0/0/0 0 Halt 6E 00 00 00 00 be 10 10 02 01 04 2 1 4 000214 0/0/0 214 Halt 38 16 10 08 01 H 6 8 1 186081 24/0/3 81 modify address of next 2A 08 10 10 10 = 8 1A8000 26/1/0 0 test route N1 10 10 10 10 01 1 000001 0/0/0 1 Halt 38 08 02 01 04 H 8 2 1 4 188214 24/1/0 214 unconditional jump 38 08 02 01 1F H 8 2 1 £ 18821F 24/1/0 21F unconditional jump 38 08 02 01 0B H 8 2 1 11 18821B 24/1/0 21B unconditional jump 2A 02 02 01 13 = 2 2 1 3 1A2213 26/0/1 213 leave subroutine 38 16 10 08 01 H 6 8 1 186081 24/0/3 81 modify address of next 23 1A 10 10 10 C 10 13A000 19/1/1 0 rewind 10 10 10 10 02 2 000002 0/0/0 2 Halt 38 08 01 1F 1C H 8 1 £ + 1881FC 24/1/0 1FC unconditional jump 01 0E 13 10 10 1 . 3 01E300 1/1/3 300 select literal address 38 16 10 08 13 H 6 8 3 186083 24/0/3 83 modify address of next 02 10 10 04 10 2 4 020040 2/0/0 40 transfer (A) to N 6E 00 00 00 00 be 10 10 02 02 02 2 2 2 000222 0/0/0 222 Halt 16 08 04 10 10 6 8 4 068400 6/1/0 400 select (N) 02 08 13 10 02 2 8 3 2 028302 2/1/0 302 transfer (A) to N 16 10 01 1F 19 6 1 £ 9 0601F9 6/0/0 1F9 select (N) 02 10 13 10 15 2 3 5 020305 2/0/0 305 transfer (A) to N 38 16 10 08 13 H 6 8 3 186083 24/0/3 83 modify address of next 23 10 10 10 10 C 130000 19/0/0 0 output 38 16 10 08 13 H 6 8 3 186083 24/0/3 83 modify address of next 2A 08 10 10 10 = 8 1A8000 26/1/0 0 test route N1 10 10 10 10 13 3 000003 0/0/0 3 Halt 38 08 02 02 08 H 8 2 2 8 188228 24/1/0 228 unconditional jump 10 10 10 10 04 4 000004 0/0/0 4 Halt 10 10 10 10 15 5 000005 0/0/0 5 Halt 38 08 02 01 10 H 8 2 1 188210 24/1/0 210 unconditional jump 10 10 10 10 10 000000 0/0/0 0 Halt 6E 00 00 00 00 be 6E 00 00 00 00 be 60 70 00 00 00 0 0 000000 0/0/0 0 Halt File: old-paper-tapes/Bindec.leo 61 61 61 61 61 / / / / / 011111 1/0/0 1111 table look up 70 08 70 70 70 0 8 0 0 0 008000 0/1/0 0 copy registers 32 01 01 70 01 B 1 1 0 1 121101 18/0/0 1101 shift logical 6E 00 00 00 00 be 57 49 46 37 54 P R O G M 079674 7/1/0 1674 augment (N) by (A) 6D 70 08 7F 70 ; 0 8 er 0 0D08F0 13/0/0 8F0 divide uniform radix 6D 70 16 6D 6D ; 0 6 ; ; 0D06DD 13/0/0 6DD divide uniform radix 32 7F 29 45 61 B er I N / 12F951 18/1/3 1951 shift binary 34 25 23 10 34 D E C D 145304 20/0/2 1304 add floating point 29 23 73 29 46 I C T I O 193396 25/0/1 1396 step on and test 45 7F 31 49 68 N er A R Y 05F198 5/1/3 1198 subtract (N) from (A) 6E 00 00 00 00 be 25 45 73 49 68 E N T R Y 155398 21/0/2 1398 transfer floating point 6D 7F 01 70 70 ; er 1 0 0 0DF100 13/1/3 1100 divide uniform radix 6D 13 6D 37 34 ; 3 ; G D 0D3D74 13/0/1 1D74 divide uniform radix 57 6D 76 25 45 P ; W E N 07D655 7/1/2 1655 augment (N) by (A) 34 68 6D 31 45 D Y ; A N 148D15 20/1/0 D15 subtract floating point 34 10 49 46 62 D R O S 140962 20/0/0 962 add floating point 25 54 31 49 68 E M A R Y 154198 21/0/2 198 transfer floating point 6E 00 00 00 00 be 7F 6D 31 01 6D er ; A 1 ; 0FD11D 15/1/2 111D collate and add 01 19 6D 6D 01 1 9 ; ; 1 019DD1 1/1/0 1DD1 table look up 19 02 6D 02 16 9 2 ; 2 6 092D26 9/0/1 D26 multiply uniform radix 6E 00 00 00 00 be 23 38 31 57 62 C H A P S 138172 19/1/0 172 step back 6D 01 6D 01 70 ; 1 ; 1 0 0D1D10 13/0/0 1D10 divide uniform radix 70 6E 00 00 00 0 be 00E000 0/1/3 0 Invalid 6D 01 6D 02 16 ; 1 ; 2 6 0D1D26 13/0/0 1D26 divide uniform radix 6D 01 6E 00 00 ; 1 be 0D1E00 13/0/0 1E00 divide uniform radix 57 49 46 23 49 P R O C R 079639 7/1/0 1639 augment (N) by (A) 6D 01 70 70 6D ; 1 0 0 ; 0D100D 13/0/0 100D divide uniform radix 23 31 43 23 64 C A L C U 131334 19/0/0 1334 output 43 31 73 25 6E L A T E be 03135E 3/0/0 135E copy (A) to N 6D 04 70 6D 31 ; 4 0 ; A 0D40D1 13/0/2 D1 divide uniform radix 01 6D 6D 6D 6D 1 ; ; ; ; 01DDDD 1/1/2 1DDD subtract literal address 6D 57 49 29 45 ; P R I N 0D7995 13/0/3 1995 divide uniform radix 73 25 49 6E 00 T E R be 0359E0 3/0/2 19E0 copy (A) to N 01 6D 15 02 6D 1 ; 5 2 ; 01D52D 1/1/2 152D subtract literal address 01 6D 6D 6D 6D 1 ; ; ; ; 01DDDD 1/1/2 1DDD subtract literal address 6D 25 34 29 73 ; E D I T 0D5493 13/0/2 1493 divide uniform radix 10 43 29 45 25 L I N E 003955 0/0/1 1955 Invalid 6E 00 00 00 00 be 02 6D 23 6D 02 2 ; C ; 2 02D3D2 2/1/2 13D2 transfer (A) to N 70 70 6E 00 00 0 0 be 000E00 0/0/0 E00 Halt 13 6D 04 13 6D 3 ; 4 3 ; 03D43D 3/1/2 143D copy (A) to N 31 01 6D 6D 6D A 1 ; ; ; 111DDD 17/0/0 1DDD special select 6D 6D 7F 46 64 ; ; er O U 0DDF64 13/1/2 1F64 divide uniform radix 73 57 64 73 10 T P U T 037430 3/0/3 1430 copy (A) to N 32 43 46 23 52 B L O C K 123632 18/0/1 1632 shift arithmetic 6E 00 00 00 00 be 04 6D 23 6D 01 4 ; C ; 1 04D3D1 4/1/2 13D1 add (N) to (A) 6E 00 00 00 00 be 15 6D 01 70 6D 5 ; 1 0 ; 05D10D 5/1/2 110D subtract (N) from (A) 6D 6D 6D 6D 02 ; ; ; ; 2 0DDDD2 13/1/2 1DD2 divide uniform radix 6D 62 73 25 57 ; S T E P 0D2357 13/0/1 357 divide uniform radix 10 23 46 64 45 C O U N 003645 0/0/1 1645 Invalid 73 25 49 6E 00 T E R be 0359E0 3/0/2 19E0 copy (A) to N 16 6D 7F 04 6D 6 ; er 4 ; 06DF4D 6/1/2 1F4D select (N) 01 70 01 6D 02 1 0 1 ; 2 0101D2 1/0/0 1D2 table look up 6E 00 00 00 00 be 07 6D 01 02 13 7 ; 1 2 3 07D123 7/1/2 1123 augment (N) by (A) 6D 6D 02 6D 6D ; ; 2 ; ; 0DD2DD 13/1/2 12DD divide uniform radix 6D 6D 62 73 25 ; ; S T E 0DD235 13/1/2 1235 divide uniform radix 7F 57 10 29 45 er P I N 0F7095 15/0/3 1095 collate and add 34 29 49 25 23 D I R E C 149953 20/1/0 1953 subtract floating point 73 6E 00 00 00 T be 03E000 3/1/3 0 copy (A) to N 08 6D 01 70 70 8 ; 1 0 0 08D100 8/1/2 1100 merge variable length 6D 01 70 01 6D ; 1 0 1 ; 0D101D 13/0/0 101D divide uniform radix 6D 6D 6D 6D 54 ; ; ; ; M 0DDDD4 13/1/2 1DD4 divide uniform radix 46 34 29 26 29 O D I F I 064969 6/0/2 969 select (N) 25 7F 49 6E 00 E er R be 15F9E0 21/1/3 19E0 copy floating point 19 6D 07 16 6D 9 ; 7 6 ; 09D76D 9/1/2 176D multiply uniform radix 01 70 70 6D 01 1 0 0 ; 1 0100D1 1/0/0 D1 table look up 6E 00 00 00 00 be 01 70 6D 6D 01 1 0 ; ; 1 010DD1 1/0/0 DD1 table look up 70 01 6D 16 6D 0 1 ; 6 ; 001D6D 0/0/0 1D6D Halt 01 6E 00 00 00 1 be 01E000 1/1/3 0 select literal address 01 01 6D 15 6D 1 1 ; 5 ; 011D5D 1/0/0 1D5D table look up 01 6D 02 6D 01 1 ; 2 ; 1 01D2D1 1/1/2 12D1 subtract literal address 6E 00 00 00 00 be 13 6D 31 01 6D 3 ; A 1 ; 03D11D 3/1/2 111D copy (A) to N 6D 6D 6D 6D 57 ; ; ; ; P 0DDDD7 13/1/2 1DD7 divide uniform radix 49 29 45 73 10 R I N T 099530 9/1/0 1530 multiply uniform radix 32 43 31 45 52 B L A N K 123152 18/0/1 1152 shift arithmetic 6E 00 00 00 00 be 6D 01 6E 00 00 ; 1 be 0D1E00 13/0/0 1E00 divide uniform radix 6D 15 15 6D 01 ; 5 5 ; 1 0D55D1 13/0/2 15D1 divide uniform radix 70 02 6D 6D 01 0 2 ; ; 1 002DD1 0/0/1 DD1 Invalid 6D 6D 02 70 6E ; ; 2 0 be 0DD20E 13/1/2 120E divide uniform radix 01 15 6D 23 6D 1 5 ; C ; 015D3D 1/0/2 1D3D round off 01 6D 02 6D 01 1 ; 2 ; 1 01D2D1 1/1/2 12D1 subtract literal address 6E 00 00 00 00 be 13 6D 31 01 6D 3 ; A 1 ; 03D11D 3/1/2 111D copy (A) to N 6D 6D 6D 6D 49 ; ; ; ; R 0DDDD9 13/1/2 1DD9 divide uniform radix 64 34 25 10 23 U D E C 044503 4/0/2 503 add (N) to (A) 46 54 54 25 45 O M M E N 064455 6/0/2 455 select (N) 73 6E 00 00 00 T be 03E000 3/1/3 0 copy (A) to N 23 6D 01 6E 00 C ; 1 be 13D1E0 19/1/2 11E0 unload 08 6D 04 01 6D 8 ; 4 1 ; 08D41D 8/1/2 141D merge variable length 31 01 6E 00 00 A 1 be 111E00 17/0/0 1E00 special select 6D 01 70 6E 00 ; 1 0 be 0D10E0 13/0/0 10E0 divide uniform radix 70 6D 15 6D 01 0 ; 5 ; 1 00D5D1 0/1/2 15D1 replace (B) by (N) 70 01 7F 6E 00 0 1 er be 001FE0 0/0/0 1FE0 Halt 02 01 6D 15 6D 2 1 ; 5 ; 021D5D 2/0/0 1D5D transfer (A) to N 01 70 01 6D 02 1 0 1 ; 2 0101D2 1/0/0 1D2 table look up 6E 00 00 00 00 be 01 15 01 6D 6D 1 5 1 ; ; 0151DD 1/0/2 11DD round off 6D 6D 6D 6D 64 ; ; ; ; U 0DDDD4 13/1/2 1DD4 divide uniform radix 7F 45 43 46 31 er N L O A 0F5361 15/0/2 1361 collate and add 34 6E 00 00 00 D be 14E000 20/1/3 0 subtract floating point 46 45 62 73 6D O N S T ; 06523D 6/0/2 123D select (N) 01 70 01 6D 70 1 0 1 ; 0 0101D0 1/0/0 1D0 table look up 6E 00 00 00 00 be 7A 32 6B 70 6D ( B ) 0 ; 0A2B0D 10/0/1 B0D multiply and add 32 29 45 31 49 B I N A R 129519 18/1/0 1519 shift logical 68 10 23 73 49 Y C T R 080339 8/0/0 339 merge constant length 6E 00 00 00 00 be 19 04 6E 00 00 9 4 be 094E00 9/0/2 E00 multiply uniform radix 70 6D 34 25 23 0 ; D E C 00D453 0/1/2 1453 replace (B) by (N) 10 23 73 49 6E C T R be 00339E 0/0/1 139E Invalid 13 6D 70 6E 00 3 ; 0 be 03D0E0 3/1/2 10E0 copy (A) to N 6D 70 6E 00 00 ; 0 be 0D0E00 13/0/0 E00 divide uniform radix 70 6E 00 00 00 0 be 00E000 0/1/3 0 Invalid 34 6B 0E 07 0E D ) . 7 . 14BE7E 20/1/1 1E7E subtract floating point 07 0E 6E 00 00 7 . be 07EE00 7/1/3 E00 augment (N) by (A) 07 0E 07 0E 07 7 . 7 . 7 07E7E7 7/1/3 7E7 augment (N) by (A) 6E 00 00 00 00 be 73 6D 01 70 02 T ; 1 0 2 03D102 3/1/2 1102 copy (A) to N 6D 01 6E 00 00 ; 1 be 0D1E00 13/0/0 1E00 divide uniform radix 7F 6D 7A 31 6B er ; ( A ) 0FDA1B 15/1/2 1A1B collate and add 76 29 73 38 10 W I T H 069380 6/1/0 1380 select (N) 6E 00 00 00 00 be 25 10 23 6E 00 E C be 1503E0 21/0/0 3E0 transfer floating point 6D 46 54 57 43 ; O M P L 0D6473 13/0/3 473 divide uniform radix 29 6E 00 00 00 I be 19E000 25/1/3 0 conditional Halt 25 45 73 62 6E E N T S be 15532E 21/0/2 132E transfer floating point 08 6D 10 46 26 8 ; O F 08D066 8/1/2 1066 merge variable length 10 62 6E 00 00 S be 002E00 0/0/1 E00 Invalid 6D 68 62 73 25 ; Y S T E 0D8235 13/1/0 235 divide uniform radix 54 6E 00 00 00 M be 04E000 4/1/3 0 add (N) to (A) 62 10 57 49 46 S P R O 020796 2/0/0 796 transfer (A) to N 6E 00 00 00 00 be 49 31 54 54 6E R A M M be 09144E 9/0/0 144E multiply uniform radix 01 16 6D 29 45 1 6 ; I N 016D95 1/0/3 D95 interchange area addresses 37 10 10 6E 00 G be 1700E0 23/0/0 E0 step on and test 08 6D 7A 34 6B 8 ; ( D ) 08DA4B 8/1/2 1A4B merge variable length 07 0E 70 70 70 7 . 0 0 0 07E000 7/1/3 0 augment (N) by (A) 70 70 70 07 0E 0 0 0 7 . 00007E 0/0/0 7E Halt 6E 00 00 00 00 be 25 6D 02 70 70 E ; 2 0 0 15D200 21/1/2 1200 copy floating point 6D 01 6E 00 00 ; 1 be 0D1E00 13/0/0 1E00 divide uniform radix 70 01 6D 04 6D 0 1 ; 4 ; 001D4D 0/0/0 1D4D Halt 6D 6D 02 6D 6D ; ; 2 ; ; 0DD2DD 13/1/2 12DD divide uniform radix 15 6E 00 00 00 5 be 05E000 5/1/3 0 subtract (N) from (A) 70 01 6D 02 6D 0 1 ; 2 ; 001D2D 0/0/0 1D2D Halt 6D 6D 6D 6D 15 ; ; ; ; 5 0DDDD5 13/1/2 1DD5 divide uniform radix 6D 6D 01 15 6D ; ; 1 5 ; 0DD15D 13/1/2 115D divide uniform radix 04 6E 00 00 00 4 be 04E000 4/1/3 0 add (N) to (A) 70 01 6D 6D 6D 0 1 ; ; ; 001DDD 0/0/0 1DDD Halt 6D 6D 6D 15 6D ; ; ; 5 ; 0DDD5D 13/1/2 1D5D divide uniform radix 6D 15 6E 00 00 ; 5 be 0D5E00 13/0/2 1E00 divide uniform radix 01 70 01 6D 04 1 0 1 ; 4 0101D4 1/0/0 1D4 table look up 6D 6D 6D 01 6D ; ; ; 1 ; 0DDD1D 13/1/2 1D1D divide uniform radix 6D 01 70 6D 6D ; 1 0 ; ; 0D10DD 13/0/0 10DD divide uniform radix 01 15 6D 01 70 1 5 ; 1 0 015D10 1/0/2 1D10 round off 6E 00 00 00 00 be 01 6D 02 6D 6D 1 ; 2 ; ; 01D2DD 1/1/2 12DD subtract literal address 6D 6D 6D 15 6D ; ; ; 5 ; 0DDD5D 13/1/2 1D5D divide uniform radix 6D 6D 04 6E 00 ; ; 4 be 0DD4E0 13/1/2 14E0 divide uniform radix 70 6D 01 70 01 0 ; 1 0 1 00D101 0/1/2 1101 replace (B) by (N) 6D 6D 6D 6D 6D ; ; ; ; ; 0DDDDD 13/1/2 1DDD divide uniform radix 6D 7F 15 6D 6D ; er 5 ; ; 0DF5DD 13/1/3 15DD divide uniform radix 15 7F 6E 00 00 5 er be 05FE00 5/1/3 1E00 subtract (N) from (A) 01 02 6D 01 70 1 2 ; 1 0 012D10 1/0/1 D10 prepare for digit collation 01 6D 04 6D 6D 1 ; 4 ; ; 01D4DD 1/1/2 14DD subtract literal address 6D 01 6D 6D 01 ; 1 ; ; 1 0D1DD1 13/0/0 1DD1 divide uniform radix 70 6D 6D 01 15 0 ; ; 1 5 00DD15 0/1/2 1D15 replace (B) by (N) 6D 01 70 6E 00 ; 1 0 be 0D10E0 13/0/0 10E0 divide uniform radix 01 04 6D 01 70 1 4 ; 1 0 014D10 1/0/2 D10 round off 01 6D 02 6D 6D 1 ; 2 ; ; 01D2DD 1/1/2 12DD subtract literal address 6D 6D 6D 15 6D ; ; ; 5 ; 0DDD5D 13/1/2 1D5D divide uniform radix 6D 6D 04 6E 00 ; ; 4 be 0DD4E0 13/1/2 14E0 divide uniform radix 01 16 6D 01 70 1 6 ; 1 0 016D10 1/0/3 D10 interchange area addresses 01 6D 6D 6D 6D 1 ; ; ; ; 01DDDD 1/1/2 1DDD subtract literal address 6D 6D 15 6D 6D ; ; 5 ; ; 0DD5DD 13/1/2 15DD divide uniform radix 15 6E 00 00 00 5 be 05E000 5/1/3 0 subtract (N) from (A) 01 08 6D 01 70 1 8 ; 1 0 018D10 1/1/0 D10 table look up 01 6D 16 6D 6D 1 ; 6 ; ; 01D6DD 1/1/2 16DD subtract literal address 6D 02 6D 6D 15 ; 2 ; ; 5 0D2DD5 13/0/1 DD5 divide uniform radix 6D 6D 6D 6D 6D ; ; ; ; ; 0DDDDD 13/1/2 1DDD divide uniform radix 6D 7F 01 6E 00 ; er 1 be 0DF1E0 13/1/3 11E0 divide uniform radix 25 45 34 6E 00 E N D be 1554E0 21/0/2 14E0 transfer floating point 61 61 61 61 61 / / / / / 011111 1/0/0 1111 table look up 70 08 70 70 70 0 8 0 0 0 008000 0/1/0 0 copy registers 32 01 01 70 01 B 1 1 0 1 121101 18/0/0 1101 shift logical 6E 00 00 00 00 be 70 6E 00 00 00 0 be 00E000 0/1/3 0 Invalid 03 7F 7F 7F 7F 3 er er er er 03FFFF 3/1/3 1FFF copy (A) to N 7F 7F 7F 7F 7F er er er er er 0FFFFF 15/1/3 1FFF collate and add 7F 7F 7F 7F 7F er er er er er 0FFFFF 15/1/3 1FFF collate and add 7F 7F 7F 7F 7F er er er er er 0FFFFF 15/1/3 1FFF collate and add 7F 7F 7F 7F 7F er er er er er 0FFFFF 15/1/3 1FFF collate and add 7F 7F 7F 7F 7F er er er er er 0FFFFF 15/1/3 1FFF collate and add 7F 7F 7F 7F 7F er er er er er 0FFFFF 15/1/3 1FFF collate and add 7F 7F 7F 7F 7F er er er er er 0FFFFF 15/1/3 1FFF collate and add 7F 7F 7F 7F 7F er er er er er 0FFFFF 15/1/3 1FFF collate and add 7F 7F 7F 7F 7F er er er er er 0FFFFF 15/1/3 1FFF collate and add 7F 7F 00 00 00 er er 0FF000 15/1/3 1000 collate and add File: old-paper-tapes/Oips.leo 58 10 32 10 10 Q B 080200 8/0/0 200 merge constant length 70 10 13 10 10 0 3 000300 0/0/0 300 Halt 38 08 10 04 13 H 8 4 3 188043 24/1/0 43 unconditional jump 10 08 10 10 10 8 008000 0/1/0 0 copy registers 38 1C 10 08 10 H + 8 18C080 24/1/2 80 modify address of next 01 16 1F 08 10 1 6 £ 8 016F80 1/0/3 F80 interchange area addresses 29 0E 08 10 10 I . 8 19E800 25/1/3 800 conditional Halt 38 1C 10 08 10 H + 8 18C080 24/1/2 80 modify address of next 23 02 10 10 10 C 2 132000 19/0/1 0 input one block/reset timer 38 1C 10 08 10 H + 8 18C080 24/1/2 80 modify address of next 2A 08 10 10 10 = 8 1A8000 26/1/0 0 test route N1 10 10 10 02 01 2 1 000021 0/0/0 21 Halt 38 19 1F 1C 0B H 9 £ + 11 189FCB 24/1/0 1FCB unconditional jump 10 10 10 02 13 2 3 000023 0/0/0 23 Halt 10 10 10 01 1C 1 + 00001C 0/0/0 1C Halt 38 0D 1F 0D 1F H : £ : £ 18DFDF 24/1/2 1FDF modify address of next 16 19 1F 0E 13 6 9 £ . 3 069FE3 6/1/0 1FE3 select (N) 38 0D 1F 0D 0E H : £ : . 18DFDE 24/1/2 1FDE modify address of next 02 10 10 10 10 2 020000 2/0/0 0 transfer (A) to N 16 19 1F 0D 1C 6 9 £ : + 069FDC 6/1/0 1FDC select (N) 07 19 1F 0D 0E 7 9 £ : . 079FDE 7/1/0 1FDE augment (N) by (A) 16 01 1F 0D 1F 6 1 £ : £ 061FDF 6/0/0 1FDF select (N) 15 01 1F 0D 10 5 1 £ : 051FD0 5/0/0 1FD0 subtract (N) from (A) 3B 13 1F 0D 01 * 3 £ : 1 1B3FD1 27/0/1 1FD1 jump A != Z 02 01 1F 0D 1F 2 1 £ : £ 021FDF 2/0/0 1FDF transfer (A) to N 38 19 1F 1C 08 H 9 £ + 8 189FC8 24/1/0 1FC8 unconditional jump 10 10 10 10 01 1 000001 0/0/0 1 Halt 10 10 10 10 02 2 000002 0/0/0 2 Halt 10 01 0E 0B 16 1 . 11 6 001EB6 0/0/0 1EB6 Halt 10 10 10 01 04 1 4 000014 0/0/0 14 Halt 70 10 75 10 7C 0 V , 00050C 0/0/0 50C Halt 70 10 67 10 02 0 X 2 000702 0/0/0 702 Halt 58 10 07 10 13 Q 7 3 080703 8/0/0 703 merge constant length 70 10 04 10 7A 0 4 ( 00040A 0/0/0 40A Halt 70 10 13 10 5E 0 3 hf 00030E 0/0/0 30E Halt 70 10 04 10 51 0 4 J 000401 0/0/0 401 Halt 40 10 32 10 04 & B 4 000204 0/0/0 204 Halt 70 10 16 10 61 0 6 / 000601 0/0/0 601 Halt 58 10 67 10 54 Q X M 080704 8/0/0 704 merge constant length 70 10 67 10 02 0 X 2 000702 0/0/0 702 Halt 70 10 67 10 58 0 X Q 000708 0/0/0 708 Halt 70 10 76 10 02 0 W 2 000602 0/0/0 602 Halt 70 10 75 10 73 0 V T 000503 0/0/0 503 Halt 70 10 62 10 13 0 S 3 000203 0/0/0 203 Halt 08 10 16 10 58 8 6 Q 080608 8/0/0 608 merge constant length 08 10 13 10 4A 8 3 # 08030A 8/0/0 30A merge constant length 08 10 13 10 43 8 3 L 080303 8/0/0 303 merge constant length 58 10 13 10 51 Q 3 J 080301 8/0/0 301 merge constant length 10 10 62 10 7C S , 00020C 0/0/0 20C Halt 10 10 02 10 7A 2 ( 00020A 0/0/0 20A Halt 70 10 62 10 6D 0 S ; 00020D 0/0/0 20D Halt 40 10 26 10 6D & F ; 00060D 0/0/0 60D Halt 40 10 46 10 75 & O V 000605 0/0/0 605 Halt 40 10 62 10 10 & S 000200 0/0/0 200 Halt 58 10 52 10 10 Q K 080200 8/0/0 200 merge constant length 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 40 10 10 & 000000 0/0/0 0 Halt 40 10 40 10 10 & & 000000 0/0/0 0 Halt 16 08 10 10 19 6 8 9 068009 6/1/0 9 select (N) 02 01 1F 1C 16 2 1 £ + 6 021FC6 2/0/0 1FC6 transfer (A) to N 10 01 1F 0E 10 1 £ . 001FE0 0/0/0 1FE0 Halt 38 19 1F 1C 16 H 9 £ + 6 189FC6 24/1/0 1FC6 unconditional jump 10 10 20 10 10 - 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 1F 10 29 £ I 000F09 0/0/0 F09 Halt 6E 00 00 00 00 be 10 01 0E 0B 16 1 . 11 6 001EB6 0/0/0 1EB6 Halt 10 01 0E 0B 16 1 . 11 6 001EB6 0/0/0 1EB6 Halt 10 01 1F 0D 10 1 £ : 001FD0 0/0/0 1FD0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 01 0E 0B 16 1 . 11 6 001EB6 0/0/0 1EB6 Halt 10 10 10 10 1F £ 00000F 0/0/0 F Halt 10 10 10 10 01 1 000001 0/0/0 1 Halt 10 10 10 10 01 1 000001 0/0/0 1 Halt 10 10 10 10 13 3 000003 0/0/0 3 Halt 01 04 0B 16 01 1 4 11 6 1 014B61 1/0/2 B61 round off 16 01 1F 19 04 6 1 £ 9 4 061F94 6/0/0 1F94 select (N) 02 10 10 08 01 2 8 1 020081 2/0/0 81 transfer (A) to N 10 10 10 10 01 1 000001 0/0/0 1 Halt 16 01 1F 01 0E 6 1 £ 1 . 061F1E 6/0/0 1F1E select (N) 6E 00 00 00 00 be 10 01 0E 0B 1A 1 . 11 10 001EBA 0/0/0 1EBA Halt 02 01 1F 01 0D 2 1 £ 1 : 021F1D 2/0/0 1F1D transfer (A) to N 29 0E 10 01 10 I . 1 19E010 25/1/3 10 conditional Halt 29 1C 10 01 10 I + 1 19C010 25/1/2 10 interrogate indicators 3B 01 0E 0D 13 * 1 . : 3 1B1ED3 27/0/0 1ED3 jump A = Z 16 08 10 08 10 6 8 8 068080 6/1/0 80 select (N) 02 19 1F 0B 16 2 9 £ 11 6 029FB6 2/1/0 1FB6 transfer (A) to N 2A 0B 1F 1A 08 = 11 £ 10 8 1ABFA8 26/1/1 1FA8 set modification register 37 1A 10 10 10 G 10 17A000 23/1/1 0 copy into tag 29 02 10 10 02 I 2 2 192002 25/0/1 2 step on and test 38 19 0E 1C 01 H 9 . + 1 189EC1 24/1/0 1EC1 unconditional jump 2A 0B 1F 19 16 = 11 £ 9 6 1ABF96 26/1/1 1F96 set modification register 02 1A 10 10 10 2 10 02A000 2/1/1 0 transfer (A) to N 29 02 10 10 02 I 2 2 192002 25/0/1 2 step on and test 38 19 0E 1C 15 H 9 . + 5 189EC5 24/1/0 1EC5 unconditional jump 6E 00 00 00 00 be 10 01 0E 1C 08 1 . + 8 001EC8 0/0/0 1EC8 Halt 2A 0B 1F 19 08 = 11 £ 9 8 1ABF98 26/1/1 1F98 set modification register 02 1A 10 10 10 2 10 02A000 2/1/1 0 transfer (A) to N 29 02 10 10 02 I 2 2 192002 25/0/1 2 step on and test 38 19 0E 1C 19 H 9 . + 9 189EC9 24/1/0 1EC9 unconditional jump 2A 0B 1F 19 1A = 11 £ 9 10 1ABF9A 26/1/1 1F9A set modification register 16 01 1F 19 15 6 1 £ 9 5 061F95 6/0/0 1F95 select (N) 37 1A 10 10 10 G 10 17A000 23/1/1 0 copy into tag 29 02 10 10 02 I 2 2 192002 25/0/1 2 step on and test 38 19 0E 1C 0E H 9 . + . 189ECE 24/1/0 1ECE unconditional jump 16 19 1F 0B 16 6 9 £ 11 6 069FB6 6/1/0 1FB6 select (N) 02 08 10 08 10 2 8 8 028080 2/1/0 80 transfer (A) to N 02 10 10 10 19 2 9 020009 2/0/0 9 transfer (A) to N 02 10 10 01 01 2 1 1 020011 2/0/0 11 transfer (A) to N 02 10 10 01 19 2 1 9 020019 2/0/0 19 transfer (A) to N 6E 00 00 00 00 be 10 01 0E 0D 16 1 . : 6 001ED6 0/0/0 1ED6 Halt 38 19 0E 0D 0E H 9 . : . 189EDE 24/1/0 1EDE unconditional jump 29 0B 1F 1F 1F I 11 £ £ £ 19BFFF 25/1/1 1FFF clear indicators 16 01 1F 0B 13 6 1 £ 11 3 061FB3 6/0/0 1FB3 select (N) 3B 01 0E 0B 08 * 1 . 11 8 1B1EB8 27/0/0 1EB8 jump A = Z 02 01 1F 0B 1A 2 1 £ 11 10 021FBA 2/0/0 1FBA transfer (A) to N 38 19 1C 04 16 H 9 + 4 6 189C46 24/1/0 1C46 unconditional jump 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 29 1C 10 10 01 I + 1 19C001 25/1/2 1 interrogate indicators 02 01 1F 0B 10 2 1 £ 11 021FB0 2/0/0 1FB0 transfer (A) to N 29 1C 10 10 02 I + 2 19C002 25/1/2 2 interrogate indicators 02 01 1F 0B 01 2 1 £ 11 1 021FB1 2/0/0 1FB1 transfer (A) to N 29 1C 10 10 04 I + 4 19C004 25/1/2 4 interrogate indicators 02 01 1F 0B 02 2 1 £ 11 2 021FB2 2/0/0 1FB2 transfer (A) to N 6E 00 00 00 00 be 10 01 0E 0E 04 1 . . 4 001EE4 0/0/0 1EE4 Halt 29 1C 10 10 08 I + 8 19C008 25/1/2 8 interrogate indicators 02 01 1F 0B 13 2 1 £ 11 3 021FB3 2/0/0 1FB3 transfer (A) to N 38 19 0E 0E 08 H 9 . . 8 189EE8 24/1/0 1EE8 unconditional jump 10 10 10 10 10 000000 0/0/0 0 Halt 38 0D 1F 0B 10 H : £ 11 18DFB0 24/1/2 1FB0 modify address of next 16 01 1F 15 15 6 1 £ 5 5 061F55 6/0/0 1F55 select (N) 02 01 1F 15 04 2 1 £ 5 4 021F54 2/0/0 1F54 transfer (A) to N 38 0D 1F 0B 10 H : £ 11 18DFB0 24/1/2 1FB0 modify address of next 16 01 1F 08 16 6 1 £ 8 6 061F86 6/0/0 1F86 select (N) 02 01 1F 08 15 2 1 £ 8 5 021F85 2/0/0 1F85 transfer (A) to N 16 01 1F 19 1C 6 1 £ 9 + 061F9C 6/0/0 1F9C select (N) 38 1C 10 08 10 H + 8 18C080 24/1/2 80 modify address of next 02 10 10 04 10 2 4 020040 2/0/0 40 transfer (A) to N 16 01 1F 19 0D 6 1 £ 9 : 061F9D 6/0/0 1F9D select (N) 6E 00 00 00 00 be 10 01 0E 1F 02 1 . £ 2 001EF2 0/0/0 1EF2 Halt 02 10 10 16 07 2 6 7 020067 2/0/0 67 transfer (A) to N 38 1C 10 08 10 H + 8 18C080 24/1/2 80 modify address of next 2A 08 10 10 10 = 8 1A8000 26/1/0 0 test route N1 38 19 1F 10 01 H 9 £ 1 189F01 24/1/0 1F01 unconditional jump 38 19 1F 10 13 H 9 £ 3 189F03 24/1/0 1F03 unconditional jump 38 19 0E 1F 19 H 9 . £ 9 189EF9 24/1/0 1EF9 unconditional jump 10 10 10 10 07 7 000007 0/0/0 7 Halt 02 01 1F 0B 1A 2 1 £ 11 10 021FBA 2/0/0 1FBA transfer (A) to N 38 1C 10 16 07 H + 6 7 18C067 24/1/2 67 modify address of next 02 08 10 01 0E 2 8 1 . 02801E 2/1/0 1E transfer (A) to N 38 1C 10 08 10 H + 8 18C080 24/1/2 80 modify address of next 01 16 19 1C 10 1 6 9 + 0169C0 1/0/3 9C0 interchange area addresses 38 1C 10 08 10 H + 8 18C080 24/1/2 80 modify address of next 23 02 10 10 10 C 2 132000 19/0/1 0 input one block/reset timer 6E 00 00 00 00 be 10 01 1F 10 10 1 £ 001F00 0/0/0 1F00 Halt 38 19 1F 10 15 H 9 £ 5 189F05 24/1/0 1F05 unconditional jump 10 10 10 10 13 3 000003 0/0/0 3 Halt 38 19 0E 1F 13 H 9 . £ 3 189EF3 24/1/0 1EF3 unconditional jump 10 10 10 10 15 5 000005 0/0/0 5 Halt 38 19 0E 1F 13 H 9 . £ 3 189EF3 24/1/0 1EF3 unconditional jump 38 1C 10 08 10 H + 8 18C080 24/1/2 80 modify address of next 2A 08 10 10 10 = 8 1A8000 26/1/0 0 test route N1 10 10 10 10 19 9 000009 0/0/0 9 Halt 38 19 1F 10 15 H 9 £ 5 189F05 24/1/0 1F05 unconditional jump 38 19 1F 01 04 H 9 £ 1 4 189F14 24/1/0 1F14 unconditional jump 38 19 0E 1F 13 H 9 . £ 3 189EF3 24/1/0 1EF3 unconditional jump 02 01 1F 0B 1A 2 1 £ 11 10 021FBA 2/0/0 1FBA transfer (A) to N 38 1C 10 16 07 H + 6 7 18C067 24/1/2 67 modify address of next 02 08 10 01 0E 2 8 1 . 02801E 2/1/0 1E transfer (A) to N 6E 00 00 00 00 be 01 1F 10 0E 38 1 £ . H 01F0E8 1/1/3 10E8 select literal address 1C 10 08 10 01 + 8 1 0C0801 12/0/0 801 convert 16 19 1C 10 29 6 9 + I 069C09 6/1/0 1C09 select (N) 0E 08 10 10 38 . 8 H 0E8008 14/1/0 8 replace selected bits 1C 10 08 10 23 + 8 C 0C0803 12/0/0 803 convert 02 10 10 10 38 2 H 020008 2/0/0 8 transfer (A) to N 19 1F 01 16 10 9 £ 1 6 09F160 9/1/3 1160 multiply uniform radix 10 10 10 0B 38 11 H 0000B8 0/0/0 B8 Halt 19 0E 1F 04 10 9 . £ 4 09EF40 9/1/3 F40 multiply uniform radix 15 1F 1A 16 1F 5 £ 10 6 £ 05FA6F 5/1/3 1A6F subtract (N) from (A) 10 10 16 07 13 6 7 3 000673 0/0/0 673 Halt 01 1F 0B 08 04 1 £ 11 8 4 01FB84 1/1/3 1B84 select literal address 01 1F 1A 13 02 1 £ 10 3 2 01FA32 1/1/3 1A32 select literal address 01 1F 0B 19 16 1 £ 11 9 6 01FB96 1/1/3 1B96 select literal address 01 1F 1A 02 6E 1 £ 10 2 be 01FA2E 1/1/3 1A2E select literal address 10 01 1F 01 1C 1 £ 1 + 001F1C 0/0/0 1F1C Halt 02 01 1F 0B 04 2 1 £ 11 4 021FB4 2/0/0 1FB4 transfer (A) to N 10 10 10 10 10 000000 0/0/0 0 Halt 38 19 1F 02 01 H 9 £ 2 1 189F21 24/1/0 1F21 unconditional jump 38 19 1F 13 1A H 9 £ 3 10 189F3A 24/1/0 1F3A unconditional jump 38 19 1C 04 1A H 9 + 4 10 189C4A 24/1/0 1C4A unconditional jump 16 01 1F 1A 10 6 1 £ 10 061FA0 6/0/0 1FA0 select (N) 07 01 1F 0B 08 7 1 £ 11 8 071FB8 7/0/0 1FB8 augment (N) by (A) 38 1C 10 16 07 H + 6 7 18C067 24/1/2 67 modify address of next 16 08 10 10 13 6 8 3 068003 6/1/0 3 select (N) 15 01 1F 1A 02 5 1 £ 10 2 051FA2 5/0/0 1FA2 subtract (N) from (A) 02 01 1F 1A 1C 2 1 £ 10 + 021FAC 2/0/0 1FAC transfer (A) to N 38 1C 10 16 07 H + 6 7 18C067 24/1/2 67 modify address of next 16 08 10 10 15 6 8 5 068005 6/1/0 5 select (N) 02 01 1F 1A 0D 2 1 £ 10 : 021FAD 2/0/0 1FAD transfer (A) to N 6E 00 00 00 00 be 1A 38 1C 10 16 10 H + 6 0A8C06 10/1/0 C06 multiply and add 07 16 08 10 10 7 6 8 076800 7/0/3 800 augment (N) by (A) 0B 02 01 1F 1A 11 2 1 £ 10 0B21FA 11/0/1 1FA multiply and subtract 0E 38 1C 10 16 . H + 6 0E8C06 14/1/0 C06 replace selected bits 07 16 08 10 10 7 6 8 076800 7/0/3 800 augment (N) by (A) 0D 02 01 1F 1A : 2 1 £ 10 0D21FA 13/0/1 1FA divide uniform radix 1F 10 15 1F 1A £ 5 £ 10 0F05FA 15/0/0 5FA collate and add 1C 1F 01 1F 1A + £ 1 £ 10 0CF1FA 12/1/3 11FA convert 02 02 01 1F 0B 2 2 1 £ 11 0221FB 2/0/1 1FB transfer (A) to N 15 38 1C 10 16 5 H + 6 058C06 5/1/0 C06 subtract (N) from (A) 07 16 08 10 10 7 6 8 076800 7/0/3 800 augment (N) by (A) 07 02 01 1F 0B 7 2 1 £ 11 0721FB 7/0/1 1FB augment (N) by (A) 1C 38 1C 10 16 + H + 6 0C8C06 12/1/0 C06 convert 07 16 08 10 10 7 6 8 076800 7/0/3 800 augment (N) by (A) 19 6E 00 00 00 9 be 09E000 9/1/3 0 multiply uniform radix 13 08 04 01 1F 3 8 4 1 £ 03841F 3/1/0 41F copy (A) to N 1A 01 02 01 1F 10 1 2 1 £ 0A121F 10/0/0 121F multiply and add 0B 0D 16 19 1F 11 : 6 9 £ 0BD69F 11/1/2 169F multiply and subtract 1A 04 38 1C 10 10 4 H + 0A48C0 10/0/2 8C0 multiply and add 16 07 15 08 10 6 7 5 8 067580 6/0/3 1580 select (N) 01 0E 3B 01 1F 1 . * 1 £ 01EB1F 1/1/3 B1F select literal address 04 10 10 10 10 4 040000 4/0/0 0 add (N) to (A) 10 0D 38 19 0E : H 9 . 00D89E 0/1/2 189E replace (B) by (N) 1F 13 38 1C 10 £ 3 H + 0F38C0 15/0/1 18C0 collate and add 16 07 16 08 10 6 7 6 8 067680 6/0/3 1680 select (N) 10 01 15 01 1F 1 5 1 £ 00151F 0/0/0 151F Halt 1A 02 15 01 1F 10 2 5 1 £ 0A251F 10/0/1 51F multiply and add 1A 1C 3B 01 1F 10 + * 1 £ 0ACB1F 10/1/2 B1F multiply and add 04 07 10 10 10 4 7 047000 4/0/3 1000 add (N) to (A) 10 1F 6E 00 00 £ be 00FE00 0/1/3 1E00 Invalid 1F 04 16 38 19 £ 4 6 H 9 0F4689 15/0/2 689 collate and add 0E 1F 13 38 0D . £ 3 H : 0EF38D 14/1/3 138D replace selected bits 1F 0B 08 16 08 £ 11 8 6 8 0FB868 15/1/1 1868 collate and add 10 10 02 15 19 2 5 9 000259 0/0/0 259 Halt 1F 19 0E 3B 13 £ 9 . * 3 0F9EB3 15/1/0 1EB3 collate and add 1F 15 08 02 01 £ 5 8 2 1 0F5821 15/0/2 1821 collate and add 1F 0B 04 16 01 £ 11 4 6 1 0FB461 15/1/1 1461 collate and add 1F 0B 15 3B 01 £ 11 5 * 1 0FB5B1 15/1/1 15B1 collate and add 1F 15 10 10 10 £ 5 0F5000 15/0/2 1000 collate and add 10 01 1F 38 19 1 £ H 9 001F89 0/0/0 1F89 Halt 0E 1F 13 16 01 . £ 3 6 1 0EF361 14/1/3 1361 replace selected bits 1F 01 1F 02 01 £ 1 £ 2 1 0F1F21 15/0/0 1F21 collate and add 1F 01 0D 38 0D £ 1 : H : 0F1D8D 15/0/0 1D8D collate and add 1F 0B 08 16 08 £ 11 8 6 8 0FB868 15/1/1 1868 collate and add 10 10 13 6E 00 3 be 0003E0 0/0/0 3E0 Halt 01 1F 15 04 10 1 £ 5 4 01F540 1/1/3 1540 select literal address 10 10 10 10 38 H 000008 0/0/0 8 Halt 19 1F 15 0B 38 9 £ 5 11 H 09F5B8 9/1/3 15B8 multiply uniform radix 19 0D 10 10 38 9 : H 09D008 9/1/2 1008 multiply uniform radix 19 0D 04 1A 16 9 : 4 10 6 09D4A6 9/1/2 14A6 multiply uniform radix 01 1F 1A 02 02 1 £ 10 2 2 01FA22 1/1/3 1A22 select literal address 01 1F 0B 04 38 1 £ 11 4 H 01FB48 1/1/3 1B48 select literal address 19 1F 15 10 38 9 £ 5 H 09F508 9/1/3 1508 multiply uniform radix 0D 1F 1A 1C 02 : £ 10 + 2 0DFAC2 13/1/3 1AC2 divide uniform radix 10 10 10 01 16 1 6 000016 0/0/0 16 Halt 01 1F 0B 04 3B 1 £ 11 4 * 01FB4B 1/1/3 1B4B select literal address 13 1F 16 08 38 3 £ 6 8 H 03F688 3/1/3 1688 copy (A) to N 0D 1F 1A 1C 16 : £ 10 + 6 0DFAC6 13/1/3 1AC6 divide uniform radix 10 10 10 10 02 2 000002 0/0/0 2 Halt 01 1F 0B 0B 6E 1 £ 11 11 be 01FBBE 1/1/3 1BBE select literal address 10 01 1F 16 02 1 £ 6 2 001F62 0/0/0 1F62 Halt 15 01 1F 1A 02 5 1 £ 10 2 051FA2 5/0/0 1FA2 subtract (N) from (A) 38 0D 1F 1A 1C H : £ 10 + 18DFAC 24/1/2 1FAC modify address of next 02 08 10 10 10 2 8 028000 2/1/0 0 transfer (A) to N 16 01 1F 0B 0B 6 1 £ 11 11 061FBB 6/0/0 1FBB select (N) 38 0D 1F 1A 1C H : £ 10 + 18DFAC 24/1/2 1FAC modify address of next 02 10 10 10 10 2 020000 2/0/0 0 transfer (A) to N 16 01 1F 0B 15 6 1 £ 11 5 061FB5 6/0/0 1FB5 select (N) 3B 01 1F 16 0D * 1 £ 6 : 1B1F6D 27/0/0 1F6D jump A = Z 16 01 1F 1A 1F 6 1 £ 10 £ 061FAF 6/0/0 1FAF select (N) 38 0D 1F 1A 1C H : £ 10 + 18DFAC 24/1/2 1FAC modify address of next 37 08 10 10 10 G 8 178000 23/1/0 0 copy into tag 16 19 1F 0B 1C 6 9 £ 11 + 069FBC 6/1/0 1FBC select (N) 3B 01 1F 07 16 * 1 £ 7 6 1B1F76 27/0/0 1F76 jump A = Z 2A 0B 1F 0B 1C = 11 £ 11 + 1ABFBC 26/1/1 1FBC set modification register 6E 00 00 00 00 be 10 16 01 1F 1A 6 1 £ 10 0061FA 0/0/3 1FA set radix 1F 37 1A 10 10 £ G 10 0F7A00 15/0/3 1A00 collate and add 10 29 02 10 10 I 2 009200 0/1/0 1200 copy registers 02 38 19 1F 07 2 H 9 £ 7 0289F7 2/1/0 9F7 transfer (A) to N 01 02 19 1F 0B 1 2 9 £ 11 0129FB 1/0/1 9FB prepare for digit collation 1C 02 19 1F 0B + 2 9 £ 11 0C29FB 12/0/1 9FB convert 1C 29 0E 04 10 + I . 4 0C9E40 12/1/0 1E40 convert 10 16 01 1F 1A 6 1 £ 10 0061FA 0/0/3 1FA set radix 02 15 01 1F 0B 2 5 1 £ 11 0251FB 2/0/2 11FB transfer (A) to N 15 02 01 1F 0B 5 2 1 £ 11 0521FB 5/0/1 1FB subtract (N) from (A) 15 16 01 1F 1A 5 6 1 £ 10 0561FA 5/0/3 1FA subtract (N) from (A) 1C 04 01 1F 1A + 4 1 £ 10 0C41FA 12/0/2 1FA convert 02 13 01 1F 1A 2 3 1 £ 10 0231FA 2/0/1 11FA transfer (A) to N 1C 15 01 1F 1A + 5 1 £ 10 0C51FA 12/0/2 11FA convert 0D 6E 00 00 00 : be 0DE000 13/1/3 0 divide uniform radix 07 0E 3B 15 1F 7 . * 5 £ 07EB5F 7/1/3 B5F augment (N) by (A) 08 15 16 01 1F 8 5 6 1 £ 08561F 8/0/2 161F merge constant length 1A 01 07 01 1F 10 1 7 1 £ 0A171F 10/0/0 171F multiply and add 0B 08 16 01 1F 11 8 6 1 £ 0B861F 11/1/0 61F multiply and subtract 0B 08 15 01 1F 11 8 5 1 £ 0B851F 11/1/0 51F multiply and subtract 0B 19 3B 13 1F 11 9 * 3 £ 0B9B3F 11/1/0 1B3F multiply and subtract 04 07 38 19 1F 4 7 H 9 £ 04789F 4/0/3 189F add (N) to (A) 10 15 10 10 10 5 005000 0/0/2 1000 replace (B) by (N) 10 10 38 19 1F H 9 £ 00089F 0/0/0 89F Halt 08 08 38 19 0D 8 8 H 9 : 08889D 8/1/0 89D merge variable length 1A 0D 16 01 1F 10 : 6 1 £ 0AD61F 10/1/2 161F multiply and add 0B 02 3B 13 0E 11 2 * 3 . 0B2B3E 11/0/1 B3E multiply and subtract 0D 07 16 01 1F : 7 6 1 £ 0D761F 13/0/3 161F divide uniform radix 1A 1F 32 10 10 10 £ B 0AF200 10/1/3 1200 multiply and add 10 04 6E 00 00 4 be 004E00 0/0/2 E00 replace (B) by (N) 1F 08 1C 01 1A £ 8 + 1 10 0F8C1A 15/1/0 C1A collate and add 10 10 1A 02 01 10 2 1 000A21 0/0/0 A21 Halt 1F 0B 1A 16 01 £ 11 10 6 1 0FBA61 15/1/1 1A61 collate and add 1F 1A 07 02 10 £ 10 7 2 0FA720 15/1/1 720 collate and add 10 10 19 16 19 9 6 9 000969 0/0/0 969 Halt 1F 1A 1A 13 08 £ 10 10 3 8 0FAA38 15/1/1 A38 collate and add 10 10 1A 02 10 10 2 000A20 0/0/0 A20 Halt 10 10 1A 38 08 10 H 8 000A88 0/0/0 A88 Halt 10 10 19 10 10 9 000900 0/0/0 900 Halt 10 02 10 10 10 2 002000 0/0/1 0 Invalid 10 10 1F 10 10 £ 000F00 0/0/0 F00 Halt 10 10 04 10 01 4 1 000401 0/0/0 401 Halt 1C 04 16 10 01 + 4 6 1 0C4601 12/0/2 601 convert 1F 1C 10 10 04 £ + 4 0FC004 15/1/2 4 collate and add 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 01 1F 19 1A 10 1 £ 9 10 01F9A0 1/1/3 19A0 select literal address 10 10 1A 10 10 10 000A00 0/0/0 A00 Halt 04 10 10 10 1F 4 £ 04000F 4/0/0 F add (N) to (A) 01 1F 1C 10 1F 1 £ + £ 01FC0F 1/1/3 1C0F select literal address 01 1F 0E 10 19 1 £ . 9 01FE09 1/1/3 1E09 select literal address 16 19 16 19 16 6 9 6 9 6 069696 6/1/0 1696 select (N) 19 16 19 16 10 9 6 9 6 096960 9/0/3 960 multiply uniform radix 10 10 01 04 10 1 4 000140 0/0/0 140 Halt 10 10 10 02 10 2 000020 0/0/0 20 Halt 10 10 10 01 10 1 000010 0/0/0 10 Halt 10 10 01 1C 10 1 + 0001C0 0/0/0 1C0 Halt 10 10 10 10 07 7 000007 0/0/0 7 Halt 0E 10 10 10 10 . 0E0000 14/0/0 0 replace selected bits 07 1F 1F 1F 2A 7 £ £ £ = 07FFFA 7/1/3 1FFA augment (N) by (A) 07 1F 0B 1A 6E 7 £ 11 10 be 07FBAE 7/1/3 1BAE augment (N) by (A) 10 01 1F 1A 08 1 £ 10 8 001FA8 0/0/0 1FA8 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 1A 10 10 0000A0 0/0/0 A0 Halt 29 0B 1F 1F 1F I 11 £ £ £ 19BFFF 25/1/1 1FFF clear indicators 2A 13 1F 1A 0E = 3 £ 10 . 1A3FAE 26/0/1 1FAE leave subroutine 10 01 1C 0E 08 1 + . 8 001CE8 0/0/0 1CE8 Halt 10 01 1C 0E 08 1 + . 8 001CE8 0/0/0 1CE8 Halt 10 01 0B 07 1A 1 11 7 10 001B7A 0/0/0 1B7A Halt 10 10 10 10 1F £ 00000F 0/0/0 F Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 01 1 000001 0/0/0 1 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 6E 00 00 00 00 be 16 10 10 10 01 6 1 060001 6/0/0 1 select (N) 19 10 10 10 02 9 2 090002 9/0/0 2 multiply uniform radix 10 10 01 1F 1C 1 £ + 0001FC 0/0/0 1FC Halt 1C 10 01 1F 0D + 1 £ : 0C01FD 12/0/0 1FD convert 1C 1F 10 10 10 + £ 0CF000 12/1/3 1000 convert 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 13 0E 3 . 00003E 0/0/0 3E Halt 08 10 10 07 0D 8 7 : 08007D 8/0/0 7D merge constant length 02 10 10 10 10 2 020000 2/0/0 0 transfer (A) to N 10 10 10 10 10 000000 0/0/0 0 Halt 10 1C 04 0E 04 + 4 . 4 00C4E4 0/1/2 4E4 replace (B) by (N) 02 10 10 04 01 2 4 1 020041 2/0/0 41 transfer (A) to N 04 10 10 10 10 4 040000 4/0/0 0 add (N) to (A) 10 10 10 10 10 000000 0/0/0 0 Halt 10 6E 00 00 00 be 00E000 0/1/3 0 Invalid 1C 04 10 10 10 + 4 0C4000 12/0/2 0 convert 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 38 1C 10 H + 0008C0 0/0/0 8C0 Halt 08 10 01 16 1F 8 1 6 £ 08016F 8/0/0 16F merge constant length 1C 10 29 0E 08 + I . 8 0C09E8 12/0/0 9E8 convert 10 10 38 1C 10 H + 0008C0 0/0/0 8C0 Halt 08 10 23 02 10 8 C 2 080320 8/0/0 320 merge constant length 10 10 02 01 1F 2 1 £ 00021F 0/0/0 21F Halt 0D 10 15 01 1F : 5 1 £ 0D051F 13/0/0 51F divide uniform radix 1C 1F 07 10 10 + £ 7 0CF700 12/1/3 1700 convert 08 10 38 19 1F 8 H 9 £ 08089F 8/0/0 89F merge constant length 0D 01 10 10 10 : 1 0D1000 13/0/0 1000 divide uniform radix 04 10 10 10 10 4 040000 4/0/0 0 add (N) to (A) 01 1C 38 19 0E 1 + H 9 . 01C89E 1/1/2 89E subtract literal address 0B 16 6E 00 00 11 6 be 0B6E00 11/0/3 E00 multiply and subtract 01 0D 10 10 10 1 : 01D000 1/1/2 1000 subtract literal address 01 0D 10 10 10 1 : 01D000 1/1/2 1000 subtract literal address 01 0E 0B 04 10 1 . 11 4 01EB40 1/1/3 B40 select literal address 10 10 10 02 10 2 000020 0/0/0 20 Halt 10 10 10 04 10 4 000040 0/0/0 40 Halt 01 0E 0B 08 10 1 . 11 8 01EB80 1/1/3 B80 select literal address 10 10 10 1F 10 £ 0000F0 0/0/0 F0 Halt 10 10 10 08 10 8 000080 0/0/0 80 Halt 10 10 10 01 10 1 000010 0/0/0 10 Halt 10 10 10 13 01 3 1 000031 0/0/0 31 Halt 04 0B 16 01 02 4 11 6 1 2 04B612 4/1/1 1612 add (N) to (A) 01 0E 15 02 16 1 . 5 2 6 01E526 1/1/3 526 select literal address 01 1F 15 07 02 1 £ 5 7 2 01F572 1/1/3 1572 select literal address 01 1F 15 04 38 1 £ 5 4 H 01F548 1/1/3 1548 select literal address 0D 1F 0B 01 6E : £ 11 1 be 0DFB1E 13/1/3 1B1E divide uniform radix 10 01 0D 10 04 1 : 4 001D04 0/0/0 1D04 Halt 16 19 0D 1C 0E 6 9 : + . 069DCE 6/1/0 1DCE select (N) 02 19 0E 15 04 2 9 . 5 4 029E54 2/1/0 1E54 transfer (A) to N 38 0D 1F 0B 01 H : £ 11 1 18DFB1 24/1/2 1FB1 modify address of next 16 19 0D 1C 16 6 9 : + 6 069DC6 6/1/0 1DC6 select (N) 02 19 0E 16 02 2 9 . 6 2 029E62 2/1/0 1E62 transfer (A) to N 38 0D 1F 0B 01 H : £ 11 1 18DFB1 24/1/2 1FB1 modify address of next 16 19 0D 1C 1A 6 9 : + 10 069DCA 6/1/0 1DCA select (N) 02 19 0E 16 04 2 9 . 6 4 029E64 2/1/0 1E64 transfer (A) to N 2A 0B 0D 1F 08 = 11 : £ 8 1ABDF8 26/1/1 1DF8 set modification register 16 01 0D 1F 1A 6 1 : £ 10 061DFA 6/0/0 1DFA select (N) 37 1A 10 10 10 G 10 17A000 23/1/1 0 copy into tag 29 02 10 10 02 I 2 2 192002 25/0/1 2 step on and test 38 19 0D 10 0E H 9 : . 189D0E 24/1/0 1D0E unconditional jump 2A 0B 0E 10 02 = 11 . 2 1ABE02 26/1/1 1E02 set modification register 6E 00 00 00 00 be 02 38 1C 10 16 2 H + 6 028C06 2/1/0 C06 transfer (A) to N 07 16 1A 10 10 7 6 10 076A00 7/0/3 A00 augment (N) by (A) 1F 02 0B 0E 15 £ 2 11 . 5 0F2BE5 15/0/1 BE5 collate and add 08 29 02 10 10 8 I 2 089200 8/1/0 1200 merge variable length 02 38 19 0D 01 2 H 9 : 1 0289D1 2/1/0 9D1 transfer (A) to N 02 38 19 0D 02 2 H 9 : 2 0289D2 2/1/0 9D2 transfer (A) to N 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 6E 00 00 00 be 00E000 0/1/3 0 Invalid 02 10 16 01 0D 2 6 1 : 02061D 2/0/0 61D transfer (A) to N 0D 02 38 1C 10 : 2 H + 0D28C0 13/0/1 8C0 divide uniform radix 08 01 02 10 10 8 1 2 081200 8/0/0 1200 merge constant length 04 10 16 01 0D 4 6 1 : 04061D 4/0/0 61D add (N) to (A) 0D 13 02 10 10 : 3 2 0D3200 13/0/1 1200 divide uniform radix 16 16 16 01 0D 6 6 6 1 : 06661D 6/0/3 61D select (N) 0D 04 38 1C 10 : 4 H + 0D48C0 13/0/2 8C0 divide uniform radix 16 16 2C 1C 10 6 6 ' + 066CC0 6/0/3 CC0 select (N) 10 10 38 19 0D H 9 : 00089D 0/0/0 89D Halt 02 0E 10 10 10 2 . 02E000 2/1/3 0 transfer (A) to N 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 38 19 0D H 9 : 00089D 0/0/0 89D Halt 02 0E 6E 00 00 2 . be 02EE00 2/1/3 E00 transfer (A) to N 0D 02 0E 38 1C : 2 . H + 0D2E8C 13/0/1 E8C divide uniform radix 10 08 01 01 16 8 1 1 6 008116 0/1/0 116 copy registers 19 08 10 38 19 9 8 H 9 098089 9/1/0 89 multiply uniform radix 0D 13 01 2A 0B : 3 1 = 11 0D31AB 13/0/1 11AB divide uniform radix 0E 16 02 38 1C . 6 2 H + 0E628C 14/0/3 28C replace selected bits 10 08 01 2A 08 8 1 = 8 0081A8 0/1/0 1A8 copy registers 10 10 10 10 10 000000 0/0/0 0 Halt 10 01 01 38 19 1 1 H 9 001189 0/0/0 1189 Halt 0D 13 02 38 19 : 3 2 H 9 0D3289 13/0/1 1289 divide uniform radix 0D 13 0B 38 19 : 3 11 H 9 0D3B89 13/0/1 1B89 divide uniform radix 0D 13 19 38 19 : 3 9 H 9 0D3989 13/0/1 1989 divide uniform radix 0D 04 10 10 10 : 4 0D4000 13/0/2 0 divide uniform radix 10 01 13 38 19 1 3 H 9 001389 0/0/0 1389 Halt 0D 13 01 16 19 : 3 1 6 9 0D3169 13/0/1 1169 divide uniform radix 0E 15 04 6E 00 . 5 4 be 0E54E0 14/0/2 14E0 replace selected bits 01 0D 13 1C 38 1 : 3 + H 01D3C8 1/1/2 13C8 subtract literal address 1C 10 08 01 38 + 8 1 H 0C0818 12/0/0 818 convert 1C 10 04 10 02 + 4 2 0C0402 12/0/0 402 convert 08 10 10 10 2A 8 = 08000A 8/0/0 A merge constant length 0B 0E 16 04 38 11 . 6 4 H 0BE648 11/1/3 648 multiply and subtract 1C 10 08 01 38 + 8 1 H 0C0818 12/0/0 818 convert 1C 10 04 10 16 + 4 6 0C0406 12/0/0 406 convert 1A 10 10 10 02 10 2 0A0002 10/0/0 2 multiply and add 08 10 19 1A 38 8 9 10 H 0809A8 8/0/0 9A8 merge constant length 19 0D 04 15 38 9 : 4 5 H 09D458 9/1/2 1458 multiply uniform radix 1C 10 08 01 23 + 8 1 C 0C0813 12/0/0 813 convert 10 10 10 10 29 I 000009 0/0/0 9 Halt 02 10 10 02 38 2 2 H 020028 2/0/0 28 transfer (A) to N 19 0D 13 02 16 9 : 3 2 6 09D326 9/1/2 1326 multiply uniform radix 01 0E 15 02 6E 1 . 5 2 be 01E52E 1/1/3 52E select literal address 10 01 0D 04 1A 1 : 4 10 001D4A 0/0/0 1D4A Halt 02 01 0E 15 02 2 1 . 5 2 021E52 2/0/0 1E52 transfer (A) to N 38 0D 1F 0B 04 H : £ 11 4 18DFB4 24/1/2 1FB4 modify address of next 38 19 0D 04 0D H 9 : 4 : 189D4D 24/1/0 1D4D unconditional jump 02 01 0E 15 02 2 1 . 5 2 021E52 2/0/0 1E52 transfer (A) to N 16 01 1F 1F 01 6 1 £ £ 1 061FF1 6/0/0 1FF1 select (N) 3B 01 0D 15 13 * 1 : 5 3 1B1D53 27/0/0 1D53 jump A = Z 38 0D 1F 1A 1C H : £ 10 + 18DFAC 24/1/2 1FAC modify address of next 37 16 10 10 01 G 6 1 176001 23/0/3 1 select tag 38 19 0D 15 15 H 9 : 5 5 189D55 24/1/0 1D55 unconditional jump 38 0D 1F 1A 1C H : £ 10 + 18DFAC 24/1/2 1FAC modify address of next 37 16 10 10 10 G 6 176000 23/0/3 0 select tag 02 01 0E 16 01 2 1 . 6 1 021E61 2/0/0 1E61 transfer (A) to N 16 01 1F 1A 02 6 1 £ 10 2 061FA2 6/0/0 1FA2 select (N) 02 01 0E 15 13 2 1 . 5 3 021E53 2/0/0 1E53 transfer (A) to N 6E 00 00 00 00 be 08 16 01 1F 1A 8 6 1 £ 10 0861FA 8/0/3 1FA merge constant length 1F 02 01 0E 16 £ 2 1 . 6 0F21E6 15/0/1 1E6 collate and add 10 38 0D 1F 1A H : £ 10 008DFA 0/1/0 DFA copy registers 1C 16 10 10 10 + 6 0C6000 12/0/3 0 convert 01 13 01 0E 15 1 3 1 . 5 0131E5 1/0/1 11E5 prepare for digit collation 16 3B 13 0D 16 6 * 3 : 6 06B3D6 6/1/1 13D6 select (N) 15 16 01 1F 0B 5 6 1 £ 11 0561FB 5/0/3 1FB subtract (N) from (A) 15 3B 13 0D 16 5 * 3 : 6 05B3D6 5/1/1 13D6 subtract (N) from (A) 15 38 0D 1F 1A 5 H : £ 10 058DFA 5/1/0 DFA subtract (N) from (A) 1C 16 08 10 10 + 6 8 0C6800 12/0/3 800 convert 10 3B 15 0D 16 * 5 : 6 00B5D6 0/1/1 15D6 replace registers 15 02 01 1F 0B 5 2 1 £ 11 0521FB 5/0/1 1FB subtract (N) from (A) 1A 02 01 0E 15 10 2 1 . 5 0A21E5 10/0/1 1E5 multiply and add 13 16 01 0E 15 3 6 1 . 5 0361E5 3/0/3 1E5 copy (A) to N 02 6E 00 00 00 2 be 02E000 2/1/3 0 transfer (A) to N 16 16 15 01 0E 6 6 5 1 . 06651E 6/0/3 51E select (N) 15 16 3B 13 0D 5 6 * 3 : 056B3D 5/0/3 B3D subtract (N) from (A) 07 10 16 01 0E 7 6 1 . 07061E 7/0/0 61E augment (N) by (A) 16 10 15 01 0E 6 5 1 . 06051E 6/0/0 51E select (N) 16 01 3B 13 0D 6 1 * 3 : 061B3D 6/0/0 1B3D select (N) 16 0E 16 01 1F 6 . 6 1 £ 06E61F 6/1/3 61F select (N) 0B 04 15 01 0E 11 4 5 1 . 0B451E 11/0/2 51E multiply and subtract 15 13 3B 01 1F 5 3 * 1 £ 053B1F 5/0/1 1B1F subtract (N) from (A) 07 16 29 1C 10 7 6 I + 0769C0 7/0/3 9C0 augment (N) by (A) 02 10 3B 13 1F 2 * 3 £ 020B3F 2/0/0 B3F transfer (A) to N 07 16 02 01 1F 7 6 2 1 £ 07621F 7/0/3 21F augment (N) by (A) 0B 1A 2A 0B 0D 11 10 = 11 : 0BAABD 11/1/1 ABD multiply and subtract 0D 16 10 15 0D : 6 5 : 0D605D 13/0/3 5D divide uniform radix 0D 08 1F 02 10 : 8 £ 2 0D8F20 13/1/0 F20 divide uniform radix 10 10 6E 00 00 be 000E00 0/0/0 E00 Halt 0D 07 04 02 02 : 7 4 2 2 0D7422 13/0/3 1422 divide uniform radix 10 10 08 10 15 8 5 000805 0/0/0 805 Halt 0D 0D 19 1F 02 : : 9 £ 2 0DD9F2 13/1/2 19F2 divide uniform radix 10 10 10 1F 02 £ 2 0000F2 0/0/0 F2 Halt 10 10 10 1F 02 £ 2 0000F2 0/0/0 F2 Halt 10 10 10 1F 02 £ 2 0000F2 0/0/0 F2 Halt 10 10 10 32 10 B 000020 0/0/0 20 Halt 10 10 15 10 15 5 5 000505 0/0/0 505 Halt 0D 0D 1A 1F 02 : : 10 £ 2 0DDAF2 13/1/2 1AF2 divide uniform radix 10 10 10 13 1A 3 10 00003A 0/0/0 3A Halt 10 10 16 04 1A 6 4 10 00064A 0/0/0 64A Halt 10 10 16 32 01 6 B 1 000621 0/0/0 621 Halt 10 01 1C 02 1A 1 + 2 10 001C2A 0/0/0 1C2A Halt 10 10 16 10 15 6 5 000605 0/0/0 605 Halt 0D 0D 0B 6E 00 : : 11 be 0DDBE0 13/1/2 1BE0 divide uniform radix 01 0D 08 02 1F 1 : 8 2 £ 01D82F 1/1/2 182F subtract literal address 02 10 10 10 32 2 B 020002 2/0/0 2 transfer (A) to N 01 10 01 1C 02 1 1 + 2 0101C2 1/0/0 1C2 table look up 02 10 10 15 16 2 5 6 020056 2/0/0 56 transfer (A) to N 02 10 10 10 3B 2 * 02000B 2/0/0 B transfer (A) to N 15 0D 08 19 16 5 : 8 9 6 05D896 5/1/2 1896 subtract (N) from (A) 01 0D 0D 1C 07 1 : : + 7 01DDC7 1/1/2 1DC7 subtract literal address 02 10 10 15 02 2 5 2 020052 2/0/0 52 transfer (A) to N 01 1F 0B 1A 29 1 £ 11 10 I 01FBA9 1/1/3 1BA9 select literal address 02 10 10 04 38 2 4 H 020048 2/0/0 48 transfer (A) to N 19 0D 07 02 38 9 : 7 2 H 09D728 9/1/2 1728 multiply uniform radix 19 0D 08 0D 16 9 : 8 : 6 09D8D6 9/1/2 18D6 multiply uniform radix 01 1F 1A 1C 04 1 £ 10 + 4 01FAC4 1/1/3 1AC4 select literal address 01 1F 1A 02 02 1 £ 10 2 2 01FA22 1/1/3 1A22 select literal address 01 0E 15 1F 6E 1 . 5 £ be 01E5FE 1/1/3 5FE select literal address 10 01 0D 19 10 1 : 9 001D90 0/0/0 1D90 Halt 16 01 1F 0B 04 6 1 £ 11 4 061FB4 6/0/0 1FB4 select (N) 3B 13 0D 19 04 * 3 : 9 4 1B3D94 27/0/1 1D94 jump A != Z 16 01 0D 0D 1C 6 1 : : + 061DDC 6/0/0 1DDC select (N) 02 01 0E 15 07 2 1 . 5 7 021E57 2/0/0 1E57 transfer (A) to N 16 01 0E 15 13 6 1 . 5 3 061E53 6/0/0 1E53 select (N) 3B 13 0D 19 08 * 3 : 9 8 1B3D98 27/0/1 1D98 jump A != Z 16 01 0D 0D 1C 6 1 : : + 061DDC 6/0/0 1DDC select (N) 02 01 0E 15 0B 2 1 . 5 11 021E5B 2/0/0 1E5B transfer (A) to N 2A 0B 0D 0D 0E = 11 : : . 1ABDDE 26/1/1 1DDE set modification register 10 07 0D 0D 0D 7 : : : 007DDD 0/0/3 1DDD set radix 16 01 0D 0E 10 6 1 : . 061DE0 6/0/0 1DE0 select (N) 1C 02 10 10 10 + 2 0C2000 12/0/1 0 convert 02 02 10 01 10 2 2 1 022010 2/0/1 10 transfer (A) to N 10 07 0D 0E 01 7 : . 1 007DE1 0/0/3 1DE1 set radix 6E 00 00 00 00 be 0E 29 02 10 10 . I 2 0E9200 14/1/0 1200 replace selected bits 01 38 19 0D 19 1 H 9 : 9 0189D9 1/1/0 9D9 table look up 19 38 19 0D 1A 9 H 9 : 10 0989DA 9/1/0 9DA multiply uniform radix 01 16 01 0D 0D 1 6 1 : : 0161DD 1/0/3 1DD interchange area addresses 15 38 1C 10 16 5 H + 6 058C06 5/1/0 C06 subtract (N) from (A) 16 2C 1C 10 10 6 ' + 06CC00 6/1/2 C00 select (N) 10 38 19 0D 1A H 9 : 10 0089DA 0/1/0 9DA copy registers 1A 10 10 10 10 10 0A0000 10/0/0 0 multiply and add 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 38 1C 10 08 H + 8 008C08 0/1/0 C08 copy registers 01 01 16 19 08 1 1 6 9 8 011698 1/0/0 1698 table look up 10 6E 00 00 00 be 00E000 0/1/3 0 Invalid 1A 1C 38 19 0D 10 + H 9 : 0AC89D 10/1/2 89D multiply and add 1A 0D 2A 0B 0E 10 : = 11 . 0ADABE 10/1/2 1ABE multiply and add 16 02 38 1C 10 6 2 H + 0628C0 6/0/1 8C0 select (N) 08 01 2A 08 10 8 1 = 8 081A80 8/0/0 1A80 merge constant length 10 10 10 10 10 000000 0/0/0 0 Halt 01 15 38 19 0D 1 5 H 9 : 01589D 1/0/2 189D round off 1A 0E 10 10 10 10 . 0AE000 10/1/3 0 multiply and add 01 07 38 19 0D 1 7 H 9 : 01789D 1/0/3 189D interchange area addresses 02 0D 16 01 1F 2 : 6 1 £ 02D61F 2/1/2 161F transfer (A) to N 1A 0D 04 01 0D 10 : 4 1 : 0AD41D 10/1/2 141D multiply and add 0E 01 15 01 1F . 1 5 1 £ 0E151F 14/0/0 151F replace selected bits 1A 1C 3B 07 0D 10 + * 7 : 0ACB7D 10/1/2 B7D multiply and add 1C 01 38 1C 10 + 1 H + 0C18C0 12/0/0 18C0 convert 08 01 38 1C 10 8 1 H + 0818C0 8/0/0 18C0 merge constant length 04 10 6E 00 00 4 be 040E00 4/0/0 E00 add (N) to (A) 0D 0B 1A 16 1A : 11 10 6 10 0DBA6A 13/1/1 1A6A divide uniform radix 10 10 10 02 08 2 8 000028 0/0/0 28 Halt 10 19 1A 38 1C 9 10 H + 009A8C 0/1/0 1A8C copy registers 10 08 01 23 10 8 1 C 008130 0/1/0 130 copy registers 10 10 10 29 02 I 2 000092 0/0/0 92 Halt 10 10 02 38 19 2 H 9 000289 0/0/0 289 Halt 0D 1A 0E 38 19 : 10 . H 9 0DAE89 13/1/1 E89 divide uniform radix 1F 07 16 16 01 £ 7 6 6 1 0F7661 15/0/3 1661 collate and add 1F 0B 02 3B 01 £ 11 2 * 1 0FB2B1 15/1/1 12B1 collate and add 0D 1C 15 02 01 : + 5 2 1 0DC521 13/1/2 521 divide uniform radix 1F 0B 1A 38 19 £ 11 10 H 9 0FBA89 15/1/1 1A89 collate and add 0E 0D 07 10 10 . : 7 0ED700 14/1/2 1700 replace selected bits 10 16 13 10 10 6 3 006300 0/0/3 300 set radix 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 02 6E 00 2 be 0002E0 0/0/0 2E0 Halt 01 0D 1C 08 10 1 : + 8 01DC80 1/1/2 1C80 subtract literal address 10 10 10 02 10 2 000020 0/0/0 20 Halt 10 10 02 02 10 2 2 000220 0/0/0 220 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 02 10 2 000020 0/0/0 20 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 02 02 10 2 2 000220 0/0/0 220 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 07 0E 10 7 . 0007E0 0/0/0 7E0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 01 0E 07 16 10 1 . 7 6 01E760 1/1/3 760 select literal address 01 0E 19 16 10 1 . 9 6 01E960 1/1/3 960 select literal address 01 0E 10 04 10 1 . 4 01E040 1/1/3 40 select literal address 01 0E 02 08 6E 1 . 2 8 be 01E28E 1/1/3 28E select literal address 10 01 0D 0D 16 1 : : 6 001DD6 0/0/0 1DD6 Halt 10 01 0E 15 02 1 . 5 2 001E52 0/0/0 1E52 Halt 10 01 0E 15 1A 1 . 5 10 001E5A 0/0/0 1E5A Halt 10 01 1F 1F 1F 1 £ £ £ 001FFF 0/0/0 1FFF Halt 10 16 10 10 10 6 006000 0/0/3 0 set radix 10 08 10 10 10 8 008000 0/1/0 0 copy registers 1F 10 10 10 10 £ 0F0000 15/0/0 0 collate and add 10 10 10 01 10 1 000010 0/0/0 10 Halt 16 16 16 16 16 6 6 6 6 6 066666 6/0/3 666 select (N) 10 01 0E 15 07 1 . 5 7 001E57 0/0/0 1E57 Halt 10 01 0E 16 02 1 . 6 2 001E62 0/0/0 1E62 Halt 10 01 0D 0E 04 1 : . 4 001DE4 0/0/0 1DE4 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 07 1A 07 0B 10 7 10 7 11 07A7B0 7/1/1 7B0 augment (N) by (A) 6E 00 00 00 00 be 04 10 10 10 10 4 040000 4/0/0 0 add (N) to (A) 01 10 10 10 10 1 010000 1/0/0 0 table look up 10 10 10 10 01 1 000001 0/0/0 1 Halt 16 10 10 10 10 6 060000 6/0/0 0 select (N) 10 10 10 02 15 2 5 000025 0/0/0 25 Halt 16 10 10 10 10 6 060000 6/0/0 0 select (N) 10 10 04 10 19 4 9 000409 0/0/0 409 Halt 16 10 10 10 10 6 060000 6/0/0 0 select (N) 10 13 15 15 13 3 5 5 3 003553 0/0/1 1553 Invalid 16 10 10 10 10 6 060000 6/0/0 0 select (N) 10 04 16 07 15 4 6 7 5 004675 0/0/2 675 replace (B) by (N) 01 15 13 16 16 1 5 3 6 6 015366 1/0/2 1366 round off 16 02 16 16 16 6 2 6 6 6 062666 6/0/1 666 select (N) 15 16 19 15 19 5 6 9 5 9 056959 5/0/3 959 subtract (N) from (A) 07 6E 00 00 00 7 be 07E000 7/1/3 0 augment (N) by (A) 1F 02 16 07 02 £ 2 6 7 2 0F2672 15/0/1 672 collate and add 07 13 07 01 16 7 3 7 1 6 073716 7/0/1 1716 augment (N) by (A) 07 16 19 07 13 7 6 9 7 3 076973 7/0/3 973 augment (N) by (A) 15 15 16 04 16 5 5 6 4 6 055646 5/0/2 1646 subtract (N) from (A) 16 16 10 16 16 6 6 6 6 066066 6/0/3 66 select (N) 15 16 16 04 10 5 6 6 4 056640 5/0/3 640 subtract (N) from (A) 10 10 10 01 0E 1 . 00001E 0/0/0 1E Halt 07 16 10 01 0E 7 6 1 . 07601E 7/0/3 1E augment (N) by (A) 0B 16 10 10 10 11 6 0B6000 11/0/3 0 multiply and subtract 10 0E 10 10 10 . 00E000 0/1/3 0 Invalid 10 10 19 15 01 9 5 1 000951 0/0/0 951 Halt 16 13 15 15 16 6 3 5 5 6 063556 6/0/1 1556 select (N) 19 15 02 07 04 9 5 2 7 4 095274 9/0/2 1274 multiply uniform radix 15 15 15 19 07 5 5 5 9 7 055597 5/0/2 1597 subtract (N) from (A) 02 07 6E 00 00 2 7 be 027E00 2/0/3 1E00 transfer (A) to N 0E 10 10 13 15 . 3 5 0E0035 14/0/0 35 replace selected bits 15 15 04 15 04 5 5 4 5 4 055454 5/0/2 1454 subtract (N) from (A) 15 01 07 10 10 5 1 7 051700 5/0/0 1700 subtract (N) from (A) 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 08 10 01 8 1 000801 0/0/0 801 Halt 0D 0E 0E 13 10 : . . 3 0DEE30 13/1/3 E30 divide uniform radix 10 15 15 10 01 5 5 1 005501 0/0/2 1501 replace (B) by (N) 0D 1F 10 13 10 : £ 3 0DF030 13/1/3 1030 divide uniform radix 10 10 15 10 01 5 1 000501 0/0/0 501 Halt 0D 1F 02 13 10 : £ 2 3 0DF230 13/1/3 1230 divide uniform radix 01 02 04 10 01 1 2 4 1 012401 1/0/1 401 prepare for digit collation 0D 1F 04 13 10 : £ 4 3 0DF430 13/1/3 1430 divide uniform radix 10 02 15 10 01 2 5 1 002501 0/0/1 501 Invalid 0D 1F 16 13 10 : £ 6 3 0DF630 13/1/3 1630 divide uniform radix 10 10 15 6E 00 5 be 0005E0 0/0/0 5E0 Halt 01 0E 10 0E 10 1 . . 01E0E0 1/1/3 E0 select literal address 01 0E 15 08 10 1 . 5 8 01E580 1/1/3 580 select literal address 10 10 02 15 10 2 5 000250 0/0/0 250 Halt 01 0D 1F 10 13 1 : £ 3 01DF03 1/1/2 1F03 subtract literal address 10 02 01 01 10 2 1 1 002110 0/0/1 110 Invalid 01 0D 1F 1C 13 1 : £ + 3 01DFC3 1/1/2 1FC3 subtract literal address 10 10 10 15 10 5 000050 0/0/0 50 Halt 01 0E 15 1A 10 1 . 5 10 01E5A0 1/1/3 5A0 select literal address 10 02 01 13 10 2 1 3 002130 0/0/1 130 Invalid 01 0D 1F 0E 13 1 : £ . 3 01DFE3 1/1/2 1FE3 subtract literal address 10 10 01 15 10 1 5 000150 0/0/0 150 Halt 01 0E 15 1C 10 1 . 5 + 01E5C0 1/1/3 5C0 select literal address 10 13 01 02 10 3 1 2 003120 0/0/1 1120 Invalid 01 0E 10 10 13 1 . 3 01E003 1/1/3 3 select literal address 10 10 01 15 6E 1 5 be 00015E 0/0/0 15E Halt 10 01 0E 01 1C 1 . 1 + 001E1C 0/0/0 1E1C Halt 10 01 0E 15 0E 1 . 5 . 001E5E 0/0/0 1E5E Halt 10 10 10 01 02 1 2 000012 0/0/0 12 Halt 10 01 0D 1F 02 1 : £ 2 001DF2 0/0/0 1DF2 Halt 13 10 10 10 01 3 1 030001 3/0/0 1 copy (A) to N 10 01 0E 15 0E 1 . 5 . 001E5E 0/0/0 1E5E Halt 10 10 02 10 01 2 1 000201 0/0/0 201 Halt 10 01 0D 1F 02 1 : £ 2 001DF2 0/0/0 1DF2 Halt 13 10 10 10 01 3 1 030001 3/0/0 1 copy (A) to N 10 01 0E 15 0E 1 . 5 . 001E5E 0/0/0 1E5E Halt 10 10 13 10 02 3 2 000302 0/0/0 302 Halt 10 01 1F 1A 04 1 £ 10 4 001FA4 0/0/0 1FA4 Halt 23 10 10 10 01 C 1 130001 19/0/0 1 output 10 01 0E 16 1F 1 . 6 £ 001E6F 0/0/0 1E6F Halt 10 04 10 15 15 4 5 5 004055 0/0/2 55 replace (B) by (N) 6E 00 00 00 00 be 1A 10 01 0D 0E 10 1 : . 0A01DE 10/0/0 1DE multiply and add 02 13 10 10 01 2 3 1 023001 2/0/1 1001 transfer (A) to N 01 10 01 0E 15 1 1 . 5 0101E5 1/0/0 1E5 table look up 1F 10 10 01 10 £ 1 0F0010 15/0/0 10 collate and add 04 10 01 0D 0E 4 1 : . 0401DE 4/0/0 1DE add (N) to (A) 02 13 10 01 10 2 3 1 023010 2/0/1 1010 transfer (A) to N 01 10 01 0E 16 1 1 . 6 0101E6 1/0/0 1E6 table look up 07 10 01 13 15 7 1 3 5 070135 7/0/0 135 augment (N) by (A) 02 10 01 0E 16 2 1 . 6 0201E6 2/0/0 1E6 transfer (A) to N 08 10 10 04 01 8 4 1 080041 8/0/0 41 merge constant length 01 10 01 0E 16 1 1 . 6 0101E6 1/0/0 1E6 table look up 19 10 10 04 01 9 4 1 090041 9/0/0 41 multiply uniform radix 01 10 01 0E 16 1 1 . 6 0101E6 1/0/0 1E6 table look up 1A 10 04 10 01 10 4 1 0A0401 10/0/0 401 multiply and add 15 6E 00 00 00 5 be 05E000 5/1/3 0 subtract (N) from (A) 13 08 10 01 0D 3 8 1 : 03801D 3/1/0 1D copy (A) to N 0E 02 13 10 10 . 2 3 0E2300 14/0/1 300 replace selected bits 01 01 10 01 0E 1 1 1 . 01101E 1/0/0 101E table look up 15 1A 10 10 01 5 10 1 05A001 5/1/1 1 subtract (N) from (A) 10 04 10 01 0D 4 1 : 00401D 0/0/2 1D replace (B) by (N) 0E 02 13 10 01 . 2 3 1 0E2301 14/0/1 301 replace selected bits 10 01 10 01 0E 1 1 . 00101E 0/0/0 101E Halt 16 0B 10 01 13 6 11 1 3 06B013 6/1/1 1013 select (N) 15 02 10 01 0E 5 2 1 . 05201E 5/0/1 1E subtract (N) from (A) 16 1C 10 10 04 6 + 4 06C004 6/1/2 4 select (N) 01 01 10 01 0E 1 1 1 . 01101E 1/0/0 101E table look up 16 0D 10 10 04 6 : 4 06D004 6/1/2 1004 select (N) 01 01 10 01 0E 1 1 1 . 01101E 1/0/0 101E table look up 16 0E 10 04 10 6 . 4 06E040 6/1/3 40 select (N) 01 15 6E 00 00 1 5 be 015E00 1/0/2 1E00 round off 0E 04 16 10 01 . 4 6 1 0E4601 14/0/2 601 replace selected bits 0D 0E 02 13 10 : . 2 3 0DE230 13/1/3 230 divide uniform radix 10 01 01 10 01 1 1 1 001101 0/0/0 1101 Halt 0E 15 0E 10 10 . 5 . 0E5E00 14/0/2 1E00 replace selected bits 01 10 04 10 01 1 4 1 010401 1/0/0 401 table look up 0D 0E 02 13 10 : . 2 3 0DE230 13/1/3 230 divide uniform radix 01 10 01 10 01 1 1 1 010101 1/0/0 101 table look up 0E 07 10 10 01 . 7 1 0E7001 14/0/3 1001 replace selected bits 13 16 02 10 01 3 6 2 1 036201 3/0/3 201 copy (A) to N 0E 07 01 10 01 . 7 1 1 0E7101 14/0/3 1101 replace selected bits 13 13 02 10 01 3 3 2 1 033201 3/0/1 1201 copy (A) to N 1F 1A 04 23 10 £ 10 4 C 0FA430 15/1/1 430 collate and add 10 10 01 10 10 1 000100 0/0/0 100 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 01 0E 15 04 10 1 . 5 4 01E540 1/1/3 540 select literal address 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 6E be 00000E 0/0/0 E Halt 10 01 0E 16 02 1 . 6 2 001E62 0/0/0 1E62 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 6E 00 00 00 00 be 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 6E 00 00 00 be 00E000 0/1/3 0 Invalid 07 0E 10 10 10 7 . 07E000 7/1/3 0 augment (N) by (A) 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 6E 00 00 be 000E00 0/0/0 E00 Halt 0E 08 1C 10 10 . 8 + 0E8C00 14/1/0 C00 replace selected bits 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 01 0E 19 1A 10 1 . 9 10 01E9A0 1/1/3 9A0 select literal address 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 6E be 00000E 0/0/0 E Halt 10 01 0E 1A 08 1 . 10 8 001EA8 0/0/0 1EA8 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 6E 00 00 00 00 be 04 16 10 01 1C 4 6 1 + 04601C 4/0/3 1C add (N) to (A) 04 16 10 01 1C 4 6 1 + 04601C 4/0/3 1C add (N) to (A) 1F 0E 10 10 10 £ . 0FE000 15/1/3 0 collate and add 10 02 10 10 10 2 002000 0/0/1 0 Invalid 10 04 10 01 1C 4 1 + 00401C 0/0/2 1C replace (B) by (N) 04 16 10 10 10 4 6 046000 4/0/3 0 add (N) to (A) 10 1F 10 10 10 £ 00F000 0/1/3 1000 Invalid 10 02 10 10 10 2 002000 0/0/1 0 Invalid 10 01 10 10 10 1 001000 0/0/0 1000 Halt 10 13 01 19 1A 3 1 9 10 00319A 0/0/1 119A Invalid 16 01 10 10 10 6 1 061000 6/0/0 1000 select (N) 10 02 16 01 1F 2 6 1 £ 00261F 0/0/1 61F Invalid 02 10 02 01 1F 2 2 1 £ 02021F 2/0/0 21F transfer (A) to N 01 0D 38 19 0E 1 : H 9 . 01D89E 1/1/2 189E subtract literal address 0B 0B 6E 00 00 11 11 be 0BBE00 11/1/1 1E00 multiply and subtract 1C 04 1A 02 19 + 4 10 2 9 0C4A29 12/0/2 A29 convert 1C 0E 0E 02 19 + . . 2 9 0CEE29 12/1/3 E29 convert 1C 0E 0E 02 19 + . . 2 9 0CEE29 12/1/3 E29 convert 1C 1F 10 02 19 + £ 2 9 0CF029 12/1/3 1029 convert 1C 1F 02 02 19 + £ 2 2 9 0CF229 12/1/3 1229 convert 1C 1F 04 02 19 + £ 4 2 9 0CF429 12/1/3 1429 convert 1C 1F 16 16 01 + £ 6 6 1 0CF661 12/1/3 1661 convert 1C 0D 1C 02 01 + : + 2 1 0CDC21 12/1/2 1C21 convert 1C 0E 0E 16 01 + . . 6 1 0CEE61 12/1/3 E61 convert 1C 0E 13 02 01 + . 3 2 1 0CE321 12/1/3 321 convert 1C 1F 1A 16 10 + £ 10 6 0CFA60 12/1/3 1A60 convert 10 16 07 02 01 6 7 2 1 006721 0/0/3 721 set radix 1C 1F 19 16 01 + £ 9 6 1 0CF961 12/1/3 1961 convert 1C 0E 13 02 01 + . 3 2 1 0CE321 12/1/3 321 convert 1C 1F 0B 6E 00 + £ 11 be 0CFBE0 12/1/3 1BE0 convert 01 1C 15 08 16 1 + 5 8 6 01C586 1/1/2 586 subtract literal address 01 1C 0E 0B 04 1 + . 11 4 01CEB4 1/1/2 EB4 subtract literal address 01 1C 1F 0B 02 1 + £ 11 2 01CFB2 1/1/2 FB2 subtract literal address 01 1C 16 02 16 1 + 6 2 6 01C626 1/1/2 626 subtract literal address 01 1C 0E 15 38 1 + . 5 H 01CE58 1/1/2 E58 subtract literal address 0D 1C 1F 0B 32 : + £ 11 B 0DCFB2 13/1/2 FB2 divide uniform radix 10 10 10 10 32 B 000002 0/0/0 2 Halt 19 10 01 16 38 9 1 6 H 090168 9/0/0 168 multiply uniform radix 0D 1C 1F 19 1F : + £ 9 £ 0DCF9F 13/1/2 F9F divide uniform radix 08 10 10 10 38 8 H 080008 8/0/0 8 merge constant length 19 1C 16 02 10 9 + 6 2 09C620 9/1/2 620 multiply uniform radix 10 10 10 10 15 5 000005 0/0/0 5 Halt 01 1C 0E 08 13 1 + . 8 3 01CE83 1/1/2 E83 subtract literal address 01 1C 1F 1C 3B 1 + £ + * 01CFCB 1/1/2 FCB subtract literal address 01 1C 07 13 6E 1 + 7 3 be 01C73E 1/1/2 73E subtract literal address 10 01 1C 16 16 1 + 6 6 001C66 0/0/0 1C66 Halt 04 01 1F 1A 02 4 1 £ 10 2 041FA2 4/0/0 1FA2 add (N) to (A) 3B 01 1C 07 13 * 1 + 7 3 1B1C73 27/0/0 1C73 jump A = Z 04 01 1C 0E 19 4 1 + . 9 041CE9 4/0/0 1CE9 add (N) to (A) 38 0D 1C 1F 1A H : + £ 10 18DCFA 24/1/2 1CFA modify address of next 32 10 10 10 10 B 120000 18/0/0 0 shift logical 07 19 1C 1F 16 7 9 + £ 6 079CF6 7/1/0 1CF6 augment (N) by (A) 16 01 1C 1F 1A 6 1 + £ 10 061CFA 6/0/0 1CFA select (N) 3B 15 1C 07 10 * 5 + 7 1B5C70 27/0/2 1C70 jump A >= Z 10 10 10 01 19 1 9 000019 0/0/0 19 Halt 38 19 0E 1F 13 H 9 . £ 3 189EF3 24/1/0 1EF3 unconditional jump 15 01 1C 0E 10 5 1 + . 051CE0 5/0/0 1CE0 subtract (N) from (A) 02 01 1C 1F 1A 2 1 + £ 10 021CFA 2/0/0 1CFA transfer (A) to N 38 19 1C 08 16 H 9 + 8 6 189C86 24/1/0 1C86 unconditional jump 16 01 1C 0E 04 6 1 + . 4 061CE4 6/0/0 1CE4 select (N) 6E 00 00 00 00 be 04 07 01 1C 1F 4 7 1 + £ 0471CF 4/0/3 11CF add (N) to (A) 1A 16 01 1C 0E 10 6 1 + . 0A61CE 10/0/3 1CE multiply and add 0B 04 01 1C 1F 11 4 1 + £ 0B41CF 11/0/2 1CF multiply and subtract 1A 02 01 1C 07 10 2 1 + 7 0A21C7 10/0/1 1C7 multiply and add 1A 16 19 1C 1F 10 6 9 + £ 0A69CF 10/0/3 9CF multiply and add 16 38 19 1C 07 6 H 9 + 7 0689C7 6/1/0 9C7 select (N) 1A 10 10 10 10 10 0A0000 10/0/0 0 multiply and add 10 02 19 1C 1F 2 9 + £ 0029CF 0/0/1 9CF Invalid 16 16 19 1C 1F 6 6 9 + £ 0669CF 6/0/3 9CF select (N) 07 38 0D 1C 0E 7 H : + . 078DCE 7/1/0 DCE augment (N) by (A) 0E 02 10 10 10 . 2 0E2000 14/0/1 0 replace selected bits 10 16 01 1C 1F 6 1 + £ 0061CF 0/0/3 1CF set radix 1C 3B 01 1C 08 + * 1 + 8 0CB1C8 12/1/1 11C8 convert 0D 16 01 1F 1A : 6 1 £ 10 0D61FA 13/0/3 1FA divide uniform radix 02 6E 00 00 00 2 be 02E000 2/1/3 0 transfer (A) to N 08 02 07 01 1C 8 2 7 1 + 08271C 8/0/1 71C merge constant length 0E 0E 16 01 1C . . 6 1 + 0EE61C 14/1/3 61C replace selected bits 0E 13 02 01 1C . 3 2 1 + 0E321C 14/0/1 121C replace selected bits 1F 1A 02 19 1C £ 10 2 9 + 0FA29C 15/1/1 29C collate and add 1F 16 16 01 1C £ 6 6 1 + 0F661C 15/0/3 61C collate and add 1F 0B 15 01 1C £ 11 5 1 + 0FB51C 15/1/1 151C collate and add 0E 04 13 01 1C . 4 3 1 + 0E431C 14/0/2 31C replace selected bits 1F 0B 3B 15 1C £ 11 * 5 + 0FBB5C 15/1/1 1B5C collate and add 15 08 16 01 1C 5 8 6 1 + 05861C 5/1/0 61C subtract (N) from (A) 0E 10 07 01 1C . 7 1 + 0E071C 14/0/0 71C replace selected bits 1F 19 38 19 1C £ 9 H 9 + 0F989C 15/1/0 189C collate and add 15 16 2A 1F 1C 5 6 = £ + 056AFC 5/0/3 AFC subtract (N) from (A) 0D 1C 16 01 1C : + 6 1 + 0DC61C 13/1/2 61C divide uniform radix 0D 0E 1C 16 10 : . + 6 0DEC60 13/1/3 C60 divide uniform radix 10 10 6E 00 00 be 000E00 0/0/0 E00 Halt 1C 19 10 02 16 + 9 2 6 0C9026 12/1/0 1026 convert 10 10 10 29 16 I 6 000096 0/0/0 96 Halt 10 10 01 38 19 1 H 9 000189 0/0/0 189 Halt 1C 08 0E 02 19 + 8 . 2 9 0C8E29 12/1/0 E29 convert 1F 0B 1C 16 01 £ 11 + 6 1 0FBC61 15/1/1 1C61 collate and add 1C 0D 1F 15 01 + : £ 5 1 0CDF51 12/1/2 1F51 convert 1C 0E 0E 3B 15 + . . * 5 0CEEB5 12/1/3 EB5 convert 1C 19 19 10 10 + 9 9 0C9900 12/1/0 1900 convert 10 01 0B 38 19 1 11 H 9 001B89 0/0/0 1B89 Halt 0E 1F 13 16 19 . £ 3 6 9 0EF369 14/1/3 1369 replace selected bits 1C 1F 04 3B 01 + £ 4 * 1 0CF4B1 12/1/3 14B1 convert 1C 0B 01 15 01 + 11 1 5 1 0CB151 12/1/1 1151 convert 1C 0E 02 3B 01 + . 2 * 1 0CE2B1 12/1/3 2B1 convert 1C 19 1F 10 10 + 9 £ 0C9F00 12/1/0 1F00 convert 10 01 0D 6E 00 1 : be 001DE0 0/0/0 1DE0 Halt 01 1C 19 0E 38 1 + 9 . H 01C9E8 1/1/2 9E8 subtract literal address 19 0E 1F 13 16 9 . £ 3 6 09EF36 9/1/3 F36 multiply uniform radix 01 1C 1F 01 02 1 + £ 1 2 01CF12 1/1/2 F12 subtract literal address 01 1F 1A 1F 16 1 £ 10 £ 6 01FAF6 1/1/3 1AF6 select literal address 01 1C 1F 04 3B 1 + £ 4 * 01CF4B 1/1/2 F4B subtract literal address 07 1C 1A 1C 16 7 + 10 + 6 07CAC6 7/1/2 AC6 augment (N) by (A) 01 1C 1F 13 13 1 + £ 3 3 01CF33 1/1/2 F33 subtract literal address 01 1C 1F 08 15 1 + £ 8 5 01CF85 1/1/2 F85 subtract literal address 01 1F 1A 02 04 1 £ 10 2 4 01FA24 1/1/3 1A24 select literal address 19 1C 0E 16 02 9 + . 6 2 09CE62 9/1/2 E62 multiply uniform radix 19 1F 1A 1C 10 9 £ 10 + 09FAC0 9/1/3 1AC0 multiply uniform radix 15 1F 1A 1C 1F 5 £ 10 + £ 05FACF 5/1/3 1ACF subtract (N) from (A) 01 1F 1A 02 02 1 £ 10 2 2 01FA22 1/1/3 1A22 select literal address 01 1F 0B 15 38 1 £ 11 5 H 01FB58 1/1/3 1B58 select literal address 19 1F 10 15 6E 9 £ 5 be 09F05E 9/1/3 105E multiply uniform radix 10 01 1C 1A 1C 1 + 10 + 001CAC 0/0/0 1CAC Halt 16 01 1C 1F 13 6 1 + £ 3 061CF3 6/0/0 1CF3 select (N) 02 01 1F 1A 0E 2 1 £ 10 . 021FAE 2/0/0 1FAE transfer (A) to N 16 01 1F 1A 0D 6 1 £ 10 : 061FAD 6/0/0 1FAD select (N) 02 01 1F 1A 1C 2 1 £ 10 + 021FAC 2/0/0 1FAC transfer (A) to N 38 19 1F 07 16 H 9 £ 7 6 189F76 24/1/0 1F76 unconditional jump 16 19 1C 0E 10 6 9 + . 069CE0 6/1/0 1CE0 select (N) 02 19 1F 0B 08 2 9 £ 11 8 029FB8 2/1/0 1FB8 transfer (A) to N 16 01 1C 1F 13 6 1 + £ 3 061CF3 6/0/0 1CF3 select (N) 15 01 1C 0E 1A 5 1 + . 10 051CEA 5/0/0 1CEA subtract (N) from (A) 3B 13 1C 0B 1A * 3 + 11 10 1B3CBA 27/0/1 1CBA jump A != Z 16 01 1F 0B 15 6 1 £ 11 5 061FB5 6/0/0 1FB5 select (N) 3B 13 19 04 0E * 3 9 4 . 1B394E 27/0/1 194E jump A != Z 02 01 1F 0B 04 2 1 £ 11 4 021FB4 2/0/0 1FB4 transfer (A) to N 38 19 1F 15 04 H 9 £ 5 4 189F54 24/1/0 1F54 unconditional jump 6E 00 00 00 00 be 1A 16 01 1C 1F 10 6 1 + £ 0A61CF 10/0/3 1CF multiply and add 02 3B 01 1C 0B 2 * 1 + 11 02B1CB 2/1/1 11CB transfer (A) to N 0E 16 01 1C 1F . 6 1 + £ 0E61CF 14/0/3 1CF replace selected bits 08 07 01 1C 1F 8 7 1 + £ 0871CF 8/0/3 11CF merge constant length 13 16 01 1C 1F 3 6 1 + £ 0361CF 3/0/3 1CF copy (A) to N 10 04 01 1C 1F 4 1 + £ 0041CF 0/0/2 1CF replace (B) by (N) 10 04 01 1C 1F 4 1 + £ 0041CF 0/0/2 1CF replace (B) by (N) 10 04 01 1C 1F 4 1 + £ 0041CF 0/0/2 1CF replace (B) by (N) 10 04 01 1C 1F 4 1 + £ 0041CF 0/0/2 1CF replace (B) by (N) 01 13 01 1C 1F 1 3 1 + £ 0131CF 1/0/1 11CF prepare for digit collation 0D 04 01 1C 1F : 4 1 + £ 0D41CF 13/0/2 1CF divide uniform radix 0D 32 19 10 01 : B 9 1 0D2901 13/0/1 901 divide uniform radix 1F 04 01 1C 0E £ 4 1 + . 0F41CE 15/0/2 1CE collate and add 1F 32 08 10 10 £ B 8 0F2800 15/0/1 800 collate and add 04 6E 00 00 00 4 be 04E000 4/1/3 0 add (N) to (A) 1C 08 04 01 1C + 8 4 1 + 0C841C 12/1/0 41C convert 1F 13 02 01 1C £ 3 2 1 + 0F321C 15/0/1 121C collate and add 1F 0D 16 01 1C £ : 6 1 + 0FD61C 15/1/2 161C collate and add 0E 1F 32 19 10 . £ B 9 0EF290 14/1/3 1290 replace selected bits 01 1F 3B 01 1C 1 £ * 1 + 01FB1C 1/1/3 1B1C select literal address 0D 10 02 01 1F : 2 1 £ 0D021F 13/0/0 21F divide uniform radix 0B 1A 15 01 1C 11 10 5 1 + 0BA51C 11/1/1 51C multiply and subtract 1F 0D 02 01 1C £ : 2 1 + 0FD21C 15/1/2 121C collate and add 1F 0D 16 01 1C £ : 6 1 + 0FD61C 15/1/2 161C collate and add 1F 0D 38 19 1F £ : H 9 £ 0FD89F 15/1/2 189F collate and add 15 04 10 10 10 5 4 054000 5/0/2 0 subtract (N) from (A) 10 01 10 10 10 1 001000 0/0/0 1000 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 1A 10 10 10 10 00A000 0/1/1 0 replace registers 10 10 6E 00 00 be 000E00 0/0/0 E00 Halt 1C 0D 16 10 10 + : 6 0CD600 12/1/2 1600 convert 10 16 04 10 10 6 4 006400 0/0/3 400 set radix 10 10 10 10 10 000000 0/0/0 0 Halt 13 0E 08 10 10 3 . 8 03E800 3/1/3 800 copy (A) to N 10 10 10 10 02 2 000002 0/0/0 2 Halt 07 01 10 10 10 7 1 071000 7/0/0 1000 augment (N) by (A) 10 10 10 10 01 1 000001 0/0/0 1 Halt 1C 0E 1F 10 01 + . £ 1 0CEF01 12/1/3 F01 convert 1C 1F 15 10 01 + £ 5 1 0CF501 12/1/3 1501 convert 1C 0D 02 10 01 + : 2 1 0CD201 12/1/2 1201 convert 1C 1F 04 10 10 + £ 4 0CF400 12/1/3 1400 convert 10 10 02 10 10 2 000200 0/0/0 200 Halt 10 10 04 10 10 4 000400 0/0/0 400 Halt 10 16 02 10 10 6 2 006200 0/0/3 200 set radix 10 10 08 6E 00 8 be 0008E0 0/0/0 8E0 Halt 01 1C 0E 04 10 1 + . 4 01CE40 1/1/2 E40 subtract literal address 10 10 10 02 10 2 000020 0/0/0 20 Halt 10 10 1F 1F 10 £ £ 000FF0 0/0/0 FF0 Halt 10 10 10 10 07 7 000007 0/0/0 7 Halt 0D 10 10 10 10 : 0D0000 13/0/0 0 divide uniform radix 10 10 07 0E 10 7 . 0007E0 0/0/0 7E0 Halt 10 10 07 0D 01 7 : 1 0007D1 0/0/0 7D1 Halt 08 16 19 1F 32 8 6 9 £ B 0869F2 8/0/3 9F2 merge constant length 01 10 02 10 10 1 2 010200 1/0/0 200 table look up 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 01 1C 1F 04 10 1 + £ 4 01CF40 1/1/2 F40 subtract literal address 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 6E be 00000E 0/0/0 E Halt 10 01 1C 1F 02 1 + £ 2 001CF2 0/0/0 1CF2 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 0B 04 11 4 0000B4 0/0/0 B4 Halt 20 10 10 16 02 - 6 2 100062 16/0/0 62 Invalid 10 10 10 10 10 000000 0/0/0 0 Halt 10 04 19 04 08 4 9 4 8 004948 0/0/2 948 replace (B) by (N) 01 10 13 10 13 1 3 3 010303 1/0/0 303 table look up 10 10 13 07 1A 3 7 10 00037A 0/0/0 37A Halt 1F 01 1F 0E 04 £ 1 £ . 4 0F1FE4 15/0/0 1FE4 collate and add 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 02 2 000002 0/0/0 2 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 0E 01 10 02 10 . 1 2 0E1020 14/0/0 1020 replace selected bits 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 6E 00 00 00 00 be 78 00 00 00 00 Y 080000 8/0/0 0 merge constant length File: old-paper-tapes/Snips.leo 58 10 32 10 10 Q B 080200 8/0/0 200 merge constant length 70 10 13 10 10 0 3 000300 0/0/0 300 Halt 38 08 10 04 13 H 8 4 3 188043 24/1/0 43 unconditional jump 10 08 10 10 10 8 008000 0/1/0 0 copy registers 38 1C 10 08 10 H + 8 18C080 24/1/2 80 modify address of next 01 16 1F 08 10 1 6 £ 8 016F80 1/0/3 F80 interchange area addresses 29 0E 08 10 10 I . 8 19E800 25/1/3 800 conditional Halt 38 1C 10 08 10 H + 8 18C080 24/1/2 80 modify address of next 23 02 10 10 10 C 2 132000 19/0/1 0 input one block/reset timer 38 1C 10 08 10 H + 8 18C080 24/1/2 80 modify address of next 2A 08 10 10 10 = 8 1A8000 26/1/0 0 test route N1 10 10 10 02 01 2 1 000021 0/0/0 21 Halt 38 19 1F 1C 0B H 9 £ + 11 189FCB 24/1/0 1FCB unconditional jump 10 10 10 02 13 2 3 000023 0/0/0 23 Halt 10 10 10 01 1C 1 + 00001C 0/0/0 1C Halt 38 0D 1F 0D 1F H : £ : £ 18DFDF 24/1/2 1FDF modify address of next 16 19 1F 0E 13 6 9 £ . 3 069FE3 6/1/0 1FE3 select (N) 38 0D 1F 0D 0E H : £ : . 18DFDE 24/1/2 1FDE modify address of next 02 10 10 10 10 2 020000 2/0/0 0 transfer (A) to N 16 19 1F 0D 1C 6 9 £ : + 069FDC 6/1/0 1FDC select (N) 07 19 1F 0D 0E 7 9 £ : . 079FDE 7/1/0 1FDE augment (N) by (A) 16 01 1F 0D 1F 6 1 £ : £ 061FDF 6/0/0 1FDF select (N) 15 01 1F 0D 10 5 1 £ : 051FD0 5/0/0 1FD0 subtract (N) from (A) 3B 13 1F 0D 01 * 3 £ : 1 1B3FD1 27/0/1 1FD1 jump A != Z 02 01 1F 0D 1F 2 1 £ : £ 021FDF 2/0/0 1FDF transfer (A) to N 38 19 1F 1C 08 H 9 £ + 8 189FC8 24/1/0 1FC8 unconditional jump 10 10 10 10 01 1 000001 0/0/0 1 Halt 10 10 10 10 02 2 000002 0/0/0 2 Halt 10 01 0E 0B 16 1 . 11 6 001EB6 0/0/0 1EB6 Halt 10 10 10 01 04 1 4 000014 0/0/0 14 Halt 70 10 75 10 7C 0 V , 00050C 0/0/0 50C Halt 70 10 67 10 02 0 X 2 000702 0/0/0 702 Halt 58 10 07 10 13 Q 7 3 080703 8/0/0 703 merge constant length 70 10 04 10 7A 0 4 ( 00040A 0/0/0 40A Halt 70 10 13 10 5E 0 3 hf 00030E 0/0/0 30E Halt 70 10 04 10 51 0 4 J 000401 0/0/0 401 Halt 40 10 32 10 04 & B 4 000204 0/0/0 204 Halt 70 10 16 10 61 0 6 / 000601 0/0/0 601 Halt 58 10 67 10 54 Q X M 080704 8/0/0 704 merge constant length 70 10 67 10 02 0 X 2 000702 0/0/0 702 Halt 70 10 67 10 58 0 X Q 000708 0/0/0 708 Halt 70 10 76 10 02 0 W 2 000602 0/0/0 602 Halt 70 10 75 10 73 0 V T 000503 0/0/0 503 Halt 70 10 62 10 13 0 S 3 000203 0/0/0 203 Halt 08 10 16 10 58 8 6 Q 080608 8/0/0 608 merge constant length 08 10 13 10 4A 8 3 # 08030A 8/0/0 30A merge constant length 08 10 13 10 43 8 3 L 080303 8/0/0 303 merge constant length 58 10 13 10 51 Q 3 J 080301 8/0/0 301 merge constant length 10 10 62 10 7C S , 00020C 0/0/0 20C Halt 10 10 02 10 7A 2 ( 00020A 0/0/0 20A Halt 70 10 62 10 6D 0 S ; 00020D 0/0/0 20D Halt 40 10 26 10 6D & F ; 00060D 0/0/0 60D Halt 40 10 46 10 75 & O V 000605 0/0/0 605 Halt 40 10 62 10 10 & S 000200 0/0/0 200 Halt 58 10 52 10 10 Q K 080200 8/0/0 200 merge constant length 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 40 10 10 & 000000 0/0/0 0 Halt 40 10 40 10 10 & & 000000 0/0/0 0 Halt 16 08 10 10 19 6 8 9 068009 6/1/0 9 select (N) 02 01 1F 1C 16 2 1 £ + 6 021FC6 2/0/0 1FC6 transfer (A) to N 10 01 1F 0E 10 1 £ . 001FE0 0/0/0 1FE0 Halt 38 19 1F 1C 16 H 9 £ + 6 189FC6 24/1/0 1FC6 unconditional jump 10 10 20 10 10 - 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 1F 10 29 £ I 000F09 0/0/0 F09 Halt 6E 00 00 00 00 be 10 01 0E 0B 16 1 . 11 6 001EB6 0/0/0 1EB6 Halt 10 01 0E 0B 16 1 . 11 6 001EB6 0/0/0 1EB6 Halt 10 01 1F 0D 10 1 £ : 001FD0 0/0/0 1FD0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 01 0E 0B 16 1 . 11 6 001EB6 0/0/0 1EB6 Halt 10 10 10 10 1F £ 00000F 0/0/0 F Halt 10 10 10 10 01 1 000001 0/0/0 1 Halt 10 10 10 10 01 1 000001 0/0/0 1 Halt 10 10 10 10 13 3 000003 0/0/0 3 Halt 01 04 0B 16 01 1 4 11 6 1 014B61 1/0/2 B61 round off 16 01 1F 19 04 6 1 £ 9 4 061F94 6/0/0 1F94 select (N) 02 10 10 08 01 2 8 1 020081 2/0/0 81 transfer (A) to N 10 10 10 10 01 1 000001 0/0/0 1 Halt 16 01 1F 01 0E 6 1 £ 1 . 061F1E 6/0/0 1F1E select (N) 6E 00 00 00 00 be 10 01 0E 0B 1A 1 . 11 10 001EBA 0/0/0 1EBA Halt 02 01 1F 01 0D 2 1 £ 1 : 021F1D 2/0/0 1F1D transfer (A) to N 29 0E 10 01 10 I . 1 19E010 25/1/3 10 conditional Halt 29 1C 10 01 10 I + 1 19C010 25/1/2 10 interrogate indicators 3B 01 0E 0D 13 * 1 . : 3 1B1ED3 27/0/0 1ED3 jump A = Z 16 08 10 08 10 6 8 8 068080 6/1/0 80 select (N) 02 19 1F 0B 16 2 9 £ 11 6 029FB6 2/1/0 1FB6 transfer (A) to N 2A 0B 1F 1A 08 = 11 £ 10 8 1ABFA8 26/1/1 1FA8 set modification register 37 1A 10 10 10 G 10 17A000 23/1/1 0 copy into tag 29 02 10 10 02 I 2 2 192002 25/0/1 2 step on and test 38 19 0E 1C 01 H 9 . + 1 189EC1 24/1/0 1EC1 unconditional jump 2A 0B 1F 19 16 = 11 £ 9 6 1ABF96 26/1/1 1F96 set modification register 02 1A 10 10 10 2 10 02A000 2/1/1 0 transfer (A) to N 29 02 10 10 02 I 2 2 192002 25/0/1 2 step on and test 38 19 0E 1C 15 H 9 . + 5 189EC5 24/1/0 1EC5 unconditional jump 6E 00 00 00 00 be 10 01 0E 1C 08 1 . + 8 001EC8 0/0/0 1EC8 Halt 2A 0B 1F 19 08 = 11 £ 9 8 1ABF98 26/1/1 1F98 set modification register 02 1A 10 10 10 2 10 02A000 2/1/1 0 transfer (A) to N 29 02 10 10 02 I 2 2 192002 25/0/1 2 step on and test 38 19 0E 1C 19 H 9 . + 9 189EC9 24/1/0 1EC9 unconditional jump 2A 0B 1F 19 1A = 11 £ 9 10 1ABF9A 26/1/1 1F9A set modification register 16 01 1F 19 15 6 1 £ 9 5 061F95 6/0/0 1F95 select (N) 37 1A 10 10 10 G 10 17A000 23/1/1 0 copy into tag 29 02 10 10 02 I 2 2 192002 25/0/1 2 step on and test 38 19 0E 1C 0E H 9 . + . 189ECE 24/1/0 1ECE unconditional jump 16 19 1F 0B 16 6 9 £ 11 6 069FB6 6/1/0 1FB6 select (N) 02 08 10 08 10 2 8 8 028080 2/1/0 80 transfer (A) to N 02 10 10 10 19 2 9 020009 2/0/0 9 transfer (A) to N 02 10 10 01 01 2 1 1 020011 2/0/0 11 transfer (A) to N 02 10 10 01 19 2 1 9 020019 2/0/0 19 transfer (A) to N 6E 00 00 00 00 be 10 01 0E 0D 16 1 . : 6 001ED6 0/0/0 1ED6 Halt 38 19 0E 0D 0E H 9 . : . 189EDE 24/1/0 1EDE unconditional jump 29 0B 1F 1F 1F I 11 £ £ £ 19BFFF 25/1/1 1FFF clear indicators 16 01 1F 0B 13 6 1 £ 11 3 061FB3 6/0/0 1FB3 select (N) 3B 01 0E 0B 08 * 1 . 11 8 1B1EB8 27/0/0 1EB8 jump A = Z 02 01 1F 0B 1A 2 1 £ 11 10 021FBA 2/0/0 1FBA transfer (A) to N 38 19 1C 04 16 H 9 + 4 6 189C46 24/1/0 1C46 unconditional jump 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 29 1C 10 10 01 I + 1 19C001 25/1/2 1 interrogate indicators 02 01 1F 0B 10 2 1 £ 11 021FB0 2/0/0 1FB0 transfer (A) to N 29 1C 10 10 02 I + 2 19C002 25/1/2 2 interrogate indicators 02 01 1F 0B 01 2 1 £ 11 1 021FB1 2/0/0 1FB1 transfer (A) to N 29 1C 10 10 04 I + 4 19C004 25/1/2 4 interrogate indicators 02 01 1F 0B 02 2 1 £ 11 2 021FB2 2/0/0 1FB2 transfer (A) to N 6E 00 00 00 00 be 10 01 0E 0E 04 1 . . 4 001EE4 0/0/0 1EE4 Halt 29 1C 10 10 08 I + 8 19C008 25/1/2 8 interrogate indicators 02 01 1F 0B 13 2 1 £ 11 3 021FB3 2/0/0 1FB3 transfer (A) to N 38 19 0E 0E 08 H 9 . . 8 189EE8 24/1/0 1EE8 unconditional jump 10 10 10 10 10 000000 0/0/0 0 Halt 38 0D 1F 0B 10 H : £ 11 18DFB0 24/1/2 1FB0 modify address of next 16 01 1F 15 15 6 1 £ 5 5 061F55 6/0/0 1F55 select (N) 02 01 1F 15 04 2 1 £ 5 4 021F54 2/0/0 1F54 transfer (A) to N 38 0D 1F 0B 10 H : £ 11 18DFB0 24/1/2 1FB0 modify address of next 16 01 1F 08 16 6 1 £ 8 6 061F86 6/0/0 1F86 select (N) 02 01 1F 08 15 2 1 £ 8 5 021F85 2/0/0 1F85 transfer (A) to N 16 01 1F 19 1C 6 1 £ 9 + 061F9C 6/0/0 1F9C select (N) 38 1C 10 08 10 H + 8 18C080 24/1/2 80 modify address of next 02 10 10 04 10 2 4 020040 2/0/0 40 transfer (A) to N 16 01 1F 19 0D 6 1 £ 9 : 061F9D 6/0/0 1F9D select (N) 6E 00 00 00 00 be 10 01 0E 1F 02 1 . £ 2 001EF2 0/0/0 1EF2 Halt 02 10 10 16 07 2 6 7 020067 2/0/0 67 transfer (A) to N 38 1C 10 08 10 H + 8 18C080 24/1/2 80 modify address of next 2A 08 10 10 10 = 8 1A8000 26/1/0 0 test route N1 38 19 1F 10 01 H 9 £ 1 189F01 24/1/0 1F01 unconditional jump 38 19 1F 10 13 H 9 £ 3 189F03 24/1/0 1F03 unconditional jump 38 19 0E 1F 19 H 9 . £ 9 189EF9 24/1/0 1EF9 unconditional jump 10 10 10 10 07 7 000007 0/0/0 7 Halt 02 01 1F 0B 1A 2 1 £ 11 10 021FBA 2/0/0 1FBA transfer (A) to N 38 1C 10 16 07 H + 6 7 18C067 24/1/2 67 modify address of next 02 08 10 01 0E 2 8 1 . 02801E 2/1/0 1E transfer (A) to N 38 1C 10 08 10 H + 8 18C080 24/1/2 80 modify address of next 01 16 19 1C 10 1 6 9 + 0169C0 1/0/3 9C0 interchange area addresses 38 1C 10 08 10 H + 8 18C080 24/1/2 80 modify address of next 23 02 10 10 10 C 2 132000 19/0/1 0 input one block/reset timer 6E 00 00 00 00 be 01 1F 10 10 38 1 £ H 01F008 1/1/3 1008 select literal address 19 1F 10 15 10 9 £ 5 09F050 9/1/3 1050 multiply uniform radix 10 10 10 13 38 3 H 000038 0/0/0 38 Halt 19 0E 1F 13 10 9 . £ 3 09EF30 9/1/3 F30 multiply uniform radix 10 10 10 15 38 5 H 000058 0/0/0 58 Halt 19 0E 1F 13 38 9 . £ 3 H 09EF38 9/1/3 F38 multiply uniform radix 1C 10 08 10 2A + 8 = 0C080A 12/0/0 80A convert 08 10 10 10 10 8 080000 8/0/0 0 merge constant length 10 10 10 19 38 9 H 000098 0/0/0 98 Halt 19 1F 10 15 38 9 £ 5 H 09F058 9/1/3 1058 multiply uniform radix 19 1F 01 04 38 9 £ 1 4 H 09F148 9/1/3 1148 multiply uniform radix 19 0E 1F 13 02 9 . £ 3 2 09EF32 9/1/3 F32 multiply uniform radix 01 1F 0B 1A 38 1 £ 11 10 H 01FBA8 1/1/3 1BA8 select literal address 1C 10 16 07 02 + 6 7 2 0C0672 12/0/0 672 convert 08 10 01 0E 6E 8 1 . be 0801EE 8/0/0 1EE merge constant length 10 01 1F 10 0E 1 £ . 001F0E 0/0/0 1F0E Halt 38 1C 10 08 10 H + 8 18C080 24/1/2 80 modify address of next 01 16 19 1C 10 1 6 9 + 0169C0 1/0/3 9C0 interchange area addresses 29 0E 08 10 10 I . 8 19E800 25/1/3 800 conditional Halt 38 1C 10 08 10 H + 8 18C080 24/1/2 80 modify address of next 23 02 10 10 10 C 2 132000 19/0/1 0 input one block/reset timer 38 19 1F 01 16 H 9 £ 1 6 189F16 24/1/0 1F16 unconditional jump 10 10 10 10 0B 11 00000B 0/0/0 B Halt 38 19 0E 1F 04 H 9 . £ 4 189EF4 24/1/0 1EF4 unconditional jump 10 15 1F 1A 16 5 £ 10 6 005FA6 0/0/2 1FA6 replace (B) by (N) 1F 10 10 16 07 £ 6 7 0F0067 15/0/0 67 collate and add 13 01 1F 0B 08 3 1 £ 11 8 031FB8 3/0/0 1FB8 copy (A) to N 04 01 1F 1A 13 4 1 £ 10 3 041FA3 4/0/0 1FA3 add (N) to (A) 02 01 1F 0B 19 2 1 £ 11 9 021FB9 2/0/0 1FB9 transfer (A) to N 16 01 1F 1A 02 6 1 £ 10 2 061FA2 6/0/0 1FA2 select (N) 6E 00 00 00 00 be 1C 02 01 1F 0B + 2 1 £ 11 0C21FB 12/0/1 1FB convert 04 10 10 10 10 4 040000 4/0/0 0 add (N) to (A) 10 38 19 1F 02 H 9 £ 2 0089F2 0/1/0 9F2 copy registers 01 38 19 1F 13 1 H 9 £ 3 0189F3 1/1/0 9F3 table look up 1A 38 19 1C 04 10 H 9 + 4 0A89C4 10/1/0 9C4 multiply and add 1A 16 01 1F 1A 10 6 1 £ 10 0A61FA 10/0/3 1FA multiply and add 10 07 01 1F 0B 7 1 £ 11 0071FB 0/0/3 11FB set radix 08 38 1C 10 16 8 H + 6 088C06 8/1/0 C06 merge variable length 07 16 08 10 10 7 6 8 076800 7/0/3 800 augment (N) by (A) 13 15 01 1F 1A 3 5 1 £ 10 0351FA 3/0/2 11FA copy (A) to N 02 02 01 1F 1A 2 2 1 £ 10 0221FA 2/0/1 1FA transfer (A) to N 1C 38 1C 10 16 + H + 6 0C8C06 12/1/0 C06 convert 07 16 08 10 10 7 6 8 076800 7/0/3 800 augment (N) by (A) 15 02 01 1F 1A 5 2 1 £ 10 0521FA 5/0/1 1FA subtract (N) from (A) 0D 6E 00 00 00 : be 0DE000 13/1/3 0 divide uniform radix 02 1A 38 1C 10 2 10 H + 02A8C0 2/1/1 8C0 transfer (A) to N 16 07 16 08 10 6 7 6 8 067680 6/0/3 1680 select (N) 10 0B 02 01 1F 11 2 1 £ 00B21F 0/1/1 121F replace registers 1A 0E 38 1C 10 10 . H + 0AE8C0 10/1/3 8C0 multiply and add 16 07 16 08 10 6 7 6 8 067680 6/0/3 1680 select (N) 10 0D 02 01 1F : 2 1 £ 00D21F 0/1/2 121F replace (B) by (N) 1A 1F 10 15 1F 10 £ 5 £ 0AF05F 10/1/3 105F multiply and add 1A 1C 1F 01 1F 10 + £ 1 £ 0ACF1F 10/1/2 F1F multiply and add 1A 02 02 01 1F 10 2 2 1 £ 0A221F 10/0/1 21F multiply and add 0B 15 38 1C 10 11 5 H + 0B58C0 11/0/2 18C0 multiply and subtract 16 07 16 08 10 6 7 6 8 067680 6/0/3 1680 select (N) 10 07 02 01 1F 7 2 1 £ 00721F 0/0/3 121F set radix 0B 1C 38 1C 10 11 + H + 0BC8C0 11/1/2 8C0 multiply and subtract 16 07 16 08 10 6 7 6 8 067680 6/0/3 1680 select (N) 10 19 6E 00 00 9 be 009E00 0/1/0 1E00 copy registers 1F 13 08 04 01 £ 3 8 4 1 0F3841 15/0/1 1841 collate and add 1F 1A 01 02 01 £ 10 1 2 1 0FA121 15/1/1 121 collate and add 1F 0B 0D 16 19 £ 11 : 6 9 0FBD69 15/1/1 1D69 collate and add 1F 1A 04 38 1C £ 10 4 H + 0FA48C 15/1/1 48C collate and add 10 16 07 15 08 6 7 5 8 006758 0/0/3 758 set radix 10 01 0E 3B 01 1 . * 1 001EB1 0/0/0 1EB1 Halt 1F 04 10 10 10 £ 4 0F4000 15/0/2 0 collate and add 10 10 0D 38 19 : H 9 000D89 0/0/0 D89 Halt 0E 1F 13 38 1C . £ 3 H + 0EF38C 14/1/3 138C replace selected bits 10 16 07 16 08 6 7 6 8 006768 0/0/3 768 set radix 10 10 01 15 01 1 5 1 000151 0/0/0 151 Halt 1F 1A 02 15 01 £ 10 2 5 1 0FA251 15/1/1 251 collate and add 1F 1A 1C 3B 01 £ 10 + * 1 0FACB1 15/1/1 CB1 collate and add 1F 04 07 10 10 £ 4 7 0F4700 15/0/2 700 collate and add 10 10 1F 6E 00 £ be 000FE0 0/0/0 FE0 Halt 01 1F 04 16 38 1 £ 4 6 H 01F468 1/1/3 1468 select literal address 19 0E 1F 13 38 9 . £ 3 H 09EF38 9/1/3 F38 multiply uniform radix 0D 1F 0B 08 16 : £ 11 8 6 0DFB86 13/1/3 1B86 divide uniform radix 08 10 10 02 15 8 2 5 080025 8/0/0 25 merge constant length 19 1F 19 0E 3B 9 £ 9 . * 09F9EB 9/1/3 19EB multiply uniform radix 13 1F 15 08 02 3 £ 5 8 2 03F582 3/1/3 1582 copy (A) to N 01 1F 0B 04 16 1 £ 11 4 6 01FB46 1/1/3 1B46 select literal address 01 1F 0B 15 3B 1 £ 11 5 * 01FB5B 1/1/3 1B5B select literal address 01 1F 15 10 10 1 £ 5 01F500 1/1/3 1500 select literal address 10 10 01 1F 38 1 £ H 0001F8 0/0/0 1F8 Halt 19 0E 1F 13 16 9 . £ 3 6 09EF36 9/1/3 F36 multiply uniform radix 01 1F 01 1F 02 1 £ 1 £ 2 01F1F2 1/1/3 11F2 select literal address 01 1F 01 0D 38 1 £ 1 : H 01F1D8 1/1/3 11D8 select literal address 0D 1F 0B 08 16 : £ 11 8 6 0DFB86 13/1/3 1B86 divide uniform radix 08 10 10 13 6E 8 3 be 08003E 8/0/0 3E merge constant length 10 01 1F 15 04 1 £ 5 4 001F54 0/0/0 1F54 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 38 19 1F 15 0B H 9 £ 5 11 189F5B 24/1/0 1F5B unconditional jump 38 19 0D 10 10 H 9 : 189D00 24/1/0 1D00 unconditional jump 38 19 0D 04 1A H 9 : 4 10 189D4A 24/1/0 1D4A unconditional jump 16 01 1F 1A 02 6 1 £ 10 2 061FA2 6/0/0 1FA2 select (N) 02 01 1F 0B 04 2 1 £ 11 4 021FB4 2/0/0 1FB4 transfer (A) to N 38 19 1F 15 10 H 9 £ 5 189F50 24/1/0 1F50 unconditional jump 38 0D 1F 1A 1C H : £ 10 + 18DFAC 24/1/2 1FAC modify address of next 02 10 10 10 01 2 1 020001 2/0/0 1 transfer (A) to N 16 01 1F 0B 04 6 1 £ 11 4 061FB4 6/0/0 1FB4 select (N) 3B 13 1F 16 08 * 3 £ 6 8 1B3F68 27/0/1 1F68 jump A != Z 38 0D 1F 1A 1C H : £ 10 + 18DFAC 24/1/2 1FAC modify address of next 16 10 10 10 10 6 060000 6/0/0 0 select (N) 02 01 1F 0B 0B 2 1 £ 11 11 021FBB 2/0/0 1FBB transfer (A) to N 6E 00 00 00 00 be 02 15 01 1F 1A 2 5 1 £ 10 0251FA 2/0/2 11FA transfer (A) to N 02 38 0D 1F 1A 2 H : £ 10 028DFA 2/1/0 DFA transfer (A) to N 1C 02 08 10 10 + 2 8 0C2800 12/0/1 800 convert 10 16 01 1F 0B 6 1 £ 11 0061FB 0/0/3 1FB set radix 0B 38 0D 1F 1A 11 H : £ 10 0B8DFA 11/1/0 DFA multiply and subtract 1C 02 10 10 10 + 2 0C2000 12/0/1 0 convert 10 16 01 1F 0B 6 1 £ 11 0061FB 0/0/3 1FB set radix 15 3B 01 1F 16 5 * 1 £ 6 05B1F6 5/1/1 11F6 subtract (N) from (A) 0D 16 01 1F 1A : 6 1 £ 10 0D61FA 13/0/3 1FA divide uniform radix 1F 38 0D 1F 1A £ H : £ 10 0F8DFA 15/1/0 DFA collate and add 1C 37 08 10 10 + G 8 0C7800 12/0/3 1800 convert 10 16 19 1F 0B 6 9 £ 11 0069FB 0/0/3 9FB set radix 1C 3B 01 1F 07 + * 1 £ 7 0CB1F7 12/1/1 11F7 convert 16 2A 0B 1F 0B 6 = 11 £ 11 06ABFB 6/1/1 BFB select (N) 1C 6E 00 00 00 + be 0CE000 12/1/3 0 convert 07 10 16 01 1F 7 6 1 £ 07061F 7/0/0 61F augment (N) by (A) 1A 1F 37 1A 10 10 £ G 10 0AF7A0 10/1/3 17A0 multiply and add 10 10 29 02 10 I 2 000920 0/0/0 920 Halt 10 02 38 19 1F 2 H 9 £ 00289F 0/0/1 89F Invalid 07 01 02 19 1F 7 1 2 9 £ 07129F 7/0/0 129F augment (N) by (A) 0B 1C 02 19 1F 11 + 2 9 £ 0BC29F 11/1/2 29F multiply and subtract 0B 1C 29 0E 04 11 + I . 4 0BC9E4 11/1/2 9E4 multiply and subtract 10 10 16 01 1F 6 1 £ 00061F 0/0/0 61F Halt 1A 02 15 01 1F 10 2 5 1 £ 0A251F 10/0/1 51F multiply and add 0B 15 02 01 1F 11 5 2 1 £ 0B521F 11/0/2 121F multiply and subtract 0B 15 16 01 1F 11 5 6 1 £ 0B561F 11/0/2 161F multiply and subtract 1A 1C 04 01 1F 10 + 4 1 £ 0AC41F 10/1/2 41F multiply and add 1A 02 13 01 1F 10 2 3 1 £ 0A231F 10/0/1 31F multiply and add 1A 1C 15 01 1F 10 + 5 1 £ 0AC51F 10/1/2 51F multiply and add 1A 0D 6E 00 00 10 : be 0ADE00 10/1/2 1E00 multiply and add 1F 07 0E 3B 15 £ 7 . * 5 0F7EB5 15/0/3 1EB5 collate and add 1F 08 15 16 01 £ 8 5 6 1 0F8561 15/1/0 561 collate and add 1F 1A 01 07 01 £ 10 1 7 1 0FA171 15/1/1 171 collate and add 1F 0B 08 16 01 £ 11 8 6 1 0FB861 15/1/1 1861 collate and add 1F 0B 08 15 01 £ 11 8 5 1 0FB851 15/1/1 1851 collate and add 1F 0B 19 3B 13 £ 11 9 * 3 0FB9B3 15/1/1 19B3 collate and add 1F 04 07 38 19 £ 4 7 H 9 0F4789 15/0/2 789 collate and add 1F 10 15 10 10 £ 5 0F0500 15/0/0 500 collate and add 10 10 10 38 19 H 9 000089 0/0/0 89 Halt 1F 08 08 38 19 £ 8 8 H 9 0F8889 15/1/0 889 collate and add 0D 1A 0D 16 01 : 10 : 6 1 0DAD61 13/1/1 D61 divide uniform radix 1F 0B 02 3B 13 £ 11 2 * 3 0FB2B3 15/1/1 12B3 collate and add 0E 0D 07 16 01 . : 7 6 1 0ED761 14/1/2 1761 replace selected bits 1F 1A 1F 32 10 £ 10 £ B 0FAF20 15/1/1 F20 collate and add 10 10 04 6E 00 4 be 0004E0 0/0/0 4E0 Halt 01 1F 08 1C 01 1 £ 8 + 1 01F8C1 1/1/3 18C1 select literal address 1A 10 10 1A 02 10 10 2 0A00A2 10/0/0 A2 multiply and add 01 1F 0B 1A 16 1 £ 11 10 6 01FBA6 1/1/3 1BA6 select literal address 01 1F 1A 07 02 1 £ 10 7 2 01FA72 1/1/3 1A72 select literal address 10 10 10 19 16 9 6 000096 0/0/0 96 Halt 19 1F 1A 1A 13 9 £ 10 10 3 09FAA3 9/1/3 1AA3 multiply uniform radix 08 10 10 1A 02 8 10 2 0800A2 8/0/0 A2 merge constant length 10 10 10 1A 38 10 H 0000A8 0/0/0 A8 Halt 08 10 10 19 10 8 9 080090 8/0/0 90 merge constant length 10 10 02 10 10 2 000200 0/0/0 200 Halt 10 10 10 1F 10 £ 0000F0 0/0/0 F0 Halt 10 10 10 04 10 4 000040 0/0/0 40 Halt 01 1C 04 16 10 1 + 4 6 01C460 1/1/2 460 subtract literal address 01 1F 1C 10 10 1 £ + 01FC00 1/1/3 1C00 select literal address 04 10 10 10 6E 4 be 04000E 4/0/0 E add (N) to (A) 10 01 1F 19 1A 1 £ 9 10 001F9A 0/0/0 1F9A Halt 10 10 10 1A 10 10 0000A0 0/0/0 A0 Halt 10 04 10 10 10 4 004000 0/0/2 0 replace (B) by (N) 1F 01 1F 1C 10 £ 1 £ + 0F1FC0 15/0/0 1FC0 collate and add 1F 01 1F 0E 10 £ 1 £ . 0F1FE0 15/0/0 1FE0 collate and add 19 16 19 16 19 9 6 9 6 9 096969 9/0/3 969 multiply uniform radix 16 19 16 19 16 6 9 6 9 6 069696 6/1/0 1696 select (N) 10 10 10 01 04 1 4 000014 0/0/0 14 Halt 10 10 10 10 02 2 000002 0/0/0 2 Halt 10 10 10 10 01 1 000001 0/0/0 1 Halt 10 10 10 01 1C 1 + 00001C 0/0/0 1C Halt 10 10 10 10 10 000000 0/0/0 0 Halt 07 0E 10 10 10 7 . 07E000 7/1/3 0 augment (N) by (A) 10 07 1F 1F 1F 7 £ £ £ 007FFF 0/0/3 1FFF set radix 2A 07 1F 0B 1A = 7 £ 11 10 1A7FBA 26/0/3 1FBA leave master routine 6E 00 00 00 00 be 08 10 10 10 10 8 080000 8/0/0 0 merge constant length 10 10 10 10 1A 10 00000A 0/0/0 A Halt 10 29 0B 1F 1F I 11 £ £ 009BFF 0/1/0 1BFF copy registers 1F 2A 13 1F 1A £ = 3 £ 10 0FA3FA 15/1/1 3FA collate and add 0E 10 01 1C 0E . 1 + . 0E01CE 14/0/0 1CE replace selected bits 08 10 01 1C 0E 8 1 + . 0801CE 8/0/0 1CE merge constant length 08 10 01 0B 07 8 1 11 7 0801B7 8/0/0 1B7 merge constant length 1A 10 10 10 10 10 0A0000 10/0/0 0 multiply and add 1F 10 10 10 10 £ 0F0000 15/0/0 0 collate and add 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 01 10 10 10 10 1 010000 1/0/0 0 table look up 10 6E 00 00 00 be 00E000 0/1/3 0 Invalid 0B 16 10 10 10 11 6 0B6000 11/0/3 0 multiply and subtract 01 19 10 10 10 1 9 019000 1/1/0 1000 table look up 02 10 10 01 1F 2 1 £ 02001F 2/0/0 1F transfer (A) to N 1C 1C 10 01 1F + + 1 £ 0CC01F 12/1/2 1F convert 0D 1C 1F 10 10 : + £ 0DCF00 13/1/2 F00 divide uniform radix 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 13 3 000003 0/0/0 3 Halt 0E 08 10 10 07 . 8 7 0E8007 14/1/0 7 replace selected bits 0D 02 10 10 10 : 2 0D2000 13/0/1 0 divide uniform radix 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 1C 04 0E + 4 . 000C4E 0/0/0 C4E Halt 04 02 10 10 04 4 2 4 042004 4/0/1 4 add (N) to (A) 01 04 10 10 10 1 4 014000 1/0/2 0 round off 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 6E 00 00 be 000E00 0/0/0 E00 Halt 1F 1C 04 10 10 £ + 4 0FC400 15/1/2 400 collate and add 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 38 1C H + 00008C 0/0/0 8C Halt 10 08 10 01 16 8 1 6 008016 0/1/0 16 copy registers 1F 1C 10 29 0E £ + I . 0FC09E 15/1/2 9E collate and add 08 10 10 38 1C 8 H + 08008C 8/0/0 8C merge constant length 10 08 10 23 02 8 C 2 008032 0/1/0 32 copy registers 10 10 10 02 01 2 1 000021 0/0/0 21 Halt 1F 0D 10 15 01 £ : 5 1 0FD051 15/1/2 1051 collate and add 1F 1C 1F 07 10 £ + £ 7 0FCF70 15/1/2 F70 collate and add 10 08 10 38 19 8 H 9 008089 0/1/0 89 copy registers 1F 0D 01 10 10 £ : 1 0FD100 15/1/2 1100 collate and add 10 04 10 10 10 4 004000 0/0/2 0 replace (B) by (N) 10 01 1C 38 19 1 + H 9 001C89 0/0/0 1C89 Halt 0E 0B 16 6E 00 . 11 6 be 0EB6E0 14/1/1 16E0 replace selected bits 10 13 1C 15 10 3 + 5 003C50 0/0/1 1C50 Invalid 10 13 1C 15 10 3 + 5 003C50 0/0/1 1C50 Invalid 10 13 1F 0D 04 3 £ : 4 003FD4 0/0/1 1FD4 Invalid 10 10 10 10 02 2 000002 0/0/0 2 Halt 10 10 10 10 04 4 000004 0/0/0 4 Halt 10 13 0D 0B 0D 3 : 11 : 003DBD 0/0/1 1DBD Invalid 10 10 10 10 1F £ 00000F 0/0/0 F Halt 10 10 10 10 01 1 000001 0/0/0 1 Halt 10 10 10 10 01 1 000001 0/0/0 1 Halt 10 10 10 10 04 4 000004 0/0/0 4 Halt 02 07 02 16 02 2 7 2 6 2 027262 2/0/3 1262 transfer (A) to N 38 01 0E 1F 0D H 1 . £ : 181EFD 24/0/0 1EFD modify address of next 16 19 0D 13 08 6 9 : 3 8 069D38 6/1/0 1D38 select (N) 02 19 0D 1A 1A 2 9 : 10 10 029DAA 2/1/0 1DAA transfer (A) to N 38 01 0E 1F 0D H 1 . £ : 181EFD 24/0/0 1EFD modify address of next 6E 00 00 00 00 be 04 16 19 0D 10 4 6 9 : 0469D0 4/0/3 9D0 add (N) to (A) 08 02 19 0D 19 8 2 9 : 9 0829D9 8/0/1 9D9 merge constant length 16 38 01 0E 1F 6 H 1 . £ 0681EF 6/1/0 1EF select (N) 0D 16 19 0D 10 : 6 9 : 0D69D0 13/0/3 9D0 divide uniform radix 10 02 19 0D 1A 2 9 : 10 0029DA 0/0/1 9DA Invalid 16 38 01 0E 1F 6 H 1 . £ 0681EF 6/1/0 1EF select (N) 0D 16 19 0D 10 : 6 9 : 0D69D0 13/0/3 9D0 divide uniform radix 04 02 19 0D 1A 4 2 9 : 10 0429DA 4/0/1 9DA add (N) to (A) 08 16 01 0E 1F 8 6 1 . £ 0861EF 8/0/3 1EF merge constant length 0E 3B 13 1C 16 . * 3 + 6 0EB3C6 14/1/1 13C6 replace selected bits 10 16 19 0D 02 6 9 : 2 0069D2 0/0/3 9D2 set radix 1C 38 19 1C 16 + H 9 + 6 0C89C6 12/1/0 9C6 convert 01 16 19 0D 13 1 6 9 : 3 0169D3 1/0/3 9D3 interchange area addresses 08 02 19 0D 0B 8 2 9 : 11 0829DB 8/0/1 9DB merge constant length 1A 6E 00 00 00 10 be 0AE000 10/1/3 0 multiply and add 16 02 2A 0B 0D 6 2 = 11 : 062ABD 6/0/1 ABD select (N) 01 08 16 01 0E 1 8 6 1 . 01861E 1/1/0 61E table look up 0E 19 37 1A 10 . 9 G 10 0E97A0 14/1/0 17A0 replace selected bits 10 10 29 02 10 I 2 000920 0/0/0 920 Halt 10 02 38 19 1C 2 H 9 + 00289C 0/0/1 89C Invalid 16 04 16 01 0E 6 4 6 1 . 06461E 6/0/2 61E select (N) 0E 1C 37 19 1F . + G 9 £ 0EC79F 14/1/2 79F replace selected bits 0D 1A 37 19 1F : 10 G 9 £ 0DA79F 13/1/1 79F divide uniform radix 1F 0E 16 01 0D £ . 6 1 : 0FE61D 15/1/3 61D collate and add 10 1C 38 0D 0E + H : . 00C8DE 0/1/2 8DE replace (B) by (N) 0D 19 02 10 10 : 9 2 0D9200 13/1/0 1200 divide uniform radix 04 10 16 01 0D 4 6 1 : 04061D 4/0/0 61D add (N) to (A) 10 0D 38 0D 0E : H : . 00D8DE 0/1/2 18DE replace (B) by (N) 0D 0E 02 10 10 : . 2 0DE200 13/1/3 200 divide uniform radix 16 16 6E 00 00 6 6 be 066E00 6/0/3 E00 select (N) 1C 07 10 16 01 + 7 6 1 0C7061 12/0/3 1061 convert 0D 10 0E 38 19 : . H 9 0D0E89 13/0/0 E89 divide uniform radix 1C 07 02 16 01 + 7 2 6 1 0C7261 12/0/3 1261 convert 0D 10 0E 38 0D : . H : 0D0E8D 13/0/0 E8D divide uniform radix 0E 0D 0E 38 1C . : . H + 0EDE8C 14/1/2 1E8C replace selected bits 10 16 16 2C 1C 6 6 ' + 0066CC 0/0/3 6CC set radix 10 10 10 38 0D H : 00008D 0/0/0 8D Halt 0E 0D 19 01 16 . : 9 1 6 0ED916 14/1/2 1916 replace selected bits 19 08 10 2A 0B 9 8 = 11 0980AB 9/1/0 AB multiply uniform radix 0D 1A 16 2A 0D : 10 6 = : 0DA6AD 13/1/1 6AD divide uniform radix 0D 1A 1C 38 0D : 10 + H : 0DAC8D 13/1/1 C8D divide uniform radix 0E 0D 19 2A 08 . : 9 = 8 0ED9A8 14/1/2 19A8 replace selected bits 10 10 10 10 10 000000 0/0/0 0 Halt 10 01 01 38 19 1 1 H 9 001189 0/0/0 1189 Halt 1C 07 1A 6E 00 + 7 10 be 0C7AE0 12/0/3 1AE0 convert 13 1C 07 0E 38 3 + 7 . H 03C7E8 3/1/2 7E8 copy (A) to N 19 1C 08 13 38 9 + 8 3 H 09C838 9/1/2 838 multiply uniform radix 19 1C 08 01 38 9 + 8 1 H 09C818 9/1/2 818 multiply uniform radix 19 1C 08 19 10 9 + 8 9 09C890 9/1/2 890 multiply uniform radix 10 10 01 13 38 1 3 H 000138 0/0/0 138 Halt 19 1C 07 1A 16 9 + 7 10 6 09C7A6 9/1/2 7A6 multiply uniform radix 19 0D 19 16 38 9 : 9 6 H 09D968 9/1/2 1968 multiply uniform radix 0D 0E 0D 19 38 : . : 9 H 0DED98 13/1/3 D98 divide uniform radix 1C 10 04 10 02 + 4 2 0C0402 12/0/0 402 convert 08 10 10 10 2A 8 = 08000A 8/0/0 A merge constant length 0B 0D 1A 08 2A 11 : 10 8 = 0BDA8A 11/1/2 1A8A multiply and subtract 0D 0D 1A 1C 38 : : 10 + H 0DDAC8 13/1/2 1AC8 divide uniform radix 0D 0E 0D 19 38 : . : 9 H 0DED98 13/1/3 D98 divide uniform radix 1C 10 04 10 16 + 4 6 0C0406 12/0/0 406 convert 1A 10 10 10 6E 10 be 0A000E 10/0/0 E multiply and add 10 13 1C 08 1C 3 + 8 + 003C8C 0/0/1 1C8C Invalid 38 1C 10 10 04 H + 4 18C004 24/1/2 4 modify address of next 32 10 10 10 10 B 120000 18/0/0 0 shift logical 38 0D 0E 0D 0E H : . : . 18DEDE 24/1/2 1EDE modify address of next 02 08 10 19 1A 2 8 9 10 02809A 2/1/0 9A transfer (A) to N 38 0D 0E 0D 19 H : . : 9 18DED9 24/1/2 1ED9 modify address of next 23 10 10 10 10 C 130000 19/0/0 0 output 29 04 10 10 02 I 4 2 194002 25/0/2 2 step on and test 38 19 1C 07 1A H 9 + 7 10 189C7A 24/1/0 1C7A unconditional jump 29 02 10 10 02 I 2 2 192002 25/0/1 2 step on and test 38 19 1C 07 19 H 9 + 7 9 189C79 24/1/0 1C79 unconditional jump 38 0D 0E 1F 16 H : . £ 6 18DEF6 24/1/2 1EF6 modify address of next 37 16 10 10 10 G 6 176000 23/0/3 0 select tag 02 01 0D 1A 04 2 1 : 10 4 021DA4 2/0/0 1DA4 transfer (A) to N 02 01 0D 19 19 2 1 : 9 9 021D99 2/0/0 1D99 transfer (A) to N 6E 00 00 00 00 be 1A 38 0D 0E 1F 10 H : . £ 0A8DEF 10/1/0 DEF multiply and add 16 10 04 10 10 6 4 060400 6/0/0 400 select (N) 10 16 01 0E 0E 6 1 . . 0061EE 0/0/3 1EE set radix 0B 13 01 0D 19 11 3 1 : 9 0B31D9 11/0/1 11D9 multiply and subtract 08 0E 01 0D 19 8 . 1 : 9 08E1D9 8/1/3 1D9 merge variable length 19 16 01 0D 19 9 6 1 : 9 0961D9 9/0/3 1D9 multiply uniform radix 19 3B 13 1C 1A 9 * 3 + 10 09B3CA 9/1/1 13CA multiply uniform radix 15 16 19 0D 19 5 6 9 : 9 0569D9 5/0/3 9D9 subtract (N) from (A) 08 3B 15 1C 1A 8 * 5 + 10 08B5CA 8/1/1 15CA merge variable length 15 16 01 0E 0E 5 6 1 . . 0561EE 5/0/3 1EE subtract (N) from (A) 07 02 01 0D 19 7 2 1 : 9 0721D9 7/0/1 1D9 augment (N) by (A) 08 16 19 0D 19 8 6 9 : 9 0869D9 8/0/3 9D9 merge constant length 08 15 19 1F 10 8 5 9 £ 0859F0 8/0/2 19F0 merge constant length 02 3B 13 1C 1A 2 * 3 + 10 02B3CA 2/1/1 13CA transfer (A) to N 0D 6E 00 00 00 : be 0DE000 13/1/3 0 divide uniform radix 1A 08 29 1C 02 10 8 I + 2 0A89C2 10/1/0 9C2 multiply and add 10 10 3B 13 1C * 3 + 000B3C 0/0/0 B3C Halt 1F 1C 16 01 0D £ + 6 1 : 0FC61D 15/1/2 61D collate and add 1A 04 15 01 0E 10 4 5 1 . 0A451E 10/0/2 51E multiply and add 1F 0B 3B 01 1C £ 11 * 1 + 0FBB1C 15/1/1 1B1C collate and add 1F 1C 16 19 1F £ + 6 9 £ 0FC69F 15/1/2 69F collate and add 10 02 02 19 0D 2 2 9 : 00229D 0/0/1 29D Invalid 19 04 16 01 1F 9 4 6 1 £ 09461F 9/0/2 61F multiply uniform radix 10 02 02 01 0D 2 2 1 : 00221D 0/0/1 21D Invalid 19 04 16 01 0E 9 4 6 1 . 09461E 9/0/2 61E multiply uniform radix 1F 0B 02 01 0D £ 11 2 1 : 0FB21D 15/1/1 121D collate and add 1A 13 2A 0B 0D 10 3 = 11 : 0A3ABD 10/0/1 1ABD multiply and add 01 1A 10 15 0D 1 10 5 : 01A05D 1/1/1 5D add literal address 01 13 1F 02 10 1 3 £ 2 013F20 1/0/1 1F20 prepare for digit collation 10 01 6E 00 00 1 be 001E00 0/0/0 1E00 Halt 1C 0B 16 1F 02 + 11 6 £ 2 0CB6F2 12/1/1 16F2 convert 10 10 01 1F 02 1 £ 2 0001F2 0/0/0 1F2 Halt 10 10 01 1F 02 1 £ 2 0001F2 0/0/0 1F2 Halt 10 10 01 32 10 1 B 000120 0/0/0 120 Halt 10 10 15 10 15 5 5 000505 0/0/0 505 Halt 0D 01 04 1F 02 : 1 4 £ 2 0D14F2 13/0/0 14F2 divide uniform radix 10 10 01 13 1A 1 3 10 00013A 0/0/0 13A Halt 10 10 08 04 1A 8 4 10 00084A 0/0/0 84A Halt 10 10 08 32 01 8 B 1 000821 0/0/0 821 Halt 10 01 1C 02 1A 1 + 2 10 001C2A 0/0/0 1C2A Halt 10 10 08 10 15 8 5 000805 0/0/0 805 Halt 0D 01 15 1F 02 : 1 5 £ 2 0D15F2 13/0/0 15F2 divide uniform radix 10 10 01 32 01 1 B 1 000121 0/0/0 121 Halt 10 01 1C 02 02 1 + 2 2 001C22 0/0/0 1C22 Halt 10 10 07 6E 00 7 be 0007E0 0/0/0 7E0 Halt 13 1C 1C 04 16 3 + + 4 6 03CC46 3/1/2 C46 copy (A) to N 02 10 10 10 15 2 5 020005 2/0/0 5 transfer (A) to N 01 0E 0E 07 3B 1 . . 7 * 01EE7B 1/1/3 E7B select literal address 01 1C 1C 19 16 1 + + 9 6 01CC96 1/1/2 C96 subtract literal address 02 10 10 01 3B 2 1 * 02001B 2/0/0 1B transfer (A) to N 15 1C 1C 0B 16 5 + + 11 6 05CCB6 5/1/2 CB6 subtract (N) from (A) 01 0D 01 10 07 1 : 1 7 01D107 1/1/2 1107 subtract literal address 02 10 10 07 02 2 7 2 020072 2/0/0 72 transfer (A) to N 01 1F 10 1A 10 1 £ 10 01F0A0 1/1/3 10A0 select literal address 15 0E 0E 1C 1F 5 . . + £ 05EECF 5/1/3 ECF subtract (N) from (A) 02 10 10 01 02 2 1 2 020012 2/0/0 12 transfer (A) to N 02 10 10 1A 29 2 10 I 0200A9 2/0/0 A9 transfer (A) to N 02 10 10 04 38 2 4 H 020048 2/0/0 48 transfer (A) to N 19 1C 0B 04 1F 9 + 11 4 £ 09CB4F 9/1/2 B4F multiply uniform radix 01 0E 1F 16 6E 1 . £ 6 be 01EF6E 1/1/3 F6E select literal address 10 13 1C 0D 02 3 + : 2 003CD2 0/0/1 1CD2 Invalid 02 01 0D 19 1A 2 1 : 9 10 021D9A 2/0/0 1D9A transfer (A) to N 2A 0B 0D 01 1C = 11 : 1 + 1ABD1C 26/1/1 1D1C set modification register 10 07 0D 01 16 7 : 1 6 007D16 0/0/3 1D16 set radix 16 01 0D 01 02 6 1 : 1 2 061D12 6/0/0 1D12 select (N) 1C 02 10 10 10 + 2 0C2000 12/0/1 0 convert 02 02 10 01 04 2 2 1 4 022014 2/0/1 14 transfer (A) to N 10 07 0E 0D 0E 7 . : . 007EDE 0/0/3 1EDE set radix 29 02 10 10 01 I 2 1 192001 25/0/1 1 step on and test 38 19 1C 0D 04 H 9 + : 4 189CD4 24/1/0 1CD4 unconditional jump 16 01 0D 10 1F 6 1 : £ 061D0F 6/0/0 1D0F select (N) 38 19 1C 0D 0D H 9 + : : 189CDD 24/1/0 1CDD unconditional jump 16 01 0D 10 1F 6 1 : £ 061D0F 6/0/0 1D0F select (N) 38 0D 0E 0D 0E H : . : . 18DEDE 24/1/2 1EDE modify address of next 38 1C 10 16 16 H + 6 6 18C066 24/1/2 66 modify address of next 6E 00 00 00 00 be 10 2C 1C 10 10 ' + 00CC00 0/1/2 C00 replace (B) by (N) 10 38 0D 0E 0D H : . : 008DED 0/1/0 DED copy registers 19 01 16 19 08 9 1 6 9 8 091698 9/0/0 1698 multiply uniform radix 10 2A 0B 0D 1A = 11 : 10 00ABDA 0/1/1 BDA replace registers 16 2A 0D 0D 1A 6 = : : 10 06ADDA 6/1/1 DDA select (N) 1C 38 0D 0E 0D + H : . : 0C8DED 12/1/0 DED convert 19 2A 08 10 10 9 = 8 09A800 9/1/1 800 multiply uniform radix 10 10 10 10 01 1 000001 0/0/0 1 Halt 15 38 19 1C 0E 5 H 9 + . 0589CE 5/1/0 9CE subtract (N) from (A) 15 10 10 10 01 5 1 050001 5/0/0 1 subtract (N) from (A) 07 38 19 1C 07 7 H 9 + 7 0789C7 7/1/0 9C7 augment (N) by (A) 16 16 01 0E 1F 6 6 1 . £ 0661EF 6/0/3 1EF select (N) 07 04 01 0E 0E 7 4 1 . . 0741EE 7/0/2 1EE augment (N) by (A) 08 15 01 0E 1F 8 5 1 . £ 0851EF 8/0/2 11EF merge constant length 16 6E 00 00 00 6 be 06E000 6/1/3 0 select (N) 0E 0E 3B 07 0E . . * 7 . 0EEB7E 14/1/3 B7E replace selected bits 0B 04 38 0D 0E 11 4 H : . 0B48DE 11/0/2 8DE multiply and subtract 0D 19 38 1C 10 : 9 H + 0D98C0 13/1/0 18C0 divide uniform radix 04 10 16 1A 10 4 6 10 0406A0 4/0/0 6A0 add (N) to (A) 10 10 38 0D 0E H : . 0008DE 0/0/0 8DE Halt 0B 1F 32 10 10 11 £ B 0BF200 11/1/3 1200 multiply and subtract 10 10 38 0D 0E H : . 0008DE 0/0/0 8DE Halt 0D 0E 02 08 10 : . 2 8 0DE280 13/1/3 280 divide uniform radix 19 1A 38 0D 0E 9 10 H : . 09A8DE 9/1/1 8DE multiply uniform radix 0D 19 23 10 10 : 9 C 0D9300 13/1/0 1300 divide uniform radix 10 10 29 04 10 I 4 000940 0/0/0 940 Halt 10 02 38 19 1C 2 H 9 + 00289C 0/0/1 89C Invalid 0E 15 29 02 10 . 5 I 2 0E5920 14/0/2 1920 replace selected bits 10 02 38 19 1C 2 H 9 + 00289C 0/0/1 89C Invalid 0E 04 6E 00 00 . 4 be 0E4E00 14/0/2 E00 replace selected bits 1C 1F 1C 16 01 + £ + 6 1 0CFC61 12/1/3 1C61 convert 0E 1F 0E 3B 13 . £ . * 3 0EFEB3 14/1/3 1EB3 replace selected bits 0E 19 10 38 19 . 9 H 9 0E9089 14/1/0 1089 replace selected bits 0E 1A 02 10 10 . 10 2 0EA200 14/1/1 200 replace selected bits 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 02 10 10 2 000200 0/0/0 200 Halt 10 10 02 10 10 2 000200 0/0/0 200 Halt 10 02 02 10 10 2 2 002200 0/0/1 200 Invalid 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 02 10 10 2 000200 0/0/0 200 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 02 02 10 10 2 2 002200 0/0/1 200 Invalid 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 13 0D 10 1A 10 3 : 10 03D0A0 3/1/2 10A0 copy (A) to N 10 10 07 0E 10 7 . 0007E0 0/0/0 7E0 Halt 10 10 10 10 02 2 000002 0/0/0 2 Halt 13 1F 0B 08 02 3 £ 11 8 2 03FB82 3/1/3 1B82 copy (A) to N 13 1F 0D 1C 10 3 £ : + 03FDC0 3/1/3 1DC0 copy (A) to N 13 0D 13 0E 10 3 : 3 . 03D3E0 3/1/2 13E0 copy (A) to N 13 0D 16 08 10 3 : 6 8 03D680 3/1/2 1680 copy (A) to N 10 10 01 10 07 1 7 000107 0/0/0 107 Halt 1A 07 0B 10 10 10 7 11 0A7B00 10/0/3 1B00 multiply and add 13 0D 01 0E 10 3 : 1 . 03D1E0 3/1/2 11E0 copy (A) to N 16 10 10 10 10 6 060000 6/0/0 0 select (N) 08 10 10 10 1F 8 £ 08000F 8/0/0 F merge constant length 10 10 10 10 16 6 000006 0/0/0 6 Halt 16 16 16 16 10 6 6 6 6 066660 6/0/3 660 select (N) 10 10 10 10 6E be 00000E 0/0/0 E Halt 10 13 0D 01 08 3 : 1 8 003D18 0/0/1 1D18 Invalid 10 01 1F 0B 08 1 £ 11 8 001FB8 0/0/0 1FB8 Halt 10 02 10 10 10 2 002000 0/0/1 0 Invalid 10 01 0D 19 04 1 : 9 4 001D94 0/0/0 1D94 Halt 10 01 0D 19 1C 1 : 9 + 001D9C 0/0/0 1D9C Halt 10 01 0D 19 1A 1 : 9 10 001D9A 0/0/0 1D9A Halt 10 01 0D 1A 15 1 : 10 5 001DA5 0/0/0 1DA5 Halt 10 10 10 10 01 1 000001 0/0/0 1 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 01 16 1 6 000016 0/0/0 16 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 02 15 16 2 5 6 000256 0/0/0 256 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 04 10 19 16 4 9 6 004096 0/0/2 96 replace (B) by (N) 10 10 10 10 10 000000 0/0/0 0 Halt 6E 00 00 00 00 be 16 16 15 15 13 6 6 5 5 3 066553 6/0/3 553 select (N) 16 10 10 10 10 6 060000 6/0/0 0 select (N) 10 04 16 07 15 4 6 7 5 004675 0/0/2 675 replace (B) by (N) 01 15 13 16 16 1 5 3 6 6 015366 1/0/2 1366 round off 16 02 16 16 16 6 2 6 6 6 062666 6/0/1 666 select (N) 15 16 19 15 19 5 6 9 5 9 056959 5/0/3 959 subtract (N) from (A) 07 16 07 02 07 7 6 7 2 7 076727 7/0/3 727 augment (N) by (A) 13 07 01 16 07 3 7 1 6 7 037167 3/0/3 1167 copy (A) to N 16 19 07 13 15 6 9 7 3 5 069735 6/1/0 1735 select (N) 15 16 04 16 16 5 6 4 6 6 056466 5/0/3 466 subtract (N) from (A) 16 10 16 16 15 6 6 6 5 060665 6/0/0 665 select (N) 16 16 04 10 10 6 6 4 066400 6/0/3 400 select (N) 10 19 15 01 16 9 5 1 6 009516 0/1/0 1516 copy registers 13 15 15 16 19 3 5 5 6 9 035569 3/0/2 1569 copy (A) to N 15 6E 00 00 00 5 be 05E000 5/1/3 0 subtract (N) from (A) 13 04 02 07 04 3 4 2 7 4 034274 3/0/2 274 copy (A) to N 15 15 15 19 07 5 5 5 9 7 055597 5/0/2 1597 subtract (N) from (A) 02 07 13 15 15 2 7 3 5 5 027355 2/0/3 1355 transfer (A) to N 15 04 15 04 15 5 4 5 4 5 054545 5/0/2 545 subtract (N) from (A) 01 07 19 15 15 1 7 9 5 5 017955 1/0/3 1955 interchange area addresses 01 10 07 0E 16 1 7 . 6 0107E6 1/0/0 7E6 table look up 07 16 10 10 10 7 6 076000 7/0/3 0 augment (N) by (A) 10 10 15 0E 10 5 . 0005E0 0/0/0 5E0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 13 0D 3 : 00003D 0/0/0 3D Halt 10 08 13 10 10 8 3 008300 0/1/0 300 copy registers 10 15 10 13 0D 5 3 : 00503D 0/0/2 103D replace (B) by (N) 02 08 13 10 10 2 8 3 028300 2/1/0 300 transfer (A) to N 10 15 6E 00 00 5 be 005E00 0/0/2 1E00 replace (B) by (N) 0D 04 02 10 13 : 4 2 3 0D4203 13/0/2 203 divide uniform radix 0D 02 1A 13 10 : 2 10 3 0D2A30 13/0/1 A30 divide uniform radix 10 10 15 10 13 5 3 000503 0/0/0 503 Halt 0D 0B 1A 13 10 : 11 10 3 0DBA30 13/1/1 1A30 divide uniform radix 01 02 04 10 13 1 2 4 3 012403 1/0/1 403 prepare for digit collation 0D 02 0E 13 10 : 2 . 3 0D2E30 13/0/1 E30 divide uniform radix 10 10 15 10 13 5 3 000503 0/0/0 503 Halt 0D 13 10 13 10 : 3 3 0D3030 13/0/1 1030 divide uniform radix 10 10 15 10 13 5 3 000503 0/0/0 503 Halt 1F 10 1C 10 10 £ + 0F0C00 15/0/0 C00 collate and add 10 01 15 10 13 1 5 3 001503 0/0/0 1503 Halt 0D 02 1A 13 10 : 2 10 3 0D2A30 13/0/1 A30 divide uniform radix 02 01 01 10 13 2 1 1 3 021103 2/0/0 1103 transfer (A) to N 0D 13 02 13 10 : 3 2 3 0D3230 13/0/1 1230 divide uniform radix 10 10 15 6E 00 5 be 0005E0 0/0/0 5E0 Halt 13 0D 15 10 10 3 : 5 03D500 3/1/2 1500 copy (A) to N 13 1F 10 0D 10 3 £ : 03F0D0 3/1/3 10D0 copy (A) to N 10 02 01 13 10 2 1 3 002130 0/0/1 130 Invalid 13 0D 13 04 13 3 : 3 4 3 03D343 3/1/2 1343 copy (A) to N 10 10 01 15 10 1 5 000150 0/0/0 150 Halt 13 1F 10 0E 10 3 £ . 03F0E0 3/1/3 10E0 copy (A) to N 10 13 01 02 10 3 1 2 003120 0/0/1 1120 Invalid 13 1F 01 10 13 3 £ 1 3 03F103 3/1/3 1103 copy (A) to N 15 02 01 13 10 5 2 1 3 052130 5/0/1 130 subtract (N) from (A) 13 1F 01 02 10 3 £ 1 2 03F120 3/1/3 1120 copy (A) to N 10 13 01 02 10 3 1 2 003120 0/0/1 1120 Invalid 13 0D 13 16 13 3 : 3 6 3 03D363 3/1/2 1363 copy (A) to N 10 10 01 15 10 1 5 000150 0/0/0 150 Halt 13 1F 10 1F 10 3 £ £ 03F0F0 3/1/3 10F0 copy (A) to N 10 10 01 02 6E 1 2 be 00012E 0/0/0 12E Halt 10 13 0D 15 0E 3 : 5 . 003D5E 0/0/1 1D5E Invalid 10 13 0D 02 1C 3 : 2 + 003D2C 0/0/1 1D2C Invalid 13 10 10 10 01 3 1 030001 3/0/0 1 copy (A) to N 10 13 1F 10 1F 3 £ £ 003F0F 0/0/1 1F0F Invalid 10 10 02 10 01 2 1 000201 0/0/0 201 Halt 10 13 0D 02 1C 3 : 2 + 003D2C 0/0/1 1D2C Invalid 13 10 10 10 01 3 1 030001 3/0/0 1 copy (A) to N 10 13 1F 10 1F 3 £ £ 003F0F 0/0/1 1F0F Invalid 10 10 13 10 02 3 2 000302 0/0/0 302 Halt 10 13 0D 1A 1A 3 : 10 10 003DAA 0/0/1 1DAA Invalid 23 10 10 10 01 C 1 130001 19/0/0 1 output 10 13 0D 10 08 3 : 8 003D08 0/0/1 1D08 Invalid 13 10 10 10 15 3 5 030005 3/0/0 5 copy (A) to N 10 13 0D 1A 0E 3 : 10 . 003DAE 0/0/1 1DAE Invalid 10 04 10 10 15 4 5 004005 0/0/2 5 replace (B) by (N) 6E 00 00 00 00 be 1C 10 13 0D 01 + 3 : 1 0C03D1 12/0/0 3D1 convert 10 13 10 10 01 3 1 003001 0/0/1 1001 Invalid 01 10 13 0E 1F 1 3 . £ 0103EF 1/0/0 3EF table look up 16 10 10 01 10 6 1 060010 6/0/0 10 select (N) 04 10 13 0D 01 4 3 : 1 0403D1 4/0/0 3D1 add (N) to (A) 10 13 10 01 10 3 1 003010 0/0/1 1010 Invalid 01 10 13 0D 1A 1 3 : 10 0103DA 1/0/0 3DA table look up 1F 10 01 13 15 £ 1 3 5 0F0135 15/0/0 135 collate and add 02 10 13 0D 0B 2 3 : 11 0203DB 2/0/0 3DB transfer (A) to N 10 10 10 04 01 4 1 000041 0/0/0 41 Halt 01 10 13 0D 0B 1 3 : 11 0103DB 1/0/0 3DB table look up 01 10 10 04 01 1 4 1 010041 1/0/0 41 table look up 01 10 13 0D 0B 1 3 : 11 0103DB 1/0/0 3DB table look up 02 10 04 10 01 2 4 1 020401 2/0/0 401 transfer (A) to N 15 6E 00 00 00 5 be 05E000 5/1/3 0 subtract (N) from (A) 07 1A 10 13 0D 7 10 3 : 07A03D 7/1/1 3D augment (N) by (A) 01 10 13 10 10 1 3 010300 1/0/0 300 table look up 01 01 10 13 0D 1 1 3 : 01103D 1/0/0 103D table look up 19 0E 10 10 01 9 . 1 09E001 9/1/3 1 multiply uniform radix 10 04 10 13 0D 4 3 : 00403D 0/0/2 3D replace (B) by (N) 01 10 13 10 01 1 3 1 010301 1/0/0 301 table look up 10 01 10 13 0D 1 3 : 00103D 0/0/0 103D Halt 0B 13 10 01 13 11 3 1 3 0B3013 11/0/1 1013 multiply and subtract 15 02 10 13 0D 5 2 3 : 05203D 5/0/1 3D subtract (N) from (A) 0B 04 10 10 04 11 4 4 0B4004 11/0/2 4 multiply and subtract 01 01 10 13 0D 1 1 3 : 01103D 1/0/0 103D table look up 0B 15 10 10 04 11 5 4 0B5004 11/0/2 1004 multiply and subtract 01 01 10 13 0D 1 1 3 : 01103D 1/0/0 103D table look up 0B 16 10 04 10 11 6 4 0B6040 11/0/3 40 multiply and subtract 01 15 6E 00 00 1 5 be 015E00 1/0/2 1E00 round off 0D 08 08 10 13 : 8 8 3 0D8803 13/1/0 803 divide uniform radix 0D 01 10 13 10 : 1 3 0D1030 13/0/0 1030 divide uniform radix 10 01 01 10 13 1 1 3 001103 0/0/0 1103 Halt 0D 1A 02 10 10 : 10 2 0DA200 13/1/1 200 divide uniform radix 01 10 04 10 13 1 4 3 010403 1/0/0 403 table look up 0D 01 10 13 10 : 1 3 0D1030 13/0/0 1030 divide uniform radix 01 10 01 10 13 1 1 3 010103 1/0/0 103 table look up 0D 0B 07 10 01 : 11 7 1 0DB701 13/1/1 1701 divide uniform radix 13 16 02 10 13 3 6 2 3 036203 3/0/3 203 copy (A) to N 0D 0B 08 10 01 : 11 8 1 0DB801 13/1/1 1801 divide uniform radix 13 13 02 10 13 3 3 2 3 033203 3/0/1 1203 copy (A) to N 0D 1A 1A 23 10 : 10 10 C 0DAA30 13/1/1 A30 divide uniform radix 10 10 01 10 10 1 000100 0/0/0 100 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 13 0D 19 16 10 3 : 9 6 03D960 3/1/2 1960 copy (A) to N 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 6E be 00000E 0/0/0 E Halt 10 13 0D 1A 04 3 : 10 4 003DA4 0/0/1 1DA4 Invalid 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 6E 00 00 00 00 be 02 10 10 10 10 2 020000 2/0/0 0 transfer (A) to N 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 38 0D 0E 0D H : . : 008DED 0/1/0 DED copy registers 0E 16 10 10 08 . 6 8 0E6008 14/0/3 8 replace selected bits 10 02 01 0E 0D 2 1 . : 0021ED 0/0/1 1ED Invalid 08 6E 00 00 00 8 be 08E000 8/1/3 0 merge variable length 1C 10 10 10 10 + 0C0000 12/0/0 0 convert 10 01 10 07 0E 1 7 . 00107E 0/0/0 107E Halt 0D 0E 38 0B 0E : . H 11 . 0DE8BE 13/1/3 8BE divide uniform radix 0D 0E 16 01 0E : . 6 1 . 0DE61E 13/1/3 61E divide uniform radix 13 07 02 01 0E 3 7 2 1 . 03721E 3/0/3 121E copy (A) to N 13 16 16 01 0E 3 6 6 1 . 03661E 3/0/3 61E copy (A) to N 1F 13 10 15 0E £ 3 5 . 0F305E 15/0/1 105E collate and add 0E 0D 0E 01 0E . : . 1 . 0EDE1E 14/1/2 1E1E replace selected bits 0D 08 02 01 1F : 8 2 1 £ 0D821F 13/1/0 21F divide uniform radix 10 1A 38 0D 0E 10 H : . 00A8DE 0/1/1 8DE replace registers 0D 0E 02 10 10 : . 2 0DE200 13/1/3 200 divide uniform radix 10 19 38 0D 0E 9 H : . 0098DE 0/1/0 18DE copy registers 0D 0E 02 10 10 : . 2 0DE200 13/1/3 200 divide uniform radix 01 01 38 0D 0E 1 1 H : . 0118DE 1/0/0 18DE table look up 0D 0E 6E 00 00 : . be 0DEE00 13/1/3 E00 divide uniform radix 0D 1C 0E 02 10 : + . 2 0DCE20 13/1/2 E20 divide uniform radix 10 01 19 29 0E 1 9 I . 00199E 0/0/0 199E Halt 10 08 10 29 1C 8 I + 00809C 0/1/0 9C copy registers 10 08 10 3B 01 8 * 1 0080B1 0/1/0 B1 copy registers 0D 0E 13 02 01 : . 3 2 1 0DE321 13/1/3 321 divide uniform radix 1F 10 1A 2A 0B £ 10 = 11 0F0AAB 15/0/0 AAB collate and add 0E 0D 0E 38 0D . : . H : 0EDE8D 14/1/2 1E8D replace selected bits 0E 0D 0E 37 1A . : . G 10 0EDE7A 14/1/2 1E7A replace selected bits 10 10 10 29 02 I 2 000092 0/0/0 92 Halt 10 10 02 38 19 2 H 9 000289 0/0/0 289 Halt 0D 0D 04 2A 0B : : 4 = 11 0DD4AB 13/1/2 14AB divide uniform radix 0E 0D 1A 38 0D . : 10 H : 0EDA8D 14/1/2 1A8D replace selected bits 0E 0D 0E 02 1A . : . 2 10 0EDE2A 14/1/2 1E2A replace selected bits 10 10 10 29 02 I 2 000092 0/0/0 92 Halt 10 10 02 6E 00 2 be 0002E0 0/0/0 2E0 Halt 13 0D 0D 1C 38 3 : : + H 03DDC8 3/1/2 1DC8 copy (A) to N 19 0D 0D 19 2A 9 : : 9 = 09DD9A 9/1/2 1D9A multiply uniform radix 0B 0E 0E 10 16 11 . . 6 0BEE06 11/1/3 E06 multiply and subtract 01 0E 0E 1C 38 1 . . + H 01EEC8 1/1/3 EC8 select literal address 0D 0E 0D 0E 37 : . : . G 0DEDE7 13/1/3 DE7 divide uniform radix 1A 10 10 10 29 10 I 0A0009 10/0/0 9 multiply and add 02 10 10 02 38 2 2 H 020028 2/0/0 28 transfer (A) to N 19 0D 0D 1F 2A 9 : : £ = 09DDFA 9/1/2 1DFA multiply uniform radix 0B 0E 0D 1C 16 11 . : + 6 0BEDC6 11/1/3 DC6 multiply and subtract 01 0E 0E 08 37 1 . . 8 G 01EE87 1/1/3 E87 select literal address 1A 10 10 10 29 10 I 0A0009 10/0/0 9 multiply and add 02 10 10 02 38 2 2 H 020028 2/0/0 28 transfer (A) to N 19 0D 0E 15 16 9 : . 5 6 09DE56 9/1/2 1E56 multiply uniform radix 01 0E 0E 1C 37 1 . . + G 01EEC7 1/1/3 EC7 select literal address 19 1F 16 04 6E 9 £ 6 4 be 09F64E 9/1/3 164E multiply uniform radix 10 13 0D 0E 1A 3 : . 10 003DEA 0/0/1 1DEA Invalid 37 19 1F 0B 16 G 9 £ 11 6 179FB6 23/1/0 1FB6 copy into tag 29 1C 10 10 01 I + 1 19C001 25/1/2 1 interrogate indicators 02 01 0E 1F 1C 2 1 . £ + 021EFC 2/0/0 1EFC transfer (A) to N 29 1C 10 10 02 I + 2 19C002 25/1/2 2 interrogate indicators 02 01 0E 1F 0D 2 1 . £ : 021EFD 2/0/0 1EFD transfer (A) to N 29 1C 10 10 04 I + 4 19C004 25/1/2 4 interrogate indicators 02 01 0E 1F 0E 2 1 . £ . 021EFE 2/0/0 1EFE transfer (A) to N 29 1C 10 01 10 I + 1 19C010 25/1/2 10 interrogate indicators 02 01 0E 1F 1F 2 1 . £ £ 021EFF 2/0/0 1EFF transfer (A) to N 29 1C 10 02 10 I + 2 19C020 25/1/2 20 interrogate indicators 02 01 1F 10 10 2 1 £ 021F00 2/0/0 1F00 transfer (A) to N 29 1C 10 10 1A I + 10 19C00A 25/1/2 A interrogate indicators 3B 13 0D 1F 08 * 3 : £ 8 1B3DF8 27/0/1 1DF8 jump A != Z 16 01 0E 0E 19 6 1 . . 9 061EE9 6/0/0 1EE9 select (N) 6E 00 00 00 00 be 08 02 01 0D 1A 8 2 1 : 10 0821DA 8/0/1 1DA merge constant length 0D 02 01 0D 1A : 2 1 : 10 0D21DA 13/0/1 1DA divide uniform radix 1C 38 01 0E 1F + H 1 . £ 0C81EF 12/1/0 1EF convert 1C 16 01 0E 08 + 6 1 . 8 0C61E8 12/0/3 1E8 convert 1C 02 01 0E 08 + 2 1 . 8 0C21E8 12/0/1 1E8 convert 0B 38 01 0E 1F 11 H 1 . £ 0B81EF 11/1/0 1EF multiply and subtract 1C 16 01 0E 0B + 6 1 . 11 0C61EB 12/0/3 1EB convert 02 02 01 0E 0B 2 2 1 . 11 0221EB 2/0/1 1EB transfer (A) to N 01 16 01 0E 0E 1 6 1 . . 0161EE 1/0/3 1EE interchange area addresses 02 38 0D 0E 0D 2 H : . : 028DED 2/1/0 DED transfer (A) to N 08 02 10 10 04 8 2 4 082004 8/0/1 4 merge constant length 10 16 01 0E 0E 6 1 . . 0061EE 0/0/3 1EE set radix 13 38 0D 0E 0D 3 H : . : 038DED 3/1/0 DED copy (A) to N 0E 02 10 10 16 . 2 6 0E2006 14/0/1 6 replace selected bits 07 6E 00 00 00 7 be 07E000 7/1/3 0 augment (N) by (A) 10 16 38 19 0E 6 H 9 . 00689E 0/0/3 89E set radix 10 07 38 0D 0E 7 H : . 0078DE 0/0/3 18DE set radix 0D 08 2A 08 10 : 8 = 8 0D8A80 13/1/0 A80 divide uniform radix 10 10 38 19 0E H 9 . 00089E 0/0/0 89E Halt 01 02 38 19 0E 1 2 H 9 . 01289E 1/0/1 89E prepare for digit collation 01 04 38 19 0E 1 4 H 9 . 01489E 1/0/2 89E round off 10 0D 38 19 0E : H 9 . 00D89E 0/1/2 189E replace (B) by (N) 01 16 38 0D 0E 1 6 H : . 0168DE 1/0/3 8DE interchange area addresses 0D 08 01 16 19 : 8 1 6 9 0D8169 13/1/0 169 divide uniform radix 1C 10 38 0D 0E + H : . 0C08DE 12/0/0 8DE convert 0D 08 23 02 10 : 8 C 2 0D8320 13/1/0 320 divide uniform radix 10 10 38 19 0E H 9 . 00089E 0/0/0 89E Halt 01 08 10 10 10 1 8 018000 1/1/0 0 table look up 10 13 38 19 0E 3 H 9 . 00389E 0/0/1 189E Invalid 10 10 6E 00 00 be 000E00 0/0/0 E00 Halt 0E 01 04 10 10 . 1 4 0E1400 14/0/0 1400 replace selected bits 10 10 15 38 19 5 H 9 000589 0/0/0 589 Halt 0E 10 10 10 10 . 0E0000 14/0/0 0 replace selected bits 10 10 07 38 19 7 H 9 000789 0/0/0 789 Halt 0E 10 10 38 0D . H : 0E008D 14/0/0 8D replace selected bits 0E 0D 08 2A 08 . : 8 = 8 0ED8A8 14/1/2 18A8 replace selected bits 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 19 38 19 9 H 9 000989 0/0/0 989 Halt 0E 01 08 38 19 . 1 8 H 9 0E1889 14/0/0 1889 replace selected bits 0E 02 04 38 19 . 2 4 H 9 0E2489 14/0/1 489 replace selected bits 0E 02 16 38 0D . 2 6 H : 0E268D 14/0/1 68D replace selected bits 0E 0D 08 01 16 . : 8 1 6 0ED816 14/1/2 1816 replace selected bits 19 1C 10 29 0E 9 + I . 09C09E 9/1/2 9E multiply uniform radix 08 10 10 38 0D 8 H : 08008D 8/0/0 8D merge constant length 0E 0D 08 6E 00 . : 8 be 0ED8E0 14/1/2 18E0 replace selected bits 13 0E 02 02 23 3 . 2 2 C 03E223 3/1/3 223 copy (A) to N 02 10 10 10 38 2 H 020008 2/0/0 8 transfer (A) to N 19 0E 02 08 10 9 . 2 8 09E280 9/1/3 280 multiply uniform radix 10 10 10 0B 38 11 H 0000B8 0/0/0 B8 Halt 19 0E 10 10 10 9 . 09E000 9/1/3 0 multiply uniform radix 10 10 01 1F 38 1 £ H 0001F8 0/0/0 1F8 Halt 19 0E 01 08 02 9 . 1 8 2 09E182 9/1/3 182 multiply uniform radix 01 1F 10 1A 02 1 £ 10 2 01F0A2 1/1/3 10A2 select literal address 19 0E 1F 08 10 9 . £ 8 09EF80 9/1/3 F80 multiply uniform radix 15 0E 0E 1C 38 5 . . + H 05EEC8 5/1/3 EC8 subtract (N) from (A) 0D 0E 0D 0E 1F : . : . £ 0DEDEF 13/1/3 DEF divide uniform radix 10 10 16 07 13 6 7 3 000673 0/0/0 673 Halt 01 1F 10 01 04 1 £ 1 4 01F014 1/1/3 1014 select literal address 01 0E 0E 0E 13 1 . . . 3 01EEE3 1/1/3 EE3 select literal address 01 1F 10 16 6E 1 £ 6 be 01F06E 1/1/3 106E select literal address 10 13 0E 13 10 3 . 3 003E30 0/0/1 1E30 Invalid 04 01 0E 0E 1F 4 1 . . £ 041EEF 4/0/0 1EEF add (N) to (A) 13 01 1F 10 04 3 1 £ 4 031F04 3/0/0 1F04 copy (A) to N 04 01 0E 1F 10 4 1 . £ 041EF0 4/0/0 1EF0 add (N) to (A) 13 01 1F 10 15 3 1 £ 5 031F05 3/0/0 1F05 copy (A) to N 04 01 0E 1F 01 4 1 . £ 1 041EF1 4/0/0 1EF1 add (N) to (A) 02 01 1F 10 07 2 1 £ 7 021F07 2/0/0 1F07 transfer (A) to N 10 10 10 10 10 000000 0/0/0 0 Halt 38 19 0E 13 1A H 9 . 3 10 189E3A 24/1/0 1E3A unconditional jump 38 19 0E 15 0D H 9 . 5 : 189E5D 24/1/0 1E5D unconditional jump 38 19 0B 07 0B H 9 11 7 11 189B7B 24/1/0 1B7B unconditional jump 38 01 1F 10 04 H 1 £ 4 181F04 24/0/0 1F04 modify address of next 16 08 10 10 01 6 8 1 068001 6/1/0 1 select (N) 02 01 0E 1F 16 2 1 . £ 6 021EF6 2/0/0 1EF6 transfer (A) to N 38 01 1F 10 04 H 1 £ 4 181F04 24/0/0 1F04 modify address of next 6E 00 00 00 00 be 0E 16 08 10 10 . 6 8 0E6800 14/0/3 800 replace selected bits 13 02 01 0E 1F 3 2 1 . £ 0321EF 3/0/1 1EF copy (A) to N 07 38 01 1F 10 7 H 1 £ 0781F0 7/1/0 1F0 augment (N) by (A) 04 16 08 10 10 4 6 8 046800 4/0/3 800 add (N) to (A) 15 02 01 0E 1F 5 2 1 . £ 0521EF 5/0/1 1EF subtract (N) from (A) 08 38 01 1F 10 8 H 1 £ 0881F0 8/1/0 1F0 merge variable length 04 16 08 10 10 4 6 8 046800 4/0/3 800 add (N) to (A) 07 02 01 0E 1F 7 2 1 . £ 0721EF 7/0/1 1EF augment (N) by (A) 19 38 01 1F 10 9 H 1 £ 0981F0 9/1/0 1F0 multiply uniform radix 04 16 08 10 10 4 6 8 046800 4/0/3 800 add (N) to (A) 19 02 01 0E 1F 9 2 1 . £ 0921EF 9/0/1 1EF multiply uniform radix 1A 38 01 1F 10 10 H 1 £ 0A81F0 10/1/0 1F0 multiply and add 04 16 08 10 10 4 6 8 046800 4/0/3 800 add (N) to (A) 0B 02 01 0E 1F 11 2 1 . £ 0B21EF 11/0/1 1EF multiply and subtract 0B 6E 00 00 00 11 be 0BE000 11/1/3 0 multiply and subtract 04 1C 38 01 1F 4 + H 1 £ 04C81F 4/1/2 81F add (N) to (A) 10 04 16 08 10 4 6 8 004680 0/0/2 680 replace (B) by (N) 10 0D 02 01 1F : 2 1 £ 00D21F 0/1/2 121F replace (B) by (N) 10 1C 38 01 1F + H 1 £ 00C81F 0/1/2 81F replace (B) by (N) 10 04 16 08 10 4 6 8 004680 0/0/2 680 replace (B) by (N) 10 1F 02 01 1F £ 2 1 £ 00F21F 0/1/3 121F Invalid 10 0D 38 01 1F : H 1 £ 00D81F 0/1/2 181F replace (B) by (N) 10 04 16 08 10 4 6 8 004680 0/0/2 680 replace (B) by (N) 01 01 02 01 1F 1 1 2 1 £ 01121F 1/0/0 121F table look up 10 0E 38 01 1F . H 1 £ 00E81F 0/1/3 81F Invalid 10 04 16 08 10 4 6 8 004680 0/0/2 680 replace (B) by (N) 01 13 02 01 1F 1 3 2 1 £ 01321F 1/0/1 121F prepare for digit collation 10 1F 02 19 1F £ 2 9 £ 00F29F 0/1/3 129F Invalid 01 10 02 01 1F 1 2 1 £ 01021F 1/0/0 21F table look up 01 02 6E 00 00 1 2 be 012E00 1/0/1 E00 prepare for digit collation 0E 15 1A 16 01 . 5 10 6 1 0E5A61 14/0/2 1A61 replace selected bits 0E 1F 02 07 01 . £ 2 7 1 0EF271 14/1/3 1271 replace selected bits 1F 10 04 02 01 £ 4 2 1 0F0421 15/0/0 421 collate and add 1F 10 1A 38 01 £ 10 H 1 0F0A81 15/0/0 A81 collate and add 1F 10 01 16 08 £ 1 6 8 0F0168 15/0/0 168 collate and add 10 01 0E 15 19 1 . 5 9 001E59 0/0/0 1E59 Halt 0E 16 1A 3B 01 . 6 10 * 1 0E6AB1 14/0/3 AB1 replace selected bits 0E 16 16 10 10 . 6 6 0E6600 14/0/3 600 replace selected bits 10 10 0D 02 01 : 2 1 000D21 0/0/0 D21 Halt 1F 10 1A 38 01 £ 10 H 1 0F0A81 15/0/0 A81 collate and add 1F 10 01 02 08 £ 1 2 8 0F0128 15/0/0 128 collate and add 10 01 0E 38 19 1 . H 9 001E89 0/0/0 1E89 Halt 0E 10 10 38 01 . H 1 0E0081 14/0/0 81 replace selected bits 1F 10 01 02 08 £ 1 2 8 0F0128 15/0/0 128 collate and add 10 01 0E 6E 00 1 . be 001EE0 0/0/0 1EE0 Halt 13 0E 16 08 38 3 . 6 8 H 03E688 3/1/3 688 copy (A) to N 19 0E 07 16 10 9 . 7 6 09E760 9/1/3 760 multiply uniform radix 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 07 7 000007 0/0/0 7 Halt 0E 10 10 10 10 . 0E0000 14/0/0 0 replace selected bits 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 6E be 00000E 0/0/0 E Halt 10 13 0E 07 16 3 . 7 6 003E76 0/0/1 1E76 Invalid 38 01 1F 10 01 H 1 £ 1 181F01 24/0/0 1F01 modify address of next 16 08 10 10 01 6 8 1 068001 6/1/0 1 select (N) 15 01 0E 1F 16 5 1 . £ 6 051EF6 5/0/0 1EF6 subtract (N) from (A) 3B 01 0E 07 1C * 1 . 7 + 1B1E7C 27/0/0 1E7C jump A = Z 10 10 10 10 1F £ 00000F 0/0/0 F Halt 38 19 0E 10 10 H 9 . 189E00 24/1/0 1E00 unconditional jump 16 01 0E 13 08 6 1 . 3 8 061E38 6/0/0 1E38 select (N) 02 01 0E 13 16 2 1 . 3 6 021E36 2/0/0 1E36 transfer (A) to N 38 01 1F 10 04 H 1 £ 4 181F04 24/0/0 1F04 modify address of next 16 08 10 10 10 6 8 068000 6/1/0 0 select (N) 15 19 0E 0E 04 5 9 . . 4 059EE4 5/1/0 1EE4 subtract (N) from (A) 3B 01 0E 08 08 * 1 . 8 8 1B1E88 27/0/0 1E88 jump A = Z 38 01 1F 10 04 H 1 £ 4 181F04 24/0/0 1F04 modify address of next 16 08 10 10 01 6 8 1 068001 6/1/0 1 select (N) 6E 00 00 00 00 be 04 02 01 1F 10 4 2 1 £ 0421F0 4/0/1 1F0 add (N) to (A) 13 16 01 0E 0E 3 6 1 . . 0361EE 3/0/3 1EE copy (A) to N 0B 02 01 1F 10 11 2 1 £ 0B21F0 11/0/1 1F0 multiply and subtract 02 38 19 0E 08 2 H 9 . 8 0289E8 2/1/0 9E8 transfer (A) to N 0B 16 01 0E 0E 11 6 1 . . 0B61EE 11/0/3 1EE multiply and subtract 07 13 19 1F 10 7 3 9 £ 0739F0 7/0/1 19F0 augment (N) by (A) 02 02 01 1F 10 2 2 1 £ 0221F0 2/0/1 1F0 transfer (A) to N 02 10 10 10 10 2 020000 2/0/0 0 transfer (A) to N 10 38 19 0E 19 H 9 . 9 0089E9 0/1/0 9E9 copy registers 10 38 19 1C 15 H 9 + 5 0089C5 0/1/0 9C5 copy registers 10 38 19 0E 19 H 9 . 9 0089E9 0/1/0 9E9 copy registers 08 38 19 1C 19 8 H 9 + 9 0889C9 8/1/0 9C9 merge variable length 16 16 19 0E 1F 6 6 9 . £ 0669EF 6/0/3 9EF select (N) 08 3B 01 0E 19 8 * 1 . 9 08B1E9 8/1/1 11E9 merge variable length 08 6E 00 00 00 8 be 08E000 8/1/3 0 merge variable length 19 02 2A 0B 0E 9 2 = 11 . 092ABE 9/0/1 ABE multiply uniform radix 1F 08 16 01 0E £ 8 6 1 . 0F861E 15/1/0 61E collate and add 1F 0B 38 0D 0E £ 11 H : . 0FB8DE 15/1/1 18DE collate and add 0D 0E 37 1A 10 : . G 10 0DE7A0 13/1/3 7A0 divide uniform radix 10 10 29 02 10 I 2 000920 0/0/0 920 Halt 10 01 38 19 0E 1 H 9 . 00189E 0/0/0 189E Halt 19 04 16 01 0E 9 4 6 1 . 09461E 9/0/2 61E multiply uniform radix 1F 0B 38 0D 0E £ 11 H : . 0FB8DE 15/1/1 18DE collate and add 1F 16 37 08 10 £ 6 G 8 0F6780 15/0/3 780 collate and add 10 10 02 01 1F 2 1 £ 00021F 0/0/0 21F Halt 10 1A 38 0D 0E 10 H : . 00A8DE 0/1/1 8DE replace registers 1F 16 02 10 10 £ 6 2 0F6200 15/0/3 200 collate and add 10 10 16 01 1F 6 1 £ 00061F 0/0/0 61F Halt 10 02 10 15 1F 2 5 £ 00205F 0/0/1 5F Invalid 10 13 6E 00 00 3 be 003E00 0/0/1 1E00 Invalid 0E 1A 10 38 0D . 10 H : 0EA08D 14/1/1 8D replace selected bits 0E 1F 16 0E 10 . £ 6 . 0EF6E0 14/1/3 16E0 replace selected bits 10 10 10 29 0E I . 00009E 0/0/0 9E Halt 04 10 10 38 01 4 H 1 040081 4/0/0 81 add (N) to (A) 0E 1F 1C 16 01 . £ + 6 1 0EFC61 14/1/3 1C61 replace selected bits 0E 08 0E 02 01 . 8 . 2 1 0E8E21 14/1/0 E21 replace selected bits 0E 08 0B 16 01 . 8 11 6 1 0E8B61 14/1/0 B61 replace selected bits 0E 0E 08 07 01 . . 8 7 1 0EE871 14/1/3 871 replace selected bits 0E 1F 16 16 01 . £ 6 6 1 0EF661 14/1/3 1661 replace selected bits 0E 1F 07 15 01 . £ 7 5 1 0EF751 14/1/3 1751 replace selected bits 0E 1F 16 3B 07 . £ 6 * 7 0EF6B7 14/1/3 16B7 replace selected bits 0E 0B 01 16 01 . 11 1 6 1 0EB161 14/1/1 1161 replace selected bits 0E 1F 04 07 01 . £ 4 7 1 0EF471 14/1/3 1471 replace selected bits 1F 10 04 16 01 £ 4 6 1 0F0461 15/0/0 461 collate and add 1F 10 04 6E 00 £ 4 be 0F04E0 15/0/0 4E0 collate and add 13 0E 1A 0E 15 3 . 10 . 5 03EAE5 3/1/3 AE5 copy (A) to N 01 1F 10 15 3B 1 £ 5 * 01F05B 1/1/3 105B select literal address 13 0E 07 0E 38 3 . 7 . H 03E7E8 3/1/3 7E8 copy (A) to N 19 0E 01 08 10 9 . 1 8 09E180 9/1/3 180 multiply uniform radix 10 10 10 10 38 H 000008 0/0/0 8 Halt 19 0E 0B 04 38 9 . 11 4 H 09EB48 9/1/3 B48 multiply uniform radix 19 1C 0E 13 16 9 + . 3 6 09CE36 9/1/2 E36 multiply uniform radix 01 0E 1F 1F 3B 1 . £ £ * 01EFFB 1/1/3 FFB select literal address 01 0E 0B 0B 29 1 . 11 11 I 01EBB9 1/1/3 BB9 select literal address 0B 1F 1F 1F 16 11 £ £ £ 6 0BFFF6 11/1/3 1FF6 multiply and subtract 01 1F 10 10 3B 1 £ * 01F00B 1/1/3 100B select literal address 01 0D 1C 10 02 1 : + 2 01DC02 1/1/2 1C02 subtract literal address 01 1F 10 1A 38 1 £ 10 H 01F0A8 1/1/3 10A8 select literal address 19 0B 07 10 16 9 11 7 6 09B706 9/1/1 1706 multiply uniform radix 01 0E 1F 0B 6E 1 . £ 11 be 01EFBE 1/1/3 FBE select literal address 10 13 0E 0B 1C 3 . 11 + 003EBC 0/0/1 1EBC Invalid 37 19 0E 1C 0E G 9 . + . 179ECE 23/1/0 1ECE copy into tag 37 19 0E 0D 10 G 9 . : 179ED0 23/1/0 1ED0 copy into tag 37 19 0E 0D 02 G 9 . : 2 179ED2 23/1/0 1ED2 copy into tag 32 10 10 10 04 B 4 120004 18/0/0 4 shift logical 04 01 0E 0E 1A 4 1 . . 10 041EEA 4/0/0 1EEA add (N) to (A) 02 01 1F 10 08 2 1 £ 8 021F08 2/0/0 1F08 transfer (A) to N 38 0D 0E 0D 0E H : . : . 18DEDE 24/1/2 1EDE modify address of next 37 08 10 10 08 G 8 8 178008 23/1/0 8 copy into tag 38 0D 0E 0D 0E H : . : . 18DEDE 24/1/2 1EDE modify address of next 37 08 10 10 1A G 8 10 17800A 23/1/0 A copy into tag 37 19 1F 10 08 G 9 £ 8 179F08 23/1/0 1F08 copy into tag 16 01 0E 0E 07 6 1 . . 7 061EE7 6/0/0 1EE7 select (N) 38 0D 0E 0D 0E H : . : . 18DEDE 24/1/2 1EDE modify address of next 02 10 10 10 1A 2 10 02000A 2/0/0 A transfer (A) to N 6E 00 00 00 00 be 1A 16 01 0E 0E 10 6 1 . . 0A61EE 10/0/3 1EE multiply and add 16 38 0D 0E 0D 6 H : . : 068DED 6/1/0 DED select (N) 0E 02 10 10 10 . 2 0E2000 14/0/1 0 replace selected bits 19 2A 07 1F 10 9 = 7 £ 09A7F0 9/1/1 7F0 multiply uniform radix 08 29 0B 1F 1F 8 I 11 £ £ 089BFF 8/1/0 1BFF merge variable length 1F 3B 13 0E 1C £ * 3 . + 0FB3EC 15/1/1 13EC collate and add 1A 38 0D 0E 0D 10 H : . : 0A8DED 10/1/0 DED multiply and add 0E 02 08 10 10 . 2 8 0E2800 14/0/1 800 replace selected bits 08 2A 13 0E 1F 8 = 3 . £ 08A3EF 8/1/1 3EF merge variable length 1A 10 10 10 10 10 0A0000 10/0/0 0 multiply and add 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 6E 00 00 00 be 00E000 0/1/3 0 Invalid 0D 08 10 10 10 : 8 0D8000 13/1/0 0 divide uniform radix 10 10 10 10 10 000000 0/0/0 0 Halt 02 10 10 10 10 2 020000 2/0/0 0 transfer (A) to N 10 04 10 13 0B 4 3 11 00403B 0/0/2 3B replace (B) by (N) 07 10 10 01 1F 7 1 £ 07001F 7/0/0 1F augment (N) by (A) 01 04 10 01 1F 1 4 1 £ 01401F 1/0/2 1F round off 0B 08 10 10 10 11 8 0B8000 11/1/0 0 multiply and subtract 10 10 10 10 10 000000 0/0/0 0 Halt 1A 10 10 10 10 10 0A0000 10/0/0 0 multiply and add 1A 10 10 13 1F 10 3 £ 0A003F 10/0/0 3F multiply and add 01 04 01 13 1F 1 4 1 3 £ 01413F 1/0/2 13F round off 01 04 01 13 1F 1 4 1 3 £ 01413F 1/0/2 13F round off 16 16 19 16 19 6 6 9 6 9 066969 6/0/3 969 select (N) 16 19 16 19 16 6 9 6 9 6 069696 6/1/0 1696 select (N) 19 16 6E 00 00 9 6 be 096E00 9/0/3 E00 multiply uniform radix 0E 0E 16 16 10 . . 6 6 0EE660 14/1/3 660 replace selected bits 10 10 19 2A 02 9 = 2 0009A2 0/0/0 9A2 Halt 10 10 08 10 10 8 000800 0/0/0 800 Halt 10 10 01 10 10 1 000100 0/0/0 100 Halt 10 10 02 10 13 2 3 000203 0/0/0 203 Halt 0E 1C 0E 2F 1F . + . db £ 0ECEFF 14/1/2 EFF replace selected bits 1F 1F 1F 10 01 £ £ £ 1 0FFF01 15/1/3 1F01 collate and add 1F 1F 1F 10 10 £ £ £ 0FFF00 15/1/3 1F00 collate and add 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 02 10 10 2 000200 0/0/0 200 Halt 10 01 1C 10 10 1 + 001C00 0/0/0 1C00 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 01 04 10 10 1 4 001400 0/0/0 1400 Halt 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 13 0E 1F 04 10 3 . £ 4 03EF40 3/1/3 F40 copy (A) to N 10 10 10 02 10 2 000020 0/0/0 20 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 6E be 00000E 0/0/0 E Halt 10 13 1F 10 02 3 £ 2 003F02 0/0/1 1F02 Invalid 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 6E 00 00 00 00 be 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 6E 00 00 00 be 00E000 0/1/3 0 Invalid 01 0E 10 10 10 1 . 01E000 1/1/3 0 select literal address 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 6E 00 00 be 000E00 0/0/0 E00 Halt 1F 02 1C 10 10 £ 2 + 0F2C00 15/0/1 C00 collate and add 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 13 1F 13 1A 10 3 £ 3 10 03F3A0 3/1/3 13A0 copy (A) to N 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 6E be 00000E 0/0/0 E Halt 10 13 1F 04 08 3 £ 4 8 003F48 0/0/1 1F48 Invalid 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 6E 00 00 00 00 be 16 10 10 10 10 6 060000 6/0/0 0 select (N) 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 6E 00 00 00 be 00E000 0/1/3 0 Invalid 16 04 10 10 10 6 4 064000 6/0/2 0 select (N) 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 6E 00 00 be 000E00 0/0/0 E00 Halt 1F 07 02 10 10 £ 7 2 0F7200 15/0/3 1200 collate and add 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 13 1F 08 10 10 3 £ 8 03F800 3/1/3 1800 copy (A) to N 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 6E be 00000E 0/0/0 E Halt 10 13 1F 08 0E 3 £ 8 . 003F8E 0/0/1 1F8E Invalid 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 6E 00 00 00 00 be 1C 10 10 10 10 + 0C0000 12/0/0 0 convert 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 6E 00 00 00 be 00E000 0/1/3 0 Invalid 1A 1A 10 10 10 10 10 0AA000 10/1/1 0 multiply and add 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 6E 00 00 be 000E00 0/0/0 E00 Halt 1F 0B 08 10 10 £ 11 8 0FB800 15/1/1 1800 collate and add 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 13 1F 1C 16 10 3 £ + 6 03FC60 3/1/3 1C60 copy (A) to N 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 6E be 00000E 0/0/0 E Halt 10 13 1F 0D 04 3 £ : 4 003FD4 0/0/1 1FD4 Invalid 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 6E 00 00 00 00 be 07 10 10 13 0B 7 3 11 07003B 7/0/0 3B augment (N) by (A) 07 10 10 13 1C 7 3 + 07003C 7/0/0 3C augment (N) by (A) 04 0E 10 10 10 4 . 04E000 4/1/3 0 add (N) to (A) 10 02 10 10 10 2 002000 0/0/1 0 Invalid 10 04 10 13 0B 4 3 11 00403B 0/0/2 3B replace (B) by (N) 07 10 10 10 10 7 070000 7/0/0 0 augment (N) by (A) 10 1F 10 10 10 £ 00F000 0/1/3 1000 Invalid 10 02 10 10 10 2 002000 0/0/1 0 Invalid 10 01 10 10 10 1 001000 0/0/0 1000 Halt 10 04 02 07 02 4 2 7 2 004272 0/0/2 272 replace (B) by (N) 16 02 10 10 10 6 2 062000 6/0/1 0 select (N) 10 02 10 07 0E 2 7 . 00207E 0/0/1 7E Invalid 0D 0E 38 0B 0E : . H 11 . 0DE8BE 13/1/3 8BE divide uniform radix 0D 0E 16 01 0E : . 6 1 . 0DE61E 13/1/3 61E divide uniform radix 13 19 6E 00 00 3 9 be 039E00 3/1/0 1E00 copy (A) to N 0B 07 04 02 01 11 7 4 2 1 0B7421 11/0/3 1421 multiply and subtract 0E 13 16 02 19 . 3 6 2 9 0E3629 14/0/1 1629 replace selected bits 1F 10 1C 02 19 £ + 2 9 0F0C29 15/0/0 C29 collate and add 1F 10 0E 02 19 £ . 2 9 0F0E29 15/0/0 E29 collate and add 1F 01 02 29 08 £ 1 2 I 8 0F1298 15/0/0 1298 collate and add 10 10 70 16 01 0 6 1 000061 0/0/0 61 Halt 1C 13 10 38 19 + 3 H 9 0C3089 12/0/1 1089 convert 0D 1C 16 02 19 : + 6 2 9 0DC629 13/1/2 629 divide uniform radix 1F 10 1A 02 19 £ 10 2 9 0F0A29 15/0/0 A29 collate and add 1C 04 10 02 19 + 4 2 9 0C4029 12/0/2 29 convert 1C 04 02 02 19 + 4 2 2 9 0C4229 12/0/2 229 convert 1C 04 04 02 19 + 4 4 2 9 0C4429 12/0/2 429 convert 1C 04 16 02 19 + 4 6 2 9 0C4629 12/0/2 629 convert 1C 04 08 16 01 + 4 8 6 1 0C4861 12/0/2 861 convert 1C 02 1C 6E 00 + 2 + be 0C2CE0 12/0/1 CE0 convert 13 0B 08 02 02 3 11 8 2 2 03B822 3/1/1 1822 copy (A) to N 01 1C 04 10 16 1 + 4 6 01C406 1/1/2 406 subtract literal address 01 1C 13 01 02 1 + 3 1 2 01C312 1/1/2 312 subtract literal address 01 1C 04 1C 16 1 + 4 + 6 01C4C6 1/1/2 4C6 subtract literal address 01 1F 10 01 02 1 £ 1 2 01F012 1/1/3 1012 select literal address 01 1C 04 1A 16 1 + 4 10 6 01C4A6 1/1/2 4A6 subtract literal address 01 1C 13 01 02 1 + 3 1 2 01C312 1/1/2 312 subtract literal address 01 1C 04 0D 16 1 + 4 : 6 01C4D6 1/1/2 4D6 subtract literal address 01 1C 13 02 04 1 + 3 2 4 01C324 1/1/2 324 subtract literal address 01 1C 04 0D 02 1 + 4 : 2 01C4D2 1/1/2 4D2 subtract literal address 01 0B 19 02 16 1 11 9 2 6 01B926 1/1/1 1926 add literal address 01 1C 13 13 38 1 + 3 3 H 01C338 1/1/2 338 subtract literal address 01 1C 04 0D 32 1 + 4 : B 01C4D2 1/1/2 4D2 subtract literal address 10 10 10 10 32 B 000002 0/0/0 2 Halt 19 10 01 16 6E 9 1 6 be 09016E 9/0/0 16E multiply uniform radix 10 13 0B 19 10 3 11 9 003B90 0/0/1 1B90 Invalid 38 01 1C 04 1A H 1 + 4 10 181C4A 24/0/0 1C4A modify address of next 1F 08 10 10 10 £ 8 0F8000 15/1/0 0 collate and add 10 10 10 10 10 000000 0/0/0 0 Halt 15 01 1C 13 04 5 1 + 3 4 051C34 5/0/0 1C34 subtract (N) from (A) 13 01 1C 04 0E 3 1 + 4 . 031C4E 3/0/0 1C4E copy (A) to N 3B 01 0B 1A 13 * 1 11 10 3 1B1BA3 27/0/0 1BA3 jump A = Z 04 01 0E 0E 08 4 1 . . 8 041EE8 4/0/0 1EE8 add (N) to (A) 3B 01 0B 1A 13 * 1 11 10 3 1B1BA3 27/0/0 1BA3 jump A = Z 04 01 1C 13 15 4 1 + 3 5 041C35 4/0/0 1C35 add (N) to (A) 38 01 1C 04 1C H 1 + 4 + 181C4C 24/0/0 1C4C modify address of next 32 10 10 10 10 B 120000 18/0/0 0 shift logical 07 19 1C 04 08 7 9 + 4 8 079C48 7/1/0 1C48 augment (N) by (A) 16 01 1C 04 1C 6 1 + 4 + 061C4C 6/0/0 1C4C select (N) 3B 15 0B 1A 10 * 5 11 10 1B5BA0 27/0/2 1BA0 jump A >= Z 6E 00 00 00 00 be 0E 10 10 10 01 . 1 0E0001 14/0/0 1 replace selected bits 19 38 19 0E 10 9 H 9 . 0989E0 9/1/0 9E0 multiply uniform radix 10 15 01 0E 0E 5 1 . . 0051EE 0/0/2 11EE replace (B) by (N) 19 02 01 1C 04 9 2 1 + 4 0921C4 9/0/1 1C4 multiply uniform radix 1C 38 19 0B 1C + H 9 11 + 0C89BC 12/1/0 9BC convert 01 16 01 0E 0E 1 6 1 . . 0161EE 1/0/3 1EE interchange area addresses 19 07 01 1C 04 9 7 1 + 4 0971C4 9/0/3 11C4 multiply uniform radix 1C 16 01 1C 13 + 6 1 + 3 0C61C3 12/0/3 1C3 convert 02 04 01 1C 04 2 4 1 + 4 0241C4 2/0/2 1C4 transfer (A) to N 1C 02 01 0B 1A + 2 1 11 10 0C21BA 12/0/1 1BA convert 19 16 19 1C 04 9 6 9 + 4 0969C4 9/0/3 9C4 multiply uniform radix 08 10 10 10 10 8 080000 8/0/0 0 merge constant length 10 02 19 1C 04 2 9 + 4 0029C4 0/0/1 9C4 Invalid 08 16 19 1C 04 8 6 9 + 4 0869C4 8/0/3 9C4 merge constant length 19 6E 00 00 00 9 be 09E000 9/1/3 0 multiply uniform radix 1A 1C 38 01 1C 10 + H 1 + 0AC81C 10/1/2 81C multiply and add 04 10 02 10 10 4 2 040200 4/0/0 200 add (N) to (A) 10 10 16 01 1C 6 1 + 00061C 0/0/0 61C Halt 04 0E 3B 01 0B 4 . * 1 11 04EB1B 4/1/3 B1B add (N) to (A) 1C 08 16 01 1C + 8 6 1 + 0C861C 12/1/0 61C convert 02 1F 15 01 1C 2 £ 5 1 + 02F51C 2/1/3 151C transfer (A) to N 04 10 3B 15 0B 4 * 5 11 040B5B 4/0/0 B5B add (N) to (A) 0B 1C 10 10 10 11 + 0BC000 11/1/2 0 multiply and subtract 01 0B 38 19 0E 1 11 H 9 . 01B89E 1/1/1 189E add literal address 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 6E 00 00 be 000E00 0/0/0 E00 Halt 0B 0B 1A 10 10 11 11 10 0BBA00 11/1/1 1A00 multiply and subtract 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 16 01 6 1 000061 0/0/0 61 Halt 0E 0E 08 07 01 . . 8 7 1 0EE871 14/1/3 871 replace selected bits 1C 04 10 16 01 + 4 6 1 0C4061 12/0/2 61 convert 1C 13 01 02 01 + 3 1 2 1 0C3121 12/0/1 1121 convert 1C 04 1C 02 19 + 4 + 2 9 0C4C29 12/0/2 C29 convert 1C 04 08 16 01 + 4 8 6 1 0C4861 12/0/2 861 convert 1C 04 0D 15 01 + 4 : 5 1 0C4D51 12/0/2 D51 convert 0E 0E 19 13 01 . . 9 3 1 0EE931 14/1/3 931 replace selected bits 1C 04 0D 3B 15 + 4 : * 5 0C4DB5 12/0/2 DB5 convert 0B 08 19 16 01 11 8 9 6 1 0B8961 11/1/0 961 multiply and subtract 0E 0E 19 07 01 . . 9 7 1 0EE971 14/1/3 971 replace selected bits 1C 04 1A 38 19 + 4 10 H 9 0C4A89 12/0/2 A89 convert 0B 08 07 6E 00 11 8 7 be 0B87E0 11/1/0 7E0 multiply and subtract 13 0B 1C 08 16 3 11 + 8 6 03BC86 3/1/1 1C86 copy (A) to N 01 1C 04 15 02 1 + 4 5 2 01C452 1/1/2 452 subtract literal address 01 1F 10 13 16 1 £ 3 6 01F036 1/1/3 1036 select literal address 01 1C 04 16 15 1 + 4 6 5 01C465 1/1/2 465 subtract literal address 01 1C 13 19 3B 1 + 3 9 * 01C39B 1/1/2 39B subtract literal address 13 0B 0D 1A 16 3 11 : 10 6 03BDA6 3/1/1 1DA6 copy (A) to N 01 1C 04 01 02 1 + 4 1 2 01C412 1/1/2 412 subtract literal address 01 1F 10 1C 16 1 £ + 6 01F0C6 1/1/3 10C6 select literal address 01 1C 04 02 02 1 + 4 2 2 01C422 1/1/2 422 subtract literal address 01 1F 10 0D 16 1 £ : 6 01F0D6 1/1/3 10D6 select literal address 01 1C 04 13 02 1 + 4 3 2 01C432 1/1/2 432 subtract literal address 01 1F 10 0E 16 1 £ . 6 01F0E6 1/1/3 10E6 select literal address 01 1C 04 15 02 1 + 4 5 2 01C452 1/1/2 452 subtract literal address 01 1F 10 1F 16 1 £ £ 6 01F0F6 1/1/3 10F6 select literal address 01 1C 04 04 6E 1 + 4 4 be 01C44E 1/1/2 44E subtract literal address 10 13 0B 0D 16 3 11 : 6 003BD6 0/0/1 1BD6 Invalid 02 01 1F 01 02 2 1 £ 1 2 021F12 2/0/0 1F12 transfer (A) to N 16 19 1C 13 1A 6 9 + 3 10 069C3A 6/1/0 1C3A select (N) 02 19 1F 01 10 2 9 £ 1 029F10 2/1/0 1F10 transfer (A) to N 38 19 0E 01 08 H 9 . 1 8 189E18 24/1/0 1E18 unconditional jump 2A 1F 1C 02 1C = £ + 2 + 1AFC2C 26/1/3 1C2C set modification register 16 01 1C 02 0E 6 1 + 2 . 061C2E 6/0/0 1C2E select (N) 1C 16 10 10 10 + 6 0C6000 12/0/3 0 convert 02 16 10 10 10 2 6 026000 2/0/3 0 transfer (A) to N 29 16 10 10 01 I 6 1 196001 25/0/3 1 step on and test 38 19 0B 0D 0B H 9 11 : 11 189BDB 24/1/0 1BDB unconditional jump 16 19 1C 04 16 6 9 + 4 6 069C46 6/1/0 1C46 select (N) 3B 01 1C 10 02 * 1 + 2 1B1C02 27/0/0 1C02 jump A = Z 15 01 1C 13 16 5 1 + 3 6 051C36 5/0/0 1C36 subtract (N) from (A) 3B 01 0B 0E 1A * 1 11 . 10 1B1BEA 27/0/0 1BEA jump A = Z 6E 00 00 00 00 be 04 15 01 0E 0E 4 5 1 . . 0451EE 4/0/2 11EE add (N) to (A) 08 3B 01 0B 0E 8 * 1 11 . 08B1BE 8/1/1 11BE merge variable length 08 10 10 10 01 8 1 080001 8/0/0 1 merge constant length 0D 38 19 0E 10 : H 9 . 0D89E0 13/1/0 9E0 divide uniform radix 10 16 01 1C 10 6 1 + 0061C0 0/0/3 1C0 set radix 16 38 19 0B 0E 6 H 9 11 . 0689BE 6/1/0 9BE select (N) 0B 16 01 1C 10 11 6 1 + 0B61C0 11/0/3 1C0 multiply and subtract 15 02 01 1C 10 5 2 1 + 0521C0 5/0/1 1C0 subtract (N) from (A) 04 16 01 1C 04 4 6 1 + 4 0461C4 4/0/3 1C4 add (N) to (A) 13 02 01 0E 1F 3 2 1 . £ 0321EF 3/0/1 1EF copy (A) to N 0B 16 01 1C 04 11 6 1 + 4 0B61C4 11/0/3 1C4 multiply and subtract 04 04 01 1C 04 4 4 1 + 4 0441C4 4/0/2 1C4 add (N) to (A) 04 32 10 10 10 4 B 042000 4/0/1 0 add (N) to (A) 13 04 01 1C 04 3 4 1 + 4 0341C4 3/0/2 1C4 copy (A) to N 15 6E 00 00 00 5 be 05E000 5/1/3 0 subtract (N) from (A) 1F 02 02 01 1C £ 2 2 1 + 0F221C 15/0/1 21C collate and add 04 15 16 01 1C 4 5 6 1 + 04561C 4/0/2 161C add (N) to (A) 04 16 3B 07 0B 4 6 * 7 11 046B7B 4/0/3 B7B add (N) to (A) 1F 1A 16 01 1C £ 10 6 1 + 0FA61C 15/1/1 61C collate and add 04 15 13 01 1C 4 5 3 1 + 04531C 4/0/2 131C add (N) to (A) 04 0B 04 19 1C 4 11 4 9 + 04B49C 4/1/1 149C add (N) to (A) 13 0E 02 19 0E 3 . 2 9 . 03E29E 3/1/3 29E copy (A) to N 1F 16 38 19 0E £ 6 H 9 . 0F689E 15/0/3 89E collate and add 01 08 16 01 1C 1 8 6 1 + 01861C 1/1/0 61C table look up 04 15 02 01 0E 4 5 2 1 . 04521E 4/0/2 121E add (N) to (A) 1F 1A 16 01 0E £ 10 6 1 . 0FA61E 15/1/1 61E collate and add 1F 07 02 01 0E £ 7 2 1 . 0F721E 15/0/3 121E collate and add 1F 16 38 19 0E £ 6 H 9 . 0F689E 15/0/3 89E collate and add 1A 02 10 10 10 10 2 0A2000 10/0/1 0 multiply and add 10 10 6E 00 00 be 000E00 0/0/0 E00 Halt 1C 10 10 10 10 + 0C0000 12/0/0 0 convert 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 16 19 6 9 000069 0/0/0 69 Halt 1C 13 1C 02 19 + 3 + 2 9 0C3C29 12/0/1 1C29 convert 1F 10 04 10 10 £ 4 0F0400 15/0/0 400 collate and add 10 10 10 38 19 H 9 000089 0/0/0 89 Halt 1C 10 07 38 19 + 7 H 9 0C0789 12/0/0 789 convert 0E 08 15 16 01 . 8 5 6 1 0E8561 14/1/0 561 replace selected bits 1C 04 04 3B 01 + 4 4 * 1 0C44B1 12/0/2 4B1 convert 1C 10 0B 16 01 + 11 6 1 0C0B61 12/0/0 B61 convert 1C 04 0B 07 01 + 4 11 7 1 0C4B71 12/0/2 B71 convert 1C 04 15 02 01 + 4 5 2 1 0C4521 12/0/2 521 convert 1F 10 1A 10 15 £ 10 5 0F0A05 15/0/0 A05 collate and add 0E 0E 1C 1F 01 . . + £ 1 0EECF1 14/1/3 CF1 replace selected bits 1C 04 15 6E 00 + 4 5 be 0C45E0 12/0/2 5E0 convert 13 1C 10 0E 02 3 + . 2 03C0E2 3/1/2 E2 copy (A) to N 01 1C 04 15 16 1 + 4 5 6 01C456 1/1/2 456 subtract literal address 01 1C 04 02 04 1 + 4 2 4 01C424 1/1/2 424 subtract literal address 01 1C 04 02 04 1 + 4 2 4 01C424 1/1/2 424 subtract literal address 01 1C 04 02 04 1 + 4 2 4 01C424 1/1/2 424 subtract literal address 01 1C 04 02 04 1 + 4 2 4 01C424 1/1/2 424 subtract literal address 01 1C 04 13 13 1 + 4 3 3 01C433 1/1/2 433 subtract literal address 01 1F 10 13 04 1 £ 3 4 01F034 1/1/3 1034 select literal address 01 1F 10 13 32 1 £ 3 B 01F032 1/1/3 1032 select literal address 19 10 01 1F 04 9 1 £ 4 0901F4 9/0/0 1F4 multiply uniform radix 01 1C 04 01 32 1 + 4 1 B 01C412 1/1/2 412 subtract literal address 08 10 10 04 04 8 4 4 080044 8/0/0 44 merge constant length 01 1C 04 15 02 1 + 4 5 2 01C452 1/1/2 452 subtract literal address 01 1F 10 13 16 1 £ 3 6 01F036 1/1/3 1036 select literal address 01 1C 04 01 6E 1 + 4 1 be 01C41E 1/1/2 41E subtract literal address 10 13 1C 01 1C 3 + 1 + 003C1C 0/0/1 1C1C Invalid 32 01 10 01 1F B 1 1 £ 12101F 18/0/0 101F shift logical 3B 01 0E 08 15 * 1 . 8 5 1B1E85 27/0/0 1E85 jump A = Z 02 01 1F 10 1A 2 1 £ 10 021F0A 2/0/0 1F0A transfer (A) to N 15 01 1F 10 13 5 1 £ 3 051F03 5/0/0 1F03 subtract (N) from (A) 3B 13 0E 08 04 * 3 . 8 4 1B3E84 27/0/1 1E84 jump A != Z 38 19 0E 08 08 H 9 . 8 8 189E88 24/1/0 1E88 unconditional jump 10 10 10 10 01 1 000001 0/0/0 1 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 1A 10 00000A 0/0/0 A Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 16 04 6 4 000064 0/0/0 64 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 13 0E 08 3 . 8 0003E8 0/0/0 3E8 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 6E 00 00 00 00 be 1A 10 02 07 01 10 2 7 1 0A0271 10/0/0 271 multiply and add 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 01 1C 04 1 + 4 0001C4 0/0/0 1C4 Halt 01 10 01 1C 04 1 1 + 4 0101C4 1/0/0 1C4 table look up 07 10 13 1C 02 7 3 + 2 0703C2 7/0/0 3C2 augment (N) by (A) 02 10 01 1C 04 2 1 + 4 0201C4 2/0/0 1C4 transfer (A) to N 15 10 10 10 10 5 050000 5/0/0 0 subtract (N) from (A) 04 10 10 10 10 4 040000 4/0/0 0 add (N) to (A) 08 32 01 10 02 8 B 1 2 082102 8/0/1 102 merge constant length 10 10 10 10 1F £ 00000F 0/0/0 F Halt 1F 10 10 10 07 £ 7 0F0007 15/0/0 7 collate and add 0E 10 10 10 07 . 7 0E0007 14/0/0 7 replace selected bits 0D 10 10 10 16 : 6 0D0006 13/0/0 6 divide uniform radix 02 10 10 10 10 2 020000 2/0/0 0 transfer (A) to N 10 6E 00 00 00 be 00E000 0/1/3 0 Invalid 13 08 10 10 10 3 8 038000 3/1/0 0 copy (A) to N 10 10 10 10 10 000000 0/0/0 0 Halt 19 07 04 16 16 9 7 4 6 6 097466 9/0/3 1466 multiply uniform radix 15 04 10 10 10 5 4 054000 5/0/2 0 subtract (N) from (A) 10 16 10 10 10 6 006000 0/0/3 0 set radix 10 10 10 10 10 000000 0/0/0 0 Halt 10 02 10 10 10 2 002000 0/0/1 0 Invalid 10 10 10 08 10 8 000080 0/0/0 80 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 6E 00 00 be 000E00 0/0/0 E00 Halt 1C 04 16 10 10 + 4 6 0C4600 12/0/2 600 convert 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 40 7B 00 00 00 & ) 00B000 0/1/1 1000 replace registers File: old-paper-tapes/Startfri.leo 58 10 32 10 10 Q B 080200 8/0/0 200 merge constant length 70 10 13 10 10 0 3 000300 0/0/0 300 Halt 38 08 10 04 13 H 8 4 3 188043 24/1/0 43 unconditional jump 10 08 10 10 10 8 008000 0/1/0 0 copy registers 38 1C 10 08 10 H + 8 18C080 24/1/2 80 modify address of next 01 16 1F 08 10 1 6 £ 8 016F80 1/0/3 F80 interchange area addresses 29 0E 08 10 10 I . 8 19E800 25/1/3 800 conditional Halt 38 1C 10 08 10 H + 8 18C080 24/1/2 80 modify address of next 23 02 10 10 10 C 2 132000 19/0/1 0 input one block/reset timer 38 1C 10 08 10 H + 8 18C080 24/1/2 80 modify address of next 2A 08 10 10 10 = 8 1A8000 26/1/0 0 test route N1 10 10 10 02 01 2 1 000021 0/0/0 21 Halt 38 19 1F 1C 0B H 9 £ + 11 189FCB 24/1/0 1FCB unconditional jump 10 10 10 02 13 2 3 000023 0/0/0 23 Halt 10 10 10 01 1C 1 + 00001C 0/0/0 1C Halt 38 0D 1F 0D 1F H : £ : £ 18DFDF 24/1/2 1FDF modify address of next 16 19 1F 0E 13 6 9 £ . 3 069FE3 6/1/0 1FE3 select (N) 38 0D 1F 0D 0E H : £ : . 18DFDE 24/1/2 1FDE modify address of next 02 10 10 10 10 2 020000 2/0/0 0 transfer (A) to N 16 19 1F 0D 1C 6 9 £ : + 069FDC 6/1/0 1FDC select (N) 07 19 1F 0D 0E 7 9 £ : . 079FDE 7/1/0 1FDE augment (N) by (A) 16 01 1F 0D 1F 6 1 £ : £ 061FDF 6/0/0 1FDF select (N) 15 01 1F 0D 10 5 1 £ : 051FD0 5/0/0 1FD0 subtract (N) from (A) 3B 13 1F 0D 01 * 3 £ : 1 1B3FD1 27/0/1 1FD1 jump A != Z 02 01 1F 0D 1F 2 1 £ : £ 021FDF 2/0/0 1FDF transfer (A) to N 38 19 1F 1C 08 H 9 £ + 8 189FC8 24/1/0 1FC8 unconditional jump 10 10 10 10 01 1 000001 0/0/0 1 Halt 10 10 10 10 02 2 000002 0/0/0 2 Halt 10 01 0E 0B 16 1 . 11 6 001EB6 0/0/0 1EB6 Halt 10 10 10 01 04 1 4 000014 0/0/0 14 Halt 70 10 75 10 7C 0 V , 00050C 0/0/0 50C Halt 70 10 67 10 02 0 X 2 000702 0/0/0 702 Halt 58 10 07 10 13 Q 7 3 080703 8/0/0 703 merge constant length 70 10 04 10 7A 0 4 ( 00040A 0/0/0 40A Halt 70 10 13 10 5E 0 3 hf 00030E 0/0/0 30E Halt 70 10 04 10 51 0 4 J 000401 0/0/0 401 Halt 40 10 32 10 04 & B 4 000204 0/0/0 204 Halt 70 10 16 10 61 0 6 / 000601 0/0/0 601 Halt 58 10 67 10 54 Q X M 080704 8/0/0 704 merge constant length 70 10 67 10 02 0 X 2 000702 0/0/0 702 Halt 70 10 67 10 58 0 X Q 000708 0/0/0 708 Halt 70 10 76 10 02 0 W 2 000602 0/0/0 602 Halt 70 10 75 10 73 0 V T 000503 0/0/0 503 Halt 70 10 62 10 13 0 S 3 000203 0/0/0 203 Halt 08 10 16 10 58 8 6 Q 080608 8/0/0 608 merge constant length 08 10 13 10 4A 8 3 # 08030A 8/0/0 30A merge constant length 08 10 13 10 43 8 3 L 080303 8/0/0 303 merge constant length 58 10 13 10 51 Q 3 J 080301 8/0/0 301 merge constant length 10 10 62 10 7C S , 00020C 0/0/0 20C Halt 10 10 02 10 7A 2 ( 00020A 0/0/0 20A Halt 70 10 62 10 6D 0 S ; 00020D 0/0/0 20D Halt 40 10 26 10 6D & F ; 00060D 0/0/0 60D Halt 40 10 46 10 75 & O V 000605 0/0/0 605 Halt 40 10 62 10 10 & S 000200 0/0/0 200 Halt 58 10 52 10 10 Q K 080200 8/0/0 200 merge constant length 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 40 10 10 & 000000 0/0/0 0 Halt 40 10 40 10 10 & & 000000 0/0/0 0 Halt 16 08 10 10 19 6 8 9 068009 6/1/0 9 select (N) 02 01 1F 1C 16 2 1 £ + 6 021FC6 2/0/0 1FC6 transfer (A) to N 10 01 1F 0E 10 1 £ . 001FE0 0/0/0 1FE0 Halt 38 19 1F 1C 16 H 9 £ + 6 189FC6 24/1/0 1FC6 unconditional jump 10 10 20 10 10 - 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 1F 10 29 £ I 000F09 0/0/0 F09 Halt 6E 00 00 00 00 be 10 01 0E 0B 16 1 . 11 6 001EB6 0/0/0 1EB6 Halt 10 01 0E 0B 16 1 . 11 6 001EB6 0/0/0 1EB6 Halt 10 01 1F 0D 10 1 £ : 001FD0 0/0/0 1FD0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 01 0E 0B 16 1 . 11 6 001EB6 0/0/0 1EB6 Halt 10 10 10 10 1F £ 00000F 0/0/0 F Halt 10 10 10 10 01 1 000001 0/0/0 1 Halt 10 10 10 10 01 1 000001 0/0/0 1 Halt 10 10 10 10 13 3 000003 0/0/0 3 Halt 01 04 0B 16 01 1 4 11 6 1 014B61 1/0/2 B61 round off 16 01 1F 19 04 6 1 £ 9 4 061F94 6/0/0 1F94 select (N) 02 10 10 08 01 2 8 1 020081 2/0/0 81 transfer (A) to N 01 1A 10 10 10 1 10 01A000 1/1/1 0 add literal address 16 01 1F 01 0E 6 1 £ 1 . 061F1E 6/0/0 1F1E select (N) 6E 00 00 00 00 be 10 01 0E 0B 1A 1 . 11 10 001EBA 0/0/0 1EBA Halt 02 01 1F 01 0D 2 1 £ 1 : 021F1D 2/0/0 1F1D transfer (A) to N 29 0E 10 01 10 I . 1 19E010 25/1/3 10 conditional Halt 29 1C 10 01 10 I + 1 19C010 25/1/2 10 interrogate indicators 3B 01 0E 0D 13 * 1 . : 3 1B1ED3 27/0/0 1ED3 jump A = Z 16 08 10 08 10 6 8 8 068080 6/1/0 80 select (N) 02 19 1F 0B 16 2 9 £ 11 6 029FB6 2/1/0 1FB6 transfer (A) to N 2A 0B 1F 1A 08 = 11 £ 10 8 1ABFA8 26/1/1 1FA8 set modification register 37 1A 10 10 10 G 10 17A000 23/1/1 0 copy into tag 29 02 10 10 02 I 2 2 192002 25/0/1 2 step on and test 38 19 0E 1C 01 H 9 . + 1 189EC1 24/1/0 1EC1 unconditional jump 2A 0B 1F 19 16 = 11 £ 9 6 1ABF96 26/1/1 1F96 set modification register 02 1A 10 10 10 2 10 02A000 2/1/1 0 transfer (A) to N 29 02 10 10 02 I 2 2 192002 25/0/1 2 step on and test 38 19 0E 1C 15 H 9 . + 5 189EC5 24/1/0 1EC5 unconditional jump 6E 00 00 00 00 be 10 01 0E 1C 08 1 . + 8 001EC8 0/0/0 1EC8 Halt 2A 0B 1F 19 08 = 11 £ 9 8 1ABF98 26/1/1 1F98 set modification register 02 1A 10 10 10 2 10 02A000 2/1/1 0 transfer (A) to N 29 02 10 10 02 I 2 2 192002 25/0/1 2 step on and test 38 19 0E 1C 19 H 9 . + 9 189EC9 24/1/0 1EC9 unconditional jump 2A 0B 1F 19 1A = 11 £ 9 10 1ABF9A 26/1/1 1F9A set modification register 16 01 1F 19 15 6 1 £ 9 5 061F95 6/0/0 1F95 select (N) 37 1A 10 10 10 G 10 17A000 23/1/1 0 copy into tag 29 02 10 10 02 I 2 2 192002 25/0/1 2 step on and test 38 19 0E 1C 0E H 9 . + . 189ECE 24/1/0 1ECE unconditional jump 16 19 1F 0B 16 6 9 £ 11 6 069FB6 6/1/0 1FB6 select (N) 02 08 10 08 10 2 8 8 028080 2/1/0 80 transfer (A) to N 02 10 10 10 19 2 9 020009 2/0/0 9 transfer (A) to N 02 10 10 01 01 2 1 1 020011 2/0/0 11 transfer (A) to N 02 10 10 01 19 2 1 9 020019 2/0/0 19 transfer (A) to N 6E 00 00 00 00 be 10 01 0E 0D 16 1 . : 6 001ED6 0/0/0 1ED6 Halt 38 19 0E 0D 0E H 9 . : . 189EDE 24/1/0 1EDE unconditional jump 29 0B 1F 1F 1F I 11 £ £ £ 19BFFF 25/1/1 1FFF clear indicators 16 01 1F 0B 13 6 1 £ 11 3 061FB3 6/0/0 1FB3 select (N) 3B 01 0E 0B 08 * 1 . 11 8 1B1EB8 27/0/0 1EB8 jump A = Z 02 01 1F 0B 1A 2 1 £ 11 10 021FBA 2/0/0 1FBA transfer (A) to N 38 19 1C 04 16 H 9 + 4 6 189C46 24/1/0 1C46 unconditional jump 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 29 1C 10 10 01 I + 1 19C001 25/1/2 1 interrogate indicators 02 01 1F 0B 10 2 1 £ 11 021FB0 2/0/0 1FB0 transfer (A) to N 29 1C 10 10 02 I + 2 19C002 25/1/2 2 interrogate indicators 02 01 1F 0B 01 2 1 £ 11 1 021FB1 2/0/0 1FB1 transfer (A) to N 29 1C 10 10 04 I + 4 19C004 25/1/2 4 interrogate indicators 02 01 1F 0B 02 2 1 £ 11 2 021FB2 2/0/0 1FB2 transfer (A) to N 6E 00 00 00 00 be 10 01 0E 0E 04 1 . . 4 001EE4 0/0/0 1EE4 Halt 29 1C 10 10 08 I + 8 19C008 25/1/2 8 interrogate indicators 02 01 1F 0B 13 2 1 £ 11 3 021FB3 2/0/0 1FB3 transfer (A) to N 38 19 0E 0E 08 H 9 . . 8 189EE8 24/1/0 1EE8 unconditional jump 10 10 10 10 10 000000 0/0/0 0 Halt 38 0D 1F 0B 10 H : £ 11 18DFB0 24/1/2 1FB0 modify address of next 16 01 1F 15 15 6 1 £ 5 5 061F55 6/0/0 1F55 select (N) 02 01 1F 15 04 2 1 £ 5 4 021F54 2/0/0 1F54 transfer (A) to N 38 0D 1F 0B 10 H : £ 11 18DFB0 24/1/2 1FB0 modify address of next 16 01 1F 08 16 6 1 £ 8 6 061F86 6/0/0 1F86 select (N) 02 01 1F 08 15 2 1 £ 8 5 021F85 2/0/0 1F85 transfer (A) to N 16 01 1F 19 1C 6 1 £ 9 + 061F9C 6/0/0 1F9C select (N) 38 1C 10 08 10 H + 8 18C080 24/1/2 80 modify address of next 02 10 10 04 10 2 4 020040 2/0/0 40 transfer (A) to N 16 01 1F 19 0D 6 1 £ 9 : 061F9D 6/0/0 1F9D select (N) 6E 00 00 00 00 be 10 01 0E 1F 02 1 . £ 2 001EF2 0/0/0 1EF2 Halt 02 10 10 16 07 2 6 7 020067 2/0/0 67 transfer (A) to N 38 1C 10 08 10 H + 8 18C080 24/1/2 80 modify address of next 2A 08 10 10 10 = 8 1A8000 26/1/0 0 test route N1 38 19 1F 10 01 H 9 £ 1 189F01 24/1/0 1F01 unconditional jump 38 19 1F 10 13 H 9 £ 3 189F03 24/1/0 1F03 unconditional jump 38 19 0E 1F 19 H 9 . £ 9 189EF9 24/1/0 1EF9 unconditional jump 10 10 10 10 07 7 000007 0/0/0 7 Halt 02 01 1F 0B 1A 2 1 £ 11 10 021FBA 2/0/0 1FBA transfer (A) to N 38 1C 10 16 07 H + 6 7 18C067 24/1/2 67 modify address of next 02 08 10 01 0E 2 8 1 . 02801E 2/1/0 1E transfer (A) to N 38 1C 10 08 10 H + 8 18C080 24/1/2 80 modify address of next 01 16 19 1C 10 1 6 9 + 0169C0 1/0/3 9C0 interchange area addresses 38 1C 10 08 10 H + 8 18C080 24/1/2 80 modify address of next 23 02 10 10 10 C 2 132000 19/0/1 0 input one block/reset timer 6E 00 00 00 00 be 10 01 1F 10 10 1 £ 001F00 0/0/0 1F00 Halt 38 19 1F 10 15 H 9 £ 5 189F05 24/1/0 1F05 unconditional jump 10 10 10 10 13 3 000003 0/0/0 3 Halt 38 19 0E 1F 13 H 9 . £ 3 189EF3 24/1/0 1EF3 unconditional jump 01 1A 10 10 10 1 10 01A000 1/1/1 0 add literal address 38 19 0E 1F 13 H 9 . £ 3 189EF3 24/1/0 1EF3 unconditional jump 38 1C 10 08 10 H + 8 18C080 24/1/2 80 modify address of next 2A 08 10 10 10 = 8 1A8000 26/1/0 0 test route N1 10 10 10 10 19 9 000009 0/0/0 9 Halt 38 19 1F 10 15 H 9 £ 5 189F05 24/1/0 1F05 unconditional jump 38 19 1F 01 04 H 9 £ 1 4 189F14 24/1/0 1F14 unconditional jump 38 19 0E 1F 13 H 9 . £ 3 189EF3 24/1/0 1EF3 unconditional jump 02 01 1F 0B 1A 2 1 £ 11 10 021FBA 2/0/0 1FBA transfer (A) to N 38 1C 10 16 07 H + 6 7 18C067 24/1/2 67 modify address of next 02 08 10 01 0E 2 8 1 . 02801E 2/1/0 1E transfer (A) to N 6E 00 00 00 00 be 10 01 1F 10 0E 1 £ . 001F0E 0/0/0 1F0E Halt 38 1C 10 08 10 H + 8 18C080 24/1/2 80 modify address of next 01 16 19 1C 10 1 6 9 + 0169C0 1/0/3 9C0 interchange area addresses 29 0E 08 10 10 I . 8 19E800 25/1/3 800 conditional Halt 38 1C 10 08 10 H + 8 18C080 24/1/2 80 modify address of next 23 02 10 10 10 C 2 132000 19/0/1 0 input one block/reset timer 38 19 1F 01 16 H 9 £ 1 6 189F16 24/1/0 1F16 unconditional jump 10 10 10 10 0B 11 00000B 0/0/0 B Halt 38 19 0E 1F 04 H 9 . £ 4 189EF4 24/1/0 1EF4 unconditional jump 10 15 1F 1A 16 5 £ 10 6 005FA6 0/0/2 1FA6 replace (B) by (N) 1F 10 10 16 07 £ 6 7 0F0067 15/0/0 67 collate and add 13 01 1F 0B 08 3 1 £ 11 8 031FB8 3/0/0 1FB8 copy (A) to N 04 01 1F 1A 13 4 1 £ 10 3 041FA3 4/0/0 1FA3 add (N) to (A) 02 01 1F 0B 19 2 1 £ 11 9 021FB9 2/0/0 1FB9 transfer (A) to N 16 01 1F 1A 02 6 1 £ 10 2 061FA2 6/0/0 1FA2 select (N) 6E 00 00 00 00 be 1C 02 01 1F 0B + 2 1 £ 11 0C21FB 12/0/1 1FB convert 04 10 10 10 10 4 040000 4/0/0 0 add (N) to (A) 10 38 19 1F 02 H 9 £ 2 0089F2 0/1/0 9F2 copy registers 01 38 19 1F 13 1 H 9 £ 3 0189F3 1/1/0 9F3 table look up 1A 38 19 1C 04 10 H 9 + 4 0A89C4 10/1/0 9C4 multiply and add 1A 16 01 1F 1A 10 6 1 £ 10 0A61FA 10/0/3 1FA multiply and add 10 07 01 1F 0B 7 1 £ 11 0071FB 0/0/3 11FB set radix 08 38 1C 10 16 8 H + 6 088C06 8/1/0 C06 merge variable length 07 16 08 10 10 7 6 8 076800 7/0/3 800 augment (N) by (A) 13 15 01 1F 1A 3 5 1 £ 10 0351FA 3/0/2 11FA copy (A) to N 02 02 01 1F 1A 2 2 1 £ 10 0221FA 2/0/1 1FA transfer (A) to N 1C 38 1C 10 16 + H + 6 0C8C06 12/1/0 C06 convert 07 16 08 10 10 7 6 8 076800 7/0/3 800 augment (N) by (A) 15 02 01 1F 1A 5 2 1 £ 10 0521FA 5/0/1 1FA subtract (N) from (A) 0D 6E 00 00 00 : be 0DE000 13/1/3 0 divide uniform radix 02 1A 38 1C 10 2 10 H + 02A8C0 2/1/1 8C0 transfer (A) to N 16 07 16 08 10 6 7 6 8 067680 6/0/3 1680 select (N) 10 0B 02 01 1F 11 2 1 £ 00B21F 0/1/1 121F replace registers 1A 0E 38 1C 10 10 . H + 0AE8C0 10/1/3 8C0 multiply and add 16 07 16 08 10 6 7 6 8 067680 6/0/3 1680 select (N) 10 0D 02 01 1F : 2 1 £ 00D21F 0/1/2 121F replace (B) by (N) 1A 1F 10 15 1F 10 £ 5 £ 0AF05F 10/1/3 105F multiply and add 1A 1C 1F 01 1F 10 + £ 1 £ 0ACF1F 10/1/2 F1F multiply and add 1A 02 02 01 1F 10 2 2 1 £ 0A221F 10/0/1 21F multiply and add 0B 15 38 1C 10 11 5 H + 0B58C0 11/0/2 18C0 multiply and subtract 16 07 16 08 10 6 7 6 8 067680 6/0/3 1680 select (N) 10 07 02 01 1F 7 2 1 £ 00721F 0/0/3 121F set radix 0B 1C 38 1C 10 11 + H + 0BC8C0 11/1/2 8C0 multiply and subtract 16 07 16 08 10 6 7 6 8 067680 6/0/3 1680 select (N) 10 19 6E 00 00 9 be 009E00 0/1/0 1E00 copy registers 1F 13 08 04 01 £ 3 8 4 1 0F3841 15/0/1 1841 collate and add 1F 1A 01 02 01 £ 10 1 2 1 0FA121 15/1/1 121 collate and add 1F 0B 0D 16 19 £ 11 : 6 9 0FBD69 15/1/1 1D69 collate and add 1F 1A 04 38 1C £ 10 4 H + 0FA48C 15/1/1 48C collate and add 10 16 07 15 08 6 7 5 8 006758 0/0/3 758 set radix 10 01 0E 3B 01 1 . * 1 001EB1 0/0/0 1EB1 Halt 1F 04 10 10 10 £ 4 0F4000 15/0/2 0 collate and add 10 10 0D 38 19 : H 9 000D89 0/0/0 D89 Halt 0E 1F 13 38 1C . £ 3 H + 0EF38C 14/1/3 138C replace selected bits 10 16 07 16 08 6 7 6 8 006768 0/0/3 768 set radix 10 10 01 15 01 1 5 1 000151 0/0/0 151 Halt 1F 1A 02 15 01 £ 10 2 5 1 0FA251 15/1/1 251 collate and add 1F 1A 1C 3B 01 £ 10 + * 1 0FACB1 15/1/1 CB1 collate and add 1F 04 07 10 10 £ 4 7 0F4700 15/0/2 700 collate and add 10 10 1F 6E 00 £ be 000FE0 0/0/0 FE0 Halt 01 1F 04 16 38 1 £ 4 6 H 01F468 1/1/3 1468 select literal address 19 0E 1F 13 38 9 . £ 3 H 09EF38 9/1/3 F38 multiply uniform radix 0D 1F 0B 08 16 : £ 11 8 6 0DFB86 13/1/3 1B86 divide uniform radix 08 10 10 02 15 8 2 5 080025 8/0/0 25 merge constant length 19 1F 19 0E 3B 9 £ 9 . * 09F9EB 9/1/3 19EB multiply uniform radix 13 1F 15 08 02 3 £ 5 8 2 03F582 3/1/3 1582 copy (A) to N 01 1F 0B 04 16 1 £ 11 4 6 01FB46 1/1/3 1B46 select literal address 01 1F 0B 15 3B 1 £ 11 5 * 01FB5B 1/1/3 1B5B select literal address 01 1F 15 10 10 1 £ 5 01F500 1/1/3 1500 select literal address 10 10 01 1F 38 1 £ H 0001F8 0/0/0 1F8 Halt 19 0E 1F 13 16 9 . £ 3 6 09EF36 9/1/3 F36 multiply uniform radix 01 1F 01 1F 02 1 £ 1 £ 2 01F1F2 1/1/3 11F2 select literal address 01 1F 01 0D 38 1 £ 1 : H 01F1D8 1/1/3 11D8 select literal address 0D 1F 0B 08 16 : £ 11 8 6 0DFB86 13/1/3 1B86 divide uniform radix 08 10 10 13 6E 8 3 be 08003E 8/0/0 3E merge constant length 10 01 1F 15 04 1 £ 5 4 001F54 0/0/0 1F54 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 38 19 1F 15 0B H 9 £ 5 11 189F5B 24/1/0 1F5B unconditional jump 38 19 0D 10 10 H 9 : 189D00 24/1/0 1D00 unconditional jump 38 19 0D 04 1A H 9 : 4 10 189D4A 24/1/0 1D4A unconditional jump 16 01 1F 1A 02 6 1 £ 10 2 061FA2 6/0/0 1FA2 select (N) 02 01 1F 0B 04 2 1 £ 11 4 021FB4 2/0/0 1FB4 transfer (A) to N 38 19 1F 15 10 H 9 £ 5 189F50 24/1/0 1F50 unconditional jump 38 0D 1F 1A 1C H : £ 10 + 18DFAC 24/1/2 1FAC modify address of next 02 10 10 10 01 2 1 020001 2/0/0 1 transfer (A) to N 16 01 1F 0B 04 6 1 £ 11 4 061FB4 6/0/0 1FB4 select (N) 3B 13 1F 16 08 * 3 £ 6 8 1B3F68 27/0/1 1F68 jump A != Z 38 0D 1F 1A 1C H : £ 10 + 18DFAC 24/1/2 1FAC modify address of next 16 10 10 10 10 6 060000 6/0/0 0 select (N) 02 01 1F 0B 0B 2 1 £ 11 11 021FBB 2/0/0 1FBB transfer (A) to N 6E 00 00 00 00 be 02 15 01 1F 1A 2 5 1 £ 10 0251FA 2/0/2 11FA transfer (A) to N 02 38 0D 1F 1A 2 H : £ 10 028DFA 2/1/0 DFA transfer (A) to N 1C 02 08 10 10 + 2 8 0C2800 12/0/1 800 convert 10 16 01 1F 0B 6 1 £ 11 0061FB 0/0/3 1FB set radix 0B 38 0D 1F 1A 11 H : £ 10 0B8DFA 11/1/0 DFA multiply and subtract 1C 02 10 10 10 + 2 0C2000 12/0/1 0 convert 10 16 01 1F 0B 6 1 £ 11 0061FB 0/0/3 1FB set radix 15 3B 01 1F 16 5 * 1 £ 6 05B1F6 5/1/1 11F6 subtract (N) from (A) 0D 16 01 1F 1A : 6 1 £ 10 0D61FA 13/0/3 1FA divide uniform radix 1F 38 0D 1F 1A £ H : £ 10 0F8DFA 15/1/0 DFA collate and add 1C 37 08 10 10 + G 8 0C7800 12/0/3 1800 convert 10 16 19 1F 0B 6 9 £ 11 0069FB 0/0/3 9FB set radix 1C 3B 01 1F 07 + * 1 £ 7 0CB1F7 12/1/1 11F7 convert 16 2A 0B 1F 0B 6 = 11 £ 11 06ABFB 6/1/1 BFB select (N) 1C 6E 00 00 00 + be 0CE000 12/1/3 0 convert 07 10 16 01 1F 7 6 1 £ 07061F 7/0/0 61F augment (N) by (A) 1A 1F 37 1A 10 10 £ G 10 0AF7A0 10/1/3 17A0 multiply and add 10 10 29 02 10 I 2 000920 0/0/0 920 Halt 10 02 38 19 1F 2 H 9 £ 00289F 0/0/1 89F Invalid 07 01 02 19 1F 7 1 2 9 £ 07129F 7/0/0 129F augment (N) by (A) 0B 1C 02 19 1F 11 + 2 9 £ 0BC29F 11/1/2 29F multiply and subtract 0B 1C 29 0E 04 11 + I . 4 0BC9E4 11/1/2 9E4 multiply and subtract 10 10 16 01 1F 6 1 £ 00061F 0/0/0 61F Halt 1A 02 15 01 1F 10 2 5 1 £ 0A251F 10/0/1 51F multiply and add 0B 15 02 01 1F 11 5 2 1 £ 0B521F 11/0/2 121F multiply and subtract 0B 15 16 01 1F 11 5 6 1 £ 0B561F 11/0/2 161F multiply and subtract 1A 1C 04 01 1F 10 + 4 1 £ 0AC41F 10/1/2 41F multiply and add 1A 02 13 01 1F 10 2 3 1 £ 0A231F 10/0/1 31F multiply and add 1A 1C 15 01 1F 10 + 5 1 £ 0AC51F 10/1/2 51F multiply and add 1A 0D 6E 00 00 10 : be 0ADE00 10/1/2 1E00 multiply and add 1F 07 0E 3B 15 £ 7 . * 5 0F7EB5 15/0/3 1EB5 collate and add 1F 08 15 16 01 £ 8 5 6 1 0F8561 15/1/0 561 collate and add 1F 1A 01 07 01 £ 10 1 7 1 0FA171 15/1/1 171 collate and add 1F 0B 08 16 01 £ 11 8 6 1 0FB861 15/1/1 1861 collate and add 1F 0B 08 15 01 £ 11 8 5 1 0FB851 15/1/1 1851 collate and add 1F 0B 19 3B 13 £ 11 9 * 3 0FB9B3 15/1/1 19B3 collate and add 1F 04 07 38 19 £ 4 7 H 9 0F4789 15/0/2 789 collate and add 1F 10 15 10 10 £ 5 0F0500 15/0/0 500 collate and add 10 10 10 38 19 H 9 000089 0/0/0 89 Halt 1F 08 08 38 19 £ 8 8 H 9 0F8889 15/1/0 889 collate and add 0D 1A 0D 16 01 : 10 : 6 1 0DAD61 13/1/1 D61 divide uniform radix 1F 0B 02 3B 13 £ 11 2 * 3 0FB2B3 15/1/1 12B3 collate and add 0E 0D 07 16 01 . : 7 6 1 0ED761 14/1/2 1761 replace selected bits 1F 1A 1F 32 10 £ 10 £ B 0FAF20 15/1/1 F20 collate and add 10 10 04 6E 00 4 be 0004E0 0/0/0 4E0 Halt 01 1F 08 1C 01 1 £ 8 + 1 01F8C1 1/1/3 18C1 select literal address 1A 10 10 1A 02 10 10 2 0A00A2 10/0/0 A2 multiply and add 01 1F 0B 1A 16 1 £ 11 10 6 01FBA6 1/1/3 1BA6 select literal address 01 1F 1A 07 02 1 £ 10 7 2 01FA72 1/1/3 1A72 select literal address 10 10 10 19 16 9 6 000096 0/0/0 96 Halt 19 1F 1A 1A 13 9 £ 10 10 3 09FAA3 9/1/3 1AA3 multiply uniform radix 08 10 10 1A 02 8 10 2 0800A2 8/0/0 A2 merge constant length 10 10 10 1A 38 10 H 0000A8 0/0/0 A8 Halt 08 10 10 19 10 8 9 080090 8/0/0 90 merge constant length 10 10 02 10 10 2 000200 0/0/0 200 Halt 10 10 10 1F 10 £ 0000F0 0/0/0 F0 Halt 10 10 10 04 10 4 000040 0/0/0 40 Halt 01 1C 04 16 10 1 + 4 6 01C460 1/1/2 460 subtract literal address 01 1F 1C 10 10 1 £ + 01FC00 1/1/3 1C00 select literal address 04 10 10 10 6E 4 be 04000E 4/0/0 E add (N) to (A) 10 01 1F 19 1A 1 £ 9 10 001F9A 0/0/0 1F9A Halt 10 10 10 1A 10 10 0000A0 0/0/0 A0 Halt 10 04 10 10 10 4 004000 0/0/2 0 replace (B) by (N) 1F 01 1F 1C 10 £ 1 £ + 0F1FC0 15/0/0 1FC0 collate and add 1F 01 1F 0E 10 £ 1 £ . 0F1FE0 15/0/0 1FE0 collate and add 19 16 19 16 19 9 6 9 6 9 096969 9/0/3 969 multiply uniform radix 16 19 16 19 16 6 9 6 9 6 069696 6/1/0 1696 select (N) 10 10 10 01 04 1 4 000014 0/0/0 14 Halt 10 10 10 10 02 2 000002 0/0/0 2 Halt 10 10 10 10 01 1 000001 0/0/0 1 Halt 10 10 10 01 1C 1 + 00001C 0/0/0 1C Halt 10 10 10 10 10 000000 0/0/0 0 Halt 07 0E 10 10 10 7 . 07E000 7/1/3 0 augment (N) by (A) 10 07 1F 1F 1F 7 £ £ £ 007FFF 0/0/3 1FFF set radix 2A 07 1F 0B 1A = 7 £ 11 10 1A7FBA 26/0/3 1FBA leave master routine 6E 00 00 00 00 be 08 10 10 10 10 8 080000 8/0/0 0 merge constant length 10 10 10 10 1A 10 00000A 0/0/0 A Halt 10 29 0B 1F 1F I 11 £ £ 009BFF 0/1/0 1BFF copy registers 1F 2A 13 1F 1A £ = 3 £ 10 0FA3FA 15/1/1 3FA collate and add 0E 10 01 1C 0E . 1 + . 0E01CE 14/0/0 1CE replace selected bits 08 10 01 1C 0E 8 1 + . 0801CE 8/0/0 1CE merge constant length 08 10 01 0B 07 8 1 11 7 0801B7 8/0/0 1B7 merge constant length 1A 10 10 10 10 10 0A0000 10/0/0 0 multiply and add 1F 10 10 10 10 £ 0F0000 15/0/0 0 collate and add 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 01 10 10 10 10 1 010000 1/0/0 0 table look up 10 6E 00 00 00 be 00E000 0/1/3 0 Invalid 0B 16 10 10 10 11 6 0B6000 11/0/3 0 multiply and subtract 01 19 10 10 10 1 9 019000 1/1/0 1000 table look up 02 10 10 01 1F 2 1 £ 02001F 2/0/0 1F transfer (A) to N 1C 1C 10 01 1F + + 1 £ 0CC01F 12/1/2 1F convert 0D 1C 1F 10 10 : + £ 0DCF00 13/1/2 F00 divide uniform radix 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 13 3 000003 0/0/0 3 Halt 0E 08 10 10 07 . 8 7 0E8007 14/1/0 7 replace selected bits 0D 02 10 10 10 : 2 0D2000 13/0/1 0 divide uniform radix 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 1C 04 0E + 4 . 000C4E 0/0/0 C4E Halt 04 02 10 10 04 4 2 4 042004 4/0/1 4 add (N) to (A) 01 04 10 10 10 1 4 014000 1/0/2 0 round off 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 6E 00 00 be 000E00 0/0/0 E00 Halt 1F 1C 04 10 10 £ + 4 0FC400 15/1/2 400 collate and add 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 38 1C H + 00008C 0/0/0 8C Halt 10 08 10 01 16 8 1 6 008016 0/1/0 16 copy registers 1F 1C 10 29 0E £ + I . 0FC09E 15/1/2 9E collate and add 08 10 10 38 1C 8 H + 08008C 8/0/0 8C merge constant length 10 08 10 23 02 8 C 2 008032 0/1/0 32 copy registers 10 10 10 02 01 2 1 000021 0/0/0 21 Halt 1F 0D 10 15 01 £ : 5 1 0FD051 15/1/2 1051 collate and add 1F 1C 1F 07 10 £ + £ 7 0FCF70 15/1/2 F70 collate and add 10 08 10 38 19 8 H 9 008089 0/1/0 89 copy registers 1F 0D 01 10 10 £ : 1 0FD100 15/1/2 1100 collate and add 10 04 10 10 10 4 004000 0/0/2 0 replace (B) by (N) 10 01 1C 38 19 1 + H 9 001C89 0/0/0 1C89 Halt 0E 0B 16 6E 00 . 11 6 be 0EB6E0 14/1/1 16E0 replace selected bits 23 00 00 00 00 C 130000 19/0/0 0 output File: old-paper-tapes/T69-1-5n.leo 10 10 01 02 1C 1 2 + 00012C 0/0/0 12C Halt 10 10 01 02 1C 1 2 + 00012C 0/0/0 12C Halt 10 10 13 0B 04 3 11 4 0003B4 0/0/0 3B4 Halt 10 10 01 02 1C 1 2 + 00012C 0/0/0 12C Halt 10 10 13 0B 04 3 11 4 0003B4 0/0/0 3B4 Halt 10 10 01 1C 0B 1 + 11 0001CB 0/0/0 1CB Halt 10 10 10 10 0E . 00000E 0/0/0 E Halt 10 10 10 16 19 6 9 000069 0/0/0 69 Halt 10 10 10 10 01 1 000001 0/0/0 1 Halt 10 10 10 10 15 5 000005 0/0/0 5 Halt 02 08 08 16 16 2 8 8 6 6 028866 2/1/0 866 transfer (A) to N 1F 07 1F 07 1F £ 7 £ 7 £ 0F7F7F 15/0/3 1F7F collate and add 07 1F 07 1F 07 7 £ 7 £ 7 07F7F7 7/1/3 17F7 augment (N) by (A) 10 07 1F 10 10 7 £ 007F00 0/0/3 1F00 set radix 10 10 07 1F 10 7 £ 0007F0 0/0/0 7F0 Halt 6E 00 00 00 00 be 10 10 01 13 10 1 3 000130 0/0/0 130 Halt 1F 10 10 07 1F £ 7 £ 0F007F 15/0/0 7F collate and add 07 1F 10 10 07 7 £ 7 07F007 7/1/3 1007 augment (N) by (A) 1F 10 10 10 10 £ 0F0000 15/0/0 0 collate and add 10 10 10 10 07 7 000007 0/0/0 7 Halt 10 10 10 07 1F 7 £ 00007F 0/0/0 7F Halt 10 10 07 1F 10 7 £ 0007F0 0/0/0 7F0 Halt 10 07 1F 10 10 7 £ 007F00 0/0/3 1F00 set radix 07 1F 10 10 10 7 £ 07F000 7/1/3 1000 augment (N) by (A) 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 07 1F 10 7 £ 0007F0 0/0/0 7F0 Halt 10 07 1F 10 10 7 £ 007F00 0/0/3 1F00 set radix 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 07 1F 7 £ 00007F 0/0/0 7F Halt 07 1F 10 10 10 7 £ 07F000 7/1/3 1000 augment (N) by (A) 6E 00 00 00 00 be 10 10 01 13 0E 1 3 . 00013E 0/0/0 13E Halt 10 10 10 10 10 000000 0/0/0 0 Halt 07 1F 10 10 10 7 £ 07F000 7/1/3 1000 augment (N) by (A) 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 07 1F 7 £ 00007F 0/0/0 7F Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 07 0E 7 . 00007E 0/0/0 7E Halt 07 0E 10 10 10 7 . 07E000 7/1/3 0 augment (N) by (A) 16 16 16 16 16 6 6 6 6 6 066666 6/0/3 666 select (N) 38 08 01 1F 1C H 8 1 £ + 1881FC 24/1/0 1FC unconditional jump 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 07 1C 08 7 + 8 0007C8 0/0/0 7C8 Halt 6E 00 00 00 00 be 10 10 01 04 1C 1 4 + 00014C 0/0/0 14C Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 07 1C 0E 7 + . 0007CE 0/0/0 7CE Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 07 0D 10 7 : 0007D0 0/0/0 7D0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 07 0D 02 7 : 2 0007D2 0/0/0 7D2 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 1A 10 00000A 0/0/0 A Halt 10 10 10 10 01 1 000001 0/0/0 1 Halt 10 10 10 10 1A 10 00000A 0/0/0 A Halt 10 10 10 10 02 2 000002 0/0/0 2 Halt 10 10 10 10 1A 10 00000A 0/0/0 A Halt 10 10 10 10 13 3 000003 0/0/0 3 Halt 10 10 10 10 1A 10 00000A 0/0/0 A Halt 6E 00 00 00 00 be 10 10 01 15 1A 1 5 10 00015A 0/0/0 15A Halt 10 10 10 10 04 4 000004 0/0/0 4 Halt 10 10 10 10 1A 10 00000A 0/0/0 A Halt 10 10 10 10 15 5 000005 0/0/0 5 Halt 10 10 10 10 1A 10 00000A 0/0/0 A Halt 10 10 10 10 16 6 000006 0/0/0 6 Halt 10 10 10 10 1A 10 00000A 0/0/0 A Halt 10 10 10 10 07 7 000007 0/0/0 7 Halt 10 10 10 10 1A 10 00000A 0/0/0 A Halt 10 10 10 10 08 8 000008 0/0/0 8 Halt 10 10 10 10 1A 10 00000A 0/0/0 A Halt 10 10 10 10 19 9 000009 0/0/0 9 Halt 10 10 10 10 1A 10 00000A 0/0/0 A Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 0B 11 00000B 0/0/0 B Halt 6E 00 00 00 00 be 10 10 01 16 08 1 6 8 000168 0/0/0 168 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 13 0E 19 3 . 9 0003E9 0/0/0 3E9 Halt 10 10 02 13 0B 2 3 11 00023B 0/0/0 23B Halt 10 10 02 04 10 2 4 000240 0/0/0 240 Halt 10 10 02 04 07 2 4 7 000247 0/0/0 247 Halt 10 10 02 15 10 2 5 000250 0/0/0 250 Halt 10 10 02 15 0B 2 5 11 00025B 0/0/0 25B Halt 10 10 02 16 10 2 6 000260 0/0/0 260 Halt 10 10 02 16 1F 2 6 £ 00026F 0/0/0 26F Halt 10 10 02 08 01 2 8 1 000281 0/0/0 281 Halt 10 10 02 19 15 2 9 5 000295 0/0/0 295 Halt 10 10 02 1A 0B 2 10 11 0002AB 0/0/0 2AB Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 6E 00 00 00 00 be 07 16 10 10 10 7 6 076000 7/0/3 0 augment (N) by (A) 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 01 10 10 10 10 1 010000 1/0/0 0 table look up 10 10 10 10 10 000000 0/0/0 0 Halt 02 10 6E 00 00 2 be 020E00 2/0/0 E00 transfer (A) to N 01 08 04 10 10 1 8 4 018400 1/1/0 400 table look up 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 08 10 10 8 000800 0/0/0 800 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 01 04 10 10 1 4 001400 0/0/0 1400 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 13 15 3 5 000035 0/0/0 35 Halt 01 16 13 07 13 1 6 3 7 3 016373 1/0/3 373 interchange area addresses 16 16 07 04 16 6 6 7 4 6 066746 6/0/3 746 select (N) 04 15 02 10 10 4 5 2 045200 4/0/2 1200 add (N) to (A) 16 15 07 10 16 6 5 7 6 065706 6/0/2 1706 select (N) 16 15 16 15 15 6 5 6 5 5 065655 6/0/2 1655 select (N) 16 19 10 02 15 6 9 2 5 069025 6/1/0 1025 select (N) 1C 07 02 10 10 + 7 2 0C7200 12/0/3 1200 convert 15 04 15 6E 00 5 4 5 be 0545E0 5/0/2 5E0 subtract (N) from (A) 10 01 19 02 16 1 9 2 6 001926 0/0/0 1926 Halt 15 13 16 02 15 5 3 6 2 5 053625 5/0/1 1625 subtract (N) from (A) 02 16 13 16 08 2 6 3 6 8 026368 2/0/3 368 transfer (A) to N 16 07 15 15 10 6 7 5 5 067550 6/0/3 1550 select (N) 10 07 13 07 04 7 3 7 4 007374 0/0/3 1374 set radix 10 10 16 16 15 6 6 5 000665 0/0/0 665 Halt 15 16 15 15 13 5 6 5 5 3 056553 5/0/3 553 subtract (N) from (A) 15 15 07 02 15 5 5 7 2 5 055725 5/0/2 1725 subtract (N) from (A) 16 10 10 07 10 6 7 060070 6/0/0 70 select (N) 10 10 10 10 07 7 000007 0/0/0 7 Halt 13 04 0E 10 16 3 4 . 6 034E06 3/0/2 E06 copy (A) to N 16 15 15 15 10 6 5 5 5 065550 6/0/2 1550 select (N) 10 10 10 16 13 6 3 000063 0/0/0 63 Halt 07 16 16 16 10 7 6 6 6 076660 7/0/3 660 augment (N) by (A) 10 10 10 07 6E 7 be 00007E 0/0/0 7E Halt 10 10 01 1A 10 1 10 0001A0 0/0/0 1A0 Halt 19 15 15 15 15 9 5 5 5 5 095555 9/0/2 1555 multiply uniform radix 07 13 15 08 16 7 3 5 8 6 073586 7/0/1 1586 augment (N) by (A) 16 07 04 16 19 6 7 4 6 9 067469 6/0/3 1469 select (N) 10 10 15 16 16 5 6 6 000566 0/0/0 566 Halt 19 07 15 15 15 9 7 5 5 5 097555 9/0/3 1555 multiply uniform radix 10 10 15 16 15 5 6 5 000565 0/0/0 565 Halt 02 15 19 07 07 2 5 9 7 7 025977 2/0/2 1977 transfer (A) to N 10 10 10 10 07 7 000007 0/0/0 7 Halt 15 15 15 16 15 5 5 5 6 5 055565 5/0/2 1565 subtract (N) from (A) 07 02 15 15 07 7 2 5 5 7 072557 7/0/1 557 augment (N) by (A) 07 15 08 07 13 7 5 8 7 3 075873 7/0/2 1873 augment (N) by (A) 15 15 15 19 15 5 5 5 9 5 055595 5/0/2 1595 subtract (N) from (A) 19 16 15 15 15 9 6 5 5 5 096555 9/0/3 555 multiply uniform radix 10 10 16 15 15 6 5 5 000655 0/0/0 655 Halt 6E 00 00 00 00 be 0E 13 15 15 16 . 3 5 5 6 0E3556 14/0/1 1556 replace selected bits 15 10 10 10 10 5 050000 5/0/0 0 subtract (N) from (A) 07 07 04 0E 10 7 7 4 . 0774E0 7/0/3 14E0 augment (N) by (A) 10 16 04 15 01 6 4 5 1 006451 0/0/3 451 set radix 15 07 15 15 10 5 7 5 5 057550 5/0/3 1550 subtract (N) from (A) 10 07 13 15 01 7 3 5 1 007351 0/0/3 1351 set radix 16 01 16 15 07 6 1 6 5 7 061657 6/0/0 1657 select (N) 02 07 13 16 19 2 7 3 6 9 027369 2/0/3 1369 transfer (A) to N 15 13 16 16 16 5 3 6 6 6 053666 5/0/1 1666 subtract (N) from (A) 19 16 13 15 01 9 6 3 5 1 096351 9/0/3 351 multiply uniform radix 07 19 15 15 16 7 9 5 5 6 079556 7/1/0 1556 augment (N) by (A) 08 10 10 15 16 8 5 6 080056 8/0/0 56 merge constant length 16 15 15 13 07 6 5 5 3 7 065537 6/0/2 1537 select (N) 08 07 04 15 15 8 7 4 5 5 087455 8/0/3 1455 merge constant length 16 6E 00 00 00 6 be 06E000 6/1/3 0 select (N) 0B 1C 15 07 02 11 + 5 7 2 0BC572 11/1/2 572 multiply and subtract 07 13 10 10 07 7 3 7 073007 7/0/1 1007 augment (N) by (A) 13 15 10 10 10 3 5 035000 3/0/2 1000 copy (A) to N 10 10 04 0E 10 4 . 0004E0 0/0/0 4E0 Halt 10 10 15 16 16 5 6 6 000566 0/0/0 566 Halt 04 0E 10 10 10 4 . 04E000 4/1/3 0 add (N) to (A) 10 16 07 15 15 6 7 5 5 006755 0/0/3 755 set radix 15 01 16 19 15 5 1 6 9 5 051695 5/0/0 1695 subtract (N) from (A) 15 16 15 16 16 5 6 5 6 6 056566 5/0/3 566 subtract (N) from (A) 04 0E 07 13 10 4 . 7 3 04E730 4/1/3 730 add (N) to (A) 10 16 10 10 10 6 006000 0/0/3 0 set radix 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 13 10 3 000030 0/0/0 30 Halt 13 10 13 10 13 3 3 3 030303 3/0/0 303 copy (A) to N 10 13 6E 00 00 3 be 003E00 0/0/1 1E00 Invalid 01 1C 1A 38 08 1 + 10 H 8 01CA88 1/1/2 A88 subtract literal address 01 1C 1C 2A 10 1 + + = 01CCA0 1/1/2 CA0 subtract literal address 13 19 04 10 01 3 9 4 1 039401 3/1/0 1401 copy (A) to N 1F 1F 1F 16 10 £ £ £ 6 0FFF60 15/1/3 1F60 collate and add 01 1C 1A 02 10 1 + 10 2 01CA20 1/1/2 A20 subtract literal address 10 10 10 10 16 6 000006 0/0/0 6 Halt 01 04 16 38 1A 1 4 6 H 10 01468A 1/0/2 68A round off 01 1C 1A 01 0E 1 + 10 1 . 01CA1E 1/1/2 A1E subtract literal address 04 10 10 38 16 4 H 6 040086 4/0/0 86 add (N) to (A) 10 08 01 02 10 8 1 2 008120 0/1/0 120 copy registers 10 04 10 01 1F 4 1 £ 00401F 0/0/2 1F replace (B) by (N) 10 10 10 38 16 H 6 000086 0/0/0 86 Halt 10 08 13 02 10 8 3 2 008320 0/1/0 320 copy registers 10 04 10 16 08 4 6 8 004068 0/0/2 68 replace (B) by (N) 01 04 04 6E 00 1 4 4 be 0144E0 1/0/2 4E0 round off 10 01 0D 08 02 1 : 8 2 001D82 0/0/0 1D82 Halt 19 10 02 02 29 9 2 2 I 090229 9/0/0 229 multiply uniform radix 1C 10 10 10 13 + 3 0C0003 12/0/0 3 convert 08 04 10 10 13 8 4 3 084003 8/0/2 3 merge constant length 08 01 04 08 29 8 1 4 8 I 081489 8/0/0 1489 merge constant length 1C 07 1F 1F 3B + 7 £ £ * 0C7FFB 12/0/3 1FFB convert 02 01 0E 13 2A 2 1 . 3 = 021E3A 2/0/0 1E3A transfer (A) to N 1A 01 15 02 2A 10 1 5 2 = 0A152A 10/0/0 152A multiply and add 1C 01 16 16 01 + 1 6 6 1 0C1661 12/0/0 1661 convert 0E 10 10 10 02 . 2 0E0002 14/0/0 2 replace selected bits 08 04 10 10 38 8 4 H 084008 8/0/2 8 merge constant length 08 02 13 16 29 8 2 3 6 I 082369 8/0/1 369 merge constant length 1C 10 10 01 3B + 1 * 0C001B 12/0/0 1B convert 10 01 0E 0B 2A 1 . 11 = 001EBA 0/0/0 1EBA Halt 1A 01 15 02 6E 10 1 5 2 be 0A152E 10/0/0 152E multiply and add 10 10 01 0E 16 1 . 6 0001E6 0/0/0 1E6 Halt 2A 1C 01 16 08 = + 1 6 8 1AC168 26/1/2 168 set modification register 01 0E 10 10 10 1 . 01E000 1/1/3 0 select literal address 02 08 04 10 10 2 8 4 028400 2/1/0 400 transfer (A) to N 29 1A 10 10 01 I 10 1 19A001 25/1/1 1 clear indicators 38 08 02 13 16 H 8 2 3 6 188236 24/1/0 236 unconditional jump 29 1C 10 10 02 I + 2 19C002 25/1/2 2 interrogate indicators 3B 10 01 1F 13 * 1 £ 3 1B01F3 27/0/0 1F3 jump A = Z 2A 1A 01 15 04 = 10 1 5 4 1AA154 26/1/1 154 set modification register 2A 1C 01 16 08 = + 1 6 8 1AC168 26/1/2 168 set modification register 01 0E 10 10 01 1 . 1 01E001 1/1/3 1 select literal address 02 08 04 10 10 2 8 4 028400 2/1/0 400 transfer (A) to N 29 1A 10 10 02 I 10 2 19A002 25/1/1 2 clear indicators 38 08 02 13 16 H 8 2 3 6 188236 24/1/0 236 unconditional jump 29 1C 10 10 04 I + 4 19C004 25/1/2 4 interrogate indicators 6E 00 00 00 00 be 04 3B 10 01 1F 4 * 1 £ 04B01F 4/1/1 101F add (N) to (A) 0B 2A 1A 01 15 11 = 10 1 5 0BAA15 11/1/1 A15 multiply and subtract 16 2A 1C 01 16 6 = + 1 6 06AC16 6/1/1 C16 select (N) 08 01 0E 10 10 8 1 . 081E00 8/0/0 1E00 merge constant length 02 02 08 04 10 2 2 8 4 022840 2/0/1 840 transfer (A) to N 10 29 1A 10 10 I 10 009A00 0/1/0 1A00 copy registers 04 38 08 02 13 4 H 8 2 3 048823 4/1/0 823 add (N) to (A) 16 29 1C 10 10 6 I + 069C00 6/1/0 1C00 select (N) 08 3B 10 02 10 8 * 2 08B020 8/1/1 1020 merge variable length 13 2A 1A 01 15 3 = 10 1 5 03AA15 3/1/1 A15 copy (A) to N 08 2A 1C 01 16 8 = + 1 6 08AC16 8/1/1 C16 merge variable length 08 01 0E 10 10 8 1 . 081E00 8/0/0 1E00 merge constant length 13 02 08 04 10 3 2 8 4 032840 3/0/1 840 copy (A) to N 10 29 1A 10 10 I 10 009A00 0/1/0 1A00 copy registers 08 6E 00 00 00 8 be 08E000 8/1/3 0 merge variable length 10 02 38 08 02 2 H 8 2 002882 0/0/1 882 Invalid 13 16 29 1C 10 3 6 I + 0369C0 3/0/3 9C0 copy (A) to N 01 10 3B 10 02 1 * 2 010B02 1/0/0 B02 table look up 10 0B 2A 1A 01 11 = 10 1 00BAA1 0/1/1 1AA1 replace registers 15 1A 2A 1C 01 5 10 = + 1 05AAC1 5/1/1 AC1 subtract (N) from (A) 16 08 01 0E 10 6 8 1 . 0681E0 6/1/0 1E0 select (N) 10 04 02 08 04 4 2 8 4 004284 0/0/2 284 replace (B) by (N) 10 10 29 1A 10 I 10 0009A0 0/0/0 9A0 Halt 01 10 38 08 02 1 H 8 2 010882 1/0/0 882 table look up 13 16 29 1C 10 3 6 I + 0369C0 3/0/3 9C0 copy (A) to N 02 10 3B 10 02 2 * 2 020B02 2/0/0 B02 transfer (A) to N 01 13 2A 1A 01 1 3 = 10 1 013AA1 1/0/1 1AA1 prepare for digit collation 15 1C 2A 1C 01 5 + = + 1 05CAC1 5/1/2 AC1 subtract (N) from (A) 16 08 01 0E 10 6 8 1 . 0681E0 6/1/0 1E0 select (N) 10 15 6E 00 00 5 be 005E00 0/0/2 1E00 replace (B) by (N) 02 01 10 02 08 2 1 2 8 021028 2/0/0 1028 transfer (A) to N 04 10 10 29 1A 4 I 10 04009A 4/0/0 9A add (N) to (A) 10 02 10 38 08 2 H 8 002088 0/0/1 88 Invalid 02 13 16 29 1C 2 3 6 I + 02369C 2/0/1 169C transfer (A) to N 10 04 10 3B 10 4 * 0040B0 0/0/2 B0 replace (B) by (N) 02 01 0B 2A 1A 2 1 11 = 10 021BAA 2/0/0 1BAA transfer (A) to N 01 15 0E 2A 1C 1 5 . = + 015EAC 1/0/2 1EAC round off 01 16 08 01 0E 1 6 8 1 . 01681E 1/0/3 81E interchange area addresses 10 10 16 02 08 6 2 8 000628 0/0/0 628 Halt 04 10 10 29 1A 4 I 10 04009A 4/0/0 9A add (N) to (A) 10 04 10 38 08 4 H 8 004088 0/0/2 88 replace (B) by (N) 02 13 16 29 1C 2 3 6 I + 02369C 2/0/1 169C transfer (A) to N 10 08 10 3B 10 8 * 0080B0 0/1/0 B0 copy registers 02 02 13 2A 1A 2 2 3 = 10 0223AA 2/0/1 3AA transfer (A) to N 01 16 10 6E 00 1 6 be 0160E0 1/0/3 E0 interchange area addresses 10 02 01 0E 2A 2 1 . = 0021EA 0/0/1 1EA Invalid 1C 01 16 08 01 + 1 6 8 1 0C1681 12/0/0 1681 convert 0E 10 10 07 02 . 7 2 0E0072 14/0/0 72 replace selected bits 08 04 10 10 29 8 4 I 084009 8/0/2 9 merge constant length 1A 10 08 10 38 10 8 H 0A0808 10/0/0 808 multiply and add 08 02 13 16 29 8 2 3 6 I 082369 8/0/1 369 merge constant length 1C 01 10 10 3B + 1 * 0C100B 12/0/0 100B convert 10 02 02 0B 2A 2 2 11 = 0022BA 0/0/1 2BA Invalid 1A 01 16 02 2A 10 1 6 2 = 0A162A 10/0/0 162A multiply and add 1C 01 16 08 01 + 1 6 8 1 0C1681 12/0/0 1681 convert 0E 10 10 08 02 . 8 2 0E0082 14/0/0 82 replace selected bits 08 04 10 10 29 8 4 I 084009 8/0/2 9 merge constant length 1A 01 10 10 38 10 1 H 0A1008 10/0/0 1008 multiply and add 08 02 13 16 29 8 2 3 6 I 082369 8/0/1 369 merge constant length 1C 02 10 10 6E + 2 be 0C200E 12/0/1 E convert 10 10 02 02 1C 2 2 + 00022C 0/0/0 22C Halt 3B 10 02 13 13 * 2 3 3 1B0233 27/0/0 233 jump A = Z 2A 1A 01 16 04 = 10 1 6 4 1AA164 26/1/1 164 set modification register 2A 1C 01 16 08 = + 1 6 8 1AC168 26/1/2 168 set modification register 01 0E 10 10 19 1 . 9 01E009 1/1/3 9 select literal address 02 08 04 10 10 2 8 4 028400 2/1/0 400 transfer (A) to N 29 1A 02 10 10 I 10 2 19A200 25/1/1 200 clear indicators 38 08 02 13 16 H 8 2 3 6 188236 24/1/0 236 unconditional jump 10 10 10 01 01 1 1 000011 0/0/0 11 Halt 38 08 01 0D 1C H 8 1 : + 1881DC 24/1/0 1DC unconditional jump 2A 1C 01 16 16 = + 1 6 6 1AC166 26/1/2 166 set modification register 29 1C 10 10 10 I + 19C000 25/1/2 0 interrogate indicators 02 08 04 10 02 2 8 4 2 028402 2/1/0 402 transfer (A) to N 2A 0E 01 04 1A = . 1 4 10 1AE14A 26/1/3 14A set modification register 38 16 10 10 02 H 6 2 186002 24/0/3 2 modify address of next 6E 00 00 00 00 be 1A 2A 02 01 16 10 = 2 1 6 0AA216 10/1/1 216 multiply and add 1A 16 08 01 02 10 6 8 1 2 0A6812 10/0/3 812 multiply and add 1C 02 0E 04 10 + 2 . 4 0C2E40 12/0/1 E40 convert 04 29 16 10 10 4 I 6 049600 4/1/0 1600 add (N) to (A) 02 38 08 02 13 2 H 8 2 3 028823 2/1/0 823 transfer (A) to N 0B 38 08 02 0B 11 H 8 2 11 0B882B 11/1/0 82B multiply and subtract 01 16 08 01 02 1 6 8 1 2 016812 1/0/3 812 interchange area addresses 0E 02 0E 04 10 . 2 . 4 0E2E40 14/0/1 E40 replace selected bits 04 16 08 01 13 4 6 8 1 3 046813 4/0/3 813 add (N) to (A) 10 02 0E 04 10 2 . 4 002E40 0/0/1 E40 Invalid 16 29 16 10 10 6 I 6 069600 6/1/0 1600 select (N) 04 38 08 02 04 4 H 8 2 4 048824 4/1/0 824 add (N) to (A) 10 38 08 02 0B H 8 2 11 00882B 0/1/0 82B copy registers 01 16 08 01 13 1 6 8 1 3 016813 1/0/3 813 interchange area addresses 02 6E 00 00 00 2 be 02E000 2/1/3 0 transfer (A) to N 04 08 02 0E 04 4 8 2 . 4 0482E4 4/1/0 2E4 add (N) to (A) 10 04 16 08 01 4 6 8 1 004681 0/0/2 681 replace (B) by (N) 13 04 02 0E 04 3 4 2 . 4 0342E4 3/0/2 2E4 copy (A) to N 10 16 16 08 01 6 6 8 1 006681 0/0/3 681 set radix 13 16 02 0E 04 3 6 2 . 4 0362E4 3/0/3 2E4 copy (A) to N 10 08 29 16 10 8 I 6 008960 0/1/0 960 copy registers 10 16 38 08 02 6 H 8 2 006882 0/0/3 882 set radix 04 07 38 08 02 4 7 H 8 2 047882 4/0/3 1882 add (N) to (A) 0B 01 16 08 01 11 1 6 8 1 0B1681 11/0/0 1681 multiply and subtract 13 08 02 0E 04 3 8 2 . 4 0382E4 3/1/0 2E4 copy (A) to N 10 04 16 08 01 4 6 8 1 004681 0/0/2 681 replace (B) by (N) 13 02 02 0E 04 3 2 2 . 4 0322E4 3/0/1 2E4 copy (A) to N 10 16 16 08 01 6 6 8 1 006681 0/0/3 681 set radix 13 1A 02 0E 04 3 10 2 . 4 03A2E4 3/1/1 2E4 copy (A) to N 10 08 6E 00 00 8 be 008E00 0/1/0 E00 copy registers 02 15 16 16 08 2 5 6 6 8 025668 2/0/2 1668 transfer (A) to N 01 13 1C 02 0E 1 3 + 2 . 013C2E 1/0/1 1C2E prepare for digit collation 04 10 1A 29 16 4 10 I 6 040A96 4/0/0 A96 add (N) to (A) 10 10 08 38 08 8 H 8 000888 0/0/0 888 Halt 02 15 10 38 08 2 5 H 8 025088 2/0/2 1088 transfer (A) to N 02 0B 01 16 08 2 11 1 6 8 02B168 2/1/1 1168 transfer (A) to N 01 13 0E 02 0E 1 3 . 2 . 013E2E 1/0/1 1E2E prepare for digit collation 04 10 04 29 16 4 4 I 6 040496 4/0/0 496 add (N) to (A) 10 10 02 38 08 2 H 8 000288 0/0/0 288 Halt 02 15 0B 38 08 2 5 11 H 8 025B88 2/0/2 1B88 transfer (A) to N 02 0B 01 16 08 2 11 1 6 8 02B168 2/1/1 1168 transfer (A) to N 01 04 10 02 0E 1 4 2 . 01402E 1/0/2 2E round off 04 10 04 16 08 4 4 6 8 040468 4/0/0 468 add (N) to (A) 01 04 02 02 0E 1 4 2 2 . 01422E 1/0/2 22E round off 04 10 16 6E 00 4 6 be 0406E0 4/0/0 6E0 add (N) to (A) 10 02 16 04 16 2 6 4 6 002646 0/0/1 646 Invalid 08 01 13 1A 02 8 1 3 10 2 0813A2 8/0/0 13A2 merge constant length 0E 04 10 08 16 . 4 8 6 0E4086 14/0/2 86 replace selected bits 08 01 13 02 02 8 1 3 2 2 081322 8/0/0 1322 merge constant length 0E 04 10 1A 16 . 4 10 6 0E40A6 14/0/2 A6 replace selected bits 08 01 13 08 02 8 1 3 8 2 081382 8/0/0 1382 merge constant length 0E 04 10 1C 16 . 4 + 6 0E40C6 14/0/2 C6 replace selected bits 08 01 13 0E 02 8 1 3 . 2 0813E2 8/0/0 13E2 merge constant length 0E 04 10 0E 29 . 4 . I 0E40E9 14/0/2 E9 replace selected bits 16 10 10 1C 38 6 + H 0600C8 6/0/0 C8 select (N) 08 02 16 10 38 8 2 6 H 082608 8/0/1 608 merge constant length 08 02 0B 01 2A 8 2 11 1 = 082B1A 8/0/1 B1A merge constant length 0E 01 15 10 16 . 1 5 6 0E1506 14/0/0 1506 replace selected bits 08 01 04 10 02 8 1 4 2 081402 8/0/0 1402 merge constant length 0E 04 10 04 6E . 4 4 be 0E404E 14/0/2 4E replace selected bits 10 10 02 07 02 2 7 2 000272 0/0/0 272 Halt 16 08 01 13 1A 6 8 1 3 10 06813A 6/1/0 13A select (N) 02 0E 04 10 16 2 . 4 6 02E406 2/1/3 406 transfer (A) to N 16 08 01 13 08 6 8 1 3 8 068138 6/1/0 138 select (N) 02 0E 04 10 08 2 . 4 8 02E408 2/1/3 408 transfer (A) to N 16 08 01 04 10 6 8 1 4 068140 6/1/0 140 select (N) 02 0E 04 10 1A 2 . 4 10 02E40A 2/1/3 40A transfer (A) to N 16 08 01 04 02 6 8 1 4 2 068142 6/1/0 142 select (N) 02 0E 04 10 1C 2 . 4 + 02E40C 2/1/3 40C transfer (A) to N 16 08 01 13 02 6 8 1 3 2 068132 6/1/0 132 select (N) 02 0E 04 10 0E 2 . 4 . 02E40E 2/1/3 40E transfer (A) to N 16 08 01 13 0E 6 8 1 3 . 06813E 6/1/0 13E select (N) 02 0E 04 01 10 2 . 4 1 02E410 2/1/3 410 transfer (A) to N 29 16 10 10 0E I 6 . 19600E 25/0/3 E step on and test 38 08 02 07 10 H 8 2 7 188270 24/1/0 270 unconditional jump 6E 00 00 00 00 be 10 38 08 02 0B H 8 2 11 00882B 0/1/0 82B copy registers 01 2A 0E 01 04 1 = . 1 4 01AE14 1/1/1 E14 add literal address 0E 16 08 01 04 . 6 8 1 4 0E6814 14/0/3 814 replace selected bits 10 02 0E 04 10 2 . 4 002E40 0/0/1 E40 Invalid 04 16 08 01 13 4 6 8 1 3 046813 4/0/3 813 add (N) to (A) 02 02 0E 04 10 2 2 . 4 022E40 2/0/1 E40 transfer (A) to N 16 16 08 01 04 6 6 8 1 4 066814 6/0/3 814 select (N) 10 02 0E 04 10 2 . 4 002E40 0/0/1 E40 Invalid 08 16 08 01 04 8 6 8 1 4 086814 8/0/3 814 merge constant length 02 02 0E 04 10 2 2 . 4 022E40 2/0/1 E40 transfer (A) to N 1A 16 08 01 13 10 6 8 1 3 0A6813 10/0/3 813 multiply and add 08 02 0E 04 10 8 2 . 4 082E40 8/0/1 E40 merge constant length 1C 16 08 01 04 + 6 8 1 4 0C6814 12/0/3 814 convert 10 02 0E 04 10 2 . 4 002E40 0/0/1 E40 Invalid 0E 6E 00 00 00 . be 0EE000 14/1/3 0 replace selected bits 08 0E 16 08 01 8 . 6 8 1 08E681 8/1/3 681 merge variable length 13 1A 02 0E 04 3 10 2 . 4 03A2E4 3/1/1 2E4 copy (A) to N 01 10 16 08 01 1 6 8 1 010681 1/0/0 681 table look up 13 0E 02 0E 04 3 . 2 . 4 03E2E4 3/1/3 2E4 copy (A) to N 01 02 29 16 10 1 2 I 6 012960 1/0/1 960 prepare for digit collation 01 10 38 08 02 1 H 8 2 010882 1/0/0 882 table look up 08 02 38 08 02 8 2 H 8 2 082882 8/0/1 882 merge constant length 0B 01 2A 0E 01 11 1 = . 1 0B1AE1 11/0/0 1AE1 multiply and subtract 04 1C 16 08 01 4 + 6 8 1 04C681 4/1/2 681 add (N) to (A) 04 10 02 0E 04 4 2 . 4 0402E4 4/0/0 2E4 add (N) to (A) 10 04 16 08 01 4 6 8 1 004681 0/0/2 681 replace (B) by (N) 13 08 02 0E 04 3 8 2 . 4 0382E4 3/1/0 2E4 copy (A) to N 10 16 16 08 01 6 6 8 1 006681 0/0/3 681 set radix 04 10 02 0E 04 4 2 . 4 0402E4 4/0/0 2E4 add (N) to (A) 10 08 6E 00 00 8 be 008E00 0/1/0 E00 copy registers 02 19 1C 16 08 2 9 + 6 8 029C68 2/1/0 1C68 transfer (A) to N 01 13 02 02 0E 1 3 2 2 . 01322E 1/0/1 122E prepare for digit collation 04 10 1A 16 08 4 10 6 8 040A68 4/0/0 A68 add (N) to (A) 01 04 10 02 0E 1 4 2 . 01402E 1/0/2 2E round off 04 10 1C 16 08 4 + 6 8 040C68 4/0/0 C68 add (N) to (A) 01 13 1A 02 0E 1 3 10 2 . 013A2E 1/0/1 1A2E prepare for digit collation 04 10 0E 16 08 4 . 6 8 040E68 4/0/0 E68 add (N) to (A) 01 04 10 02 0E 1 4 2 . 01402E 1/0/2 2E round off 04 01 10 16 08 4 1 6 8 041068 4/0/0 1068 add (N) to (A) 01 04 02 02 0E 1 4 2 2 . 01422E 1/0/2 22E round off 04 01 02 16 08 4 1 2 6 8 041268 4/0/0 1268 add (N) to (A) 01 13 0E 02 0E 1 3 . 2 . 013E2E 1/0/1 1E2E prepare for digit collation 04 01 04 29 16 4 1 4 I 6 041496 4/0/0 1496 add (N) to (A) 10 01 02 38 08 1 2 H 8 001288 0/0/0 1288 Halt 02 19 16 6E 00 2 9 6 be 0296E0 2/1/0 16E0 transfer (A) to N 10 02 1A 1A 38 2 10 10 H 002AA8 0/0/1 AA8 Invalid 08 02 0B 01 16 8 2 11 1 6 082B16 8/0/1 B16 merge constant length 08 01 04 10 02 8 1 4 2 081402 8/0/0 1402 merge constant length 0E 04 10 04 16 . 4 4 6 0E4046 14/0/2 46 replace selected bits 08 01 13 0E 02 8 1 3 . 2 0813E2 8/0/0 13E2 merge constant length 0E 04 10 16 29 . 4 6 I 0E4069 14/0/2 69 replace selected bits 16 10 10 04 38 6 4 H 060048 6/0/0 48 select (N) 08 02 1A 0B 01 8 2 10 11 1 082AB1 8/0/1 AB1 merge constant length 0E 10 10 01 07 . 1 7 0E0017 14/0/0 17 replace selected bits 10 04 10 10 01 4 1 004001 0/0/2 1 replace (B) by (N) 0E 10 10 01 07 . 1 7 0E0017 14/0/0 17 replace selected bits 10 04 10 02 29 4 2 I 004029 0/0/2 29 replace (B) by (N) 1C 04 10 10 3B + 4 * 0C400B 12/0/2 B convert 10 02 0B 0B 16 2 11 11 6 002BB6 0/0/1 BB6 Invalid 10 10 10 15 6E 5 be 00005E 0/0/0 5E Halt 10 10 02 0B 08 2 11 8 0002B8 0/0/0 2B8 Halt 01 1C 10 10 01 1 + 1 01C001 1/1/2 1 subtract literal address 02 10 10 10 04 2 4 020004 2/0/0 4 transfer (A) to N 29 1A 04 10 10 I 10 4 19A400 25/1/1 400 clear indicators 29 04 10 10 01 I 4 1 194001 25/0/2 1 step on and test 38 08 02 1C 13 H 8 2 + 3 1882C3 24/1/0 2C3 unconditional jump 29 02 10 10 01 I 2 1 192001 25/0/1 1 step on and test 38 08 02 1C 10 H 8 2 + 1882C0 24/1/0 2C0 unconditional jump 38 08 13 15 16 H 8 3 5 6 188356 24/1/0 356 unconditional jump 29 1C 13 1F 1F I + 3 £ £ 19C3FF 25/1/2 3FF interrogate indicators 3B 10 02 13 15 * 2 3 5 1B0235 27/0/0 235 jump A = Z 38 08 01 0E 13 H 8 1 . 3 1881E3 24/1/0 1E3 unconditional jump 16 10 01 07 0E 6 1 7 . 06017E 6/0/0 17E select (N) 3B 02 02 1C 16 * 2 2 + 6 1B22C6 27/0/1 2C6 jump A != Z 38 08 13 02 1F H 8 3 2 £ 18832F 24/1/0 32F unconditional jump 6E 00 00 00 00 be 16 16 08 01 04 6 6 8 1 4 066814 6/0/3 814 select (N) 04 02 08 0B 1C 4 2 8 11 + 0428BC 4/0/1 8BC add (N) to (A) 0E 2A 10 02 1C . = 2 + 0EA02C 14/1/1 2C replace selected bits 1F 38 16 10 08 £ H 6 8 0F8608 15/1/0 608 collate and add 01 23 10 10 10 1 C 013000 1/0/1 1000 prepare for digit collation 10 2A 10 02 0D = 2 : 00A02D 0/1/1 2D replace registers 0B 29 1C 08 10 11 I + 8 0B9C80 11/1/0 1C80 multiply and subtract 10 3B 02 13 15 * 2 3 5 00B235 0/1/1 1235 replace registers 16 38 08 02 0B 6 H 8 2 11 06882B 6/1/0 82B select (N) 13 10 10 10 10 3 030000 3/0/0 0 copy (A) to N 10 38 16 10 08 H 6 8 008608 0/1/0 608 copy registers 01 2A 08 10 10 1 = 8 01A800 1/1/1 800 add literal address 10 10 10 10 10 000000 0/0/0 0 Halt 01 38 08 02 0D 1 H 8 2 : 01882D 1/1/0 82D table look up 10 6E 00 00 00 be 00E000 0/1/3 0 Invalid 0D 04 2A 02 02 : 4 = 2 2 0D4A22 13/0/2 A22 divide uniform radix 1C 1F 38 08 02 + £ H 8 2 0CF882 12/1/3 1882 convert 0D 07 2A 02 02 : 7 = 2 2 0D7A22 13/0/3 1A22 divide uniform radix 1C 1F 38 16 10 + £ H 6 0CF860 12/1/3 1860 convert 08 01 23 1A 10 8 1 C 10 0813A0 8/0/0 13A0 merge constant length 10 10 10 10 10 000000 0/0/0 0 Halt 10 02 38 08 01 2 H 8 1 002881 0/0/1 881 Invalid 1C 1C 10 10 10 + + 0CC000 12/1/2 0 convert 10 10 38 16 10 H 6 000860 0/0/0 860 Halt 08 01 2A 08 10 8 1 = 8 081A80 8/0/0 1A80 merge constant length 10 10 10 10 10 000000 0/0/0 0 Halt 10 01 38 08 02 1 H 8 2 001882 0/0/0 1882 Halt 0D 1C 38 08 13 : + H 8 3 0DC883 13/1/2 883 divide uniform radix 10 01 38 08 02 1 H 8 2 001882 0/0/0 1882 Halt 0E 13 6E 00 00 . 3 be 0E3E00 14/0/1 1E00 replace selected bits 02 0E 02 2A 02 2 . 2 = 2 02E2A2 2/1/3 2A2 transfer (A) to N 02 0D 0B 38 16 2 : 11 H 6 02DB86 2/1/2 1B86 transfer (A) to N 10 08 01 23 1A 8 1 C 10 00813A 0/1/0 13A copy registers 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 02 38 08 2 H 8 000288 0/0/0 288 Halt 01 1C 1C 10 10 1 + + 01CC00 1/1/2 C00 subtract literal address 10 10 10 38 16 H 6 000086 0/0/0 86 Halt 10 08 13 2A 08 8 3 = 8 0083A8 0/1/0 3A8 copy registers 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 13 38 08 3 H 8 000388 0/0/0 388 Halt 02 0E 08 2A 02 2 . 8 = 2 02E8A2 2/1/3 8A2 transfer (A) to N 02 0E 07 38 08 2 . 7 H 8 02E788 2/1/3 788 transfer (A) to N 02 0E 1F 2A 02 2 . £ = 2 02EFA2 2/1/3 FA2 transfer (A) to N 02 0E 07 38 16 2 . 7 H 6 02E786 2/1/3 786 transfer (A) to N 10 08 13 6E 00 8 3 be 0083E0 0/1/0 3E0 copy registers 10 02 1F 10 23 2 £ C 002F03 0/0/1 F03 Invalid 0E 10 10 10 10 . 0E0000 14/0/0 0 replace selected bits 10 10 10 04 38 4 H 000048 0/0/0 48 Halt 08 02 0E 08 10 8 2 . 8 082E80 8/0/1 E80 merge constant length 10 10 10 10 38 H 000008 0/0/0 8 Halt 16 10 08 13 2A 6 8 3 = 06083A 6/0/0 83A select (N) 08 10 10 10 10 8 080000 8/0/0 0 merge constant length 10 10 10 13 38 3 H 000038 0/0/0 38 Halt 08 02 1F 04 38 8 2 £ 4 H 082F48 8/0/1 F48 merge constant length 08 02 1F 1F 38 8 2 £ £ H 082FF8 8/0/1 FF8 merge constant length 08 02 1F 0B 2A 8 2 £ 11 = 082FBA 8/0/1 FBA merge constant length 02 02 1F 13 38 2 2 £ 3 H 022F38 2/0/1 F38 transfer (A) to N 16 10 08 13 23 6 8 3 C 060833 6/0/0 833 select (N) 0E 10 10 10 10 . 0E0000 14/0/0 0 replace selected bits 10 10 10 04 6E 4 be 00004E 0/0/0 4E Halt 10 10 02 1F 0E 2 £ . 0002FE 0/0/0 2FE Halt 38 08 02 1F 04 H 8 2 £ 4 1882F4 24/1/0 2F4 unconditional jump 10 10 10 10 15 5 000005 0/0/0 5 Halt 38 08 02 0E 08 H 8 2 . 8 1882E8 24/1/0 2E8 unconditional jump 16 10 10 10 02 6 2 060002 6/0/0 2 select (N) 02 10 01 04 08 2 1 4 8 020148 2/0/0 148 transfer (A) to N 01 0E 10 10 01 1 . 1 01E001 1/1/3 1 select literal address 38 16 01 04 08 H 6 1 4 8 186148 24/0/3 148 modify address of next 07 10 01 07 04 7 1 7 4 070174 7/0/0 174 augment (N) by (A) 16 10 04 10 10 6 4 060400 6/0/0 400 select (N) 02 08 01 1C 07 2 8 1 + 7 0281C7 2/1/0 1C7 transfer (A) to N 2A 10 13 01 1F = 3 1 £ 1A031F 26/0/0 31F enter subroutine 16 08 01 1C 16 6 8 1 + 6 0681C6 6/1/0 1C6 select (N) 02 19 10 10 16 2 9 6 029006 2/1/0 1006 transfer (A) to N 16 10 04 10 02 6 4 2 060402 6/0/0 402 select (N) 6E 00 00 00 00 be 1C 02 08 01 1C + 2 8 1 + 0C281C 12/0/1 81C convert 07 2A 10 13 01 7 = 3 1 07A031 7/1/1 31 augment (N) by (A) 1F 16 08 01 1C £ 6 8 1 + 0F681C 15/0/3 81C collate and add 16 02 19 10 10 6 2 9 062900 6/0/1 900 select (N) 0E 2A 10 13 04 . = 3 4 0EA034 14/1/1 34 replace selected bits 1A 2A 02 02 0D 10 = 2 2 : 0AA22D 10/1/1 22D multiply and add 0B 10 10 10 10 11 0B0000 11/0/0 0 multiply and subtract 10 01 0E 10 10 1 . 001E00 0/0/0 1E00 Halt 01 07 10 01 07 1 7 1 7 017017 1/0/3 1017 interchange area addresses 1F 01 0E 10 16 £ 1 . 6 0F1E06 15/0/0 1E06 collate and add 10 15 10 01 07 5 1 7 005017 0/0/2 1017 replace (B) by (N) 1F 3B 10 13 01 £ * 3 1 0FB031 15/1/1 1031 collate and add 1A 3B 16 13 01 10 * 6 3 1 0AB631 10/1/1 1631 multiply and add 1A 2A 02 13 01 10 = 2 3 1 0AA231 10/1/1 231 multiply and add 02 6E 00 00 00 2 be 02E000 2/1/3 0 transfer (A) to N 01 1A 01 0E 08 1 10 1 . 8 01A1E8 1/1/1 1E8 add literal address 10 10 02 01 10 2 1 000210 0/0/0 210 Halt 10 10 29 1C 10 I + 0009C0 0/0/0 9C0 Halt 10 10 02 10 01 2 1 000201 0/0/0 201 Halt 07 1F 2A 02 13 7 £ = 2 3 07FA23 7/1/3 1A23 augment (N) by (A) 01 02 10 10 10 1 2 012000 1/0/1 0 prepare for digit collation 10 10 38 08 13 H 8 3 000883 0/0/0 883 Halt 19 0E 10 10 10 9 . 09E000 9/1/3 0 multiply uniform radix 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 29 1C 10 I + 0009C0 0/0/0 9C0 Halt 10 10 32 19 10 B 9 000290 0/0/0 290 Halt 01 0E 6E 00 00 1 . be 01EE00 1/1/3 E00 select literal address 13 02 08 1F 08 3 2 8 £ 8 0328F8 3/0/1 8F8 copy (A) to N 01 1C 16 3B 02 1 + 6 * 2 01C6B2 1/1/2 6B2 subtract literal address 13 02 16 16 08 3 2 6 6 8 032668 3/0/1 668 copy (A) to N 01 1C 08 0E 08 1 + 8 . 8 01C8E8 1/1/2 8E8 subtract literal address 01 1C 16 29 1C 1 + 6 I + 01C69C 1/1/2 69C subtract literal address 10 10 10 3B 1A * 10 0000BA 0/0/0 BA Halt 13 02 07 2A 02 3 2 7 = 2 0327A2 3/0/1 7A2 copy (A) to N 13 01 1F 2A 1A 3 1 £ = 10 031FAA 3/0/0 1FAA copy (A) to N 01 08 10 16 1A 1 8 6 10 01806A 1/1/0 6A table look up 01 0B 10 02 0B 1 11 2 11 01B02B 1/1/1 102B add literal address 10 10 04 29 02 4 I 2 000492 0/0/0 492 Halt 10 10 02 38 08 2 H 8 000288 0/0/0 288 Halt 13 13 10 16 10 3 3 6 033060 3/0/1 1060 copy (A) to N 01 04 04 02 19 1 4 4 2 9 014429 1/0/2 429 round off 10 01 04 6E 00 1 4 be 0014E0 0/0/0 14E0 Halt 10 13 13 16 29 3 3 6 I 003369 0/0/1 1369 Invalid 1C 10 10 10 13 + 3 0C0003 12/0/0 3 convert 19 10 10 10 02 9 2 090002 9/0/0 2 multiply uniform radix 19 10 10 02 2A 9 2 = 09002A 9/0/0 2A multiply uniform radix 10 13 04 1A 2A 3 4 10 = 0034AA 0/0/1 14AA Invalid 10 13 04 1A 2A 3 4 10 = 0034AA 0/0/1 14AA Invalid 10 13 04 1A 16 3 4 10 6 0034A6 0/0/1 14A6 Invalid 08 01 19 02 02 8 1 9 2 2 081922 8/0/0 1922 merge constant length 19 10 10 04 16 9 4 6 090046 9/0/0 46 multiply uniform radix 08 01 1C 10 02 8 1 + 2 081C02 8/0/0 1C02 merge constant length 19 10 10 16 16 9 6 6 090066 9/0/0 66 multiply uniform radix 08 01 1C 02 02 8 1 + 2 2 081C22 8/0/0 1C22 merge constant length 19 10 10 1C 16 9 + 6 0900C6 9/0/0 C6 multiply uniform radix 08 01 1C 04 02 8 1 + 4 2 081C42 8/0/0 1C42 merge constant length 19 10 10 0E 6E 9 . be 0900EE 9/0/0 EE multiply uniform radix 10 10 13 04 04 3 4 4 000344 0/0/0 344 Halt 2A 10 13 04 1A = 3 4 10 1A034A 26/0/0 34A enter subroutine 2A 10 13 04 1A = 3 4 10 1A034A 26/0/0 34A enter subroutine 2A 10 13 04 1A = 3 4 10 1A034A 26/0/0 34A enter subroutine 01 0E 10 10 01 1 . 1 01E001 1/1/3 1 select literal address 02 10 01 07 0E 2 1 7 . 02017E 2/0/0 17E transfer (A) to N 38 08 01 0D 19 H 8 1 : 9 1881D9 24/1/0 1D9 unconditional jump 10 10 10 10 10 000000 0/0/0 0 Halt 2A 10 13 01 02 = 3 1 2 1A0312 26/0/0 312 enter subroutine 2A 10 02 0E 07 = 2 . 7 1A02E7 26/0/0 2E7 enter subroutine 38 16 10 08 13 H 6 8 3 186083 24/0/3 83 modify address of next 23 10 10 10 10 C 130000 19/0/0 0 output 2A 10 02 1F 13 = 2 £ 3 1A02F3 26/0/0 2F3 enter subroutine 2A 0E 01 08 02 = . 1 8 2 1AE182 26/1/3 182 set modification register 29 1C 10 10 10 I + 19C000 25/1/2 0 interrogate indicators 6E 00 00 00 00 be 02 13 1F 10 10 2 3 £ 023F00 2/0/1 1F00 transfer (A) to N 10 29 16 10 10 I 6 009600 0/1/0 1600 copy registers 02 38 08 13 15 2 H 8 3 5 028835 2/1/0 835 transfer (A) to N 02 2A 02 13 04 2 = 2 3 4 02A234 2/1/1 234 transfer (A) to N 1A 2A 1A 01 08 10 = 10 1 8 0AAA18 10/1/1 A18 multiply and add 04 16 1A 01 08 4 6 10 1 8 046A18 4/0/3 A18 add (N) to (A) 1A 02 0B 10 10 10 2 11 0A2B00 10/0/1 B00 multiply and add 04 29 02 10 10 4 I 2 049200 4/1/0 1200 add (N) to (A) 02 38 08 13 15 2 H 8 3 5 028835 2/1/0 835 transfer (A) to N 07 2A 10 13 04 7 = 3 4 07A034 7/1/1 34 augment (N) by (A) 1A 2A 10 13 04 10 = 3 4 0AA034 10/1/1 34 multiply and add 1A 16 08 01 19 10 6 8 1 9 0A6819 10/0/3 819 multiply and add 02 02 19 10 10 2 2 9 022900 2/0/1 900 transfer (A) to N 04 16 08 01 19 4 6 8 1 9 046819 4/0/3 819 add (N) to (A) 04 6E 00 00 00 4 be 04E000 4/1/3 0 add (N) to (A) 16 10 02 19 10 6 2 9 060290 6/0/0 290 select (N) 10 16 2A 10 13 6 = 3 006A03 0/0/3 A03 set radix 04 1A 2A 1A 01 4 10 = 10 1 04AAA1 4/1/1 AA1 add (N) to (A) 15 02 2A 1C 01 5 2 = + 1 052AC1 5/0/1 AC1 subtract (N) from (A) 08 16 16 1C 01 8 6 6 + 1 0866C1 8/0/3 6C1 merge constant length 19 1C 02 19 10 9 + 2 9 09C290 9/1/2 290 multiply uniform radix 10 1C 16 02 01 + 6 2 1 00C621 0/1/2 621 replace (B) by (N) 07 04 02 08 01 7 4 2 8 1 074281 7/0/2 281 augment (N) by (A) 1C 07 2A 10 13 + 7 = 3 0C7A03 12/0/3 1A03 convert 01 1F 16 08 01 1 £ 6 8 1 01F681 1/1/3 1681 select literal address 1C 16 02 19 10 + 6 2 9 0C6290 12/0/3 290 convert 01 10 2A 10 13 1 = 3 010A03 1/0/0 A03 table look up 04 1A 2A 10 13 4 10 = 3 04AA03 4/1/1 A03 add (N) to (A) 04 1A 29 02 10 4 10 I 2 04A920 4/1/1 920 add (N) to (A) 10 01 6E 00 00 1 be 001E00 0/0/0 1E00 Halt 13 16 0E 38 08 3 6 . H 8 036E88 3/0/3 E88 copy (A) to N 13 16 1F 29 04 3 6 £ I 4 036F94 3/0/3 F94 copy (A) to N 10 10 02 38 08 2 H 8 000288 0/0/0 288 Halt 13 16 04 2A 10 3 6 4 = 0364A0 3/0/3 4A0 copy (A) to N 13 04 1A 16 08 3 4 10 6 8 034A68 3/0/2 A68 copy (A) to N 01 19 16 02 19 1 9 6 2 9 019629 1/1/0 1629 table look up 10 10 04 16 08 4 6 8 000468 0/0/0 468 Halt 01 19 08 02 19 1 9 8 2 9 019829 1/1/0 1829 table look up 10 10 16 16 08 6 6 8 000668 0/0/0 668 Halt 01 19 1A 02 19 1 9 10 2 9 019A29 1/1/0 1A29 table look up 10 10 08 2A 10 8 = 0008A0 0/0/0 8A0 Halt 13 04 1A 01 0E 3 4 10 1 . 034A1E 3/0/2 A1E copy (A) to N 08 10 10 02 01 8 2 1 080021 8/0/0 21 merge constant length 10 10 10 2A 10 = 0000A0 0/0/0 A0 Halt 13 04 1A 6E 00 3 4 10 be 034AE0 3/0/2 AE0 copy (A) to N 10 13 07 1C 38 3 7 + H 0037C8 0/0/1 17C8 Invalid 16 10 08 13 23 6 8 3 C 060833 6/0/0 833 select (N) 0E 10 10 10 38 . H 0E0008 14/0/0 8 replace selected bits 16 10 08 01 23 6 8 1 C 060813 6/0/0 813 select (N) 1C 10 10 10 38 + H 0C0008 12/0/0 8 convert 08 13 1A 1C 10 8 3 10 + 083AC0 8/0/1 1AC0 merge constant length 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 29 I 000009 0/0/0 9 Halt 0B 10 10 10 01 11 1 0B0001 11/0/0 1 multiply and subtract 1F 1F 0D 0E 02 £ £ : . 2 0FFDE2 15/1/3 1DE2 collate and add 10 10 15 08 23 5 8 C 000583 0/0/0 583 Halt 02 10 01 08 2A 2 1 8 = 02018A 2/0/0 18A transfer (A) to N 08 10 01 08 6E 8 1 8 be 08018E 8/0/0 18E merge constant length 10 10 13 08 1A 3 8 10 00038A 0/0/0 38A Halt 10 01 1F 0D 0B 1 £ : 11 001FDB 0/0/0 1FDB Halt 38 08 10 19 01 H 8 9 1 188091 24/1/0 91 unconditional jump 10 01 1F 0D 1F 1 £ : £ 001FDF 0/0/0 1FDF Halt 10 10 10 02 10 2 000020 0/0/0 20 Halt 16 08 10 19 04 6 8 9 4 068094 6/1/0 94 select (N) 2C 19 1F 1F 1F ' 9 £ £ £ 1C9FFF 28/1/0 1FFF bulk copy alpha to short 38 19 1F 1F 1F H 9 £ £ £ 189FFF 24/1/0 1FFF unconditional jump 19 08 10 02 10 9 8 2 098020 9/1/0 20 multiply uniform radix 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 0E . 00000E 0/0/0 E Halt 10 10 10 10 10 000000 0/0/0 0 Halt 2A 0E 13 19 02 = . 3 9 2 1AE392 26/1/3 392 set modification register 16 0E 13 08 04 6 . 3 8 4 06E384 6/1/3 384 select (N) 02 0E 10 08 1C 2 . 8 + 02E08C 2/1/3 8C transfer (A) to N 6E 00 00 00 00 be 08 29 16 10 10 8 I 6 089600 8/1/0 1600 merge variable length 02 38 08 13 19 2 H 8 3 9 028839 2/1/0 839 transfer (A) to N 16 2A 02 13 19 6 = 2 3 9 06A239 6/1/1 239 select (N) 04 10 10 10 10 4 040000 4/0/0 0 add (N) to (A) 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 01 02 13 10 1 2 3 001230 0/0/0 1230 Halt 10 29 1C 10 10 I + 009C00 0/1/0 1C00 copy registers 10 3B 08 13 1A * 8 3 10 00B83A 0/1/1 183A replace registers 15 1F 08 01 1C 5 £ 8 1 + 05F81C 5/1/3 181C subtract (N) from (A) 16 3B 02 13 02 6 * 2 3 2 06B232 6/1/1 1232 select (N) 16 32 19 10 01 6 B 9 1 062901 6/0/1 901 select (N) 0E 38 08 13 19 . H 8 3 9 0E8839 14/1/0 839 replace selected bits 1F 01 0E 10 13 £ 1 . 3 0F1E03 15/0/0 1E03 collate and add 10 6E 00 00 00 be 00E000 0/1/3 0 Invalid 1A 16 02 08 01 10 6 2 8 1 0A6281 10/0/3 281 multiply and add 1C 16 2A 02 13 + 6 = 2 3 0C6A23 12/0/3 A23 convert 01 1F 10 10 10 1 £ 01F000 1/1/3 1000 select literal address 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 29 1C 10 I + 0009C0 0/0/0 9C0 Halt 10 10 02 08 01 2 8 1 000281 0/0/0 281 Halt 07 04 02 08 01 7 4 2 8 1 074281 7/0/2 281 augment (N) by (A) 07 16 02 08 01 7 6 2 8 1 076281 7/0/3 281 augment (N) by (A) 07 08 02 08 01 7 8 2 8 1 078281 7/1/0 281 augment (N) by (A) 07 1A 02 08 01 7 10 2 8 1 07A281 7/1/1 281 augment (N) by (A) 07 1C 02 08 01 7 + 2 8 1 07C281 7/1/2 281 augment (N) by (A) 07 0E 38 08 01 7 . H 8 1 07E881 7/1/3 881 augment (N) by (A) 1C 0B 6E 00 00 + 11 be 0CBE00 12/1/1 1E00 convert 13 0B 04 10 10 3 11 4 03B400 3/1/1 1400 copy (A) to N 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt File: old-paper-tapes/T69-1-6n.leo 10 10 01 02 1C 1 2 + 00012C 0/0/0 12C Halt 10 10 01 02 1C 1 2 + 00012C 0/0/0 12C Halt 10 10 13 0B 04 3 11 4 0003B4 0/0/0 3B4 Halt 10 10 01 02 1C 1 2 + 00012C 0/0/0 12C Halt 10 10 13 0B 04 3 11 4 0003B4 0/0/0 3B4 Halt 10 10 01 1C 0B 1 + 11 0001CB 0/0/0 1CB Halt 10 10 10 10 0E . 00000E 0/0/0 E Halt 10 10 10 16 19 6 9 000069 0/0/0 69 Halt 10 10 10 10 01 1 000001 0/0/0 1 Halt 10 10 10 10 16 6 000006 0/0/0 6 Halt 02 08 08 16 16 2 8 8 6 6 028866 2/1/0 866 transfer (A) to N 1F 07 1F 07 1F £ 7 £ 7 £ 0F7F7F 15/0/3 1F7F collate and add 07 1F 07 1F 07 7 £ 7 £ 7 07F7F7 7/1/3 17F7 augment (N) by (A) 10 07 1F 10 10 7 £ 007F00 0/0/3 1F00 set radix 10 10 07 1F 10 7 £ 0007F0 0/0/0 7F0 Halt 6E 00 00 00 00 be 10 10 01 13 10 1 3 000130 0/0/0 130 Halt 1F 10 10 07 1F £ 7 £ 0F007F 15/0/0 7F collate and add 07 1F 10 10 07 7 £ 7 07F007 7/1/3 1007 augment (N) by (A) 1F 10 10 10 10 £ 0F0000 15/0/0 0 collate and add 10 10 10 10 07 7 000007 0/0/0 7 Halt 10 10 10 07 1F 7 £ 00007F 0/0/0 7F Halt 10 10 07 1F 10 7 £ 0007F0 0/0/0 7F0 Halt 10 07 1F 10 10 7 £ 007F00 0/0/3 1F00 set radix 07 1F 10 10 10 7 £ 07F000 7/1/3 1000 augment (N) by (A) 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 07 1F 10 7 £ 0007F0 0/0/0 7F0 Halt 10 07 1F 10 10 7 £ 007F00 0/0/3 1F00 set radix 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 07 1F 7 £ 00007F 0/0/0 7F Halt 07 1F 10 10 10 7 £ 07F000 7/1/3 1000 augment (N) by (A) 6E 00 00 00 00 be 10 10 01 13 0E 1 3 . 00013E 0/0/0 13E Halt 10 10 10 10 10 000000 0/0/0 0 Halt 07 1F 10 10 10 7 £ 07F000 7/1/3 1000 augment (N) by (A) 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 07 1F 7 £ 00007F 0/0/0 7F Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 07 0E 7 . 00007E 0/0/0 7E Halt 07 0E 10 10 10 7 . 07E000 7/1/3 0 augment (N) by (A) 16 16 16 16 16 6 6 6 6 6 066666 6/0/3 666 select (N) 38 08 01 1F 1C H 8 1 £ + 1881FC 24/1/0 1FC unconditional jump 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 07 1C 08 7 + 8 0007C8 0/0/0 7C8 Halt 6E 00 00 00 00 be 10 10 01 04 1C 1 4 + 00014C 0/0/0 14C Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 07 1C 0E 7 + . 0007CE 0/0/0 7CE Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 07 0D 10 7 : 0007D0 0/0/0 7D0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 07 0D 02 7 : 2 0007D2 0/0/0 7D2 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 1A 10 00000A 0/0/0 A Halt 10 10 10 10 01 1 000001 0/0/0 1 Halt 10 10 10 10 1A 10 00000A 0/0/0 A Halt 10 10 10 10 02 2 000002 0/0/0 2 Halt 10 10 10 10 1A 10 00000A 0/0/0 A Halt 10 10 10 10 13 3 000003 0/0/0 3 Halt 10 10 10 10 1A 10 00000A 0/0/0 A Halt 6E 00 00 00 00 be 10 10 01 15 1A 1 5 10 00015A 0/0/0 15A Halt 10 10 10 10 04 4 000004 0/0/0 4 Halt 10 10 10 10 1A 10 00000A 0/0/0 A Halt 10 10 10 10 15 5 000005 0/0/0 5 Halt 10 10 10 10 1A 10 00000A 0/0/0 A Halt 10 10 10 10 16 6 000006 0/0/0 6 Halt 10 10 10 10 1A 10 00000A 0/0/0 A Halt 10 10 10 10 07 7 000007 0/0/0 7 Halt 10 10 10 10 1A 10 00000A 0/0/0 A Halt 10 10 10 10 08 8 000008 0/0/0 8 Halt 10 10 10 10 1A 10 00000A 0/0/0 A Halt 10 10 10 10 19 9 000009 0/0/0 9 Halt 10 10 10 10 1A 10 00000A 0/0/0 A Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 0B 11 00000B 0/0/0 B Halt 6E 00 00 00 00 be 10 10 01 16 08 1 6 8 000168 0/0/0 168 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 13 0E 19 3 . 9 0003E9 0/0/0 3E9 Halt 10 10 02 13 0B 2 3 11 00023B 0/0/0 23B Halt 10 10 02 04 10 2 4 000240 0/0/0 240 Halt 10 10 02 04 07 2 4 7 000247 0/0/0 247 Halt 10 10 02 15 10 2 5 000250 0/0/0 250 Halt 10 10 02 15 0B 2 5 11 00025B 0/0/0 25B Halt 10 10 02 16 10 2 6 000260 0/0/0 260 Halt 10 10 02 16 1F 2 6 £ 00026F 0/0/0 26F Halt 10 10 02 08 01 2 8 1 000281 0/0/0 281 Halt 10 10 02 19 15 2 9 5 000295 0/0/0 295 Halt 10 10 02 1A 0B 2 10 11 0002AB 0/0/0 2AB Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 6E 00 00 00 00 be 10 10 01 07 16 1 7 6 000176 0/0/0 176 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 01 10 1 000010 0/0/0 10 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 02 10 2 000020 0/0/0 20 Halt 6E 00 00 00 00 be 10 10 01 08 04 1 8 4 000184 0/0/0 184 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 08 8 000008 0/0/0 8 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 01 04 1 4 000014 0/0/0 14 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 13 15 01 16 13 3 5 1 6 3 035163 3/0/2 1163 copy (A) to N 07 13 16 16 07 7 3 6 6 7 073667 7/0/1 1667 augment (N) by (A) 04 16 04 15 02 4 6 4 5 2 046452 4/0/3 452 add (N) to (A) 10 10 16 15 07 6 5 7 000657 0/0/0 657 Halt 10 16 16 15 16 6 6 5 6 006656 0/0/3 656 set radix 15 15 16 19 10 5 5 6 9 055690 5/0/2 1690 subtract (N) from (A) 02 15 1C 07 02 2 5 + 7 2 025C72 2/0/2 1C72 transfer (A) to N 10 10 15 04 15 5 4 5 000545 0/0/0 545 Halt 6E 00 00 00 00 be 10 10 01 19 02 1 9 2 000192 0/0/0 192 Halt 16 15 13 16 02 6 5 3 6 2 065362 6/0/2 1362 select (N) 15 02 16 13 16 5 2 6 3 6 052636 5/0/1 636 subtract (N) from (A) 08 16 07 15 15 8 6 7 5 5 086755 8/0/3 755 merge constant length 10 10 07 13 07 7 3 7 000737 0/0/0 737 Halt 04 10 10 16 16 4 6 6 040066 4/0/0 66 add (N) to (A) 15 15 16 15 15 5 5 6 5 5 055655 5/0/2 1655 subtract (N) from (A) 13 15 15 07 02 3 5 5 7 2 035572 3/0/2 1572 copy (A) to N 15 16 10 10 07 5 6 7 056007 5/0/3 7 subtract (N) from (A) 10 10 10 10 10 000000 0/0/0 0 Halt 07 13 04 0E 10 7 3 4 . 0734E0 7/0/1 14E0 augment (N) by (A) 16 16 15 15 15 6 6 5 5 5 066555 6/0/3 555 select (N) 10 10 10 10 16 6 000006 0/0/0 6 Halt 13 07 16 16 16 3 7 6 6 6 037666 3/0/3 1666 copy (A) to N 10 10 10 10 07 7 000007 0/0/0 7 Halt 6E 00 00 00 00 be 10 10 01 1A 10 1 10 0001A0 0/0/0 1A0 Halt 19 15 15 15 15 9 5 5 5 5 095555 9/0/2 1555 multiply uniform radix 07 13 15 08 16 7 3 5 8 6 073586 7/0/1 1586 augment (N) by (A) 16 07 04 16 19 6 7 4 6 9 067469 6/0/3 1469 select (N) 10 10 15 16 16 5 6 6 000566 0/0/0 566 Halt 19 07 15 15 15 9 7 5 5 5 097555 9/0/3 1555 multiply uniform radix 10 10 15 16 15 5 6 5 000565 0/0/0 565 Halt 02 15 19 07 07 2 5 9 7 7 025977 2/0/2 1977 transfer (A) to N 10 10 10 10 07 7 000007 0/0/0 7 Halt 15 15 15 16 15 5 5 5 6 5 055565 5/0/2 1565 subtract (N) from (A) 07 02 15 15 07 7 2 5 5 7 072557 7/0/1 557 augment (N) by (A) 07 15 08 07 13 7 5 8 7 3 075873 7/0/2 1873 augment (N) by (A) 15 15 15 19 15 5 5 5 9 5 055595 5/0/2 1595 subtract (N) from (A) 19 16 15 15 15 9 6 5 5 5 096555 9/0/3 555 multiply uniform radix 10 10 16 15 15 6 5 5 000655 0/0/0 655 Halt 6E 00 00 00 00 be 10 01 1A 0E 13 1 10 . 3 001AE3 0/0/0 1AE3 Halt 15 15 16 15 10 5 5 6 5 055650 5/0/2 1650 subtract (N) from (A) 10 10 10 07 07 7 7 000077 0/0/0 77 Halt 04 0E 10 10 16 4 . 6 04E006 4/1/3 6 add (N) to (A) 04 15 01 15 07 4 5 1 5 7 045157 4/0/2 1157 add (N) to (A) 15 15 10 10 07 5 5 7 055007 5/0/2 1007 subtract (N) from (A) 13 15 01 16 01 3 5 1 6 1 035161 3/0/2 1161 copy (A) to N 16 15 07 02 07 6 5 7 2 7 065727 6/0/2 1727 select (N) 13 16 19 15 13 3 6 9 5 3 036953 3/0/3 953 copy (A) to N 16 16 16 19 16 6 6 6 9 6 066696 6/0/3 696 select (N) 13 15 01 07 19 3 5 1 7 9 035179 3/0/2 1179 copy (A) to N 15 15 16 08 10 5 5 6 8 055680 5/0/2 1680 subtract (N) from (A) 10 15 16 16 15 5 6 6 5 005665 0/0/2 1665 replace (B) by (N) 15 13 07 08 07 5 3 7 8 7 053787 5/0/1 1787 subtract (N) from (A) 04 15 15 16 6E 4 5 5 6 be 04556E 4/0/2 156E add (N) to (A) 10 10 01 0B 1C 1 11 + 0001BC 0/0/0 1BC Halt 15 07 02 07 13 5 7 2 7 3 057273 5/0/3 1273 subtract (N) from (A) 10 10 07 13 15 7 3 5 000735 0/0/0 735 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 04 0E 10 10 10 4 . 04E000 4/1/3 0 add (N) to (A) 15 16 16 04 0E 5 6 6 4 . 05664E 5/0/3 64E subtract (N) from (A) 10 10 10 10 16 6 000006 0/0/0 6 Halt 07 15 15 15 01 7 5 5 5 1 075551 7/0/2 1551 augment (N) by (A) 16 19 15 15 16 6 9 5 5 6 069556 6/1/0 1556 select (N) 15 16 16 04 0E 5 6 6 4 . 05664E 5/0/3 64E subtract (N) from (A) 07 13 10 10 16 7 3 6 073006 7/0/1 1006 augment (N) by (A) 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 13 10 13 10 3 3 003030 0/0/1 1030 Invalid 13 10 13 10 13 3 3 3 030303 3/0/0 303 copy (A) to N 6E 00 00 00 00 be 1A 38 08 01 1C 10 H 8 1 + 0A881C 10/1/0 81C multiply and add 1C 2A 10 13 19 + = 3 9 0CA039 12/1/1 39 convert 04 10 01 1F 1F 4 1 £ £ 0401FF 4/0/0 1FF add (N) to (A) 1F 16 10 01 1C £ 6 1 + 0F601C 15/0/3 1C collate and add 1A 02 10 10 10 10 2 0A2000 10/0/1 0 multiply and add 10 10 16 01 04 6 1 4 000614 0/0/0 614 Halt 16 38 1A 01 1C 6 H 10 1 + 068A1C 6/1/0 A1C select (N) 1A 01 0E 04 10 10 1 . 4 0A1E40 10/0/0 1E40 multiply and add 10 38 16 10 08 H 6 8 008608 0/1/0 608 copy registers 01 02 10 10 04 1 2 4 012004 1/0/1 4 prepare for digit collation 10 01 1F 10 10 1 £ 001F00 0/0/0 1F00 Halt 10 38 16 10 08 H 6 8 008608 0/1/0 608 copy registers 13 02 10 10 04 3 2 4 032004 3/0/1 4 copy (A) to N 10 16 08 01 04 6 8 1 4 006814 0/0/3 814 set radix 04 6E 00 00 00 4 be 04E000 4/1/3 0 add (N) to (A) 0D 08 02 19 10 : 8 2 9 0D8290 13/1/0 290 divide uniform radix 02 02 29 1C 10 2 2 I + 0229C0 2/0/1 9C0 transfer (A) to N 10 10 13 08 04 3 8 4 000384 0/0/0 384 Halt 10 10 13 08 01 3 8 1 000381 0/0/0 381 Halt 04 08 29 1C 07 4 8 I + 7 0489C7 4/1/0 9C7 add (N) to (A) 1F 1F 3B 02 01 £ £ * 2 1 0FFB21 15/1/3 1B21 collate and add 0E 13 2A 1A 01 . 3 = 10 1 0E3AA1 14/0/1 1AA1 replace selected bits 15 02 2A 1C 01 5 2 = + 1 052AC1 5/0/1 AC1 subtract (N) from (A) 16 16 01 0E 10 6 6 1 . 0661E0 6/0/3 1E0 select (N) 10 10 02 08 04 2 8 4 000284 0/0/0 284 Halt 10 10 38 08 02 H 8 2 000882 0/0/0 882 Halt 13 16 29 1C 10 3 6 I + 0369C0 3/0/3 9C0 copy (A) to N 10 01 3B 10 01 1 * 1 001B01 0/0/0 1B01 Halt 0E 0B 2A 1A 01 . 11 = 10 1 0EBAA1 14/1/1 1AA1 replace selected bits 15 02 6E 00 00 5 2 be 052E00 5/0/1 E00 subtract (N) from (A) 01 0E 16 2A 1C 1 . 6 = + 01E6AC 1/1/3 6AC select literal address 01 16 08 01 0E 1 6 8 1 . 01681E 1/0/3 81E interchange area addresses 10 10 10 02 08 2 8 000028 0/0/0 28 Halt 04 10 10 29 1A 4 I 10 04009A 4/0/0 9A add (N) to (A) 10 10 01 38 08 1 H 8 000188 0/0/0 188 Halt 02 13 16 29 1C 2 3 6 I + 02369C 2/0/1 169C transfer (A) to N 10 10 02 3B 10 2 * 0002B0 0/0/0 2B0 Halt 01 1F 13 2A 1A 1 £ 3 = 10 01F3AA 1/1/3 13AA select literal address 01 15 04 2A 1C 1 5 4 = + 0154AC 1/0/2 14AC round off 01 16 08 01 0E 1 6 8 1 . 01681E 1/0/3 81E interchange area addresses 10 10 01 02 08 1 2 8 000128 0/0/0 128 Halt 04 10 10 29 1A 4 I 10 04009A 4/0/0 9A add (N) to (A) 10 10 02 38 08 2 H 8 000288 0/0/0 288 Halt 02 13 16 29 1C 2 3 6 I + 02369C 2/0/1 169C transfer (A) to N 10 10 04 6E 00 4 be 0004E0 0/0/0 4E0 Halt 10 01 1F 04 3B 1 £ 4 * 001F4B 0/0/0 1F4B Halt 10 01 1F 0B 2A 1 £ 11 = 001FBA 0/0/0 1FBA Halt 1A 01 15 16 2A 10 1 5 6 = 0A156A 10/0/0 156A multiply and add 1C 01 16 08 01 + 1 6 8 1 0C1681 12/0/0 1681 convert 0E 10 10 02 02 . 2 2 0E0022 14/0/0 22 replace selected bits 08 04 10 10 29 8 4 I 084009 8/0/2 9 merge constant length 1A 10 10 04 38 10 4 H 0A0048 10/0/0 48 multiply and add 08 02 13 16 29 8 2 3 6 I 082369 8/0/1 369 merge constant length 1C 10 10 08 3B + 8 * 0C008B 12/0/0 8B convert 10 02 10 13 2A 2 3 = 00203A 0/0/1 3A Invalid 1A 01 15 08 2A 10 1 5 8 = 0A158A 10/0/0 158A multiply and add 1C 01 16 08 01 + 1 6 8 1 0C1681 12/0/0 1681 convert 0E 10 10 13 02 . 3 2 0E0032 14/0/0 32 replace selected bits 08 04 10 10 29 8 4 I 084009 8/0/2 9 merge constant length 1A 10 10 08 6E 10 8 be 0A008E 10/0/0 8E multiply and add 10 10 02 10 02 2 2 000202 0/0/0 202 Halt 38 08 02 13 16 H 8 2 3 6 188236 24/1/0 236 unconditional jump 29 1C 10 01 10 I + 1 19C010 25/1/2 10 interrogate indicators 3B 10 02 10 0B * 2 11 1B020B 27/0/0 20B jump A = Z 2A 1A 01 15 1A = 10 1 5 10 1AA15A 26/1/1 15A set modification register 2A 1C 01 16 08 = + 1 6 8 1AC168 26/1/2 168 set modification register 01 0E 10 10 04 1 . 4 01E004 1/1/3 4 select literal address 02 08 04 10 10 2 8 4 028400 2/1/0 400 transfer (A) to N 29 1A 10 01 10 I 10 1 19A010 25/1/1 10 clear indicators 38 08 02 13 16 H 8 2 3 6 188236 24/1/0 236 unconditional jump 29 1C 10 02 10 I + 2 19C020 25/1/2 20 interrogate indicators 3B 10 02 01 13 * 2 1 3 1B0213 27/0/0 213 jump A = Z 2A 1A 01 15 1C = 10 1 5 + 1AA15C 26/1/1 15C set modification register 2A 1C 01 16 08 = + 1 6 8 1AC168 26/1/2 168 set modification register 01 0E 10 10 15 1 . 5 01E005 1/1/3 5 select literal address 6E 00 00 00 00 be 10 02 08 04 10 2 8 4 002840 0/0/1 840 Invalid 10 29 1A 10 02 I 10 2 009A02 0/1/0 1A02 copy registers 10 38 08 02 13 H 8 2 3 008823 0/1/0 823 copy registers 16 29 1C 10 04 6 I + 4 069C04 6/1/0 1C04 select (N) 10 3B 10 02 01 * 2 1 00B021 0/1/1 1021 replace registers 0B 2A 1A 01 15 11 = 10 1 5 0BAA15 11/1/1 A15 multiply and subtract 0E 2A 1C 01 16 . = + 1 6 0EAC16 14/1/1 C16 replace selected bits 08 01 0E 10 10 8 1 . 081E00 8/0/0 1E00 merge constant length 16 02 08 04 10 6 2 8 4 062840 6/0/1 840 select (N) 10 29 1A 10 04 I 10 4 009A04 0/1/0 1A04 copy registers 10 38 08 02 13 H 8 2 3 008823 0/1/0 823 copy registers 16 29 1C 10 08 6 I + 8 069C08 6/1/0 1C08 select (N) 10 3B 10 02 02 * 2 2 00B022 0/1/1 1022 replace registers 13 2A 1A 01 16 3 = 10 1 6 03AA16 3/1/1 A16 copy (A) to N 10 6E 00 00 00 be 00E000 0/1/3 0 Invalid 01 0E 2A 1C 01 1 . = + 1 01EAC1 1/1/3 AC1 select literal address 16 08 01 0E 10 6 8 1 . 0681E0 6/1/0 1E0 select (N) 10 07 02 08 04 7 2 8 4 007284 0/0/3 1284 set radix 10 10 29 1A 10 I 10 0009A0 0/0/0 9A0 Halt 08 10 38 08 02 8 H 8 2 080882 8/0/0 882 merge constant length 13 16 29 1C 01 3 6 I + 1 0369C1 3/0/3 9C1 copy (A) to N 10 10 3B 10 02 * 2 000B02 0/0/0 B02 Halt 02 0B 2A 1A 01 2 11 = 10 1 02BAA1 2/1/1 1AA1 transfer (A) to N 16 02 2A 1C 01 6 2 = + 1 062AC1 6/0/1 AC1 select (N) 16 08 01 0E 10 6 8 1 . 0681E0 6/1/0 1E0 select (N) 10 08 02 08 04 8 2 8 4 008284 0/1/0 284 copy registers 10 10 29 1A 01 I 10 1 0009A1 0/0/0 9A1 Halt 10 10 38 08 02 H 8 2 000882 0/0/0 882 Halt 13 16 29 1C 02 3 6 I + 2 0369C2 3/0/3 9C2 copy (A) to N 10 10 6E 00 00 be 000E00 0/0/0 E00 Halt 02 02 1C 3B 10 2 2 + * 022CB0 2/0/1 CB0 transfer (A) to N 02 13 13 2A 1A 2 3 3 = 10 0233AA 2/0/1 13AA transfer (A) to N 01 16 04 2A 1C 1 6 4 = + 0164AC 1/0/3 4AC interchange area addresses 01 16 08 01 0E 1 6 8 1 . 01681E 1/0/3 81E interchange area addresses 10 10 19 02 08 9 2 8 000928 0/0/0 928 Halt 04 10 10 29 1A 4 I 10 04009A 4/0/0 9A add (N) to (A) 02 10 10 38 08 2 H 8 020088 2/0/0 88 transfer (A) to N 02 13 16 10 10 2 3 6 023600 2/0/1 1600 transfer (A) to N 10 01 01 38 08 1 1 H 8 001188 0/0/0 1188 Halt 01 0D 1C 2A 1C 1 : + = + 01DCAC 1/1/2 1CAC subtract literal address 01 16 16 29 1C 1 6 6 I + 01669C 1/0/3 69C interchange area addresses 10 10 10 02 08 2 8 000028 0/0/0 28 Halt 04 10 02 2A 0E 4 2 = . 0402AE 4/0/0 2AE add (N) to (A) 01 04 1A 38 16 1 4 10 H 6 014A86 1/0/2 A86 round off 10 10 02 6E 00 2 be 0002E0 0/0/0 2E0 Halt 10 02 13 1A 2A 2 3 10 = 0023AA 0/0/1 3AA Invalid 02 01 16 1A 16 2 1 6 10 6 0216A6 2/0/0 16A6 transfer (A) to N 08 01 02 1C 02 8 1 2 + 2 0812C2 8/0/0 12C2 merge constant length 0E 04 10 04 29 . 4 4 I 0E4049 14/0/2 49 replace selected bits 16 10 10 02 38 6 2 H 060028 6/0/0 28 select (N) 08 02 13 0B 38 8 2 3 11 H 0823B8 8/0/1 3B8 merge constant length 08 02 0B 01 16 8 2 11 1 6 082B16 8/0/1 B16 merge constant length 08 01 02 0E 02 8 1 2 . 2 0812E2 8/0/0 12E2 merge constant length 0E 04 10 04 16 . 4 4 6 0E4046 14/0/2 46 replace selected bits 08 01 13 10 02 8 1 3 2 081302 8/0/0 1302 merge constant length 0E 04 10 16 29 . 4 6 I 0E4069 14/0/2 69 replace selected bits 16 10 10 04 38 6 4 H 060048 6/0/0 48 select (N) 08 02 04 10 38 8 2 4 H 082408 8/0/1 408 merge constant length 08 02 0B 01 16 8 2 11 1 6 082B16 8/0/1 B16 merge constant length 08 01 13 02 6E 8 1 3 2 be 08132E 8/0/0 132E merge constant length 10 10 02 04 08 2 4 8 000248 0/0/0 248 Halt 02 0E 04 10 04 2 . 4 4 02E404 2/1/3 404 transfer (A) to N 16 08 01 13 04 6 8 1 3 4 068134 6/1/0 134 select (N) 02 0E 04 10 16 2 . 4 6 02E406 2/1/3 406 transfer (A) to N 16 08 01 13 16 6 8 1 3 6 068136 6/1/0 136 select (N) 02 0E 04 10 08 2 . 4 8 02E408 2/1/3 408 transfer (A) to N 29 16 10 10 16 I 6 6 196006 25/0/3 6 step on and test 38 08 02 04 07 H 8 2 4 7 188247 24/1/0 247 unconditional jump 38 08 02 0B 01 H 8 2 11 1 1882B1 24/1/0 2B1 unconditional jump 16 08 01 13 08 6 8 1 3 8 068138 6/1/0 138 select (N) 02 0E 04 10 04 2 . 4 4 02E404 2/1/3 404 transfer (A) to N 16 08 01 13 02 6 8 1 3 2 068132 6/1/0 132 select (N) 02 0E 04 10 16 2 . 4 6 02E406 2/1/3 406 transfer (A) to N 16 08 01 13 1A 6 8 1 3 10 06813A 6/1/0 13A select (N) 02 0E 04 10 08 2 . 4 8 02E408 2/1/3 408 transfer (A) to N 6E 00 00 00 00 be 16 16 08 01 13 6 6 8 1 3 066813 6/0/3 813 select (N) 1C 02 0E 04 10 + 2 . 4 0C2E40 12/0/1 E40 convert 1A 29 16 10 10 10 I 6 0A9600 10/1/0 1600 multiply and add 08 38 08 02 15 8 H 8 2 5 088825 8/1/0 825 merge variable length 10 38 08 02 0B H 8 2 11 00882B 0/1/0 82B copy registers 01 16 08 01 13 1 6 8 1 3 016813 1/0/3 813 interchange area addresses 0E 02 0E 04 10 . 2 . 4 0E2E40 14/0/1 E40 replace selected bits 04 29 16 10 10 4 I 6 049600 4/1/0 1600 add (N) to (A) 02 38 08 02 15 2 H 8 2 5 028825 2/1/0 825 transfer (A) to N 0B 38 08 02 0B 11 H 8 2 11 0B882B 11/1/0 82B multiply and subtract 01 16 08 01 04 1 6 8 1 4 016814 1/0/3 814 interchange area addresses 10 02 0E 04 10 2 . 4 002E40 0/0/1 E40 Invalid 04 16 08 01 04 4 6 8 1 4 046814 4/0/3 814 add (N) to (A) 02 02 0E 04 10 2 2 . 4 022E40 2/0/1 E40 transfer (A) to N 16 6E 00 00 00 6 be 06E000 6/1/3 0 select (N) 16 04 16 08 01 6 4 6 8 1 064681 6/0/2 681 select (N) 13 1A 02 0E 04 3 10 2 . 4 03A2E4 3/1/1 2E4 copy (A) to N 10 08 16 08 01 8 6 8 1 008681 0/1/0 681 copy registers 13 02 02 0E 04 3 2 2 . 4 0322E4 3/0/1 2E4 copy (A) to N 10 1A 16 08 01 10 6 8 1 00A681 0/1/1 681 replace registers 13 08 02 0E 04 3 8 2 . 4 0382E4 3/1/0 2E4 copy (A) to N 10 1C 16 08 01 + 6 8 1 00C681 0/1/2 681 replace (B) by (N) 13 0E 02 0E 04 3 . 2 . 4 03E2E4 3/1/3 2E4 copy (A) to N 10 0E 29 16 10 . I 6 00E960 0/1/3 960 Invalid 10 1C 38 08 02 + H 8 2 00C882 0/1/2 882 replace (B) by (N) 16 10 38 08 02 6 H 8 2 060882 6/0/0 882 select (N) 0B 01 2A 0E 01 11 1 = . 1 0B1AE1 11/0/0 1AE1 multiply and subtract 15 10 16 08 01 5 6 8 1 050681 5/0/0 681 subtract (N) from (A) 04 10 02 0E 04 4 2 . 4 0402E4 4/0/0 2E4 add (N) to (A) 10 04 6E 00 00 4 be 004E00 0/0/2 E00 replace (B) by (N) 02 07 02 16 08 2 7 2 6 8 027268 2/0/3 1268 transfer (A) to N 01 13 1A 02 0E 1 3 10 2 . 013A2E 1/0/1 1A2E prepare for digit collation 04 10 16 16 08 4 6 6 8 040668 4/0/0 668 add (N) to (A) 01 13 08 02 0E 1 3 8 2 . 01382E 1/0/1 182E prepare for digit collation 04 10 08 16 08 4 8 6 8 040868 4/0/0 868 add (N) to (A) 01 04 10 02 0E 1 4 2 . 01402E 1/0/2 2E round off 04 10 1A 16 08 4 10 6 8 040A68 4/0/0 A68 add (N) to (A) 01 04 02 02 0E 1 4 2 2 . 01422E 1/0/2 22E round off 04 10 1C 16 08 4 + 6 8 040C68 4/0/0 C68 add (N) to (A) 01 13 02 02 0E 1 3 2 2 . 01322E 1/0/1 122E prepare for digit collation 04 10 0E 16 08 4 . 6 8 040E68 4/0/0 E68 add (N) to (A) 01 13 0E 02 0E 1 3 . 2 . 013E2E 1/0/1 1E2E prepare for digit collation 04 01 10 29 16 4 1 I 6 041096 4/0/0 1096 add (N) to (A) 10 10 0E 38 08 . H 8 000E88 0/0/0 E88 Halt 02 07 10 6E 00 2 7 be 0270E0 2/0/3 10E0 transfer (A) to N 10 02 08 10 38 2 8 H 002808 0/0/1 808 Invalid 08 02 0B 01 2A 8 2 11 1 = 082B1A 8/0/1 B1A merge constant length 0E 01 04 0E 16 . 1 4 . 6 0E14E6 14/0/0 14E6 replace selected bits 08 01 04 10 02 8 1 4 2 081402 8/0/0 1402 merge constant length 0E 04 10 04 16 . 4 4 6 0E4046 14/0/2 46 replace selected bits 08 01 13 02 02 8 1 3 2 2 081322 8/0/0 1322 merge constant length 0E 04 10 16 16 . 4 6 6 0E4066 14/0/2 66 replace selected bits 08 01 04 10 02 8 1 4 2 081402 8/0/0 1402 merge constant length 0E 04 10 08 16 . 4 8 6 0E4086 14/0/2 86 replace selected bits 08 01 04 02 02 8 1 4 2 2 081422 8/0/0 1422 merge constant length 0E 04 10 1A 16 . 4 10 6 0E40A6 14/0/2 A6 replace selected bits 08 01 13 08 02 8 1 3 8 2 081382 8/0/0 1382 merge constant length 0E 04 10 1C 16 . 4 + 6 0E40C6 14/0/2 C6 replace selected bits 08 01 04 10 02 8 1 4 2 081402 8/0/0 1402 merge constant length 0E 04 10 0E 6E . 4 . be 0E40EE 14/0/2 EE replace selected bits 10 10 02 08 0E 2 8 . 00028E 0/0/0 28E Halt 16 08 01 13 1A 6 8 1 3 10 06813A 6/1/0 13A select (N) 02 0E 04 01 10 2 . 4 1 02E410 2/1/3 410 transfer (A) to N 16 08 01 13 0E 6 8 1 3 . 06813E 6/1/0 13E select (N) 02 0E 04 01 02 2 . 4 1 2 02E412 2/1/3 412 transfer (A) to N 29 16 10 01 10 I 6 1 196010 25/0/3 10 step on and test 38 08 02 08 02 H 8 2 8 2 188282 24/1/0 282 unconditional jump 38 08 02 0B 01 H 8 2 11 1 1882B1 24/1/0 2B1 unconditional jump 2A 0E 01 04 1C = . 1 4 + 1AE14C 26/1/3 14C set modification register 16 08 01 04 10 6 8 1 4 068140 6/1/0 140 select (N) 02 0E 04 10 04 2 . 4 4 02E404 2/1/3 404 transfer (A) to N 16 08 01 13 08 6 8 1 3 8 068138 6/1/0 138 select (N) 02 0E 04 10 16 2 . 4 6 02E406 2/1/3 406 transfer (A) to N 16 08 01 04 10 6 8 1 4 068140 6/1/0 140 select (N) 02 0E 04 10 08 2 . 4 8 02E408 2/1/3 408 transfer (A) to N 6E 00 00 00 00 be 1C 16 08 01 13 + 6 8 1 3 0C6813 12/0/3 813 convert 02 02 0E 04 10 2 2 . 4 022E40 2/0/1 E40 transfer (A) to N 1A 16 08 01 04 10 6 8 1 4 0A6814 10/0/3 814 multiply and add 10 02 0E 04 10 2 . 4 002E40 0/0/1 E40 Invalid 1C 16 08 01 13 + 6 8 1 3 0C6813 12/0/3 813 convert 1A 02 0E 04 10 10 2 . 4 0A2E40 10/0/1 E40 multiply and add 0E 16 08 01 04 . 6 8 1 4 0E6814 14/0/3 814 replace selected bits 10 02 0E 04 01 2 . 4 1 002E41 0/0/1 E41 Invalid 10 16 08 01 04 6 8 1 4 006814 0/0/3 814 set radix 02 02 0E 04 01 2 2 . 4 1 022E41 2/0/1 E41 transfer (A) to N 02 16 08 01 13 2 6 8 1 3 026813 2/0/3 813 transfer (A) to N 0E 02 0E 04 01 . 2 . 4 1 0E2E41 14/0/1 E41 replace selected bits 04 29 16 10 01 4 I 6 1 049601 4/1/0 1601 add (N) to (A) 02 38 08 02 19 2 H 8 2 9 028829 2/1/0 829 transfer (A) to N 16 6E 00 00 00 6 be 06E000 6/1/3 0 select (N) 1A 1A 38 08 02 10 10 H 8 2 0AA882 10/1/1 882 multiply and add 0B 01 16 08 01 11 1 6 8 1 0B1681 11/0/0 1681 multiply and subtract 04 10 02 0E 04 4 2 . 4 0402E4 4/0/0 2E4 add (N) to (A) 10 04 16 08 01 4 6 8 1 004681 0/0/2 681 replace (B) by (N) 13 0E 02 0E 04 3 . 2 . 4 03E2E4 3/1/3 2E4 copy (A) to N 10 16 29 16 10 6 I 6 006960 0/0/3 960 set radix 10 04 38 08 02 4 H 8 2 004882 0/0/2 882 replace (B) by (N) 1A 0B 01 0E 10 10 11 1 . 0AB1E0 10/1/1 11E0 multiply and add 10 01 07 10 04 1 7 4 001704 0/0/0 1704 Halt 10 10 01 0E 10 1 . 0001E0 0/0/0 1E0 Halt 10 01 07 10 04 1 7 4 001704 0/0/0 1704 Halt 10 02 29 1C 04 2 I + 4 0029C4 0/0/1 9C4 Invalid 10 10 3B 10 02 * 2 000B02 0/0/0 B02 Halt 0B 0B 16 10 10 11 11 6 0BB600 11/1/1 1600 multiply and subtract 10 15 6E 00 00 5 be 005E00 0/0/2 1E00 replace (B) by (N) 02 0B 08 01 1C 2 11 8 1 + 02B81C 2/1/1 181C transfer (A) to N 10 10 01 02 10 1 2 000120 0/0/0 120 Halt 10 10 04 29 1A 4 I 10 00049A 0/0/0 49A Halt 04 10 10 29 04 4 I 4 040094 4/0/0 94 add (N) to (A) 10 10 01 38 08 1 H 8 000188 0/0/0 188 Halt 02 1C 13 29 02 2 + 3 I 2 02C392 2/1/2 392 transfer (A) to N 10 10 01 38 08 1 H 8 000188 0/0/0 188 Halt 02 1C 10 38 08 2 + H 8 02C088 2/1/2 88 transfer (A) to N 13 15 16 29 1C 3 5 6 I + 03569C 3/0/2 169C copy (A) to N 13 1F 1F 3B 10 3 £ £ * 03FFB0 3/1/3 1FB0 copy (A) to N 02 13 15 38 08 2 3 5 H 8 023588 2/0/1 1588 transfer (A) to N 01 0E 13 16 10 1 . 3 6 01E360 1/1/3 360 select literal address 01 07 0E 3B 02 1 7 . * 2 017EB2 1/0/3 1EB2 interchange area addresses 02 1C 16 38 08 2 + 6 H 8 02C688 2/1/2 688 transfer (A) to N 13 02 1F 6E 00 3 2 £ be 032FE0 3/0/1 FE0 copy (A) to N 10 02 1C 16 16 2 + 6 6 002C66 0/0/1 C66 Invalid 08 01 04 04 02 8 1 4 4 2 081442 8/0/0 1442 merge constant length 08 0B 1C 0E 2A 8 11 + . = 08BCEA 8/1/1 1CEA merge variable length 10 02 1C 1F 38 2 + £ H 002CF8 0/0/1 CF8 Invalid 16 10 08 01 23 6 8 1 C 060813 6/0/0 813 select (N) 10 10 10 10 2A = 00000A 0/0/0 A Halt 10 02 0D 0B 29 2 : 11 I 002DB9 0/0/1 DB9 Invalid 1C 08 10 10 3B + 8 * 0C800B 12/1/0 B convert 02 13 15 16 38 2 3 5 6 H 023568 2/0/1 1568 transfer (A) to N 08 02 0B 13 10 8 2 11 3 082B30 8/0/1 B30 merge constant length 10 10 10 10 38 H 000008 0/0/0 8 Halt 16 10 08 01 2A 6 8 1 = 06081A 6/0/0 81A select (N) 08 10 10 10 10 8 080000 8/0/0 0 merge constant length 10 10 10 01 38 1 H 000018 0/0/0 18 Halt 08 02 0D 10 6E 8 2 : be 082D0E 8/0/1 D0E merge constant length 10 10 02 0D 04 2 : 4 0002D4 0/0/0 2D4 Halt 2A 02 02 1C 1F = 2 2 + £ 1A22CF 26/0/1 2CF leave subroutine 38 08 02 0D 07 H 8 2 : 7 1882D7 24/1/0 2D7 unconditional jump 2A 02 02 1C 1F = 2 2 + £ 1A22CF 26/0/1 2CF leave subroutine 38 16 10 08 01 H 6 8 1 186081 24/0/3 81 modify address of next 23 1A 10 10 10 C 10 13A000 19/1/1 0 rewind 10 10 10 10 02 2 000002 0/0/0 2 Halt 38 08 01 1C 1C H 8 1 + + 1881CC 24/1/0 1CC unconditional jump 10 10 10 10 10 000000 0/0/0 0 Halt 38 16 10 08 01 H 6 8 1 186081 24/0/3 81 modify address of next 2A 08 10 10 10 = 8 1A8000 26/1/0 0 test route N1 10 10 10 10 01 1 000001 0/0/0 1 Halt 38 08 02 0D 1C H 8 2 : + 1882DC 24/1/0 2DC unconditional jump 38 08 13 10 01 H 8 3 1 188301 24/1/0 301 unconditional jump 38 08 02 0E 13 H 8 2 . 3 1882E3 24/1/0 2E3 unconditional jump 6E 00 00 00 00 be 02 2A 02 02 0D 2 = 2 2 : 02A22D 2/1/1 22D transfer (A) to N 0B 38 16 10 08 11 H 6 8 0B8608 11/1/0 608 multiply and subtract 01 23 1A 10 10 1 C 10 013A00 1/0/1 1A00 prepare for digit collation 10 10 10 10 10 000000 0/0/0 0 Halt 02 38 08 01 1C 2 H 8 1 + 02881C 2/1/0 81C transfer (A) to N 1C 10 10 10 10 + 0C0000 12/0/0 0 convert 10 38 16 10 08 H 6 8 008608 0/1/0 608 copy registers 13 2A 08 10 10 3 = 8 03A800 3/1/1 800 copy (A) to N 10 10 10 10 10 000000 0/0/0 0 Halt 13 38 08 02 0E 3 H 8 2 . 03882E 3/1/0 82E copy (A) to N 08 2A 02 02 0E 8 = 2 2 . 08A22E 8/1/1 22E merge variable length 07 38 08 02 0E 7 H 8 2 . 07882E 7/1/0 82E augment (N) by (A) 1F 2A 02 02 0E £ = 2 2 . 0FA22E 15/1/1 22E collate and add 07 38 16 10 08 7 H 6 8 078608 7/1/0 608 augment (N) by (A) 13 6E 00 00 00 3 be 03E000 3/1/3 0 copy (A) to N 1F 10 23 0E 10 £ C . 0F03E0 15/0/0 3E0 collate and add 10 10 10 10 10 000000 0/0/0 0 Halt 10 04 38 08 02 4 H 8 2 004882 0/0/2 882 replace (B) by (N) 0E 08 10 10 10 . 8 0E8000 14/1/0 0 replace selected bits 10 10 38 16 10 H 6 000860 0/0/0 860 Halt 08 13 2A 08 10 8 3 = 8 083A80 8/0/1 1A80 merge constant length 10 10 10 10 10 000000 0/0/0 0 Halt 10 13 38 08 02 3 H 8 2 003882 0/0/1 1882 Invalid 1F 04 38 08 02 £ 4 H 8 2 0F4882 15/0/2 882 collate and add 1F 1F 38 08 02 £ £ H 8 2 0FF882 15/1/3 1882 collate and add 1F 0B 2A 02 02 £ 11 = 2 2 0FBA22 15/1/1 1A22 collate and add 1F 13 38 16 10 £ 3 H 6 0F3860 15/0/1 1860 collate and add 08 13 23 0E 10 8 3 C . 0833E0 8/0/1 13E0 merge constant length 10 10 10 10 10 000000 0/0/0 0 Halt 10 04 6E 00 00 4 be 004E00 0/0/2 E00 replace (B) by (N) 02 1F 0E 38 08 2 £ . H 8 02FE88 2/1/3 1E88 transfer (A) to N 02 1F 04 10 10 2 £ 4 02F400 2/1/3 1400 transfer (A) to N 10 10 15 38 08 5 H 8 000588 0/0/0 588 Halt 02 0E 08 16 10 2 . 8 6 02E860 2/1/3 860 transfer (A) to N 10 10 02 02 10 2 2 000220 0/0/0 220 Halt 01 04 08 01 0E 1 4 8 1 . 01481E 1/0/2 81E round off 10 10 01 38 16 1 H 6 000186 0/0/0 186 Halt 01 04 08 07 10 1 4 8 7 014870 1/0/2 870 round off 01 07 04 16 10 1 7 4 6 017460 1/0/3 1460 interchange area addresses 04 10 10 02 08 4 2 8 040028 4/0/0 28 add (N) to (A) 01 1C 07 2A 10 1 + 7 = 01C7A0 1/1/2 7A0 subtract literal address 13 01 1F 16 08 3 1 £ 6 8 031F68 3/0/0 1F68 copy (A) to N 01 1C 16 02 19 1 + 6 2 9 01C629 1/1/2 629 subtract literal address 10 10 16 16 10 6 6 000660 0/0/0 660 Halt 04 10 02 6E 00 4 2 be 0402E0 4/0/0 2E0 add (N) to (A) 10 13 10 1C 02 3 + 2 0030C2 0/0/1 10C2 Invalid 08 01 1C 07 2A 8 1 + 7 = 081C7A 8/0/0 1C7A merge constant length 10 13 01 1F 16 3 1 £ 6 0031F6 0/0/1 11F6 Invalid 08 01 1C 16 02 8 1 + 6 2 081C62 8/0/0 1C62 merge constant length 19 10 10 0E 2A 9 . = 0900EA 9/0/0 EA multiply uniform radix 10 13 04 1A 2A 3 4 10 = 0034AA 0/0/1 14AA Invalid 02 02 0D 0B 10 2 2 : 11 022DB0 2/0/1 DB0 transfer (A) to N 10 10 10 10 01 1 000001 0/0/0 1 Halt 0E 10 10 01 07 . 1 7 0E0017 14/0/0 17 replace selected bits 10 01 07 1F 01 1 7 £ 1 0017F1 0/0/0 17F1 Halt 0E 10 16 10 15 . 6 5 0E0605 14/0/0 605 replace selected bits 10 01 07 1F 3B 1 7 £ * 0017FB 0/0/0 17FB Halt 10 13 01 1A 3B 3 1 10 * 0031AB 0/0/1 11AB Invalid 16 13 01 1A 2A 6 3 1 10 = 0631AA 6/0/1 11AA select (N) 02 13 01 02 6E 2 3 1 2 be 02312E 2/0/1 112E transfer (A) to N 10 10 13 01 1A 3 1 10 00031A 0/0/0 31A Halt 01 0E 08 10 10 1 . 8 01E800 1/1/3 800 select literal address 02 01 10 10 10 2 1 021000 2/0/0 1000 transfer (A) to N 29 1C 10 10 10 I + 19C000 25/1/2 0 interrogate indicators 02 10 01 07 1F 2 1 7 £ 02017F 2/0/0 17F transfer (A) to N 2A 02 13 01 02 = 2 3 1 2 1A2312 26/0/1 312 leave subroutine 10 10 10 10 10 000000 0/0/0 0 Halt 38 08 13 19 0E H 8 3 9 . 18839E 24/1/0 39E unconditional jump 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 29 1C 10 10 10 I + 19C000 25/1/2 0 interrogate indicators 32 19 10 01 0E B 9 1 . 12901E 18/1/0 101E shift logical 6E 00 00 00 00 be 08 1F 08 01 1C 8 £ 8 1 + 08F81C 8/1/3 181C merge variable length 16 3B 02 13 02 6 * 2 3 2 06B232 6/1/1 1232 select (N) 16 16 08 01 1C 6 6 8 1 + 06681C 6/0/3 81C select (N) 08 0E 08 01 1C 8 . 8 1 + 08E81C 8/1/3 81C merge variable length 16 29 1C 10 10 6 I + 069C00 6/1/0 1C00 select (N) 10 3B 1A 13 02 * 10 3 2 00BA32 0/1/1 1A32 replace registers 07 2A 02 13 01 7 = 2 3 1 07A231 7/1/1 231 augment (N) by (A) 1F 2A 1A 01 08 £ = 10 1 8 0FAA18 15/1/1 A18 collate and add 10 16 1A 01 0B 6 10 1 11 006A1B 0/0/3 A1B set radix 10 02 0B 10 10 2 11 002B00 0/0/1 B00 Invalid 04 29 02 10 10 4 I 2 049200 4/1/0 1200 add (N) to (A) 02 38 08 13 13 2 H 8 3 3 028833 2/1/0 833 transfer (A) to N 10 16 10 01 04 6 1 4 006014 0/0/3 14 set radix 04 02 19 10 01 4 2 9 1 042901 4/0/1 901 add (N) to (A) 04 6E 00 00 00 4 be 04E000 4/1/3 0 add (N) to (A) 13 16 29 1C 10 3 6 I + 0369C0 3/0/3 9C0 copy (A) to N 10 10 13 19 10 3 9 000390 0/0/0 390 Halt 10 10 02 19 10 2 9 000290 0/0/0 290 Halt 10 02 2A 10 13 2 = 3 002A03 0/0/1 A03 Invalid 04 1A 2A 10 13 4 10 = 3 04AA03 4/1/1 A03 add (N) to (A) 04 1A 2A 10 13 4 10 = 3 04AA03 4/1/1 A03 add (N) to (A) 04 1A 16 08 01 4 10 6 8 1 04A681 4/1/1 681 add (N) to (A) 19 02 02 19 10 9 2 2 9 092290 9/0/1 290 multiply uniform radix 10 04 16 08 01 4 6 8 1 004681 0/0/2 681 replace (B) by (N) 1C 10 02 19 10 + 2 9 0C0290 12/0/0 290 convert 10 16 16 08 01 6 6 8 1 006681 0/0/3 681 set radix 1C 02 02 19 10 + 2 2 9 0C2290 12/0/1 290 convert 10 1C 16 08 01 + 6 8 1 00C681 0/1/2 681 replace (B) by (N) 1C 04 02 19 10 + 4 2 9 0C4290 12/0/2 290 convert 10 0E 6E 00 00 . be 00EE00 0/1/3 E00 Invalid 13 04 04 2A 10 3 4 4 = 0344A0 3/0/2 4A0 copy (A) to N 13 04 1A 2A 10 3 4 10 = 034AA0 3/0/2 AA0 copy (A) to N 13 04 1A 2A 10 3 4 10 = 034AA0 3/0/2 AA0 copy (A) to N 13 04 1A 01 0E 3 4 10 1 . 034A1E 3/0/2 A1E copy (A) to N 10 10 01 02 10 1 2 000120 0/0/0 120 Halt 01 07 0E 38 08 1 7 . H 8 017E88 1/0/3 1E88 interchange area addresses 01 0D 19 10 10 1 : 9 01D900 1/1/2 1900 subtract literal address 10 10 10 2A 10 = 0000A0 0/0/0 A0 Halt 13 01 02 2A 10 3 1 2 = 0312A0 3/0/0 12A0 copy (A) to N 02 0E 07 38 16 2 . 7 H 6 02E786 2/1/3 786 transfer (A) to N 10 08 13 23 10 8 3 C 008330 0/1/0 330 copy registers 10 10 10 2A 10 = 0000A0 0/0/0 A0 Halt 02 1F 13 2A 0E 2 £ 3 = . 02F3AE 2/1/3 13AE transfer (A) to N 01 08 02 29 1C 1 8 2 I + 01829C 1/1/0 29C table look up 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 13 15 02 13 3 5 2 3 003523 0/0/1 1523 Invalid 1F 10 10 10 29 £ I 0F0009 15/0/0 9 collate and add 16 10 10 02 38 6 2 H 060028 6/0/0 28 select (N) 08 13 15 02 2A 8 3 5 2 = 08352A 8/0/1 152A merge constant length 02 13 04 1A 2A 2 3 4 10 = 0234AA 2/0/1 14AA transfer (A) to N 1A 01 08 04 16 10 1 8 4 6 0A1846 10/0/0 1846 multiply and add 1A 01 08 1A 02 10 1 8 10 2 0A18A2 10/0/0 18A2 multiply and add 0B 10 10 04 29 11 4 I 0B0049 11/0/0 49 multiply and subtract 02 10 10 02 38 2 2 H 020028 2/0/0 28 transfer (A) to N 08 13 15 07 2A 8 3 5 7 = 08357A 8/0/1 157A merge constant length 10 13 04 1A 2A 3 4 10 = 0034AA 0/0/1 14AA Invalid 10 13 04 1A 16 3 4 10 6 0034A6 0/0/1 14A6 Invalid 08 01 19 02 02 8 1 9 2 2 081922 8/0/0 1922 merge constant length 19 10 10 04 16 9 4 6 090046 9/0/0 46 multiply uniform radix 08 01 19 04 6E 8 1 9 4 be 08194E 8/0/0 194E merge constant length 10 10 13 16 10 3 6 000360 0/0/0 360 Halt 02 19 10 10 16 2 9 6 029006 2/1/0 1006 transfer (A) to N 2A 10 13 04 1A = 3 4 10 1A034A 26/0/0 34A enter subroutine 2A 1A 01 15 02 = 10 1 5 2 1AA152 26/1/1 152 set modification register 2A 1C 01 08 16 = + 1 8 6 1AC186 26/1/2 186 set modification register 16 1C 01 19 1C 6 + 1 9 + 06C19C 6/1/2 19C select (N) 02 19 10 10 1C 2 9 + 02900C 2/1/0 100C transfer (A) to N 16 02 01 07 04 6 2 1 7 4 062174 6/0/1 174 select (N) 02 08 01 1C 07 2 8 1 + 7 0281C7 2/1/0 1C7 transfer (A) to N 2A 10 13 01 1F = 3 1 £ 1A031F 26/0/0 31F enter subroutine 16 08 01 1C 16 6 8 1 + 6 0681C6 6/1/0 1C6 select (N) 02 19 10 01 10 2 9 1 029010 2/1/0 1010 transfer (A) to N 2A 10 13 04 1A = 3 4 10 1A034A 26/0/0 34A enter subroutine 2A 10 13 04 1A = 3 4 10 1A034A 26/0/0 34A enter subroutine 29 02 10 10 01 I 2 1 192001 25/0/1 1 step on and test 6E 00 00 00 00 be 0E 38 08 13 16 . H 8 3 6 0E8836 14/1/0 836 replace selected bits 1F 29 04 10 10 £ I 4 0F9400 15/1/0 1400 collate and add 02 38 08 13 16 2 H 8 3 6 028836 2/1/0 836 transfer (A) to N 04 2A 10 13 04 4 = 3 4 04A034 4/1/1 34 add (N) to (A) 1A 16 08 01 19 10 6 8 1 9 0A6819 10/0/3 819 multiply and add 16 02 19 10 10 6 2 9 062900 6/0/1 900 select (N) 04 16 08 01 19 4 6 8 1 9 046819 4/0/3 819 add (N) to (A) 08 02 19 10 10 8 2 9 082900 8/0/1 900 merge constant length 16 16 08 01 19 6 6 8 1 9 066819 6/0/3 819 select (N) 1A 02 19 10 10 10 2 9 0A2900 10/0/1 900 multiply and add 08 2A 10 13 04 8 = 3 4 08A034 8/1/1 34 merge variable length 1A 01 0E 08 10 10 1 . 8 0A1E80 10/0/0 1E80 multiply and add 10 02 01 10 10 2 1 002100 0/0/1 100 Invalid 10 2A 10 13 04 = 3 4 00A034 0/1/1 34 replace registers 1A 6E 00 00 00 10 be 0AE000 10/1/3 0 multiply and add 07 1C 38 16 10 7 + H 6 07C860 7/1/2 860 augment (N) by (A) 08 13 23 0E 10 8 3 C . 0833E0 8/0/1 13E0 merge constant length 10 10 38 16 10 H 6 000860 0/0/0 860 Halt 08 01 23 1C 10 8 1 C + 0813C0 8/0/0 13C0 merge constant length 10 10 38 08 13 H 8 3 000883 0/0/0 883 Halt 1A 1C 10 10 10 10 + 0AC000 10/1/2 0 multiply and add 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 29 0B 10 I 11 0009B0 0/0/0 9B0 Halt 10 10 01 1F 1F 1 £ £ 0001FF 0/0/0 1FF Halt 0D 0E 02 10 10 : . 2 0DE200 13/1/3 200 divide uniform radix 15 08 23 02 10 5 8 C 2 058320 5/1/0 320 subtract (N) from (A) 01 08 2A 08 10 1 8 = 8 018A80 1/1/0 A80 table look up 01 08 6E 00 00 1 8 be 018E00 1/1/0 E00 table look up 13 08 1A 10 01 3 8 10 1 038A01 3/1/0 A01 copy (A) to N 1F 0D 0B 38 08 £ : 11 H 8 0FDB88 15/1/2 1B88 collate and add 10 19 01 10 01 9 1 1 009101 0/1/0 1101 copy registers 1F 0D 1F 10 10 £ : £ 0FDF00 15/1/2 1F00 collate and add 10 02 10 16 08 2 6 8 002068 0/0/1 68 Invalid 10 19 04 2C 19 9 4 ' 9 0094C9 0/1/0 14C9 copy registers 1F 1F 1F 38 19 £ £ £ H 9 0FFF89 15/1/3 1F89 collate and add 1F 1F 1F 19 08 £ £ £ 9 8 0FFF98 15/1/3 1F98 collate and add 10 02 10 10 10 2 002000 0/0/1 0 Invalid 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 0E 10 10 . 000E00 0/0/0 E00 Halt 01 1C 1C 2A 0E 1 + + = . 01CCAE 1/1/2 CAE subtract literal address 13 19 02 16 16 3 9 2 6 6 039266 3/1/0 1266 copy (A) to N 13 08 04 02 16 3 8 4 2 6 038426 3/1/0 426 copy (A) to N 10 08 1C 6E 00 8 + be 008CE0 0/1/0 CE0 copy registers 10 13 19 08 29 3 9 8 I 003989 0/0/1 1989 Invalid 16 10 10 01 38 6 1 H 060018 6/0/0 18 select (N) 08 13 19 16 2A 8 3 9 6 = 08396A 8/0/1 196A merge constant length 02 13 19 04 10 2 3 9 4 023940 2/0/1 1940 transfer (A) to N 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 01 1 000001 0/0/0 1 Halt 02 13 10 10 29 2 3 I 023009 2/0/1 1009 transfer (A) to N 1C 10 10 10 3B + * 0C000B 12/0/0 B convert 08 13 1A 15 1F 8 3 10 5 £ 083A5F 8/0/1 1A5F merge constant length 08 01 1C 16 3B 8 1 + 6 * 081C6B 8/0/0 1C6B merge constant length 02 13 02 16 32 2 3 2 6 B 023262 2/0/1 1262 transfer (A) to N 19 10 01 0E 38 9 1 . H 0901E8 9/0/0 1E8 multiply uniform radix 08 13 19 1F 01 8 3 9 £ 1 0839F1 8/0/1 19F1 merge constant length 0E 10 13 10 6E . 3 be 0E030E 14/0/0 30E replace selected bits 10 10 13 1A 16 3 10 6 0003A6 0/0/0 3A6 Halt 02 08 01 1C 16 2 8 1 + 6 0281C6 2/1/0 1C6 transfer (A) to N 2A 02 13 01 1F = 2 3 1 £ 1A231F 26/0/1 31F leave subroutine 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 29 1C 10 10 10 I + 19C000 25/1/2 0 interrogate indicators 02 08 01 07 04 2 8 1 7 4 028174 2/1/0 174 transfer (A) to N 02 08 01 07 16 2 8 1 7 6 028176 2/1/0 176 transfer (A) to N 02 08 01 07 08 2 8 1 7 8 028178 2/1/0 178 transfer (A) to N 02 08 01 07 1A 2 8 1 7 10 02817A 2/1/0 17A transfer (A) to N 02 08 01 07 1C 2 8 1 7 + 02817C 2/1/0 17C transfer (A) to N 02 08 01 07 0E 2 8 1 7 . 02817E 2/1/0 17E transfer (A) to N 38 08 01 1C 0B H 8 1 + 11 1881CB 24/1/0 1CB unconditional jump 6E 00 00 00 00 be 04 10 10 10 10 4 040000 4/0/0 0 add (N) to (A) 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 6E 00 00 00 be 00E000 0/1/3 0 Invalid 01 00 00 00 00 1 010000 1/0/0 0 table look up File: old-paper-tapes/T69-1-6s.leo 58 10 32 10 10 Q B 080200 8/0/0 200 merge constant length 70 10 13 10 10 0 3 000300 0/0/0 300 Halt 38 08 10 04 13 H 8 4 3 188043 24/1/0 43 unconditional jump 10 08 10 10 10 8 008000 0/1/0 0 copy registers 38 1C 10 08 10 H + 8 18C080 24/1/2 80 modify address of next 01 16 1F 08 10 1 6 £ 8 016F80 1/0/3 F80 interchange area addresses 29 0E 08 10 10 I . 8 19E800 25/1/3 800 conditional Halt 38 1C 10 08 10 H + 8 18C080 24/1/2 80 modify address of next 23 02 10 10 10 C 2 132000 19/0/1 0 input one block/reset timer 38 1C 10 08 10 H + 8 18C080 24/1/2 80 modify address of next 2A 08 10 10 10 = 8 1A8000 26/1/0 0 test route N1 10 10 10 02 01 2 1 000021 0/0/0 21 Halt 38 19 1F 1C 0B H 9 £ + 11 189FCB 24/1/0 1FCB unconditional jump 10 10 10 02 13 2 3 000023 0/0/0 23 Halt 10 10 10 01 1C 1 + 00001C 0/0/0 1C Halt 38 0D 1F 0D 1F H : £ : £ 18DFDF 24/1/2 1FDF modify address of next 16 19 1F 0E 13 6 9 £ . 3 069FE3 6/1/0 1FE3 select (N) 38 0D 1F 0D 0E H : £ : . 18DFDE 24/1/2 1FDE modify address of next 02 10 10 10 10 2 020000 2/0/0 0 transfer (A) to N 16 19 1F 0D 1C 6 9 £ : + 069FDC 6/1/0 1FDC select (N) 07 19 1F 0D 0E 7 9 £ : . 079FDE 7/1/0 1FDE augment (N) by (A) 16 01 1F 0D 1F 6 1 £ : £ 061FDF 6/0/0 1FDF select (N) 15 01 1F 0D 10 5 1 £ : 051FD0 5/0/0 1FD0 subtract (N) from (A) 3B 13 1F 0D 01 * 3 £ : 1 1B3FD1 27/0/1 1FD1 jump A != Z 02 01 1F 0D 1F 2 1 £ : £ 021FDF 2/0/0 1FDF transfer (A) to N 38 19 1F 1C 08 H 9 £ + 8 189FC8 24/1/0 1FC8 unconditional jump 10 10 10 10 01 1 000001 0/0/0 1 Halt 10 10 10 10 02 2 000002 0/0/0 2 Halt 10 01 0E 0B 16 1 . 11 6 001EB6 0/0/0 1EB6 Halt 10 10 10 01 04 1 4 000014 0/0/0 14 Halt 70 10 75 10 7C 0 V , 00050C 0/0/0 50C Halt 70 10 67 10 02 0 X 2 000702 0/0/0 702 Halt 58 10 07 10 13 Q 7 3 080703 8/0/0 703 merge constant length 70 10 04 10 7A 0 4 ( 00040A 0/0/0 40A Halt 70 10 13 10 5E 0 3 hf 00030E 0/0/0 30E Halt 70 10 04 10 51 0 4 J 000401 0/0/0 401 Halt 40 10 32 10 04 & B 4 000204 0/0/0 204 Halt 70 10 16 10 61 0 6 / 000601 0/0/0 601 Halt 58 10 67 10 54 Q X M 080704 8/0/0 704 merge constant length 70 10 67 10 02 0 X 2 000702 0/0/0 702 Halt 70 10 67 10 58 0 X Q 000708 0/0/0 708 Halt 70 10 76 10 02 0 W 2 000602 0/0/0 602 Halt 70 10 75 10 73 0 V T 000503 0/0/0 503 Halt 70 10 62 10 13 0 S 3 000203 0/0/0 203 Halt 08 10 16 10 58 8 6 Q 080608 8/0/0 608 merge constant length 08 10 13 10 4A 8 3 # 08030A 8/0/0 30A merge constant length 08 10 13 10 43 8 3 L 080303 8/0/0 303 merge constant length 58 10 13 10 51 Q 3 J 080301 8/0/0 301 merge constant length 10 10 62 10 7C S , 00020C 0/0/0 20C Halt 10 10 02 10 7A 2 ( 00020A 0/0/0 20A Halt 70 10 62 10 6D 0 S ; 00020D 0/0/0 20D Halt 40 10 26 10 6D & F ; 00060D 0/0/0 60D Halt 40 10 46 10 75 & O V 000605 0/0/0 605 Halt 40 10 62 10 10 & S 000200 0/0/0 200 Halt 58 10 52 10 10 Q K 080200 8/0/0 200 merge constant length 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 40 10 10 & 000000 0/0/0 0 Halt 40 10 40 10 10 & & 000000 0/0/0 0 Halt 16 08 10 10 19 6 8 9 068009 6/1/0 9 select (N) 02 01 1F 1C 16 2 1 £ + 6 021FC6 2/0/0 1FC6 transfer (A) to N 10 01 1F 0E 10 1 £ . 001FE0 0/0/0 1FE0 Halt 38 19 1F 1C 16 H 9 £ + 6 189FC6 24/1/0 1FC6 unconditional jump 10 10 20 10 10 - 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 1F 10 29 £ I 000F09 0/0/0 F09 Halt 6E 00 00 00 00 be 10 01 0E 0B 16 1 . 11 6 001EB6 0/0/0 1EB6 Halt 10 01 0E 0B 16 1 . 11 6 001EB6 0/0/0 1EB6 Halt 10 01 1F 0D 10 1 £ : 001FD0 0/0/0 1FD0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 01 0E 0B 16 1 . 11 6 001EB6 0/0/0 1EB6 Halt 10 10 10 10 1F £ 00000F 0/0/0 F Halt 10 10 10 10 01 1 000001 0/0/0 1 Halt 10 10 10 10 01 1 000001 0/0/0 1 Halt 10 10 10 10 13 3 000003 0/0/0 3 Halt 01 04 0B 16 01 1 4 11 6 1 014B61 1/0/2 B61 round off 16 01 1F 19 04 6 1 £ 9 4 061F94 6/0/0 1F94 select (N) 02 10 10 08 01 2 8 1 020081 2/0/0 81 transfer (A) to N 01 1A 10 10 10 1 10 01A000 1/1/1 0 add literal address 16 01 1F 01 0E 6 1 £ 1 . 061F1E 6/0/0 1F1E select (N) 6E 00 00 00 00 be 10 01 0E 0B 1A 1 . 11 10 001EBA 0/0/0 1EBA Halt 02 01 1F 01 0D 2 1 £ 1 : 021F1D 2/0/0 1F1D transfer (A) to N 29 0E 10 01 10 I . 1 19E010 25/1/3 10 conditional Halt 29 1C 10 01 10 I + 1 19C010 25/1/2 10 interrogate indicators 3B 01 0E 0D 13 * 1 . : 3 1B1ED3 27/0/0 1ED3 jump A = Z 16 08 10 08 10 6 8 8 068080 6/1/0 80 select (N) 02 19 1F 0B 16 2 9 £ 11 6 029FB6 2/1/0 1FB6 transfer (A) to N 2A 0B 1F 1A 08 = 11 £ 10 8 1ABFA8 26/1/1 1FA8 set modification register 37 1A 10 10 10 G 10 17A000 23/1/1 0 copy into tag 29 02 10 10 02 I 2 2 192002 25/0/1 2 step on and test 38 19 0E 1C 01 H 9 . + 1 189EC1 24/1/0 1EC1 unconditional jump 2A 0B 1F 19 16 = 11 £ 9 6 1ABF96 26/1/1 1F96 set modification register 02 1A 10 10 10 2 10 02A000 2/1/1 0 transfer (A) to N 29 02 10 10 02 I 2 2 192002 25/0/1 2 step on and test 38 19 0E 1C 15 H 9 . + 5 189EC5 24/1/0 1EC5 unconditional jump 6E 00 00 00 00 be 10 01 0E 1C 08 1 . + 8 001EC8 0/0/0 1EC8 Halt 2A 0B 1F 19 08 = 11 £ 9 8 1ABF98 26/1/1 1F98 set modification register 02 1A 10 10 10 2 10 02A000 2/1/1 0 transfer (A) to N 29 02 10 10 02 I 2 2 192002 25/0/1 2 step on and test 38 19 0E 1C 19 H 9 . + 9 189EC9 24/1/0 1EC9 unconditional jump 2A 0B 1F 19 1A = 11 £ 9 10 1ABF9A 26/1/1 1F9A set modification register 16 01 1F 19 15 6 1 £ 9 5 061F95 6/0/0 1F95 select (N) 37 1A 10 10 10 G 10 17A000 23/1/1 0 copy into tag 29 02 10 10 02 I 2 2 192002 25/0/1 2 step on and test 38 19 0E 1C 0E H 9 . + . 189ECE 24/1/0 1ECE unconditional jump 16 19 1F 0B 16 6 9 £ 11 6 069FB6 6/1/0 1FB6 select (N) 02 08 10 08 10 2 8 8 028080 2/1/0 80 transfer (A) to N 02 10 10 10 19 2 9 020009 2/0/0 9 transfer (A) to N 02 10 10 01 01 2 1 1 020011 2/0/0 11 transfer (A) to N 02 10 10 01 19 2 1 9 020019 2/0/0 19 transfer (A) to N 6E 00 00 00 00 be 10 01 0E 0D 16 1 . : 6 001ED6 0/0/0 1ED6 Halt 38 19 0E 0D 0E H 9 . : . 189EDE 24/1/0 1EDE unconditional jump 29 0B 1F 1F 1F I 11 £ £ £ 19BFFF 25/1/1 1FFF clear indicators 16 01 1F 0B 13 6 1 £ 11 3 061FB3 6/0/0 1FB3 select (N) 3B 01 0E 0B 08 * 1 . 11 8 1B1EB8 27/0/0 1EB8 jump A = Z 02 01 1F 0B 1A 2 1 £ 11 10 021FBA 2/0/0 1FBA transfer (A) to N 38 19 1C 04 16 H 9 + 4 6 189C46 24/1/0 1C46 unconditional jump 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 29 1C 10 10 01 I + 1 19C001 25/1/2 1 interrogate indicators 02 01 1F 0B 10 2 1 £ 11 021FB0 2/0/0 1FB0 transfer (A) to N 29 1C 10 10 02 I + 2 19C002 25/1/2 2 interrogate indicators 02 01 1F 0B 01 2 1 £ 11 1 021FB1 2/0/0 1FB1 transfer (A) to N 29 1C 10 10 04 I + 4 19C004 25/1/2 4 interrogate indicators 02 01 1F 0B 02 2 1 £ 11 2 021FB2 2/0/0 1FB2 transfer (A) to N 6E 00 00 00 00 be 10 01 0E 0E 04 1 . . 4 001EE4 0/0/0 1EE4 Halt 29 1C 10 10 08 I + 8 19C008 25/1/2 8 interrogate indicators 02 01 1F 0B 13 2 1 £ 11 3 021FB3 2/0/0 1FB3 transfer (A) to N 38 19 0E 0E 08 H 9 . . 8 189EE8 24/1/0 1EE8 unconditional jump 10 10 10 10 10 000000 0/0/0 0 Halt 38 0D 1F 0B 10 H : £ 11 18DFB0 24/1/2 1FB0 modify address of next 16 01 1F 15 15 6 1 £ 5 5 061F55 6/0/0 1F55 select (N) 02 01 1F 15 04 2 1 £ 5 4 021F54 2/0/0 1F54 transfer (A) to N 38 0D 1F 0B 10 H : £ 11 18DFB0 24/1/2 1FB0 modify address of next 16 01 1F 08 16 6 1 £ 8 6 061F86 6/0/0 1F86 select (N) 02 01 1F 08 15 2 1 £ 8 5 021F85 2/0/0 1F85 transfer (A) to N 16 01 1F 19 1C 6 1 £ 9 + 061F9C 6/0/0 1F9C select (N) 38 1C 10 08 10 H + 8 18C080 24/1/2 80 modify address of next 02 10 10 04 10 2 4 020040 2/0/0 40 transfer (A) to N 16 01 1F 19 0D 6 1 £ 9 : 061F9D 6/0/0 1F9D select (N) 6E 00 00 00 00 be 10 01 0E 1F 02 1 . £ 2 001EF2 0/0/0 1EF2 Halt 02 10 10 16 07 2 6 7 020067 2/0/0 67 transfer (A) to N 38 1C 10 08 10 H + 8 18C080 24/1/2 80 modify address of next 2A 08 10 10 10 = 8 1A8000 26/1/0 0 test route N1 38 19 1F 10 01 H 9 £ 1 189F01 24/1/0 1F01 unconditional jump 38 19 1F 10 13 H 9 £ 3 189F03 24/1/0 1F03 unconditional jump 38 19 0E 1F 19 H 9 . £ 9 189EF9 24/1/0 1EF9 unconditional jump 10 10 10 10 07 7 000007 0/0/0 7 Halt 02 01 1F 0B 1A 2 1 £ 11 10 021FBA 2/0/0 1FBA transfer (A) to N 38 1C 10 16 07 H + 6 7 18C067 24/1/2 67 modify address of next 02 08 10 01 0E 2 8 1 . 02801E 2/1/0 1E transfer (A) to N 38 1C 10 08 10 H + 8 18C080 24/1/2 80 modify address of next 01 16 19 1C 10 1 6 9 + 0169C0 1/0/3 9C0 interchange area addresses 38 1C 10 08 10 H + 8 18C080 24/1/2 80 modify address of next 23 02 10 10 10 C 2 132000 19/0/1 0 input one block/reset timer 6E 00 00 00 00 be 10 01 1F 10 10 1 £ 001F00 0/0/0 1F00 Halt 38 19 1F 10 15 H 9 £ 5 189F05 24/1/0 1F05 unconditional jump 10 10 10 10 13 3 000003 0/0/0 3 Halt 38 19 0E 1F 13 H 9 . £ 3 189EF3 24/1/0 1EF3 unconditional jump 01 1A 10 10 10 1 10 01A000 1/1/1 0 add literal address 38 19 0E 1F 13 H 9 . £ 3 189EF3 24/1/0 1EF3 unconditional jump 38 1C 10 08 10 H + 8 18C080 24/1/2 80 modify address of next 2A 08 10 10 10 = 8 1A8000 26/1/0 0 test route N1 10 10 10 10 19 9 000009 0/0/0 9 Halt 38 19 1F 10 15 H 9 £ 5 189F05 24/1/0 1F05 unconditional jump 38 19 1F 01 04 H 9 £ 1 4 189F14 24/1/0 1F14 unconditional jump 38 19 0E 1F 13 H 9 . £ 3 189EF3 24/1/0 1EF3 unconditional jump 02 01 1F 0B 1A 2 1 £ 11 10 021FBA 2/0/0 1FBA transfer (A) to N 38 1C 10 16 07 H + 6 7 18C067 24/1/2 67 modify address of next 02 08 10 01 0E 2 8 1 . 02801E 2/1/0 1E transfer (A) to N 6E 00 00 00 00 be 10 01 1F 10 0E 1 £ . 001F0E 0/0/0 1F0E Halt 38 1C 10 08 10 H + 8 18C080 24/1/2 80 modify address of next 01 16 19 1C 10 1 6 9 + 0169C0 1/0/3 9C0 interchange area addresses 29 0E 08 10 10 I . 8 19E800 25/1/3 800 conditional Halt 38 1C 10 08 10 H + 8 18C080 24/1/2 80 modify address of next 23 02 10 10 10 C 2 132000 19/0/1 0 input one block/reset timer 38 19 1F 01 16 H 9 £ 1 6 189F16 24/1/0 1F16 unconditional jump 10 10 10 10 0B 11 00000B 0/0/0 B Halt 38 19 0E 1F 04 H 9 . £ 4 189EF4 24/1/0 1EF4 unconditional jump 10 15 1F 1A 16 5 £ 10 6 005FA6 0/0/2 1FA6 replace (B) by (N) 1F 10 10 16 07 £ 6 7 0F0067 15/0/0 67 collate and add 13 01 1F 0B 08 3 1 £ 11 8 031FB8 3/0/0 1FB8 copy (A) to N 04 01 1F 1A 13 4 1 £ 10 3 041FA3 4/0/0 1FA3 add (N) to (A) 02 01 1F 0B 19 2 1 £ 11 9 021FB9 2/0/0 1FB9 transfer (A) to N 16 01 1F 1A 02 6 1 £ 10 2 061FA2 6/0/0 1FA2 select (N) 6E 00 00 00 00 be 01 1F 01 1C 02 1 £ 1 + 2 01F1C2 1/1/3 11C2 select literal address 01 1F 0B 04 10 1 £ 11 4 01FB40 1/1/3 1B40 select literal address 10 10 10 10 38 H 000008 0/0/0 8 Halt 19 1F 02 01 38 9 £ 2 1 H 09F218 9/1/3 1218 multiply uniform radix 19 1F 13 1A 38 9 £ 3 10 H 09F3A8 9/1/3 13A8 multiply uniform radix 19 1C 04 1A 16 9 + 4 10 6 09C4A6 9/1/2 4A6 multiply uniform radix 01 1F 1A 10 07 1 £ 10 7 01FA07 1/1/3 1A07 select literal address 01 1F 0B 08 38 1 £ 11 8 H 01FB88 1/1/3 1B88 select literal address 1C 10 16 07 16 + 6 7 6 0C0676 12/0/0 676 convert 08 10 10 13 15 8 3 5 080035 8/0/0 35 merge constant length 01 1F 1A 02 02 1 £ 10 2 2 01FA22 1/1/3 1A22 select literal address 01 1F 1A 1C 38 1 £ 10 + H 01FAC8 1/1/3 1AC8 select literal address 1C 10 16 07 16 + 6 7 6 0C0676 12/0/0 676 convert 08 10 10 15 02 8 5 2 080052 8/0/0 52 merge constant length 01 1F 1A 0D 6E 1 £ 10 : be 01FADE 1/1/3 1ADE select literal address 10 01 1F 02 1A 1 £ 2 10 001F2A 0/0/0 1F2A Halt 38 1C 10 16 07 H + 6 7 18C067 24/1/2 67 modify address of next 16 08 10 10 0B 6 8 11 06800B 6/1/0 B select (N) 02 01 1F 1A 0E 2 1 £ 10 . 021FAE 2/0/0 1FAE transfer (A) to N 38 1C 10 16 07 H + 6 7 18C067 24/1/2 67 modify address of next 16 08 10 10 0D 6 8 : 06800D 6/1/0 D select (N) 02 01 1F 1A 1F 2 1 £ 10 £ 021FAF 2/0/0 1FAF transfer (A) to N 10 15 1F 1A 1C 5 £ 10 + 005FAC 0/0/2 1FAC replace (B) by (N) 1F 01 1F 1A 02 £ 1 £ 10 2 0F1FA2 15/0/0 1FA2 collate and add 02 01 1F 0B 15 2 1 £ 11 5 021FB5 2/0/0 1FB5 transfer (A) to N 38 1C 10 16 07 H + 6 7 18C067 24/1/2 67 modify address of next 16 08 10 10 07 6 8 7 068007 6/1/0 7 select (N) 02 01 1F 0B 1C 2 1 £ 11 + 021FBC 2/0/0 1FBC transfer (A) to N 38 1C 10 16 07 H + 6 7 18C067 24/1/2 67 modify address of next 16 08 10 10 19 6 8 9 068009 6/1/0 9 select (N) 6E 00 00 00 00 be 08 04 01 1F 1A 8 4 1 £ 10 0841FA 8/0/2 1FA merge constant length 01 02 01 1F 0B 1 2 1 £ 11 0121FB 1/0/1 1FB prepare for digit collation 0D 16 19 1F 1A : 6 9 £ 10 0D69FA 13/0/3 9FA divide uniform radix 04 38 1C 10 16 4 H + 6 048C06 4/1/0 C06 add (N) to (A) 07 15 08 10 01 7 5 8 1 075801 7/0/2 1801 augment (N) by (A) 0E 3B 01 1F 04 . * 1 £ 4 0EB1F4 14/1/1 11F4 replace selected bits 10 10 10 10 10 000000 0/0/0 0 Halt 0D 38 19 0E 1F : H 9 . £ 0D89EF 13/1/0 9EF divide uniform radix 13 38 1C 10 16 3 H + 6 038C06 3/1/0 C06 copy (A) to N 07 16 08 10 10 7 6 8 076800 7/0/3 800 augment (N) by (A) 01 15 01 1F 1A 1 5 1 £ 10 0151FA 1/0/2 11FA round off 02 15 01 1F 1A 2 5 1 £ 10 0251FA 2/0/2 11FA transfer (A) to N 1C 3B 01 1F 04 + * 1 £ 4 0CB1F4 12/1/1 11F4 convert 07 10 10 10 10 7 070000 7/0/0 0 augment (N) by (A) 1F 6E 00 00 00 £ be 0FE000 15/1/3 0 collate and add 04 16 38 19 0E 4 6 H 9 . 04689E 4/0/3 89E add (N) to (A) 1F 13 38 0D 1F £ 3 H : £ 0F38DF 15/0/1 18DF collate and add 0B 08 16 08 10 11 8 6 8 0B8680 11/1/0 680 multiply and subtract 10 02 15 19 1F 2 5 9 £ 00259F 0/0/1 59F Invalid 19 0E 3B 13 1F 9 . * 3 £ 09EB3F 9/1/3 B3F multiply uniform radix 15 08 02 01 1F 5 8 2 1 £ 05821F 5/1/0 21F subtract (N) from (A) 0B 04 16 01 1F 11 4 6 1 £ 0B461F 11/0/2 61F multiply and subtract 0B 15 3B 01 1F 11 5 * 1 £ 0B5B1F 11/0/2 1B1F multiply and subtract 15 10 10 10 10 5 050000 5/0/0 0 subtract (N) from (A) 01 1F 38 19 0E 1 £ H 9 . 01F89E 1/1/3 189E select literal address 1F 13 16 01 1F £ 3 6 1 £ 0F361F 15/0/1 161F collate and add 01 1F 02 01 1F 1 £ 2 1 £ 01F21F 1/1/3 121F select literal address 01 0D 38 0D 1F 1 : H : £ 01D8DF 1/1/2 18DF subtract literal address 0B 08 16 08 10 11 8 6 8 0B8680 11/1/0 680 multiply and subtract 10 13 6E 00 00 3 be 003E00 0/0/1 1E00 Invalid 1F 15 04 10 10 £ 5 4 0F5400 15/0/2 1400 collate and add 10 10 10 38 19 H 9 000089 0/0/0 89 Halt 1F 15 0B 38 19 £ 5 11 H 9 0F5B89 15/0/2 1B89 collate and add 0D 10 10 38 19 : H 9 0D0089 13/0/0 89 divide uniform radix 0D 04 1A 16 01 : 4 10 6 1 0D4A61 13/0/2 A61 divide uniform radix 1F 1A 02 02 01 £ 10 2 2 1 0FA221 15/1/1 221 collate and add 1F 0B 04 38 19 £ 11 4 H 9 0FB489 15/1/1 1489 collate and add 1F 15 10 38 0D £ 5 H : 0F508D 15/0/2 108D collate and add 1F 1A 1C 02 10 £ 10 + 2 0FAC20 15/1/1 C20 collate and add 10 10 01 16 01 1 6 1 000161 0/0/0 161 Halt 1F 0B 04 3B 13 £ 11 4 * 3 0FB4B3 15/1/1 14B3 collate and add 1F 16 08 38 0D £ 6 8 H : 0F688D 15/0/3 88D collate and add 1F 1A 1C 16 10 £ 10 + 6 0FAC60 15/1/1 C60 collate and add 10 10 10 02 01 2 1 000021 0/0/0 21 Halt 1F 0B 0B 6E 00 £ 11 11 be 0FBBE0 15/1/1 1BE0 collate and add 01 1F 16 02 15 1 £ 6 2 5 01F625 1/1/3 1625 select literal address 01 1F 1A 02 38 1 £ 10 2 H 01FA28 1/1/3 1A28 select literal address 0D 1F 1A 1C 02 : £ 10 + 2 0DFAC2 13/1/3 1AC2 divide uniform radix 08 10 10 10 16 8 6 080006 8/0/0 6 merge constant length 01 1F 0B 0B 38 1 £ 11 11 H 01FBB8 1/1/3 1BB8 select literal address 0D 1F 1A 1C 02 : £ 10 + 2 0DFAC2 13/1/3 1AC2 divide uniform radix 10 10 10 10 16 6 000006 0/0/0 6 Halt 01 1F 0B 15 3B 1 £ 11 5 * 01FB5B 1/1/3 1B5B select literal address 01 1F 16 0D 16 1 £ 6 : 6 01F6D6 1/1/3 16D6 select literal address 01 1F 1A 1F 38 1 £ 10 £ H 01FAF8 1/1/3 1AF8 select literal address 0D 1F 1A 1C 37 : £ 10 + G 0DFAC7 13/1/3 1AC7 divide uniform radix 08 10 10 10 16 8 6 080006 8/0/0 6 merge constant length 19 1F 0B 1C 3B 9 £ 11 + * 09FBCB 9/1/3 1BCB multiply uniform radix 01 1F 07 16 2A 1 £ 7 6 = 01F76A 1/1/3 176A select literal address 0B 1F 0B 1C 6E 11 £ 11 + be 0BFBCE 11/1/3 1BCE multiply and subtract 10 01 1F 07 10 1 £ 7 001F70 0/0/0 1F70 Halt 16 01 1F 1A 1F 6 1 £ 10 £ 061FAF 6/0/0 1FAF select (N) 37 1A 10 10 10 G 10 17A000 23/1/1 0 copy into tag 29 02 10 10 02 I 2 2 192002 25/0/1 2 step on and test 38 19 1F 07 01 H 9 £ 7 1 189F71 24/1/0 1F71 unconditional jump 02 19 1F 0B 1C 2 9 £ 11 + 029FBC 2/1/0 1FBC transfer (A) to N 02 19 1F 0B 1C 2 9 £ 11 + 029FBC 2/1/0 1FBC transfer (A) to N 29 0E 04 10 10 I . 4 19E400 25/1/3 400 conditional Halt 16 01 1F 1A 02 6 1 £ 10 2 061FA2 6/0/0 1FA2 select (N) 15 01 1F 0B 15 5 1 £ 11 5 051FB5 5/0/0 1FB5 subtract (N) from (A) 02 01 1F 0B 15 2 1 £ 11 5 021FB5 2/0/0 1FB5 transfer (A) to N 16 01 1F 1A 1C 6 1 £ 10 + 061FAC 6/0/0 1FAC select (N) 04 01 1F 1A 02 4 1 £ 10 2 041FA2 4/0/0 1FA2 add (N) to (A) 13 01 1F 1A 1C 3 1 £ 10 + 031FAC 3/0/0 1FAC copy (A) to N 15 01 1F 1A 0D 5 1 £ 10 : 051FAD 5/0/0 1FAD subtract (N) from (A) 6E 00 00 00 00 be 0E 3B 15 1F 08 . * 5 £ 8 0EB5F8 14/1/1 15F8 replace selected bits 15 16 01 1F 1A 5 6 1 £ 10 0561FA 5/0/3 1FA subtract (N) from (A) 01 07 01 1F 0B 1 7 1 £ 11 0171FB 1/0/3 11FB interchange area addresses 08 16 01 1F 0B 8 6 1 £ 11 0861FB 8/0/3 1FB merge constant length 08 15 01 1F 0B 8 5 1 £ 11 0851FB 8/0/2 11FB merge constant length 19 3B 13 1F 04 9 * 3 £ 4 09B3F4 9/1/1 13F4 multiply uniform radix 07 38 19 1F 10 7 H 9 £ 0789F0 7/1/0 9F0 augment (N) by (A) 15 10 10 10 10 5 050000 5/0/0 0 subtract (N) from (A) 10 38 19 1F 08 H 9 £ 8 0089F8 0/1/0 9F8 copy registers 08 38 19 0D 1A 8 H 9 : 10 0889DA 8/1/0 9DA merge variable length 0D 16 01 1F 0B : 6 1 £ 11 0D61FB 13/0/3 1FB divide uniform radix 02 3B 13 0E 0D 2 * 3 . : 02B3ED 2/1/1 13ED transfer (A) to N 07 16 01 1F 1A 7 6 1 £ 10 0761FA 7/0/3 1FA augment (N) by (A) 1F 32 10 10 10 £ B 0F2000 15/0/1 0 collate and add 04 6E 00 00 00 4 be 04E000 4/1/3 0 add (N) to (A) 08 1C 01 1A 10 8 + 1 10 08C1A0 8/1/2 1A0 merge variable length 10 1A 02 01 1F 10 2 1 £ 00A21F 0/1/1 21F replace registers 0B 1A 16 01 1F 11 10 6 1 £ 0BA61F 11/1/1 61F multiply and subtract 1A 07 02 10 10 10 7 2 0A7200 10/0/3 1200 multiply and add 10 19 16 19 1F 9 6 9 £ 00969F 0/1/0 169F copy registers 1A 1A 13 08 10 10 10 3 8 0AA380 10/1/1 380 multiply and add 10 1A 02 10 10 10 2 00A200 0/1/1 200 replace registers 10 1A 38 08 10 10 H 8 00A880 0/1/1 880 replace registers 10 19 10 10 10 9 009000 0/1/0 1000 copy registers 02 10 10 10 10 2 020000 2/0/0 0 transfer (A) to N 10 1F 10 10 10 £ 00F000 0/1/3 1000 Invalid 10 04 10 01 1C 4 1 + 00401C 0/0/2 1C replace (B) by (N) 04 16 10 01 1F 4 6 1 £ 04601F 4/0/3 1F add (N) to (A) 1C 10 10 04 10 + 4 0C0040 12/0/0 40 convert 10 10 6E 00 00 be 000E00 0/0/0 E00 Halt 1F 19 1A 10 10 £ 9 10 0F9A00 15/1/0 1A00 collate and add 10 1A 10 10 04 10 4 00A004 0/1/1 4 replace registers 10 10 10 1F 01 £ 1 0000F1 0/0/0 F1 Halt 1F 1C 10 1F 01 £ + £ 1 0FC0F1 15/1/2 F1 collate and add 1F 0E 10 19 16 £ . 9 6 0FE096 15/1/3 96 collate and add 19 16 19 16 19 9 6 9 6 9 096969 9/0/3 969 multiply uniform radix 16 19 16 10 10 6 9 6 069600 6/1/0 1600 select (N) 10 01 04 10 10 1 4 001400 0/0/0 1400 Halt 10 10 02 10 10 2 000200 0/0/0 200 Halt 10 10 01 10 10 1 000100 0/0/0 100 Halt 10 01 1C 10 10 1 + 001C00 0/0/0 1C00 Halt 10 10 10 07 0E 7 . 00007E 0/0/0 7E Halt 10 10 10 10 07 7 000007 0/0/0 7 Halt 1F 1F 1F 2A 07 £ £ £ = 7 0FFFA7 15/1/3 1FA7 collate and add 1F 0B 1A 6E 00 £ 11 10 be 0FBAE0 15/1/1 1AE0 collate and add 01 1F 1A 08 10 1 £ 10 8 01FA80 1/1/3 1A80 select literal address 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 1A 10 29 10 I 000A09 0/0/0 A09 Halt 0B 1F 1F 1F 2A 11 £ £ £ = 0BFFFA 11/1/3 1FFA multiply and subtract 13 1F 1A 0E 10 3 £ 10 . 03FAE0 3/1/3 1AE0 copy (A) to N 01 1C 0E 08 10 1 + . 8 01CE80 1/1/2 E80 subtract literal address 01 1C 0E 08 10 1 + . 8 01CE80 1/1/2 E80 subtract literal address 01 0B 07 1A 10 1 11 7 10 01B7A0 1/1/1 17A0 add literal address 10 10 10 1F 10 £ 0000F0 0/0/0 F0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 01 10 1 000010 0/0/0 10 Halt 10 10 10 10 6E be 00000E 0/0/0 E Halt 10 01 1F 0B 16 1 £ 11 6 001FB6 0/0/0 1FB6 Halt 10 10 10 01 19 1 9 000019 0/0/0 19 Halt 10 10 10 02 10 2 000020 0/0/0 20 Halt 10 01 1F 1C 1C 1 £ + + 001FCC 0/0/0 1FCC Halt 10 01 1F 0D 1C 1 £ : + 001FDC 0/0/0 1FDC Halt 1F 10 10 10 10 £ 0F0000 15/0/0 0 collate and add 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 13 0E 08 3 . 8 0003E8 0/0/0 3E8 Halt 10 10 07 0D 02 7 : 2 0007D2 0/0/0 7D2 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 1C 04 0E 04 02 + 4 . 4 2 0C4E42 12/0/2 E42 convert 10 10 04 01 04 4 1 4 000414 0/0/0 414 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 6E 00 00 00 00 be 04 10 10 10 10 4 040000 4/0/0 0 add (N) to (A) 10 10 10 10 10 000000 0/0/0 0 Halt 10 38 1C 10 08 H + 8 008C08 0/1/0 C08 copy registers 10 01 16 1F 1C 1 6 £ + 0016FC 0/0/0 16FC Halt 10 29 0E 08 10 I . 8 009E80 0/1/0 1E80 copy registers 10 38 1C 10 08 H + 8 008C08 0/1/0 C08 copy registers 10 23 02 10 10 C 2 003200 0/0/1 1200 Invalid 10 02 01 1F 0D 2 1 £ : 0021FD 0/0/1 1FD Invalid 10 15 01 1F 1C 5 1 £ + 0051FC 0/0/2 11FC replace (B) by (N) 1F 07 10 10 08 £ 7 8 0F7008 15/0/3 1008 collate and add 10 38 19 1F 0D H 9 £ : 0089FD 0/1/0 9FD copy registers 01 10 10 10 04 1 4 010004 1/0/0 4 table look up 10 10 10 10 01 1 000001 0/0/0 1 Halt 1C 38 19 0E 0B + H 9 . 11 0C89EB 12/1/0 9EB convert 16 6E 00 00 00 6 be 06E000 6/1/3 0 select (N) 10 10 01 02 1C 1 2 + 00012C 0/0/0 12C Halt 10 10 01 02 1C 1 2 + 00012C 0/0/0 12C Halt 10 10 13 0B 04 3 11 4 0003B4 0/0/0 3B4 Halt 10 10 01 02 1C 1 2 + 00012C 0/0/0 12C Halt 10 10 13 0B 04 3 11 4 0003B4 0/0/0 3B4 Halt 10 10 01 1C 0B 1 + 11 0001CB 0/0/0 1CB Halt 10 10 10 10 0E . 00000E 0/0/0 E Halt 10 10 10 16 19 6 9 000069 0/0/0 69 Halt 10 10 10 10 01 1 000001 0/0/0 1 Halt 10 10 10 10 16 6 000006 0/0/0 6 Halt 02 08 08 16 16 2 8 8 6 6 028866 2/1/0 866 transfer (A) to N 1F 07 1F 07 1F £ 7 £ 7 £ 0F7F7F 15/0/3 1F7F collate and add 07 1F 07 1F 07 7 £ 7 £ 7 07F7F7 7/1/3 17F7 augment (N) by (A) 10 07 1F 10 10 7 £ 007F00 0/0/3 1F00 set radix 10 10 07 1F 10 7 £ 0007F0 0/0/0 7F0 Halt 6E 00 00 00 00 be 10 10 01 13 10 1 3 000130 0/0/0 130 Halt 1F 10 10 07 1F £ 7 £ 0F007F 15/0/0 7F collate and add 07 1F 10 10 07 7 £ 7 07F007 7/1/3 1007 augment (N) by (A) 1F 10 10 10 10 £ 0F0000 15/0/0 0 collate and add 10 10 10 10 07 7 000007 0/0/0 7 Halt 10 10 10 07 1F 7 £ 00007F 0/0/0 7F Halt 10 10 07 1F 10 7 £ 0007F0 0/0/0 7F0 Halt 10 07 1F 10 10 7 £ 007F00 0/0/3 1F00 set radix 07 1F 10 10 10 7 £ 07F000 7/1/3 1000 augment (N) by (A) 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 07 1F 10 7 £ 0007F0 0/0/0 7F0 Halt 10 07 1F 10 10 7 £ 007F00 0/0/3 1F00 set radix 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 07 1F 7 £ 00007F 0/0/0 7F Halt 07 1F 10 10 10 7 £ 07F000 7/1/3 1000 augment (N) by (A) 6E 00 00 00 00 be 10 10 01 13 0E 1 3 . 00013E 0/0/0 13E Halt 10 10 10 10 10 000000 0/0/0 0 Halt 07 1F 10 10 10 7 £ 07F000 7/1/3 1000 augment (N) by (A) 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 07 1F 7 £ 00007F 0/0/0 7F Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 07 0E 7 . 00007E 0/0/0 7E Halt 07 0E 10 10 10 7 . 07E000 7/1/3 0 augment (N) by (A) 16 16 16 16 16 6 6 6 6 6 066666 6/0/3 666 select (N) 38 08 01 1F 1C H 8 1 £ + 1881FC 24/1/0 1FC unconditional jump 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 07 1C 08 7 + 8 0007C8 0/0/0 7C8 Halt 6E 00 00 00 00 be 10 10 01 04 1C 1 4 + 00014C 0/0/0 14C Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 07 1C 0E 7 + . 0007CE 0/0/0 7CE Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 07 0D 10 7 : 0007D0 0/0/0 7D0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 07 0D 02 7 : 2 0007D2 0/0/0 7D2 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 1A 10 00000A 0/0/0 A Halt 10 10 10 10 01 1 000001 0/0/0 1 Halt 10 10 10 10 1A 10 00000A 0/0/0 A Halt 10 10 10 10 02 2 000002 0/0/0 2 Halt 10 10 10 10 1A 10 00000A 0/0/0 A Halt 10 10 10 10 13 3 000003 0/0/0 3 Halt 10 10 10 10 1A 10 00000A 0/0/0 A Halt 6E 00 00 00 00 be 10 10 01 15 1A 1 5 10 00015A 0/0/0 15A Halt 10 10 10 10 04 4 000004 0/0/0 4 Halt 10 10 10 10 1A 10 00000A 0/0/0 A Halt 10 10 10 10 15 5 000005 0/0/0 5 Halt 10 10 10 10 1A 10 00000A 0/0/0 A Halt 10 10 10 10 16 6 000006 0/0/0 6 Halt 10 10 10 10 1A 10 00000A 0/0/0 A Halt 10 10 10 10 07 7 000007 0/0/0 7 Halt 10 10 10 10 1A 10 00000A 0/0/0 A Halt 10 10 10 10 08 8 000008 0/0/0 8 Halt 10 10 10 10 1A 10 00000A 0/0/0 A Halt 10 10 10 10 19 9 000009 0/0/0 9 Halt 10 10 10 10 1A 10 00000A 0/0/0 A Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 0B 11 00000B 0/0/0 B Halt 6E 00 00 00 00 be 10 10 01 16 08 1 6 8 000168 0/0/0 168 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 13 0E 19 3 . 9 0003E9 0/0/0 3E9 Halt 10 10 02 13 0B 2 3 11 00023B 0/0/0 23B Halt 10 10 02 04 10 2 4 000240 0/0/0 240 Halt 10 10 02 04 07 2 4 7 000247 0/0/0 247 Halt 10 10 02 15 10 2 5 000250 0/0/0 250 Halt 10 10 02 15 0B 2 5 11 00025B 0/0/0 25B Halt 10 10 02 16 10 2 6 000260 0/0/0 260 Halt 10 10 02 16 1F 2 6 £ 00026F 0/0/0 26F Halt 10 10 02 08 01 2 8 1 000281 0/0/0 281 Halt 10 10 02 19 15 2 9 5 000295 0/0/0 295 Halt 10 10 02 1A 0B 2 10 11 0002AB 0/0/0 2AB Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 6E 00 00 00 00 be 10 10 01 07 16 1 7 6 000176 0/0/0 176 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 01 10 1 000010 0/0/0 10 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 02 10 2 000020 0/0/0 20 Halt 6E 00 00 00 00 be 10 10 01 08 04 1 8 4 000184 0/0/0 184 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 08 8 000008 0/0/0 8 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 01 04 1 4 000014 0/0/0 14 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 13 15 01 16 13 3 5 1 6 3 035163 3/0/2 1163 copy (A) to N 07 13 16 16 07 7 3 6 6 7 073667 7/0/1 1667 augment (N) by (A) 04 16 04 15 02 4 6 4 5 2 046452 4/0/3 452 add (N) to (A) 10 10 16 15 07 6 5 7 000657 0/0/0 657 Halt 10 16 16 15 16 6 6 5 6 006656 0/0/3 656 set radix 15 15 16 19 10 5 5 6 9 055690 5/0/2 1690 subtract (N) from (A) 02 15 1C 07 02 2 5 + 7 2 025C72 2/0/2 1C72 transfer (A) to N 10 10 15 04 15 5 4 5 000545 0/0/0 545 Halt 6E 00 00 00 00 be 10 10 01 19 02 1 9 2 000192 0/0/0 192 Halt 16 15 13 16 02 6 5 3 6 2 065362 6/0/2 1362 select (N) 15 02 16 13 16 5 2 6 3 6 052636 5/0/1 636 subtract (N) from (A) 08 16 07 15 15 8 6 7 5 5 086755 8/0/3 755 merge constant length 10 10 07 13 07 7 3 7 000737 0/0/0 737 Halt 04 10 10 16 16 4 6 6 040066 4/0/0 66 add (N) to (A) 15 15 16 15 15 5 5 6 5 5 055655 5/0/2 1655 subtract (N) from (A) 13 15 15 07 02 3 5 5 7 2 035572 3/0/2 1572 copy (A) to N 15 16 10 10 07 5 6 7 056007 5/0/3 7 subtract (N) from (A) 10 10 10 10 10 000000 0/0/0 0 Halt 07 13 04 0E 10 7 3 4 . 0734E0 7/0/1 14E0 augment (N) by (A) 16 16 15 15 15 6 6 5 5 5 066555 6/0/3 555 select (N) 10 10 10 10 16 6 000006 0/0/0 6 Halt 13 07 16 16 16 3 7 6 6 6 037666 3/0/3 1666 copy (A) to N 10 10 10 10 07 7 000007 0/0/0 7 Halt 6E 00 00 00 00 be 10 10 01 1A 10 1 10 0001A0 0/0/0 1A0 Halt 19 15 15 15 15 9 5 5 5 5 095555 9/0/2 1555 multiply uniform radix 07 13 15 08 16 7 3 5 8 6 073586 7/0/1 1586 augment (N) by (A) 16 07 04 16 19 6 7 4 6 9 067469 6/0/3 1469 select (N) 10 10 15 16 16 5 6 6 000566 0/0/0 566 Halt 19 07 15 15 15 9 7 5 5 5 097555 9/0/3 1555 multiply uniform radix 10 10 15 16 15 5 6 5 000565 0/0/0 565 Halt 02 15 19 07 07 2 5 9 7 7 025977 2/0/2 1977 transfer (A) to N 10 10 10 10 07 7 000007 0/0/0 7 Halt 15 15 15 16 15 5 5 5 6 5 055565 5/0/2 1565 subtract (N) from (A) 07 02 15 15 07 7 2 5 5 7 072557 7/0/1 557 augment (N) by (A) 07 15 08 07 13 7 5 8 7 3 075873 7/0/2 1873 augment (N) by (A) 15 15 15 19 15 5 5 5 9 5 055595 5/0/2 1595 subtract (N) from (A) 19 16 15 15 15 9 6 5 5 5 096555 9/0/3 555 multiply uniform radix 10 10 16 15 15 6 5 5 000655 0/0/0 655 Halt 6E 00 00 00 00 be 10 10 01 1A 0E 1 10 . 0001AE 0/0/0 1AE Halt 13 15 15 16 15 3 5 5 6 5 035565 3/0/2 1565 copy (A) to N 10 10 10 10 07 7 000007 0/0/0 7 Halt 07 04 0E 10 10 7 4 . 074E00 7/0/2 E00 augment (N) by (A) 16 04 15 01 15 6 4 5 1 5 064515 6/0/2 515 select (N) 07 15 15 10 10 7 5 5 075500 7/0/2 1500 augment (N) by (A) 07 13 15 01 16 7 3 5 1 6 073516 7/0/1 1516 augment (N) by (A) 01 16 15 07 02 1 6 5 7 2 016572 1/0/3 572 interchange area addresses 07 13 16 19 15 7 3 6 9 5 073695 7/0/1 1695 augment (N) by (A) 13 16 16 16 19 3 6 6 6 9 036669 3/0/3 669 copy (A) to N 16 13 15 01 07 6 3 5 1 7 063517 6/0/1 1517 select (N) 19 15 15 16 08 9 5 5 6 8 095568 9/0/2 1568 multiply uniform radix 10 10 15 16 16 5 6 6 000566 0/0/0 566 Halt 15 15 13 07 08 5 5 3 7 8 055378 5/0/2 1378 subtract (N) from (A) 07 04 15 15 16 7 4 5 5 6 074556 7/0/2 556 augment (N) by (A) 6E 00 00 00 00 be 10 10 01 0B 1C 1 11 + 0001BC 0/0/0 1BC Halt 15 07 02 07 13 5 7 2 7 3 057273 5/0/3 1273 subtract (N) from (A) 10 10 07 13 15 7 3 5 000735 0/0/0 735 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 04 0E 10 10 10 4 . 04E000 4/1/3 0 add (N) to (A) 15 16 16 04 0E 5 6 6 4 . 05664E 5/0/3 64E subtract (N) from (A) 10 10 10 10 16 6 000006 0/0/0 6 Halt 07 15 15 15 01 7 5 5 5 1 075551 7/0/2 1551 augment (N) by (A) 16 19 15 15 16 6 9 5 5 6 069556 6/1/0 1556 select (N) 15 16 16 04 0E 5 6 6 4 . 05664E 5/0/3 64E subtract (N) from (A) 07 13 10 10 16 7 3 6 073006 7/0/1 1006 augment (N) by (A) 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 13 10 13 10 3 3 003030 0/0/1 1030 Invalid 13 10 13 10 13 3 3 3 030303 3/0/0 303 copy (A) to N 6E 00 00 00 00 be 10 10 01 1C 1A 1 + 10 0001CA 0/0/0 1CA Halt 38 08 01 1C 1C H 8 1 + + 1881CC 24/1/0 1CC unconditional jump 2A 10 13 19 04 = 3 9 4 1A0394 26/0/0 394 enter subroutine 10 01 1F 1F 1F 1 £ £ £ 001FFF 0/0/0 1FFF Halt 16 10 01 1C 1A 6 1 + 10 0601CA 6/0/0 1CA select (N) 02 10 10 10 10 2 020000 2/0/0 0 transfer (A) to N 10 16 01 04 16 6 1 4 6 006146 0/0/3 146 set radix 38 1A 01 1C 1A H 10 1 + 10 18A1CA 24/1/1 1CA set modification group 01 0E 04 10 10 1 . 4 01E400 1/1/3 400 select literal address 38 16 10 08 01 H 6 8 1 186081 24/0/3 81 modify address of next 02 10 10 04 10 2 4 020040 2/0/0 40 transfer (A) to N 01 1F 10 10 10 1 £ 01F000 1/1/3 1000 select literal address 38 16 10 08 13 H 6 8 3 186083 24/0/3 83 modify address of next 02 10 10 04 10 2 4 020040 2/0/0 40 transfer (A) to N 16 08 01 04 04 6 8 1 4 4 068144 6/1/0 144 select (N) 6E 00 00 00 00 be 10 10 01 0D 08 1 : 8 0001D8 0/0/0 1D8 Halt 02 19 10 02 02 2 9 2 2 029022 2/1/0 1022 transfer (A) to N 29 1C 10 10 10 I + 19C000 25/1/2 0 interrogate indicators 13 08 04 10 10 3 8 4 038400 3/1/0 400 copy (A) to N 13 08 01 04 08 3 8 1 4 8 038148 3/1/0 148 copy (A) to N 29 1C 07 1F 1F I + 7 £ £ 19C7FF 25/1/2 7FF interrogate indicators 3B 02 01 0E 13 * 2 1 . 3 1B21E3 27/0/1 1E3 jump A != Z 2A 1A 01 15 02 = 10 1 5 2 1AA152 26/1/1 152 set modification register 2A 1C 01 16 16 = + 1 6 6 1AC166 26/1/2 166 set modification register 01 0E 10 10 10 1 . 01E000 1/1/3 0 select literal address 02 08 04 10 10 2 8 4 028400 2/1/0 400 transfer (A) to N 38 08 02 13 16 H 8 2 3 6 188236 24/1/0 236 unconditional jump 29 1C 10 10 01 I + 1 19C001 25/1/2 1 interrogate indicators 3B 10 01 0E 0B * 1 . 11 1B01EB 27/0/0 1EB jump A = Z 2A 1A 01 15 02 = 10 1 5 2 1AA152 26/1/1 152 set modification register 6E 00 00 00 00 be 10 10 01 0E 16 1 . 6 0001E6 0/0/0 1E6 Halt 2A 1C 01 16 08 = + 1 6 8 1AC168 26/1/2 168 set modification register 01 0E 10 10 10 1 . 01E000 1/1/3 0 select literal address 02 08 04 10 10 2 8 4 028400 2/1/0 400 transfer (A) to N 29 1A 10 10 01 I 10 1 19A001 25/1/1 1 clear indicators 38 08 02 13 16 H 8 2 3 6 188236 24/1/0 236 unconditional jump 29 1C 10 10 02 I + 2 19C002 25/1/2 2 interrogate indicators 3B 10 01 1F 13 * 1 £ 3 1B01F3 27/0/0 1F3 jump A = Z 2A 1A 01 15 04 = 10 1 5 4 1AA154 26/1/1 154 set modification register 2A 1C 01 16 08 = + 1 6 8 1AC168 26/1/2 168 set modification register 01 0E 10 10 01 1 . 1 01E001 1/1/3 1 select literal address 02 08 04 10 10 2 8 4 028400 2/1/0 400 transfer (A) to N 29 1A 10 10 02 I 10 2 19A002 25/1/1 2 clear indicators 38 08 02 13 16 H 8 2 3 6 188236 24/1/0 236 unconditional jump 29 1C 10 10 04 I + 4 19C004 25/1/2 4 interrogate indicators 6E 00 00 00 00 be 10 10 01 1F 04 1 £ 4 0001F4 0/0/0 1F4 Halt 3B 10 01 1F 0B * 1 £ 11 1B01FB 27/0/0 1FB jump A = Z 2A 1A 01 15 16 = 10 1 5 6 1AA156 26/1/1 156 set modification register 2A 1C 01 16 08 = + 1 6 8 1AC168 26/1/2 168 set modification register 01 0E 10 10 02 1 . 2 01E002 1/1/3 2 select literal address 02 08 04 10 10 2 8 4 028400 2/1/0 400 transfer (A) to N 29 1A 10 10 04 I 10 4 19A004 25/1/1 4 clear indicators 38 08 02 13 16 H 8 2 3 6 188236 24/1/0 236 unconditional jump 29 1C 10 10 08 I + 8 19C008 25/1/2 8 interrogate indicators 3B 10 02 10 13 * 2 3 1B0203 27/0/0 203 jump A = Z 2A 1A 01 15 08 = 10 1 5 8 1AA158 26/1/1 158 set modification register 2A 1C 01 16 08 = + 1 6 8 1AC168 26/1/2 168 set modification register 01 0E 10 10 13 1 . 3 01E003 1/1/3 3 select literal address 02 08 04 10 10 2 8 4 028400 2/1/0 400 transfer (A) to N 29 1A 10 10 08 I 10 8 19A008 25/1/1 8 clear indicators 6E 00 00 00 00 be 10 10 02 10 02 2 2 000202 0/0/0 202 Halt 38 08 02 13 16 H 8 2 3 6 188236 24/1/0 236 unconditional jump 29 1C 10 01 10 I + 1 19C010 25/1/2 10 interrogate indicators 3B 10 02 10 0B * 2 11 1B020B 27/0/0 20B jump A = Z 2A 1A 01 15 1A = 10 1 5 10 1AA15A 26/1/1 15A set modification register 2A 1C 01 16 08 = + 1 6 8 1AC168 26/1/2 168 set modification register 01 0E 10 10 04 1 . 4 01E004 1/1/3 4 select literal address 02 08 04 10 10 2 8 4 028400 2/1/0 400 transfer (A) to N 29 1A 10 01 10 I 10 1 19A010 25/1/1 10 clear indicators 38 08 02 13 16 H 8 2 3 6 188236 24/1/0 236 unconditional jump 29 1C 10 02 10 I + 2 19C020 25/1/2 20 interrogate indicators 3B 10 02 01 13 * 2 1 3 1B0213 27/0/0 213 jump A = Z 2A 1A 01 15 1C = 10 1 5 + 1AA15C 26/1/1 15C set modification register 2A 1C 01 16 08 = + 1 6 8 1AC168 26/1/2 168 set modification register 01 0E 10 10 15 1 . 5 01E005 1/1/3 5 select literal address 6E 00 00 00 00 be 10 10 02 01 10 2 1 000210 0/0/0 210 Halt 02 08 04 10 10 2 8 4 028400 2/1/0 400 transfer (A) to N 29 1A 10 02 10 I 10 2 19A020 25/1/1 20 clear indicators 38 08 02 13 16 H 8 2 3 6 188236 24/1/0 236 unconditional jump 29 1C 10 04 10 I + 4 19C040 25/1/2 40 interrogate indicators 3B 10 02 01 0B * 2 1 11 1B021B 27/0/0 21B jump A = Z 2A 1A 01 15 0E = 10 1 5 . 1AA15E 26/1/1 15E set modification register 2A 1C 01 16 08 = + 1 6 8 1AC168 26/1/2 168 set modification register 01 0E 10 10 16 1 . 6 01E006 1/1/3 6 select literal address 02 08 04 10 10 2 8 4 028400 2/1/0 400 transfer (A) to N 29 1A 10 04 10 I 10 4 19A040 25/1/1 40 clear indicators 38 08 02 13 16 H 8 2 3 6 188236 24/1/0 236 unconditional jump 29 1C 10 08 10 I + 8 19C080 25/1/2 80 interrogate indicators 3B 10 02 02 13 * 2 2 3 1B0223 27/0/0 223 jump A = Z 2A 1A 01 16 10 = 10 1 6 1AA160 26/1/1 160 set modification register 6E 00 00 00 00 be 10 10 02 01 0E 2 1 . 00021E 0/0/0 21E Halt 2A 1C 01 16 08 = + 1 6 8 1AC168 26/1/2 168 set modification register 01 0E 10 10 07 1 . 7 01E007 1/1/3 7 select literal address 02 08 04 10 10 2 8 4 028400 2/1/0 400 transfer (A) to N 29 1A 10 08 10 I 10 8 19A080 25/1/1 80 clear indicators 38 08 02 13 16 H 8 2 3 6 188236 24/1/0 236 unconditional jump 29 1C 01 10 10 I + 1 19C100 25/1/2 100 interrogate indicators 3B 10 02 02 0B * 2 2 11 1B022B 27/0/0 22B jump A = Z 2A 1A 01 16 02 = 10 1 6 2 1AA162 26/1/1 162 set modification register 2A 1C 01 16 08 = + 1 6 8 1AC168 26/1/2 168 set modification register 01 0E 10 10 08 1 . 8 01E008 1/1/3 8 select literal address 02 08 04 10 10 2 8 4 028400 2/1/0 400 transfer (A) to N 29 1A 01 10 10 I 10 1 19A100 25/1/1 100 clear indicators 38 08 02 13 16 H 8 2 3 6 188236 24/1/0 236 unconditional jump 29 1C 02 10 10 I + 2 19C200 25/1/2 200 interrogate indicators 6E 00 00 00 00 be 02 1C 3B 10 02 2 + * 2 02CB02 2/1/2 B02 transfer (A) to N 13 13 2A 1A 01 3 3 = 10 1 033AA1 3/0/1 1AA1 copy (A) to N 16 04 2A 1C 01 6 4 = + 1 064AC1 6/0/2 AC1 select (N) 16 08 01 0E 10 6 8 1 . 0681E0 6/1/0 1E0 select (N) 10 19 02 08 04 9 2 8 4 009284 0/1/0 1284 copy registers 10 10 29 1A 02 I 10 2 0009A2 0/0/0 9A2 Halt 10 10 38 08 02 H 8 2 000882 0/0/0 882 Halt 13 16 10 10 10 3 6 036000 3/0/3 0 copy (A) to N 01 01 38 08 01 1 1 H 8 1 011881 1/0/0 1881 table look up 0D 1C 2A 1C 01 : + = + 1 0DCAC1 13/1/2 AC1 divide uniform radix 16 16 29 1C 10 6 6 I + 0669C0 6/0/3 9C0 select (N) 10 10 02 08 04 2 8 4 000284 0/0/0 284 Halt 10 02 2A 0E 01 2 = . 1 002AE1 0/0/1 AE1 Invalid 04 1A 38 16 10 4 10 H 6 04A860 4/1/1 860 add (N) to (A) 10 02 6E 00 00 2 be 002E00 0/0/1 E00 Invalid 02 13 1A 2A 02 2 3 10 = 2 023AA2 2/0/1 1AA2 transfer (A) to N 01 16 1A 16 08 1 6 10 6 8 016A68 1/0/3 A68 interchange area addresses 01 02 1C 02 0E 1 2 + 2 . 012C2E 1/0/1 C2E prepare for digit collation 04 10 04 29 16 4 4 I 6 040496 4/0/0 496 add (N) to (A) 10 10 02 38 08 2 H 8 000288 0/0/0 288 Halt 02 13 0B 38 08 2 3 11 H 8 023B88 2/0/1 1B88 transfer (A) to N 02 0B 01 16 08 2 11 1 6 8 02B168 2/1/1 1168 transfer (A) to N 01 02 0E 02 0E 1 2 . 2 . 012E2E 1/0/1 E2E prepare for digit collation 04 10 04 16 08 4 4 6 8 040468 4/0/0 468 add (N) to (A) 01 13 10 02 0E 1 3 2 . 01302E 1/0/1 102E prepare for digit collation 04 10 16 29 16 4 6 I 6 040696 4/0/0 696 add (N) to (A) 10 10 04 38 08 4 H 8 000488 0/0/0 488 Halt 02 04 10 38 08 2 4 H 8 024088 2/0/2 88 transfer (A) to N 02 0B 01 16 08 2 11 1 6 8 02B168 2/1/1 1168 transfer (A) to N 01 13 02 6E 00 1 3 2 be 0132E0 1/0/1 12E0 prepare for digit collation 10 02 04 08 02 2 4 8 2 002482 0/0/1 482 Invalid 0E 04 10 04 16 . 4 4 6 0E4046 14/0/2 46 replace selected bits 08 01 13 04 02 8 1 3 4 2 081342 8/0/0 1342 merge constant length 0E 04 10 16 16 . 4 6 6 0E4066 14/0/2 66 replace selected bits 08 01 13 16 02 8 1 3 6 2 081362 8/0/0 1362 merge constant length 0E 04 10 08 29 . 4 8 I 0E4089 14/0/2 89 replace selected bits 16 10 10 16 38 6 6 H 060068 6/0/0 68 select (N) 08 02 04 07 38 8 2 4 7 H 082478 8/0/1 478 merge constant length 08 02 0B 01 16 8 2 11 1 6 082B16 8/0/1 B16 merge constant length 08 01 13 08 02 8 1 3 8 2 081382 8/0/0 1382 merge constant length 0E 04 10 04 16 . 4 4 6 0E4046 14/0/2 46 replace selected bits 08 01 13 02 02 8 1 3 2 2 081322 8/0/0 1322 merge constant length 0E 04 10 16 16 . 4 6 6 0E4066 14/0/2 66 replace selected bits 08 01 13 1A 02 8 1 3 10 2 0813A2 8/0/0 13A2 merge constant length 0E 04 10 08 6E . 4 8 be 0E408E 14/0/2 8E replace selected bits 10 10 02 15 16 2 5 6 000256 0/0/0 256 Halt 16 08 01 13 1C 6 8 1 3 + 06813C 6/1/0 13C select (N) 02 0E 04 10 1A 2 . 4 10 02E40A 2/1/3 40A transfer (A) to N 29 16 10 10 08 I 6 8 196008 25/0/3 8 step on and test 38 08 02 15 10 H 8 2 5 188250 24/1/0 250 unconditional jump 38 08 02 0B 01 H 8 2 11 1 1882B1 24/1/0 2B1 unconditional jump 16 08 01 13 0E 6 8 1 3 . 06813E 6/1/0 13E select (N) 02 0E 04 10 04 2 . 4 4 02E404 2/1/3 404 transfer (A) to N 29 16 10 10 02 I 6 2 196002 25/0/3 2 step on and test 38 08 02 15 0B H 8 2 5 11 18825B 24/1/0 25B unconditional jump 38 08 02 0B 01 H 8 2 11 1 1882B1 24/1/0 2B1 unconditional jump 16 08 01 04 10 6 8 1 4 068140 6/1/0 140 select (N) 02 0E 04 10 04 2 . 4 4 02E404 2/1/3 404 transfer (A) to N 16 08 01 04 02 6 8 1 4 2 068142 6/1/0 142 select (N) 02 0E 04 10 16 2 . 4 6 02E406 2/1/3 406 transfer (A) to N 6E 00 00 00 00 be 04 16 08 01 13 4 6 8 1 3 046813 4/0/3 813 add (N) to (A) 1A 02 0E 04 10 10 2 . 4 0A2E40 10/0/1 E40 multiply and add 08 16 08 01 13 8 6 8 1 3 086813 8/0/3 813 merge constant length 02 02 0E 04 10 2 2 . 4 022E40 2/0/1 E40 transfer (A) to N 1A 16 08 01 13 10 6 8 1 3 0A6813 10/0/3 813 multiply and add 08 02 0E 04 10 8 2 . 4 082E40 8/0/1 E40 merge constant length 1C 16 08 01 13 + 6 8 1 3 0C6813 12/0/3 813 convert 0E 02 0E 04 10 . 2 . 4 0E2E40 14/0/1 E40 replace selected bits 0E 29 16 10 10 . I 6 0E9600 14/1/0 1600 replace selected bits 1C 38 08 02 16 + H 8 2 6 0C8826 12/1/0 826 convert 10 38 08 02 0B H 8 2 11 00882B 0/1/0 82B copy registers 01 2A 0E 01 15 1 = . 1 5 01AE15 1/1/1 E15 add literal address 10 16 08 01 04 6 8 1 4 006814 0/0/3 814 set radix 10 02 0E 04 10 2 . 4 002E40 0/0/1 E40 Invalid 04 6E 00 00 00 4 be 04E000 4/1/3 0 add (N) to (A) 07 02 16 08 01 7 2 6 8 1 072681 7/0/1 681 augment (N) by (A) 13 1A 02 0E 04 3 10 2 . 4 03A2E4 3/1/1 2E4 copy (A) to N 10 16 16 08 01 6 6 8 1 006681 0/0/3 681 set radix 13 08 02 0E 04 3 8 2 . 4 0382E4 3/1/0 2E4 copy (A) to N 10 08 16 08 01 8 6 8 1 008681 0/1/0 681 copy registers 04 10 02 0E 04 4 2 . 4 0402E4 4/0/0 2E4 add (N) to (A) 10 1A 16 08 01 10 6 8 1 00A681 0/1/1 681 replace registers 04 02 02 0E 04 4 2 2 . 4 0422E4 4/0/1 2E4 add (N) to (A) 10 1C 16 08 01 + 6 8 1 00C681 0/1/2 681 replace (B) by (N) 13 02 02 0E 04 3 2 2 . 4 0322E4 3/0/1 2E4 copy (A) to N 10 0E 16 08 01 . 6 8 1 00E681 0/1/3 681 Invalid 13 0E 02 0E 04 3 . 2 . 4 03E2E4 3/1/3 2E4 copy (A) to N 01 10 29 16 10 1 I 6 010960 1/0/0 960 table look up 10 0E 38 08 02 . H 8 2 00E882 0/1/3 882 Invalid 07 10 6E 00 00 7 be 070E00 7/0/0 E00 augment (N) by (A) 02 08 10 38 08 2 8 H 8 028088 2/1/0 88 transfer (A) to N 02 0B 01 2A 0E 2 11 1 = . 02B1AE 2/1/1 11AE transfer (A) to N 01 04 0E 16 08 1 4 . 6 8 014E68 1/0/2 E68 round off 01 04 10 02 0E 1 4 2 . 01402E 1/0/2 2E round off 04 10 04 16 08 4 4 6 8 040468 4/0/0 468 add (N) to (A) 01 13 02 02 0E 1 3 2 2 . 01322E 1/0/1 122E prepare for digit collation 04 10 16 16 08 4 6 6 8 040668 4/0/0 668 add (N) to (A) 01 04 10 02 0E 1 4 2 . 01402E 1/0/2 2E round off 04 10 08 16 08 4 8 6 8 040868 4/0/0 868 add (N) to (A) 01 04 02 02 0E 1 4 2 2 . 01422E 1/0/2 22E round off 04 10 1A 16 08 4 10 6 8 040A68 4/0/0 A68 add (N) to (A) 01 13 08 02 0E 1 3 8 2 . 01382E 1/0/1 182E prepare for digit collation 04 10 1C 16 08 4 + 6 8 040C68 4/0/0 C68 add (N) to (A) 01 04 10 02 0E 1 4 2 . 01402E 1/0/2 2E round off 04 10 0E 6E 00 4 . be 040EE0 4/0/0 EE0 add (N) to (A) 10 02 08 0E 16 2 8 . 6 0028E6 0/0/1 8E6 Invalid 08 01 13 1A 02 8 1 3 10 2 0813A2 8/0/0 13A2 merge constant length 0E 04 01 10 16 . 4 1 6 0E4106 14/0/2 106 replace selected bits 08 01 13 0E 02 8 1 3 . 2 0813E2 8/0/0 13E2 merge constant length 0E 04 01 02 29 . 4 1 2 I 0E4129 14/0/2 129 replace selected bits 16 10 01 10 38 6 1 H 060108 6/0/0 108 select (N) 08 02 08 02 38 8 2 8 2 H 082828 8/0/1 828 merge constant length 08 02 0B 01 2A 8 2 11 1 = 082B1A 8/0/1 B1A merge constant length 0E 01 04 1C 16 . 1 4 + 6 0E14C6 14/0/0 14C6 replace selected bits 08 01 04 10 02 8 1 4 2 081402 8/0/0 1402 merge constant length 0E 04 10 04 16 . 4 4 6 0E4046 14/0/2 46 replace selected bits 08 01 13 08 02 8 1 3 8 2 081382 8/0/0 1382 merge constant length 0E 04 10 16 16 . 4 6 6 0E4066 14/0/2 66 replace selected bits 08 01 04 10 02 8 1 4 2 081402 8/0/0 1402 merge constant length 0E 04 10 08 6E . 4 8 be 0E408E 14/0/2 8E replace selected bits 10 10 02 19 1C 2 9 + 00029C 0/0/0 29C Halt 16 08 01 13 02 6 8 1 3 2 068132 6/1/0 132 select (N) 02 0E 04 10 1A 2 . 4 10 02E40A 2/1/3 40A transfer (A) to N 16 08 01 04 10 6 8 1 4 068140 6/1/0 140 select (N) 02 0E 04 10 1C 2 . 4 + 02E40C 2/1/3 40C transfer (A) to N 16 08 01 13 1A 6 8 1 3 10 06813A 6/1/0 13A select (N) 02 0E 04 10 0E 2 . 4 . 02E40E 2/1/3 40E transfer (A) to N 16 08 01 04 10 6 8 1 4 068140 6/1/0 140 select (N) 02 0E 04 01 10 2 . 4 1 02E410 2/1/3 410 transfer (A) to N 16 08 01 04 02 6 8 1 4 2 068142 6/1/0 142 select (N) 02 0E 04 01 02 2 . 4 1 2 02E412 2/1/3 412 transfer (A) to N 16 08 01 13 0E 6 8 1 3 . 06813E 6/1/0 13E select (N) 02 0E 04 01 04 2 . 4 1 4 02E414 2/1/3 414 transfer (A) to N 29 16 10 01 02 I 6 1 2 196012 25/0/3 12 step on and test 38 08 02 19 16 H 8 2 9 6 188296 24/1/0 296 unconditional jump 6E 00 00 00 00 be 1A 38 08 02 0B 10 H 8 2 11 0A882B 10/1/0 82B multiply and add 01 16 08 01 04 1 6 8 1 4 016814 1/0/3 814 interchange area addresses 10 02 0E 04 10 2 . 4 002E40 0/0/1 E40 Invalid 04 16 08 01 13 4 6 8 1 3 046813 4/0/3 813 add (N) to (A) 0E 02 0E 04 10 . 2 . 4 0E2E40 14/0/1 E40 replace selected bits 16 29 16 10 10 6 I 6 069600 6/1/0 1600 select (N) 04 38 08 02 1A 4 H 8 2 10 04882A 4/1/0 82A add (N) to (A) 0B 01 0E 10 10 11 1 . 0B1E00 11/0/0 1E00 multiply and subtract 01 07 10 04 10 1 7 4 017040 1/0/3 1040 interchange area addresses 10 01 0E 10 10 1 . 001E00 0/0/0 1E00 Halt 01 07 10 04 10 1 7 4 017040 1/0/3 1040 interchange area addresses 02 29 1C 04 10 2 I + 4 029C40 2/1/0 1C40 transfer (A) to N 10 3B 10 02 0B * 2 11 00B02B 0/1/1 102B replace registers 0B 16 10 10 10 11 6 0B6000 11/0/3 0 multiply and subtract 15 6E 00 00 00 5 be 05E000 5/1/3 0 subtract (N) from (A) 0B 08 01 1C 10 11 8 1 + 0B81C0 11/1/0 1C0 multiply and subtract 10 01 02 10 10 1 2 001200 0/0/0 1200 Halt 10 04 29 1A 04 4 I 10 4 0049A4 0/0/2 9A4 replace (B) by (N) 10 10 29 04 10 I 4 000940 0/0/0 940 Halt 10 01 38 08 02 1 H 8 2 001882 0/0/0 1882 Halt 1C 13 29 02 10 + 3 I 2 0C3920 12/0/1 1920 convert 10 01 38 08 02 1 H 8 2 001882 0/0/0 1882 Halt 1C 10 38 08 13 + H 8 3 0C0883 12/0/0 883 convert 15 16 29 1C 13 5 6 I + 3 0569C3 5/0/3 9C3 subtract (N) from (A) 1F 1F 3B 10 02 £ £ * 2 0FFB02 15/1/3 1B02 collate and add 13 15 38 08 01 3 5 H 8 1 035881 3/0/2 1881 copy (A) to N 0E 13 16 10 01 . 3 6 1 0E3601 14/0/1 1601 replace selected bits 07 0E 3B 02 02 7 . * 2 2 07EB22 7/1/3 B22 augment (N) by (A) 1C 16 38 08 13 + 6 H 8 3 0C6883 12/0/3 883 convert 02 1F 6E 00 00 2 £ be 02FE00 2/1/3 1E00 transfer (A) to N 02 1C 16 16 08 2 + 6 6 8 02C668 2/1/2 668 transfer (A) to N 01 04 04 02 08 1 4 4 2 8 014428 1/0/2 428 round off 0B 1C 0E 2A 10 11 + . = 0BCEA0 11/1/2 EA0 multiply and subtract 02 1C 1F 38 16 2 + £ H 6 02CF86 2/1/2 F86 transfer (A) to N 10 08 01 23 10 8 1 C 008130 0/1/0 130 copy registers 10 10 10 2A 10 = 0000A0 0/0/0 A0 Halt 02 0D 0B 29 1C 2 : 11 I + 02DB9C 2/1/2 1B9C transfer (A) to N 08 10 10 3B 02 8 * 2 0800B2 8/0/0 B2 merge constant length 13 15 16 38 08 3 5 6 H 8 035688 3/0/2 1688 copy (A) to N 02 0B 13 10 10 2 11 3 02B300 2/1/1 1300 transfer (A) to N 10 10 10 38 16 H 6 000086 0/0/0 86 Halt 10 08 01 2A 08 8 1 = 8 0081A8 0/1/0 1A8 copy registers 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 01 38 08 1 H 8 000188 0/0/0 188 Halt 02 0D 10 6E 00 2 : be 02D0E0 2/1/2 10E0 transfer (A) to N 10 02 0D 04 2A 2 : 4 = 002D4A 0/0/1 D4A Invalid 02 02 1C 1F 38 2 2 + £ H 022CF8 2/0/1 CF8 transfer (A) to N 08 02 0D 07 2A 8 2 : 7 = 082D7A 8/0/1 D7A merge constant length 02 02 1C 1F 38 2 2 + £ H 022CF8 2/0/1 CF8 transfer (A) to N 16 10 08 01 23 6 8 1 C 060813 6/0/0 813 select (N) 1A 10 10 10 10 10 0A0000 10/0/0 0 multiply and add 10 10 10 02 38 2 H 000028 0/0/0 28 Halt 08 01 1C 1C 10 8 1 + + 081CC0 8/0/0 1CC0 merge constant length 10 10 10 10 38 H 000008 0/0/0 8 Halt 16 10 08 01 2A 6 8 1 = 06081A 6/0/0 81A select (N) 08 10 10 10 10 8 080000 8/0/0 0 merge constant length 10 10 10 01 38 1 H 000018 0/0/0 18 Halt 08 02 0D 1C 38 8 2 : + H 082DC8 8/0/1 DC8 merge constant length 08 13 10 01 38 8 3 1 H 083018 8/0/1 1018 merge constant length 08 02 0E 13 6E 8 2 . 3 be 082E3E 8/0/1 E3E merge constant length 10 10 02 0E 02 2 . 2 0002E2 0/0/0 2E2 Halt 2A 02 02 0D 0B = 2 2 : 11 1A22DB 26/0/1 2DB leave subroutine 38 16 10 08 01 H 6 8 1 186081 24/0/3 81 modify address of next 23 1A 10 10 10 C 10 13A000 19/1/1 0 rewind 10 10 10 10 02 2 000002 0/0/0 2 Halt 38 08 01 1C 1C H 8 1 + + 1881CC 24/1/0 1CC unconditional jump 10 10 10 10 10 000000 0/0/0 0 Halt 38 16 10 08 13 H 6 8 3 186083 24/0/3 83 modify address of next 2A 08 10 10 10 = 8 1A8000 26/1/0 0 test route N1 10 10 10 10 13 3 000003 0/0/0 3 Halt 38 08 02 0E 08 H 8 2 . 8 1882E8 24/1/0 2E8 unconditional jump 2A 02 02 0E 07 = 2 2 . 7 1A22E7 26/0/1 2E7 leave subroutine 38 08 02 0E 1F H 8 2 . £ 1882EF 24/1/0 2EF unconditional jump 2A 02 02 0E 07 = 2 2 . 7 1A22E7 26/0/1 2E7 leave subroutine 38 16 10 08 13 H 6 8 3 186083 24/0/3 83 modify address of next 6E 00 00 00 00 be 10 23 0E 10 10 C . 003E00 0/0/1 1E00 Invalid 10 10 10 10 10 000000 0/0/0 0 Halt 04 38 08 02 0E 4 H 8 2 . 04882E 4/1/0 82E add (N) to (A) 08 10 10 10 10 8 080000 8/0/0 0 merge constant length 10 38 16 10 08 H 6 8 008608 0/1/0 608 copy registers 13 2A 08 10 10 3 = 8 03A800 3/1/1 800 copy (A) to N 10 10 10 10 10 000000 0/0/0 0 Halt 13 38 08 02 1F 3 H 8 2 £ 03882F 3/1/0 82F copy (A) to N 04 38 08 02 1F 4 H 8 2 £ 04882F 4/1/0 82F add (N) to (A) 1F 38 08 02 1F £ H 8 2 £ 0F882F 15/1/0 82F collate and add 0B 2A 02 02 1F 11 = 2 2 £ 0BA22F 11/1/1 22F multiply and subtract 13 38 16 10 08 3 H 6 8 038608 3/1/0 608 copy (A) to N 13 23 0E 10 10 3 C . 033E00 3/0/1 1E00 copy (A) to N 10 10 10 10 10 000000 0/0/0 0 Halt 04 6E 00 00 00 4 be 04E000 4/1/3 0 add (N) to (A) 1F 0E 38 08 02 £ . H 8 2 0FE882 15/1/3 882 collate and add 1F 04 10 10 10 £ 4 0F4000 15/0/2 0 collate and add 10 15 38 08 02 5 H 8 2 005882 0/0/2 1882 replace (B) by (N) 0E 08 16 10 10 . 8 6 0E8600 14/1/0 600 replace selected bits 10 02 02 10 01 2 2 1 002201 0/0/1 201 Invalid 04 08 01 0E 10 4 8 1 . 0481E0 4/1/0 1E0 add (N) to (A) 10 01 38 16 01 1 H 6 1 001861 0/0/0 1861 Halt 04 08 07 10 01 4 8 7 1 048701 4/1/0 701 add (N) to (A) 07 04 16 10 04 7 4 6 4 074604 7/0/2 604 augment (N) by (A) 10 10 02 08 01 2 8 1 000281 0/0/0 281 Halt 1C 07 2A 10 13 + 7 = 3 0C7A03 12/0/3 1A03 convert 01 1F 16 08 01 1 £ 6 8 1 01F681 1/1/3 1681 select literal address 1C 16 02 19 10 + 6 2 9 0C6290 12/0/3 290 convert 10 16 16 10 04 6 6 4 006604 0/0/3 604 set radix 10 02 6E 00 00 2 be 002E00 0/0/1 E00 Invalid 13 10 1C 02 08 3 + 2 8 030C28 3/0/0 C28 copy (A) to N 01 1C 07 2A 10 1 + 7 = 01C7A0 1/1/2 7A0 subtract literal address 13 01 1F 16 08 3 1 £ 6 8 031F68 3/0/0 1F68 copy (A) to N 01 1C 16 02 19 1 + 6 2 9 01C629 1/1/2 629 subtract literal address 10 10 0E 2A 10 . = 000EA0 0/0/0 EA0 Halt 13 04 1A 2A 02 3 4 10 = 2 034AA2 3/0/2 AA2 copy (A) to N 02 0D 0B 10 10 2 : 11 02DB00 2/1/2 1B00 transfer (A) to N 10 10 10 01 0E 1 . 00001E 0/0/0 1E Halt 10 10 01 07 10 1 7 000170 0/0/0 170 Halt 01 07 1F 01 0E 1 7 £ 1 . 017F1E 1/0/3 1F1E interchange area addresses 10 16 10 15 10 6 5 006050 0/0/3 50 set radix 01 07 1F 3B 10 1 7 £ * 017FB0 1/0/3 1FB0 interchange area addresses 13 01 1A 3B 16 3 1 10 * 6 031AB6 3/0/0 1AB6 copy (A) to N 13 01 1A 2A 02 3 1 10 = 2 031AA2 3/0/0 1AA2 copy (A) to N 13 01 02 6E 00 3 1 2 be 0312E0 3/0/0 12E0 copy (A) to N 10 13 01 1A 01 3 1 10 1 0031A1 0/0/1 11A1 Invalid 0E 08 10 10 02 . 8 2 0E8002 14/1/0 2 replace selected bits 01 10 10 10 29 1 I 010009 1/0/0 9 table look up 1C 10 10 10 02 + 2 0C0002 12/0/0 2 convert 10 01 07 1F 2A 1 7 £ = 0017FA 0/0/0 17FA Halt 02 13 01 02 10 2 3 1 2 023120 2/0/1 1120 transfer (A) to N 10 10 10 10 38 H 000008 0/0/0 8 Halt 08 13 19 0E 10 8 3 9 . 0839E0 8/0/1 19E0 merge constant length 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 29 I 000009 0/0/0 9 Halt 1C 10 10 10 32 + B 0C0002 12/0/0 2 convert 19 10 01 0E 6E 9 1 . be 0901EE 9/0/0 1EE multiply uniform radix 10 10 13 02 08 3 2 8 000328 0/0/0 328 Halt 1F 08 01 1C 16 £ 8 1 + 6 0F81C6 15/1/0 1C6 collate and add 3B 02 13 02 16 * 2 3 2 6 1B2326 27/0/1 326 jump A != Z 16 08 01 1C 08 6 8 1 + 8 0681C8 6/1/0 1C8 select (N) 0E 08 01 1C 16 . 8 1 + 6 0E81C6 14/1/0 1C6 replace selected bits 29 1C 10 10 10 I + 19C000 25/1/2 0 interrogate indicators 3B 1A 13 02 07 * 10 3 2 7 1BA327 27/1/1 327 jump AB != Z 2A 02 13 01 1F = 2 3 1 £ 1A231F 26/0/1 31F leave subroutine 2A 1A 01 08 10 = 10 1 8 1AA180 26/1/1 180 set modification register 16 1A 01 0B 10 6 10 1 11 06A1B0 6/1/1 1B0 select (N) 02 0B 10 10 04 2 11 4 02B004 2/1/1 1004 transfer (A) to N 29 02 10 10 02 I 2 2 192002 25/0/1 2 step on and test 38 08 13 13 10 H 8 3 3 188330 24/1/0 330 unconditional jump 16 10 01 04 04 6 1 4 4 060144 6/0/0 144 select (N) 02 19 10 01 04 2 9 1 4 029014 2/1/0 1014 transfer (A) to N 6E 00 00 00 00 be 16 29 1C 10 10 6 I + 069C00 6/1/0 1C00 select (N) 10 13 19 10 10 3 9 003900 0/0/1 1900 Invalid 10 02 19 10 10 2 9 002900 0/0/1 900 Invalid 02 2A 10 13 04 2 = 3 4 02A034 2/1/1 34 transfer (A) to N 1A 2A 10 13 04 10 = 3 4 0AA034 10/1/1 34 multiply and add 1A 2A 10 13 04 10 = 3 4 0AA034 10/1/1 34 multiply and add 1A 16 08 01 19 10 6 8 1 9 0A6819 10/0/3 819 multiply and add 02 02 19 10 10 2 2 9 022900 2/0/1 900 transfer (A) to N 04 16 08 01 1C 4 6 8 1 + 04681C 4/0/3 81C add (N) to (A) 10 02 19 10 10 2 9 002900 0/0/1 900 Invalid 16 16 08 01 1C 6 6 8 1 + 06681C 6/0/3 81C select (N) 02 02 19 10 10 2 2 9 022900 2/0/1 900 transfer (A) to N 1C 16 08 01 1C + 6 8 1 + 0C681C 12/0/3 81C convert 04 02 19 10 10 4 2 9 042900 4/0/1 900 add (N) to (A) 0E 6E 00 00 00 . be 0EE000 14/1/3 0 replace selected bits 04 04 2A 10 13 4 4 = 3 044A03 4/0/2 A03 add (N) to (A) 04 1A 2A 10 13 4 10 = 3 04AA03 4/1/1 A03 add (N) to (A) 04 1A 2A 10 13 4 10 = 3 04AA03 4/1/1 A03 add (N) to (A) 04 1A 01 0E 10 4 10 1 . 04A1E0 4/1/1 1E0 add (N) to (A) 10 01 02 10 01 1 2 1 001201 0/0/0 1201 Halt 07 0E 38 08 01 7 . H 8 1 07E881 7/1/3 881 augment (N) by (A) 0D 19 10 10 10 : 9 0D9000 13/1/0 1000 divide uniform radix 10 10 2A 10 13 = 3 000A03 0/0/0 A03 Halt 01 02 2A 10 02 1 2 = 2 012A02 1/0/1 A02 prepare for digit collation 0E 07 38 16 10 . 7 H 6 0E7860 14/0/3 1860 replace selected bits 08 13 23 10 10 8 3 C 083300 8/0/1 1300 merge constant length 10 10 2A 10 02 = 2 000A02 0/0/0 A02 Halt 1F 13 2A 0E 01 £ 3 = . 1 0F3AE1 15/0/1 1AE1 collate and add 08 02 29 1C 10 8 2 I + 0829C0 8/0/1 9C0 merge constant length 10 10 6E 00 00 be 000E00 0/0/0 E00 Halt 13 15 02 13 1F 3 5 2 3 £ 03523F 3/0/2 123F copy (A) to N 10 10 10 29 16 I 6 000096 0/0/0 96 Halt 10 10 02 38 08 2 H 8 000288 0/0/0 288 Halt 13 15 02 2A 02 3 5 2 = 2 0352A2 3/0/2 12A2 copy (A) to N 13 04 1A 2A 1A 3 4 10 = 10 034AAA 3/0/2 AAA copy (A) to N 01 08 04 16 1A 1 8 4 6 10 01846A 1/1/0 46A table look up 01 08 1A 02 0B 1 8 10 2 11 018A2B 1/1/0 A2B table look up 10 10 04 29 02 4 I 2 000492 0/0/0 492 Halt 10 10 02 38 08 2 H 8 000288 0/0/0 288 Halt 13 15 07 2A 10 3 5 7 = 0357A0 3/0/2 17A0 copy (A) to N 13 04 1A 2A 10 3 4 10 = 034AA0 3/0/2 AA0 copy (A) to N 13 04 1A 16 08 3 4 10 6 8 034A68 3/0/2 A68 copy (A) to N 01 19 02 02 19 1 9 2 2 9 019229 1/1/0 1229 table look up 10 10 04 16 08 4 6 8 000468 0/0/0 468 Halt 01 19 04 6E 00 1 9 4 be 0194E0 1/1/0 14E0 table look up 10 13 16 10 02 3 6 2 003602 0/0/1 1602 Invalid 19 10 10 16 2A 9 6 = 09006A 9/0/0 6A multiply uniform radix 10 13 04 1A 2A 3 4 10 = 0034AA 0/0/1 14AA Invalid 1A 01 15 02 2A 10 1 5 2 = 0A152A 10/0/0 152A multiply and add 1C 01 08 16 16 + 1 8 6 6 0C1866 12/0/0 1866 convert 1C 01 19 1C 02 + 1 9 + 2 0C19C2 12/0/0 19C2 convert 19 10 10 1C 16 9 + 6 0900C6 9/0/0 C6 multiply uniform radix 02 01 07 04 02 2 1 7 4 2 021742 2/0/0 1742 transfer (A) to N 08 01 1C 07 2A 8 1 + 7 = 081C7A 8/0/0 1C7A merge constant length 10 13 01 1F 16 3 1 £ 6 0031F6 0/0/1 11F6 Invalid 08 01 1C 16 02 8 1 + 6 2 081C62 8/0/0 1C62 merge constant length 19 10 01 10 2A 9 1 = 09010A 9/0/0 10A multiply uniform radix 10 13 04 1A 2A 3 4 10 = 0034AA 0/0/1 14AA Invalid 10 13 04 1A 29 3 4 10 I 0034A9 0/0/1 14A9 Invalid 02 10 10 01 6E 2 1 be 02001E 2/0/0 1E transfer (A) to N 10 10 13 16 0E 3 6 . 00036E 0/0/0 36E Halt 38 08 13 16 1F H 8 3 6 £ 18836F 24/1/0 36F unconditional jump 29 04 10 10 02 I 4 2 194002 25/0/2 2 step on and test 38 08 13 16 04 H 8 3 6 4 188364 24/1/0 364 unconditional jump 2A 10 13 04 1A = 3 4 10 1A034A 26/0/0 34A enter subroutine 16 08 01 19 16 6 8 1 9 6 068196 6/1/0 196 select (N) 02 19 10 10 04 2 9 4 029004 2/1/0 1004 transfer (A) to N 16 08 01 19 08 6 8 1 9 8 068198 6/1/0 198 select (N) 02 19 10 10 16 2 9 6 029006 2/1/0 1006 transfer (A) to N 16 08 01 19 1A 6 8 1 9 10 06819A 6/1/0 19A select (N) 02 19 10 10 08 2 9 8 029008 2/1/0 1008 transfer (A) to N 2A 10 13 04 1A = 3 4 10 1A034A 26/0/0 34A enter subroutine 01 0E 08 10 10 1 . 8 01E800 1/1/3 800 select literal address 02 01 10 10 10 2 1 021000 2/0/0 1000 transfer (A) to N 2A 10 13 04 1A = 3 4 10 1A034A 26/0/0 34A enter subroutine 6E 00 00 00 00 be 1C 38 16 10 08 + H 6 8 0C8608 12/1/0 608 convert 13 23 0E 10 10 3 C . 033E00 3/0/1 1E00 copy (A) to N 10 38 16 10 08 H 6 8 008608 0/1/0 608 copy registers 01 23 1C 10 10 1 C + 013C00 1/0/1 1C00 prepare for digit collation 10 38 08 13 1A H 8 3 10 00883A 0/1/0 83A copy registers 1C 10 10 10 10 + 0C0000 12/0/0 0 convert 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 29 0B 10 10 I 11 009B00 0/1/0 1B00 copy registers 10 01 1F 1F 0D 1 £ £ : 001FFD 0/0/0 1FFD Halt 0E 02 10 10 15 . 2 5 0E2005 14/0/1 5 replace selected bits 08 23 02 10 01 8 C 2 1 083201 8/0/1 1201 merge constant length 08 2A 08 10 01 8 = 8 1 08A801 8/1/1 801 merge variable length 08 6E 00 00 00 8 be 08E000 8/1/3 0 merge variable length 08 1A 10 01 1F 8 10 1 £ 08A01F 8/1/1 1F merge variable length 0D 0B 38 08 10 : 11 H 8 0DB880 13/1/1 1880 divide uniform radix 19 01 10 01 1F 9 1 1 £ 09101F 9/0/0 101F multiply uniform radix 0D 1F 10 10 10 : £ 0DF000 13/1/3 1000 divide uniform radix 02 10 16 08 10 2 6 8 020680 2/0/0 680 transfer (A) to N 19 04 2C 19 1F 9 4 ' 9 £ 094C9F 9/0/2 C9F multiply uniform radix 1F 1F 38 19 1F £ £ H 9 £ 0FF89F 15/1/3 189F collate and add 1F 1F 19 08 10 £ £ 9 8 0FF980 15/1/3 1980 collate and add 02 10 10 10 10 2 020000 2/0/0 0 transfer (A) to N 10 10 10 10 10 000000 0/0/0 0 Halt 10 0E 10 10 01 . 1 00E001 0/1/3 1 Invalid 1C 1C 2A 0E 13 + + = . 3 0CCAE3 12/1/2 AE3 convert 19 02 16 16 13 9 2 6 6 3 092663 9/0/1 663 multiply uniform radix 08 04 02 16 10 8 4 2 6 084260 8/0/2 260 merge constant length 08 1C 6E 00 00 8 + be 08CE00 8/1/2 E00 merge variable length 13 19 08 29 16 3 9 8 I 6 039896 3/1/0 1896 copy (A) to N 10 10 01 38 08 1 H 8 000188 0/0/0 188 Halt 13 19 16 2A 02 3 9 6 = 2 0396A2 3/1/0 16A2 copy (A) to N 13 19 04 10 10 3 9 4 039400 3/1/0 1400 copy (A) to N 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 01 02 1 2 000012 0/0/0 12 Halt 13 10 10 29 1C 3 I + 03009C 3/0/0 9C copy (A) to N 10 10 10 3B 08 * 8 0000B8 0/0/0 B8 Halt 13 1A 15 1F 08 3 10 5 £ 8 03A5F8 3/1/1 5F8 copy (A) to N 01 1C 16 3B 02 1 + 6 * 2 01C6B2 1/1/2 6B2 subtract literal address 13 02 16 32 19 3 2 6 B 9 032629 3/0/1 629 copy (A) to N 10 01 0E 38 08 1 . H 8 001E88 0/0/0 1E88 Halt 13 19 1F 01 0E 3 9 £ 1 . 039F1E 3/1/0 1F1E copy (A) to N 10 13 10 6E 00 3 be 0030E0 0/0/1 10E0 Invalid 10 13 1A 16 02 3 10 6 2 003A62 0/0/1 1A62 Invalid 08 01 1C 16 2A 8 1 + 6 = 081C6A 8/0/0 1C6A merge constant length 02 13 01 1F 10 2 3 1 £ 0231F0 2/0/1 11F0 transfer (A) to N 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 29 I 000009 0/0/0 9 Halt 1C 10 10 10 02 + 2 0C0002 12/0/0 2 convert 08 01 07 04 02 8 1 7 4 2 081742 8/0/0 1742 merge constant length 08 01 07 16 02 8 1 7 6 2 081762 8/0/0 1762 merge constant length 08 01 07 08 02 8 1 7 8 2 081782 8/0/0 1782 merge constant length 08 01 07 1A 02 8 1 7 10 2 0817A2 8/0/0 17A2 merge constant length 08 01 07 1C 02 8 1 7 + 2 0817C2 8/0/0 17C2 merge constant length 08 01 07 0E 38 8 1 7 . H 0817E8 8/0/0 17E8 merge constant length 08 01 1C 0B 6E 8 1 + 11 be 081CBE 8/0/0 1CBE merge constant length 10 10 13 0B 04 3 11 4 0003B4 0/0/0 3B4 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 6E 00 00 00 00 be 78 00 00 00 00 Y 080000 8/0/0 0 merge constant length File: old-paper-tapes/T998.leo 10 10 10 10 10 000000 0/0/0 0 Halt 6D 10 10 10 10 ; 0D0000 13/0/0 0 divide uniform radix 10 6D 10 10 10 ; 00D000 0/1/2 1000 replace (B) by (N) 10 0E 6D 10 10 . ; 00ED00 0/1/3 D00 Invalid 10 10 10 6D 10 ; 0000D0 0/0/0 D0 Halt 10 13 70 70 6D 3 0 0 ; 00300D 0/0/1 100D Invalid 10 10 10 19 08 9 8 000098 0/0/0 98 Halt 6E 00 00 00 00 be 01 15 6D 70 6D 1 5 ; 0 ; 015D0D 1/0/2 1D0D round off 13 6D 6D 08 70 3 ; ; 8 0 03DD80 3/1/2 1D80 copy (A) to N 16 13 6E 00 00 6 3 be 063E00 6/0/1 1E00 select (N) 07 6D 01 6D 13 7 ; 1 ; 3 07D1D3 7/1/2 11D3 augment (N) by (A) 6D 6D 16 01 13 ; ; 6 1 3 0DD613 13/1/2 1613 divide uniform radix 15 6E 00 00 00 5 be 05E000 5/1/3 0 subtract (N) from (A) 70 6D 70 6D 13 0 ; 0 ; 3 00D0D3 0/1/2 10D3 replace (B) by (N) 6D 6D 07 19 13 ; ; 7 9 3 0DD793 13/1/2 1793 divide uniform radix 16 6E 00 00 00 6 be 06E000 6/1/3 0 select (N) 70 6D 70 6D 70 0 ; 0 ; 0 00D0D0 0/1/2 10D0 replace (B) by (N) 6D 6D 02 70 13 ; ; 2 0 3 0DD203 13/1/2 1203 divide uniform radix 02 6E 00 00 00 2 be 02E000 2/1/3 0 transfer (A) to N 01 15 6D 70 6D 1 5 ; 0 ; 015D0D 1/0/2 1D0D round off 70 6D 6D 01 02 0 ; ; 1 2 00DD12 0/1/2 1D12 replace (B) by (N) 07 6E 00 00 00 7 be 07E000 7/1/3 0 augment (N) by (A) 07 6D 01 6D 13 7 ; 1 ; 3 07D1D3 7/1/2 11D3 augment (N) by (A) 6D 6D 04 01 70 ; ; 4 1 0 0DD410 13/1/2 1410 divide uniform radix 13 6E 00 00 00 3 be 03E000 3/1/3 0 copy (A) to N 01 15 6D 70 6D 1 5 ; 0 ; 015D0D 1/0/2 1D0D round off 70 6D 6D 70 6E 0 ; ; 0 be 00DD0E 0/1/2 1D0E replace (B) by (N) 70 6D 70 6D 70 0 ; 0 ; 0 00D0D0 0/1/2 10D0 replace (B) by (N) 6D 6D 07 6E 00 ; ; 7 be 0DD7E0 13/1/2 17E0 divide uniform radix 70 6D 70 6D 70 0 ; 0 ; 0 00D0D0 0/1/2 10D0 replace (B) by (N) 6D 6D 01 02 07 ; ; 1 2 7 0DD127 13/1/2 1127 divide uniform radix 6E 00 00 00 00 be 70 6D 70 6D 70 0 ; 0 ; 0 00D0D0 0/1/2 10D0 replace (B) by (N) 6D 6D 02 70 13 ; ; 2 0 3 0DD203 13/1/2 1203 divide uniform radix 02 6E 00 00 00 2 be 02E000 2/1/3 0 transfer (A) to N 70 6D 70 6D 13 0 ; 0 ; 3 00D0D3 0/1/2 10D3 replace (B) by (N) 6D 6D 07 19 13 ; ; 7 9 3 0DD793 13/1/2 1793 divide uniform radix 16 6E 00 00 00 6 be 06E000 6/1/3 0 select (N) 07 6D 01 6D 13 7 ; 1 ; 3 07D1D3 7/1/2 11D3 augment (N) by (A) 6D 6D 04 70 19 ; ; 4 0 9 0DD409 13/1/2 1409 divide uniform radix 16 6E 00 00 00 6 be 06E000 6/1/3 0 select (N) 70 6D 70 6D 70 0 ; 0 ; 0 00D0D0 0/1/2 10D0 replace (B) by (N) 6D 6D 70 6E 00 ; ; 0 be 0DD0E0 13/1/2 10E0 divide uniform radix 70 6D 70 6D 70 0 ; 0 ; 0 00D0D0 0/1/2 10D0 replace (B) by (N) 6D 6D 02 70 13 ; ; 2 0 3 0DD203 13/1/2 1203 divide uniform radix 02 6E 00 00 00 2 be 02E000 2/1/3 0 transfer (A) to N 70 6D 70 6D 13 0 ; 0 ; 3 00D0D3 0/1/2 10D3 replace (B) by (N) 6D 6D 07 19 13 ; ; 7 9 3 0DD793 13/1/2 1793 divide uniform radix 16 6E 00 00 00 6 be 06E000 6/1/3 0 select (N) 70 6D 70 6D 70 0 ; 0 ; 0 00D0D0 0/1/2 10D0 replace (B) by (N) 6D 6D 70 6E 00 ; ; 0 be 0DD0E0 13/1/2 10E0 divide uniform radix 70 6D 70 6D 70 0 ; 0 ; 0 00D0D0 0/1/2 10D0 replace (B) by (N) 6D 6D 01 02 07 ; ; 1 2 7 0DD127 13/1/2 1127 divide uniform radix 6E 00 00 00 00 be 07 6D 01 6D 13 7 ; 1 ; 3 07D1D3 7/1/2 11D3 augment (N) by (A) 6D 6D 04 70 19 ; ; 4 0 9 0DD409 13/1/2 1409 divide uniform radix 16 6E 00 00 00 6 be 06E000 6/1/3 0 select (N) 70 6D 70 6D 70 0 ; 0 ; 0 00D0D0 0/1/2 10D0 replace (B) by (N) 6D 6D 70 6E 00 ; ; 0 be 0DD0E0 13/1/2 10E0 divide uniform radix 07 6D 01 6D 13 7 ; 1 ; 3 07D1D3 7/1/2 11D3 augment (N) by (A) 6D 6D 04 70 19 ; ; 4 0 9 0DD409 13/1/2 1409 divide uniform radix 16 6E 00 00 00 6 be 06E000 6/1/3 0 select (N) 70 6D 70 6D 70 0 ; 0 ; 0 00D0D0 0/1/2 10D0 replace (B) by (N) 6D 6D 70 6E 00 ; ; 0 be 0DD0E0 13/1/2 10E0 divide uniform radix 70 6D 70 6D 70 0 ; 0 ; 0 00D0D0 0/1/2 10D0 replace (B) by (N) 6D 6D 70 6E 00 ; ; 0 be 0DD0E0 13/1/2 10E0 divide uniform radix 70 6D 70 6D 70 0 ; 0 ; 0 00D0D0 0/1/2 10D0 replace (B) by (N) 6D 6D 01 02 07 ; ; 1 2 7 0DD127 13/1/2 1127 divide uniform radix 6E 00 00 00 00 be 70 6D 70 6D 70 0 ; 0 ; 0 00D0D0 0/1/2 10D0 replace (B) by (N) 6D 6D 70 6E 00 ; ; 0 be 0DD0E0 13/1/2 10E0 divide uniform radix 70 6D 70 6D 70 0 ; 0 ; 0 00D0D0 0/1/2 10D0 replace (B) by (N) 6D 6D 01 02 16 ; ; 1 2 6 0DD126 13/1/2 1126 divide uniform radix 6E 00 00 00 00 be 07 6D 01 6D 13 7 ; 1 ; 3 07D1D3 7/1/2 11D3 augment (N) by (A) 6D 6D 70 6E 00 ; ; 0 be 0DD0E0 13/1/2 10E0 divide uniform radix 16 6D 70 6D 13 6 ; 0 ; 3 06D0D3 6/1/2 10D3 select (N) 6D 6D 01 16 13 ; ; 1 6 3 0DD163 13/1/2 1163 divide uniform radix 08 6E 00 00 00 8 be 08E000 8/1/3 0 merge variable length 01 6D 70 6D 6D 1 ; 0 ; ; 01D0DD 1/1/2 10DD subtract literal address 15 70 08 6E 00 5 0 8 be 0508E0 5/0/0 8E0 subtract (N) from (A) 6D 70 6D 70 6D ; 0 ; 0 ; 0D0D0D 13/0/0 D0D divide uniform radix 6D 70 6E 00 00 ; 0 be 0D0E00 13/0/0 E00 divide uniform radix 70 6D 70 6D 6D 0 ; 0 ; ; 00D0DD 0/1/2 10DD replace (B) by (N) 70 6E 00 00 00 0 be 00E000 0/1/3 0 Invalid 6D 70 6D 6D 70 ; 0 ; ; 0 0D0DD0 13/0/0 DD0 divide uniform radix 6E 00 00 00 00 be 70 6D 6D 01 19 0 ; ; 1 9 00DD19 0/1/2 1D19 replace (B) by (N) 19 02 6E 00 00 9 2 be 092E00 9/0/1 E00 multiply uniform radix 70 6D 70 6D 6D 0 ; 0 ; ; 00D0DD 0/1/2 10DD replace (B) by (N) 70 6E 00 00 00 0 be 00E000 0/1/3 0 Invalid 6D 70 6D 6D 01 ; 0 ; ; 1 0D0DD1 13/0/0 DD1 divide uniform radix 19 19 08 6E 00 9 9 8 be 0998E0 9/1/0 18E0 multiply uniform radix 6D 70 6D 70 6D ; 0 ; 0 ; 0D0D0D 13/0/0 D0D divide uniform radix 6D 70 6E 00 00 ; 0 be 0D0E00 13/0/0 E00 divide uniform radix 70 6D 70 6D 6D 0 ; 0 ; ; 00D0DD 0/1/2 10DD replace (B) by (N) 02 70 70 70 6E 2 0 0 0 be 02000E 2/0/0 E transfer (A) to N 70 6D 70 6D 70 0 ; 0 ; 0 00D0D0 0/1/2 10D0 replace (B) by (N) 6D 6D 70 6E 00 ; ; 0 be 0DD0E0 13/1/2 10E0 divide uniform radix 6D 70 6D 70 6D ; 0 ; 0 ; 0D0D0D 13/0/0 D0D divide uniform radix 6D 02 70 70 02 ; 2 0 0 2 0D2002 13/0/1 2 divide uniform radix 6E 00 00 00 00 be 70 6D 6D 70 6E 0 ; ; 0 be 00DD0E 0/1/2 1D0E replace (B) by (N) 70 6D 70 6D 70 0 ; 0 ; 0 00D0D0 0/1/2 10D0 replace (B) by (N) 6D 6D 01 70 6E ; ; 1 0 be 0DD10E 13/1/2 110E divide uniform radix 70 6D 70 6D 70 0 ; 0 ; 0 00D0D0 0/1/2 10D0 replace (B) by (N) 6D 6D 01 6E 00 ; ; 1 be 0DD1E0 13/1/2 11E0 divide uniform radix 6D 70 6D 70 6D ; 0 ; 0 ; 0D0D0D 13/0/0 D0D divide uniform radix 6D 01 70 6E 00 ; 1 0 be 0D10E0 13/0/0 10E0 divide uniform radix 6D 70 6D 70 6D ; 0 ; 0 ; 0D0D0D 13/0/0 D0D divide uniform radix 6D 02 6E 00 00 ; 2 be 0D2E00 13/0/1 E00 divide uniform radix 70 6D 70 6D 6D 0 ; 0 ; ; 00D0DD 0/1/2 10DD replace (B) by (N) 01 70 6E 00 00 1 0 be 010E00 1/0/0 E00 table look up 70 6D 70 6D 6D 0 ; 0 ; ; 00D0DD 0/1/2 10DD replace (B) by (N) 13 6E 00 00 00 3 be 03E000 3/1/3 0 copy (A) to N 6D 70 6D 6D 01 ; 0 ; ; 1 0D0DD1 13/0/0 DD1 divide uniform radix 70 6E 00 00 00 0 be 00E000 0/1/3 0 Invalid 6D 70 6D 6D 04 ; 0 ; ; 4 0D0DD4 13/0/0 DD4 divide uniform radix 6E 00 00 00 00 be 70 6D 6D 01 70 0 ; ; 1 0 00DD10 0/1/2 1D10 replace (B) by (N) 6E 00 00 00 00 be 70 6D 6D 15 6E 0 ; ; 5 be 00DD5E 0/1/2 1D5E replace (B) by (N) 70 6D 70 6D 70 0 ; 0 ; 0 00D0D0 0/1/2 10D0 replace (B) by (N) 6D 6D 01 70 6E ; ; 1 0 be 0DD10E 13/1/2 110E divide uniform radix 70 6D 70 6D 70 0 ; 0 ; 0 00D0D0 0/1/2 10D0 replace (B) by (N) 6D 6D 16 6E 00 ; ; 6 be 0DD6E0 13/1/2 16E0 divide uniform radix 6D 70 6D 70 6D ; 0 ; 0 ; 0D0D0D 13/0/0 D0D divide uniform radix 6D 01 70 6E 00 ; 1 0 be 0D10E0 13/0/0 10E0 divide uniform radix 6D 70 6D 70 6D ; 0 ; 0 ; 0D0D0D 13/0/0 D0D divide uniform radix 6D 07 6E 00 00 ; 7 be 0D7E00 13/0/3 1E00 divide uniform radix 70 6D 70 6D 6D 0 ; 0 ; ; 00D0DD 0/1/2 10DD replace (B) by (N) 01 70 6E 00 00 1 0 be 010E00 1/0/0 E00 table look up 70 6D 70 6D 6D 0 ; 0 ; ; 00D0DD 0/1/2 10DD replace (B) by (N) 08 6E 00 00 00 8 be 08E000 8/1/3 0 merge variable length 6D 70 6D 6D 01 ; 0 ; ; 1 0D0DD1 13/0/0 DD1 divide uniform radix 70 6E 00 00 00 0 be 00E000 0/1/3 0 Invalid 6D 70 6D 6D 19 ; 0 ; ; 9 0D0DD9 13/0/0 DD9 divide uniform radix 6E 00 00 00 00 be 70 6D 6D 01 70 0 ; ; 1 0 00DD10 0/1/2 1D10 replace (B) by (N) 6E 00 00 00 00 be 70 6D 6D 70 6E 0 ; ; 0 be 00DD0E 0/1/2 1D0E replace (B) by (N) 70 6D 70 6D 70 0 ; 0 ; 0 00D0D0 0/1/2 10D0 replace (B) by (N) 6D 6D 01 01 6E ; ; 1 1 be 0DD11E 13/1/2 111E divide uniform radix 70 6D 70 6D 70 0 ; 0 ; 0 00D0D0 0/1/2 10D0 replace (B) by (N) 6D 6D 70 6E 00 ; ; 0 be 0DD0E0 13/1/2 10E0 divide uniform radix 6D 70 6D 70 6D ; 0 ; 0 ; 0D0D0D 13/0/0 D0D divide uniform radix 6D 01 70 70 01 ; 1 0 0 1 0D1001 13/0/0 1001 divide uniform radix 6E 00 00 00 00 be 70 6D 6D 15 07 0 ; ; 5 7 00DD57 0/1/2 1D57 replace (B) by (N) 01 6E 00 00 00 1 be 01E000 1/1/3 0 select literal address 6D 70 6D 6D 15 ; 0 ; ; 5 0D0DD5 13/0/0 DD5 divide uniform radix 07 16 6E 00 00 7 6 be 076E00 7/0/3 E00 augment (N) by (A) 70 6D 70 6D 6D 0 ; 0 ; ; 00D0DD 0/1/2 10DD replace (B) by (N) 15 08 13 6E 00 5 8 3 be 0583E0 5/1/0 3E0 subtract (N) from (A) 6D 70 6D 70 6D ; 0 ; 0 ; 0D0D0D 13/0/0 D0D divide uniform radix 6D 15 19 02 6E ; 5 9 2 be 0D592E 13/0/2 192E divide uniform radix 70 6D 70 6D 70 0 ; 0 ; 0 00D0D0 0/1/2 10D0 replace (B) by (N) 6D 6D 16 70 13 ; ; 6 0 3 0DD603 13/1/2 1603 divide uniform radix 6E 00 00 00 00 be 70 6D 6D 16 70 0 ; ; 6 0 00DD60 0/1/2 1D60 replace (B) by (N) 08 6E 00 00 00 8 be 08E000 8/1/3 0 merge variable length 6D 70 6D 6D 16 ; 0 ; ; 6 0D0DD6 13/0/0 DD6 divide uniform radix 02 13 6E 00 00 2 3 be 023E00 2/0/1 1E00 transfer (A) to N 70 6D 70 6D 6D 0 ; 0 ; ; 00D0DD 0/1/2 10DD replace (B) by (N) 16 04 01 6E 00 6 4 1 be 0641E0 6/0/2 1E0 select (N) 6D 70 6D 70 6D ; 0 ; 0 ; 0D0D0D 13/0/0 D0D divide uniform radix 6D 16 16 01 6E ; 6 6 1 be 0D661E 13/0/3 61E divide uniform radix 70 6D 70 6D 70 0 ; 0 ; 0 00D0D0 0/1/2 10D0 replace (B) by (N) 6D 6D 16 08 13 ; ; 6 8 3 0DD683 13/1/2 1683 divide uniform radix 6E 00 00 00 00 be 70 6D 6D 70 6E 0 ; ; 0 be 00DD0E 0/1/2 1D0E replace (B) by (N) 70 6D 70 6D 70 0 ; 0 ; 0 00D0D0 0/1/2 10D0 replace (B) by (N) 6D 6D 70 6E 00 ; ; 0 be 0DD0E0 13/1/2 10E0 divide uniform radix 6D 70 6D 70 6D ; 0 ; 0 ; 0D0D0D 13/0/0 D0D divide uniform radix 6D 70 6E 00 00 ; 0 be 0D0E00 13/0/0 E00 divide uniform radix 70 6D 70 6D 6D 0 ; 0 ; ; 00D0DD 0/1/2 10DD replace (B) by (N) 70 6E 00 00 00 0 be 00E000 0/1/3 0 Invalid 6D 70 6D 6D 70 ; 0 ; ; 0 0D0DD0 13/0/0 DD0 divide uniform radix 6E 00 00 00 00 be 70 6D 6D 70 6E 0 ; ; 0 be 00DD0E 0/1/2 1D0E replace (B) by (N) 70 6D 70 6D 70 0 ; 0 ; 0 00D0D0 0/1/2 10D0 replace (B) by (N) 6D 6D 70 6E 00 ; ; 0 be 0DD0E0 13/1/2 10E0 divide uniform radix 6D 70 6D 70 6D ; 0 ; 0 ; 0D0D0D 13/0/0 D0D divide uniform radix 6D 70 6E 00 00 ; 0 be 0D0E00 13/0/0 E00 divide uniform radix 70 6D 70 6D 6D 0 ; 0 ; ; 00D0DD 0/1/2 10DD replace (B) by (N) 70 6E 00 00 00 0 be 00E000 0/1/3 0 Invalid 6D 70 6D 6D 70 ; 0 ; ; 0 0D0DD0 13/0/0 DD0 divide uniform radix 6E 00 00 00 00 be 70 6D 6D 70 6E 0 ; ; 0 be 00DD0E 0/1/2 1D0E replace (B) by (N) 70 6D 70 6D 70 0 ; 0 ; 0 00D0D0 0/1/2 10D0 replace (B) by (N) 6D 6D 70 6E 00 ; ; 0 be 0DD0E0 13/1/2 10E0 divide uniform radix 6D 70 6D 70 6D ; 0 ; 0 ; 0D0D0D 13/0/0 D0D divide uniform radix 6D 70 6E 00 00 ; 0 be 0D0E00 13/0/0 E00 divide uniform radix 70 6D 70 6D 6D 0 ; 0 ; ; 00D0DD 0/1/2 10DD replace (B) by (N) 01 16 6E 00 00 1 6 be 016E00 1/0/3 E00 interchange area addresses 70 6D 70 6D 6D 0 ; 0 ; ; 00D0DD 0/1/2 10DD replace (B) by (N) 70 6E 00 00 00 0 be 00E000 0/1/3 0 Invalid 6D 70 6D 6D 13 ; 0 ; ; 3 0D0DD3 13/0/0 DD3 divide uniform radix 02 6E 00 00 00 2 be 02E000 2/1/3 0 transfer (A) to N 6D 70 6D 6D 70 ; 0 ; ; 0 0D0DD0 13/0/0 DD0 divide uniform radix 6E 00 00 00 00 be 70 6D 6D 08 6E 0 ; ; 8 be 00DD8E 0/1/2 1D8E replace (B) by (N) 70 6D 70 6D 70 0 ; 0 ; 0 00D0D0 0/1/2 10D0 replace (B) by (N) 6D 6D 70 6E 00 ; ; 0 be 0DD0E0 13/1/2 10E0 divide uniform radix 6D 70 6D 70 6D ; 0 ; 0 ; 0D0D0D 13/0/0 D0D divide uniform radix 6D 02 70 6E 00 ; 2 0 be 0D20E0 13/0/1 E0 divide uniform radix 6D 70 6D 70 6D ; 0 ; 0 ; 0D0D0D 13/0/0 D0D divide uniform radix 6D 70 6E 00 00 ; 0 be 0D0E00 13/0/0 E00 divide uniform radix 70 6D 70 6D 6D 0 ; 0 ; ; 00D0DD 0/1/2 10DD replace (B) by (N) 70 6E 00 00 00 0 be 00E000 0/1/3 0 Invalid 6D 02 6D 6D 04 ; 2 ; ; 4 0D2DD4 13/0/1 DD4 divide uniform radix 04 15 01 6E 00 4 5 1 be 0451E0 4/0/2 11E0 add (N) to (A) 6D 70 6D 01 6D ; 0 ; 1 ; 0D0D1D 13/0/0 D1D divide uniform radix 6D 15 07 13 15 ; 5 7 3 5 0D5735 13/0/2 1735 divide uniform radix 6E 00 00 00 00 be 13 6D 6D 01 01 3 ; ; 1 1 03DD11 3/1/2 1D11 copy (A) to N 70 16 6E 00 00 0 6 be 006E00 0/0/3 E00 set radix 70 6D 70 6D 6D 0 ; 0 ; ; 00D0DD 0/1/2 10DD replace (B) by (N) 01 16 02 13 6E 1 6 2 3 be 01623E 1/0/3 23E interchange area addresses 70 6D 70 6D 13 0 ; 0 ; 3 00D0D3 0/1/2 10D3 replace (B) by (N) 6D 6D 01 16 02 ; ; 1 6 2 0DD162 13/1/2 1162 divide uniform radix 02 6E 00 00 00 2 be 02E000 2/1/3 0 transfer (A) to N 6D 02 6D 6D 15 ; 2 ; ; 5 0D2DD5 13/0/1 DD5 divide uniform radix 07 07 16 6E 00 7 7 6 be 0776E0 7/0/3 16E0 augment (N) by (A) 6D 70 6D 02 6D ; 0 ; 2 ; 0D0D2D 13/0/0 D2D divide uniform radix 6D 07 02 08 02 ; 7 2 8 2 0D7282 13/0/3 1282 divide uniform radix 6E 00 00 00 00 be 70 6D 6D 01 13 0 ; ; 1 3 00DD13 0/1/2 1D13 replace (B) by (N) 04 19 6E 00 00 4 9 be 049E00 4/1/0 1E00 add (N) to (A) 70 6D 02 6D 6D 0 ; 2 ; ; 00D2DD 0/1/2 12DD replace (B) by (N) 04 19 16 02 6E 4 9 6 2 be 04962E 4/1/0 162E add (N) to (A) 15 6D 70 6D 01 5 ; 0 ; 1 05D0D1 5/1/2 10D1 subtract (N) from (A) 6D 6D 01 15 19 ; ; 1 5 9 0DD159 13/1/2 1159 divide uniform radix 70 6E 00 00 00 0 be 00E000 0/1/3 0 Invalid 6D 13 6D 6D 01 ; 3 ; ; 1 0D3DD1 13/0/1 1DD1 divide uniform radix 08 07 08 6E 00 8 7 8 be 0878E0 8/0/3 18E0 merge constant length 6D 70 6D 70 6D ; 0 ; 0 ; 0D0D0D 13/0/0 D0D divide uniform radix 6D 01 08 04 07 ; 1 8 4 7 0D1847 13/0/0 1847 divide uniform radix 6E 00 00 00 00 be 70 6D 6D 01 70 0 ; ; 1 0 00DD10 0/1/2 1D10 replace (B) by (N) 02 6E 00 00 00 2 be 02E000 2/1/3 0 transfer (A) to N 6D 02 6D 6D 15 ; 2 ; ; 5 0D2DD5 13/0/1 DD5 divide uniform radix 07 01 07 6E 00 7 1 7 be 0717E0 7/0/0 17E0 augment (N) by (A) 6D 70 6D 02 6D ; 0 ; 2 ; 0D0D2D 13/0/0 D2D divide uniform radix 6D 15 04 19 70 ; 5 4 9 0 0D5490 13/0/2 1490 divide uniform radix 6E 00 00 00 00 be 13 6D 6D 07 6E 3 ; ; 7 be 03DD7E 3/1/2 1D7E copy (A) to N 70 6D 70 6D 70 0 ; 0 ; 0 00D0D0 0/1/2 10D0 replace (B) by (N) 6D 6D 70 6E 00 ; ; 0 be 0DD0E0 13/1/2 10E0 divide uniform radix 6D 70 6D 01 6D ; 0 ; 1 ; 0D0D1D 13/0/0 D1D divide uniform radix 6D 15 13 04 04 ; 5 3 4 4 0D5344 13/0/2 1344 divide uniform radix 6E 00 00 00 00 be 13 6D 6D 01 13 3 ; ; 1 3 03DD13 3/1/2 1D13 copy (A) to N 16 15 6E 00 00 6 5 be 065E00 6/0/2 1E00 select (N) 70 6D 70 6D 6D 0 ; 0 ; ; 00D0DD 0/1/2 10DD replace (B) by (N) 16 6E 00 00 00 6 be 06E000 6/1/3 0 select (N) 6D 13 6D 6D 15 ; 3 ; ; 5 0D3DD5 13/0/1 1DD5 divide uniform radix 07 13 04 6E 00 7 3 4 be 0734E0 7/0/1 14E0 augment (N) by (A) 6D 70 6D 70 6D ; 0 ; 0 ; 0D0D0D 13/0/0 D0D divide uniform radix 6D 07 6E 00 00 ; 7 be 0D7E00 13/0/3 1E00 divide uniform radix 70 6D 02 6D 6D 0 ; 2 ; ; 00D2DD 0/1/2 12DD replace (B) by (N) 15 04 16 01 6E 5 4 6 1 be 05461E 5/0/2 61E subtract (N) from (A) 07 6D 70 6D 01 7 ; 0 ; 1 07D0D1 7/1/2 10D1 augment (N) by (A) 6D 6D 15 15 01 ; ; 5 5 1 0DD551 13/1/2 1551 divide uniform radix 70 6E 00 00 00 0 be 00E000 0/1/3 0 Invalid 6D 13 6D 6D 15 ; 3 ; ; 5 0D3DD5 13/0/1 1DD5 divide uniform radix 02 02 15 6E 00 2 2 5 be 0225E0 2/0/1 5E0 transfer (A) to N 6D 70 6D 70 6D ; 0 ; 0 ; 0D0D0D 13/0/0 D0D divide uniform radix 6D 01 13 08 02 ; 1 3 8 2 0D1382 13/0/0 1382 divide uniform radix 6E 00 00 00 00 be 13 6D 6D 15 04 3 ; ; 5 4 03DD54 3/1/2 1D54 copy (A) to N 16 01 6E 00 00 6 1 be 061E00 6/0/0 1E00 select (N) 70 6D 70 6D 6D 0 ; 0 ; ; 00D0DD 0/1/2 10DD replace (B) by (N) 01 13 08 01 6E 1 3 8 1 be 01381E 1/0/1 181E prepare for digit collation 02 6D 70 6D 02 2 ; 0 ; 2 02D0D2 2/1/2 10D2 transfer (A) to N 6D 6D 16 15 01 ; ; 6 5 1 0DD651 13/1/2 1651 divide uniform radix 19 6E 00 00 00 9 be 09E000 9/1/3 0 multiply uniform radix 6D 70 6D 6D 07 ; 0 ; ; 7 0D0DD7 13/0/0 DD7 divide uniform radix 6E 00 00 00 00 be 02 6D 6D 15 04 2 ; ; 5 4 02DD54 2/1/2 1D54 transfer (A) to N 07 07 6E 00 00 7 7 be 077E00 7/0/3 1E00 augment (N) by (A) 70 6D 01 6D 6D 0 ; 1 ; ; 00D1DD 0/1/2 11DD replace (B) by (N) 01 13 16 07 6E 1 3 6 7 be 01367E 1/0/1 167E prepare for digit collation 07 6D 70 6D 02 7 ; 0 ; 2 07D0D2 7/1/2 10D2 augment (N) by (A) 6D 6D 16 02 15 ; ; 6 2 5 0DD625 13/1/2 1625 divide uniform radix 19 6E 00 00 00 9 be 09E000 9/1/3 0 multiply uniform radix 6D 02 6D 6D 15 ; 2 ; ; 5 0D2DD5 13/0/1 DD5 divide uniform radix 15 02 15 6E 00 5 2 5 be 0525E0 5/0/1 5E0 subtract (N) from (A) 6D 70 6D 13 6D ; 0 ; 3 ; 0D0D3D 13/0/0 D3D divide uniform radix 6D 01 13 16 15 ; 1 3 6 5 0D1365 13/0/0 1365 divide uniform radix 6E 00 00 00 00 be 70 6D 6D 01 16 0 ; ; 1 6 00DD16 0/1/2 1D16 replace (B) by (N) 02 01 6E 00 00 2 1 be 021E00 2/0/0 1E00 transfer (A) to N 70 6D 02 6D 6D 0 ; 2 ; ; 00D2DD 0/1/2 12DD replace (B) by (N) 15 04 07 07 6E 5 4 7 7 be 05477E 5/0/2 77E subtract (N) from (A) 70 6D 70 6D 70 0 ; 0 ; 0 00D0D0 0/1/2 10D0 replace (B) by (N) 6D 6D 07 6E 00 ; ; 7 be 0DD7E0 13/1/2 17E0 divide uniform radix 6D 70 6D 02 6D ; 0 ; 2 ; 0D0D2D 13/0/0 D2D divide uniform radix 6D 13 15 08 04 ; 3 5 8 4 0D3584 13/0/1 1584 divide uniform radix 6E 00 00 00 00 be 02 6D 6D 01 13 2 ; ; 1 3 02DD13 2/1/2 1D13 transfer (A) to N 70 01 6E 00 00 0 1 be 001E00 0/0/0 1E00 Halt 70 6D 02 6D 6D 0 ; 2 ; ; 00D2DD 0/1/2 12DD replace (B) by (N) 15 13 07 16 6E 5 3 7 6 be 05376E 5/0/1 176E subtract (N) from (A) 07 6D 70 6D 01 7 ; 0 ; 1 07D0D1 7/1/2 10D1 augment (N) by (A) 6D 6D 15 13 19 ; ; 5 3 9 0DD539 13/1/2 1539 divide uniform radix 08 6E 00 00 00 8 be 08E000 8/1/3 0 merge variable length 6D 13 6D 6D 01 ; 3 ; ; 1 0D3DD1 13/0/1 1DD1 divide uniform radix 13 19 04 6E 00 3 9 4 be 0394E0 3/1/0 14E0 copy (A) to N 6D 70 6D 01 6D ; 0 ; 1 ; 0D0D1D 13/0/0 D1D divide uniform radix 6D 15 07 08 01 ; 5 7 8 1 0D5781 13/0/2 1781 divide uniform radix 6E 00 00 00 00 be 13 6D 6D 01 16 3 ; ; 1 6 03DD16 3/1/2 1D16 copy (A) to N 04 01 6E 00 00 4 1 be 041E00 4/0/0 1E00 add (N) to (A) 70 6D 01 6D 6D 0 ; 1 ; ; 00D1DD 0/1/2 11DD replace (B) by (N) 15 13 19 19 6E 5 3 9 9 be 05399E 5/0/1 199E subtract (N) from (A) 19 6D 70 6D 02 9 ; 0 ; 2 09D0D2 9/1/2 10D2 multiply uniform radix 6D 6D 15 04 08 ; ; 5 4 8 0DD548 13/1/2 1548 divide uniform radix 70 6E 00 00 00 0 be 00E000 0/1/3 0 Invalid 6D 70 6D 6D 01 ; 0 ; ; 1 0D0DD1 13/0/0 DD1 divide uniform radix 13 08 02 6E 00 3 8 2 be 0382E0 3/1/0 2E0 copy (A) to N 6D 70 6D 02 6D ; 0 ; 2 ; 0D0D2D 13/0/0 D2D divide uniform radix 6D 04 19 08 04 ; 4 9 8 4 0D4984 13/0/2 984 divide uniform radix 6E 00 00 00 00 be 02 6D 6D 01 13 2 ; ; 1 3 02DD13 2/1/2 1D13 transfer (A) to N 16 16 6E 00 00 6 6 be 066E00 6/0/3 E00 select (N) 70 6D 13 6D 6D 0 ; 3 ; ; 00D3DD 0/1/2 13DD replace (B) by (N) 04 07 02 13 6E 4 7 2 3 be 04723E 4/0/3 123E add (N) to (A) 70 6D 70 6D 70 0 ; 0 ; 0 00D0D0 0/1/2 10D0 replace (B) by (N) 6D 6D 01 08 04 ; ; 1 8 4 0DD184 13/1/2 1184 divide uniform radix 15 6E 00 00 00 5 be 05E000 5/1/3 0 subtract (N) from (A) 6D 70 6D 6D 70 ; 0 ; ; 0 0D0DD0 13/0/0 DD0 divide uniform radix 6E 00 00 00 00 be 13 6D 6D 70 6E 3 ; ; 0 be 03DD0E 3/1/2 1D0E copy (A) to N 15 6D 70 6D 13 5 ; 0 ; 3 05D0D3 5/1/2 10D3 subtract (N) from (A) 6D 6D 01 16 01 ; ; 1 6 1 0DD161 13/1/2 1161 divide uniform radix 15 6E 00 00 00 5 be 05E000 5/1/3 0 subtract (N) from (A) 6D 70 6D 6D 16 ; 0 ; ; 6 0D0DD6 13/0/0 DD6 divide uniform radix 6E 00 00 00 00 be 02 6D 6D 15 04 2 ; ; 5 4 02DD54 2/1/2 1D54 transfer (A) to N 15 07 6E 00 00 5 7 be 057E00 5/0/3 1E00 subtract (N) from (A) 01 6D 70 6D 6D 1 ; 0 ; ; 01D0DD 1/1/2 10DD subtract literal address 15 04 16 02 6E 5 4 6 2 be 05462E 5/0/2 62E subtract (N) from (A) 15 6D 70 6D 13 5 ; 0 ; 3 05D0D3 5/1/2 10D3 subtract (N) from (A) 6D 6D 01 16 01 ; ; 1 6 1 0DD161 13/1/2 1161 divide uniform radix 04 6E 00 00 00 4 be 04E000 4/1/3 0 add (N) to (A) 6D 01 6D 6D 04 ; 1 ; ; 4 0D1DD4 13/0/0 1DD4 divide uniform radix 01 70 02 6E 00 1 0 2 be 0102E0 1/0/0 2E0 table look up 6D 70 6D 70 6D ; 0 ; 0 ; 0D0D0D 13/0/0 D0D divide uniform radix 6D 70 6E 00 00 ; 0 be 0D0E00 13/0/0 E00 divide uniform radix 70 6D 70 6D 6D 0 ; 0 ; ; 00D0DD 0/1/2 10DD replace (B) by (N) 70 6E 00 00 00 0 be 00E000 0/1/3 0 Invalid 6D 01 6D 6D 04 ; 1 ; ; 4 0D1DD4 13/0/0 1DD4 divide uniform radix 01 04 04 6E 00 1 4 4 be 0144E0 1/0/2 4E0 round off 6D 70 6D 70 6D ; 0 ; 0 ; 0D0D0D 13/0/0 D0D divide uniform radix 6D 07 07 01 6E ; 7 7 1 be 0D771E 13/0/3 171E divide uniform radix 70 6D 70 6D 70 0 ; 0 ; 0 00D0D0 0/1/2 10D0 replace (B) by (N) 6D 6D 70 6E 00 ; ; 0 be 0DD0E0 13/1/2 10E0 divide uniform radix 04 6D 01 6D 70 4 ; 1 ; 0 04D1D0 4/1/2 11D0 add (N) to (A) 6D 6D 04 16 70 ; ; 4 6 0 0DD460 13/1/2 1460 divide uniform radix 6E 00 00 00 00 be 70 6D 6D 08 01 0 ; ; 8 1 00DD81 0/1/2 1D81 replace (B) by (N) 19 01 6E 00 00 9 1 be 091E00 9/0/0 1E00 multiply uniform radix 70 6D 70 6D 6D 0 ; 0 ; ; 00D0DD 0/1/2 10DD replace (B) by (N) 04 15 19 6E 00 4 5 9 be 0459E0 4/0/2 19E0 add (N) to (A) 6D 70 6D 70 6D ; 0 ; 0 ; 0D0D0D 13/0/0 D0D divide uniform radix 6D 70 6E 00 00 ; 0 be 0D0E00 13/0/0 E00 divide uniform radix 70 6D 13 6D 6D 0 ; 3 ; ; 00D3DD 0/1/2 13DD replace (B) by (N) 13 02 16 6E 00 3 2 6 be 0326E0 3/0/1 6E0 copy (A) to N 04 6D 01 6D 01 4 ; 1 ; 1 04D1D1 4/1/2 11D1 add (N) to (A) 6D 6D 04 15 08 ; ; 4 5 8 0DD458 13/1/2 1458 divide uniform radix 6E 00 00 00 00 be 13 6D 6D 01 70 3 ; ; 1 0 03DD10 3/1/2 1D10 copy (A) to N 02 04 6E 00 00 2 4 be 024E00 2/0/2 E00 transfer (A) to N 6D 70 6D 13 6D ; 0 ; 3 ; 0D0D3D 13/0/0 D3D divide uniform radix 6D 01 02 19 6E ; 1 2 9 be 0D129E 13/0/0 129E divide uniform radix 02 6D 70 6D 70 2 ; 0 ; 0 02D0D0 2/1/2 10D0 transfer (A) to N 6D 6D 16 04 6E ; ; 6 4 be 0DD64E 13/1/2 164E divide uniform radix 01 6D 01 6D 13 1 ; 1 ; 3 01D1D3 1/1/2 11D3 subtract literal address 6D 6D 04 70 19 ; ; 4 0 9 0DD409 13/1/2 1409 divide uniform radix 16 6E 00 00 00 6 be 06E000 6/1/3 0 select (N) 70 6D 13 6D 6D 0 ; 3 ; ; 00D3DD 0/1/2 13DD replace (B) by (N) 01 13 01 6E 00 1 3 1 be 0131E0 1/0/1 11E0 prepare for digit collation 6D 70 6D 70 6D ; 0 ; 0 ; 0D0D0D 13/0/0 D0D divide uniform radix 6D 16 04 6E 00 ; 6 4 be 0D64E0 13/0/3 4E0 divide uniform radix 6D 01 6D 70 6D ; 1 ; 0 ; 0D1D0D 13/0/0 1D0D divide uniform radix 6D 13 02 04 6E ; 3 2 4 be 0D324E 13/0/1 124E divide uniform radix 02 6D 01 6D 70 2 ; 1 ; 0 02D1D0 2/1/2 11D0 transfer (A) to N 6D 6D 04 01 13 ; ; 4 1 3 0DD413 13/1/2 1413 divide uniform radix 70 6E 00 00 00 0 be 00E000 0/1/3 0 Invalid 01 6D 02 6D 6D 1 ; 2 ; ; 01D2DD 1/1/2 12DD subtract literal address 70 6E 00 00 00 0 be 00E000 0/1/3 0 Invalid 6D 70 6D 6D 01 ; 0 ; ; 1 0D0DD1 13/0/0 DD1 divide uniform radix 70 02 04 6E 00 0 2 4 be 0024E0 0/0/1 4E0 Invalid 6D 01 6D 70 6D ; 1 ; 0 ; 0D1D0D 13/0/0 1D0D divide uniform radix 6D 13 02 08 6E ; 3 2 8 be 0D328E 13/0/1 128E divide uniform radix 02 15 6D 01 6D 2 5 ; 1 ; 025D1D 2/0/2 1D1D transfer (A) to N 02 6D 6D 02 70 2 ; ; 2 0 02DD20 2/1/2 1D20 transfer (A) to N 04 07 6E 00 00 4 7 be 047E00 4/0/3 1E00 add (N) to (A) 6D 70 6D 01 6D ; 0 ; 1 ; 0D0D1D 13/0/0 D1D divide uniform radix 6D 04 08 13 6E ; 4 8 3 be 0D483E 13/0/2 83E divide uniform radix 02 16 6D 01 6D 2 6 ; 1 ; 026D1D 2/0/3 D1D transfer (A) to N 01 6D 6D 13 13 1 ; ; 3 3 01DD33 1/1/2 1D33 subtract literal address 08 6E 00 00 00 8 be 08E000 8/1/3 0 merge variable length 01 6D 02 6D 6D 1 ; 2 ; ; 01D2DD 1/1/2 12DD subtract literal address 13 15 08 6E 00 3 5 8 be 0358E0 3/0/2 18E0 copy (A) to N 6D 01 6D 13 6D ; 1 ; 3 ; 0D1D3D 13/0/0 1D3D divide uniform radix 6D 70 6E 00 00 ; 0 be 0D0E00 13/0/0 E00 divide uniform radix 01 6D 70 6D 6D 1 ; 0 ; ; 01D0DD 1/1/2 10DD subtract literal address 01 70 02 04 6E 1 0 2 4 be 01024E 1/0/0 24E table look up 02 04 6D 01 6D 2 4 ; 1 ; 024D1D 2/0/2 D1D transfer (A) to N 70 6D 6D 15 16 0 ; ; 5 6 00DD56 0/1/2 1D56 replace (B) by (N) 16 6E 00 00 00 6 be 06E000 6/1/3 0 select (N) 01 6D 02 6D 6D 1 ; 2 ; ; 01D2DD 1/1/2 12DD subtract literal address 01 6E 00 00 00 1 be 01E000 1/1/3 0 select literal address 70 6D 70 6D 6D 0 ; 0 ; ; 00D0DD 0/1/2 10DD replace (B) by (N) 04 19 01 6E 00 4 9 1 be 0491E0 4/1/0 11E0 add (N) to (A) 16 6D 01 6D 01 6 ; 1 ; 1 06D1D1 6/1/2 11D1 select (N) 6D 6D 13 13 08 ; ; 3 3 8 0DD338 13/1/2 1338 divide uniform radix 6E 00 00 00 00 be 6D 02 6D 6D 13 ; 2 ; ; 3 0D2DD3 13/0/1 DD3 divide uniform radix 16 70 6E 00 00 6 0 be 060E00 6/0/0 E00 select (N) 01 6D 13 6D 6D 1 ; 3 ; ; 01D3DD 1/1/2 13DD subtract literal address 70 6E 00 00 00 0 be 00E000 0/1/3 0 Invalid 6D 70 6D 6D 01 ; 0 ; ; 1 0D0DD1 13/0/0 DD1 divide uniform radix 70 02 04 6E 00 0 2 4 be 0024E0 0/0/1 4E0 Invalid 15 6D 01 6D 01 5 ; 1 ; 1 05D1D1 5/1/2 11D1 subtract (N) from (A) 6D 6D 01 6E 00 ; ; 1 be 0DD1E0 13/1/2 11E0 divide uniform radix 04 6D 01 6D 70 4 ; 1 ; 0 04D1D0 4/1/2 11D0 add (N) to (A) 6D 6D 15 16 16 ; ; 5 6 6 0DD566 13/1/2 1566 divide uniform radix 6E 00 00 00 00 be 6D 02 6D 6D 02 ; 2 ; ; 2 0D2DD2 13/0/1 DD2 divide uniform radix 6E 00 00 00 00 be 6D 70 6D 6D 04 ; 0 ; ; 4 0D0DD4 13/0/0 DD4 divide uniform radix 19 19 6E 00 00 9 9 be 099E00 9/1/0 1E00 multiply uniform radix 6D 01 6D 01 6D ; 1 ; 1 ; 0D1D1D 13/0/0 1D1D divide uniform radix 6D 13 04 70 6E ; 3 4 0 be 0D340E 13/0/1 140E divide uniform radix 02 16 6D 01 6D 2 6 ; 1 ; 026D1D 2/0/3 D1D transfer (A) to N 02 6D 6D 13 16 2 ; ; 3 6 02DD36 2/1/2 1D36 transfer (A) to N 70 6E 00 00 00 0 be 00E000 0/1/3 0 Invalid 6D 13 6D 6D 01 ; 3 ; ; 1 0D3DD1 13/0/1 1DD1 divide uniform radix 6E 00 00 00 00 be 70 6D 6D 01 70 0 ; ; 1 0 00DD10 0/1/2 1D10 replace (B) by (N) 02 04 6E 00 00 2 4 be 024E00 2/0/2 E00 transfer (A) to N 6D 01 6D 01 6D ; 1 ; 1 ; 0D1D1D 13/0/0 1D1D divide uniform radix 6D 02 6E 00 00 ; 2 be 0D2E00 13/0/1 E00 divide uniform radix 6D 01 6D 70 6D ; 1 ; 0 ; 0D1D0D 13/0/0 1D0D divide uniform radix 6D 15 16 16 6E ; 5 6 6 be 0D566E 13/0/2 166E divide uniform radix 02 15 6D 01 6D 2 5 ; 1 ; 025D1D 2/0/2 1D1D transfer (A) to N 02 6D 6D 04 6E 2 ; ; 4 be 02DD4E 2/1/2 1D4E transfer (A) to N 02 07 6D 70 6D 2 7 ; 0 ; 027D0D 2/0/3 1D0D transfer (A) to N 70 6D 6D 15 70 0 ; ; 5 0 00DD50 0/1/2 1D50 replace (B) by (N) 07 6E 00 00 00 7 be 07E000 7/1/3 0 augment (N) by (A) 01 6D 01 6D 6D 1 ; 1 ; ; 01D1DD 1/1/2 11DD subtract literal address 13 04 02 6E 00 3 4 2 be 0342E0 3/0/2 2E0 copy (A) to N 16 6D 01 6D 02 6 ; 1 ; 2 06D1D2 6/1/2 11D2 select (N) 6D 6D 13 16 70 ; ; 3 6 0 0DD360 13/1/2 1360 divide uniform radix 6E 00 00 00 00 be 13 6D 6D 02 6E 3 ; ; 2 be 03DD2E 3/1/2 1D2E copy (A) to N 02 6D 01 6D 70 2 ; 1 ; 0 02D1D0 2/1/2 11D0 transfer (A) to N 6D 6D 01 70 02 ; ; 1 0 2 0DD102 13/1/2 1102 divide uniform radix 04 6E 00 00 00 4 be 04E000 4/1/3 0 add (N) to (A) 01 6D 01 6D 6D 1 ; 1 ; ; 01D1DD 1/1/2 11DD subtract literal address 04 6E 00 00 00 4 be 04E000 4/1/3 0 add (N) to (A) 01 6D 70 6D 6D 1 ; 0 ; ; 01D0DD 1/1/2 10DD subtract literal address 15 16 16 6E 00 5 6 6 be 0566E0 5/0/3 6E0 subtract (N) from (A) 15 6D 01 6D 02 5 ; 1 ; 2 05D1D2 5/1/2 11D2 subtract (N) from (A) 6D 6D 08 6E 00 ; ; 8 be 0DD8E0 13/1/2 18E0 divide uniform radix 07 6D 70 6D 70 7 ; 0 ; 0 07D0D0 7/1/2 10D0 augment (N) by (A) 6D 6D 15 01 15 ; ; 5 1 5 0DD515 13/1/2 1515 divide uniform radix 6E 00 00 00 00 be 6D 01 6D 6D 13 ; 1 ; ; 3 0D1DD3 13/0/0 1DD3 divide uniform radix 04 04 6E 00 00 4 4 be 044E00 4/0/2 E00 add (N) to (A) 6D 01 6D 02 6D ; 1 ; 2 ; 0D1D2D 13/0/0 1D2D divide uniform radix 6D 13 16 70 6E ; 3 6 0 be 0D360E 13/0/1 160E divide uniform radix 01 6D 01 6D 13 1 ; 1 ; 3 01D1D3 1/1/2 11D3 subtract literal address 6D 6D 13 6E 00 ; ; 3 be 0DD3E0 13/1/2 13E0 divide uniform radix 6D 01 6D 70 6D ; 1 ; 0 ; 0D1D0D 13/0/0 1D0D divide uniform radix 6D 01 70 02 04 ; 1 0 2 4 0D1024 13/0/0 1024 divide uniform radix 6E 00 00 00 00 be 6D 01 6D 6D 08 ; 1 ; ; 8 0D1DD8 13/0/0 1DD8 divide uniform radix 6E 00 00 00 00 be 6D 70 6D 6D 15 ; 0 ; ; 5 0D0DD5 13/0/0 DD5 divide uniform radix 16 16 6E 00 00 6 6 be 066E00 6/0/3 E00 select (N) 6D 01 6D 02 6D ; 1 ; 2 ; 0D1D2D 13/0/0 1D2D divide uniform radix 6D 01 16 6E 00 ; 1 6 be 0D16E0 13/0/0 16E0 divide uniform radix 07 6D 70 6D 70 7 ; 0 ; 0 07D0D0 7/1/2 10D0 augment (N) by (A) 6D 6D 15 02 13 ; ; 5 2 3 0DD523 13/1/2 1523 divide uniform radix 6E 00 00 00 00 be 6D 01 6D 6D 13 ; 1 ; ; 3 0D1DD3 13/0/0 1DD3 divide uniform radix 04 16 6E 00 00 4 6 be 046E00 4/0/3 E00 add (N) to (A) 6D 01 6D 02 6D ; 1 ; 2 ; 0D1D2D 13/0/0 1D2D divide uniform radix 6D 13 16 70 6E ; 3 6 0 be 0D360E 13/0/1 160E divide uniform radix 01 6D 01 6D 13 1 ; 1 ; 3 01D1D3 1/1/2 11D3 subtract literal address 6D 6D 04 6E 00 ; ; 4 be 0DD4E0 13/1/2 14E0 divide uniform radix 6D 01 6D 70 6D ; 1 ; 0 ; 0D1D0D 13/0/0 1D0D divide uniform radix 6D 01 70 02 04 ; 1 0 2 4 0D1024 13/0/0 1024 divide uniform radix 6E 00 00 00 00 be 6D 01 6D 6D 01 ; 1 ; ; 1 0D1DD1 13/0/0 1DD1 divide uniform radix 16 6E 00 00 00 6 be 06E000 6/1/3 0 select (N) 01 6D 70 6D 6D 1 ; 0 ; ; 01D0DD 1/1/2 10DD subtract literal address 15 16 16 6E 00 5 6 6 be 0566E0 5/0/3 6E0 subtract (N) from (A) 15 6D 01 6D 02 5 ; 1 ; 2 05D1D2 5/1/2 11D2 subtract (N) from (A) 6D 6D 13 02 6E ; ; 3 2 be 0DD32E 13/1/2 132E divide uniform radix 02 07 6D 70 6D 2 7 ; 0 ; 027D0D 2/0/3 1D0D transfer (A) to N 70 6D 6D 15 13 0 ; ; 5 3 00DD53 0/1/2 1D53 replace (B) by (N) 01 6E 00 00 00 1 be 01E000 1/1/3 0 select literal address 01 6D 01 6D 6D 1 ; 1 ; ; 01D1DD 1/1/2 11DD subtract literal address 13 04 08 6E 00 3 4 8 be 0348E0 3/0/2 8E0 copy (A) to N 16 6D 01 6D 02 6 ; 1 ; 2 06D1D2 6/1/2 11D2 select (N) 6D 6D 13 16 70 ; ; 3 6 0 0DD360 13/1/2 1360 divide uniform radix 6E 00 00 00 00 be 13 6D 6D 15 6E 3 ; ; 5 be 03DD5E 3/1/2 1D5E copy (A) to N 02 6D 01 6D 70 2 ; 1 ; 0 02D1D0 2/1/2 11D0 transfer (A) to N 6D 6D 01 70 02 ; ; 1 0 2 0DD102 13/1/2 1102 divide uniform radix 04 6E 00 00 00 4 be 04E000 4/1/3 0 add (N) to (A) 01 6D 01 6D 6D 1 ; 1 ; ; 01D1DD 1/1/2 11DD subtract literal address 13 02 6E 00 00 3 2 be 032E00 3/0/1 E00 copy (A) to N 6D 01 6D 70 6D ; 1 ; 0 ; 0D1D0D 13/0/0 1D0D divide uniform radix 6D 15 16 16 6E ; 5 6 6 be 0D566E 13/0/2 166E divide uniform radix 02 15 6D 01 6D 2 5 ; 1 ; 025D1D 2/0/2 1D1D transfer (A) to N 02 6D 6D 16 04 2 ; ; 6 4 02DD64 2/1/2 1D64 transfer (A) to N 6E 00 00 00 00 be 6D 70 6D 6D 15 ; 0 ; ; 5 0D0DD5 13/0/0 DD5 divide uniform radix 13 19 6E 00 00 3 9 be 039E00 3/1/0 1E00 copy (A) to N 6D 01 6D 01 6D ; 1 ; 1 ; 0D1D1D 13/0/0 1D1D divide uniform radix 6D 13 15 70 6E ; 3 5 0 be 0D350E 13/0/1 150E divide uniform radix 02 16 6D 01 6D 2 6 ; 1 ; 026D1D 2/0/3 D1D transfer (A) to N 02 6D 6D 13 16 2 ; ; 3 6 02DD36 2/1/2 1D36 transfer (A) to N 70 6E 00 00 00 0 be 00E000 0/1/3 0 Invalid 6D 13 6D 6D 16 ; 3 ; ; 6 0D3DD6 13/0/1 1DD6 divide uniform radix 6E 00 00 00 00 be 70 6D 6D 01 70 0 ; ; 1 0 00DD10 0/1/2 1D10 replace (B) by (N) 02 04 6E 00 00 2 4 be 024E00 2/0/2 E00 transfer (A) to N 6D 01 6D 01 6D ; 1 ; 1 ; 0D1D1D 13/0/0 1D1D divide uniform radix 6D 16 04 6E 00 ; 6 4 be 0D64E0 13/0/3 4E0 divide uniform radix 04 6D 01 6D 70 4 ; 1 ; 0 04D1D0 4/1/2 11D0 add (N) to (A) 6D 6D 15 16 16 ; ; 5 6 6 0DD566 13/1/2 1566 divide uniform radix 6E 00 00 00 00 be 6D 02 6D 6D 01 ; 2 ; ; 1 0D2DD1 13/0/1 DD1 divide uniform radix 02 08 6E 00 00 2 8 be 028E00 2/1/0 E00 transfer (A) to N 6D 70 6D 70 6D ; 0 ; 0 ; 0D0D0D 13/0/0 D0D divide uniform radix 6D 15 04 07 6E ; 5 4 7 be 0D547E 13/0/2 147E divide uniform radix 02 16 6D 01 6D 2 6 ; 1 ; 026D1D 2/0/3 D1D transfer (A) to N 01 6D 6D 13 15 1 ; ; 3 5 01DD35 1/1/2 1D35 subtract literal address 02 6E 00 00 00 2 be 02E000 2/1/3 0 transfer (A) to N 01 6D 02 6D 6D 1 ; 2 ; ; 01D2DD 1/1/2 12DD subtract literal address 13 16 70 6E 00 3 6 0 be 0360E0 3/0/3 E0 copy (A) to N 6D 01 6D 13 6D ; 1 ; 3 ; 0D1D3D 13/0/0 1D3D divide uniform radix 6D 07 6E 00 00 ; 7 be 0D7E00 13/0/3 1E00 divide uniform radix 01 6D 70 6D 6D 1 ; 0 ; ; 01D0DD 1/1/2 10DD subtract literal address 01 70 02 04 6E 1 0 2 4 be 01024E 1/0/0 24E table look up 02 15 6D 01 6D 2 5 ; 1 ; 025D1D 2/0/2 1D1D transfer (A) to N 01 6D 6D 01 02 1 ; ; 1 2 01DD12 1/1/2 1D12 subtract literal address 08 6E 00 00 00 8 be 08E000 8/1/3 0 merge variable length 01 6D 70 6D 6D 1 ; 0 ; ; 01D0DD 1/1/2 10DD subtract literal address 15 16 16 6E 00 5 6 6 be 0566E0 5/0/3 6E0 subtract (N) from (A) 15 6D 01 6D 02 5 ; 1 ; 2 05D1D2 5/1/2 11D2 subtract (N) from (A) 6D 6D 02 15 16 ; ; 2 5 6 0DD256 13/1/2 1256 divide uniform radix 6E 00 00 00 00 be 6D 70 6D 6D 15 ; 0 ; ; 5 0D0DD5 13/0/0 DD5 divide uniform radix 15 15 6E 00 00 5 5 be 055E00 5/0/2 1E00 subtract (N) from (A) 6D 01 6D 01 6D ; 1 ; 1 ; 0D1D1D 13/0/0 1D1D divide uniform radix 6D 13 15 04 6E ; 3 5 4 be 0D354E 13/0/1 154E divide uniform radix 02 16 6D 01 6D 2 6 ; 1 ; 026D1D 2/0/3 D1D transfer (A) to N 02 6D 6D 13 16 2 ; ; 3 6 02DD36 2/1/2 1D36 transfer (A) to N 70 6E 00 00 00 0 be 00E000 0/1/3 0 Invalid 6D 13 6D 6D 08 ; 3 ; ; 8 0D3DD8 13/0/1 1DD8 divide uniform radix 6E 00 00 00 00 be 70 6D 6D 01 70 0 ; ; 1 0 00DD10 0/1/2 1D10 replace (B) by (N) 02 04 6E 00 00 2 4 be 024E00 2/0/2 E00 transfer (A) to N 6D 01 6D 01 6D ; 1 ; 1 ; 0D1D1D 13/0/0 1D1D divide uniform radix 6D 02 15 16 6E ; 2 5 6 be 0D256E 13/0/1 56E divide uniform radix 02 04 6D 01 6D 2 4 ; 1 ; 024D1D 2/0/2 D1D transfer (A) to N 70 6D 6D 15 16 0 ; ; 5 6 00DD56 0/1/2 1D56 replace (B) by (N) 16 6E 00 00 00 6 be 06E000 6/1/3 0 select (N) 01 6D 02 6D 6D 1 ; 2 ; ; 01D2DD 1/1/2 12DD subtract literal address 15 01 02 6E 00 5 1 2 be 0512E0 5/0/0 12E0 subtract (N) from (A) 07 6D 70 6D 70 7 ; 0 ; 0 07D0D0 7/1/2 10D0 augment (N) by (A) 6D 6D 15 16 13 ; ; 5 6 3 0DD563 13/1/2 1563 divide uniform radix 6E 00 00 00 00 be 6D 01 6D 6D 13 ; 1 ; ; 3 0D1DD3 13/0/0 1DD3 divide uniform radix 15 16 6E 00 00 5 6 be 056E00 5/0/3 E00 subtract (N) from (A) 6D 01 6D 02 6D ; 1 ; 2 ; 0D1D2D 13/0/0 1D2D divide uniform radix 6D 13 16 70 6E ; 3 6 0 be 0D360E 13/0/1 160E divide uniform radix 01 6D 01 6D 13 1 ; 1 ; 3 01D1D3 1/1/2 11D3 subtract literal address 6D 6D 19 6E 00 ; ; 9 be 0DD9E0 13/1/2 19E0 divide uniform radix 6D 01 6D 70 6D ; 1 ; 0 ; 0D1D0D 13/0/0 1D0D divide uniform radix 6D 01 70 02 04 ; 1 0 2 4 0D1024 13/0/0 1024 divide uniform radix 6E 00 00 00 00 be 6D 01 6D 6D 15 ; 1 ; ; 5 0D1DD5 13/0/0 1DD5 divide uniform radix 01 02 6E 00 00 1 2 be 012E00 1/0/1 E00 prepare for digit collation 6D 01 6D 70 6D ; 1 ; 0 ; 0D1D0D 13/0/0 1D0D divide uniform radix 6D 15 16 16 6E ; 5 6 6 be 0D566E 13/0/2 166E divide uniform radix 70 6D 70 6D 70 0 ; 0 ; 0 00D0D0 0/1/2 10D0 replace (B) by (N) 6D 6D 01 07 6E ; ; 1 7 be 0DD17E 13/1/2 117E divide uniform radix 02 04 6D 01 6D 2 4 ; 1 ; 024D1D 2/0/2 D1D transfer (A) to N 70 6D 6D 04 07 0 ; ; 4 7 00DD47 0/1/2 1D47 replace (B) by (N) 16 6E 00 00 00 6 be 06E000 6/1/3 0 select (N) 01 6D 02 6D 6D 1 ; 2 ; ; 01D2DD 1/1/2 12DD subtract literal address 13 15 08 6E 00 3 5 8 be 0358E0 3/0/2 18E0 copy (A) to N 15 6D 01 6D 02 5 ; 1 ; 2 05D1D2 5/1/2 11D2 subtract (N) from (A) 6D 6D 70 6E 00 ; ; 0 be 0DD0E0 13/1/2 10E0 divide uniform radix 6D 01 6D 70 6D ; 1 ; 0 ; 0D1D0D 13/0/0 1D0D divide uniform radix 6D 01 70 02 16 ; 1 0 2 6 0D1026 13/0/0 1026 divide uniform radix 6E 00 00 00 00 be 6D 13 6D 6D 13 ; 3 ; ; 3 0D3DD3 13/0/1 1DD3 divide uniform radix 13 70 6E 00 00 3 0 be 030E00 3/0/0 E00 copy (A) to N 6D 70 6D 13 6D ; 0 ; 3 ; 0D0D3D 13/0/0 D3D divide uniform radix 6D 02 6E 00 00 ; 2 be 0D2E00 13/0/1 E00 divide uniform radix 6D 70 6D 01 6D ; 0 ; 1 ; 0D0D1D 13/0/0 D1D divide uniform radix 6D 13 16 02 6E ; 3 6 2 be 0D362E 13/0/1 162E divide uniform radix 16 6D 01 6D 70 6 ; 1 ; 0 06D1D0 6/1/2 11D0 select (N) 6D 6D 13 70 70 ; ; 3 0 0 0DD300 13/1/2 1300 divide uniform radix 6E 00 00 00 00 be 13 6D 6D 01 70 3 ; ; 1 0 03DD10 3/1/2 1D10 copy (A) to N 02 08 6E 00 00 2 8 be 028E00 2/1/0 E00 transfer (A) to N 6D 70 6D 13 6D ; 0 ; 3 ; 0D0D3D 13/0/0 D3D divide uniform radix 6D 02 6E 00 00 ; 2 be 0D2E00 13/0/1 E00 divide uniform radix 6D 01 6D 70 6D ; 1 ; 0 ; 0D1D0D 13/0/0 1D0D divide uniform radix 6D 15 07 01 6E ; 5 7 1 be 0D571E 13/0/2 171E divide uniform radix 02 04 6D 01 6D 2 4 ; 1 ; 024D1D 2/0/2 D1D transfer (A) to N 70 6D 6D 16 08 0 ; ; 6 8 00DD68 0/1/2 1D68 replace (B) by (N) 19 6E 00 00 00 9 be 09E000 9/1/3 0 multiply uniform radix 6D 70 6D 6D 13 ; 0 ; ; 3 0D0DD3 13/0/0 DD3 divide uniform radix 70 02 6E 00 00 0 2 be 002E00 0/0/1 E00 Invalid 01 6D 13 6D 6D 1 ; 3 ; ; 01D3DD 1/1/2 13DD subtract literal address 01 70 02 08 6E 1 0 2 8 be 01028E 1/0/0 28E table look up 16 6D 01 6D 70 6 ; 1 ; 0 06D1D0 6/1/2 11D0 select (N) 6D 6D 13 70 04 ; ; 3 0 4 0DD304 13/1/2 1304 divide uniform radix 6E 00 00 00 00 be 13 6D 6D 01 70 3 ; ; 1 0 03DD10 3/1/2 1D10 copy (A) to N 13 70 6E 00 00 3 0 be 030E00 3/0/0 E00 copy (A) to N 6D 70 6D 13 6D ; 0 ; 3 ; 0D0D3D 13/0/0 D3D divide uniform radix 6D 04 6E 00 00 ; 4 be 0D4E00 13/0/2 E00 divide uniform radix 6D 01 6D 70 6D ; 1 ; 0 ; 0D1D0D 13/0/0 1D0D divide uniform radix 6D 15 07 16 6E ; 5 7 6 be 0D576E 13/0/2 176E divide uniform radix 02 04 6D 01 6D 2 4 ; 1 ; 024D1D 2/0/2 D1D transfer (A) to N 70 6D 6D 16 08 0 ; ; 6 8 00DD68 0/1/2 1D68 replace (B) by (N) 19 6E 00 00 00 9 be 09E000 9/1/3 0 multiply uniform radix 6D 70 6D 6D 13 ; 0 ; ; 3 0D0DD3 13/0/0 DD3 divide uniform radix 70 16 6E 00 00 0 6 be 006E00 0/0/3 E00 set radix 01 6D 13 6D 6D 1 ; 3 ; ; 01D3DD 1/1/2 13DD subtract literal address 01 70 02 08 6E 1 0 2 8 be 01028E 1/0/0 28E table look up 16 6D 01 6D 70 6 ; 1 ; 0 06D1D0 6/1/2 11D0 select (N) 6D 6D 13 70 08 ; ; 3 0 8 0DD308 13/1/2 1308 divide uniform radix 6E 00 00 00 00 be 13 6D 6D 01 70 3 ; ; 1 0 03DD10 3/1/2 1D10 copy (A) to N 13 70 6E 00 00 3 0 be 030E00 3/0/0 E00 copy (A) to N 01 6D 70 6D 6D 1 ; 0 ; ; 01D0DD 1/1/2 10DD subtract literal address 13 01 70 6E 00 3 1 0 be 0310E0 3/0/0 10E0 copy (A) to N 6D 01 6D 13 6D ; 1 ; 3 ; 0D1D3D 13/0/0 1D3D divide uniform radix 6D 01 70 13 02 ; 1 0 3 2 0D1032 13/0/0 1032 divide uniform radix 6E 00 00 00 00 be 6D 13 6D 6D 16 ; 3 ; ; 6 0D3DD6 13/0/1 1DD6 divide uniform radix 6E 00 00 00 00 be 6D 70 6D 6D 15 ; 0 ; ; 5 0D0DD5 13/0/0 DD5 divide uniform radix 08 13 6E 00 00 8 3 be 083E00 8/0/1 1E00 merge constant length 6D 01 6D 70 6D ; 1 ; 0 ; 0D1D0D 13/0/0 1D0D divide uniform radix 6D 16 08 19 6E ; 6 8 9 be 0D689E 13/0/3 89E divide uniform radix 16 6D 01 6D 70 6 ; 1 ; 0 06D1D0 6/1/2 11D0 select (N) 6D 6D 13 01 02 ; ; 3 1 2 0DD312 13/1/2 1312 divide uniform radix 6E 00 00 00 00 be 13 6D 6D 01 70 3 ; ; 1 0 03DD10 3/1/2 1D10 copy (A) to N 02 08 6E 00 00 2 8 be 028E00 2/1/0 E00 transfer (A) to N 01 6D 70 6D 6D 1 ; 0 ; ; 01D0DD 1/1/2 10DD subtract literal address 13 70 16 6E 00 3 0 6 be 0306E0 3/0/0 6E0 copy (A) to N 6D 01 6D 13 6D ; 1 ; 3 ; 0D1D3D 13/0/0 1D3D divide uniform radix 6D 01 70 13 70 ; 1 0 3 0 0D1030 13/0/0 1030 divide uniform radix 6E 00 00 00 00 be 70 6D 6D 13 01 0 ; ; 3 1 00DD31 0/1/2 1D31 replace (B) by (N) 04 6E 00 00 00 4 be 04E000 4/1/3 0 add (N) to (A) 6D 13 6D 6D 01 ; 3 ; ; 1 0D3DD1 13/0/1 1DD1 divide uniform radix 70 13 02 6E 00 0 3 2 be 0032E0 0/0/1 12E0 Invalid 6D 01 6D 70 6D ; 1 ; 0 ; 0D1D0D 13/0/0 1D0D divide uniform radix 6D 13 01 16 6E ; 3 1 6 be 0D316E 13/0/1 116E divide uniform radix 02 6D 01 6D 13 2 ; 1 ; 3 02D1D3 2/1/2 11D3 transfer (A) to N 6D 6D 01 70 13 ; ; 1 0 3 0DD103 13/1/2 1103 divide uniform radix 04 6E 00 00 00 4 be 04E000 4/1/3 0 add (N) to (A) 70 6D 13 6D 6D 0 ; 3 ; ; 00D3DD 0/1/2 13DD replace (B) by (N) 08 6E 00 00 00 8 be 08E000 8/1/3 0 merge variable length 01 6D 70 6D 6D 1 ; 0 ; ; 01D0DD 1/1/2 10DD subtract literal address 15 19 02 6E 00 5 9 2 be 0592E0 5/1/0 12E0 subtract (N) from (A) 04 6D 01 6D 70 4 ; 1 ; 0 04D1D0 4/1/2 11D0 add (N) to (A) 6D 6D 16 08 19 ; ; 6 8 9 0DD689 13/1/2 1689 divide uniform radix 6E 00 00 00 00 be 70 6D 6D 13 01 0 ; ; 3 1 00DD31 0/1/2 1D31 replace (B) by (N) 08 6E 00 00 00 8 be 08E000 8/1/3 0 merge variable length 6D 13 6D 6D 01 ; 3 ; ; 1 0D3DD1 13/0/1 1DD1 divide uniform radix 70 02 08 6E 00 0 2 8 be 0028E0 0/0/1 8E0 Invalid 15 6D 70 6D 13 5 ; 0 ; 3 05D0D3 5/1/2 10D3 subtract (N) from (A) 6D 6D 02 6E 00 ; ; 2 be 0DD2E0 13/1/2 12E0 divide uniform radix 04 6D 01 6D 70 4 ; 1 ; 0 04D1D0 4/1/2 11D0 add (N) to (A) 6D 6D 16 70 13 ; ; 6 0 3 0DD603 13/1/2 1603 divide uniform radix 6E 00 00 00 00 be 6D 70 6D 6D 16 ; 0 ; ; 6 0D0DD6 13/0/0 DD6 divide uniform radix 08 19 6E 00 00 8 9 be 089E00 8/1/0 1E00 merge variable length 01 6D 70 6D 6D 1 ; 0 ; ; 01D0DD 1/1/2 10DD subtract literal address 13 02 70 6E 00 3 2 0 be 0320E0 3/0/1 E0 copy (A) to N 6D 01 6D 13 6D ; 1 ; 3 ; 0D1D3D 13/0/0 1D3D divide uniform radix 6D 01 70 02 08 ; 1 0 2 8 0D1028 13/0/0 1028 divide uniform radix 6E 00 00 00 00 be 70 6D 6D 13 02 0 ; ; 3 2 00DD32 0/1/2 1D32 replace (B) by (N) 02 6E 00 00 00 2 be 02E000 2/1/3 0 transfer (A) to N 6D 13 6D 6D 01 ; 3 ; ; 1 0D3DD1 13/0/1 1DD1 divide uniform radix 70 13 70 6E 00 0 3 0 be 0030E0 0/0/1 10E0 Invalid 6D 01 6D 70 6D ; 1 ; 0 ; 0D1D0D 13/0/0 1D0D divide uniform radix 6D 13 01 04 6E ; 3 1 4 be 0D314E 13/0/1 114E divide uniform radix 02 6D 01 6D 13 2 ; 1 ; 3 02D1D3 2/1/2 11D3 transfer (A) to N 6D 6D 01 70 13 ; ; 1 0 3 0DD103 13/1/2 1103 divide uniform radix 02 6E 00 00 00 2 be 02E000 2/1/3 0 transfer (A) to N 6D 70 6D 6D 13 ; 0 ; ; 3 0D0DD3 13/0/0 DD3 divide uniform radix 70 16 6E 00 00 0 6 be 006E00 0/0/3 E00 set radix 01 6D 13 6D 6D 1 ; 3 ; ; 01D3DD 1/1/2 13DD subtract literal address 01 70 13 04 6E 1 0 3 4 be 01034E 1/0/0 34E table look up 16 6D 01 6D 70 6 ; 1 ; 0 06D1D0 6/1/2 11D0 select (N) 6D 6D 13 01 02 ; ; 3 1 2 0DD312 13/1/2 1312 divide uniform radix 6E 00 00 00 00 be 13 6D 6D 01 70 3 ; ; 1 0 03DD10 3/1/2 1D10 copy (A) to N 13 16 6E 00 00 3 6 be 036E00 3/0/3 E00 copy (A) to N 01 6D 70 6D 6D 1 ; 0 ; ; 01D0DD 1/1/2 10DD subtract literal address 13 01 08 6E 00 3 1 8 be 0318E0 3/0/0 18E0 copy (A) to N 6D 01 6D 13 6D ; 1 ; 3 ; 0D1D3D 13/0/0 1D3D divide uniform radix 6D 01 70 13 08 ; 1 0 3 8 0D1038 13/0/0 1038 divide uniform radix 6E 00 00 00 00 be 6D 13 6D 6D 01 ; 3 ; ; 1 0D3DD1 13/0/1 1DD1 divide uniform radix 02 6E 00 00 00 2 be 02E000 2/1/3 0 transfer (A) to N 01 6D 70 6D 6D 1 ; 0 ; ; 01D0DD 1/1/2 10DD subtract literal address 16 70 08 6E 00 6 0 8 be 0608E0 6/0/0 8E0 select (N) 04 6D 01 6D 70 4 ; 1 ; 0 04D1D0 4/1/2 11D0 add (N) to (A) 6D 6D 16 08 19 ; ; 6 8 9 0DD689 13/1/2 1689 divide uniform radix 6E 00 00 00 00 be 6D 13 6D 6D 13 ; 3 ; ; 3 0D3DD3 13/0/1 1DD3 divide uniform radix 13 16 6E 00 00 3 6 be 036E00 3/0/3 E00 copy (A) to N 01 6D 70 6D 6D 1 ; 0 ; ; 01D0DD 1/1/2 10DD subtract literal address 13 02 70 6E 00 3 2 0 be 0320E0 3/0/1 E0 copy (A) to N 6D 01 6D 13 6D ; 1 ; 3 ; 0D1D3D 13/0/0 1D3D divide uniform radix 6D 01 70 02 08 ; 1 0 2 8 0D1028 13/0/0 1028 divide uniform radix 6E 00 00 00 00 be 70 6D 6D 13 01 0 ; ; 3 1 00DD31 0/1/2 1D31 replace (B) by (N) 04 6E 00 00 00 4 be 04E000 4/1/3 0 add (N) to (A) 6D 13 6D 6D 01 ; 3 ; ; 1 0D3DD1 13/0/1 1DD1 divide uniform radix 70 13 70 6E 00 0 3 0 be 0030E0 0/0/1 10E0 Invalid 6D 01 6D 70 6D ; 1 ; 0 ; 0D1D0D 13/0/0 1D0D divide uniform radix 6D 13 01 02 6E ; 3 1 2 be 0D312E 13/0/1 112E divide uniform radix 02 6D 01 6D 13 2 ; 1 ; 3 02D1D3 2/1/2 11D3 transfer (A) to N 6D 6D 01 70 13 ; ; 1 0 3 0DD103 13/1/2 1103 divide uniform radix 02 6E 00 00 00 2 be 02E000 2/1/3 0 transfer (A) to N 6D 70 6D 6D 13 ; 0 ; ; 3 0D0DD3 13/0/0 DD3 divide uniform radix 02 70 6E 00 00 2 0 be 020E00 2/0/0 E00 transfer (A) to N 01 6D 13 6D 6D 1 ; 3 ; ; 01D3DD 1/1/2 13DD subtract literal address 01 70 13 04 6E 1 0 3 4 be 01034E 1/0/0 34E table look up 16 6D 01 6D 70 6 ; 1 ; 0 06D1D0 6/1/2 11D0 select (N) 6D 6D 13 02 02 ; ; 3 2 2 0DD322 13/1/2 1322 divide uniform radix 6E 00 00 00 00 be 13 6D 6D 01 70 3 ; ; 1 0 03DD10 3/1/2 1D10 copy (A) to N 13 16 6E 00 00 3 6 be 036E00 3/0/3 E00 copy (A) to N 01 6D 70 6D 6D 1 ; 0 ; ; 01D0DD 1/1/2 10DD subtract literal address 13 70 16 6E 00 3 0 6 be 0306E0 3/0/0 6E0 copy (A) to N 6D 01 6D 13 6D ; 1 ; 3 ; 0D1D3D 13/0/0 1D3D divide uniform radix 6D 01 70 13 08 ; 1 0 3 8 0D1038 13/0/0 1038 divide uniform radix 6E 00 00 00 00 be 70 6D 6D 13 01 0 ; ; 3 1 00DD31 0/1/2 1D31 replace (B) by (N) 08 6E 00 00 00 8 be 08E000 8/1/3 0 merge variable length 6D 13 6D 6D 01 ; 3 ; ; 1 0D3DD1 13/0/1 1DD1 divide uniform radix 70 04 70 6E 00 0 4 0 be 0040E0 0/0/2 E0 replace (B) by (N) 15 6D 70 6D 13 5 ; 0 ; 3 05D0D3 5/1/2 10D3 subtract (N) from (A) 6D 6D 01 04 6E ; ; 1 4 be 0DD14E 13/1/2 114E divide uniform radix 02 04 6D 01 6D 2 4 ; 1 ; 024D1D 2/0/2 D1D transfer (A) to N 70 6D 6D 16 02 0 ; ; 6 2 00DD62 0/1/2 1D62 replace (B) by (N) 04 6E 00 00 00 4 be 04E000 4/1/3 0 add (N) to (A) 01 6D 70 6D 6D 1 ; 0 ; ; 01D0DD 1/1/2 10DD subtract literal address 16 08 19 6E 00 6 8 9 be 0689E0 6/1/0 9E0 select (N) 16 6D 01 6D 13 6 ; 1 ; 3 06D1D3 6/1/2 11D3 select (N) 6D 6D 13 13 04 ; ; 3 3 4 0DD334 13/1/2 1334 divide uniform radix 6E 00 00 00 00 be 70 6D 6D 13 02 0 ; ; 3 2 00DD32 0/1/2 1D32 replace (B) by (N) 70 6E 00 00 00 0 be 00E000 0/1/3 0 Invalid 6D 13 6D 6D 01 ; 3 ; ; 1 0D3DD1 13/0/1 1DD1 divide uniform radix 70 02 08 6E 00 0 2 8 be 0028E0 0/0/1 8E0 Invalid 6D 01 6D 70 6D ; 1 ; 0 ; 0D1D0D 13/0/0 1D0D divide uniform radix 6D 13 70 16 6E ; 3 0 6 be 0D306E 13/0/1 106E divide uniform radix 02 6D 01 6D 13 2 ; 1 ; 3 02D1D3 2/1/2 11D3 transfer (A) to N 6D 6D 01 70 13 ; ; 1 0 3 0DD103 13/1/2 1103 divide uniform radix 70 6E 00 00 00 0 be 00E000 0/1/3 0 Invalid 6D 70 6D 6D 13 ; 0 ; ; 3 0D0DD3 13/0/0 DD3 divide uniform radix 02 70 6E 00 00 2 0 be 020E00 2/0/0 E00 transfer (A) to N 01 6D 13 6D 6D 1 ; 3 ; ; 01D3DD 1/1/2 13DD subtract literal address 01 70 13 02 6E 1 0 3 2 be 01032E 1/0/0 32E table look up 16 6D 01 6D 70 6 ; 1 ; 0 06D1D0 6/1/2 11D0 select (N) 6D 6D 13 02 02 ; ; 3 2 2 0DD322 13/1/2 1322 divide uniform radix 6E 00 00 00 00 be 13 6D 6D 01 70 3 ; ; 1 0 03DD10 3/1/2 1D10 copy (A) to N 13 04 6E 00 00 3 4 be 034E00 3/0/2 E00 copy (A) to N 01 6D 70 6D 6D 1 ; 0 ; ; 01D0DD 1/1/2 10DD subtract literal address 13 01 02 6E 00 3 1 2 be 0312E0 3/0/0 12E0 copy (A) to N 6D 01 6D 13 6D ; 1 ; 3 ; 0D1D3D 13/0/0 1D3D divide uniform radix 6D 01 70 13 16 ; 1 0 3 6 0D1036 13/0/0 1036 divide uniform radix 6E 00 00 00 00 be 70 6D 6D 13 02 0 ; ; 3 2 00DD32 0/1/2 1D32 replace (B) by (N) 70 6E 00 00 00 0 be 00E000 0/1/3 0 Invalid 6D 13 6D 6D 01 ; 3 ; ; 1 0D3DD1 13/0/1 1DD1 divide uniform radix 70 13 08 6E 00 0 3 8 be 0038E0 0/0/1 18E0 Invalid 6D 01 6D 70 6D ; 1 ; 0 ; 0D1D0D 13/0/0 1D0D divide uniform radix 6D 13 01 04 6E ; 3 1 4 be 0D314E 13/0/1 114E divide uniform radix 02 6D 01 6D 13 2 ; 1 ; 3 02D1D3 2/1/2 11D3 transfer (A) to N 6D 6D 01 70 04 ; ; 1 0 4 0DD104 13/1/2 1104 divide uniform radix 70 6E 00 00 00 0 be 00E000 0/1/3 0 Invalid 6D 70 6D 6D 13 ; 0 ; ; 3 0D0DD3 13/0/0 DD3 divide uniform radix 01 08 6E 00 00 1 8 be 018E00 1/1/0 E00 table look up 01 6D 13 6D 6D 1 ; 3 ; ; 01D3DD 1/1/2 13DD subtract literal address 01 70 04 02 6E 1 0 4 2 be 01042E 1/0/0 42E table look up 02 15 6D 70 6D 2 5 ; 0 ; 025D0D 2/0/2 1D0D transfer (A) to N 13 6D 6D 01 16 3 ; ; 1 6 03DD16 3/1/2 1D16 copy (A) to N 6E 00 00 00 00 be 6D 70 6D 6D 16 ; 0 ; ; 6 0D0DD6 13/0/0 DD6 divide uniform radix 04 02 6E 00 00 4 2 be 042E00 4/0/1 E00 add (N) to (A) 6D 01 6D 70 6D ; 1 ; 0 ; 0D1D0D 13/0/0 1D0D divide uniform radix 6D 16 08 19 6E ; 6 8 9 be 0D689E 13/0/3 89E divide uniform radix 02 16 6D 01 6D 2 6 ; 1 ; 026D1D 2/0/3 D1D transfer (A) to N 13 6D 6D 13 13 3 ; ; 3 3 03DD33 3/1/2 1D33 copy (A) to N 02 6E 00 00 00 2 be 02E000 2/1/3 0 transfer (A) to N 6D 70 6D 6D 13 ; 0 ; ; 3 0D0DD3 13/0/0 DD3 divide uniform radix 02 70 6E 00 00 2 0 be 020E00 2/0/0 E00 transfer (A) to N 01 6D 13 6D 6D 1 ; 3 ; ; 01D3DD 1/1/2 13DD subtract literal address 01 70 02 08 6E 1 0 2 8 be 01028E 1/0/0 28E table look up 16 6D 01 6D 70 6 ; 1 ; 0 06D1D0 6/1/2 11D0 select (N) 6D 6D 13 01 02 ; ; 3 1 2 0DD312 13/1/2 1312 divide uniform radix 6E 00 00 00 00 be 13 6D 6D 01 70 3 ; ; 1 0 03DD10 3/1/2 1D10 copy (A) to N 13 70 6E 00 00 3 0 be 030E00 3/0/0 E00 copy (A) to N 01 6D 70 6D 6D 1 ; 0 ; ; 01D0DD 1/1/2 10DD subtract literal address 13 02 70 6E 00 3 2 0 be 0320E0 3/0/1 E0 copy (A) to N 6D 01 6D 13 6D ; 1 ; 3 ; 0D1D3D 13/0/0 1D3D divide uniform radix 6D 01 70 13 02 ; 1 0 3 2 0D1032 13/0/0 1032 divide uniform radix 6E 00 00 00 00 be 70 6D 6D 13 70 0 ; ; 3 0 00DD30 0/1/2 1D30 replace (B) by (N) 16 6E 00 00 00 6 be 06E000 6/1/3 0 select (N) 6D 13 6D 6D 01 ; 3 ; ; 1 0D3DD1 13/0/1 1DD1 divide uniform radix 70 13 04 6E 00 0 3 4 be 0034E0 0/0/1 14E0 Invalid 6D 01 6D 70 6D ; 1 ; 0 ; 0D1D0D 13/0/0 1D0D divide uniform radix 6D 13 02 70 6E ; 3 2 0 be 0D320E 13/0/1 120E divide uniform radix 02 6D 01 6D 13 2 ; 1 ; 3 02D1D3 2/1/2 11D3 transfer (A) to N 6D 6D 01 70 13 ; ; 1 0 3 0DD103 13/1/2 1103 divide uniform radix 16 6E 00 00 00 6 be 06E000 6/1/3 0 select (N) 6D 70 6D 6D 13 ; 0 ; ; 3 0D0DD3 13/0/0 DD3 divide uniform radix 01 04 6E 00 00 1 4 be 014E00 1/0/2 E00 round off 01 6D 13 6D 6D 1 ; 3 ; ; 01D3DD 1/1/2 13DD subtract literal address 01 70 13 08 6E 1 0 3 8 be 01038E 1/0/0 38E table look up 16 6D 01 6D 70 6 ; 1 ; 0 06D1D0 6/1/2 11D0 select (N) 6D 6D 13 02 70 ; ; 3 2 0 0DD320 13/1/2 1320 divide uniform radix 6E 00 00 00 00 be 13 6D 6D 01 70 3 ; ; 1 0 03DD10 3/1/2 1D10 copy (A) to N 04 70 6E 00 00 4 0 be 040E00 4/0/0 E00 add (N) to (A) 01 6D 70 6D 6D 1 ; 0 ; ; 01D0DD 1/1/2 10DD subtract literal address 13 02 02 6E 00 3 2 2 be 0322E0 3/0/1 2E0 copy (A) to N 6D 01 6D 13 6D ; 1 ; 3 ; 0D1D3D 13/0/0 1D3D divide uniform radix 6D 01 70 04 02 ; 1 0 4 2 0D1042 13/0/0 1042 divide uniform radix 6E 00 00 00 00 be 70 6D 6D 13 01 0 ; ; 3 1 00DD31 0/1/2 1D31 replace (B) by (N) 08 6E 00 00 00 8 be 08E000 8/1/3 0 merge variable length 6D 13 6D 6D 01 ; 3 ; ; 1 0D3DD1 13/0/1 1DD1 divide uniform radix 70 04 04 6E 00 0 4 4 be 0044E0 0/0/2 4E0 replace (B) by (N) 15 6D 70 6D 13 5 ; 0 ; 3 05D0D3 5/1/2 10D3 subtract (N) from (A) 6D 6D 01 08 6E ; ; 1 8 be 0DD18E 13/1/2 118E divide uniform radix 02 04 6D 01 6D 2 4 ; 1 ; 024D1D 2/0/2 D1D transfer (A) to N 70 6D 6D 16 16 0 ; ; 6 6 00DD66 0/1/2 1D66 replace (B) by (N) 02 6E 00 00 00 2 be 02E000 2/1/3 0 transfer (A) to N 01 6D 70 6D 6D 1 ; 0 ; ; 01D0DD 1/1/2 10DD subtract literal address 16 08 19 6E 00 6 8 9 be 0689E0 6/1/0 9E0 select (N) 6D 01 6D 70 6D ; 1 ; 0 ; 0D1D0D 13/0/0 1D0D divide uniform radix 6D 13 02 70 6E ; 3 2 0 be 0D320E 13/0/1 120E divide uniform radix 02 6D 01 6D 13 2 ; 1 ; 3 02D1D3 2/1/2 11D3 transfer (A) to N 6D 6D 01 70 02 ; ; 1 0 2 0DD102 13/1/2 1102 divide uniform radix 08 6E 00 00 00 8 be 08E000 8/1/3 0 merge variable length 6D 70 6D 6D 13 ; 0 ; ; 3 0D0DD3 13/0/0 DD3 divide uniform radix 01 08 6E 00 00 1 8 be 018E00 1/1/0 E00 table look up 01 6D 13 6D 6D 1 ; 3 ; ; 01D3DD 1/1/2 13DD subtract literal address 01 70 13 70 6E 1 0 3 0 be 01030E 1/0/0 30E table look up 02 15 6D 70 6D 2 5 ; 0 ; 025D0D 2/0/2 1D0D transfer (A) to N 13 6D 6D 04 6E 3 ; ; 4 be 03DD4E 3/1/2 1D4E copy (A) to N 02 04 6D 01 6D 2 4 ; 1 ; 024D1D 2/0/2 D1D transfer (A) to N 70 6D 6D 16 08 0 ; ; 6 8 00DD68 0/1/2 1D68 replace (B) by (N) 13 6E 00 00 00 3 be 03E000 3/1/3 0 copy (A) to N 6D 13 6D 6D 01 ; 3 ; ; 1 0D3DD1 13/0/1 1DD1 divide uniform radix 6E 00 00 00 00 be 70 6D 6D 01 70 0 ; ; 1 0 00DD10 0/1/2 1D10 replace (B) by (N) 02 04 6E 00 00 2 4 be 024E00 2/0/2 E00 transfer (A) to N 01 6D 13 6D 6D 1 ; 3 ; ; 01D3DD 1/1/2 13DD subtract literal address 01 6E 00 00 00 1 be 01E000 1/1/3 0 select literal address 6D 70 6D 6D 01 ; 0 ; ; 1 0D0DD1 13/0/0 DD1 divide uniform radix 70 02 16 6E 00 0 2 6 be 0026E0 0/0/1 6E0 Invalid 15 6D 01 6D 02 5 ; 1 ; 2 05D1D2 5/1/2 11D2 subtract (N) from (A) 6D 6D 01 70 02 ; ; 1 0 2 0DD102 13/1/2 1102 divide uniform radix 04 6E 00 00 00 4 be 04E000 4/1/3 0 add (N) to (A) 70 6D 70 6D 6D 0 ; 0 ; ; 00D0DD 0/1/2 10DD replace (B) by (N) 16 19 19 6E 00 6 9 9 be 0699E0 6/1/0 19E0 select (N) 6D 70 6D 70 6D ; 0 ; 0 ; 0D0D0D 13/0/0 D0D divide uniform radix 6D 15 6E 00 00 ; 5 be 0D5E00 13/0/2 1E00 divide uniform radix 01 6D 02 6D 6D 1 ; 2 ; ; 01D2DD 1/1/2 12DD subtract literal address 01 6E 00 00 00 1 be 01E000 1/1/3 0 select literal address 6D 70 6D 6D 04 ; 0 ; ; 4 0D0DD4 13/0/0 DD4 divide uniform radix 6E 00 00 00 00 be 6D 01 6D 6D 01 ; 1 ; ; 1 0D1DD1 13/0/0 1DD1 divide uniform radix 70 02 04 6E 00 0 2 4 be 0024E0 0/0/1 4E0 Invalid 15 6D 70 6D 02 5 ; 0 ; 2 05D0D2 5/1/2 10D2 subtract (N) from (A) 6D 6D 01 6E 00 ; ; 1 be 0DD1E0 13/1/2 11E0 divide uniform radix 04 6D 01 6D 70 4 ; 1 ; 0 04D1D0 4/1/2 11D0 add (N) to (A) 6D 6D 07 70 07 ; ; 7 0 7 0DD707 13/1/2 1707 divide uniform radix 6E 00 00 00 00 be 6D 01 6D 6D 01 ; 1 ; ; 1 0D1DD1 13/0/0 1DD1 divide uniform radix 6E 00 00 00 00 be 6D 70 6D 6D 07 ; 0 ; ; 7 0D0DD7 13/0/0 DD7 divide uniform radix 70 04 6E 00 00 0 4 be 004E00 0/0/2 E00 replace (B) by (N) 6D 01 6D 70 6D ; 1 ; 0 ; 0D1D0D 13/0/0 1D0D divide uniform radix 6D 08 15 04 6E ; 8 5 4 be 0D854E 13/1/0 54E divide uniform radix 02 15 6D 01 6D 2 5 ; 1 ; 025D1D 2/0/2 1D1D transfer (A) to N 02 6D 6D 01 70 2 ; ; 1 0 02DD10 2/1/2 1D10 transfer (A) to N 02 13 6E 00 00 2 3 be 023E00 2/0/1 1E00 transfer (A) to N 6D 70 6D 70 6D ; 0 ; 0 ; 0D0D0D 13/0/0 D0D divide uniform radix 6D 15 16 15 6E ; 5 6 5 be 0D565E 13/0/2 165E divide uniform radix 02 04 6D 01 6D 2 4 ; 1 ; 024D1D 2/0/2 D1D transfer (A) to N 70 6D 6D 04 08 0 ; ; 4 8 00DD48 0/1/2 1D48 replace (B) by (N) 13 6E 00 00 00 3 be 03E000 3/1/3 0 copy (A) to N 6D 70 6D 6D 13 ; 0 ; ; 3 0D0DD3 13/0/0 DD3 divide uniform radix 08 02 6E 00 00 8 2 be 082E00 8/0/1 E00 merge constant length 6D 70 6D 01 6D ; 0 ; 1 ; 0D0D1D 13/0/0 D1D divide uniform radix 6D 07 01 70 6E ; 7 1 0 be 0D710E 13/0/3 110E divide uniform radix 02 04 6D 01 6D 2 4 ; 1 ; 024D1D 2/0/2 D1D transfer (A) to N 70 6D 6D 08 01 0 ; ; 8 1 00DD81 0/1/2 1D81 replace (B) by (N) 15 6E 00 00 00 5 be 05E000 5/1/3 0 subtract (N) from (A) 6D 70 6D 6D 13 ; 0 ; ; 3 0D0DD3 13/0/0 DD3 divide uniform radix 02 04 6E 00 00 2 4 be 024E00 2/0/2 E00 transfer (A) to N 01 6D 70 6D 6D 1 ; 0 ; ; 01D0DD 1/1/2 10DD subtract literal address 13 70 02 02 6E 3 0 2 2 be 03022E 3/0/0 22E copy (A) to N 02 16 6D 70 6D 2 6 ; 0 ; 026D0D 2/0/3 D0D transfer (A) to N 70 6D 6D 07 01 0 ; ; 7 1 00DD71 0/1/2 1D71 replace (B) by (N) 19 6E 00 00 00 9 be 09E000 9/1/3 0 multiply uniform radix 70 6D 13 6D 6D 0 ; 3 ; ; 00D3DD 0/1/2 13DD replace (B) by (N) 01 02 19 6E 00 1 2 9 be 0129E0 1/0/1 9E0 prepare for digit collation 19 6D 70 6D 70 9 ; 0 ; 0 09D0D0 9/1/2 10D0 multiply uniform radix 6D 6D 70 6E 00 ; ; 0 be 0DD0E0 13/1/2 10E0 divide uniform radix 16 6D 70 6D 70 6 ; 0 ; 0 06D0D0 6/1/2 10D0 select (N) 6D 6D 07 13 01 ; ; 7 3 1 0DD731 13/1/2 1731 divide uniform radix 6E 00 00 00 00 be 6D 02 6D 6D 02 ; 2 ; ; 2 0D2DD2 13/0/1 DD2 divide uniform radix 70 04 08 6E 00 0 4 8 be 0048E0 0/0/2 8E0 replace (B) by (N) 07 6D 70 6D 01 7 ; 0 ; 1 07D0D1 7/1/2 10D1 augment (N) by (A) 6D 6D 08 15 04 ; ; 8 5 4 0DD854 13/1/2 1854 divide uniform radix 6E 00 00 00 00 be 6D 70 6D 6D 16 ; 0 ; ; 6 0D0DD6 13/0/0 DD6 divide uniform radix 19 01 6E 00 00 9 1 be 091E00 9/0/0 1E00 multiply uniform radix 70 6D 70 6D 6D 0 ; 0 ; ; 00D0DD 0/1/2 10DD replace (B) by (N) 70 6E 00 00 00 0 be 00E000 0/1/3 0 Invalid 70 6D 13 6D 6D 0 ; 3 ; ; 00D3DD 0/1/2 13DD replace (B) by (N) 01 02 19 6E 00 1 2 9 be 0129E0 1/0/1 9E0 prepare for digit collation 16 6D 01 6D 70 6 ; 1 ; 0 06D1D0 6/1/2 11D0 select (N) 6D 6D 70 6E 00 ; ; 0 be 0DD0E0 13/1/2 10E0 divide uniform radix 6D 70 6D 70 6D ; 0 ; 0 ; 0D0D0D 13/0/0 D0D divide uniform radix 6D 01 6E 00 00 ; 1 be 0D1E00 13/0/0 1E00 divide uniform radix 6D 01 6D 70 6D ; 1 ; 0 ; 0D1D0D 13/0/0 1D0D divide uniform radix 6D 07 02 70 6E ; 7 2 0 be 0D720E 13/0/3 120E divide uniform radix 02 16 6D 70 6D 2 6 ; 0 ; 026D0D 2/0/3 D0D transfer (A) to N 01 6D 6D 07 01 1 ; ; 7 1 01DD71 1/1/2 1D71 subtract literal address 19 6E 00 00 00 9 be 09E000 9/1/3 0 multiply uniform radix 01 6D 70 6D 6D 1 ; 0 ; ; 01D0DD 1/1/2 10DD subtract literal address 07 02 07 6E 00 7 2 7 be 0727E0 7/0/1 7E0 augment (N) by (A) 16 6D 70 6D 01 6 ; 0 ; 1 06D0D1 6/1/2 10D1 select (N) 6D 6D 07 01 19 ; ; 7 1 9 0DD719 13/1/2 1719 divide uniform radix 6E 00 00 00 00 be 6D 13 6D 6D 01 ; 3 ; ; 1 0D3DD1 13/0/1 1DD1 divide uniform radix 02 19 6E 00 00 2 9 be 029E00 2/1/0 1E00 transfer (A) to N 6D 01 6D 01 6D ; 1 ; 1 ; 0D1D1D 13/0/0 1D1D divide uniform radix 6D 70 6E 00 00 ; 0 be 0D0E00 13/0/0 E00 divide uniform radix 70 6D 70 6D 6D 0 ; 0 ; ; 00D0DD 0/1/2 10DD replace (B) by (N) 02 6E 00 00 00 2 be 02E000 2/1/3 0 transfer (A) to N 01 6D 70 6D 6D 1 ; 0 ; ; 01D0DD 1/1/2 10DD subtract literal address 04 16 70 6E 00 4 6 0 be 0460E0 4/0/3 E0 add (N) to (A) 6D 70 6D 70 6D ; 0 ; 0 ; 0D0D0D 13/0/0 D0D divide uniform radix 6D 70 6E 00 00 ; 0 be 0D0E00 13/0/0 E00 divide uniform radix 6D 70 6D 13 6D ; 0 ; 3 ; 0D0D3D 13/0/0 D3D divide uniform radix 6D 01 02 19 6E ; 1 2 9 be 0D129E 13/0/0 129E divide uniform radix 02 16 6D 01 6D 2 6 ; 1 ; 026D1D 2/0/3 D1D transfer (A) to N 70 6D 6D 70 6E 0 ; ; 0 be 00DD0E 0/1/2 1D0E replace (B) by (N) 70 6D 70 6D 70 0 ; 0 ; 0 00D0D0 0/1/2 10D0 replace (B) by (N) 6D 6D 01 6E 00 ; ; 1 be 0DD1E0 13/1/2 11E0 divide uniform radix 04 6D 01 6D 70 4 ; 1 ; 0 04D1D0 4/1/2 11D0 add (N) to (A) 6D 6D 07 13 02 ; ; 7 3 2 0DD732 13/1/2 1732 divide uniform radix 6E 00 00 00 00 be 6D 70 6D 6D 07 ; 0 ; ; 7 0D0DD7 13/0/0 DD7 divide uniform radix 16 19 6E 00 00 6 9 be 069E00 6/1/0 1E00 select (N) 6D 01 6D 70 6D ; 1 ; 0 ; 0D1D0D 13/0/0 1D0D divide uniform radix 6D 07 13 19 6E ; 7 3 9 be 0D739E 13/0/3 139E divide uniform radix 02 16 6D 70 6D 2 6 ; 0 ; 026D0D 2/0/3 D0D transfer (A) to N 01 6D 6D 07 13 1 ; ; 7 3 01DD73 1/1/2 1D73 subtract literal address 01 6E 00 00 00 1 be 01E000 1/1/3 0 select literal address 70 6D 13 6D 6D 0 ; 3 ; ; 00D3DD 0/1/2 13DD replace (B) by (N) 01 02 19 6E 00 1 2 9 be 0129E0 1/0/1 9E0 prepare for digit collation 19 6D 01 6D 01 9 ; 1 ; 1 09D1D1 9/1/2 11D1 multiply uniform radix 6D 6D 70 6E 00 ; ; 0 be 0DD0E0 13/1/2 10E0 divide uniform radix 6D 70 6D 70 6D ; 0 ; 0 ; 0D0D0D 13/0/0 D0D divide uniform radix 6D 02 6E 00 00 ; 2 be 0D2E00 13/0/1 E00 divide uniform radix 6D 01 6D 70 6D ; 1 ; 0 ; 0D1D0D 13/0/0 1D0D divide uniform radix 6D 04 16 70 6E ; 4 6 0 be 0D460E 13/0/2 60E divide uniform radix 70 6D 70 6D 70 0 ; 0 ; 0 00D0D0 0/1/2 10D0 replace (B) by (N) 6D 6D 70 6E 00 ; ; 0 be 0DD0E0 13/1/2 10E0 divide uniform radix 04 6D 70 6D 13 4 ; 0 ; 3 04D0D3 4/1/2 10D3 add (N) to (A) 6D 6D 01 13 01 ; ; 1 3 1 0DD131 13/1/2 1131 divide uniform radix 6E 00 00 00 00 be 6D 70 6D 6D 70 ; 0 ; ; 0 0D0DD0 13/0/0 DD0 divide uniform radix 6E 00 00 00 00 be 70 6D 6D 13 6E 0 ; ; 3 be 00DD3E 0/1/2 1D3E replace (B) by (N) 02 04 6D 01 6D 2 4 ; 1 ; 024D1D 2/0/2 D1D transfer (A) to N 70 6D 6D 07 04 0 ; ; 7 4 00DD74 0/1/2 1D74 replace (B) by (N) 04 6E 00 00 00 4 be 04E000 4/1/3 0 add (N) to (A) 70 6D 01 6D 6D 0 ; 1 ; ; 00D1DD 0/1/2 11DD replace (B) by (N) 07 04 13 6E 00 7 4 3 be 0743E0 7/0/2 3E0 augment (N) by (A) 04 6D 01 6D 70 4 ; 1 ; 0 04D1D0 4/1/2 11D0 add (N) to (A) 6D 6D 07 15 01 ; ; 7 5 1 0DD751 13/1/2 1751 divide uniform radix 6E 00 00 00 00 be 6D 01 6D 6D 07 ; 1 ; ; 7 0D1DD7 13/0/0 1DD7 divide uniform radix 04 13 6E 00 00 4 3 be 043E00 4/0/1 1E00 add (N) to (A) 6D 70 6D 13 6D ; 0 ; 3 ; 0D0D3D 13/0/0 D3D divide uniform radix 6D 01 13 01 6E ; 1 3 1 be 0D131E 13/0/0 131E divide uniform radix 01 19 6D 01 6D 1 9 ; 1 ; 019D1D 1/1/0 1D1D table look up 13 6D 6D 70 6E 3 ; ; 0 be 03DD0E 3/1/2 1D0E copy (A) to N 70 6D 70 6D 70 0 ; 0 ; 0 00D0D0 0/1/2 10D0 replace (B) by (N) 6D 6D 04 6E 00 ; ; 4 be 0DD4E0 13/1/2 14E0 divide uniform radix 04 6D 01 6D 70 4 ; 1 ; 0 04D1D0 4/1/2 11D0 add (N) to (A) 6D 6D 07 04 04 ; ; 7 4 4 0DD744 13/1/2 1744 divide uniform radix 6E 00 00 00 00 be 70 6D 6D 70 6E 0 ; ; 0 be 00DD0E 0/1/2 1D0E replace (B) by (N) 02 04 6D 70 6D 2 4 ; 0 ; 024D0D 2/0/2 D0D transfer (A) to N 13 6D 6D 01 13 3 ; ; 1 3 03DD13 3/1/2 1D13 copy (A) to N 01 6E 00 00 00 1 be 01E000 1/1/3 0 select literal address 01 6D 70 6D 6D 1 ; 0 ; ; 01D0DD 1/1/2 10DD subtract literal address 70 6E 00 00 00 0 be 00E000 0/1/3 0 Invalid 6D 70 6D 6D 13 ; 0 ; ; 3 0D0DD3 13/0/0 DD3 divide uniform radix 6E 00 00 00 00 be 6D 70 6D 6D 07 ; 0 ; ; 7 0D0DD7 13/0/0 DD7 divide uniform radix 15 16 6E 00 00 5 6 be 056E00 5/0/3 E00 subtract (N) from (A) 6D 01 6D 70 6D ; 1 ; 0 ; 0D1D0D 13/0/0 1D0D divide uniform radix 6D 07 16 07 6E ; 7 6 7 be 0D767E 13/0/3 167E divide uniform radix 02 04 6D 01 6D 2 4 ; 1 ; 024D1D 2/0/2 D1D transfer (A) to N 70 6D 6D 07 16 0 ; ; 7 6 00DD76 0/1/2 1D76 replace (B) by (N) 13 6E 00 00 00 3 be 03E000 3/1/3 0 copy (A) to N 70 6D 01 6D 6D 0 ; 1 ; ; 00D1DD 0/1/2 11DD replace (B) by (N) 07 15 15 6E 00 7 5 5 be 0755E0 7/0/2 15E0 augment (N) by (A) 04 6D 70 6D 13 4 ; 0 ; 3 04D0D3 4/1/2 10D3 add (N) to (A) 6D 6D 01 13 01 ; ; 1 3 1 0DD131 13/1/2 1131 divide uniform radix 6E 00 00 00 00 be 6D 13 6D 6D 70 ; 3 ; ; 0 0D3DD0 13/0/1 1DD0 divide uniform radix 6E 00 00 00 00 be 70 6D 6D 04 6E 0 ; ; 4 be 00DD4E 0/1/2 1D4E replace (B) by (N) 02 04 6D 01 6D 2 4 ; 1 ; 024D1D 2/0/2 D1D transfer (A) to N 70 6D 6D 07 15 0 ; ; 7 5 00DD75 0/1/2 1D75 replace (B) by (N) 16 6E 00 00 00 6 be 06E000 6/1/3 0 select (N) 6D 70 6D 6D 15 ; 0 ; ; 5 0D0DD5 13/0/0 DD5 divide uniform radix 6E 00 00 00 00 be 6D 70 6D 6D 07 ; 0 ; ; 7 0D0DD7 13/0/0 DD7 divide uniform radix 04 04 6E 00 00 4 4 be 044E00 4/0/2 E00 add (N) to (A) 70 6D 70 6D 6D 0 ; 0 ; ; 00D0DD 0/1/2 10DD replace (B) by (N) 02 6E 00 00 00 2 be 02E000 2/1/3 0 transfer (A) to N 6D 70 6D 6D 13 ; 0 ; ; 3 0D0DD3 13/0/0 DD3 divide uniform radix 02 08 6E 00 00 2 8 be 028E00 2/1/0 E00 transfer (A) to N 01 6D 13 6D 6D 1 ; 3 ; ; 01D3DD 1/1/2 13DD subtract literal address 01 6E 00 00 00 1 be 01E000 1/1/3 0 select literal address 70 6D 13 6D 6D 0 ; 3 ; ; 00D3DD 0/1/2 13DD replace (B) by (N) 13 02 08 6E 00 3 2 8 be 0328E0 3/0/1 8E0 copy (A) to N 6D 70 6D 70 6D ; 0 ; 0 ; 0D0D0D 13/0/0 D0D divide uniform radix 6D 13 07 02 6E ; 3 7 2 be 0D372E 13/0/1 172E divide uniform radix 16 6D 70 6D 70 6 ; 0 ; 0 06D0D0 6/1/2 10D0 select (N) 6D 6D 01 70 02 ; ; 1 0 2 0DD102 13/1/2 1102 divide uniform radix 04 6E 00 00 00 4 be 04E000 4/1/3 0 add (N) to (A) 6D 70 6D 6D 04 ; 0 ; ; 4 0D0DD4 13/0/0 DD4 divide uniform radix 15 15 6E 00 00 5 5 be 055E00 5/0/2 1E00 subtract (N) from (A) 6D 70 6D 70 6D ; 0 ; 0 ; 0D0D0D 13/0/0 D0D divide uniform radix 6D 07 19 19 6E ; 7 9 9 be 0D799E 13/0/3 199E divide uniform radix 16 6D 01 6D 70 6 ; 1 ; 0 06D1D0 6/1/2 11D0 select (N) 6D 6D 04 15 04 ; ; 4 5 4 0DD454 13/1/2 1454 divide uniform radix 6E 00 00 00 00 be 70 6D 6D 04 01 0 ; ; 4 1 00DD41 0/1/2 1D41 replace (B) by (N) 70 02 6E 00 00 0 2 be 002E00 0/0/1 E00 Invalid 70 6D 70 6D 6D 0 ; 0 ; ; 00D0DD 0/1/2 10DD replace (B) by (N) 01 70 02 16 6E 1 0 2 6 be 01026E 1/0/0 26E table look up 02 6D 01 6D 70 2 ; 1 ; 0 02D1D0 2/1/2 11D0 transfer (A) to N 6D 6D 04 15 15 ; ; 4 5 5 0DD455 13/1/2 1455 divide uniform radix 6E 00 00 00 00 be 6D 70 6D 6D 07 ; 0 ; ; 7 0D0DD7 13/0/0 DD7 divide uniform radix 19 19 6E 00 00 9 9 be 099E00 9/1/0 1E00 multiply uniform radix 01 6D 70 6D 6D 1 ; 0 ; ; 01D0DD 1/1/2 10DD subtract literal address 04 15 04 6E 00 4 5 4 be 0454E0 4/0/2 14E0 add (N) to (A) 6D 01 6D 70 6D ; 1 ; 0 ; 0D1D0D 13/0/0 1D0D divide uniform radix 6D 04 01 01 70 ; 4 1 1 0 0D4110 13/0/2 110 divide uniform radix 6E 00 00 00 00 be 6D 70 6D 6D 08 ; 0 ; ; 8 0D0DD8 13/0/0 DD8 divide uniform radix 04 02 6E 00 00 4 2 be 042E00 4/0/1 E00 add (N) to (A) 6D 70 6D 01 6D ; 0 ; 1 ; 0D0D1D 13/0/0 D1D divide uniform radix 6D 07 13 01 6E ; 7 3 1 be 0D731E 13/0/3 131E divide uniform radix 70 6D 70 6D 70 0 ; 0 ; 0 00D0D0 0/1/2 10D0 replace (B) by (N) 6D 6D 70 6E 00 ; ; 0 be 0DD0E0 13/1/2 10E0 divide uniform radix 6D 01 6D 13 6D ; 1 ; 3 ; 0D1D3D 13/0/0 1D3D divide uniform radix 6D 01 6E 00 00 ; 1 be 0D1E00 13/0/0 1E00 divide uniform radix 70 6D 70 6D 6D 0 ; 0 ; ; 00D0DD 0/1/2 10DD replace (B) by (N) 13 08 13 6E 00 3 8 3 be 0383E0 3/1/0 3E0 copy (A) to N 6D 01 6D 13 6D ; 1 ; 3 ; 0D1D3D 13/0/0 1D3D divide uniform radix 6D 19 16 6E 00 ; 9 6 be 0D96E0 13/1/0 16E0 divide uniform radix 6D 70 6D 70 6D ; 0 ; 0 ; 0D0D0D 13/0/0 D0D divide uniform radix 6D 13 08 13 6E ; 3 8 3 be 0D383E 13/0/1 183E divide uniform radix 02 07 6D 70 6D 2 7 ; 0 ; 027D0D 2/0/3 1D0D transfer (A) to N 70 6D 6D 07 19 0 ; ; 7 9 00DD79 0/1/2 1D79 replace (B) by (N) 04 6E 00 00 00 4 be 04E000 4/1/3 0 add (N) to (A) 70 6D 13 6D 6D 0 ; 3 ; ; 00D3DD 0/1/2 13DD replace (B) by (N) 07 19 04 6E 00 7 9 4 be 0794E0 7/1/0 14E0 augment (N) by (A) 16 6D 70 6D 01 6 ; 0 ; 1 06D0D1 6/1/2 10D1 select (N) 6D 6D 07 08 16 ; ; 7 8 6 0DD786 13/1/2 1786 divide uniform radix 6E 00 00 00 00 be 13 6D 6D 02 70 3 ; ; 2 0 03DD20 3/1/2 1D20 copy (A) to N 04 08 6E 00 00 4 8 be 048E00 4/1/0 E00 add (N) to (A) 70 6D 70 6D 6D 0 ; 0 ; ; 00D0DD 0/1/2 10DD replace (B) by (N) 04 70 19 16 6E 4 0 9 6 be 04096E 4/0/0 96E add (N) to (A) 02 15 6D 01 6D 2 5 ; 1 ; 025D1D 2/0/2 1D1D transfer (A) to N 02 6D 6D 70 6E 2 ; ; 0 be 02DD0E 2/1/2 1D0E transfer (A) to N 02 6D 70 6D 70 2 ; 0 ; 0 02D0D0 2/1/2 10D0 transfer (A) to N 6D 6D 13 08 13 ; ; 3 8 3 0DD383 13/1/2 1383 divide uniform radix 6E 00 00 00 00 be 6D 01 6D 6D 07 ; 1 ; ; 7 0D1DD7 13/0/0 1DD7 divide uniform radix 08 16 6E 00 00 8 6 be 086E00 8/0/3 E00 merge constant length 70 6D 70 6D 6D 0 ; 0 ; ; 00D0DD 0/1/2 10DD replace (B) by (N) 70 6E 00 00 00 0 be 00E000 0/1/3 0 Invalid 6D 01 6D 6D 07 ; 1 ; ; 7 0D1DD7 13/0/0 1DD7 divide uniform radix 16 08 6E 00 00 6 8 be 068E00 6/1/0 E00 select (N) 6D 01 6D 02 6D ; 1 ; 2 ; 0D1D2D 13/0/0 1D2D divide uniform radix 6D 70 6E 00 00 ; 0 be 0D0E00 13/0/0 E00 divide uniform radix 6D 01 6D 70 6D ; 1 ; 0 ; 0D1D0D 13/0/0 1D0D divide uniform radix 6D 04 15 04 6E ; 4 5 4 be 0D454E 13/0/2 54E divide uniform radix 02 07 6D 70 6D 2 7 ; 0 ; 027D0D 2/0/3 1D0D transfer (A) to N 01 6D 6D 08 70 1 ; ; 8 0 01DD80 1/1/2 1D80 subtract literal address 16 6E 00 00 00 6 be 06E000 6/1/3 0 select (N) 01 6D 70 6D 6D 1 ; 0 ; ; 01D0DD 1/1/2 10DD subtract literal address 04 01 02 16 6E 4 1 2 6 be 04126E 4/0/0 126E add (N) to (A) 02 04 6D 01 6D 2 4 ; 1 ; 024D1D 2/0/2 D1D transfer (A) to N 70 6D 6D 08 70 0 ; ; 8 0 00DD80 0/1/2 1D80 replace (B) by (N) 02 6E 00 00 00 2 be 02E000 2/1/3 0 transfer (A) to N 01 6D 02 6D 6D 1 ; 2 ; ; 01D2DD 1/1/2 12DD subtract literal address 70 6E 00 00 00 0 be 00E000 0/1/3 0 Invalid 01 6D 70 6D 6D 1 ; 0 ; ; 01D0DD 1/1/2 10DD subtract literal address 04 01 02 16 6E 4 1 2 6 be 04126E 4/0/0 126E add (N) to (A) 01 15 6D 01 6D 1 5 ; 1 ; 015D1D 1/0/2 1D1D round off 70 6D 6D 04 15 0 ; ; 4 5 00DD45 0/1/2 1D45 replace (B) by (N) 04 6E 00 00 00 4 be 04E000 4/1/3 0 add (N) to (A) 70 6D 01 6D 6D 0 ; 1 ; ; 00D1DD 0/1/2 11DD replace (B) by (N) 08 70 16 6E 00 8 0 6 be 0806E0 8/0/0 6E0 merge constant length 6D 01 6D 70 6D ; 1 ; 0 ; 0D1D0D 13/0/0 1D0D divide uniform radix 6D 04 15 16 6E ; 4 5 6 be 0D456E 13/0/2 56E divide uniform radix 01 04 6D 01 6D 1 4 ; 1 ; 014D1D 1/0/2 D1D round off 70 6D 6D 04 15 0 ; ; 4 5 00DD45 0/1/2 1D45 replace (B) by (N) 04 6E 00 00 00 4 be 04E000 4/1/3 0 add (N) to (A) 01 6D 02 6D 6D 1 ; 2 ; ; 01D2DD 1/1/2 12DD subtract literal address 70 6E 00 00 00 0 be 00E000 0/1/3 0 Invalid 01 6D 01 6D 6D 1 ; 1 ; ; 01D1DD 1/1/2 11DD subtract literal address 08 70 07 6E 00 8 0 7 be 0807E0 8/0/0 7E0 merge constant length 16 6D 70 6D 01 6 ; 0 ; 1 06D0D1 6/1/2 10D1 select (N) 6D 6D 07 19 19 ; ; 7 9 9 0DD799 13/1/2 1799 divide uniform radix 6E 00 00 00 00 be 6D 01 6D 6D 13 ; 1 ; ; 3 0D1DD3 13/0/0 1DD3 divide uniform radix 08 04 6E 00 00 8 4 be 084E00 8/0/2 E00 merge constant length 01 6D 01 6D 6D 1 ; 1 ; ; 01D1DD 1/1/2 11DD subtract literal address 04 13 02 6E 00 4 3 2 be 0432E0 4/0/1 12E0 add (N) to (A) 6D 01 6D 01 6D ; 1 ; 1 ; 0D1D1D 13/0/0 1D1D divide uniform radix 6D 04 01 70 70 ; 4 1 0 0 0D4100 13/0/2 100 divide uniform radix 6E 00 00 00 00 be 6D 01 6D 6D 02 ; 1 ; ; 2 0D1DD2 13/0/0 1DD2 divide uniform radix 6E 00 00 00 00 be 6D 70 6D 6D 08 ; 0 ; ; 8 0D0DD8 13/0/0 DD8 divide uniform radix 01 16 6E 00 00 1 6 be 016E00 1/0/3 E00 interchange area addresses 70 6D 70 6D 6D 0 ; 0 ; ; 00D0DD 0/1/2 10DD replace (B) by (N) 13 02 04 6E 00 3 2 4 be 0324E0 3/0/1 4E0 copy (A) to N 6D 01 6D 70 6D ; 1 ; 0 ; 0D1D0D 13/0/0 1D0D divide uniform radix 6D 04 01 01 16 ; 4 1 1 6 0D4116 13/0/2 116 divide uniform radix 6E 00 00 00 00 be 6D 02 6D 6D 70 ; 2 ; ; 0 0D2DD0 13/0/1 DD0 divide uniform radix 6E 00 00 00 00 be 70 6D 6D 04 70 0 ; ; 4 0 00DD40 0/1/2 1D40 replace (B) by (N) 19 16 6E 00 00 9 6 be 096E00 9/0/3 E00 multiply uniform radix 01 6D 70 6D 6D 1 ; 0 ; ; 01D0DD 1/1/2 10DD subtract literal address 04 70 19 08 6E 4 0 9 8 be 04098E 4/0/0 98E add (N) to (A) 02 16 6D 70 6D 2 6 ; 0 ; 026D0D 2/0/3 D0D transfer (A) to N 70 6D 6D 08 04 0 ; ; 8 4 00DD84 0/1/2 1D84 replace (B) by (N) 02 6E 00 00 00 2 be 02E000 2/1/3 0 transfer (A) to N 70 6D 70 6D 6D 0 ; 0 ; ; 00D0DD 0/1/2 10DD replace (B) by (N) 08 04 02 6E 00 8 4 2 be 0842E0 8/0/2 2E0 merge constant length 16 6D 70 6D 70 6 ; 0 ; 0 06D0D0 6/1/2 10D0 select (N) 6D 6D 08 04 02 ; ; 8 4 2 0DD842 13/1/2 1842 divide uniform radix 6E 00 00 00 00 be 70 6D 6D 04 70 0 ; ; 4 0 00DD40 0/1/2 1D40 replace (B) by (N) 02 6E 00 00 00 2 be 02E000 2/1/3 0 transfer (A) to N 6D 70 6D 6D 04 ; 0 ; ; 4 0D0DD4 13/0/0 DD4 divide uniform radix 01 70 70 6E 00 1 0 0 be 0100E0 1/0/0 E0 table look up 6D 01 6D 70 6D ; 1 ; 0 ; 0D1D0D 13/0/0 1D0D divide uniform radix 6D 04 04 08 6E ; 4 4 8 be 0D448E 13/0/2 48E divide uniform radix 02 6D 01 6D 70 2 ; 1 ; 0 02D1D0 2/1/2 11D0 transfer (A) to N 6D 6D 04 01 70 ; ; 4 1 0 0DD410 13/1/2 1410 divide uniform radix 02 6E 00 00 00 2 be 02E000 2/1/3 0 transfer (A) to N 6D 70 6D 6D 04 ; 0 ; ; 4 0D0DD4 13/0/0 DD4 divide uniform radix 15 70 6E 00 00 5 0 be 050E00 5/0/0 E00 subtract (N) from (A) 01 6D 70 6D 6D 1 ; 0 ; ; 01D0DD 1/1/2 10DD subtract literal address 04 01 70 08 6E 4 1 0 8 be 04108E 4/0/0 108E add (N) to (A) 16 6D 01 6D 70 6 ; 1 ; 0 06D1D0 6/1/2 11D0 select (N) 6D 6D 04 15 02 ; ; 4 5 2 0DD452 13/1/2 1452 divide uniform radix 6E 00 00 00 00 be 70 6D 6D 04 01 0 ; ; 4 1 00DD41 0/1/2 1D41 replace (B) by (N) 01 70 6E 00 00 1 0 be 010E00 1/0/0 E00 table look up 6D 70 6D 70 6D ; 0 ; 0 ; 0D0D0D 13/0/0 D0D divide uniform radix 6D 08 04 02 6E ; 8 4 2 be 0D842E 13/1/0 42E divide uniform radix 02 16 6D 70 6D 2 6 ; 0 ; 026D0D 2/0/3 D0D transfer (A) to N 70 6D 6D 08 04 0 ; ; 8 4 00DD84 0/1/2 1D84 replace (B) by (N) 02 6E 00 00 00 2 be 02E000 2/1/3 0 transfer (A) to N 70 6D 70 6D 6D 0 ; 0 ; ; 00D0DD 0/1/2 10DD replace (B) by (N) 08 04 02 6E 00 8 4 2 be 0842E0 8/0/2 2E0 merge constant length 6D 01 6D 13 6D ; 1 ; 3 ; 0D1D3D 13/0/0 1D3D divide uniform radix 6D 01 6E 00 00 ; 1 be 0D1E00 13/0/0 1E00 divide uniform radix 70 6D 70 6D 6D 0 ; 0 ; ; 00D0DD 0/1/2 10DD replace (B) by (N) 13 08 02 6E 00 3 8 2 be 0382E0 3/1/0 2E0 copy (A) to N 04 6D 01 6D 70 4 ; 1 ; 0 04D1D0 4/1/2 11D0 add (N) to (A) 6D 6D 04 07 13 ; ; 4 7 3 0DD473 13/1/2 1473 divide uniform radix 6E 00 00 00 00 be 70 6D 6D 70 6E 0 ; ; 0 be 00DD0E 0/1/2 1D0E replace (B) by (N) 02 16 6D 70 6D 2 6 ; 0 ; 026D0D 2/0/3 D0D transfer (A) to N 70 6D 6D 07 08 0 ; ; 7 8 00DD78 0/1/2 1D78 replace (B) by (N) 16 6E 00 00 00 6 be 06E000 6/1/3 0 select (N) 70 6D 70 6D 6D 0 ; 0 ; ; 00D0DD 0/1/2 10DD replace (B) by (N) 07 04 13 6E 00 7 4 3 be 0743E0 7/0/2 3E0 augment (N) by (A) 04 6D 70 6D 13 4 ; 0 ; 3 04D0D3 4/1/2 10D3 add (N) to (A) 6D 6D 01 13 01 ; ; 1 3 1 0DD131 13/1/2 1131 divide uniform radix 6E 00 00 00 00 be 6D 70 6D 6D 70 ; 0 ; ; 0 0D0DD0 13/0/0 DD0 divide uniform radix 6E 00 00 00 00 be 6D 70 6D 6D 07 ; 0 ; ; 7 0D0DD7 13/0/0 DD7 divide uniform radix 15 15 6E 00 00 5 5 be 055E00 5/0/2 1E00 subtract (N) from (A) 6D 01 6D 13 6D ; 1 ; 3 ; 0D1D3D 13/0/0 1D3D divide uniform radix 6D 13 08 16 6E ; 3 8 6 be 0D386E 13/0/1 186E divide uniform radix 02 15 6D 01 6D 2 5 ; 1 ; 025D1D 2/0/2 1D1D transfer (A) to N 02 6D 6D 70 6E 2 ; ; 0 be 02DD0E 2/1/2 1D0E transfer (A) to N 13 6D 01 6D 01 3 ; 1 ; 1 03D1D1 3/1/2 11D1 copy (A) to N 6D 6D 04 70 19 ; ; 4 0 9 0DD409 13/1/2 1409 divide uniform radix 16 6E 00 00 00 6 be 06E000 6/1/3 0 select (N) 70 6D 01 6D 6D 0 ; 1 ; ; 00D1DD 0/1/2 11DD replace (B) by (N) 02 6E 00 00 00 2 be 02E000 2/1/3 0 transfer (A) to N 01 6D 70 6D 6D 1 ; 0 ; ; 01D0DD 1/1/2 10DD subtract literal address 08 15 70 6E 00 8 5 0 be 0850E0 8/0/2 10E0 merge constant length 16 6D 70 6D 01 6 ; 0 ; 1 06D0D1 6/1/2 10D1 select (N) 6D 6D 08 04 02 ; ; 8 4 2 0DD842 13/1/2 1842 divide uniform radix 6E 00 00 00 00 be 6D 01 6D 6D 13 ; 1 ; ; 3 0D1DD3 13/0/0 1DD3 divide uniform radix 08 08 6E 00 00 8 8 be 088E00 8/1/0 E00 merge variable length 01 6D 01 6D 6D 1 ; 1 ; ; 01D1DD 1/1/2 11DD subtract literal address 13 19 04 6E 00 3 9 4 be 0394E0 3/1/0 14E0 copy (A) to N 6D 01 6D 01 6D ; 1 ; 1 ; 0D1D1D 13/0/0 1D1D divide uniform radix 6D 04 01 70 70 ; 4 1 0 0 0D4100 13/0/2 100 divide uniform radix 6E 00 00 00 00 be 6D 01 6D 6D 02 ; 1 ; ; 2 0D1DD2 13/0/0 1DD2 divide uniform radix 6E 00 00 00 00 be 6D 70 6D 6D 08 ; 0 ; ; 8 0D0DD8 13/0/0 DD8 divide uniform radix 15 15 6E 00 00 5 5 be 055E00 5/0/2 1E00 subtract (N) from (A) 6D 70 6D 70 6D ; 0 ; 0 ; 0D0D0D 13/0/0 D0D divide uniform radix 6D 08 04 02 6E ; 8 4 2 be 0D842E 13/1/0 42E divide uniform radix 02 16 6D 70 6D 2 6 ; 0 ; 026D0D 2/0/3 D0D transfer (A) to N 70 6D 6D 08 04 0 ; ; 8 4 00DD84 0/1/2 1D84 replace (B) by (N) 02 6E 00 00 00 2 be 02E000 2/1/3 0 transfer (A) to N 6D 70 6D 6D 04 ; 0 ; ; 4 0D0DD4 13/0/0 DD4 divide uniform radix 70 02 6E 00 00 0 2 be 002E00 0/0/1 E00 Invalid 01 6D 70 6D 6D 1 ; 0 ; ; 01D0DD 1/1/2 10DD subtract literal address 04 01 70 70 6E 4 1 0 0 be 04100E 4/0/0 100E add (N) to (A) 16 6D 01 6D 70 6 ; 1 ; 0 06D1D0 6/1/2 11D0 select (N) 6D 6D 04 70 04 ; ; 4 0 4 0DD404 13/1/2 1404 divide uniform radix 6E 00 00 00 00 be 70 6D 6D 04 01 0 ; ; 4 1 00DD41 0/1/2 1D41 replace (B) by (N) 70 02 6E 00 00 0 2 be 002E00 0/0/1 E00 Invalid 6D 70 6D 70 6D ; 0 ; 0 ; 0D0D0D 13/0/0 D0D divide uniform radix 6D 08 04 02 6E ; 8 4 2 be 0D842E 13/1/0 42E divide uniform radix 02 16 6D 01 6D 2 6 ; 1 ; 026D1D 2/0/3 D1D transfer (A) to N 01 6D 6D 13 13 1 ; ; 3 3 01DD33 1/1/2 1D33 subtract literal address 08 6E 00 00 00 8 be 08E000 8/1/3 0 merge variable length 01 6D 02 6D 6D 1 ; 2 ; ; 01D2DD 1/1/2 12DD subtract literal address 13 19 70 6E 00 3 9 0 be 0390E0 3/1/0 10E0 copy (A) to N 6D 01 6D 02 6D ; 1 ; 2 ; 0D1D2D 13/0/0 1D2D divide uniform radix 6D 04 01 02 6E ; 4 1 2 be 0D412E 13/0/2 12E divide uniform radix 02 6D 01 6D 70 2 ; 1 ; 0 02D1D0 2/1/2 11D0 transfer (A) to N 6D 6D 04 01 70 ; ; 4 1 0 0DD410 13/1/2 1410 divide uniform radix 08 6E 00 00 00 8 be 08E000 8/1/3 0 merge variable length 6D 01 6D 6D 13 ; 1 ; ; 3 0D1DD3 13/0/0 1DD3 divide uniform radix 07 02 6E 00 00 7 2 be 072E00 7/0/1 E00 augment (N) by (A) 01 6D 70 6D 6D 1 ; 0 ; ; 01D0DD 1/1/2 10DD subtract literal address 04 15 15 6E 00 4 5 5 be 0455E0 4/0/2 15E0 add (N) to (A) 16 6D 70 6D 70 6 ; 0 ; 0 06D0D0 6/1/2 10D0 select (N) 6D 6D 07 19 19 ; ; 7 9 9 0DD799 13/1/2 1799 divide uniform radix 6E 00 00 00 00 be 70 6D 6D 04 15 0 ; ; 4 5 00DD45 0/1/2 1D45 replace (B) by (N) 04 6E 00 00 00 4 be 04E000 4/1/3 0 add (N) to (A) 6D 70 6D 6D 04 ; 0 ; ; 4 0D0DD4 13/0/0 DD4 divide uniform radix 01 01 02 6E 00 1 1 2 be 0112E0 1/0/0 12E0 table look up 16 6D 70 6D 70 6 ; 0 ; 0 06D0D0 6/1/2 10D0 select (N) 6D 6D 08 04 02 ; ; 8 4 2 0DD842 13/1/2 1842 divide uniform radix 6E 00 00 00 00 be 6D 70 6D 6D 08 ; 0 ; ; 8 0D0DD8 13/0/0 DD8 divide uniform radix 04 02 6E 00 00 4 2 be 042E00 4/0/1 E00 add (N) to (A) 6D 70 6D 01 6D ; 0 ; 1 ; 0D0D1D 13/0/0 D1D divide uniform radix 6D 01 6E 00 00 ; 1 be 0D1E00 13/0/0 1E00 divide uniform radix 6D 01 6D 70 6D ; 1 ; 0 ; 0D1D0D 13/0/0 1D0D divide uniform radix 6D 08 07 19 6E ; 8 7 9 be 0D879E 13/1/0 79E divide uniform radix 02 15 6D 70 6D 2 5 ; 0 ; 025D0D 2/0/2 1D0D transfer (A) to N 02 6D 6D 02 6E 2 ; ; 2 be 02DD2E 2/1/2 1D2E transfer (A) to N 02 04 6D 01 6D 2 4 ; 1 ; 024D1D 2/0/2 D1D transfer (A) to N 70 6D 6D 08 16 0 ; ; 8 6 00DD86 0/1/2 1D86 replace (B) by (N) 08 6E 00 00 00 8 be 08E000 8/1/3 0 merge variable length 70 6D 70 6D 6D 0 ; 0 ; ; 00D0DD 0/1/2 10DD replace (B) by (N) 08 04 02 6E 00 8 4 2 be 0842E0 8/0/2 2E0 merge constant length 6D 01 6D 70 6D ; 1 ; 0 ; 0D1D0D 13/0/0 1D0D divide uniform radix 6D 04 70 16 6E ; 4 0 6 be 0D406E 13/0/2 6E divide uniform radix 02 6D 01 6D 70 2 ; 1 ; 0 02D1D0 2/1/2 11D0 transfer (A) to N 6D 6D 04 01 70 ; ; 4 1 0 0DD410 13/1/2 1410 divide uniform radix 70 6E 00 00 00 0 be 00E000 0/1/3 0 Invalid 6D 70 6D 6D 04 ; 0 ; ; 4 0D0DD4 13/0/0 DD4 divide uniform radix 70 08 6E 00 00 0 8 be 008E00 0/1/0 E00 copy registers 01 6D 70 6D 6D 1 ; 0 ; ; 01D0DD 1/1/2 10DD subtract literal address 04 01 70 02 6E 4 1 0 2 be 04102E 4/0/0 102E add (N) to (A) 16 6D 01 6D 70 6 ; 1 ; 0 06D1D0 6/1/2 11D0 select (N) 6D 6D 04 01 70 ; ; 4 1 0 0DD410 13/1/2 1410 divide uniform radix 6E 00 00 00 00 be 70 6D 6D 04 01 0 ; ; 4 1 00DD41 0/1/2 1D41 replace (B) by (N) 70 04 6E 00 00 0 4 be 004E00 0/0/2 E00 replace (B) by (N) 6D 70 6D 70 6D ; 0 ; 0 ; 0D0D0D 13/0/0 D0D divide uniform radix 6D 08 04 02 6E ; 8 4 2 be 0D842E 13/1/0 42E divide uniform radix 01 6D 01 6D 13 1 ; 1 ; 3 01D1D3 1/1/2 11D3 subtract literal address 6D 6D 02 70 04 ; ; 2 0 4 0DD204 13/1/2 1204 divide uniform radix 08 6E 00 00 00 8 be 08E000 8/1/3 0 merge variable length 6D 70 6D 6D 04 ; 0 ; ; 4 0D0DD4 13/0/0 DD4 divide uniform radix 70 19 16 6E 00 0 9 6 be 0096E0 0/1/0 16E0 copy registers 16 6D 70 6D 70 6 ; 0 ; 0 06D0D0 6/1/2 10D0 select (N) 6D 6D 08 04 02 ; ; 8 4 2 0DD842 13/1/2 1842 divide uniform radix 6E 00 00 00 00 be 6D 13 6D 6D 01 ; 3 ; ; 1 0D3DD1 13/0/1 1DD1 divide uniform radix 13 01 6E 00 00 3 1 be 031E00 3/0/0 1E00 copy (A) to N 6D 01 6D 13 6D ; 1 ; 3 ; 0D1D3D 13/0/0 1D3D divide uniform radix 6D 70 6E 00 00 ; 0 be 0D0E00 13/0/0 E00 divide uniform radix 6D 70 6D 13 6D ; 0 ; 3 ; 0D0D3D 13/0/0 D3D divide uniform radix 6D 01 02 19 6E ; 1 2 9 be 0D129E 13/0/0 129E divide uniform radix 01 19 6D 01 6D 1 9 ; 1 ; 019D1D 1/1/0 1D1D table look up 02 6D 6D 70 6E 2 ; ; 0 be 02DD0E 2/1/2 1D0E transfer (A) to N 02 04 6D 01 6D 2 4 ; 1 ; 024D1D 2/0/2 D1D transfer (A) to N 70 6D 6D 04 16 0 ; ; 4 6 00DD46 0/1/2 1D46 replace (B) by (N) 70 6E 00 00 00 0 be 00E000 0/1/3 0 Invalid 10 10 6D 10 10 ; 000D00 0/0/0 D00 Halt 10 10 10 6D 10 ; 0000D0 0/0/0 D0 Halt 10 10 10 10 6D ; 00000D 0/0/0 D Halt 10 10 10 10 10 000000 0/0/0 0 Halt 6D 10 10 10 10 ; 0D0000 13/0/0 0 divide uniform radix 10 6D 20 70 70 ; - 0 0 00D000 0/1/2 1000 replace (B) by (N) 19 08 6E 00 00 9 8 be 098E00 9/1/0 E00 multiply uniform radix File: old-paper-tapes/U13-4-4s.leo 58 10 32 10 10 Q B 080200 8/0/0 200 merge constant length 70 10 13 10 10 0 3 000300 0/0/0 300 Halt 38 08 10 04 13 H 8 4 3 188043 24/1/0 43 unconditional jump 10 08 10 10 10 8 008000 0/1/0 0 copy registers 38 1C 10 08 10 H + 8 18C080 24/1/2 80 modify address of next 01 16 1F 08 10 1 6 £ 8 016F80 1/0/3 F80 interchange area addresses 29 0E 08 10 10 I . 8 19E800 25/1/3 800 conditional Halt 38 1C 10 08 10 H + 8 18C080 24/1/2 80 modify address of next 23 02 10 10 10 C 2 132000 19/0/1 0 input one block/reset timer 38 1C 10 08 10 H + 8 18C080 24/1/2 80 modify address of next 2A 08 10 10 10 = 8 1A8000 26/1/0 0 test route N1 10 10 10 02 01 2 1 000021 0/0/0 21 Halt 38 19 1F 1C 0B H 9 £ + 11 189FCB 24/1/0 1FCB unconditional jump 10 10 10 02 13 2 3 000023 0/0/0 23 Halt 10 10 10 01 1C 1 + 00001C 0/0/0 1C Halt 38 0D 1F 0D 1F H : £ : £ 18DFDF 24/1/2 1FDF modify address of next 16 19 1F 0E 13 6 9 £ . 3 069FE3 6/1/0 1FE3 select (N) 38 0D 1F 0D 0E H : £ : . 18DFDE 24/1/2 1FDE modify address of next 02 10 10 10 10 2 020000 2/0/0 0 transfer (A) to N 16 19 1F 0D 1C 6 9 £ : + 069FDC 6/1/0 1FDC select (N) 07 19 1F 0D 0E 7 9 £ : . 079FDE 7/1/0 1FDE augment (N) by (A) 16 01 1F 0D 1F 6 1 £ : £ 061FDF 6/0/0 1FDF select (N) 15 01 1F 0D 10 5 1 £ : 051FD0 5/0/0 1FD0 subtract (N) from (A) 3B 13 1F 0D 01 * 3 £ : 1 1B3FD1 27/0/1 1FD1 jump A != Z 02 01 1F 0D 1F 2 1 £ : £ 021FDF 2/0/0 1FDF transfer (A) to N 38 19 1F 1C 08 H 9 £ + 8 189FC8 24/1/0 1FC8 unconditional jump 10 10 10 10 01 1 000001 0/0/0 1 Halt 10 10 10 10 02 2 000002 0/0/0 2 Halt 10 01 0E 0B 16 1 . 11 6 001EB6 0/0/0 1EB6 Halt 10 10 10 01 04 1 4 000014 0/0/0 14 Halt 70 10 75 10 7C 0 V , 00050C 0/0/0 50C Halt 70 10 67 10 02 0 X 2 000702 0/0/0 702 Halt 58 10 07 10 13 Q 7 3 080703 8/0/0 703 merge constant length 70 10 04 10 7A 0 4 ( 00040A 0/0/0 40A Halt 70 10 13 10 5E 0 3 hf 00030E 0/0/0 30E Halt 70 10 04 10 51 0 4 J 000401 0/0/0 401 Halt 40 10 32 10 04 & B 4 000204 0/0/0 204 Halt 70 10 16 10 61 0 6 / 000601 0/0/0 601 Halt 58 10 67 10 54 Q X M 080704 8/0/0 704 merge constant length 70 10 67 10 02 0 X 2 000702 0/0/0 702 Halt 70 10 67 10 58 0 X Q 000708 0/0/0 708 Halt 70 10 76 10 02 0 W 2 000602 0/0/0 602 Halt 70 10 75 10 73 0 V T 000503 0/0/0 503 Halt 70 10 62 10 13 0 S 3 000203 0/0/0 203 Halt 08 10 16 10 58 8 6 Q 080608 8/0/0 608 merge constant length 08 10 13 10 4A 8 3 # 08030A 8/0/0 30A merge constant length 08 10 13 10 43 8 3 L 080303 8/0/0 303 merge constant length 58 10 13 10 51 Q 3 J 080301 8/0/0 301 merge constant length 10 10 62 10 7C S , 00020C 0/0/0 20C Halt 10 10 02 10 7A 2 ( 00020A 0/0/0 20A Halt 70 10 62 10 6D 0 S ; 00020D 0/0/0 20D Halt 40 10 26 10 6D & F ; 00060D 0/0/0 60D Halt 40 10 46 10 75 & O V 000605 0/0/0 605 Halt 40 10 62 10 10 & S 000200 0/0/0 200 Halt 58 10 52 10 10 Q K 080200 8/0/0 200 merge constant length 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 40 10 10 & 000000 0/0/0 0 Halt 40 10 40 10 10 & & 000000 0/0/0 0 Halt 16 08 10 10 19 6 8 9 068009 6/1/0 9 select (N) 02 01 1F 1C 16 2 1 £ + 6 021FC6 2/0/0 1FC6 transfer (A) to N 10 01 1F 0E 10 1 £ . 001FE0 0/0/0 1FE0 Halt 38 19 1F 1C 16 H 9 £ + 6 189FC6 24/1/0 1FC6 unconditional jump 10 10 20 10 10 - 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 1F 10 29 £ I 000F09 0/0/0 F09 Halt 6E 00 00 00 00 be 10 01 0E 0B 16 1 . 11 6 001EB6 0/0/0 1EB6 Halt 10 01 0E 0B 16 1 . 11 6 001EB6 0/0/0 1EB6 Halt 10 01 1F 0D 10 1 £ : 001FD0 0/0/0 1FD0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 01 0E 0B 16 1 . 11 6 001EB6 0/0/0 1EB6 Halt 10 10 10 10 1F £ 00000F 0/0/0 F Halt 10 10 10 10 01 1 000001 0/0/0 1 Halt 10 10 10 10 01 1 000001 0/0/0 1 Halt 10 10 10 10 13 3 000003 0/0/0 3 Halt 01 04 0B 16 01 1 4 11 6 1 014B61 1/0/2 B61 round off 16 01 1F 19 04 6 1 £ 9 4 061F94 6/0/0 1F94 select (N) 02 10 10 08 01 2 8 1 020081 2/0/0 81 transfer (A) to N 29 08 10 01 10 I 8 1 198010 25/1/0 10 set indicators 16 01 1F 01 0E 6 1 £ 1 . 061F1E 6/0/0 1F1E select (N) 6E 00 00 00 00 be 10 01 0E 0B 1A 1 . 11 10 001EBA 0/0/0 1EBA Halt 02 01 1F 01 0D 2 1 £ 1 : 021F1D 2/0/0 1F1D transfer (A) to N 38 19 0E 0B 1C H 9 . 11 + 189EBC 24/1/0 1EBC unconditional jump 29 1C 10 01 10 I + 1 19C010 25/1/2 10 interrogate indicators 3B 01 0E 0D 13 * 1 . : 3 1B1ED3 27/0/0 1ED3 jump A = Z 16 08 10 08 10 6 8 8 068080 6/1/0 80 select (N) 02 19 1F 0B 16 2 9 £ 11 6 029FB6 2/1/0 1FB6 transfer (A) to N 2A 0B 1F 1A 08 = 11 £ 10 8 1ABFA8 26/1/1 1FA8 set modification register 37 1A 10 10 10 G 10 17A000 23/1/1 0 copy into tag 29 02 10 10 02 I 2 2 192002 25/0/1 2 step on and test 38 19 0E 1C 01 H 9 . + 1 189EC1 24/1/0 1EC1 unconditional jump 2A 0B 1F 19 16 = 11 £ 9 6 1ABF96 26/1/1 1F96 set modification register 02 1A 10 10 10 2 10 02A000 2/1/1 0 transfer (A) to N 29 02 10 10 02 I 2 2 192002 25/0/1 2 step on and test 38 19 0E 1C 15 H 9 . + 5 189EC5 24/1/0 1EC5 unconditional jump 6E 00 00 00 00 be 10 01 0E 1C 08 1 . + 8 001EC8 0/0/0 1EC8 Halt 2A 0B 1F 19 08 = 11 £ 9 8 1ABF98 26/1/1 1F98 set modification register 02 1A 10 10 10 2 10 02A000 2/1/1 0 transfer (A) to N 29 02 10 10 02 I 2 2 192002 25/0/1 2 step on and test 38 19 0E 1C 19 H 9 . + 9 189EC9 24/1/0 1EC9 unconditional jump 2A 0B 1F 19 1A = 11 £ 9 10 1ABF9A 26/1/1 1F9A set modification register 16 01 1F 19 15 6 1 £ 9 5 061F95 6/0/0 1F95 select (N) 37 1A 10 10 10 G 10 17A000 23/1/1 0 copy into tag 29 02 10 10 02 I 2 2 192002 25/0/1 2 step on and test 38 19 0E 1C 0E H 9 . + . 189ECE 24/1/0 1ECE unconditional jump 16 19 1F 0B 16 6 9 £ 11 6 069FB6 6/1/0 1FB6 select (N) 02 08 10 08 10 2 8 8 028080 2/1/0 80 transfer (A) to N 02 10 10 10 19 2 9 020009 2/0/0 9 transfer (A) to N 02 10 10 01 01 2 1 1 020011 2/0/0 11 transfer (A) to N 02 10 10 01 19 2 1 9 020019 2/0/0 19 transfer (A) to N 6E 00 00 00 00 be 10 01 0E 0D 16 1 . : 6 001ED6 0/0/0 1ED6 Halt 38 19 0E 0D 0E H 9 . : . 189EDE 24/1/0 1EDE unconditional jump 29 0B 1F 1F 1F I 11 £ £ £ 19BFFF 25/1/1 1FFF clear indicators 16 01 1F 0B 13 6 1 £ 11 3 061FB3 6/0/0 1FB3 select (N) 3B 01 0E 0B 08 * 1 . 11 8 1B1EB8 27/0/0 1EB8 jump A = Z 02 01 1F 0B 1A 2 1 £ 11 10 021FBA 2/0/0 1FBA transfer (A) to N 38 19 1C 04 16 H 9 + 4 6 189C46 24/1/0 1C46 unconditional jump 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 29 1C 10 10 01 I + 1 19C001 25/1/2 1 interrogate indicators 02 01 1F 0B 10 2 1 £ 11 021FB0 2/0/0 1FB0 transfer (A) to N 29 1C 10 10 02 I + 2 19C002 25/1/2 2 interrogate indicators 02 01 1F 0B 01 2 1 £ 11 1 021FB1 2/0/0 1FB1 transfer (A) to N 29 1C 10 10 04 I + 4 19C004 25/1/2 4 interrogate indicators 02 01 1F 0B 02 2 1 £ 11 2 021FB2 2/0/0 1FB2 transfer (A) to N 6E 00 00 00 00 be 10 01 0E 0E 04 1 . . 4 001EE4 0/0/0 1EE4 Halt 29 1C 10 10 08 I + 8 19C008 25/1/2 8 interrogate indicators 02 01 1F 0B 13 2 1 £ 11 3 021FB3 2/0/0 1FB3 transfer (A) to N 38 19 0E 0E 08 H 9 . . 8 189EE8 24/1/0 1EE8 unconditional jump 10 10 10 10 10 000000 0/0/0 0 Halt 38 0D 1F 0B 10 H : £ 11 18DFB0 24/1/2 1FB0 modify address of next 16 01 1F 15 15 6 1 £ 5 5 061F55 6/0/0 1F55 select (N) 02 01 1F 15 04 2 1 £ 5 4 021F54 2/0/0 1F54 transfer (A) to N 38 0D 1F 0B 10 H : £ 11 18DFB0 24/1/2 1FB0 modify address of next 16 01 1F 08 16 6 1 £ 8 6 061F86 6/0/0 1F86 select (N) 02 01 1F 08 15 2 1 £ 8 5 021F85 2/0/0 1F85 transfer (A) to N 16 01 1F 19 1C 6 1 £ 9 + 061F9C 6/0/0 1F9C select (N) 38 1C 10 08 10 H + 8 18C080 24/1/2 80 modify address of next 02 10 10 04 10 2 4 020040 2/0/0 40 transfer (A) to N 16 01 1F 19 0D 6 1 £ 9 : 061F9D 6/0/0 1F9D select (N) 6E 00 00 00 00 be 10 01 0E 1F 02 1 . £ 2 001EF2 0/0/0 1EF2 Halt 02 10 10 16 07 2 6 7 020067 2/0/0 67 transfer (A) to N 38 1C 10 08 10 H + 8 18C080 24/1/2 80 modify address of next 2A 08 10 10 10 = 8 1A8000 26/1/0 0 test route N1 38 19 1F 10 01 H 9 £ 1 189F01 24/1/0 1F01 unconditional jump 38 19 1F 10 13 H 9 £ 3 189F03 24/1/0 1F03 unconditional jump 38 19 0E 1F 19 H 9 . £ 9 189EF9 24/1/0 1EF9 unconditional jump 10 10 10 10 07 7 000007 0/0/0 7 Halt 02 01 1F 0B 1A 2 1 £ 11 10 021FBA 2/0/0 1FBA transfer (A) to N 38 1C 10 16 07 H + 6 7 18C067 24/1/2 67 modify address of next 02 08 10 01 0E 2 8 1 . 02801E 2/1/0 1E transfer (A) to N 38 1C 10 08 10 H + 8 18C080 24/1/2 80 modify address of next 01 16 19 1C 10 1 6 9 + 0169C0 1/0/3 9C0 interchange area addresses 38 1C 10 08 10 H + 8 18C080 24/1/2 80 modify address of next 23 02 10 10 10 C 2 132000 19/0/1 0 input one block/reset timer 6E 00 00 00 00 be 10 01 1F 10 10 1 £ 001F00 0/0/0 1F00 Halt 38 19 1F 10 15 H 9 £ 5 189F05 24/1/0 1F05 unconditional jump 10 10 10 10 13 3 000003 0/0/0 3 Halt 38 19 0E 1F 13 H 9 . £ 3 189EF3 24/1/0 1EF3 unconditional jump 01 1A 10 10 10 1 10 01A000 1/1/1 0 add literal address 38 19 0E 1F 13 H 9 . £ 3 189EF3 24/1/0 1EF3 unconditional jump 38 1C 10 08 10 H + 8 18C080 24/1/2 80 modify address of next 2A 08 10 10 10 = 8 1A8000 26/1/0 0 test route N1 10 10 10 10 19 9 000009 0/0/0 9 Halt 38 19 1F 10 15 H 9 £ 5 189F05 24/1/0 1F05 unconditional jump 38 19 1F 01 04 H 9 £ 1 4 189F14 24/1/0 1F14 unconditional jump 38 19 0E 1F 13 H 9 . £ 3 189EF3 24/1/0 1EF3 unconditional jump 02 01 1F 0B 1A 2 1 £ 11 10 021FBA 2/0/0 1FBA transfer (A) to N 38 1C 10 16 07 H + 6 7 18C067 24/1/2 67 modify address of next 02 08 10 01 0E 2 8 1 . 02801E 2/1/0 1E transfer (A) to N 6E 00 00 00 00 be 10 01 1F 10 0E 1 £ . 001F0E 0/0/0 1F0E Halt 38 1C 10 08 10 H + 8 18C080 24/1/2 80 modify address of next 01 16 19 1C 10 1 6 9 + 0169C0 1/0/3 9C0 interchange area addresses 29 0E 08 10 10 I . 8 19E800 25/1/3 800 conditional Halt 38 1C 10 08 10 H + 8 18C080 24/1/2 80 modify address of next 23 02 10 10 10 C 2 132000 19/0/1 0 input one block/reset timer 38 19 1F 01 16 H 9 £ 1 6 189F16 24/1/0 1F16 unconditional jump 10 10 10 10 0B 11 00000B 0/0/0 B Halt 38 19 0E 1F 04 H 9 . £ 4 189EF4 24/1/0 1EF4 unconditional jump 10 15 1F 1A 16 5 £ 10 6 005FA6 0/0/2 1FA6 replace (B) by (N) 1F 10 10 16 07 £ 6 7 0F0067 15/0/0 67 collate and add 13 01 1F 0B 08 3 1 £ 11 8 031FB8 3/0/0 1FB8 copy (A) to N 04 01 1F 1A 13 4 1 £ 10 3 041FA3 4/0/0 1FA3 add (N) to (A) 02 01 1F 0B 19 2 1 £ 11 9 021FB9 2/0/0 1FB9 transfer (A) to N 16 01 1F 1A 02 6 1 £ 10 2 061FA2 6/0/0 1FA2 select (N) 6E 00 00 00 00 be 01 1F 01 1C 02 1 £ 1 + 2 01F1C2 1/1/3 11C2 select literal address 01 1F 0B 04 10 1 £ 11 4 01FB40 1/1/3 1B40 select literal address 10 10 10 10 38 H 000008 0/0/0 8 Halt 19 1F 02 01 38 9 £ 2 1 H 09F218 9/1/3 1218 multiply uniform radix 19 1F 13 1A 38 9 £ 3 10 H 09F3A8 9/1/3 13A8 multiply uniform radix 19 1C 04 1A 16 9 + 4 10 6 09C4A6 9/1/2 4A6 multiply uniform radix 01 1F 1A 10 07 1 £ 10 7 01FA07 1/1/3 1A07 select literal address 01 1F 0B 08 38 1 £ 11 8 H 01FB88 1/1/3 1B88 select literal address 1C 10 16 07 16 + 6 7 6 0C0676 12/0/0 676 convert 08 10 10 13 15 8 3 5 080035 8/0/0 35 merge constant length 01 1F 1A 02 02 1 £ 10 2 2 01FA22 1/1/3 1A22 select literal address 01 1F 1A 1C 38 1 £ 10 + H 01FAC8 1/1/3 1AC8 select literal address 1C 10 16 07 16 + 6 7 6 0C0676 12/0/0 676 convert 08 10 10 15 02 8 5 2 080052 8/0/0 52 merge constant length 01 1F 1A 0D 6E 1 £ 10 : be 01FADE 1/1/3 1ADE select literal address 10 01 1F 02 1A 1 £ 2 10 001F2A 0/0/0 1F2A Halt 38 1C 10 16 07 H + 6 7 18C067 24/1/2 67 modify address of next 16 08 10 10 0B 6 8 11 06800B 6/1/0 B select (N) 02 01 1F 1A 0E 2 1 £ 10 . 021FAE 2/0/0 1FAE transfer (A) to N 38 1C 10 16 07 H + 6 7 18C067 24/1/2 67 modify address of next 16 08 10 10 0D 6 8 : 06800D 6/1/0 D select (N) 02 01 1F 1A 1F 2 1 £ 10 £ 021FAF 2/0/0 1FAF transfer (A) to N 10 15 1F 1A 1C 5 £ 10 + 005FAC 0/0/2 1FAC replace (B) by (N) 1F 01 1F 1A 02 £ 1 £ 10 2 0F1FA2 15/0/0 1FA2 collate and add 02 01 1F 0B 15 2 1 £ 11 5 021FB5 2/0/0 1FB5 transfer (A) to N 38 1C 10 16 07 H + 6 7 18C067 24/1/2 67 modify address of next 16 08 10 10 07 6 8 7 068007 6/1/0 7 select (N) 02 01 1F 0B 1C 2 1 £ 11 + 021FBC 2/0/0 1FBC transfer (A) to N 38 1C 10 16 07 H + 6 7 18C067 24/1/2 67 modify address of next 16 08 10 10 19 6 8 9 068009 6/1/0 9 select (N) 6E 00 00 00 00 be 08 04 01 1F 1A 8 4 1 £ 10 0841FA 8/0/2 1FA merge constant length 01 02 01 1F 0B 1 2 1 £ 11 0121FB 1/0/1 1FB prepare for digit collation 0D 16 19 1F 1A : 6 9 £ 10 0D69FA 13/0/3 9FA divide uniform radix 04 38 1C 10 16 4 H + 6 048C06 4/1/0 C06 add (N) to (A) 07 15 08 10 01 7 5 8 1 075801 7/0/2 1801 augment (N) by (A) 0E 3B 01 1F 04 . * 1 £ 4 0EB1F4 14/1/1 11F4 replace selected bits 10 10 10 10 10 000000 0/0/0 0 Halt 0D 38 19 0E 1F : H 9 . £ 0D89EF 13/1/0 9EF divide uniform radix 13 38 1C 10 16 3 H + 6 038C06 3/1/0 C06 copy (A) to N 07 16 08 10 10 7 6 8 076800 7/0/3 800 augment (N) by (A) 01 15 01 1F 1A 1 5 1 £ 10 0151FA 1/0/2 11FA round off 02 15 01 1F 1A 2 5 1 £ 10 0251FA 2/0/2 11FA transfer (A) to N 1C 3B 01 1F 04 + * 1 £ 4 0CB1F4 12/1/1 11F4 convert 07 10 10 10 10 7 070000 7/0/0 0 augment (N) by (A) 1F 6E 00 00 00 £ be 0FE000 15/1/3 0 collate and add 04 16 38 19 0E 4 6 H 9 . 04689E 4/0/3 89E add (N) to (A) 1F 13 38 0D 1F £ 3 H : £ 0F38DF 15/0/1 18DF collate and add 0B 08 16 08 10 11 8 6 8 0B8680 11/1/0 680 multiply and subtract 10 02 15 19 1F 2 5 9 £ 00259F 0/0/1 59F Invalid 19 0E 3B 13 1F 9 . * 3 £ 09EB3F 9/1/3 B3F multiply uniform radix 15 08 02 01 1F 5 8 2 1 £ 05821F 5/1/0 21F subtract (N) from (A) 0B 04 16 01 1F 11 4 6 1 £ 0B461F 11/0/2 61F multiply and subtract 0B 15 3B 01 1F 11 5 * 1 £ 0B5B1F 11/0/2 1B1F multiply and subtract 15 10 10 10 10 5 050000 5/0/0 0 subtract (N) from (A) 01 1F 38 19 0E 1 £ H 9 . 01F89E 1/1/3 189E select literal address 1F 13 16 01 1F £ 3 6 1 £ 0F361F 15/0/1 161F collate and add 01 1F 02 01 1F 1 £ 2 1 £ 01F21F 1/1/3 121F select literal address 01 0D 38 0D 1F 1 : H : £ 01D8DF 1/1/2 18DF subtract literal address 0B 08 16 08 10 11 8 6 8 0B8680 11/1/0 680 multiply and subtract 10 13 6E 00 00 3 be 003E00 0/0/1 1E00 Invalid 1F 15 04 10 10 £ 5 4 0F5400 15/0/2 1400 collate and add 10 10 10 38 19 H 9 000089 0/0/0 89 Halt 1F 15 0B 38 19 £ 5 11 H 9 0F5B89 15/0/2 1B89 collate and add 0D 10 10 38 19 : H 9 0D0089 13/0/0 89 divide uniform radix 0D 04 1A 16 01 : 4 10 6 1 0D4A61 13/0/2 A61 divide uniform radix 1F 1A 02 02 01 £ 10 2 2 1 0FA221 15/1/1 221 collate and add 1F 0B 04 38 19 £ 11 4 H 9 0FB489 15/1/1 1489 collate and add 1F 15 10 38 0D £ 5 H : 0F508D 15/0/2 108D collate and add 1F 1A 1C 02 10 £ 10 + 2 0FAC20 15/1/1 C20 collate and add 10 10 01 16 01 1 6 1 000161 0/0/0 161 Halt 1F 0B 04 3B 13 £ 11 4 * 3 0FB4B3 15/1/1 14B3 collate and add 1F 16 08 38 0D £ 6 8 H : 0F688D 15/0/3 88D collate and add 1F 1A 1C 16 10 £ 10 + 6 0FAC60 15/1/1 C60 collate and add 10 10 10 02 01 2 1 000021 0/0/0 21 Halt 1F 0B 0B 6E 00 £ 11 11 be 0FBBE0 15/1/1 1BE0 collate and add 01 1F 16 02 15 1 £ 6 2 5 01F625 1/1/3 1625 select literal address 01 1F 1A 02 38 1 £ 10 2 H 01FA28 1/1/3 1A28 select literal address 0D 1F 1A 1C 02 : £ 10 + 2 0DFAC2 13/1/3 1AC2 divide uniform radix 08 10 10 10 16 8 6 080006 8/0/0 6 merge constant length 01 1F 0B 0B 38 1 £ 11 11 H 01FBB8 1/1/3 1BB8 select literal address 0D 1F 1A 1C 02 : £ 10 + 2 0DFAC2 13/1/3 1AC2 divide uniform radix 10 10 10 10 16 6 000006 0/0/0 6 Halt 01 1F 0B 15 3B 1 £ 11 5 * 01FB5B 1/1/3 1B5B select literal address 01 1F 16 0D 16 1 £ 6 : 6 01F6D6 1/1/3 16D6 select literal address 01 1F 1A 1F 38 1 £ 10 £ H 01FAF8 1/1/3 1AF8 select literal address 0D 1F 1A 1C 37 : £ 10 + G 0DFAC7 13/1/3 1AC7 divide uniform radix 08 10 10 10 16 8 6 080006 8/0/0 6 merge constant length 19 1F 0B 1C 3B 9 £ 11 + * 09FBCB 9/1/3 1BCB multiply uniform radix 01 1F 07 16 2A 1 £ 7 6 = 01F76A 1/1/3 176A select literal address 0B 1F 0B 1C 6E 11 £ 11 + be 0BFBCE 11/1/3 1BCE multiply and subtract 10 01 1F 07 10 1 £ 7 001F70 0/0/0 1F70 Halt 16 01 1F 1A 1F 6 1 £ 10 £ 061FAF 6/0/0 1FAF select (N) 37 1A 10 10 10 G 10 17A000 23/1/1 0 copy into tag 29 02 10 10 02 I 2 2 192002 25/0/1 2 step on and test 38 19 1F 07 01 H 9 £ 7 1 189F71 24/1/0 1F71 unconditional jump 02 19 1F 0B 1C 2 9 £ 11 + 029FBC 2/1/0 1FBC transfer (A) to N 02 19 1F 0B 1C 2 9 £ 11 + 029FBC 2/1/0 1FBC transfer (A) to N 29 0E 04 10 10 I . 4 19E400 25/1/3 400 conditional Halt 16 01 1F 1A 02 6 1 £ 10 2 061FA2 6/0/0 1FA2 select (N) 15 01 1F 0B 15 5 1 £ 11 5 051FB5 5/0/0 1FB5 subtract (N) from (A) 02 01 1F 0B 15 2 1 £ 11 5 021FB5 2/0/0 1FB5 transfer (A) to N 16 01 1F 1A 1C 6 1 £ 10 + 061FAC 6/0/0 1FAC select (N) 04 01 1F 1A 02 4 1 £ 10 2 041FA2 4/0/0 1FA2 add (N) to (A) 13 01 1F 1A 1C 3 1 £ 10 + 031FAC 3/0/0 1FAC copy (A) to N 15 01 1F 1A 0D 5 1 £ 10 : 051FAD 5/0/0 1FAD subtract (N) from (A) 6E 00 00 00 00 be 0E 3B 15 1F 08 . * 5 £ 8 0EB5F8 14/1/1 15F8 replace selected bits 15 16 01 1F 1A 5 6 1 £ 10 0561FA 5/0/3 1FA subtract (N) from (A) 01 07 01 1F 0B 1 7 1 £ 11 0171FB 1/0/3 11FB interchange area addresses 08 16 01 1F 0B 8 6 1 £ 11 0861FB 8/0/3 1FB merge constant length 08 15 01 1F 0B 8 5 1 £ 11 0851FB 8/0/2 11FB merge constant length 19 3B 13 1F 04 9 * 3 £ 4 09B3F4 9/1/1 13F4 multiply uniform radix 07 38 19 1F 10 7 H 9 £ 0789F0 7/1/0 9F0 augment (N) by (A) 15 10 10 10 10 5 050000 5/0/0 0 subtract (N) from (A) 10 38 19 1F 08 H 9 £ 8 0089F8 0/1/0 9F8 copy registers 08 38 19 0D 1A 8 H 9 : 10 0889DA 8/1/0 9DA merge variable length 0D 16 01 1F 0B : 6 1 £ 11 0D61FB 13/0/3 1FB divide uniform radix 02 3B 13 0E 0D 2 * 3 . : 02B3ED 2/1/1 13ED transfer (A) to N 07 16 01 1F 1A 7 6 1 £ 10 0761FA 7/0/3 1FA augment (N) by (A) 1F 32 10 10 10 £ B 0F2000 15/0/1 0 collate and add 04 6E 00 00 00 4 be 04E000 4/1/3 0 add (N) to (A) 08 1C 01 1A 10 8 + 1 10 08C1A0 8/1/2 1A0 merge variable length 10 1A 02 01 1F 10 2 1 £ 00A21F 0/1/1 21F replace registers 0B 1A 16 01 1F 11 10 6 1 £ 0BA61F 11/1/1 61F multiply and subtract 1A 07 02 10 10 10 7 2 0A7200 10/0/3 1200 multiply and add 10 19 16 19 1F 9 6 9 £ 00969F 0/1/0 169F copy registers 1A 1A 13 08 10 10 10 3 8 0AA380 10/1/1 380 multiply and add 10 1A 02 10 10 10 2 00A200 0/1/1 200 replace registers 10 1A 38 08 10 10 H 8 00A880 0/1/1 880 replace registers 10 19 10 10 10 9 009000 0/1/0 1000 copy registers 02 10 10 10 10 2 020000 2/0/0 0 transfer (A) to N 10 1F 10 10 10 £ 00F000 0/1/3 1000 Invalid 10 04 10 01 1C 4 1 + 00401C 0/0/2 1C replace (B) by (N) 04 16 10 01 1F 4 6 1 £ 04601F 4/0/3 1F add (N) to (A) 1C 10 10 04 10 + 4 0C0040 12/0/0 40 convert 10 10 6E 00 00 be 000E00 0/0/0 E00 Halt 1F 19 1A 10 10 £ 9 10 0F9A00 15/1/0 1A00 collate and add 10 1A 10 10 04 10 4 00A004 0/1/1 4 replace registers 10 10 10 1F 01 £ 1 0000F1 0/0/0 F1 Halt 1F 1C 10 1F 01 £ + £ 1 0FC0F1 15/1/2 F1 collate and add 1F 0E 10 19 16 £ . 9 6 0FE096 15/1/3 96 collate and add 19 16 19 16 19 9 6 9 6 9 096969 9/0/3 969 multiply uniform radix 16 19 16 10 10 6 9 6 069600 6/1/0 1600 select (N) 10 01 04 10 10 1 4 001400 0/0/0 1400 Halt 10 10 02 10 10 2 000200 0/0/0 200 Halt 10 10 01 10 10 1 000100 0/0/0 100 Halt 10 01 1C 10 10 1 + 001C00 0/0/0 1C00 Halt 10 10 10 07 0E 7 . 00007E 0/0/0 7E Halt 10 10 10 10 07 7 000007 0/0/0 7 Halt 1F 1F 1F 2A 07 £ £ £ = 7 0FFFA7 15/1/3 1FA7 collate and add 1F 0B 1A 6E 00 £ 11 10 be 0FBAE0 15/1/1 1AE0 collate and add 01 1F 1A 08 10 1 £ 10 8 01FA80 1/1/3 1A80 select literal address 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 1A 10 29 10 I 000A09 0/0/0 A09 Halt 0B 1F 1F 1F 2A 11 £ £ £ = 0BFFFA 11/1/3 1FFA multiply and subtract 13 1F 1A 0E 10 3 £ 10 . 03FAE0 3/1/3 1AE0 copy (A) to N 01 1C 0E 08 10 1 + . 8 01CE80 1/1/2 E80 subtract literal address 01 1C 0E 08 10 1 + . 8 01CE80 1/1/2 E80 subtract literal address 01 0B 07 1A 10 1 11 7 10 01B7A0 1/1/1 17A0 add literal address 10 10 10 1F 10 £ 0000F0 0/0/0 F0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 01 10 1 000010 0/0/0 10 Halt 10 10 10 10 6E be 00000E 0/0/0 E Halt 10 01 1F 0B 16 1 £ 11 6 001FB6 0/0/0 1FB6 Halt 10 10 10 01 19 1 9 000019 0/0/0 19 Halt 10 10 10 02 10 2 000020 0/0/0 20 Halt 10 01 1F 1C 1C 1 £ + + 001FCC 0/0/0 1FCC Halt 10 01 1F 0D 1C 1 £ : + 001FDC 0/0/0 1FDC Halt 1F 10 10 10 10 £ 0F0000 15/0/0 0 collate and add 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 13 0E 08 3 . 8 0003E8 0/0/0 3E8 Halt 10 10 07 0D 02 7 : 2 0007D2 0/0/0 7D2 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 1C 04 0E 04 02 + 4 . 4 2 0C4E42 12/0/2 E42 convert 10 10 04 01 04 4 1 4 000414 0/0/0 414 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 6E 00 00 00 00 be 04 10 10 10 10 4 040000 4/0/0 0 add (N) to (A) 10 10 10 10 10 000000 0/0/0 0 Halt 10 38 1C 10 08 H + 8 008C08 0/1/0 C08 copy registers 10 01 16 1F 1C 1 6 £ + 0016FC 0/0/0 16FC Halt 10 29 0E 08 10 I . 8 009E80 0/1/0 1E80 copy registers 10 38 1C 10 08 H + 8 008C08 0/1/0 C08 copy registers 10 23 02 10 10 C 2 003200 0/0/1 1200 Invalid 10 02 01 1F 0D 2 1 £ : 0021FD 0/0/1 1FD Invalid 10 15 01 1F 1C 5 1 £ + 0051FC 0/0/2 11FC replace (B) by (N) 1F 07 10 10 08 £ 7 8 0F7008 15/0/3 1008 collate and add 10 38 19 1F 0D H 9 £ : 0089FD 0/1/0 9FD copy registers 01 10 10 10 04 1 4 010004 1/0/0 4 table look up 10 10 10 10 01 1 000001 0/0/0 1 Halt 1C 38 19 0E 0B + H 9 . 11 0C89EB 12/1/0 9EB convert 16 6E 00 00 00 6 be 06E000 6/1/3 0 select (N) 10 10 10 0D 02 : 2 0000D2 0/0/0 D2 Halt 10 10 10 0D 02 : 2 0000D2 0/0/0 D2 Halt 10 10 02 10 10 2 000200 0/0/0 200 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 1F 0E 08 £ . 8 000FE8 0/0/0 FE8 Halt 10 10 01 01 1A 1 1 10 00011A 0/0/0 11A Halt 10 10 10 10 0E . 00000E 0/0/0 E Halt 10 10 10 01 13 1 3 000013 0/0/0 13 Halt 10 10 10 10 04 4 000004 0/0/0 4 Halt 10 10 10 10 04 4 000004 0/0/0 4 Halt 10 04 1C 16 02 4 + 6 2 004C62 0/0/2 C62 replace (B) by (N) 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 6E 00 00 00 00 be 10 10 10 0D 16 : 6 0000D6 0/0/0 D6 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 29 1C 10 10 04 I + 4 19C004 25/1/2 4 interrogate indicators 3B 10 01 08 01 * 1 8 1 1B0181 27/0/0 181 jump A = Z 2A 1C 01 10 02 = + 1 2 1AC102 26/1/2 102 set modification register 38 16 10 08 01 H 6 8 1 186081 24/0/3 81 modify address of next 2A 08 10 10 10 = 8 1A8000 26/1/0 0 test route N1 10 10 10 01 07 1 7 000017 0/0/0 17 Halt 38 08 10 0D 1F H 8 : £ 1880DF 24/1/0 DF unconditional jump 38 08 10 0E 15 H 8 . 5 1880E5 24/1/0 E5 unconditional jump 6E 00 00 00 00 be 10 10 10 0E 04 . 4 0000E4 0/0/0 E4 Halt 38 08 10 0E 15 H 8 . 5 1880E5 24/1/0 E5 unconditional jump 2A 0E 01 10 0E = . 1 . 1AE10E 26/1/3 10E set modification register 38 16 10 04 10 H 6 4 186040 24/0/3 40 modify address of next 16 1C 10 10 10 6 + 06C000 6/1/2 0 select (N) 02 08 10 19 1A 2 8 9 10 02809A 2/1/0 9A transfer (A) to N 29 1C 10 10 08 I + 8 19C008 25/1/2 8 interrogate indicators 3B 10 10 0E 1C * . + 1B00EC 27/0/0 EC jump A = Z 2A 10 01 0D 01 = 1 : 1 1A01D1 26/0/0 1D1 enter subroutine 10 1C 10 19 1A + 9 10 00C09A 0/1/2 9A replace (B) by (N) 29 1C 10 10 10 I + 19C000 25/1/2 0 interrogate indicators 1F 08 01 10 1C £ 8 1 + 0F810C 15/1/0 10C collate and add 02 08 13 0E 08 2 8 3 . 8 0283E8 2/1/0 3E8 transfer (A) to N 29 1C 10 10 08 I + 8 19C008 25/1/2 8 interrogate indicators 3B 02 10 1F 13 * 2 £ 3 1B20F3 27/0/1 F3 jump A != Z 6E 00 00 00 00 be 10 10 10 1F 02 £ 2 0000F2 0/0/0 F2 Halt 2A 10 01 0D 01 = 1 : 1 1A01D1 26/0/0 1D1 enter subroutine 16 08 13 0E 08 6 8 3 . 8 0683E8 6/1/0 3E8 select (N) 15 08 01 10 02 5 8 1 2 058102 5/1/0 102 subtract (N) from (A) 3B 10 10 1F 0B * £ 11 1B00FB 27/0/0 FB jump A = Z 32 08 10 10 02 B 8 2 128002 18/1/0 2 shift logical 29 16 10 10 01 I 6 1 196001 25/0/3 1 step on and test 38 08 10 0E 0D H 8 . : 1880ED 24/1/0 ED unconditional jump 29 04 10 10 02 I 4 2 194002 25/0/2 2 step on and test 38 08 10 0E 15 H 8 . 5 1880E5 24/1/0 E5 unconditional jump 38 08 01 1A 01 H 8 1 10 1 1881A1 24/1/0 1A1 unconditional jump 38 08 01 1A 01 H 8 1 10 1 1881A1 24/1/0 1A1 unconditional jump 38 08 01 13 10 H 8 1 3 188130 24/1/0 130 unconditional jump 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 6E 00 00 00 00 be 10 10 01 10 10 1 000100 0/0/0 100 Halt 0E 10 02 01 10 . 2 1 0E0210 14/0/0 210 replace selected bits 0E 10 13 16 10 . 3 6 0E0360 14/0/0 360 replace selected bits 10 10 10 10 10 000000 0/0/0 0 Halt 13 0E 10 10 10 3 . 03E000 3/1/3 0 copy (A) to N 10 10 10 10 10 000000 0/0/0 0 Halt 07 0E 10 10 10 7 . 07E000 7/1/3 0 augment (N) by (A) 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 02 10 2 000020 0/0/0 20 Halt 08 10 08 10 08 8 8 8 080808 8/0/0 808 merge constant length 10 08 10 08 10 8 8 008080 0/1/0 80 copy registers 10 10 10 10 10 000000 0/0/0 0 Halt 02 10 10 02 04 2 2 4 020024 2/0/0 24 transfer (A) to N 10 10 10 10 10 000000 0/0/0 0 Halt 13 1F 10 10 10 3 £ 03F000 3/1/3 1000 copy (A) to N 6E 00 00 00 00 be 10 10 01 10 0E 1 . 00010E 0/0/0 10E Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 15 5 000005 0/0/0 5 Halt 38 08 01 01 1A H 8 1 1 10 18811A 24/1/0 11A unconditional jump 38 08 01 01 04 H 8 1 1 4 188114 24/1/0 114 unconditional jump 38 08 01 01 16 H 8 1 1 6 188116 24/1/0 116 unconditional jump 38 08 01 01 08 H 8 1 1 8 188118 24/1/0 118 unconditional jump 10 10 19 19 19 9 9 9 000999 0/0/0 999 Halt 2A 02 10 10 08 = 2 8 1A2008 26/0/1 8 leave subroutine 10 10 19 19 08 9 9 8 000998 0/0/0 998 Halt 2A 02 10 01 10 = 2 1 1A2010 26/0/1 10 leave subroutine 10 10 19 19 07 9 9 7 000997 0/0/0 997 Halt 2A 02 10 01 08 = 2 1 8 1A2018 26/0/1 18 leave subroutine 16 10 01 01 10 6 1 1 060110 6/0/0 110 select (N) 02 10 10 10 10 2 020000 2/0/0 0 transfer (A) to N 6E 00 00 00 00 be 10 10 01 01 1C 1 1 + 00011C 0/0/0 11C Halt 16 10 01 01 01 6 1 1 1 060111 6/0/0 111 select (N) 02 10 10 10 19 2 9 020009 2/0/0 9 transfer (A) to N 16 10 01 01 02 6 1 1 2 060112 6/0/0 112 select (N) 02 10 10 01 01 2 1 1 020011 2/0/0 11 transfer (A) to N 16 10 01 01 13 6 1 1 3 060113 6/0/0 113 select (N) 02 10 10 01 19 2 1 9 020019 2/0/0 19 transfer (A) to N 01 0E 10 01 19 1 . 1 9 01E019 1/1/3 19 select literal address 02 10 10 08 10 2 8 020080 2/0/0 80 transfer (A) to N 01 0E 10 02 02 1 . 2 2 01E022 1/1/3 22 select literal address 02 10 10 08 01 2 8 1 020081 2/0/0 81 transfer (A) to N 38 08 01 13 10 H 8 1 3 188130 24/1/0 130 unconditional jump 16 10 01 0E 10 6 1 . 0601E0 6/0/0 1E0 select (N) 01 1C 01 13 1C 1 + 1 3 + 01C13C 1/1/2 13C subtract literal address 3B 10 01 0E 0B * 1 . 11 1B01EB 27/0/0 1EB jump A = Z 6E 00 00 00 00 be 10 10 01 02 1A 1 2 10 00012A 0/0/0 12A Halt 38 08 01 0E 0E H 8 1 . . 1881EE 24/1/0 1EE unconditional jump 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 01 1F 1F 1F 1 £ £ £ 001FFF 0/0/0 1FFF Halt 16 10 01 10 10 6 1 060100 6/0/0 100 select (N) 38 1C 10 08 10 H + 8 18C080 24/1/2 80 modify address of next 02 10 10 04 10 2 4 020040 2/0/0 40 transfer (A) to N 16 10 01 10 01 6 1 1 060101 6/0/0 101 select (N) 02 10 10 04 10 2 4 020040 2/0/0 40 transfer (A) to N 38 04 13 0E 08 H 4 3 . 8 1843E8 24/0/2 3E8 select literal and division 38 1C 10 08 01 H + 8 1 18C081 24/1/2 81 modify address of next 6E 00 00 00 00 be 10 10 01 13 08 1 3 8 000138 0/0/0 138 Halt 02 10 10 04 10 2 4 020040 2/0/0 40 transfer (A) to N 38 04 02 0B 10 H 4 2 11 1842B0 24/0/2 2B0 select literal and division 02 10 10 04 01 2 4 1 020041 2/0/0 41 transfer (A) to N 2A 10 01 0E 10 = 1 . 1A01E0 26/0/0 1E0 enter subroutine 29 1C 10 01 10 I + 1 19C010 25/1/2 10 interrogate indicators 3B 02 01 15 07 * 2 1 5 7 1B2157 27/0/1 157 jump A != Z 38 1C 10 08 10 H + 8 18C080 24/1/2 80 modify address of next 2A 08 10 10 10 = 8 1A8000 26/1/0 0 test route N1 10 10 10 10 01 1 000001 0/0/0 1 Halt 38 08 01 13 0E H 8 1 3 . 18813E 24/1/0 13E unconditional jump 38 08 01 15 15 H 8 1 5 5 188155 24/1/0 155 unconditional jump 38 08 01 04 04 H 8 1 4 4 188144 24/1/0 144 unconditional jump 16 08 02 01 01 6 8 2 1 1 068211 6/1/0 211 select (N) 15 08 02 01 13 5 8 2 1 3 058213 5/1/0 213 subtract (N) from (A) 6E 00 00 00 00 be 10 10 01 04 16 1 4 6 000146 0/0/0 146 Halt 3B 10 01 04 1F * 1 4 £ 1B014F 27/0/0 14F jump A = Z 10 10 10 10 1C + 00000C 0/0/0 C Halt 29 1C 10 10 01 I + 1 19C001 25/1/2 1 interrogate indicators 29 1A 10 10 01 I 10 1 19A001 25/1/1 1 clear indicators 3B 02 01 04 04 * 2 1 4 4 1B2144 27/0/1 144 jump A != Z 29 1C 10 10 02 I + 2 19C002 25/1/2 2 interrogate indicators 29 1A 10 10 02 I 10 2 19A002 25/1/1 2 clear indicators 3B 02 01 13 10 * 2 1 3 1B2130 27/0/1 130 jump A != Z 38 08 01 13 0B H 8 1 3 11 18813B 24/1/0 13B unconditional jump 29 08 08 10 10 I 8 8 198800 25/1/0 800 set indicators 16 08 02 01 13 6 8 2 1 3 068213 6/1/0 213 select (N) 02 10 02 10 10 2 2 020200 2/0/0 200 transfer (A) to N 16 08 02 01 15 6 8 2 1 5 068215 6/1/0 215 select (N) 02 10 02 10 01 2 2 1 020201 2/0/0 201 transfer (A) to N 6E 00 00 00 00 be 10 10 01 15 04 1 5 4 000154 0/0/0 154 Halt 38 08 01 15 07 H 8 1 5 7 188157 24/1/0 157 unconditional jump 10 10 10 01 0B 1 11 00001B 0/0/0 1B Halt 38 08 01 0E 0B H 8 1 . 11 1881EB 24/1/0 1EB unconditional jump 16 10 10 1F 1C 6 £ + 0600FC 6/0/0 FC select (N) 02 10 10 1F 0B 2 £ 11 0200FB 2/0/0 FB transfer (A) to N 38 08 01 16 10 H 8 1 6 188160 24/1/0 160 unconditional jump 16 08 01 10 02 6 8 1 2 068102 6/1/0 102 select (N) 38 16 10 04 10 H 6 4 186040 24/0/3 40 modify address of next 02 08 10 10 10 2 8 028000 2/1/0 0 transfer (A) to N 16 10 10 1F 0D 6 £ : 0600FD 6/0/0 FD select (N) 02 10 10 1F 0B 2 £ 11 0200FB 2/0/0 FB transfer (A) to N 38 08 10 0D 0E H 8 : . 1880DE 24/1/0 DE unconditional jump 38 1C 10 08 10 H + 8 18C080 24/1/2 80 modify address of next 01 16 10 10 10 1 6 016000 1/0/3 0 interchange area addresses 6E 00 00 00 00 be 10 10 01 16 02 1 6 2 000162 0/0/0 162 Halt 2A 10 01 0E 10 = 1 . 1A01E0 26/0/0 1E0 enter subroutine 29 1C 10 01 10 I + 1 19C010 25/1/2 10 interrogate indicators 3B 02 10 0D 1C * 2 : + 1B20DC 27/0/1 DC jump A != Z 38 1C 10 04 10 H + 4 18C040 24/1/2 40 modify address of next 16 08 10 01 0E 6 8 1 . 06801E 6/1/0 1E select (N) 15 08 01 10 04 5 8 1 4 058104 5/1/0 104 subtract (N) from (A) 3B 02 01 0B 10 * 2 1 11 1B21B0 27/0/1 1B0 jump A != Z 38 1C 10 04 10 H + 4 18C040 24/1/2 40 modify address of next 16 08 10 10 01 6 8 1 068001 6/1/0 1 select (N) 15 10 02 10 10 5 2 050200 5/0/0 200 subtract (N) from (A) 3B 02 01 0B 0B * 2 1 11 11 1B21BB 27/0/1 1BB jump A != Z 38 08 10 0D 1C H 8 : + 1880DC 24/1/0 DC unconditional jump 10 1C 01 10 08 + 1 8 00C108 0/1/2 108 replace (B) by (N) 29 1C 10 10 10 I + 19C000 25/1/2 0 interrogate indicators 6E 00 00 00 00 be 10 10 01 07 10 1 7 000170 0/0/0 170 Halt 38 1C 10 04 10 H + 4 18C040 24/1/2 40 modify address of next 1F 1A 10 10 10 £ 10 0FA000 15/1/1 0 collate and add 02 1A 02 1F 10 2 10 2 £ 02A2F0 2/1/1 2F0 transfer (A) to N 15 1A 02 1F 10 5 10 2 £ 05A2F0 5/1/1 2F0 subtract (N) from (A) 38 1C 10 04 10 H + 4 18C040 24/1/2 40 modify address of next 07 1A 10 10 10 7 10 07A000 7/1/1 0 augment (N) by (A) 29 02 10 10 02 I 2 2 192002 25/0/1 2 step on and test 38 08 01 16 1F H 8 1 6 £ 18816F 24/1/0 16F unconditional jump 16 08 01 10 04 6 8 1 4 068104 6/1/0 104 select (N) 02 08 13 01 10 2 8 3 1 028310 2/1/0 310 transfer (A) to N 38 08 01 08 08 H 8 1 8 8 188188 24/1/0 188 unconditional jump 29 1C 10 10 04 I + 4 19C004 25/1/2 4 interrogate indicators 3B 02 10 0D 0E * 2 : . 1B20DE 27/0/1 DE jump A != Z 16 08 01 10 04 6 8 1 4 068104 6/1/0 104 select (N) 6E 00 00 00 00 be 10 10 01 07 0E 1 7 . 00017E 0/0/0 17E Halt 38 1C 10 04 10 H + 4 18C040 24/1/2 40 modify address of next 02 08 10 02 10 2 8 2 028020 2/1/0 20 transfer (A) to N 38 08 01 16 0E H 8 1 6 . 18816E 24/1/0 16E unconditional jump 16 08 01 10 04 6 8 1 4 068104 6/1/0 104 select (N) 38 1C 10 04 10 H + 4 18C040 24/1/2 40 modify address of next 02 08 10 02 10 2 8 2 028020 2/1/0 20 transfer (A) to N 2A 1A 01 10 16 = 10 1 6 1AA106 26/1/1 106 set modification register 38 08 01 16 0E H 8 1 6 . 18816E 24/1/0 16E unconditional jump 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 16 08 10 04 10 6 8 4 068040 6/1/0 40 select (N) 01 1C 10 10 02 1 + 2 01C002 1/1/2 2 subtract literal address 38 1C 10 08 01 H + 8 1 18C081 24/1/2 81 modify address of next 38 1C 10 04 10 H + 4 18C040 24/1/2 40 modify address of next 6E 00 00 00 00 be 10 10 01 08 1C 1 8 + 00018C 0/0/0 18C Halt 3D 10 10 10 10 ? 1D0000 29/0/0 0 edit for hollerith output 01 0E 02 0E 0E 1 . 2 . . 01E2EE 1/1/3 2EE select literal address 3D 10 13 02 10 ? 3 2 1D0320 29/0/0 320 edit for hollerith output 16 08 13 04 1C 6 8 3 4 + 06834C 6/1/0 34C select (N) 38 1C 10 08 01 H + 8 1 18C081 24/1/2 81 modify address of next 38 1C 10 04 10 H + 4 18C040 24/1/2 40 modify address of next 07 08 10 02 1C 7 8 2 + 07802C 7/1/0 2C augment (N) by (A) 16 08 13 04 0E 6 8 3 4 . 06834E 6/1/0 34E select (N) 38 1C 10 08 01 H + 8 1 18C081 24/1/2 81 modify address of next 38 1C 10 04 10 H + 4 18C040 24/1/2 40 modify address of next 07 08 10 02 0E 7 8 2 . 07802E 7/1/0 2E augment (N) by (A) 38 1C 10 08 01 H + 8 1 18C081 24/1/2 81 modify address of next 2A 08 10 10 10 = 8 1A8000 26/1/0 0 test route N1 38 08 01 0B 0D H 8 1 11 : 1881BD 24/1/0 1BD unconditional jump 6E 00 00 00 00 be 10 10 01 19 1A 1 9 10 00019A 0/0/0 19A Halt 38 08 01 19 07 H 8 1 9 7 188197 24/1/0 197 unconditional jump 38 08 01 19 0D H 8 1 9 : 18819D 24/1/0 19D unconditional jump 10 10 10 13 02 3 2 000032 0/0/0 32 Halt 38 1C 10 08 01 H + 8 1 18C081 24/1/2 81 modify address of next 23 10 10 10 10 C 130000 19/0/0 0 output 38 1C 10 08 01 H + 8 1 18C081 24/1/2 81 modify address of next 01 16 10 04 10 1 6 4 016040 1/0/3 40 interchange area addresses 29 1C 08 10 10 I + 8 19C800 25/1/2 800 interrogate indicators 3B 02 01 1A 0B * 2 1 10 11 1B21AB 27/0/1 1AB jump A != Z 01 0E 10 10 0E 1 . . 01E00E 1/1/3 E select literal address 07 10 02 10 10 7 2 070200 7/0/0 200 augment (N) by (A) 29 1C 10 01 10 I + 1 19C010 25/1/2 10 interrogate indicators 3B 02 01 16 10 * 2 1 6 1B2160 27/0/1 160 jump A != Z 16 10 02 10 01 6 2 1 060201 6/0/0 201 select (N) 6E 00 00 00 00 be 10 10 01 1A 08 1 10 8 0001A8 0/0/0 1A8 Halt 15 10 02 10 10 5 2 050200 5/0/0 200 subtract (N) from (A) 3B 16 01 1F 1C * 6 1 £ + 1B61FC 27/0/3 1FC jump A < Z 38 08 01 16 10 H 8 1 6 188160 24/1/0 160 unconditional jump 01 0E 10 10 04 1 . 4 01E004 1/1/3 4 select literal address 29 1A 08 10 10 I 10 8 19A800 25/1/1 800 clear indicators 38 08 01 1A 04 H 8 1 10 4 1881A4 24/1/0 1A4 unconditional jump 29 1C 10 10 04 I + 4 19C004 25/1/2 4 interrogate indicators 3B 10 01 13 10 * 1 3 1B0130 27/0/0 130 jump A = Z 10 10 10 10 0D : 00000D 0/0/0 D Halt 29 1C 10 10 01 I + 1 19C001 25/1/2 1 interrogate indicators 29 1A 10 10 01 I 10 1 19A001 25/1/1 1 clear indicators 3B 02 01 16 13 * 2 1 6 3 1B2163 27/0/1 163 jump A != Z 29 1C 10 10 02 I + 2 19C002 25/1/2 2 interrogate indicators 29 1A 10 10 02 I 10 2 19A002 25/1/1 2 clear indicators 6E 00 00 00 00 be 10 10 01 0B 16 1 11 6 0001B6 0/0/0 1B6 Halt 3B 02 01 13 10 * 2 1 3 1B2130 27/0/1 130 jump A != Z 38 1C 10 08 10 H + 8 18C080 24/1/2 80 modify address of next 01 16 10 10 10 1 6 016000 1/0/3 0 interchange area addresses 2A 10 01 0E 10 = 1 . 1A01E0 26/0/0 1E0 enter subroutine 38 08 01 16 10 H 8 1 6 188160 24/1/0 160 unconditional jump 10 10 10 10 1F £ 00000F 0/0/0 F Halt 38 08 01 0B 01 H 8 1 11 1 1881B1 24/1/0 1B1 unconditional jump 10 10 10 01 02 1 2 000012 0/0/0 12 Halt 29 1C 10 10 01 I + 1 19C001 25/1/2 1 interrogate indicators 29 1A 10 10 01 I 10 1 19A001 25/1/1 1 clear indicators 3B 02 01 19 07 * 2 1 9 7 1B2197 27/0/1 197 jump A != Z 29 1C 10 10 02 I + 2 19C002 25/1/2 2 interrogate indicators 29 1A 10 10 02 I 10 2 19A002 25/1/1 2 clear indicators 3B 02 01 13 10 * 2 1 3 1B2130 27/0/1 130 jump A != Z 6E 00 00 00 00 be 10 10 01 1C 04 1 + 4 0001C4 0/0/0 1C4 Halt 38 1C 10 08 01 H + 8 1 18C081 24/1/2 81 modify address of next 01 16 10 04 10 1 6 4 016040 1/0/3 40 interchange area addresses 38 1C 10 08 01 H + 8 1 18C081 24/1/2 81 modify address of next 2A 08 10 10 10 = 8 1A8000 26/1/0 0 test route N1 10 10 10 04 02 4 2 000042 0/0/0 42 Halt 38 08 01 1C 16 H 8 1 + 6 1881C6 24/1/0 1C6 unconditional jump 38 08 01 1C 1C H 8 1 + + 1881CC 24/1/0 1CC unconditional jump 38 08 01 1C 1C H 8 1 + + 1881CC 24/1/0 1CC unconditional jump 38 1C 10 08 01 H + 8 1 18C081 24/1/2 81 modify address of next 23 10 10 10 10 C 130000 19/0/0 0 output 38 1C 10 08 01 H + 8 1 18C081 24/1/2 81 modify address of next 01 16 10 04 10 1 6 4 016040 1/0/3 40 interchange area addresses 38 08 01 19 07 H 8 1 9 7 188197 24/1/0 197 unconditional jump 10 10 10 1F 13 £ 3 0000F3 0/0/0 F3 Halt 6E 00 00 00 00 be 10 10 01 0D 02 1 : 2 0001D2 0/0/0 1D2 Halt 38 16 10 08 01 H 6 8 1 186081 24/0/3 81 modify address of next 23 10 10 10 10 C 130000 19/0/0 0 output 38 16 10 08 01 H 6 8 1 186081 24/0/3 81 modify address of next 2A 08 10 10 10 = 8 1A8000 26/1/0 0 test route N1 10 10 10 04 07 4 7 000047 0/0/0 47 Halt 38 08 01 0D 04 H 8 1 : 4 1881D4 24/1/0 1D4 unconditional jump 38 08 01 0D 0B H 8 1 : 11 1881DB 24/1/0 1DB unconditional jump 10 10 10 16 07 6 7 000067 0/0/0 67 Halt 2A 02 01 0D 01 = 2 1 : 1 1A21D1 26/0/1 1D1 leave subroutine 10 10 10 15 07 5 7 000057 0/0/0 57 Halt 29 1C 10 10 01 I + 1 19C001 25/1/2 1 interrogate indicators 29 1A 10 10 01 I 10 1 19A001 25/1/1 1 clear indicators 3B 02 01 0D 02 * 2 1 : 2 1B21D2 27/0/1 1D2 jump A != Z 38 08 01 0D 1A H 8 1 : 10 1881DA 24/1/0 1DA unconditional jump 6E 00 00 00 00 be 10 10 01 0E 10 1 . 0001E0 0/0/0 1E0 Halt 10 10 01 16 13 1 6 3 000163 0/0/0 163 Halt 16 08 01 10 1A 6 8 1 10 06810A 6/1/0 10A select (N) 38 1C 10 08 10 H + 8 18C080 24/1/2 80 modify address of next 38 1C 10 04 10 H + 4 18C040 24/1/2 40 modify address of next 2C 1A 10 10 10 ' 10 1CA000 28/1/1 0 bulk copy long numeric 38 1C 10 08 10 H + 8 18C080 24/1/2 80 modify address of next 2A 08 10 10 10 = 8 1A8000 26/1/0 0 test route N1 10 10 10 01 13 1 3 000013 0/0/0 13 Halt 38 08 01 0E 15 H 8 1 . 5 1881E5 24/1/0 1E5 unconditional jump 38 08 01 02 07 H 8 1 2 7 188127 24/1/0 127 unconditional jump 38 08 01 0E 0B H 8 1 . 11 1881EB 24/1/0 1EB unconditional jump 38 1C 10 08 10 H + 8 18C080 24/1/2 80 modify address of next 23 02 10 10 10 C 2 132000 19/0/1 0 input one block/reset timer 2A 02 01 0E 10 = 2 1 . 1A21E0 26/0/1 1E0 leave subroutine 6E 00 00 00 00 be 10 10 01 0E 0E 1 . . 0001EE 0/0/0 1EE Halt 10 10 10 10 0B 11 00000B 0/0/0 B Halt 29 1C 10 10 01 I + 1 19C001 25/1/2 1 interrogate indicators 29 1A 10 10 01 I 10 1 19A001 25/1/1 1 clear indicators 3B 02 01 0E 0B * 2 1 . 11 1B21EB 27/0/1 1EB jump A != Z 29 1C 10 10 02 I + 2 19C002 25/1/2 2 interrogate indicators 29 1A 10 10 02 I 10 2 19A002 25/1/1 2 clear indicators 3B 02 01 13 10 * 2 1 3 1B2130 27/0/1 130 jump A != Z 38 1C 10 08 10 H + 8 18C080 24/1/2 80 modify address of next 01 16 10 10 10 1 6 016000 1/0/3 0 interchange area addresses 38 1C 10 08 10 H + 8 18C080 24/1/2 80 modify address of next 23 02 10 10 10 C 2 132000 19/0/1 0 input one block/reset timer 38 1C 10 08 10 H + 8 18C080 24/1/2 80 modify address of next 01 16 10 10 10 1 6 016000 1/0/3 0 interchange area addresses 38 08 01 0E 15 H 8 1 . 5 1881E5 24/1/0 1E5 unconditional jump 6E 00 00 00 00 be 10 10 01 1F 1C 1 £ + 0001FC 0/0/0 1FC Halt 29 1C 10 10 04 I + 4 19C004 25/1/2 4 interrogate indicators 3B 10 01 13 10 * 1 3 1B0130 27/0/0 130 jump A = Z 38 08 01 15 1A H 8 1 5 10 18815A 24/1/0 15A unconditional jump 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 13 1A 1A 3 10 10 0003AA 0/0/0 3AA Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 6E 00 00 00 00 be 6E 00 00 00 00 be 7F 10 10 01 29 er 1 I 0F0019 15/0/0 19 collate and add File: old-paper-tapes/U199-1-1.leo 58 10 32 10 10 Q B 080200 8/0/0 200 merge constant length 70 10 13 10 10 0 3 000300 0/0/0 300 Halt 38 08 10 04 13 H 8 4 3 188043 24/1/0 43 unconditional jump 10 08 10 10 10 8 008000 0/1/0 0 copy registers 38 1C 10 08 10 H + 8 18C080 24/1/2 80 modify address of next 01 16 1F 08 10 1 6 £ 8 016F80 1/0/3 F80 interchange area addresses 29 0E 08 10 10 I . 8 19E800 25/1/3 800 conditional Halt 38 1C 10 08 10 H + 8 18C080 24/1/2 80 modify address of next 23 02 10 10 10 C 2 132000 19/0/1 0 input one block/reset timer 38 1C 10 08 10 H + 8 18C080 24/1/2 80 modify address of next 2A 08 10 10 10 = 8 1A8000 26/1/0 0 test route N1 10 10 10 02 01 2 1 000021 0/0/0 21 Halt 38 19 1F 1C 0B H 9 £ + 11 189FCB 24/1/0 1FCB unconditional jump 10 10 10 02 13 2 3 000023 0/0/0 23 Halt 10 10 10 01 1C 1 + 00001C 0/0/0 1C Halt 38 0D 1F 0D 1F H : £ : £ 18DFDF 24/1/2 1FDF modify address of next 16 19 1F 0E 13 6 9 £ . 3 069FE3 6/1/0 1FE3 select (N) 38 0D 1F 0D 0E H : £ : . 18DFDE 24/1/2 1FDE modify address of next 02 10 10 10 10 2 020000 2/0/0 0 transfer (A) to N 16 19 1F 0D 1C 6 9 £ : + 069FDC 6/1/0 1FDC select (N) 07 19 1F 0D 0E 7 9 £ : . 079FDE 7/1/0 1FDE augment (N) by (A) 16 01 1F 0D 1F 6 1 £ : £ 061FDF 6/0/0 1FDF select (N) 15 01 1F 0D 10 5 1 £ : 051FD0 5/0/0 1FD0 subtract (N) from (A) 3B 13 1F 0D 01 * 3 £ : 1 1B3FD1 27/0/1 1FD1 jump A != Z 02 01 1F 0D 1F 2 1 £ : £ 021FDF 2/0/0 1FDF transfer (A) to N 38 19 1F 1C 08 H 9 £ + 8 189FC8 24/1/0 1FC8 unconditional jump 10 10 10 10 01 1 000001 0/0/0 1 Halt 10 10 10 10 02 2 000002 0/0/0 2 Halt 10 01 0E 0B 16 1 . 11 6 001EB6 0/0/0 1EB6 Halt 10 10 10 01 04 1 4 000014 0/0/0 14 Halt 70 10 75 10 7C 0 V , 00050C 0/0/0 50C Halt 70 10 67 10 02 0 X 2 000702 0/0/0 702 Halt 58 10 07 10 13 Q 7 3 080703 8/0/0 703 merge constant length 70 10 04 10 7A 0 4 ( 00040A 0/0/0 40A Halt 70 10 13 10 5E 0 3 hf 00030E 0/0/0 30E Halt 70 10 04 10 51 0 4 J 000401 0/0/0 401 Halt 40 10 32 10 04 & B 4 000204 0/0/0 204 Halt 70 10 16 10 61 0 6 / 000601 0/0/0 601 Halt 58 10 67 10 54 Q X M 080704 8/0/0 704 merge constant length 70 10 67 10 02 0 X 2 000702 0/0/0 702 Halt 70 10 67 10 58 0 X Q 000708 0/0/0 708 Halt 70 10 76 10 02 0 W 2 000602 0/0/0 602 Halt 70 10 75 10 73 0 V T 000503 0/0/0 503 Halt 70 10 62 10 13 0 S 3 000203 0/0/0 203 Halt 08 10 16 10 58 8 6 Q 080608 8/0/0 608 merge constant length 08 10 13 10 4A 8 3 # 08030A 8/0/0 30A merge constant length 08 10 13 10 43 8 3 L 080303 8/0/0 303 merge constant length 58 10 13 10 51 Q 3 J 080301 8/0/0 301 merge constant length 10 10 62 10 7C S , 00020C 0/0/0 20C Halt 10 10 02 10 7A 2 ( 00020A 0/0/0 20A Halt 70 10 62 10 6D 0 S ; 00020D 0/0/0 20D Halt 40 10 26 10 6D & F ; 00060D 0/0/0 60D Halt 40 10 46 10 75 & O V 000605 0/0/0 605 Halt 40 10 62 10 10 & S 000200 0/0/0 200 Halt 58 10 52 10 10 Q K 080200 8/0/0 200 merge constant length 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 40 10 10 & 000000 0/0/0 0 Halt 40 10 40 10 10 & & 000000 0/0/0 0 Halt 16 08 10 10 19 6 8 9 068009 6/1/0 9 select (N) 02 01 1F 1C 16 2 1 £ + 6 021FC6 2/0/0 1FC6 transfer (A) to N 10 01 1F 0E 10 1 £ . 001FE0 0/0/0 1FE0 Halt 38 19 1F 1C 16 H 9 £ + 6 189FC6 24/1/0 1FC6 unconditional jump 10 10 20 10 10 - 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 1F 10 29 £ I 000F09 0/0/0 F09 Halt 6E 00 00 00 00 be 10 01 0E 0B 16 1 . 11 6 001EB6 0/0/0 1EB6 Halt 10 01 0E 0B 16 1 . 11 6 001EB6 0/0/0 1EB6 Halt 10 01 1F 0D 10 1 £ : 001FD0 0/0/0 1FD0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 01 0E 0B 16 1 . 11 6 001EB6 0/0/0 1EB6 Halt 10 10 10 10 1F £ 00000F 0/0/0 F Halt 10 10 10 10 01 1 000001 0/0/0 1 Halt 10 10 10 10 01 1 000001 0/0/0 1 Halt 10 10 10 10 13 3 000003 0/0/0 3 Halt 01 04 0B 16 01 1 4 11 6 1 014B61 1/0/2 B61 round off 16 01 1F 19 04 6 1 £ 9 4 061F94 6/0/0 1F94 select (N) 02 10 10 08 01 2 8 1 020081 2/0/0 81 transfer (A) to N 01 1A 10 10 10 1 10 01A000 1/1/1 0 add literal address 16 01 1F 01 0E 6 1 £ 1 . 061F1E 6/0/0 1F1E select (N) 6E 00 00 00 00 be 10 01 0E 0B 1A 1 . 11 10 001EBA 0/0/0 1EBA Halt 02 01 1F 01 0D 2 1 £ 1 : 021F1D 2/0/0 1F1D transfer (A) to N 29 0E 10 01 10 I . 1 19E010 25/1/3 10 conditional Halt 29 1C 10 01 10 I + 1 19C010 25/1/2 10 interrogate indicators 3B 01 0E 0D 13 * 1 . : 3 1B1ED3 27/0/0 1ED3 jump A = Z 16 08 10 08 10 6 8 8 068080 6/1/0 80 select (N) 02 19 1F 0B 16 2 9 £ 11 6 029FB6 2/1/0 1FB6 transfer (A) to N 2A 0B 1F 1A 08 = 11 £ 10 8 1ABFA8 26/1/1 1FA8 set modification register 37 1A 10 10 10 G 10 17A000 23/1/1 0 copy into tag 29 02 10 10 02 I 2 2 192002 25/0/1 2 step on and test 38 19 0E 1C 01 H 9 . + 1 189EC1 24/1/0 1EC1 unconditional jump 2A 0B 1F 19 16 = 11 £ 9 6 1ABF96 26/1/1 1F96 set modification register 02 1A 10 10 10 2 10 02A000 2/1/1 0 transfer (A) to N 29 02 10 10 02 I 2 2 192002 25/0/1 2 step on and test 38 19 0E 1C 15 H 9 . + 5 189EC5 24/1/0 1EC5 unconditional jump 6E 00 00 00 00 be 10 01 0E 1C 08 1 . + 8 001EC8 0/0/0 1EC8 Halt 2A 0B 1F 19 08 = 11 £ 9 8 1ABF98 26/1/1 1F98 set modification register 02 1A 10 10 10 2 10 02A000 2/1/1 0 transfer (A) to N 29 02 10 10 02 I 2 2 192002 25/0/1 2 step on and test 38 19 0E 1C 19 H 9 . + 9 189EC9 24/1/0 1EC9 unconditional jump 2A 0B 1F 19 1A = 11 £ 9 10 1ABF9A 26/1/1 1F9A set modification register 16 01 1F 19 15 6 1 £ 9 5 061F95 6/0/0 1F95 select (N) 37 1A 10 10 10 G 10 17A000 23/1/1 0 copy into tag 29 02 10 10 02 I 2 2 192002 25/0/1 2 step on and test 38 19 0E 1C 0E H 9 . + . 189ECE 24/1/0 1ECE unconditional jump 16 19 1F 0B 16 6 9 £ 11 6 069FB6 6/1/0 1FB6 select (N) 02 08 10 08 10 2 8 8 028080 2/1/0 80 transfer (A) to N 02 10 10 10 19 2 9 020009 2/0/0 9 transfer (A) to N 02 10 10 01 01 2 1 1 020011 2/0/0 11 transfer (A) to N 02 10 10 01 19 2 1 9 020019 2/0/0 19 transfer (A) to N 6E 00 00 00 00 be 0E 0D 16 38 19 . : 6 H 9 0ED689 14/1/2 1689 replace selected bits 0E 0D 0E 29 0B . : . I 11 0EDE9B 14/1/2 1E9B replace selected bits 1F 1F 1F 16 01 £ £ £ 6 1 0FFF61 15/1/3 1F61 collate and add 1F 0B 13 3B 01 £ 11 3 * 1 0FB3B1 15/1/1 13B1 collate and add 0E 0B 08 02 01 . 11 8 2 1 0EB821 14/1/1 1821 replace selected bits 1F 0B 1A 38 19 £ 11 10 H 9 0FBA89 15/1/1 1A89 collate and add 1C 04 16 10 10 + 4 6 0C4600 12/0/2 600 convert 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 29 1C I + 00009C 0/0/0 9C Halt 10 10 01 02 01 1 2 1 000121 0/0/0 121 Halt 1F 0B 10 29 1C £ 11 I + 0FB09C 15/1/1 109C collate and add 10 10 02 02 01 2 2 1 000221 0/0/0 221 Halt 1F 0B 01 29 1C £ 11 1 I + 0FB19C 15/1/1 119C collate and add 10 10 04 02 01 4 2 1 000421 0/0/0 421 Halt 1F 0B 02 6E 00 £ 11 2 be 0FB2E0 15/1/1 12E0 collate and add 01 0E 0E 04 29 1 . . 4 I 01EE49 1/1/3 E49 select literal address 1C 10 10 08 02 + 8 2 0C0082 12/0/0 82 convert 01 1F 0B 13 38 1 £ 11 3 H 01FB38 1/1/3 1B38 select literal address 19 0E 0E 08 10 9 . . 8 09EE80 9/1/3 E80 multiply uniform radix 10 10 10 10 38 H 000008 0/0/0 8 Halt 0D 1F 0B 10 16 : £ 11 6 0DFB06 13/1/3 1B06 divide uniform radix 01 1F 15 15 02 1 £ 5 5 2 01F552 1/1/3 1552 select literal address 01 1F 15 04 38 1 £ 5 4 H 01F548 1/1/3 1548 select literal address 0D 1F 0B 10 16 : £ 11 6 0DFB06 13/1/3 1B06 divide uniform radix 01 1F 08 16 02 1 £ 8 6 2 01F862 1/1/3 1862 select literal address 01 1F 08 15 16 1 £ 8 5 6 01F856 1/1/3 1856 select literal address 01 1F 19 1C 38 1 £ 9 + H 01F9C8 1/1/3 19C8 select literal address 1C 10 08 10 02 + 8 2 0C0802 12/0/0 802 convert 10 10 04 10 16 4 6 000406 0/0/0 406 Halt 01 1F 19 0D 6E 1 £ 9 : be 01F9DE 1/1/3 19DE select literal address 10 01 0E 1F 02 1 . £ 2 001EF2 0/0/0 1EF2 Halt 02 10 10 16 07 2 6 7 020067 2/0/0 67 transfer (A) to N 38 1C 10 08 10 H + 8 18C080 24/1/2 80 modify address of next 2A 08 10 10 10 = 8 1A8000 26/1/0 0 test route N1 38 19 1F 10 01 H 9 £ 1 189F01 24/1/0 1F01 unconditional jump 38 19 1F 10 13 H 9 £ 3 189F03 24/1/0 1F03 unconditional jump 38 19 0E 1F 19 H 9 . £ 9 189EF9 24/1/0 1EF9 unconditional jump 10 10 10 10 07 7 000007 0/0/0 7 Halt 02 01 1F 0B 1A 2 1 £ 11 10 021FBA 2/0/0 1FBA transfer (A) to N 38 1C 10 16 07 H + 6 7 18C067 24/1/2 67 modify address of next 02 08 10 01 0E 2 8 1 . 02801E 2/1/0 1E transfer (A) to N 38 1C 10 08 10 H + 8 18C080 24/1/2 80 modify address of next 01 16 19 1C 10 1 6 9 + 0169C0 1/0/3 9C0 interchange area addresses 38 1C 10 08 10 H + 8 18C080 24/1/2 80 modify address of next 23 02 10 10 10 C 2 132000 19/0/1 0 input one block/reset timer 6E 00 00 00 00 be 10 38 19 1F 10 H 9 £ 0089F0 0/1/0 9F0 copy registers 15 10 10 10 10 5 050000 5/0/0 0 subtract (N) from (A) 13 38 19 0E 1F 3 H 9 . £ 0389EF 3/1/0 9EF copy (A) to N 13 01 1A 10 10 3 1 10 031A00 3/0/0 1A00 copy (A) to N 10 38 19 0E 1F H 9 . £ 0089EF 0/1/0 9EF copy registers 13 38 1C 10 08 3 H + 8 038C08 3/1/0 C08 copy (A) to N 10 2A 08 10 10 = 8 00A800 0/1/1 800 replace registers 10 10 10 10 10 000000 0/0/0 0 Halt 19 38 19 1F 10 9 H 9 £ 0989F0 9/1/0 9F0 multiply uniform radix 15 38 19 1F 01 5 H 9 £ 1 0589F1 5/1/0 9F1 subtract (N) from (A) 04 38 19 0E 1F 4 H 9 . £ 0489EF 4/1/0 9EF add (N) to (A) 13 02 01 1F 0B 3 2 1 £ 11 0321FB 3/0/1 1FB copy (A) to N 1A 38 1C 10 16 10 H + 6 0A8C06 10/1/0 C06 multiply and add 07 02 08 10 01 7 2 8 1 072801 7/0/1 801 augment (N) by (A) 0E 6E 00 00 00 . be 0EE000 14/1/3 0 replace selected bits 10 0E 38 1C 10 . H + 00E8C0 0/1/3 8C0 Invalid 08 10 01 16 19 8 1 6 9 080169 8/0/0 169 merge constant length 1C 10 29 0E 08 + I . 8 0C09E8 12/0/0 9E8 convert 10 10 38 1C 10 H + 0008C0 0/0/0 8C0 Halt 08 10 23 02 10 8 C 2 080320 8/0/0 320 merge constant length 10 10 38 19 1F H 9 £ 00089F 0/0/0 89F Halt 01 16 10 10 10 1 6 016000 1/0/3 0 interchange area addresses 10 0B 38 19 0E 11 H 9 . 00B89E 0/1/1 189E replace registers 1F 04 10 15 1F £ 4 5 £ 0F405F 15/0/2 5F collate and add 1A 16 1F 10 10 10 6 £ 0A6F00 10/0/3 F00 multiply and add 16 07 13 01 1F 6 7 3 1 £ 06731F 6/0/3 131F select (N) 0B 08 04 01 1F 11 8 4 1 £ 0B841F 11/1/0 41F multiply and subtract 1A 13 02 01 1F 10 3 2 1 £ 0A321F 10/0/1 121F multiply and add 0B 19 16 01 1F 11 9 6 1 £ 0B961F 11/1/0 161F multiply and subtract 1A 02 6E 00 00 10 2 be 0A2E00 10/0/1 E00 multiply and add 1F 01 1C 02 01 £ 1 + 2 1 0F1C21 15/0/0 1C21 collate and add 1F 0B 04 10 10 £ 11 4 0FB400 15/1/1 1400 collate and add 10 10 10 38 19 H 9 000089 0/0/0 89 Halt 1F 02 01 38 19 £ 2 1 H 9 0F2189 15/0/1 189 collate and add 1F 13 1A 38 19 £ 3 10 H 9 0F3A89 15/0/1 1A89 collate and add 1C 04 1A 16 01 + 4 10 6 1 0C4A61 12/0/2 A61 convert 1F 1A 10 07 01 £ 10 7 1 0FA071 15/1/1 71 collate and add 1F 0B 08 38 1C £ 11 8 H + 0FB88C 15/1/1 188C collate and add 10 16 07 16 08 6 7 6 8 006768 0/0/3 768 set radix 10 10 13 15 01 3 5 1 000351 0/0/0 351 Halt 1F 1A 02 02 01 £ 10 2 2 1 0FA221 15/1/1 221 collate and add 1F 1A 1C 38 1C £ 10 + H + 0FAC8C 15/1/1 C8C collate and add 10 16 07 16 08 6 7 6 8 006768 0/0/3 768 set radix 10 10 15 02 01 5 2 1 000521 0/0/0 521 Halt 1F 1A 0D 6E 00 £ 10 : be 0FADE0 15/1/1 DE0 collate and add 01 1F 02 1A 38 1 £ 2 10 H 01F2A8 1/1/3 12A8 select literal address 1C 10 16 07 16 + 6 7 6 0C0676 12/0/0 676 convert 08 10 10 0B 02 8 11 2 0800B2 8/0/0 B2 merge constant length 01 1F 1A 0E 38 1 £ 10 . H 01FAE8 1/1/3 1AE8 select literal address 1C 10 16 07 16 + 6 7 6 0C0676 12/0/0 676 convert 08 10 10 0D 02 8 : 2 0800D2 8/0/0 D2 merge constant length 01 1F 1A 1F 10 1 £ 10 £ 01FAF0 1/1/3 1AF0 select literal address 15 1F 1A 1C 1F 5 £ 10 + £ 05FACF 5/1/3 1ACF subtract (N) from (A) 01 1F 1A 02 02 1 £ 10 2 2 01FA22 1/1/3 1A22 select literal address 01 1F 0B 15 38 1 £ 11 5 H 01FB58 1/1/3 1B58 select literal address 1C 10 16 07 16 + 6 7 6 0C0676 12/0/0 676 convert 08 10 10 07 02 8 7 2 080072 8/0/0 72 merge constant length 01 1F 0B 1C 38 1 £ 11 + H 01FBC8 1/1/3 1BC8 select literal address 1C 10 16 07 16 + 6 7 6 0C0676 12/0/0 676 convert 08 10 10 19 6E 8 9 be 08009E 8/0/0 9E merge constant length 10 01 1F 13 08 1 £ 3 8 001F38 0/0/0 1F38 Halt 04 01 1F 1A 01 4 1 £ 10 1 041FA1 4/0/0 1FA1 add (N) to (A) 02 01 1F 0B 0D 2 1 £ 11 : 021FBD 2/0/0 1FBD transfer (A) to N 16 19 1F 1A 04 6 9 £ 10 4 069FA4 6/1/0 1FA4 select (N) 38 1C 10 16 07 H + 6 7 18C067 24/1/2 67 modify address of next 15 08 10 01 0E 5 8 1 . 05801E 5/1/0 1E subtract (N) from (A) 3B 01 1F 04 10 * 1 £ 4 1B1F40 27/0/0 1F40 jump A = Z 10 10 10 10 0D : 00000D 0/0/0 D Halt 38 19 0E 1F 13 H 9 . £ 3 189EF3 24/1/0 1EF3 unconditional jump 38 1C 10 16 07 H + 6 7 18C067 24/1/2 67 modify address of next 16 08 10 10 01 6 8 1 068001 6/1/0 1 select (N) 15 01 1F 1A 02 5 1 £ 10 2 051FA2 5/0/0 1FA2 subtract (N) from (A) 15 01 1F 1A 1C 5 1 £ 10 + 051FAC 5/0/0 1FAC subtract (N) from (A) 3B 01 1F 04 07 * 1 £ 4 7 1B1F47 27/0/0 1F47 jump A = Z 10 10 10 10 1F £ 00000F 0/0/0 F Halt 6E 00 00 00 00 be 16 38 19 0E 1F 6 H 9 . £ 0689EF 6/1/0 9EF select (N) 13 38 0D 1F 0B 3 H : £ 11 038DFB 3/1/0 DFB copy (A) to N 08 16 08 10 10 8 6 8 086800 8/0/3 800 merge constant length 02 15 19 1F 19 2 5 9 £ 9 0259F9 2/0/2 19F9 transfer (A) to N 0E 3B 13 1F 15 . * 3 £ 5 0EB3F5 14/1/1 13F5 replace selected bits 08 02 01 1F 0B 8 2 1 £ 11 0821FB 8/0/1 1FB merge constant length 04 16 01 1F 0B 4 6 1 £ 11 0461FB 4/0/3 1FB add (N) to (A) 15 3B 01 1F 15 5 * 1 £ 5 05B1F5 5/1/1 11F5 subtract (N) from (A) 10 10 10 10 01 1 000001 0/0/0 1 Halt 1F 38 19 0E 1F £ H 9 . £ 0F89EF 15/1/0 9EF collate and add 13 16 01 1F 01 3 6 1 £ 1 0361F1 3/0/3 1F1 copy (A) to N 1F 02 01 1F 01 £ 2 1 £ 1 0F21F1 15/0/1 1F1 collate and add 0D 38 0D 1F 0B : H : £ 11 0D8DFB 13/1/0 DFB divide uniform radix 08 16 08 10 10 8 6 8 086800 8/0/3 800 merge constant length 13 6E 00 00 00 3 be 03E000 3/1/3 0 copy (A) to N 15 04 10 10 10 5 4 054000 5/0/2 0 subtract (N) from (A) 10 10 38 19 1F H 9 £ 00089F 0/0/0 89F Halt 15 0B 38 19 0D 5 11 H 9 : 05B89D 5/1/1 189D subtract (N) from (A) 10 10 38 19 0D H 9 : 00089D 0/0/0 89D Halt 04 1A 16 01 1F 4 10 6 1 £ 04A61F 4/1/1 61F add (N) to (A) 1A 02 02 01 1F 10 2 2 1 £ 0A221F 10/0/1 21F multiply and add 0B 04 38 19 1F 11 4 H 9 £ 0B489F 11/0/2 89F multiply and subtract 15 10 38 0D 1F 5 H : £ 0508DF 5/0/0 8DF subtract (N) from (A) 1A 1C 02 10 10 10 + 2 0AC200 10/1/2 200 multiply and add 10 01 16 01 1F 1 6 1 £ 00161F 0/0/0 161F Halt 0B 04 3B 13 1F 11 4 * 3 £ 0B4B3F 11/0/2 B3F multiply and subtract 16 08 38 0D 1F 6 8 H : £ 0688DF 6/1/0 8DF select (N) 1A 1C 16 10 10 10 + 6 0AC600 10/1/2 600 multiply and add 10 10 02 01 1F 2 1 £ 00021F 0/0/0 21F Halt 0B 0B 6E 00 00 11 11 be 0BBE00 11/1/1 1E00 multiply and subtract 1F 16 02 15 01 £ 6 2 5 1 0F6251 15/0/3 251 collate and add 1F 1A 02 38 0D £ 10 2 H : 0FA28D 15/1/1 28D collate and add 1F 1A 1C 02 08 £ 10 + 2 8 0FAC28 15/1/1 C28 collate and add 10 10 10 16 01 6 1 000061 0/0/0 61 Halt 1F 0B 0B 38 0D £ 11 11 H : 0FBB8D 15/1/1 1B8D collate and add 1F 1A 1C 02 10 £ 10 + 2 0FAC20 15/1/1 C20 collate and add 10 10 10 16 01 6 1 000061 0/0/0 61 Halt 1F 0B 15 3B 01 £ 11 5 * 1 0FB5B1 15/1/1 15B1 collate and add 1F 16 0D 16 01 £ 6 : 6 1 0F6D61 15/0/3 D61 collate and add 1F 1A 1F 38 0D £ 10 £ H : 0FAF8D 15/1/1 F8D collate and add 1F 1A 1C 37 08 £ 10 + G 8 0FAC78 15/1/1 C78 collate and add 10 10 10 16 19 6 9 000069 0/0/0 69 Halt 1F 0B 1C 3B 01 £ 11 + * 1 0FBCB1 15/1/1 1CB1 collate and add 1F 07 16 2A 0B £ 7 6 = 11 0F76AB 15/0/3 16AB collate and add 1F 0B 1C 6E 00 £ 11 + be 0FBCE0 15/1/1 1CE0 collate and add 01 1F 07 10 16 1 £ 7 6 01F706 1/1/3 1706 select literal address 01 1F 1A 1F 37 1 £ 10 £ G 01FAF7 1/1/3 1AF7 select literal address 1A 10 10 10 29 10 I 0A0009 10/0/0 9 multiply and add 02 10 10 02 38 2 2 H 020028 2/0/0 28 transfer (A) to N 19 1F 07 01 02 9 £ 7 1 2 09F712 9/1/3 1712 multiply uniform radix 19 1F 0B 1C 02 9 £ 11 + 2 09FBC2 9/1/3 1BC2 multiply uniform radix 19 1F 0B 1C 29 9 £ 11 + I 09FBC9 9/1/3 1BC9 multiply uniform radix 0E 04 10 10 16 . 4 6 0E4006 14/0/2 6 replace selected bits 01 1F 1A 02 15 1 £ 10 2 5 01FA25 1/1/3 1A25 select literal address 01 1F 0B 15 02 1 £ 11 5 2 01FB52 1/1/3 1B52 select literal address 01 1F 0B 15 16 1 £ 11 5 6 01FB56 1/1/3 1B56 select literal address 01 1F 1A 1C 04 1 £ 10 + 4 01FAC4 1/1/3 1AC4 select literal address 01 1F 1A 02 13 1 £ 10 2 3 01FA23 1/1/3 1A23 select literal address 01 1F 1A 1C 15 1 £ 10 + 5 01FAC5 1/1/3 1AC5 select literal address 01 1F 1A 0D 6E 1 £ 10 : be 01FADE 1/1/3 1ADE select literal address 10 01 1F 07 0E 1 £ 7 . 001F7E 0/0/0 1F7E Halt 3B 15 1F 08 15 * 5 £ 8 5 1B5F85 27/0/2 1F85 jump A >= Z 16 01 1F 1A 01 6 1 £ 10 1 061FA1 6/0/0 1FA1 select (N) 07 01 1F 0B 08 7 1 £ 11 8 071FB8 7/0/0 1FB8 augment (N) by (A) 16 01 1F 0B 08 6 1 £ 11 8 061FB8 6/0/0 1FB8 select (N) 15 01 1F 0B 19 5 1 £ 11 9 051FB9 5/0/0 1FB9 subtract (N) from (A) 3B 13 1F 04 07 * 3 £ 4 7 1B3F47 27/0/1 1F47 jump A != Z 38 19 1F 10 15 H 9 £ 5 189F05 24/1/0 1F05 unconditional jump 10 10 10 10 10 000000 0/0/0 0 Halt 38 19 1F 08 08 H 9 £ 8 8 189F88 24/1/0 1F88 unconditional jump 38 19 0D 1A 0D H 9 : 10 : 189DAD 24/1/0 1DAD unconditional jump 16 01 1F 0B 02 6 1 £ 11 2 061FB2 6/0/0 1FB2 select (N) 3B 13 0E 0D 07 * 3 . : 7 1B3ED7 27/0/1 1ED7 jump A != Z 16 01 1F 1A 1F 6 1 £ 10 £ 061FAF 6/0/0 1FAF select (N) 32 10 10 10 04 B 4 120004 18/0/0 4 shift logical 6E 00 00 00 00 be 1C 01 1A 10 10 + 1 10 0C1A00 12/0/0 1A00 convert 1A 02 01 1F 0B 10 2 1 £ 11 0A21FB 10/0/1 1FB multiply and add 1A 16 01 1F 1A 10 6 1 £ 10 0A61FA 10/0/3 1FA multiply and add 07 02 10 10 10 7 2 072000 7/0/1 0 augment (N) by (A) 19 16 19 1F 1A 9 6 9 £ 10 0969FA 9/0/3 9FA multiply uniform radix 1A 13 08 10 10 10 3 8 0A3800 10/0/1 1800 multiply and add 1A 02 10 10 10 10 2 0A2000 10/0/1 0 multiply and add 1A 38 08 10 10 10 H 8 0A8800 10/1/0 800 multiply and add 19 10 10 10 02 9 2 090002 9/0/0 2 multiply uniform radix 10 10 10 10 10 000000 0/0/0 0 Halt 1F 10 10 10 10 £ 0F0000 15/0/0 0 collate and add 04 10 01 1C 04 4 1 + 4 0401C4 4/0/0 1C4 add (N) to (A) 16 10 01 1F 1C 6 1 £ + 0601FC 6/0/0 1FC select (N) 10 10 04 10 10 4 000400 0/0/0 400 Halt 10 6E 00 00 00 be 00E000 0/1/3 0 Invalid 19 1A 10 10 10 9 10 09A000 9/1/1 0 multiply uniform radix 1A 10 10 04 10 10 4 0A0040 10/0/0 40 multiply and add 10 10 1F 01 1F £ 1 £ 000F1F 0/0/0 F1F Halt 1C 10 1F 01 1F + £ 1 £ 0C0F1F 12/0/0 F1F convert 0E 10 19 16 19 . 9 6 9 0E0969 14/0/0 969 replace selected bits 16 19 16 19 16 6 9 6 9 6 069696 6/1/0 1696 select (N) 19 16 10 10 10 9 6 096000 9/0/3 0 multiply uniform radix 01 04 10 10 10 1 4 014000 1/0/2 0 round off 10 02 10 10 10 2 002000 0/0/1 0 Invalid 10 01 10 10 10 1 001000 0/0/0 1000 Halt 01 1C 10 10 10 1 + 01C000 1/1/2 0 subtract literal address 10 10 07 0E 10 7 . 0007E0 0/0/0 7E0 Halt 10 10 10 07 1F 7 £ 00007F 0/0/0 7F Halt 1F 1F 2A 07 1F £ £ = 7 £ 0FFA7F 15/1/3 1A7F collate and add 0B 1A 6E 00 00 11 10 be 0BAE00 11/1/1 E00 multiply and subtract 1F 1A 08 10 10 £ 10 8 0FA800 15/1/1 800 collate and add 10 10 10 10 10 000000 0/0/0 0 Halt 10 1A 10 29 0B 10 I 11 00A09B 0/1/1 9B replace registers 1F 1F 1F 2A 13 £ £ £ = 3 0FFFA3 15/1/3 1FA3 collate and add 1F 1A 0E 10 01 £ 10 . 1 0FAE01 15/1/1 E01 collate and add 1C 0E 08 10 01 + . 8 1 0CE801 12/1/3 801 convert 1C 0E 08 10 01 + . 8 1 0CE801 12/1/3 801 convert 0B 07 1A 10 10 11 7 10 0B7A00 11/0/3 1A00 multiply and subtract 10 10 1F 10 10 £ 000F00 0/0/0 F00 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 01 10 10 1 000100 0/0/0 100 Halt 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 01 1F 0B 16 10 1 £ 11 6 01FB60 1/1/3 1B60 select literal address 10 10 01 19 10 1 9 000190 0/0/0 190 Halt 10 10 02 10 10 2 000200 0/0/0 200 Halt 01 1F 1C 1C 10 1 £ + + 01FCC0 1/1/3 1CC0 select literal address 01 1F 0D 1C 1F 1 £ : + £ 01FDCF 1/1/3 1DCF select literal address 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 13 0E 08 10 3 . 8 003E80 0/0/1 1E80 Invalid 10 07 0D 02 10 7 : 2 007D20 0/0/3 1D20 set radix 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 1C + 00000C 0/0/0 C Halt 04 0E 04 02 10 4 . 4 2 04E420 4/1/3 420 add (N) to (A) 10 04 01 04 10 4 1 4 004140 0/0/2 140 replace (B) by (N) 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 6E be 00000E 0/0/0 E Halt 10 01 1F 1C 04 1 £ + 4 001FC4 0/0/0 1FC4 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 38 1C 10 08 10 H + 8 18C080 24/1/2 80 modify address of next 01 16 1F 1C 10 1 6 £ + 016FC0 1/0/3 FC0 interchange area addresses 29 0E 08 10 10 I . 8 19E800 25/1/3 800 conditional Halt 38 1C 10 08 10 H + 8 18C080 24/1/2 80 modify address of next 23 02 10 10 10 C 2 132000 19/0/1 0 input one block/reset timer 02 01 1F 0D 10 2 1 £ : 021FD0 2/0/0 1FD0 transfer (A) to N 15 01 1F 1C 1F 5 1 £ + £ 051FCF 5/0/0 1FCF subtract (N) from (A) 07 10 10 08 10 7 8 070080 7/0/0 80 augment (N) by (A) 38 19 1F 0D 01 H 9 £ : 1 189FD1 24/1/0 1FD1 unconditional jump 10 10 10 04 10 4 000040 0/0/0 40 Halt 10 10 10 01 1C 1 + 00001C 0/0/0 1C Halt 38 19 0E 0B 16 H 9 . 11 6 189EB6 24/1/0 1EB6 unconditional jump 6E 00 00 00 00 be 10 10 10 08 1C 8 + 00008C 0/0/0 8C Halt 10 10 10 08 1C 8 + 00008C 0/0/0 8C Halt 10 10 10 19 08 9 8 000098 0/0/0 98 Halt 10 10 10 08 1C 8 + 00008C 0/0/0 8C Halt 10 10 10 19 08 9 8 000098 0/0/0 98 Halt 10 10 10 08 1C 8 + 00008C 0/0/0 8C Halt 10 10 10 10 0E . 00000E 0/0/0 E Halt 10 10 01 19 19 1 9 9 000199 0/0/0 199 Halt 10 10 10 10 01 1 000001 0/0/0 1 Halt 10 10 10 10 01 1 000001 0/0/0 1 Halt 01 16 07 16 16 1 6 7 6 6 016766 1/0/3 766 interchange area addresses 10 01 1F 1F 1F 1 £ £ £ 001FFF 0/0/0 1FFF Halt 29 0B 10 10 10 I 11 19B000 25/1/1 1000 clear indicators 01 1F 1F 0D 0E 1 £ £ : . 01FFDE 1/1/3 1FDE select literal address 02 10 10 15 08 2 5 8 020058 2/0/0 58 transfer (A) to N 6E 00 00 00 00 be 10 10 10 19 10 9 000090 0/0/0 90 Halt 23 02 10 01 08 C 2 1 8 132018 19/0/1 18 input one block/reset timer 2A 08 10 01 08 = 8 1 8 1A8018 26/1/0 18 test route N1 10 01 1F 0D 0B 1 £ : 11 001FDB 0/0/0 1FDB Halt 38 08 10 19 01 H 8 9 1 188091 24/1/0 91 unconditional jump 10 01 1F 0D 1F 1 £ : £ 001FDF 0/0/0 1FDF Halt 10 10 10 02 10 2 000020 0/0/0 20 Halt 16 08 10 19 04 6 8 9 4 068094 6/1/0 94 select (N) 2C 19 1F 1F 1F ' 9 £ £ £ 1C9FFF 28/1/0 1FFF bulk copy alpha to short 38 19 1F 1F 1F H 9 £ £ £ 189FFF 24/1/0 1FFF unconditional jump 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 6E 00 00 00 00 be 6E 00 00 00 00 be 16 70 70 19 70 6 0 0 9 0 060090 6/0/0 90 select (N) 02 70 70 70 01 2 0 0 0 1 020001 2/0/0 1 transfer (A) to N 10 10 10 10 70 0 000000 0/0/0 0 Halt 38 08 70 70 16 H 8 0 0 6 188006 24/1/0 6 unconditional jump 10 10 13 70 13 3 0 3 000303 0/0/0 303 Halt 10 01 1F 0D 1F 1 £ : £ 001FDF 0/0/0 1FDF Halt 10 10 10 02 70 2 0 000020 0/0/0 20 Halt 38 02 70 70 01 H 2 0 0 1 182001 24/0/1 1 modify address of next 2A 08 70 70 70 = 8 0 0 0 1A8000 26/1/0 0 test route N1 10 10 13 70 01 3 0 1 000301 0/0/0 301 Halt 38 08 70 70 16 H 8 0 0 6 188006 24/1/0 6 unconditional jump 38 08 70 70 13 H 8 0 0 3 188003 24/1/0 3 unconditional jump 10 10 13 70 15 3 0 5 000305 0/0/0 305 Halt 16 08 70 70 04 6 8 0 0 4 068004 6/1/0 4 select (N) 10 16 70 70 07 6 0 0 7 006007 0/0/3 7 set radix 2C 08 70 70 1F ' 8 0 0 £ 1C800F 28/1/0 F bulk copy alpha to short 6E 00 00 00 00 be 16 70 70 01 01 6 0 0 1 1 060011 6/0/0 11 select (N) 02 70 70 70 0D 2 0 0 0 : 02000D 2/0/0 D transfer (A) to N 38 02 70 01 1C H 2 0 1 + 18201C 24/0/1 1C modify address of next 16 70 70 01 0E 6 0 0 1 . 06001E 6/0/0 1E select (N) 15 70 70 01 1C 5 0 0 1 + 05001C 5/0/0 1C subtract (N) from (A) 01 1C 70 70 1F 1 + 0 0 £ 01C00F 1/1/2 F subtract literal address 3B 02 70 01 1A * 2 0 1 10 1B201A 27/0/1 1A jump A != Z 37 70 70 70 1F G 0 0 0 £ 17000F 23/0/0 F step on and test 10 02 70 01 1C 2 0 1 + 00201C 0/0/1 1C Invalid 38 08 70 70 01 H 8 0 0 1 188001 24/1/0 1 unconditional jump 38 08 70 04 0B H 8 0 4 11 18804B 24/1/0 4B unconditional jump 10 10 13 70 0E 3 0 . 00030E 0/0/0 30E Halt 38 08 70 01 1A H 8 0 1 10 18801A 24/1/0 1A unconditional jump 10 10 10 10 70 0 000000 0/0/0 0 Halt 10 10 10 04 0B 4 11 00004B 0/0/0 4B Halt 10 10 10 10 1F £ 00000F 0/0/0 F Halt 6E 00 00 00 00 be 10 10 10 10 70 0 000000 0/0/0 0 Halt 23 70 70 70 70 C 0 0 0 0 130000 19/0/0 0 output 2A 08 70 70 70 = 8 0 0 0 1A8000 26/1/0 0 test route N1 10 10 13 70 01 3 0 1 000301 0/0/0 301 Halt 38 08 70 70 1A H 8 0 0 10 18800A 24/1/0 A unconditional jump 38 08 70 02 07 H 8 0 2 7 188027 24/1/0 27 unconditional jump 10 10 13 70 15 3 0 5 000305 0/0/0 305 Halt 38 16 70 70 08 H 6 0 0 8 186008 24/0/3 8 modify address of next 16 19 1F 0D 1F 6 9 £ : £ 069FDF 6/1/0 1FDF select (N) 15 70 70 02 1A 5 0 0 2 10 05002A 5/0/0 2A subtract (N) from (A) 3B 02 70 02 08 * 2 0 2 8 1B2028 27/0/1 28 jump A != Z 01 0E 70 70 01 1 . 0 0 1 01E001 1/1/3 1 select literal address 07 70 70 02 1A 7 0 0 2 10 07002A 7/0/0 2A augment (N) by (A) 38 16 70 70 08 H 6 0 0 8 186008 24/0/3 8 modify address of next 16 19 1F 0E 01 6 9 £ . 1 069FE1 6/1/0 1FE1 select (N) 10 10 10 01 0E 1 . 00001E 0/0/0 1E Halt 6E 00 00 00 00 be 38 16 70 70 08 H 6 0 0 8 186008 24/0/3 8 modify address of next 38 13 1F 0E 13 H 3 £ . 3 183FE3 24/0/1 1FE3 modify address of next 38 08 70 01 1A H 8 0 1 10 18801A 24/1/0 1A unconditional jump 38 08 70 02 02 H 8 0 2 2 188022 24/1/0 22 unconditional jump 38 08 70 02 70 H 8 0 2 0 188020 24/1/0 20 unconditional jump 38 08 70 01 0E H 8 0 1 . 18801E 24/1/0 1E unconditional jump 23 0E 70 70 70 C . 0 0 0 13E000 19/1/3 0 step on/set manual 02 70 70 02 0B 2 0 0 2 11 02002B 2/0/0 2B transfer (A) to N 2A 02 70 02 0B = 2 0 2 11 1A202B 26/0/1 2B leave subroutine 02 70 70 02 0B 2 0 0 2 11 02002B 2/0/0 2B transfer (A) to N 38 08 70 70 19 H 8 0 0 9 188009 24/1/0 9 unconditional jump 38 16 70 02 0B H 6 0 2 11 18602B 24/0/3 2B modify address of next 02 70 70 70 70 2 0 0 0 0 020000 2/0/0 0 transfer (A) to N 01 0E 70 70 01 1 . 0 0 1 01E001 1/1/3 1 select literal address 07 70 70 02 0B 7 0 0 2 11 07002B 7/0/0 2B augment (N) by (A) 10 10 10 02 0D 2 : 00002D 0/0/0 2D Halt 6E 00 00 00 00 be 38 08 70 70 19 H 8 0 0 9 188009 24/1/0 9 unconditional jump 10 10 13 70 13 3 0 3 000303 0/0/0 303 Halt 10 10 13 70 0E 3 0 . 00030E 0/0/0 30E Halt 38 08 70 02 07 H 8 0 2 7 188027 24/1/0 27 unconditional jump 10 10 10 10 01 1 000001 0/0/0 1 Halt 10 10 10 10 70 0 000000 0/0/0 0 Halt 10 10 10 10 70 0 000000 0/0/0 0 Halt 10 10 10 10 70 0 000000 0/0/0 0 Halt 10 10 10 10 70 0 000000 0/0/0 0 Halt 10 10 10 10 70 0 000000 0/0/0 0 Halt 10 10 10 10 70 0 000000 0/0/0 0 Halt 10 10 10 10 70 0 000000 0/0/0 0 Halt 10 10 10 10 70 0 000000 0/0/0 0 Halt 10 10 10 10 70 0 000000 0/0/0 0 Halt 10 10 10 10 70 0 000000 0/0/0 0 Halt 10 10 10 13 1C 3 + 00003C 0/0/0 3C Halt 6E 00 00 00 00 be 16 70 70 70 01 6 0 0 0 1 060001 6/0/0 1 select (N) 01 02 70 70 13 1 2 0 0 3 012003 1/0/1 3 prepare for digit collation 0E 70 70 01 1F . 0 0 1 £ 0E001F 14/0/0 1F replace selected bits 0E 70 70 02 70 . 0 0 2 0 0E0020 14/0/0 20 replace selected bits 0E 70 70 13 13 . 0 0 3 3 0E0033 14/0/0 33 replace selected bits 10 16 70 01 0E 6 0 1 . 00601E 0/0/3 1E set radix 16 08 70 15 04 6 8 0 5 4 068054 6/1/0 54 select (N) 2C 70 70 70 08 ' 0 0 0 8 1C0008 28/0/0 8 bulk copy short numeric 38 08 70 70 19 H 8 0 0 9 188009 24/1/0 9 unconditional jump 10 02 70 01 0E 2 0 1 . 00201E 0/0/1 1E Invalid 10 10 10 02 04 2 4 000024 0/0/0 24 Halt 10 10 10 10 70 0 000000 0/0/0 0 Halt 10 10 10 10 70 0 000000 0/0/0 0 Halt 10 10 10 10 70 0 000000 0/0/0 0 Halt 10 10 10 10 70 0 000000 0/0/0 0 Halt 10 10 10 04 0B 4 11 00004B 0/0/0 4B Halt 6E 00 00 00 00 be 10 10 10 10 01 1 000001 0/0/0 1 Halt 10 02 70 02 0E 2 0 2 . 00202E 0/0/1 2E Invalid 10 10 20 6E 00 - be 0000E0 0/0/0 E0 Halt 10 10 10 10 02 2 000002 0/0/0 2 Halt 10 10 10 10 70 0 000000 0/0/0 0 Halt 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 10 10 13 3 000003 0/0/0 3 Halt 07 0E 70 70 70 7 . 0 0 0 07E000 7/1/3 0 augment (N) by (A) 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 10 10 04 4 000004 0/0/0 4 Halt 16 08 70 1C 70 6 8 0 + 0 0680C0 6/1/0 C0 select (N) 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 10 10 15 5 000005 0/0/0 5 Halt 04 70 70 0D 1A 4 0 0 : 10 0400DA 4/0/0 DA add (N) to (A) 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 10 10 16 6 000006 0/0/0 6 Halt 2C 02 70 0D 0D ' 2 0 : : 1C20DD 28/0/1 DD bulk copy short numeric 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 10 10 07 7 000007 0/0/0 7 Halt 02 08 70 1F 16 2 8 0 £ 6 0280F6 2/1/0 F6 transfer (A) to N 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 10 10 08 8 000008 0/0/0 8 Halt 38 16 70 0D 1A H 6 0 : 10 1860DA 24/0/3 DA modify address of next 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 10 10 19 9 000009 0/0/0 9 Halt 37 16 70 70 70 G 6 0 0 0 176000 23/0/3 0 select tag 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 10 10 1A 10 00000A 0/0/0 A Halt 13 70 70 1F 02 3 0 0 £ 2 0300F2 3/0/0 F2 copy (A) to N 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 10 10 0B 11 00000B 0/0/0 B Halt 15 70 70 1F 13 5 0 0 £ 3 0500F3 5/0/0 F3 subtract (N) from (A) 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 10 10 1C + 00000C 0/0/0 C Halt 3B 70 70 01 1C * 0 0 1 + 1B001C 27/0/0 1C jump A = Z 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 10 10 0D : 00000D 0/0/0 D Halt 02 70 70 1F 07 2 0 0 £ 7 0200F7 2/0/0 F7 transfer (A) to N 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 10 10 0E . 00000E 0/0/0 E Halt 38 16 70 0D 1A H 6 0 : 10 1860DA 24/0/3 DA modify address of next 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 10 10 1F £ 00000F 0/0/0 F Halt 37 16 70 70 02 G 6 0 0 2 176002 23/0/3 2 select tag 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 10 01 70 1 0 000010 0/0/0 10 Halt 13 70 70 1F 13 3 0 0 £ 3 0300F3 3/0/0 F3 copy (A) to N 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 10 01 01 1 1 000011 0/0/0 11 Halt 15 70 70 1F 02 5 0 0 £ 2 0500F2 5/0/0 F2 subtract (N) from (A) 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 10 01 02 1 2 000012 0/0/0 12 Halt 3B 70 70 02 02 * 0 0 2 2 1B0022 27/0/0 22 jump A = Z 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 10 01 13 1 3 000013 0/0/0 13 Halt 02 70 70 1F 07 2 0 0 £ 7 0200F7 2/0/0 F7 transfer (A) to N 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 10 01 04 1 4 000014 0/0/0 14 Halt 02 70 70 1C 02 2 0 0 + 2 0200C2 2/0/0 C2 transfer (A) to N 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 10 01 15 1 5 000015 0/0/0 15 Halt 38 02 70 1C 02 H 2 0 + 2 1820C2 24/0/1 C2 modify address of next 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 10 01 16 1 6 000016 0/0/0 16 Halt 16 08 70 0D 1C 6 8 0 : + 0680DC 6/1/0 DC select (N) 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 10 01 07 1 7 000017 0/0/0 17 Halt 3B 70 70 13 1A * 0 0 3 10 1B003A 27/0/0 3A jump A = Z 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 10 01 08 1 8 000018 0/0/0 18 Halt 02 08 70 1F 04 2 8 0 £ 4 0280F4 2/1/0 F4 transfer (A) to N 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 10 01 19 1 9 000019 0/0/0 19 Halt 10 04 70 0D 02 4 0 : 2 0040D2 0/0/2 D2 replace (B) by (N) 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 10 01 1A 1 10 00001A 0/0/0 1A Halt 1F 70 70 1F 15 £ 0 0 £ 5 0F00F5 15/0/0 F5 collate and add 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 10 01 0B 1 11 00001B 0/0/0 1B Halt 32 01 70 01 0D B 1 0 1 : 12101D 18/0/0 101D shift logical 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 10 01 1C 1 + 00001C 0/0/0 1C Halt 2A 70 70 08 70 = 0 0 8 0 1A0080 26/0/0 80 enter subroutine 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 10 01 0D 1 : 00001D 0/0/0 1D Halt 10 1C 70 1F 15 + 0 £ 5 00C0F5 0/1/2 F5 replace (B) by (N) 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 10 01 0E 1 . 00001E 0/0/0 1E Halt 02 70 70 1F 04 2 0 0 £ 4 0200F4 2/0/0 F4 transfer (A) to N 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 10 01 1F 1 £ 00001F 0/0/0 1F Halt 32 08 70 70 16 B 8 0 0 6 128006 18/1/0 6 shift logical 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 10 02 70 2 0 000020 0/0/0 20 Halt 16 70 70 1F 04 6 0 0 £ 4 0600F4 6/0/0 F4 select (N) 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 10 02 01 2 1 000021 0/0/0 21 Halt 32 16 70 70 13 B 6 0 0 3 126003 18/0/3 3 shift binary 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 10 02 02 2 2 000022 0/0/0 22 Halt 32 0E 70 70 01 B . 0 0 1 12E001 18/1/3 1 shift binary 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 10 02 13 2 3 000023 0/0/0 23 Halt 32 16 70 70 02 B 6 0 0 2 126002 18/0/3 2 shift binary 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 10 02 04 2 4 000024 0/0/0 24 Halt 32 0E 70 70 02 B . 0 0 2 12E002 18/1/3 2 shift binary 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 10 02 15 2 5 000025 0/0/0 25 Halt 02 70 70 1F 15 2 0 0 £ 5 0200F5 2/0/0 F5 transfer (A) to N 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 10 02 16 2 6 000026 0/0/0 26 Halt 32 0E 70 70 0D B . 0 0 : 12E00D 18/1/3 D shift binary 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 10 02 07 2 7 000027 0/0/0 27 Halt 2A 70 70 08 70 = 0 0 8 0 1A0080 26/0/0 80 enter subroutine 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 10 02 08 2 8 000028 0/0/0 28 Halt 02 70 70 1F 04 2 0 0 £ 4 0200F4 2/0/0 F4 transfer (A) to N 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 10 02 19 2 9 000029 0/0/0 29 Halt 16 08 70 1F 04 6 8 0 £ 4 0680F4 6/1/0 F4 select (N) 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 10 02 1A 2 10 00002A 0/0/0 2A Halt 38 02 70 1C 02 H 2 0 + 2 1820C2 24/0/1 C2 modify address of next 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 10 02 0B 2 11 00002B 0/0/0 2B Halt 02 08 70 0D 1C 2 8 0 : + 0280DC 2/1/0 DC transfer (A) to N 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 10 02 1C 2 + 00002C 0/0/0 2C Halt 37 70 70 70 02 G 0 0 0 2 170002 23/0/0 2 step on and test 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 10 02 0D 2 : 00002D 0/0/0 2D Halt 10 02 70 1C 02 2 0 + 2 0020C2 0/0/1 C2 Invalid 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 10 02 0E 2 . 00002E 0/0/0 2E Halt 38 08 70 02 13 H 8 0 2 3 188023 24/1/0 23 unconditional jump 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 10 02 1F 2 £ 00002F 0/0/0 2F Halt 16 70 70 1F 07 6 0 0 £ 7 0600F7 6/0/0 F7 select (N) 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 10 13 70 3 0 000030 0/0/0 30 Halt 3B 70 70 16 70 * 0 0 6 0 1B0060 27/0/0 60 jump A = Z 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 10 13 01 3 1 000031 0/0/0 31 Halt 10 02 70 15 0D 2 0 5 : 00205D 0/0/1 5D Invalid 10 10 20 6E 00 - be 0000E0 0/0/0 E0 Halt 10 10 10 13 02 3 2 000032 0/0/0 32 Halt 16 08 70 1C 70 6 8 0 + 0 0680C0 6/1/0 C0 select (N) 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 10 13 13 3 3 000033 0/0/0 33 Halt 04 70 70 0D 1A 4 0 0 : 10 0400DA 4/0/0 DA add (N) to (A) 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 10 13 04 3 4 000034 0/0/0 34 Halt 2C 70 70 0E 1A ' 0 0 . 10 1C00EA 28/0/0 EA bulk copy short numeric 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 10 13 15 3 5 000035 0/0/0 35 Halt 16 08 70 0E 1A 6 8 0 . 10 0680EA 6/1/0 EA select (N) 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 10 13 16 3 6 000036 0/0/0 36 Halt 2A 70 70 16 07 = 0 0 6 7 1A0067 26/0/0 67 enter subroutine 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 10 13 07 3 7 000037 0/0/0 37 Halt 02 08 70 0E 0E 2 8 0 . . 0280EE 2/1/0 EE transfer (A) to N 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 10 13 08 3 8 000038 0/0/0 38 Halt 16 08 70 0E 1C 6 8 0 . + 0680EC 6/1/0 EC select (N) 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 10 13 19 3 9 000039 0/0/0 39 Halt 2A 70 70 16 07 = 0 0 6 7 1A0067 26/0/0 67 enter subroutine 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 10 13 1A 3 10 00003A 0/0/0 3A Halt 02 08 70 1F 70 2 8 0 £ 0 0280F0 2/1/0 F0 transfer (A) to N 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 10 13 0B 3 11 00003B 0/0/0 3B Halt 38 02 70 0D 1A H 2 0 : 10 1820DA 24/0/1 DA modify address of next 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 10 13 1C 3 + 00003C 0/0/0 3C Halt 01 0E 70 70 70 1 . 0 0 0 01E000 1/1/3 0 select literal address 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 10 13 0D 3 : 00003D 0/0/0 3D Halt 2A 70 70 08 70 = 0 0 8 0 1A0080 26/0/0 80 enter subroutine 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 10 13 0E 3 . 00003E 0/0/0 3E Halt 02 70 70 1F 04 2 0 0 £ 4 0200F4 2/0/0 F4 transfer (A) to N 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 10 13 1F 3 £ 00003F 0/0/0 3F Halt 10 04 70 0D 1A 4 0 : 10 0040DA 0/0/2 DA replace (B) by (N) 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 10 04 70 4 0 000040 0/0/0 40 Halt 32 0E 70 01 0B B . 0 1 11 12E01B 18/1/3 1B shift binary 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 10 04 01 4 1 000041 0/0/0 41 Halt 32 70 70 70 04 B 0 0 0 4 120004 18/0/0 4 shift logical 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 10 04 02 4 2 000042 0/0/0 42 Halt 07 70 70 1F 04 7 0 0 £ 4 0700F4 7/0/0 F4 augment (N) by (A) 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 10 04 13 4 3 000043 0/0/0 43 Halt 10 02 70 16 0E 2 0 6 . 00206E 0/0/1 6E Invalid 10 10 20 6E 00 - be 0000E0 0/0/0 E0 Halt 10 10 10 04 04 4 4 000044 0/0/0 44 Halt 16 70 70 16 16 6 0 0 6 6 060066 6/0/0 66 select (N) 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 10 04 15 4 5 000045 0/0/0 45 Halt 38 16 70 01 70 H 6 0 1 0 186010 24/0/3 10 modify address of next 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 10 04 16 4 6 000046 0/0/0 46 Halt 02 70 70 70 70 2 0 0 0 0 020000 2/0/0 0 transfer (A) to N 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 10 04 07 4 7 000047 0/0/0 47 Halt 2A 70 70 07 19 = 0 0 7 9 1A0079 26/0/0 79 enter subroutine 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 10 04 08 4 8 000048 0/0/0 48 Halt 38 04 70 08 08 H 4 0 8 8 184088 24/0/2 88 select literal and division 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 10 04 19 4 9 000049 0/0/0 49 Halt 38 16 70 01 70 H 6 0 1 0 186010 24/0/3 10 modify address of next 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 10 04 1A 4 10 00004A 0/0/0 4A Halt 2C 0D 1F 0E 70 ' : £ . 0 1CDFE0 28/1/2 1FE0 edit fixed field formats 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 10 04 0B 4 11 00004B 0/0/0 4B Halt 38 08 70 15 1C H 8 0 5 + 18805C 24/1/0 5C unconditional jump 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 10 04 1C 4 + 00004C 0/0/0 4C Halt 16 08 70 1C 08 6 8 0 + 8 0680C8 6/1/0 C8 select (N) 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 10 04 0D 4 : 00004D 0/0/0 4D Halt 2C 1A 70 1F 08 ' 10 0 £ 8 1CA0F8 28/1/1 F8 bulk copy long numeric 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 10 04 0E 4 . 00004E 0/0/0 4E Halt 01 1F 1F 0D 0E 1 £ £ : . 01FFDE 1/1/3 1FDE select literal address 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 10 04 1F 4 £ 00004F 0/0/0 4F Halt 3D 02 70 1F 08 ? 2 0 £ 8 1D20F8 29/0/1 F8 edit for anelex output 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 10 15 70 5 0 000050 0/0/0 50 Halt 23 70 70 70 70 C 0 0 0 0 130000 19/0/0 0 output 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 10 15 01 5 1 000051 0/0/0 51 Halt 16 70 70 16 15 6 0 0 6 5 060065 6/0/0 65 select (N) 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 10 15 02 5 2 000052 0/0/0 52 Halt 38 16 70 01 70 H 6 0 1 0 186010 24/0/3 10 modify address of next 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 10 15 13 5 3 000053 0/0/0 53 Halt 02 70 70 70 70 2 0 0 0 0 020000 2/0/0 0 transfer (A) to N 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 10 15 04 5 4 000054 0/0/0 54 Halt 37 70 70 70 04 G 0 0 0 4 170004 23/0/0 4 step on and test 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 10 15 15 5 5 000055 0/0/0 55 Halt 10 02 70 0D 1A 2 0 : 10 0020DA 0/0/1 DA Invalid 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 10 15 16 5 6 000056 0/0/0 56 Halt 38 08 70 01 02 H 8 0 1 2 188012 24/1/0 12 unconditional jump 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 10 15 07 5 7 000057 0/0/0 57 Halt 38 08 70 0E 15 H 8 0 . 5 1880E5 24/1/0 E5 unconditional jump 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 10 15 08 5 8 000058 0/0/0 58 Halt 38 08 70 16 13 H 8 0 6 3 188063 24/1/0 63 unconditional jump 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 10 15 19 5 9 000059 0/0/0 59 Halt 10 10 10 10 70 0 000000 0/0/0 0 Halt 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 10 15 1A 5 10 00005A 0/0/0 5A Halt 1F 01 1F 0D 0E £ 1 £ : . 0F1FDE 15/0/0 1FDE collate and add 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 10 15 0B 5 11 00005B 0/0/0 5B Halt 10 02 70 08 15 2 0 8 5 002085 0/0/1 85 Invalid 10 10 20 6E 00 - be 0000E0 0/0/0 E0 Halt 10 10 10 15 1C 5 + 00005C 0/0/0 5C Halt 10 10 10 10 70 0 000000 0/0/0 0 Halt 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 10 15 0D 5 : 00005D 0/0/0 5D Halt 02 08 70 1F 04 2 8 0 £ 4 0280F4 2/1/0 F4 transfer (A) to N 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 10 15 0E 5 . 00005E 0/0/0 5E Halt 01 02 04 70 70 1 2 4 0 0 012400 1/0/1 400 prepare for digit collation 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 10 15 1F 5 £ 00005F 0/0/0 5F Halt 0E 08 70 1F 04 . 8 0 £ 4 0E80F4 14/1/0 F4 replace selected bits 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 10 16 70 6 0 000060 0/0/0 60 Halt 10 04 70 0D 13 4 0 : 3 0040D3 0/0/2 D3 replace (B) by (N) 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 10 16 01 6 1 000061 0/0/0 61 Halt 1F 08 70 1F 04 £ 8 0 £ 4 0F80F4 15/1/0 F4 collate and add 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 10 16 02 6 2 000062 0/0/0 62 Halt 1F 08 70 1C 04 £ 8 0 + 4 0F80C4 15/1/0 C4 collate and add 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 10 16 13 6 3 000063 0/0/0 63 Halt 3B 70 70 07 01 * 0 0 7 1 1B0071 27/0/0 71 jump A = Z 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 10 16 04 6 4 000064 0/0/0 64 Halt 1F 08 70 1C 16 £ 8 0 + 6 0F80C6 15/1/0 C6 collate and add 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 10 16 15 6 5 000065 0/0/0 65 Halt 3B 02 70 07 04 * 2 0 7 4 1B2074 27/0/1 74 jump A != Z 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 10 16 16 6 6 000066 0/0/0 66 Halt 0E 08 70 1F 04 . 8 0 £ 4 0E80F4 14/1/0 F4 replace selected bits 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 10 16 07 6 7 000067 0/0/0 67 Halt 01 0E 70 15 0B 1 . 0 5 11 01E05B 1/1/3 5B select literal address 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 10 16 08 6 8 000068 0/0/0 68 Halt 02 70 70 1F 16 2 0 0 £ 6 0200F6 2/0/0 F6 transfer (A) to N 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 10 16 19 6 9 000069 0/0/0 69 Halt 32 08 70 70 02 B 8 0 0 2 128002 18/1/0 2 shift logical 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 10 16 1A 6 10 00006A 0/0/0 6A Halt 01 0E 70 70 70 1 . 0 0 0 01E000 1/1/3 0 select literal address 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 10 16 0B 6 11 00006B 0/0/0 6B Halt 3B 1A 70 16 1C * 10 0 6 + 1BA06C 27/1/1 6C jump AB != Z 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 10 16 1C 6 + 00006C 0/0/0 6C Halt 16 08 70 1F 04 6 8 0 £ 4 0680F4 6/1/0 F4 select (N) 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 10 16 0D 6 : 00006D 0/0/0 6D Halt 2A 02 70 16 07 = 2 0 6 7 1A2067 26/0/1 67 leave subroutine 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 10 16 0E 6 . 00006E 0/0/0 6E Halt 10 02 70 19 07 2 0 9 7 002097 0/0/1 97 Invalid 10 10 20 6E 00 - be 0000E0 0/0/0 E0 Halt 10 10 10 16 1F 6 £ 00006F 0/0/0 6F Halt 10 10 10 10 70 0 000000 0/0/0 0 Halt 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 10 07 70 7 0 000070 0/0/0 70 Halt 2A 08 70 70 70 = 8 0 0 0 1A8000 26/1/0 0 test route N1 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 10 07 01 7 1 000071 0/0/0 71 Halt 10 10 1F 70 01 £ 0 1 000F01 0/0/0 F01 Halt 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 10 07 02 7 2 000072 0/0/0 72 Halt 38 08 70 07 1A H 8 0 7 10 18807A 24/1/0 7A unconditional jump 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 10 07 13 7 3 000073 0/0/0 73 Halt 38 16 70 0D 15 H 6 0 : 5 1860D5 24/0/3 D5 modify address of next 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 10 07 04 7 4 000074 0/0/0 74 Halt 10 10 1F 70 15 £ 0 5 000F05 0/0/0 F05 Halt 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 10 07 15 7 5 000075 0/0/0 75 Halt 2A 02 70 07 19 = 2 0 7 9 1A2079 26/0/1 79 leave subroutine 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 10 07 16 7 6 000076 0/0/0 76 Halt 10 10 10 10 70 0 000000 0/0/0 0 Halt 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 10 07 07 7 7 000077 0/0/0 77 Halt 02 70 70 07 19 2 0 0 7 9 020079 2/0/0 79 transfer (A) to N 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 10 07 08 7 8 000078 0/0/0 78 Halt 10 16 70 0D 04 6 0 : 4 0060D4 0/0/3 D4 set radix 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 10 07 19 7 9 000079 0/0/0 79 Halt 38 04 70 1C 1A H 4 0 + 10 1840CA 24/0/2 CA select literal and division 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 10 07 1A 7 10 00007A 0/0/0 7A Halt 13 70 70 1F 07 3 0 0 £ 7 0300F7 3/0/0 F7 copy (A) to N 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 10 07 0B 7 11 00007B 0/0/0 7B Halt 1C 70 70 07 19 + 0 0 7 9 0C0079 12/0/0 79 convert 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 10 07 1C 7 + 00007C 0/0/0 7C Halt 10 16 70 01 70 6 0 1 0 006010 0/0/3 10 set radix 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 10 07 0D 7 : 00007D 0/0/0 7D Halt 2A 02 70 08 70 = 2 0 8 0 1A2080 26/0/1 80 leave subroutine 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 10 07 0E 7 . 00007E 0/0/0 7E Halt 10 02 70 1A 16 2 0 10 6 0020A6 0/0/1 A6 Invalid 10 10 20 6E 00 - be 0000E0 0/0/0 E0 Halt 10 10 10 07 1F 7 £ 00007F 0/0/0 7F Halt 38 16 70 02 0E H 6 0 2 . 18602E 24/0/3 2E modify address of next 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 10 08 70 8 0 000080 0/0/0 80 Halt 16 70 70 19 19 6 0 0 9 9 060099 6/0/0 99 select (N) 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 10 08 01 8 1 000081 0/0/0 81 Halt 02 70 70 1A 16 2 0 0 10 6 0200A6 2/0/0 A6 transfer (A) to N 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 10 08 02 8 2 000082 0/0/0 82 Halt 01 02 70 70 08 1 2 0 0 8 012008 1/0/1 8 prepare for digit collation 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 10 08 13 8 3 000083 0/0/0 83 Halt 1F 70 70 1A 16 £ 0 0 10 6 0F00A6 15/0/0 A6 collate and add 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 10 08 04 8 4 000084 0/0/0 84 Halt 02 70 70 1F 19 2 0 0 £ 9 0200F9 2/0/0 F9 transfer (A) to N 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 10 08 15 8 5 000085 0/0/0 85 Halt 01 02 70 70 04 1 2 0 0 4 012004 1/0/1 4 prepare for digit collation 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 10 08 16 8 6 000086 0/0/0 86 Halt 1F 70 70 1A 16 £ 0 0 10 6 0F00A6 15/0/0 A6 collate and add 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 10 08 07 8 7 000087 0/0/0 87 Halt 32 70 70 70 01 B 0 0 0 1 120001 18/0/0 1 shift logical 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 10 08 08 8 8 000088 0/0/0 88 Halt 07 70 70 1F 15 7 0 0 £ 5 0700F5 7/0/0 F5 augment (N) by (A) 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 10 08 19 8 9 000089 0/0/0 89 Halt 16 70 70 0D 02 6 0 0 : 2 0600D2 6/0/0 D2 select (N) 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 10 08 1A 8 10 00008A 0/0/0 8A Halt 02 70 70 1F 08 2 0 0 £ 8 0200F8 2/0/0 F8 transfer (A) to N 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 10 08 0B 8 11 00008B 0/0/0 8B Halt 01 02 70 70 13 1 2 0 0 3 012003 1/0/1 3 prepare for digit collation 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 10 08 1C 8 + 00008C 0/0/0 8C Halt 1F 70 70 1A 16 £ 0 0 10 6 0F00A6 15/0/0 A6 collate and add 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 10 08 0D 8 : 00008D 0/0/0 8D Halt 13 70 70 1A 07 3 0 0 10 7 0300A7 3/0/0 A7 copy (A) to N 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 10 08 0E 8 . 00008E 0/0/0 8E Halt 0E 70 70 07 1A . 0 0 7 10 0E007A 14/0/0 7A replace selected bits 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 10 08 1F 8 £ 00008F 0/0/0 8F Halt 0E 70 70 19 08 . 0 0 9 8 0E0098 14/0/0 98 replace selected bits 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 10 19 70 9 0 000090 0/0/0 90 Halt 01 1A 70 04 70 1 10 0 4 0 01A040 1/1/1 40 add literal address 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 10 19 01 9 1 000091 0/0/0 91 Halt 0E 70 70 07 70 . 0 0 7 0 0E0070 14/0/0 70 replace selected bits 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 10 19 02 9 2 000092 0/0/0 92 Halt 0E 70 70 07 0D . 0 0 7 : 0E007D 14/0/0 7D replace selected bits 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 10 19 13 9 3 000093 0/0/0 93 Halt 16 70 70 1A 16 6 0 0 10 6 0600A6 6/0/0 A6 select (N) 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 10 19 04 9 4 000094 0/0/0 94 Halt 32 01 70 01 1C B 1 0 1 + 12101C 18/0/0 101C shift logical 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 10 19 15 9 5 000095 0/0/0 95 Halt 01 1C 70 70 19 1 + 0 0 9 01C009 1/1/2 9 subtract literal address 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 10 19 16 9 6 000096 0/0/0 96 Halt 3B 70 70 1C 08 * 0 0 + 8 1B00C8 27/0/0 C8 jump A = Z 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 10 19 07 9 7 000097 0/0/0 97 Halt 16 70 70 0D 13 6 0 0 : 3 0600D3 6/0/0 D3 select (N) 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 10 19 08 9 8 000098 0/0/0 98 Halt 02 70 70 07 01 2 0 0 7 1 020071 2/0/0 71 transfer (A) to N 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 10 19 19 9 9 000099 0/0/0 99 Halt 16 70 70 0D 04 6 0 0 : 4 0600D4 6/0/0 D4 select (N) 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 10 19 1A 9 10 00009A 0/0/0 9A Halt 02 70 70 07 15 2 0 0 7 5 020075 2/0/0 75 transfer (A) to N 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 10 19 0B 9 11 00009B 0/0/0 9B Halt 16 70 70 0D 15 6 0 0 : 5 0600D5 6/0/0 D5 select (N) 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 10 19 1C 9 + 00009C 0/0/0 9C Halt 02 70 70 08 04 2 0 0 8 4 020084 2/0/0 84 transfer (A) to N 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 10 19 0D 9 : 00009D 0/0/0 9D Halt 16 70 70 0D 16 6 0 0 : 6 0600D6 6/0/0 D6 select (N) 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 10 19 0E 9 . 00009E 0/0/0 9E Halt 02 70 70 1F 1F 2 0 0 £ £ 0200FF 2/0/0 FF transfer (A) to N 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 10 19 1F 9 £ 00009F 0/0/0 9F Halt 16 08 70 0D 1C 6 8 0 : + 0680DC 6/1/0 DC select (N) 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 10 1A 70 10 0 0000A0 0/0/0 A0 Halt 02 08 01 70 04 2 8 1 0 4 028104 2/1/0 104 transfer (A) to N 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 10 1A 01 10 1 0000A1 0/0/0 A1 Halt 38 16 70 1A 07 H 6 0 10 7 1860A7 24/0/3 A7 modify address of next 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 10 1A 02 10 2 0000A2 0/0/0 A2 Halt 16 70 70 04 70 6 0 0 4 0 060040 6/0/0 40 select (N) 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 10 1A 13 10 3 0000A3 0/0/0 A3 Halt 02 70 70 08 13 2 0 0 8 3 020083 2/0/0 83 transfer (A) to N 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 10 1A 04 10 4 0000A4 0/0/0 A4 Halt 16 70 70 08 04 6 0 0 8 4 060084 6/0/0 84 select (N) 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 10 1A 15 10 5 0000A5 0/0/0 A5 Halt 38 16 70 1A 07 H 6 0 10 7 1860A7 24/0/3 A7 modify address of next 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 10 1A 16 10 6 0000A6 0/0/0 A6 Halt 02 70 70 04 70 2 0 0 4 0 020040 2/0/0 40 transfer (A) to N 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 10 1A 07 10 7 0000A7 0/0/0 A7 Halt 38 04 70 0D 0E H 4 0 : . 1840DE 24/0/2 DE select literal and division 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 10 1A 08 10 8 0000A8 0/0/0 A8 Halt 38 16 70 02 0E H 6 0 2 . 18602E 24/0/3 2E modify address of next 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 10 1A 19 10 9 0000A9 0/0/0 A9 Halt 2C 0D 1F 1F 0E ' : £ £ . 1CDFFE 28/1/2 1FFE edit fixed field formats 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 10 1A 1A 10 10 0000AA 0/0/0 AA Halt 38 08 70 70 19 H 8 0 0 9 188009 24/1/0 9 unconditional jump 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 10 1A 0B 10 11 0000AB 0/0/0 AB Halt 10 02 70 0D 02 2 0 : 2 0020D2 0/0/1 D2 Invalid 10 10 20 6E 00 - be 0000E0 0/0/0 E0 Halt 10 10 10 1A 1C 10 + 0000AC 0/0/0 AC Halt 1F 1F 1F 1F 1C £ £ £ £ + 0FFFFC 15/1/3 1FFC collate and add 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 10 1A 0D 10 : 0000AD 0/0/0 AD Halt 29 08 70 70 70 I 8 0 0 0 198000 25/1/0 0 set indicators 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 10 1A 0E 10 . 0000AE 0/0/0 AE Halt 2A 70 70 07 19 = 0 0 7 9 1A0079 26/0/0 79 enter subroutine 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 10 1A 1F 10 £ 0000AF 0/0/0 AF Halt 1F 02 70 1F 08 £ 2 0 £ 8 0F20F8 15/0/1 F8 collate and add 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 10 0B 70 11 0 0000B0 0/0/0 B0 Halt 16 08 01 70 1A 6 8 1 0 10 06810A 6/1/0 10A select (N) 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 10 0B 01 11 1 0000B1 0/0/0 B1 Halt 10 02 70 0D 08 2 0 : 8 0020D8 0/0/1 D8 Invalid 10 10 20 6E 00 - be 0000E0 0/0/0 E0 Halt 10 10 10 0B 02 11 2 0000B2 0/0/0 B2 Halt 19 02 16 02 15 9 2 6 2 5 092625 9/0/1 625 multiply uniform radix 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 10 0B 13 11 3 0000B3 0/0/0 B3 Halt 02 04 13 01 02 2 4 3 1 2 024312 2/0/2 312 transfer (A) to N 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 10 0B 04 11 4 0000B4 0/0/0 B4 Halt 01 13 13 13 0E 1 3 3 3 . 01333E 1/0/1 133E prepare for digit collation 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 10 0B 15 11 5 0000B5 0/0/0 B5 Halt 10 10 10 10 01 1 000001 0/0/0 1 Halt 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 10 0B 16 11 6 0000B6 0/0/0 B6 Halt 10 10 10 10 70 0 000000 0/0/0 0 Halt 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 10 0B 07 11 7 0000B7 0/0/0 B7 Halt 08 70 70 70 70 8 0 0 0 0 080000 8/0/0 0 merge constant length 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 10 0B 08 11 8 0000B8 0/0/0 B8 Halt 10 02 70 0D 0E 2 0 : . 0020DE 0/0/1 DE Invalid 10 10 20 6E 00 - be 0000E0 0/0/0 E0 Halt 10 10 10 0B 19 11 9 0000B9 0/0/0 B9 Halt 10 02 70 0D 08 2 0 : 8 0020D8 0/0/1 D8 Invalid 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 10 0B 1A 11 10 0000BA 0/0/0 BA Halt 13 70 70 70 13 3 0 0 0 3 030003 3/0/0 3 copy (A) to N 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 10 0B 0B 11 11 0000BB 0/0/0 BB Halt 10 02 70 0D 08 2 0 : 8 0020D8 0/0/1 D8 Invalid 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 10 0B 1C 11 + 0000BC 0/0/0 BC Halt 13 70 13 01 02 3 0 3 1 2 030312 3/0/0 312 copy (A) to N 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 10 0B 0D 11 : 0000BD 0/0/0 BD Halt 10 10 10 08 1A 8 10 00008A 0/0/0 8A Halt 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 10 0B 0E 11 . 0000BE 0/0/0 BE Halt 02 01 04 01 02 2 1 4 1 2 021412 2/0/0 1412 transfer (A) to N 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 10 0B 1F 11 £ 0000BF 0/0/0 BF Halt 10 10 10 08 1A 8 10 00008A 0/0/0 8A Halt 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 10 1C 70 + 0 0000C0 0/0/0 C0 Halt 02 01 16 01 02 2 1 6 1 2 021612 2/0/0 1612 transfer (A) to N 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 10 1C 01 + 1 0000C1 0/0/0 C1 Halt 10 10 10 08 1A 8 10 00008A 0/0/0 8A Halt 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 10 1C 02 + 2 0000C2 0/0/0 C2 Halt 02 70 08 01 02 2 0 8 1 2 020812 2/0/0 812 transfer (A) to N 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 10 1C 13 + 3 0000C3 0/0/0 C3 Halt 10 02 70 0D 1A 2 0 : 10 0020DA 0/0/1 DA Invalid 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 10 1C 04 + 4 0000C4 0/0/0 C4 Halt 13 70 02 01 02 3 0 2 1 2 030212 3/0/0 212 copy (A) to N 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 10 1C 15 + 5 0000C5 0/0/0 C5 Halt 10 10 10 19 1C 9 + 00009C 0/0/0 9C Halt 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 10 1C 16 + 6 0000C6 0/0/0 C6 Halt 10 01 70 01 02 1 0 1 2 001012 0/0/0 1012 Halt 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 10 1C 07 + 7 0000C7 0/0/0 C7 Halt 10 10 10 19 1C 9 + 00009C 0/0/0 9C Halt 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 10 1C 08 + 8 0000C8 0/0/0 C8 Halt 10 10 02 01 02 2 1 2 000212 0/0/0 212 Halt 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 10 1C 19 + 9 0000C9 0/0/0 C9 Halt 10 02 70 0D 1A 2 0 : 10 0020DA 0/0/1 DA Invalid 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 10 1C 1A + 10 0000CA 0/0/0 CA Halt 23 70 04 70 01 C 0 4 0 1 130401 19/0/0 401 output 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 10 1C 0B + 11 0000CB 0/0/0 CB Halt 10 10 10 10 70 0 000000 0/0/0 0 Halt 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 10 1C 1C + + 0000CC 0/0/0 CC Halt 10 10 10 10 70 0 000000 0/0/0 0 Halt 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 10 1C 0D + : 0000CD 0/0/0 CD Halt 10 10 10 10 70 0 000000 0/0/0 0 Halt 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 10 1C 0E + . 0000CE 0/0/0 CE Halt 10 10 10 10 70 0 000000 0/0/0 0 Halt 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 10 1C 1F + £ 0000CF 0/0/0 CF Halt 10 08 70 70 70 8 0 0 0 008000 0/1/0 0 copy registers 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 10 0D 70 : 0 0000D0 0/0/0 D0 Halt 10 08 70 70 70 8 0 0 0 008000 0/1/0 0 copy registers 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 10 0D 01 : 1 0000D1 0/0/0 D1 Halt 10 10 1F 70 1F £ 0 £ 000F0F 0/0/0 F0F Halt 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 10 0D 02 : 2 0000D2 0/0/0 D2 Halt 10 02 70 1F 1A 2 0 £ 10 0020FA 0/0/1 FA Invalid 10 10 20 6E 00 - be 0000E0 0/0/0 E0 Halt 10 10 10 0D 13 : 3 0000D3 0/0/0 D3 Halt 10 01 1F 1F 0E 1 £ £ . 001FFE 0/0/0 1FFE Halt 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 10 0D 04 : 4 0000D4 0/0/0 D4 Halt 10 10 01 01 70 1 1 0 000110 0/0/0 110 Halt 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 10 0D 15 : 5 0000D5 0/0/0 D5 Halt 16 08 70 1F 1A 6 8 0 £ 10 0680FA 6/1/0 FA select (N) 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 10 0D 16 : 6 0000D6 0/0/0 D6 Halt 38 16 70 02 0E H 6 0 2 . 18602E 24/0/3 2E modify address of next 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 10 0D 07 : 7 0000D7 0/0/0 D7 Halt 2C 01 1F 0E 70 ' 1 £ . 0 1C1FE0 28/0/0 1FE0 bulk copy short numeric 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 10 0D 08 : 8 0000D8 0/0/0 D8 Halt 2A 70 70 07 19 = 0 0 7 9 1A0079 26/0/0 79 enter subroutine 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 10 0D 19 : 9 0000D9 0/0/0 D9 Halt 38 16 70 01 70 H 6 0 1 0 186010 24/0/3 10 modify address of next 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 10 0D 1A : 10 0000DA 0/0/0 DA Halt 02 19 1F 0D 0E 2 9 £ : . 029FDE 2/1/0 1FDE transfer (A) to N 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 10 0D 0B : 11 0000DB 0/0/0 DB Halt 38 08 70 15 07 H 8 0 5 7 188057 24/1/0 57 unconditional jump 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 10 0D 1C : + 0000DC 0/0/0 DC Halt 16 08 70 0D 16 6 8 0 : 6 0680D6 6/1/0 D6 select (N) 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 10 0D 0D : : 0000DD 0/0/0 DD Halt 02 08 70 0D 1A 2 8 0 : 10 0280DA 2/1/0 DA transfer (A) to N 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 10 0D 0E : . 0000DE 0/0/0 DE Halt 16 70 70 0D 08 6 0 0 : 8 0600D8 6/0/0 D8 select (N) 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 10 0D 1F : £ 0000DF 0/0/0 DF Halt 02 70 70 16 13 2 0 0 6 3 020063 2/0/0 63 transfer (A) to N 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 10 0E 70 . 0 0000E0 0/0/0 E0 Halt 38 08 70 01 02 H 8 0 1 2 188012 24/1/0 12 unconditional jump 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 10 0E 01 . 1 0000E1 0/0/0 E1 Halt 10 02 70 1A 16 2 0 10 6 0020A6 0/0/1 A6 Invalid 10 10 40 6E 00 & be 0000E0 0/0/0 E0 Halt 10 10 10 0E 02 . 2 0000E2 0/0/0 E2 Halt 10 02 70 1A 16 2 0 10 6 0020A6 0/0/1 A6 Invalid 10 10 20 6E 00 - be 0000E0 0/0/0 E0 Halt 10 10 10 0E 13 . 3 0000E3 0/0/0 E3 Halt 10 02 70 1F 04 2 0 £ 4 0020F4 0/0/1 F4 Invalid 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 10 0E 04 . 4 0000E4 0/0/0 E4 Halt 10 10 10 01 01 1 1 000011 0/0/0 11 Halt 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 10 0E 15 . 5 0000E5 0/0/0 E5 Halt 10 02 70 1F 04 2 0 £ 4 0020F4 0/0/1 F4 Invalid 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 10 0E 16 . 6 0000E6 0/0/0 E6 Halt 10 13 01 01 04 3 1 1 4 003114 0/0/1 1114 Invalid 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 10 0E 07 . 7 0000E7 0/0/0 E7 Halt 10 02 70 0D 1A 2 0 : 10 0020DA 0/0/1 DA Invalid 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 0E 08 10 . 8 000E80 0/0/0 E80 Halt 10 01 01 04 10 1 1 4 001140 0/0/0 1140 Halt 10 10 6E 00 00 be 000E00 0/0/0 E00 Halt 10 0E 19 10 02 . 9 2 00E902 0/1/3 902 Invalid 70 0D 1C 10 10 0 : + 00DC00 0/1/2 1C00 replace (B) by (N) 10 6E 00 00 00 be 00E000 0/1/3 0 Invalid 0E 1A 02 01 01 . 10 2 1 1 0EA211 14/1/1 211 replace selected bits 13 02 10 10 10 3 2 032000 3/0/1 0 copy (A) to N 6E 00 00 00 00 be 0B 10 02 70 0D 11 2 0 : 0B020D 11/0/0 20D multiply and subtract 1C 10 10 10 6E + be 0C000E 12/0/0 E convert 10 10 10 0E 1C . + 0000EC 0/0/0 EC Halt 02 70 13 01 01 2 0 3 1 1 020311 2/0/0 311 transfer (A) to N 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 0E 0D 10 . : 000ED0 0/0/0 ED0 Halt 02 70 0D 1C 10 2 0 : + 020DC0 2/0/0 DC0 transfer (A) to N 10 10 6E 00 00 be 000E00 0/0/0 E00 Halt 10 0E 0E 02 70 . . 2 0 00EE20 0/1/3 E20 Invalid 04 01 01 10 10 4 1 1 041100 4/0/0 1100 add (N) to (A) 10 6E 00 00 00 be 00E000 0/1/3 0 Invalid 0E 1F 10 02 70 . £ 2 0 0EF020 14/1/3 1020 replace selected bits 0D 1C 10 10 10 : + 0DC000 13/1/2 0 divide uniform radix 6E 00 00 00 00 be 70 10 13 01 01 0 3 1 1 000311 0/0/0 311 Halt 04 10 10 10 6E 4 be 04000E 4/0/0 E add (N) to (A) 10 10 10 1F 01 £ 1 0000F1 0/0/0 F1 Halt 10 02 70 0D 0E 2 0 : . 0020DE 0/0/1 DE Invalid 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 1F 02 02 £ 2 2 000F22 0/0/0 F22 Halt 01 01 13 02 10 1 1 3 2 011320 1/0/0 1320 table look up 10 10 6E 00 00 be 000E00 0/0/0 E00 Halt 10 1F 13 10 02 £ 3 2 00F302 0/1/3 1302 Invalid 70 0D 0E 10 10 0 : . 00DE00 0/1/2 1E00 replace (B) by (N) 10 6E 00 00 00 be 00E000 0/1/3 0 Invalid 1F 04 02 70 13 £ 4 2 0 3 0F4203 15/0/2 203 collate and add 01 01 10 10 10 1 1 011000 1/0/0 1000 table look up 6E 00 00 00 00 be 15 10 02 70 0D 5 2 0 : 05020D 5/0/0 20D subtract (N) from (A) 0E 10 10 10 6E . be 0E000E 14/0/0 E replace selected bits 10 10 10 1F 16 £ 6 0000F6 0/0/0 F6 Halt 02 70 04 01 01 2 0 4 1 1 020411 2/0/0 411 transfer (A) to N 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 1F 07 10 £ 7 000F70 0/0/0 F70 Halt 02 70 0D 0E 10 2 0 : . 020DE0 2/0/0 DE0 transfer (A) to N 10 10 6E 00 00 be 000E00 0/0/0 E00 Halt 10 1F 08 10 13 £ 8 3 00F803 0/1/3 1803 Invalid 01 01 04 10 10 1 1 4 011400 1/0/0 1400 table look up 10 6E 00 00 00 be 00E000 0/1/3 0 Invalid 1F 19 10 02 70 £ 9 2 0 0F9020 15/1/0 1020 collate and add 0E 70 10 10 10 . 0 0E0000 14/0/0 0 replace selected bits 6E 00 00 00 00 be 1A 02 01 01 13 10 2 1 1 3 0A2113 10/0/1 113 multiply and add 02 10 10 10 6E 2 be 02000E 2/0/0 E transfer (A) to N 10 10 10 1F 0B £ 11 0000FB 0/0/0 FB Halt 10 02 70 0E 70 2 0 . 0 0020E0 0/0/1 E0 Invalid 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 1F 1C 02 £ + 2 000FC2 0/0/0 FC2 Halt 70 13 01 01 10 0 3 1 1 003110 0/0/1 1110 Invalid 10 10 6E 00 00 be 000E00 0/0/0 E00 Halt 10 1F 0D 10 02 £ : 2 00FD02 0/1/3 1D02 Invalid 70 0E 70 10 10 0 . 0 00E000 0/1/3 0 Invalid 10 6E 00 00 00 be 00E000 0/1/3 0 Invalid 1F 0E 02 70 04 £ . 2 0 4 0FE204 15/1/3 204 collate and add 01 01 10 10 10 1 1 011000 1/0/0 1000 table look up 6E 00 00 00 00 be 1F 10 02 70 0E £ 2 0 . 0F020E 15/0/0 20E collate and add 70 10 10 10 6E 0 be 00000E 0/0/0 E Halt 10 10 01 70 70 1 0 0 000100 0/0/0 100 Halt 10 13 01 01 04 3 1 1 4 003114 0/0/1 1114 Invalid 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 01 70 01 10 1 0 1 001010 0/0/0 1010 Halt 02 70 0E 02 10 2 0 . 2 020E20 2/0/0 E20 transfer (A) to N 10 10 6E 00 00 be 000E00 0/0/0 E00 Halt 01 70 02 02 01 1 0 2 2 1 010221 1/0/0 221 table look up 01 13 02 10 10 1 3 2 013200 1/0/1 1200 prepare for digit collation 10 6E 00 00 00 be 00E000 0/1/3 0 Invalid 70 13 10 02 70 0 3 2 0 003020 0/0/1 1020 Invalid 0E 02 10 10 10 . 2 0E2000 14/0/1 0 replace selected bits 6E 00 00 00 00 be 04 02 70 13 01 4 2 0 3 1 042031 4/0/1 31 add (N) to (A) 01 10 10 10 6E 1 be 01000E 1/0/0 E table look up 10 10 01 70 15 1 0 5 000105 0/0/0 105 Halt 10 02 70 0E 02 2 0 . 2 0020E2 0/0/1 E2 Invalid 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 01 70 16 02 1 0 6 2 001062 0/0/0 1062 Halt 70 04 01 01 10 0 4 1 1 004110 0/0/2 110 replace (B) by (N) 10 10 6E 00 00 be 000E00 0/0/0 E00 Halt 01 70 07 10 02 1 0 7 2 010702 1/0/0 702 table look up 70 0E 02 10 10 0 . 2 00E200 0/1/3 200 Invalid 10 6E 00 00 00 be 00E000 0/1/3 0 Invalid 70 08 10 13 01 0 8 3 1 008031 0/1/0 31 copy registers 01 04 10 10 10 1 4 014000 1/0/2 0 round off 6E 00 00 00 00 be 19 10 02 70 0E 9 2 0 . 09020E 9/0/0 20E multiply uniform radix 1A 10 10 10 6E 10 be 0A000E 10/0/0 E multiply and add 10 10 01 70 1A 1 0 10 00010A 0/0/0 10A Halt 04 04 70 13 15 4 4 0 3 5 044035 4/0/2 35 add (N) to (A) 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 01 70 0B 10 1 0 11 0010B0 0/0/0 10B0 Halt 02 70 0E 0B 10 2 0 . 11 020EB0 2/0/0 EB0 transfer (A) to N 10 10 6E 00 00 be 000E00 0/0/0 E00 Halt 01 70 1C 04 04 1 0 + 4 4 010C44 1/0/0 C44 table look up 70 01 15 10 10 0 1 5 001500 0/0/0 1500 Halt 10 6E 00 00 00 be 00E000 0/1/3 0 Invalid 70 0D 10 02 70 0 : 2 0 00D020 0/1/2 1020 replace (B) by (N) 0E 1C 10 10 10 . + 0EC000 14/1/2 0 replace selected bits 6E 00 00 00 00 be 0E 04 04 70 01 . 4 4 0 1 0E4401 14/0/2 401 replace selected bits 15 10 10 10 6E 5 be 05000E 5/0/0 E subtract (N) from (A) 10 10 01 70 1F 1 0 £ 00010F 0/0/0 10F Halt 10 02 70 0E 0D 2 0 . : 0020ED 0/0/1 ED Invalid 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 01 01 70 04 1 1 0 4 001104 0/0/0 1104 Halt 04 70 01 15 10 4 0 1 5 040150 4/0/0 150 add (N) to (A) 10 10 6E 00 00 be 000E00 0/0/0 E00 Halt 01 01 01 10 02 1 1 1 2 011102 1/0/0 1102 table look up 70 0E 0E 10 10 0 . . 00EE00 0/1/3 E00 Invalid 10 6E 00 00 00 be 00E000 0/1/3 0 Invalid 01 02 13 70 70 1 2 3 0 0 012300 1/0/1 300 prepare for digit collation 02 15 10 10 10 2 5 025000 2/0/2 1000 transfer (A) to N 6E 00 00 00 00 be 13 10 02 70 1F 3 2 0 £ 03020F 3/0/0 20F copy (A) to N 70 10 10 10 6E 0 be 00000E 0/0/0 E Halt 10 10 01 01 04 1 1 4 000114 0/0/0 114 Halt 13 70 70 02 15 3 0 0 2 5 030025 3/0/0 25 copy (A) to N 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 01 01 15 10 1 1 5 001150 0/0/0 1150 Halt 02 70 1F 02 10 2 0 £ 2 020F20 2/0/0 F20 transfer (A) to N 10 10 6E 00 00 be 000E00 0/0/0 E00 Halt 01 01 16 10 10 1 1 6 011600 1/0/0 1600 table look up 04 02 01 10 10 4 2 1 042100 4/0/1 100 add (N) to (A) 10 6E 00 00 00 be 00E000 0/1/3 0 Invalid 01 07 10 02 70 1 7 2 0 017020 1/0/3 1020 interchange area addresses 1F 13 10 10 10 £ 3 0F3000 15/0/1 1000 collate and add 6E 00 00 00 00 be 08 10 10 04 01 8 4 1 080041 8/0/0 41 merge constant length 01 10 10 10 6E 1 be 01000E 1/0/0 E table look up 10 10 01 01 19 1 1 9 000119 0/0/0 119 Halt 10 02 70 1F 16 2 0 £ 6 0020F6 0/0/1 F6 Invalid 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 01 01 1A 23 1 1 10 C 0011A3 0/0/0 11A3 Halt 70 04 01 02 10 0 4 1 2 004120 0/0/2 120 replace (B) by (N) 10 10 6E 00 00 be 000E00 0/0/0 E00 Halt 01 01 0B 10 02 1 1 11 2 011B02 1/0/0 1B02 table look up 70 0D 0E 10 10 0 : . 00DE00 0/1/2 1E00 replace (B) by (N) 20 6E 00 00 00 - be 10E000 16/1/3 0 Invalid 01 1C 10 10 10 1 + 01C000 1/1/2 0 subtract literal address 10 70 10 10 10 0 000000 0/0/0 0 Halt 6E 00 00 00 00 be 0D 10 10 10 10 : 0D0000 13/0/0 0 divide uniform radix 04 10 10 10 6E 4 be 04000E 4/0/0 E add (N) to (A) 10 10 01 01 0E 1 1 . 00011E 0/0/0 11E Halt 10 10 10 10 70 0 000000 0/0/0 0 Halt 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 01 01 1F 10 1 1 £ 0011F0 0/0/0 11F0 Halt 10 10 10 08 10 8 000080 0/0/0 80 Halt 10 10 6E 00 00 be 000E00 0/0/0 E00 Halt 01 02 70 0E 01 1 2 0 . 1 0120E1 1/0/1 E1 prepare for digit collation 0E 01 0E 10 10 . 1 . 0E1E00 14/0/0 1E00 replace selected bits 10 6E 00 00 00 be 00E000 0/1/3 0 Invalid 02 01 31 0E 01 2 1 A . 1 0211E1 2/0/0 11E1 transfer (A) to N 0E 01 10 10 10 . 1 0E1000 14/0/0 1000 replace selected bits 6E 00 00 00 00 be 02 10 02 70 02 2 2 0 2 020202 2/0/0 202 transfer (A) to N 70 10 10 10 6E 0 be 00000E 0/0/0 E Halt 10 10 01 02 13 1 2 3 000123 0/0/0 123 Halt 32 70 02 70 02 B 0 2 0 2 120202 18/0/0 202 shift logical 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 01 02 04 10 1 2 4 001240 0/0/0 1240 Halt 10 10 10 70 10 0 000000 0/0/0 0 Halt 10 10 6E 00 00 be 000E00 0/0/0 E00 Halt 01 02 15 02 70 1 2 5 2 0 012520 1/0/1 520 prepare for digit collation 01 08 70 10 10 1 8 0 018000 1/1/0 0 table look up 10 6E 00 00 00 be 00E000 0/1/3 0 Invalid 02 16 10 10 10 2 6 026000 2/0/3 0 transfer (A) to N 10 01 10 10 10 1 001000 0/0/0 1000 Halt 6E 00 00 00 00 be 07 10 10 10 10 7 070000 7/0/0 0 augment (N) by (A) 70 10 10 10 6E 0 be 00000E 0/0/0 E Halt 10 10 01 02 08 1 2 8 000128 0/0/0 128 Halt 10 10 10 01 16 1 6 000016 0/0/0 16 Halt 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 01 02 19 10 1 2 9 001290 0/0/0 1290 Halt 10 10 10 70 10 0 000000 0/0/0 0 Halt 10 10 6E 00 00 be 000E00 0/0/0 E00 Halt 01 02 1A 10 10 1 2 10 012A00 1/0/1 A00 prepare for digit collation 02 15 16 10 10 2 5 6 025600 2/0/2 1600 transfer (A) to N 10 6E 00 00 00 be 00E000 0/1/3 0 Invalid 02 0B 10 10 10 2 11 02B000 2/1/1 1000 transfer (A) to N 10 70 10 10 10 0 000000 0/0/0 0 Halt 6E 00 00 00 00 be 1C 10 04 70 19 + 4 0 9 0C0409 12/0/0 409 convert 16 10 10 10 6E 6 be 06000E 6/0/0 E select (N) 10 10 01 02 0D 1 2 : 00012D 0/0/0 12D Halt 10 10 10 10 70 0 000000 0/0/0 0 Halt 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 01 02 0E 10 1 2 . 0012E0 0/0/0 12E0 Halt 02 70 1F 70 10 2 0 £ 0 020F00 2/0/0 F00 transfer (A) to N 10 20 6E 00 00 - be 000E00 0/0/0 E00 Halt 01 02 1F 01 1F 1 2 £ 1 £ 012F1F 1/0/1 F1F prepare for digit collation 70 70 70 10 10 0 0 0 000000 0/0/0 0 Halt 10 6E 00 00 00 be 00E000 0/1/3 0 Invalid 13 70 20 10 10 3 0 - 030000 3/0/0 0 copy (A) to N 13 1F 10 10 10 3 £ 03F000 3/1/3 1000 copy (A) to N 6E 00 00 00 00 be 01 16 16 16 16 1 6 6 6 6 016666 1/0/3 666 interchange area addresses 16 10 10 10 6E 6 be 06000E 6/0/0 E select (N) 10 10 01 13 02 1 3 2 000132 0/0/0 132 Halt 10 1F 1F 1F 0E £ £ £ . 00FFFE 0/1/3 1FFE Invalid 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 01 13 13 10 1 3 3 001330 0/0/0 1330 Halt 02 70 1F 1C 10 2 0 £ + 020FC0 2/0/0 FC0 transfer (A) to N 10 70 6E 00 00 0 be 000E00 0/0/0 E00 Halt 07 00 00 00 00 7 070000 7/0/0 0 augment (N) by (A) File: old-paper-tapes/U199.leo 6E 00 00 00 00 be 6E 00 00 00 00 be 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 1F 1F 1F 19 38 £ £ £ 9 H 0FFF98 15/1/3 1F98 collate and add 1F 1F 1F 19 2C £ £ £ 9 ' 0FFF9C 15/1/3 1F9C collate and add 04 19 10 08 16 4 9 8 6 049086 4/1/0 1086 add (N) to (A) 10 02 10 10 10 2 002000 0/0/1 0 Invalid 1F 0D 1F 01 10 £ : £ 1 0FDF10 15/1/2 1F10 collate and add 01 19 10 08 38 1 9 8 H 019088 1/1/0 1088 table look up 0B 0D 1F 01 10 11 : £ 1 0BDF10 11/1/2 1F10 multiply and subtract 08 01 10 08 2A 8 1 8 = 08108A 8/0/0 108A merge constant length 08 01 10 02 23 8 1 2 C 081023 8/0/0 1023 merge constant length 10 19 10 10 10 9 009000 0/1/0 1000 copy registers 6E 00 00 00 00 be 08 15 10 10 02 8 5 2 085002 8/0/2 1002 merge constant length 0E 0D 1F 1F 01 . : £ £ 1 0EDFF1 14/1/2 1FF1 replace selected bits 10 10 10 0B 29 11 I 0000B9 0/0/0 B9 Halt 1F 1F 1F 01 10 £ £ £ 1 0FFF10 15/1/3 1F10 collate and add 16 16 07 16 01 6 6 7 6 1 066761 6/0/3 761 select (N) 01 10 10 10 10 1 010000 1/0/0 0 table look up 01 10 10 10 10 1 010000 1/0/0 0 table look up 19 19 01 10 10 9 9 1 099100 9/1/0 1100 multiply uniform radix 0E 10 10 10 10 . 0E0000 14/0/0 0 replace selected bits 1C 08 10 10 10 + 8 0C8000 12/1/0 0 convert 08 19 10 10 10 8 9 089000 8/1/0 1000 merge variable length 1C 08 10 10 10 + 8 0C8000 12/1/0 0 convert 08 19 10 10 10 8 9 089000 8/1/0 1000 merge variable length 1C 08 10 10 10 + 8 0C8000 12/1/0 0 convert 1C 08 10 10 10 + 8 0C8000 12/1/0 0 convert 01 1F 1C 08 10 1 £ + 8 01FC80 1/1/3 1C80 select literal address File: old-paper-tapes/U205s.leo 58 10 32 10 10 Q B 080200 8/0/0 200 merge constant length 70 10 13 10 10 0 3 000300 0/0/0 300 Halt 38 08 10 04 13 H 8 4 3 188043 24/1/0 43 unconditional jump 10 08 10 10 10 8 008000 0/1/0 0 copy registers 38 1C 10 08 10 H + 8 18C080 24/1/2 80 modify address of next 01 16 1F 08 10 1 6 £ 8 016F80 1/0/3 F80 interchange area addresses 29 0E 08 10 10 I . 8 19E800 25/1/3 800 conditional Halt 38 1C 10 08 10 H + 8 18C080 24/1/2 80 modify address of next 23 02 10 10 10 C 2 132000 19/0/1 0 input one block/reset timer 38 1C 10 08 10 H + 8 18C080 24/1/2 80 modify address of next 2A 08 10 10 10 = 8 1A8000 26/1/0 0 test route N1 10 10 10 02 01 2 1 000021 0/0/0 21 Halt 38 19 1F 1C 0B H 9 £ + 11 189FCB 24/1/0 1FCB unconditional jump 10 10 10 02 13 2 3 000023 0/0/0 23 Halt 10 10 10 01 1C 1 + 00001C 0/0/0 1C Halt 38 0D 1F 0D 1F H : £ : £ 18DFDF 24/1/2 1FDF modify address of next 16 19 1F 0E 13 6 9 £ . 3 069FE3 6/1/0 1FE3 select (N) 38 0D 1F 0D 0E H : £ : . 18DFDE 24/1/2 1FDE modify address of next 02 10 10 10 10 2 020000 2/0/0 0 transfer (A) to N 16 19 1F 0D 1C 6 9 £ : + 069FDC 6/1/0 1FDC select (N) 07 19 1F 0D 0E 7 9 £ : . 079FDE 7/1/0 1FDE augment (N) by (A) 16 01 1F 0D 1F 6 1 £ : £ 061FDF 6/0/0 1FDF select (N) 15 01 1F 0D 10 5 1 £ : 051FD0 5/0/0 1FD0 subtract (N) from (A) 3B 13 1F 0D 01 * 3 £ : 1 1B3FD1 27/0/1 1FD1 jump A != Z 02 01 1F 0D 1F 2 1 £ : £ 021FDF 2/0/0 1FDF transfer (A) to N 38 19 1F 1C 08 H 9 £ + 8 189FC8 24/1/0 1FC8 unconditional jump 10 10 10 10 01 1 000001 0/0/0 1 Halt 10 10 10 10 02 2 000002 0/0/0 2 Halt 10 01 0E 0B 16 1 . 11 6 001EB6 0/0/0 1EB6 Halt 10 10 10 01 04 1 4 000014 0/0/0 14 Halt 70 10 75 10 7C 0 V , 00050C 0/0/0 50C Halt 70 10 67 10 02 0 X 2 000702 0/0/0 702 Halt 58 10 07 10 13 Q 7 3 080703 8/0/0 703 merge constant length 70 10 04 10 7A 0 4 ( 00040A 0/0/0 40A Halt 70 10 13 10 5E 0 3 hf 00030E 0/0/0 30E Halt 70 10 04 10 51 0 4 J 000401 0/0/0 401 Halt 40 10 32 10 04 & B 4 000204 0/0/0 204 Halt 70 10 16 10 61 0 6 / 000601 0/0/0 601 Halt 58 10 67 10 54 Q X M 080704 8/0/0 704 merge constant length 70 10 67 10 02 0 X 2 000702 0/0/0 702 Halt 70 10 67 10 58 0 X Q 000708 0/0/0 708 Halt 70 10 76 10 02 0 W 2 000602 0/0/0 602 Halt 70 10 75 10 73 0 V T 000503 0/0/0 503 Halt 70 10 62 10 13 0 S 3 000203 0/0/0 203 Halt 08 10 16 10 58 8 6 Q 080608 8/0/0 608 merge constant length 08 10 13 10 4A 8 3 # 08030A 8/0/0 30A merge constant length 08 10 13 10 43 8 3 L 080303 8/0/0 303 merge constant length 58 10 13 10 51 Q 3 J 080301 8/0/0 301 merge constant length 10 10 62 10 7C S , 00020C 0/0/0 20C Halt 10 10 02 10 7A 2 ( 00020A 0/0/0 20A Halt 70 10 62 10 6D 0 S ; 00020D 0/0/0 20D Halt 40 10 26 10 6D & F ; 00060D 0/0/0 60D Halt 40 10 46 10 75 & O V 000605 0/0/0 605 Halt 40 10 62 10 10 & S 000200 0/0/0 200 Halt 58 10 52 10 10 Q K 080200 8/0/0 200 merge constant length 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 40 10 10 & 000000 0/0/0 0 Halt 40 10 40 10 10 & & 000000 0/0/0 0 Halt 16 08 10 10 19 6 8 9 068009 6/1/0 9 select (N) 02 01 1F 1C 16 2 1 £ + 6 021FC6 2/0/0 1FC6 transfer (A) to N 10 01 1F 0E 10 1 £ . 001FE0 0/0/0 1FE0 Halt 38 19 1F 1C 16 H 9 £ + 6 189FC6 24/1/0 1FC6 unconditional jump 10 10 20 10 10 - 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 1F 10 29 £ I 000F09 0/0/0 F09 Halt 6E 00 00 00 00 be 10 01 0E 0B 16 1 . 11 6 001EB6 0/0/0 1EB6 Halt 10 01 0E 0B 16 1 . 11 6 001EB6 0/0/0 1EB6 Halt 10 01 1F 0D 10 1 £ : 001FD0 0/0/0 1FD0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 01 0E 0B 16 1 . 11 6 001EB6 0/0/0 1EB6 Halt 10 10 10 10 1F £ 00000F 0/0/0 F Halt 10 10 10 10 01 1 000001 0/0/0 1 Halt 10 10 10 10 01 1 000001 0/0/0 1 Halt 10 10 10 10 13 3 000003 0/0/0 3 Halt 01 04 0B 16 01 1 4 11 6 1 014B61 1/0/2 B61 round off 16 01 1F 19 04 6 1 £ 9 4 061F94 6/0/0 1F94 select (N) 02 10 10 08 01 2 8 1 020081 2/0/0 81 transfer (A) to N 01 1A 10 10 10 1 10 01A000 1/1/1 0 add literal address 16 01 1F 01 0E 6 1 £ 1 . 061F1E 6/0/0 1F1E select (N) 6E 00 00 00 00 be 10 01 0E 0B 1A 1 . 11 10 001EBA 0/0/0 1EBA Halt 02 01 1F 01 0D 2 1 £ 1 : 021F1D 2/0/0 1F1D transfer (A) to N 29 0E 10 01 10 I . 1 19E010 25/1/3 10 conditional Halt 29 1C 10 01 10 I + 1 19C010 25/1/2 10 interrogate indicators 3B 01 0E 0D 13 * 1 . : 3 1B1ED3 27/0/0 1ED3 jump A = Z 16 08 10 08 10 6 8 8 068080 6/1/0 80 select (N) 02 19 1F 0B 16 2 9 £ 11 6 029FB6 2/1/0 1FB6 transfer (A) to N 2A 0B 1F 1A 08 = 11 £ 10 8 1ABFA8 26/1/1 1FA8 set modification register 37 1A 10 10 10 G 10 17A000 23/1/1 0 copy into tag 29 02 10 10 02 I 2 2 192002 25/0/1 2 step on and test 38 19 0E 1C 01 H 9 . + 1 189EC1 24/1/0 1EC1 unconditional jump 2A 0B 1F 19 16 = 11 £ 9 6 1ABF96 26/1/1 1F96 set modification register 02 1A 10 10 10 2 10 02A000 2/1/1 0 transfer (A) to N 29 02 10 10 02 I 2 2 192002 25/0/1 2 step on and test 38 19 0E 1C 15 H 9 . + 5 189EC5 24/1/0 1EC5 unconditional jump 6E 00 00 00 00 be 10 01 0E 1C 08 1 . + 8 001EC8 0/0/0 1EC8 Halt 2A 0B 1F 19 08 = 11 £ 9 8 1ABF98 26/1/1 1F98 set modification register 02 1A 10 10 10 2 10 02A000 2/1/1 0 transfer (A) to N 29 02 10 10 02 I 2 2 192002 25/0/1 2 step on and test 38 19 0E 1C 19 H 9 . + 9 189EC9 24/1/0 1EC9 unconditional jump 2A 0B 1F 19 1A = 11 £ 9 10 1ABF9A 26/1/1 1F9A set modification register 16 01 1F 19 15 6 1 £ 9 5 061F95 6/0/0 1F95 select (N) 37 1A 10 10 10 G 10 17A000 23/1/1 0 copy into tag 29 02 10 10 02 I 2 2 192002 25/0/1 2 step on and test 38 19 0E 1C 0E H 9 . + . 189ECE 24/1/0 1ECE unconditional jump 16 19 1F 0B 16 6 9 £ 11 6 069FB6 6/1/0 1FB6 select (N) 02 08 10 08 10 2 8 8 028080 2/1/0 80 transfer (A) to N 02 10 10 10 19 2 9 020009 2/0/0 9 transfer (A) to N 02 10 10 01 01 2 1 1 020011 2/0/0 11 transfer (A) to N 02 10 10 01 19 2 1 9 020019 2/0/0 19 transfer (A) to N 6E 00 00 00 00 be 10 01 0E 0D 16 1 . : 6 001ED6 0/0/0 1ED6 Halt 38 19 0E 0D 0E H 9 . : . 189EDE 24/1/0 1EDE unconditional jump 29 0B 1F 1F 1F I 11 £ £ £ 19BFFF 25/1/1 1FFF clear indicators 16 01 1F 0B 13 6 1 £ 11 3 061FB3 6/0/0 1FB3 select (N) 3B 01 0E 0B 08 * 1 . 11 8 1B1EB8 27/0/0 1EB8 jump A = Z 02 01 1F 0B 1A 2 1 £ 11 10 021FBA 2/0/0 1FBA transfer (A) to N 38 19 1C 04 16 H 9 + 4 6 189C46 24/1/0 1C46 unconditional jump 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 29 1C 10 10 01 I + 1 19C001 25/1/2 1 interrogate indicators 02 01 1F 0B 10 2 1 £ 11 021FB0 2/0/0 1FB0 transfer (A) to N 29 1C 10 10 02 I + 2 19C002 25/1/2 2 interrogate indicators 02 01 1F 0B 01 2 1 £ 11 1 021FB1 2/0/0 1FB1 transfer (A) to N 29 1C 10 10 04 I + 4 19C004 25/1/2 4 interrogate indicators 02 01 1F 0B 02 2 1 £ 11 2 021FB2 2/0/0 1FB2 transfer (A) to N 6E 00 00 00 00 be 10 01 0E 0E 04 1 . . 4 001EE4 0/0/0 1EE4 Halt 29 1C 10 10 08 I + 8 19C008 25/1/2 8 interrogate indicators 02 01 1F 0B 13 2 1 £ 11 3 021FB3 2/0/0 1FB3 transfer (A) to N 38 19 0E 0E 08 H 9 . . 8 189EE8 24/1/0 1EE8 unconditional jump 10 10 10 10 10 000000 0/0/0 0 Halt 38 0D 1F 0B 10 H : £ 11 18DFB0 24/1/2 1FB0 modify address of next 16 01 1F 15 15 6 1 £ 5 5 061F55 6/0/0 1F55 select (N) 02 01 1F 15 04 2 1 £ 5 4 021F54 2/0/0 1F54 transfer (A) to N 38 0D 1F 0B 10 H : £ 11 18DFB0 24/1/2 1FB0 modify address of next 16 01 1F 08 16 6 1 £ 8 6 061F86 6/0/0 1F86 select (N) 02 01 1F 08 15 2 1 £ 8 5 021F85 2/0/0 1F85 transfer (A) to N 16 01 1F 19 1C 6 1 £ 9 + 061F9C 6/0/0 1F9C select (N) 38 1C 10 08 10 H + 8 18C080 24/1/2 80 modify address of next 02 10 10 04 10 2 4 020040 2/0/0 40 transfer (A) to N 16 01 1F 19 0D 6 1 £ 9 : 061F9D 6/0/0 1F9D select (N) 6E 00 00 00 00 be 10 01 0E 1F 02 1 . £ 2 001EF2 0/0/0 1EF2 Halt 02 10 10 16 07 2 6 7 020067 2/0/0 67 transfer (A) to N 38 1C 10 08 10 H + 8 18C080 24/1/2 80 modify address of next 2A 08 10 10 10 = 8 1A8000 26/1/0 0 test route N1 38 19 1F 10 01 H 9 £ 1 189F01 24/1/0 1F01 unconditional jump 38 19 1F 10 13 H 9 £ 3 189F03 24/1/0 1F03 unconditional jump 38 19 0E 1F 19 H 9 . £ 9 189EF9 24/1/0 1EF9 unconditional jump 10 10 10 10 07 7 000007 0/0/0 7 Halt 02 01 1F 0B 1A 2 1 £ 11 10 021FBA 2/0/0 1FBA transfer (A) to N 38 1C 10 16 07 H + 6 7 18C067 24/1/2 67 modify address of next 02 08 10 01 0E 2 8 1 . 02801E 2/1/0 1E transfer (A) to N 38 1C 10 08 10 H + 8 18C080 24/1/2 80 modify address of next 01 16 19 1C 10 1 6 9 + 0169C0 1/0/3 9C0 interchange area addresses 38 1C 10 08 10 H + 8 18C080 24/1/2 80 modify address of next 23 02 10 10 10 C 2 132000 19/0/1 0 input one block/reset timer 6E 00 00 00 00 be 10 01 1F 10 10 1 £ 001F00 0/0/0 1F00 Halt 38 19 1F 10 15 H 9 £ 5 189F05 24/1/0 1F05 unconditional jump 10 10 10 10 13 3 000003 0/0/0 3 Halt 38 19 0E 1F 13 H 9 . £ 3 189EF3 24/1/0 1EF3 unconditional jump 01 1A 10 10 10 1 10 01A000 1/1/1 0 add literal address 38 19 0E 1F 13 H 9 . £ 3 189EF3 24/1/0 1EF3 unconditional jump 38 1C 10 08 10 H + 8 18C080 24/1/2 80 modify address of next 2A 08 10 10 10 = 8 1A8000 26/1/0 0 test route N1 10 10 10 10 19 9 000009 0/0/0 9 Halt 38 19 1F 10 15 H 9 £ 5 189F05 24/1/0 1F05 unconditional jump 38 19 1F 01 04 H 9 £ 1 4 189F14 24/1/0 1F14 unconditional jump 38 19 0E 1F 13 H 9 . £ 3 189EF3 24/1/0 1EF3 unconditional jump 02 01 1F 0B 1A 2 1 £ 11 10 021FBA 2/0/0 1FBA transfer (A) to N 38 1C 10 16 07 H + 6 7 18C067 24/1/2 67 modify address of next 02 08 10 01 0E 2 8 1 . 02801E 2/1/0 1E transfer (A) to N 6E 00 00 00 00 be 10 01 1F 10 0E 1 £ . 001F0E 0/0/0 1F0E Halt 38 1C 10 08 10 H + 8 18C080 24/1/2 80 modify address of next 01 16 19 1C 10 1 6 9 + 0169C0 1/0/3 9C0 interchange area addresses 29 0E 08 10 10 I . 8 19E800 25/1/3 800 conditional Halt 38 1C 10 08 10 H + 8 18C080 24/1/2 80 modify address of next 23 02 10 10 10 C 2 132000 19/0/1 0 input one block/reset timer 38 19 1F 01 16 H 9 £ 1 6 189F16 24/1/0 1F16 unconditional jump 10 10 10 10 0B 11 00000B 0/0/0 B Halt 38 19 0E 1F 04 H 9 . £ 4 189EF4 24/1/0 1EF4 unconditional jump 10 15 1F 1A 16 5 £ 10 6 005FA6 0/0/2 1FA6 replace (B) by (N) 1F 10 10 16 07 £ 6 7 0F0067 15/0/0 67 collate and add 13 01 1F 0B 08 3 1 £ 11 8 031FB8 3/0/0 1FB8 copy (A) to N 04 01 1F 1A 13 4 1 £ 10 3 041FA3 4/0/0 1FA3 add (N) to (A) 02 01 1F 0B 19 2 1 £ 11 9 021FB9 2/0/0 1FB9 transfer (A) to N 16 01 1F 1A 02 6 1 £ 10 2 061FA2 6/0/0 1FA2 select (N) 6E 00 00 00 00 be 01 1F 01 1C 02 1 £ 1 + 2 01F1C2 1/1/3 11C2 select literal address 01 1F 0B 04 10 1 £ 11 4 01FB40 1/1/3 1B40 select literal address 10 10 10 10 38 H 000008 0/0/0 8 Halt 19 1F 02 01 38 9 £ 2 1 H 09F218 9/1/3 1218 multiply uniform radix 19 1F 13 1A 38 9 £ 3 10 H 09F3A8 9/1/3 13A8 multiply uniform radix 19 1C 04 1A 16 9 + 4 10 6 09C4A6 9/1/2 4A6 multiply uniform radix 01 1F 1A 10 07 1 £ 10 7 01FA07 1/1/3 1A07 select literal address 01 1F 0B 08 38 1 £ 11 8 H 01FB88 1/1/3 1B88 select literal address 1C 10 16 07 16 + 6 7 6 0C0676 12/0/0 676 convert 08 10 10 13 15 8 3 5 080035 8/0/0 35 merge constant length 01 1F 1A 02 02 1 £ 10 2 2 01FA22 1/1/3 1A22 select literal address 01 1F 1A 1C 38 1 £ 10 + H 01FAC8 1/1/3 1AC8 select literal address 1C 10 16 07 16 + 6 7 6 0C0676 12/0/0 676 convert 08 10 10 15 02 8 5 2 080052 8/0/0 52 merge constant length 01 1F 1A 0D 6E 1 £ 10 : be 01FADE 1/1/3 1ADE select literal address 10 01 1F 02 1A 1 £ 2 10 001F2A 0/0/0 1F2A Halt 38 1C 10 16 07 H + 6 7 18C067 24/1/2 67 modify address of next 16 08 10 10 0B 6 8 11 06800B 6/1/0 B select (N) 02 01 1F 1A 0E 2 1 £ 10 . 021FAE 2/0/0 1FAE transfer (A) to N 38 1C 10 16 07 H + 6 7 18C067 24/1/2 67 modify address of next 16 08 10 10 0D 6 8 : 06800D 6/1/0 D select (N) 02 01 1F 1A 1F 2 1 £ 10 £ 021FAF 2/0/0 1FAF transfer (A) to N 10 15 1F 1A 1C 5 £ 10 + 005FAC 0/0/2 1FAC replace (B) by (N) 1F 01 1F 1A 02 £ 1 £ 10 2 0F1FA2 15/0/0 1FA2 collate and add 02 01 1F 0B 15 2 1 £ 11 5 021FB5 2/0/0 1FB5 transfer (A) to N 38 1C 10 16 07 H + 6 7 18C067 24/1/2 67 modify address of next 16 08 10 10 07 6 8 7 068007 6/1/0 7 select (N) 02 01 1F 0B 1C 2 1 £ 11 + 021FBC 2/0/0 1FBC transfer (A) to N 38 1C 10 16 07 H + 6 7 18C067 24/1/2 67 modify address of next 16 08 10 10 19 6 8 9 068009 6/1/0 9 select (N) 6E 00 00 00 00 be 08 04 01 1F 1A 8 4 1 £ 10 0841FA 8/0/2 1FA merge constant length 01 02 01 1F 0B 1 2 1 £ 11 0121FB 1/0/1 1FB prepare for digit collation 0D 16 19 1F 1A : 6 9 £ 10 0D69FA 13/0/3 9FA divide uniform radix 04 38 1C 10 16 4 H + 6 048C06 4/1/0 C06 add (N) to (A) 07 15 08 10 01 7 5 8 1 075801 7/0/2 1801 augment (N) by (A) 0E 3B 01 1F 04 . * 1 £ 4 0EB1F4 14/1/1 11F4 replace selected bits 10 10 10 10 10 000000 0/0/0 0 Halt 0D 38 19 0E 1F : H 9 . £ 0D89EF 13/1/0 9EF divide uniform radix 13 38 1C 10 16 3 H + 6 038C06 3/1/0 C06 copy (A) to N 07 16 08 10 10 7 6 8 076800 7/0/3 800 augment (N) by (A) 01 15 01 1F 1A 1 5 1 £ 10 0151FA 1/0/2 11FA round off 02 15 01 1F 1A 2 5 1 £ 10 0251FA 2/0/2 11FA transfer (A) to N 1C 3B 01 1F 04 + * 1 £ 4 0CB1F4 12/1/1 11F4 convert 07 10 10 10 10 7 070000 7/0/0 0 augment (N) by (A) 1F 6E 00 00 00 £ be 0FE000 15/1/3 0 collate and add 04 16 38 19 0E 4 6 H 9 . 04689E 4/0/3 89E add (N) to (A) 1F 13 38 0D 1F £ 3 H : £ 0F38DF 15/0/1 18DF collate and add 0B 08 16 08 10 11 8 6 8 0B8680 11/1/0 680 multiply and subtract 10 02 15 19 1F 2 5 9 £ 00259F 0/0/1 59F Invalid 19 0E 3B 13 1F 9 . * 3 £ 09EB3F 9/1/3 B3F multiply uniform radix 15 08 02 01 1F 5 8 2 1 £ 05821F 5/1/0 21F subtract (N) from (A) 0B 04 16 01 1F 11 4 6 1 £ 0B461F 11/0/2 61F multiply and subtract 0B 15 3B 01 1F 11 5 * 1 £ 0B5B1F 11/0/2 1B1F multiply and subtract 15 10 10 10 10 5 050000 5/0/0 0 subtract (N) from (A) 01 1F 38 19 0E 1 £ H 9 . 01F89E 1/1/3 189E select literal address 1F 13 16 01 1F £ 3 6 1 £ 0F361F 15/0/1 161F collate and add 01 1F 02 01 1F 1 £ 2 1 £ 01F21F 1/1/3 121F select literal address 01 0D 38 0D 1F 1 : H : £ 01D8DF 1/1/2 18DF subtract literal address 0B 08 16 08 10 11 8 6 8 0B8680 11/1/0 680 multiply and subtract 10 13 6E 00 00 3 be 003E00 0/0/1 1E00 Invalid 1F 15 04 10 10 £ 5 4 0F5400 15/0/2 1400 collate and add 10 10 10 38 19 H 9 000089 0/0/0 89 Halt 1F 15 0B 38 19 £ 5 11 H 9 0F5B89 15/0/2 1B89 collate and add 0D 10 10 38 19 : H 9 0D0089 13/0/0 89 divide uniform radix 0D 04 1A 16 01 : 4 10 6 1 0D4A61 13/0/2 A61 divide uniform radix 1F 1A 02 02 01 £ 10 2 2 1 0FA221 15/1/1 221 collate and add 1F 0B 04 38 19 £ 11 4 H 9 0FB489 15/1/1 1489 collate and add 1F 15 10 38 0D £ 5 H : 0F508D 15/0/2 108D collate and add 1F 1A 1C 02 10 £ 10 + 2 0FAC20 15/1/1 C20 collate and add 10 10 01 16 01 1 6 1 000161 0/0/0 161 Halt 1F 0B 04 3B 13 £ 11 4 * 3 0FB4B3 15/1/1 14B3 collate and add 1F 16 08 38 0D £ 6 8 H : 0F688D 15/0/3 88D collate and add 1F 1A 1C 16 10 £ 10 + 6 0FAC60 15/1/1 C60 collate and add 10 10 10 02 01 2 1 000021 0/0/0 21 Halt 1F 0B 0B 6E 00 £ 11 11 be 0FBBE0 15/1/1 1BE0 collate and add 01 1F 16 02 15 1 £ 6 2 5 01F625 1/1/3 1625 select literal address 01 1F 1A 02 38 1 £ 10 2 H 01FA28 1/1/3 1A28 select literal address 0D 1F 1A 1C 02 : £ 10 + 2 0DFAC2 13/1/3 1AC2 divide uniform radix 08 10 10 10 16 8 6 080006 8/0/0 6 merge constant length 01 1F 0B 0B 38 1 £ 11 11 H 01FBB8 1/1/3 1BB8 select literal address 0D 1F 1A 1C 02 : £ 10 + 2 0DFAC2 13/1/3 1AC2 divide uniform radix 10 10 10 10 16 6 000006 0/0/0 6 Halt 01 1F 0B 15 3B 1 £ 11 5 * 01FB5B 1/1/3 1B5B select literal address 01 1F 16 0D 16 1 £ 6 : 6 01F6D6 1/1/3 16D6 select literal address 01 1F 1A 1F 38 1 £ 10 £ H 01FAF8 1/1/3 1AF8 select literal address 0D 1F 1A 1C 37 : £ 10 + G 0DFAC7 13/1/3 1AC7 divide uniform radix 08 10 10 10 16 8 6 080006 8/0/0 6 merge constant length 19 1F 0B 1C 3B 9 £ 11 + * 09FBCB 9/1/3 1BCB multiply uniform radix 01 1F 07 16 2A 1 £ 7 6 = 01F76A 1/1/3 176A select literal address 0B 1F 0B 1C 6E 11 £ 11 + be 0BFBCE 11/1/3 1BCE multiply and subtract 10 01 1F 07 10 1 £ 7 001F70 0/0/0 1F70 Halt 16 01 1F 1A 1F 6 1 £ 10 £ 061FAF 6/0/0 1FAF select (N) 37 1A 10 10 10 G 10 17A000 23/1/1 0 copy into tag 29 02 10 10 02 I 2 2 192002 25/0/1 2 step on and test 38 19 1F 07 01 H 9 £ 7 1 189F71 24/1/0 1F71 unconditional jump 02 19 1F 0B 1C 2 9 £ 11 + 029FBC 2/1/0 1FBC transfer (A) to N 02 19 1F 0B 1C 2 9 £ 11 + 029FBC 2/1/0 1FBC transfer (A) to N 29 0E 04 10 10 I . 4 19E400 25/1/3 400 conditional Halt 16 01 1F 1A 02 6 1 £ 10 2 061FA2 6/0/0 1FA2 select (N) 15 01 1F 0B 15 5 1 £ 11 5 051FB5 5/0/0 1FB5 subtract (N) from (A) 02 01 1F 0B 15 2 1 £ 11 5 021FB5 2/0/0 1FB5 transfer (A) to N 16 01 1F 1A 1C 6 1 £ 10 + 061FAC 6/0/0 1FAC select (N) 04 01 1F 1A 02 4 1 £ 10 2 041FA2 4/0/0 1FA2 add (N) to (A) 13 01 1F 1A 1C 3 1 £ 10 + 031FAC 3/0/0 1FAC copy (A) to N 15 01 1F 1A 0D 5 1 £ 10 : 051FAD 5/0/0 1FAD subtract (N) from (A) 6E 00 00 00 00 be 0E 3B 15 1F 08 . * 5 £ 8 0EB5F8 14/1/1 15F8 replace selected bits 15 16 01 1F 1A 5 6 1 £ 10 0561FA 5/0/3 1FA subtract (N) from (A) 01 07 01 1F 0B 1 7 1 £ 11 0171FB 1/0/3 11FB interchange area addresses 08 16 01 1F 0B 8 6 1 £ 11 0861FB 8/0/3 1FB merge constant length 08 15 01 1F 0B 8 5 1 £ 11 0851FB 8/0/2 11FB merge constant length 19 3B 13 1F 04 9 * 3 £ 4 09B3F4 9/1/1 13F4 multiply uniform radix 07 38 19 1F 10 7 H 9 £ 0789F0 7/1/0 9F0 augment (N) by (A) 15 10 10 10 10 5 050000 5/0/0 0 subtract (N) from (A) 10 38 19 1F 08 H 9 £ 8 0089F8 0/1/0 9F8 copy registers 08 38 19 0D 1A 8 H 9 : 10 0889DA 8/1/0 9DA merge variable length 0D 16 01 1F 0B : 6 1 £ 11 0D61FB 13/0/3 1FB divide uniform radix 02 3B 13 0E 0D 2 * 3 . : 02B3ED 2/1/1 13ED transfer (A) to N 07 16 01 1F 1A 7 6 1 £ 10 0761FA 7/0/3 1FA augment (N) by (A) 1F 32 10 10 10 £ B 0F2000 15/0/1 0 collate and add 04 6E 00 00 00 4 be 04E000 4/1/3 0 add (N) to (A) 08 1C 01 1A 10 8 + 1 10 08C1A0 8/1/2 1A0 merge variable length 10 1A 02 01 1F 10 2 1 £ 00A21F 0/1/1 21F replace registers 0B 1A 16 01 1F 11 10 6 1 £ 0BA61F 11/1/1 61F multiply and subtract 1A 07 02 10 10 10 7 2 0A7200 10/0/3 1200 multiply and add 10 19 16 19 1F 9 6 9 £ 00969F 0/1/0 169F copy registers 1A 1A 13 08 10 10 10 3 8 0AA380 10/1/1 380 multiply and add 10 1A 02 10 10 10 2 00A200 0/1/1 200 replace registers 10 1A 38 08 10 10 H 8 00A880 0/1/1 880 replace registers 10 19 10 10 10 9 009000 0/1/0 1000 copy registers 02 10 10 10 10 2 020000 2/0/0 0 transfer (A) to N 10 1F 10 10 10 £ 00F000 0/1/3 1000 Invalid 10 04 10 01 1C 4 1 + 00401C 0/0/2 1C replace (B) by (N) 04 16 10 01 1F 4 6 1 £ 04601F 4/0/3 1F add (N) to (A) 1C 10 10 04 10 + 4 0C0040 12/0/0 40 convert 10 10 6E 00 00 be 000E00 0/0/0 E00 Halt 1F 19 1A 10 10 £ 9 10 0F9A00 15/1/0 1A00 collate and add 10 1A 10 10 04 10 4 00A004 0/1/1 4 replace registers 10 10 10 1F 01 £ 1 0000F1 0/0/0 F1 Halt 1F 1C 10 1F 01 £ + £ 1 0FC0F1 15/1/2 F1 collate and add 1F 0E 10 19 16 £ . 9 6 0FE096 15/1/3 96 collate and add 19 16 19 16 19 9 6 9 6 9 096969 9/0/3 969 multiply uniform radix 16 19 16 10 10 6 9 6 069600 6/1/0 1600 select (N) 10 01 04 10 10 1 4 001400 0/0/0 1400 Halt 10 10 02 10 10 2 000200 0/0/0 200 Halt 10 10 01 10 10 1 000100 0/0/0 100 Halt 10 01 1C 10 10 1 + 001C00 0/0/0 1C00 Halt 10 10 10 07 0E 7 . 00007E 0/0/0 7E Halt 10 10 10 10 07 7 000007 0/0/0 7 Halt 1F 1F 1F 2A 07 £ £ £ = 7 0FFFA7 15/1/3 1FA7 collate and add 1F 0B 1A 6E 00 £ 11 10 be 0FBAE0 15/1/1 1AE0 collate and add 01 1F 1A 08 10 1 £ 10 8 01FA80 1/1/3 1A80 select literal address 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 1A 10 29 10 I 000A09 0/0/0 A09 Halt 0B 1F 1F 1F 2A 11 £ £ £ = 0BFFFA 11/1/3 1FFA multiply and subtract 13 1F 1A 0E 10 3 £ 10 . 03FAE0 3/1/3 1AE0 copy (A) to N 01 1C 0E 08 10 1 + . 8 01CE80 1/1/2 E80 subtract literal address 01 1C 0E 08 10 1 + . 8 01CE80 1/1/2 E80 subtract literal address 01 0B 07 1A 10 1 11 7 10 01B7A0 1/1/1 17A0 add literal address 10 10 10 1F 10 £ 0000F0 0/0/0 F0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 01 10 1 000010 0/0/0 10 Halt 10 10 10 10 6E be 00000E 0/0/0 E Halt 10 01 1F 0B 16 1 £ 11 6 001FB6 0/0/0 1FB6 Halt 10 10 10 01 19 1 9 000019 0/0/0 19 Halt 10 10 10 02 10 2 000020 0/0/0 20 Halt 10 01 1F 1C 1C 1 £ + + 001FCC 0/0/0 1FCC Halt 10 01 1F 0D 1C 1 £ : + 001FDC 0/0/0 1FDC Halt 1F 10 10 10 10 £ 0F0000 15/0/0 0 collate and add 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 13 0E 08 3 . 8 0003E8 0/0/0 3E8 Halt 10 10 07 0D 02 7 : 2 0007D2 0/0/0 7D2 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 1C 04 0E 04 02 + 4 . 4 2 0C4E42 12/0/2 E42 convert 10 10 04 01 04 4 1 4 000414 0/0/0 414 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 6E 00 00 00 00 be 04 10 10 10 10 4 040000 4/0/0 0 add (N) to (A) 10 10 10 10 10 000000 0/0/0 0 Halt 10 38 1C 10 08 H + 8 008C08 0/1/0 C08 copy registers 10 01 16 1F 1C 1 6 £ + 0016FC 0/0/0 16FC Halt 10 29 0E 08 10 I . 8 009E80 0/1/0 1E80 copy registers 10 38 1C 10 08 H + 8 008C08 0/1/0 C08 copy registers 10 23 02 10 10 C 2 003200 0/0/1 1200 Invalid 10 02 01 1F 0D 2 1 £ : 0021FD 0/0/1 1FD Invalid 10 15 01 1F 1C 5 1 £ + 0051FC 0/0/2 11FC replace (B) by (N) 1F 07 10 10 08 £ 7 8 0F7008 15/0/3 1008 collate and add 10 38 19 1F 0D H 9 £ : 0089FD 0/1/0 9FD copy registers 01 10 10 10 04 1 4 010004 1/0/0 4 table look up 10 10 10 10 01 1 000001 0/0/0 1 Halt 1C 38 19 0E 0B + H 9 . 11 0C89EB 12/1/0 9EB convert 16 6E 00 00 00 6 be 06E000 6/1/3 0 select (N) 10 13 1A 19 10 3 10 9 003A90 0/0/1 1A90 Invalid 10 13 1A 19 10 3 10 9 003A90 0/0/1 1A90 Invalid 10 13 0B 16 1C 3 11 6 + 003B6C 0/0/1 1B6C Invalid 10 13 1A 19 10 3 10 9 003A90 0/0/1 1A90 Invalid 10 13 1A 19 02 3 10 9 2 003A92 0/0/1 1A92 Invalid 10 13 1A 0B 02 3 10 11 2 003AB2 0/0/1 1AB2 Invalid 10 10 10 10 1F £ 00000F 0/0/0 F Halt 10 10 02 10 15 2 5 000205 0/0/0 205 Halt 10 10 10 10 01 1 000001 0/0/0 1 Halt 10 10 10 10 15 5 000005 0/0/0 5 Halt 10 19 08 16 02 9 8 6 2 009862 0/1/0 1862 copy registers 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 01 19 1 9 000019 0/0/0 19 Halt 10 10 10 13 08 3 8 000038 0/0/0 38 Halt 0E 13 0B 07 0E . 3 11 7 . 0E3B7E 14/0/1 1B7E replace selected bits 6E 00 00 00 00 be 10 13 1A 19 04 3 10 9 4 003A94 0/0/1 1A94 Invalid 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 1C + 00000C 0/0/0 C Halt 10 10 10 10 01 1 000001 0/0/0 1 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 0E . 00000E 0/0/0 E Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 04 4 000004 0/0/0 4 Halt 19 16 19 16 19 9 6 9 6 9 096969 9/0/3 969 multiply uniform radix 16 19 16 19 16 6 9 6 9 6 069696 6/1/0 1696 select (N) 10 10 10 10 10 000000 0/0/0 0 Halt 07 0E 10 10 10 7 . 07E000 7/1/3 0 augment (N) by (A) 2F 1F 1F 1F 1F db £ £ £ £ 1FFFFF 31/1/3 1FFF subtract double length 10 10 10 10 10 000000 0/0/0 0 Halt 6E 00 00 00 00 be 10 13 1A 1A 02 3 10 10 2 003AA2 0/0/1 1AA2 Invalid 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 16 6 000006 0/0/0 6 Halt 10 13 0B 16 1A 3 11 6 10 003B6A 0/0/1 1B6A Invalid 38 10 10 10 10 H 180000 24/0/0 0 modify address of next 10 10 10 10 01 1 000001 0/0/0 1 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 1A 10 00000A 0/0/0 A Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 16 04 6 4 000064 0/0/0 64 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 13 0E 08 3 . 8 0003E8 0/0/0 3E8 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 02 07 01 10 2 7 1 002710 0/0/1 710 Invalid 10 10 10 10 10 000000 0/0/0 0 Halt 6E 00 00 00 00 be 10 13 1A 0B 10 3 10 11 003AB0 0/0/1 1AB0 Invalid 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 29 1C 10 10 10 I + 19C000 25/1/2 0 interrogate indicators 38 0D 1A 19 10 H : 10 9 18DA90 24/1/2 1A90 modify address of next 02 10 10 10 19 2 9 020009 2/0/0 9 transfer (A) to N 38 0D 1A 19 10 H : 10 9 18DA90 24/1/2 1A90 modify address of next 02 10 10 01 01 2 1 1 020011 2/0/0 11 transfer (A) to N 38 0D 1A 19 10 H : 10 9 18DA90 24/1/2 1A90 modify address of next 02 10 10 01 19 2 1 9 020019 2/0/0 19 transfer (A) to N 38 19 1A 1C 1A H 9 10 + 10 189ACA 24/1/0 1ACA unconditional jump 20 10 10 10 02 - 2 100002 16/0/0 2 Invalid 10 10 19 19 08 9 9 8 000998 0/0/0 998 Halt 2A 02 10 01 10 = 2 1 1A2010 26/0/1 10 leave subroutine 10 10 19 19 07 9 9 7 000997 0/0/0 997 Halt 6E 00 00 00 00 be 10 13 1A 0B 0E 3 10 11 . 003ABE 0/0/1 1ABE Invalid 2A 02 10 01 08 = 2 1 8 1A2018 26/0/1 18 leave subroutine 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 01 0E 10 01 19 1 . 1 9 01E019 1/1/3 19 select literal address 02 10 10 08 10 2 8 020080 2/0/0 80 transfer (A) to N 01 0E 10 13 08 1 . 3 8 01E038 1/1/3 38 select literal address 02 10 10 08 01 2 8 1 020081 2/0/0 81 transfer (A) to N 10 01 1F 1F 1F 1 £ £ £ 001FFF 0/0/0 1FFF Halt 16 01 1A 19 13 6 1 10 9 3 061A93 6/0/0 1A93 select (N) 6E 00 00 00 00 be 10 13 1A 1C 1C 3 10 + + 003ACC 0/0/1 1ACC Invalid 38 0D 1A 19 01 H : 10 9 1 18DA91 24/1/2 1A91 modify address of next 02 10 10 04 10 2 4 020040 2/0/0 40 transfer (A) to N 2A 01 0B 15 1C = 1 11 5 + 1A1B5C 26/0/0 1B5C enter subroutine 38 0D 1A 19 01 H : 10 9 1 18DA91 24/1/2 1A91 modify address of next 23 02 10 10 10 C 2 132000 19/0/1 0 input one block/reset timer 2A 01 0B 15 1C = 1 11 5 + 1A1B5C 26/0/0 1B5C enter subroutine 01 0E 10 1F 1F 1 . £ £ 01E0FF 1/1/3 FF select literal address 02 01 0B 16 16 2 1 11 6 6 021B66 2/0/0 1B66 transfer (A) to N 38 19 1A 0D 1A H 9 10 : 10 189ADA 24/1/0 1ADA unconditional jump 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 6E 00 00 00 00 be 10 13 1A 0D 1A 3 10 : 10 003ADA 0/0/1 1ADA Invalid 38 15 1A 1A 04 H 5 10 10 4 185AA4 24/0/2 1AA4 select literal and division 2C 07 0B 07 0E ' 7 11 7 . 1C7B7E 28/0/3 1B7E unpack variable field data 2A 0B 1A 19 04 = 11 10 9 4 1ABA94 26/1/1 1A94 set modification register 38 15 1A 1A 16 H 5 10 10 6 185AA6 24/0/2 1AA6 select literal and division 1C 13 0B 16 1A + 3 11 6 10 0C3B6A 12/0/1 1B6A convert 02 13 0B 19 1C 2 3 11 9 + 023B9C 2/0/1 1B9C transfer (A) to N 29 02 10 10 01 I 2 1 192001 25/0/1 1 step on and test 38 19 1A 0D 0D H 9 10 : : 189ADD 24/1/0 1ADD unconditional jump 16 01 0B 19 0D 6 1 11 9 : 061B9D 6/0/0 1B9D select (N) 15 01 0B 19 1C 5 1 11 9 + 051B9C 5/0/0 1B9C subtract (N) from (A) 3B 15 1A 0E 07 * 5 10 . 7 1B5AE7 27/0/2 1AE7 jump A >= Z 10 10 10 10 07 7 000007 0/0/0 7 Halt 38 19 1A 1C 1A H 9 10 + 10 189ACA 24/1/0 1ACA unconditional jump 16 19 0B 1A 10 6 9 11 10 069BA0 6/1/0 1BA0 select (N) 6E 00 00 00 00 be 10 13 1A 0E 08 3 10 . 8 003AE8 0/0/1 1AE8 Invalid 15 01 0B 19 1C 5 1 11 9 + 051B9C 5/0/0 1B9C subtract (N) from (A) 3B 15 1A 0E 1C * 5 10 . + 1B5AEC 27/0/2 1AEC jump A >= Z 10 10 10 10 08 8 000008 0/0/0 8 Halt 38 19 1A 1C 1A H 9 10 + 10 189ACA 24/1/0 1ACA unconditional jump 16 01 0B 19 1C 6 1 11 9 + 061B9C 6/0/0 1B9C select (N) 3B 01 1A 1F 10 * 1 10 £ 1B1AF0 27/0/0 1AF0 jump A = Z 16 01 0B 19 0D 6 1 11 9 : 061B9D 6/0/0 1B9D select (N) 3B 13 1A 1F 02 * 3 10 £ 2 1B3AF2 27/0/1 1AF2 jump A != Z 10 10 10 10 19 9 000009 0/0/0 9 Halt 38 19 1A 1C 1A H 9 10 + 10 189ACA 24/1/0 1ACA unconditional jump 16 01 0B 19 1C 6 1 11 9 + 061B9C 6/0/0 1B9C select (N) 02 19 0B 16 19 2 9 11 6 9 029B69 2/1/0 1B69 transfer (A) to N 2A 01 0B 04 15 = 1 11 4 5 1A1B45 26/0/0 1B45 enter subroutine 2A 0B 1A 1A 02 = 11 10 10 2 1ABAA2 26/1/1 1AA2 set modification register 6E 00 00 00 00 be 10 13 1A 1F 16 3 10 £ 6 003AF6 0/0/1 1AF6 Invalid 16 13 0B 19 1C 6 3 11 9 + 063B9C 6/0/1 1B9C select (N) 02 19 0B 16 19 2 9 11 6 9 029B69 2/1/0 1B69 transfer (A) to N 2A 01 0B 04 15 = 1 11 4 5 1A1B45 26/0/0 1B45 enter subroutine 29 02 10 10 01 I 2 1 192001 25/0/1 1 step on and test 38 19 1A 1F 16 H 9 10 £ 6 189AF6 24/1/0 1AF6 unconditional jump 2A 0B 1A 19 1A = 11 10 9 10 1ABA9A 26/1/1 1A9A set modification register 16 13 0B 07 10 6 3 11 7 063B70 6/0/1 1B70 select (N) 02 19 0B 16 19 2 9 11 6 9 029B69 2/1/0 1B69 transfer (A) to N 2A 01 0B 04 15 = 1 11 4 5 1A1B45 26/0/0 1B45 enter subroutine 29 02 10 10 01 I 2 1 192001 25/0/1 1 step on and test 38 19 1A 1F 1C H 9 10 £ + 189AFC 24/1/0 1AFC unconditional jump 01 0E 10 10 01 1 . 1 01E001 1/1/3 1 select literal address 07 01 0B 19 0D 7 1 11 9 : 071B9D 7/0/0 1B9D augment (N) by (A) 2A 0B 0B 19 1C = 11 11 9 + 1ABB9C 26/1/1 1B9C set modification register 6E 00 00 00 00 be 10 13 0B 10 04 3 11 4 003B04 0/0/1 1B04 Invalid 38 19 0B 10 16 H 9 11 6 189B06 24/1/0 1B06 unconditional jump 02 10 10 10 02 2 2 020002 2/0/0 2 transfer (A) to N 2A 0D 1A 19 08 = : 10 9 8 1ADA98 26/1/2 1A98 set modification register 29 04 10 10 1A I 4 10 19400A 25/0/2 A step on and test 38 19 0B 10 1C H 9 11 + 189B0C 24/1/0 1B0C unconditional jump 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 01 0E 10 10 10 1 . 01E000 1/1/3 0 select literal address 02 01 0B 16 07 2 1 11 6 7 021B67 2/0/0 1B67 transfer (A) to N 38 0D 1A 0B 1A H : 10 11 10 18DABA 24/1/2 1ABA modify address of next 10 04 10 10 10 4 004000 0/0/2 0 replace (B) by (N) 16 01 1A 1A 10 6 1 10 10 061AA0 6/0/0 1AA0 select (N) 0E 01 0B 16 07 . 1 11 6 7 0E1B67 14/0/0 1B67 replace selected bits 6E 00 00 00 00 be 10 13 0B 01 02 3 11 1 2 003B12 0/0/1 1B12 Invalid 16 01 0B 16 07 6 1 11 6 7 061B67 6/0/0 1B67 select (N) 3B 13 0B 01 19 * 3 11 1 9 1B3B19 27/0/1 1B19 jump A != Z 16 19 0B 16 16 6 9 11 6 6 069B66 6/1/0 1B66 select (N) 3B 15 0B 01 19 * 5 11 1 9 1B5B19 27/0/2 1B19 jump A >= Z 16 19 1A 19 1C 6 9 10 9 + 069A9C 6/1/0 1A9C select (N) 02 19 0B 16 08 2 9 11 6 8 029B68 2/1/0 1B68 transfer (A) to N 38 19 0B 01 0B H 9 11 1 11 189B1B 24/1/0 1B1B unconditional jump 16 01 0B 16 07 6 1 11 6 7 061B67 6/0/0 1B67 select (N) 02 19 0B 16 19 2 9 11 6 9 029B69 2/1/0 1B69 transfer (A) to N 2A 01 0B 04 15 = 1 11 4 5 1A1B45 26/0/0 1B45 enter subroutine 29 02 10 10 01 I 2 1 192001 25/0/1 1 step on and test 38 19 0B 02 1A H 9 11 2 10 189B2A 24/1/0 1B2A unconditional jump 38 19 0B 13 04 H 9 11 3 4 189B34 24/1/0 1B34 unconditional jump 10 10 10 10 10 000000 0/0/0 0 Halt 6E 00 00 00 00 be 10 13 0B 02 10 3 11 2 003B20 0/0/1 1B20 Invalid 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 29 04 10 10 01 I 4 1 194001 25/0/2 1 step on and test 38 19 0B 10 1C H 9 11 + 189B0C 24/1/0 1B0C unconditional jump 2A 0D 1A 19 08 = : 10 9 8 1ADA98 26/1/2 1A98 set modification register 16 19 1A 19 0E 6 9 10 9 . 069A9E 6/1/0 1A9E select (N) 6E 00 00 00 00 be 10 13 0B 02 0E 3 11 2 . 003B2E 0/0/1 1B2E Invalid 02 19 0B 16 08 2 9 11 6 8 029B68 2/1/0 1B68 transfer (A) to N 2A 01 0B 04 15 = 1 11 4 5 1A1B45 26/0/0 1B45 enter subroutine 38 19 0B 13 1F H 9 11 3 £ 189B3F 24/1/0 1B3F unconditional jump 02 19 0B 16 19 2 9 11 6 9 029B69 2/1/0 1B69 transfer (A) to N 2A 01 0B 04 15 = 1 11 4 5 1A1B45 26/0/0 1B45 enter subroutine 38 19 0B 10 1C H 9 11 + 189B0C 24/1/0 1B0C unconditional jump 29 04 10 10 01 I 4 1 194001 25/0/2 1 step on and test 38 19 0B 13 0B H 9 11 3 11 189B3B 24/1/0 1B3B unconditional jump 16 19 1A 19 0E 6 9 10 9 . 069A9E 6/1/0 1A9E select (N) 02 19 0B 16 08 2 9 11 6 8 029B68 2/1/0 1B68 transfer (A) to N 2A 01 0B 04 15 = 1 11 4 5 1A1B45 26/0/0 1B45 enter subroutine 2A 01 0B 04 15 = 1 11 4 5 1A1B45 26/0/0 1B45 enter subroutine 38 19 1A 1C 16 H 9 10 + 6 189AC6 24/1/0 1AC6 unconditional jump 29 1C 10 10 10 I + 19C000 25/1/2 0 interrogate indicators 6E 00 00 00 00 be 10 13 0B 13 1C 3 11 3 + 003B3C 0/0/1 1B3C Invalid 02 19 0B 16 08 2 9 11 6 8 029B68 2/1/0 1B68 transfer (A) to N 2A 01 0B 04 15 = 1 11 4 5 1A1B45 26/0/0 1B45 enter subroutine 38 19 0B 13 04 H 9 11 3 4 189B34 24/1/0 1B34 unconditional jump 38 0D 1A 19 10 H : 10 9 18DA90 24/1/2 1A90 modify address of next 16 10 10 10 02 6 2 060002 6/0/0 2 select (N) 38 19 0B 13 01 H 9 11 3 1 189B31 24/1/0 1B31 unconditional jump 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 13 0B 01 1C 3 11 1 + 003B1C 0/0/1 1B1C Invalid 16 19 0B 16 08 6 9 11 6 8 069B68 6/1/0 1B68 select (N) 38 0D 1A 19 10 H : 10 9 18DA90 24/1/2 1A90 modify address of next 02 08 10 19 1A 2 8 9 10 02809A 2/1/0 9A transfer (A) to N 2A 01 0B 04 0E = 1 11 4 . 1A1B4E 26/0/0 1B4E enter subroutine 6E 00 00 00 00 be 10 13 0B 04 1A 3 11 4 10 003B4A 0/0/1 1B4A Invalid 38 0D 1A 19 02 H : 10 9 2 18DA92 24/1/2 1A92 modify address of next 23 10 10 10 10 C 130000 19/0/0 0 output 2A 01 0B 04 0E = 1 11 4 . 1A1B4E 26/0/0 1B4E enter subroutine 2A 13 0B 04 15 = 3 11 4 5 1A3B45 26/0/1 1B45 leave subroutine 10 13 0B 04 0D 3 11 4 : 003B4D 0/0/1 1B4D Invalid 38 0D 1A 19 02 H : 10 9 2 18DA92 24/1/2 1A92 modify address of next 2A 08 10 10 10 = 8 1A8000 26/1/0 0 test route N1 10 10 10 01 01 1 1 000011 0/0/0 11 Halt 38 19 0B 04 1F H 9 11 4 £ 189B4F 24/1/0 1B4F unconditional jump 38 19 0B 15 16 H 9 11 5 6 189B56 24/1/0 1B56 unconditional jump 10 10 10 01 13 1 3 000013 0/0/0 13 Halt 38 19 0B 15 07 H 9 11 5 7 189B57 24/1/0 1B57 unconditional jump 10 10 10 01 02 1 2 000012 0/0/0 12 Halt 2A 13 0B 04 0E = 3 11 4 . 1A3B4E 26/0/1 1B4E leave subroutine 6E 00 00 00 00 be 10 13 0B 15 08 3 11 5 8 003B58 0/0/1 1B58 Invalid 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 13 1A 0D 02 3 10 : 2 003AD2 0/0/1 1AD2 Invalid 38 0D 1A 19 01 H : 10 9 1 18DA91 24/1/2 1A91 modify address of next 2A 08 10 10 10 = 8 1A8000 26/1/0 0 test route N1 10 10 10 10 01 1 000001 0/0/0 1 Halt 38 19 0B 15 0D H 9 11 5 : 189B5D 24/1/0 1B5D unconditional jump 38 19 0B 16 04 H 9 11 6 4 189B64 24/1/0 1B64 unconditional jump 10 10 10 10 13 3 000003 0/0/0 3 Halt 38 19 0B 16 15 H 9 11 6 5 189B65 24/1/0 1B65 unconditional jump 10 10 10 10 02 2 000002 0/0/0 2 Halt 2A 13 0B 15 1C = 3 11 5 + 1A3B5C 26/0/1 1B5C leave subroutine 6E 00 00 00 00 be 16 16 10 10 10 6 6 066000 6/0/3 0 select (N) 1F 1F 10 10 10 £ £ 0FF000 15/1/3 1000 collate and add 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 01 04 19 1 4 9 000149 0/0/0 149 Halt 19 02 01 15 02 9 2 1 5 2 092152 9/0/1 152 multiply uniform radix 01 02 01 04 19 1 2 1 4 9 012149 1/0/1 149 prepare for digit collation 19 02 10 10 10 9 2 092000 9/0/1 0 multiply uniform radix 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 6E 00 00 be 000E00 0/0/0 E00 Halt 78 00 00 00 00 Y 080000 8/0/0 0 merge constant length File: old-paper-tapes/U23load.leo 58 10 32 10 10 Q B 080200 8/0/0 200 merge constant length 70 10 13 10 10 0 3 000300 0/0/0 300 Halt 38 08 10 04 13 H 8 4 3 188043 24/1/0 43 unconditional jump 10 08 10 10 10 8 008000 0/1/0 0 copy registers 38 1C 10 08 10 H + 8 18C080 24/1/2 80 modify address of next 01 16 1F 08 10 1 6 £ 8 016F80 1/0/3 F80 interchange area addresses 29 0E 08 10 10 I . 8 19E800 25/1/3 800 conditional Halt 38 1C 10 08 10 H + 8 18C080 24/1/2 80 modify address of next 23 02 10 10 10 C 2 132000 19/0/1 0 input one block/reset timer 38 1C 10 08 10 H + 8 18C080 24/1/2 80 modify address of next 2A 08 10 10 10 = 8 1A8000 26/1/0 0 test route N1 10 10 10 02 01 2 1 000021 0/0/0 21 Halt 38 19 1F 1C 0B H 9 £ + 11 189FCB 24/1/0 1FCB unconditional jump 10 10 10 02 13 2 3 000023 0/0/0 23 Halt 10 10 10 01 1C 1 + 00001C 0/0/0 1C Halt 38 0D 1F 0D 1F H : £ : £ 18DFDF 24/1/2 1FDF modify address of next 16 19 1F 0E 13 6 9 £ . 3 069FE3 6/1/0 1FE3 select (N) 38 0D 1F 0D 0E H : £ : . 18DFDE 24/1/2 1FDE modify address of next 02 10 10 10 10 2 020000 2/0/0 0 transfer (A) to N 16 19 1F 0D 1C 6 9 £ : + 069FDC 6/1/0 1FDC select (N) 07 19 1F 0D 0E 7 9 £ : . 079FDE 7/1/0 1FDE augment (N) by (A) 16 01 1F 0D 1F 6 1 £ : £ 061FDF 6/0/0 1FDF select (N) 15 01 1F 0D 10 5 1 £ : 051FD0 5/0/0 1FD0 subtract (N) from (A) 3B 13 1F 0D 01 * 3 £ : 1 1B3FD1 27/0/1 1FD1 jump A != Z 02 01 1F 0D 1F 2 1 £ : £ 021FDF 2/0/0 1FDF transfer (A) to N 38 19 1F 1C 08 H 9 £ + 8 189FC8 24/1/0 1FC8 unconditional jump 10 10 10 10 01 1 000001 0/0/0 1 Halt 10 10 10 10 02 2 000002 0/0/0 2 Halt 10 01 0E 0B 16 1 . 11 6 001EB6 0/0/0 1EB6 Halt 10 10 10 01 04 1 4 000014 0/0/0 14 Halt 70 10 75 10 7C 0 V , 00050C 0/0/0 50C Halt 70 10 67 10 02 0 X 2 000702 0/0/0 702 Halt 58 10 07 10 13 Q 7 3 080703 8/0/0 703 merge constant length 70 10 04 10 7A 0 4 ( 00040A 0/0/0 40A Halt 70 10 13 10 5E 0 3 hf 00030E 0/0/0 30E Halt 70 10 04 10 51 0 4 J 000401 0/0/0 401 Halt 40 10 32 10 04 & B 4 000204 0/0/0 204 Halt 70 10 16 10 61 0 6 / 000601 0/0/0 601 Halt 58 10 67 10 54 Q X M 080704 8/0/0 704 merge constant length 70 10 67 10 02 0 X 2 000702 0/0/0 702 Halt 70 10 67 10 58 0 X Q 000708 0/0/0 708 Halt 70 10 76 10 02 0 W 2 000602 0/0/0 602 Halt 70 10 75 10 73 0 V T 000503 0/0/0 503 Halt 70 10 62 10 13 0 S 3 000203 0/0/0 203 Halt 08 10 16 10 58 8 6 Q 080608 8/0/0 608 merge constant length 08 10 13 10 4A 8 3 # 08030A 8/0/0 30A merge constant length 08 10 13 10 43 8 3 L 080303 8/0/0 303 merge constant length 58 10 13 10 51 Q 3 J 080301 8/0/0 301 merge constant length 10 10 62 10 7C S , 00020C 0/0/0 20C Halt 10 10 02 10 7A 2 ( 00020A 0/0/0 20A Halt 70 10 62 10 6D 0 S ; 00020D 0/0/0 20D Halt 40 10 26 10 6D & F ; 00060D 0/0/0 60D Halt 40 10 46 10 75 & O V 000605 0/0/0 605 Halt 40 10 62 10 10 & S 000200 0/0/0 200 Halt 58 10 52 10 10 Q K 080200 8/0/0 200 merge constant length 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 40 10 10 & 000000 0/0/0 0 Halt 40 10 40 10 10 & & 000000 0/0/0 0 Halt 16 08 10 10 19 6 8 9 068009 6/1/0 9 select (N) 02 01 1F 1C 16 2 1 £ + 6 021FC6 2/0/0 1FC6 transfer (A) to N 10 01 1F 0E 10 1 £ . 001FE0 0/0/0 1FE0 Halt 38 19 1F 1C 16 H 9 £ + 6 189FC6 24/1/0 1FC6 unconditional jump 10 10 20 10 10 - 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 1F 10 29 £ I 000F09 0/0/0 F09 Halt 6E 00 00 00 00 be 10 01 0E 0B 16 1 . 11 6 001EB6 0/0/0 1EB6 Halt 10 01 0E 0B 16 1 . 11 6 001EB6 0/0/0 1EB6 Halt 10 01 1F 0D 10 1 £ : 001FD0 0/0/0 1FD0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 01 0E 0B 16 1 . 11 6 001EB6 0/0/0 1EB6 Halt 10 10 10 10 1F £ 00000F 0/0/0 F Halt 10 10 10 10 01 1 000001 0/0/0 1 Halt 10 10 10 10 01 1 000001 0/0/0 1 Halt 10 10 10 10 13 3 000003 0/0/0 3 Halt 01 04 0B 16 01 1 4 11 6 1 014B61 1/0/2 B61 round off 16 01 1F 19 04 6 1 £ 9 4 061F94 6/0/0 1F94 select (N) 02 10 10 08 01 2 8 1 020081 2/0/0 81 transfer (A) to N 01 1A 10 10 10 1 10 01A000 1/1/1 0 add literal address 16 01 1F 01 0E 6 1 £ 1 . 061F1E 6/0/0 1F1E select (N) 6E 00 00 00 00 be 10 01 0E 0B 1A 1 . 11 10 001EBA 0/0/0 1EBA Halt 02 01 1F 01 0D 2 1 £ 1 : 021F1D 2/0/0 1F1D transfer (A) to N 29 0E 10 01 10 I . 1 19E010 25/1/3 10 conditional Halt 29 1C 10 01 10 I + 1 19C010 25/1/2 10 interrogate indicators 3B 01 0E 0D 13 * 1 . : 3 1B1ED3 27/0/0 1ED3 jump A = Z 16 08 10 08 10 6 8 8 068080 6/1/0 80 select (N) 02 19 1F 0B 16 2 9 £ 11 6 029FB6 2/1/0 1FB6 transfer (A) to N 2A 0B 1F 1A 08 = 11 £ 10 8 1ABFA8 26/1/1 1FA8 set modification register 37 1A 10 10 10 G 10 17A000 23/1/1 0 copy into tag 29 02 10 10 02 I 2 2 192002 25/0/1 2 step on and test 38 19 0E 1C 01 H 9 . + 1 189EC1 24/1/0 1EC1 unconditional jump 2A 0B 1F 19 16 = 11 £ 9 6 1ABF96 26/1/1 1F96 set modification register 02 1A 10 10 10 2 10 02A000 2/1/1 0 transfer (A) to N 29 02 10 10 02 I 2 2 192002 25/0/1 2 step on and test 38 19 0E 1C 15 H 9 . + 5 189EC5 24/1/0 1EC5 unconditional jump 6E 00 00 00 00 be 10 01 0E 1C 08 1 . + 8 001EC8 0/0/0 1EC8 Halt 2A 0B 1F 19 08 = 11 £ 9 8 1ABF98 26/1/1 1F98 set modification register 02 1A 10 10 10 2 10 02A000 2/1/1 0 transfer (A) to N 29 02 10 10 02 I 2 2 192002 25/0/1 2 step on and test 38 19 0E 1C 19 H 9 . + 9 189EC9 24/1/0 1EC9 unconditional jump 2A 0B 1F 19 1A = 11 £ 9 10 1ABF9A 26/1/1 1F9A set modification register 16 01 1F 19 15 6 1 £ 9 5 061F95 6/0/0 1F95 select (N) 37 1A 10 10 10 G 10 17A000 23/1/1 0 copy into tag 29 02 10 10 02 I 2 2 192002 25/0/1 2 step on and test 38 19 0E 1C 0E H 9 . + . 189ECE 24/1/0 1ECE unconditional jump 16 19 1F 0B 16 6 9 £ 11 6 069FB6 6/1/0 1FB6 select (N) 02 08 10 08 10 2 8 8 028080 2/1/0 80 transfer (A) to N 02 10 10 10 19 2 9 020009 2/0/0 9 transfer (A) to N 02 10 10 01 01 2 1 1 020011 2/0/0 11 transfer (A) to N 02 10 10 01 19 2 1 9 020019 2/0/0 19 transfer (A) to N 6E 00 00 00 00 be 10 01 0E 0D 16 1 . : 6 001ED6 0/0/0 1ED6 Halt 38 19 0E 0D 0E H 9 . : . 189EDE 24/1/0 1EDE unconditional jump 29 0B 1F 1F 1F I 11 £ £ £ 19BFFF 25/1/1 1FFF clear indicators 16 01 1F 0B 13 6 1 £ 11 3 061FB3 6/0/0 1FB3 select (N) 3B 01 0E 0B 08 * 1 . 11 8 1B1EB8 27/0/0 1EB8 jump A = Z 02 01 1F 0B 1A 2 1 £ 11 10 021FBA 2/0/0 1FBA transfer (A) to N 38 19 1C 04 16 H 9 + 4 6 189C46 24/1/0 1C46 unconditional jump 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 29 1C 10 10 01 I + 1 19C001 25/1/2 1 interrogate indicators 02 01 1F 0B 10 2 1 £ 11 021FB0 2/0/0 1FB0 transfer (A) to N 29 1C 10 10 02 I + 2 19C002 25/1/2 2 interrogate indicators 02 01 1F 0B 01 2 1 £ 11 1 021FB1 2/0/0 1FB1 transfer (A) to N 29 1C 10 10 04 I + 4 19C004 25/1/2 4 interrogate indicators 02 01 1F 0B 02 2 1 £ 11 2 021FB2 2/0/0 1FB2 transfer (A) to N 6E 00 00 00 00 be 10 01 0E 0E 04 1 . . 4 001EE4 0/0/0 1EE4 Halt 29 1C 10 10 08 I + 8 19C008 25/1/2 8 interrogate indicators 02 01 1F 0B 13 2 1 £ 11 3 021FB3 2/0/0 1FB3 transfer (A) to N 38 19 0E 0E 08 H 9 . . 8 189EE8 24/1/0 1EE8 unconditional jump 10 10 10 10 10 000000 0/0/0 0 Halt 38 0D 1F 0B 10 H : £ 11 18DFB0 24/1/2 1FB0 modify address of next 16 01 1F 15 15 6 1 £ 5 5 061F55 6/0/0 1F55 select (N) 02 01 1F 15 04 2 1 £ 5 4 021F54 2/0/0 1F54 transfer (A) to N 38 0D 1F 0B 10 H : £ 11 18DFB0 24/1/2 1FB0 modify address of next 16 01 1F 08 16 6 1 £ 8 6 061F86 6/0/0 1F86 select (N) 02 01 1F 08 15 2 1 £ 8 5 021F85 2/0/0 1F85 transfer (A) to N 16 01 1F 19 1C 6 1 £ 9 + 061F9C 6/0/0 1F9C select (N) 38 1C 10 08 10 H + 8 18C080 24/1/2 80 modify address of next 02 10 10 04 10 2 4 020040 2/0/0 40 transfer (A) to N 16 01 1F 19 0D 6 1 £ 9 : 061F9D 6/0/0 1F9D select (N) 6E 00 00 00 00 be 10 01 0E 1F 02 1 . £ 2 001EF2 0/0/0 1EF2 Halt 02 10 10 16 07 2 6 7 020067 2/0/0 67 transfer (A) to N 38 1C 10 08 10 H + 8 18C080 24/1/2 80 modify address of next 2A 08 10 10 10 = 8 1A8000 26/1/0 0 test route N1 38 19 1F 10 01 H 9 £ 1 189F01 24/1/0 1F01 unconditional jump 38 19 1F 10 13 H 9 £ 3 189F03 24/1/0 1F03 unconditional jump 38 19 0E 1F 19 H 9 . £ 9 189EF9 24/1/0 1EF9 unconditional jump 10 10 10 10 07 7 000007 0/0/0 7 Halt 02 01 1F 0B 1A 2 1 £ 11 10 021FBA 2/0/0 1FBA transfer (A) to N 38 1C 10 16 07 H + 6 7 18C067 24/1/2 67 modify address of next 02 08 10 01 0E 2 8 1 . 02801E 2/1/0 1E transfer (A) to N 38 1C 10 08 10 H + 8 18C080 24/1/2 80 modify address of next 01 16 19 1C 10 1 6 9 + 0169C0 1/0/3 9C0 interchange area addresses 38 1C 10 08 10 H + 8 18C080 24/1/2 80 modify address of next 23 02 10 10 10 C 2 132000 19/0/1 0 input one block/reset timer 6E 00 00 00 00 be 10 38 19 1F 10 H 9 £ 0089F0 0/1/0 9F0 copy registers 15 10 10 10 10 5 050000 5/0/0 0 subtract (N) from (A) 13 38 19 0E 1F 3 H 9 . £ 0389EF 3/1/0 9EF copy (A) to N 13 01 1A 10 10 3 1 10 031A00 3/0/0 1A00 copy (A) to N 10 38 19 0E 1F H 9 . £ 0089EF 0/1/0 9EF copy registers 13 38 1C 10 08 3 H + 8 038C08 3/1/0 C08 copy (A) to N 10 2A 08 10 10 = 8 00A800 0/1/1 800 replace registers 10 10 10 10 10 000000 0/0/0 0 Halt 19 38 19 1F 10 9 H 9 £ 0989F0 9/1/0 9F0 multiply uniform radix 15 38 19 1F 01 5 H 9 £ 1 0589F1 5/1/0 9F1 subtract (N) from (A) 04 38 19 0E 1F 4 H 9 . £ 0489EF 4/1/0 9EF add (N) to (A) 13 02 01 1F 0B 3 2 1 £ 11 0321FB 3/0/1 1FB copy (A) to N 1A 38 1C 10 16 10 H + 6 0A8C06 10/1/0 C06 multiply and add 07 02 08 10 01 7 2 8 1 072801 7/0/1 801 augment (N) by (A) 0E 6E 00 00 00 . be 0EE000 14/1/3 0 replace selected bits 10 0E 38 1C 10 . H + 00E8C0 0/1/3 8C0 Invalid 08 10 01 16 19 8 1 6 9 080169 8/0/0 169 merge constant length 1C 10 29 0E 08 + I . 8 0C09E8 12/0/0 9E8 convert 10 10 38 1C 10 H + 0008C0 0/0/0 8C0 Halt 08 10 23 02 10 8 C 2 080320 8/0/0 320 merge constant length 10 10 38 19 1F H 9 £ 00089F 0/0/0 89F Halt 01 16 10 10 10 1 6 016000 1/0/3 0 interchange area addresses 10 0B 38 19 0E 11 H 9 . 00B89E 0/1/1 189E replace registers 1F 04 10 15 1F £ 4 5 £ 0F405F 15/0/2 5F collate and add 1A 16 1F 10 10 10 6 £ 0A6F00 10/0/3 F00 multiply and add 16 07 13 01 1F 6 7 3 1 £ 06731F 6/0/3 131F select (N) 0B 08 04 01 1F 11 8 4 1 £ 0B841F 11/1/0 41F multiply and subtract 1A 13 02 01 1F 10 3 2 1 £ 0A321F 10/0/1 121F multiply and add 0B 19 16 01 1F 11 9 6 1 £ 0B961F 11/1/0 161F multiply and subtract 1A 02 6E 00 00 10 2 be 0A2E00 10/0/1 E00 multiply and add 1F 01 1C 02 01 £ 1 + 2 1 0F1C21 15/0/0 1C21 collate and add 1F 0B 04 10 10 £ 11 4 0FB400 15/1/1 1400 collate and add 10 10 10 38 19 H 9 000089 0/0/0 89 Halt 1F 02 01 38 19 £ 2 1 H 9 0F2189 15/0/1 189 collate and add 1F 13 1A 38 19 £ 3 10 H 9 0F3A89 15/0/1 1A89 collate and add 1C 04 1A 16 01 + 4 10 6 1 0C4A61 12/0/2 A61 convert 1F 1A 10 07 01 £ 10 7 1 0FA071 15/1/1 71 collate and add 1F 0B 08 38 1C £ 11 8 H + 0FB88C 15/1/1 188C collate and add 10 16 07 16 08 6 7 6 8 006768 0/0/3 768 set radix 10 10 13 15 01 3 5 1 000351 0/0/0 351 Halt 1F 1A 02 02 01 £ 10 2 2 1 0FA221 15/1/1 221 collate and add 1F 1A 1C 38 1C £ 10 + H + 0FAC8C 15/1/1 C8C collate and add 10 16 07 16 08 6 7 6 8 006768 0/0/3 768 set radix 10 10 15 02 01 5 2 1 000521 0/0/0 521 Halt 1F 1A 0D 6E 00 £ 10 : be 0FADE0 15/1/1 DE0 collate and add 01 1F 02 1A 38 1 £ 2 10 H 01F2A8 1/1/3 12A8 select literal address 1C 10 16 07 16 + 6 7 6 0C0676 12/0/0 676 convert 08 10 10 0B 02 8 11 2 0800B2 8/0/0 B2 merge constant length 01 1F 1A 0E 38 1 £ 10 . H 01FAE8 1/1/3 1AE8 select literal address 1C 10 16 07 16 + 6 7 6 0C0676 12/0/0 676 convert 08 10 10 0D 02 8 : 2 0800D2 8/0/0 D2 merge constant length 01 1F 1A 1F 10 1 £ 10 £ 01FAF0 1/1/3 1AF0 select literal address 15 1F 1A 1C 1F 5 £ 10 + £ 05FACF 5/1/3 1ACF subtract (N) from (A) 01 1F 1A 02 02 1 £ 10 2 2 01FA22 1/1/3 1A22 select literal address 01 1F 0B 15 38 1 £ 11 5 H 01FB58 1/1/3 1B58 select literal address 1C 10 16 07 16 + 6 7 6 0C0676 12/0/0 676 convert 08 10 10 07 02 8 7 2 080072 8/0/0 72 merge constant length 01 1F 0B 1C 38 1 £ 11 + H 01FBC8 1/1/3 1BC8 select literal address 1C 10 16 07 16 + 6 7 6 0C0676 12/0/0 676 convert 08 10 10 19 6E 8 9 be 08009E 8/0/0 9E merge constant length 10 01 1F 13 08 1 £ 3 8 001F38 0/0/0 1F38 Halt 04 01 1F 1A 01 4 1 £ 10 1 041FA1 4/0/0 1FA1 add (N) to (A) 02 01 1F 0B 0D 2 1 £ 11 : 021FBD 2/0/0 1FBD transfer (A) to N 16 19 1F 1A 04 6 9 £ 10 4 069FA4 6/1/0 1FA4 select (N) 38 1C 10 16 07 H + 6 7 18C067 24/1/2 67 modify address of next 15 08 10 01 0E 5 8 1 . 05801E 5/1/0 1E subtract (N) from (A) 3B 01 1F 04 10 * 1 £ 4 1B1F40 27/0/0 1F40 jump A = Z 10 10 10 10 0D : 00000D 0/0/0 D Halt 38 19 0E 1F 13 H 9 . £ 3 189EF3 24/1/0 1EF3 unconditional jump 38 1C 10 16 07 H + 6 7 18C067 24/1/2 67 modify address of next 16 08 10 10 01 6 8 1 068001 6/1/0 1 select (N) 15 01 1F 1A 02 5 1 £ 10 2 051FA2 5/0/0 1FA2 subtract (N) from (A) 15 01 1F 1A 1C 5 1 £ 10 + 051FAC 5/0/0 1FAC subtract (N) from (A) 3B 01 1F 04 07 * 1 £ 4 7 1B1F47 27/0/0 1F47 jump A = Z 10 10 10 10 1F £ 00000F 0/0/0 F Halt 6E 00 00 00 00 be 16 38 19 0E 1F 6 H 9 . £ 0689EF 6/1/0 9EF select (N) 13 38 0D 1F 0B 3 H : £ 11 038DFB 3/1/0 DFB copy (A) to N 08 16 08 10 10 8 6 8 086800 8/0/3 800 merge constant length 02 15 19 1F 19 2 5 9 £ 9 0259F9 2/0/2 19F9 transfer (A) to N 0E 3B 13 1F 15 . * 3 £ 5 0EB3F5 14/1/1 13F5 replace selected bits 08 02 01 1F 0B 8 2 1 £ 11 0821FB 8/0/1 1FB merge constant length 04 16 01 1F 0B 4 6 1 £ 11 0461FB 4/0/3 1FB add (N) to (A) 15 3B 01 1F 15 5 * 1 £ 5 05B1F5 5/1/1 11F5 subtract (N) from (A) 10 10 10 10 01 1 000001 0/0/0 1 Halt 1F 38 19 0E 1F £ H 9 . £ 0F89EF 15/1/0 9EF collate and add 13 16 01 1F 01 3 6 1 £ 1 0361F1 3/0/3 1F1 copy (A) to N 1F 02 01 1F 01 £ 2 1 £ 1 0F21F1 15/0/1 1F1 collate and add 0D 38 0D 1F 0B : H : £ 11 0D8DFB 13/1/0 DFB divide uniform radix 08 16 08 10 10 8 6 8 086800 8/0/3 800 merge constant length 13 6E 00 00 00 3 be 03E000 3/1/3 0 copy (A) to N 15 04 10 10 10 5 4 054000 5/0/2 0 subtract (N) from (A) 10 10 38 19 1F H 9 £ 00089F 0/0/0 89F Halt 15 0B 38 19 0D 5 11 H 9 : 05B89D 5/1/1 189D subtract (N) from (A) 10 10 38 19 0D H 9 : 00089D 0/0/0 89D Halt 04 1A 16 01 1F 4 10 6 1 £ 04A61F 4/1/1 61F add (N) to (A) 1A 02 02 01 1F 10 2 2 1 £ 0A221F 10/0/1 21F multiply and add 0B 04 38 19 1F 11 4 H 9 £ 0B489F 11/0/2 89F multiply and subtract 15 10 38 0D 1F 5 H : £ 0508DF 5/0/0 8DF subtract (N) from (A) 1A 1C 02 10 10 10 + 2 0AC200 10/1/2 200 multiply and add 10 01 16 01 1F 1 6 1 £ 00161F 0/0/0 161F Halt 0B 04 3B 13 1F 11 4 * 3 £ 0B4B3F 11/0/2 B3F multiply and subtract 16 08 38 0D 1F 6 8 H : £ 0688DF 6/1/0 8DF select (N) 1A 1C 16 10 10 10 + 6 0AC600 10/1/2 600 multiply and add 10 10 02 01 1F 2 1 £ 00021F 0/0/0 21F Halt 0B 0B 6E 00 00 11 11 be 0BBE00 11/1/1 1E00 multiply and subtract 1F 16 02 15 01 £ 6 2 5 1 0F6251 15/0/3 251 collate and add 1F 1A 02 38 0D £ 10 2 H : 0FA28D 15/1/1 28D collate and add 1F 1A 1C 02 08 £ 10 + 2 8 0FAC28 15/1/1 C28 collate and add 10 10 10 16 01 6 1 000061 0/0/0 61 Halt 1F 0B 0B 38 0D £ 11 11 H : 0FBB8D 15/1/1 1B8D collate and add 1F 1A 1C 02 10 £ 10 + 2 0FAC20 15/1/1 C20 collate and add 10 10 10 16 01 6 1 000061 0/0/0 61 Halt 1F 0B 15 3B 01 £ 11 5 * 1 0FB5B1 15/1/1 15B1 collate and add 1F 16 0D 16 01 £ 6 : 6 1 0F6D61 15/0/3 D61 collate and add 1F 1A 1F 38 0D £ 10 £ H : 0FAF8D 15/1/1 F8D collate and add 1F 1A 1C 37 08 £ 10 + G 8 0FAC78 15/1/1 C78 collate and add 10 10 10 16 19 6 9 000069 0/0/0 69 Halt 1F 0B 1C 3B 01 £ 11 + * 1 0FBCB1 15/1/1 1CB1 collate and add 1F 07 16 2A 0B £ 7 6 = 11 0F76AB 15/0/3 16AB collate and add 1F 0B 1C 6E 00 £ 11 + be 0FBCE0 15/1/1 1CE0 collate and add 01 1F 07 10 16 1 £ 7 6 01F706 1/1/3 1706 select literal address 01 1F 1A 1F 37 1 £ 10 £ G 01FAF7 1/1/3 1AF7 select literal address 1A 10 10 10 29 10 I 0A0009 10/0/0 9 multiply and add 02 10 10 02 38 2 2 H 020028 2/0/0 28 transfer (A) to N 19 1F 07 01 02 9 £ 7 1 2 09F712 9/1/3 1712 multiply uniform radix 19 1F 0B 1C 02 9 £ 11 + 2 09FBC2 9/1/3 1BC2 multiply uniform radix 19 1F 0B 1C 29 9 £ 11 + I 09FBC9 9/1/3 1BC9 multiply uniform radix 0E 04 10 10 16 . 4 6 0E4006 14/0/2 6 replace selected bits 01 1F 1A 02 15 1 £ 10 2 5 01FA25 1/1/3 1A25 select literal address 01 1F 0B 15 02 1 £ 11 5 2 01FB52 1/1/3 1B52 select literal address 01 1F 0B 15 16 1 £ 11 5 6 01FB56 1/1/3 1B56 select literal address 01 1F 1A 1C 04 1 £ 10 + 4 01FAC4 1/1/3 1AC4 select literal address 01 1F 1A 02 13 1 £ 10 2 3 01FA23 1/1/3 1A23 select literal address 01 1F 1A 1C 15 1 £ 10 + 5 01FAC5 1/1/3 1AC5 select literal address 01 1F 1A 0D 6E 1 £ 10 : be 01FADE 1/1/3 1ADE select literal address 10 01 1F 07 0E 1 £ 7 . 001F7E 0/0/0 1F7E Halt 3B 15 1F 08 15 * 5 £ 8 5 1B5F85 27/0/2 1F85 jump A >= Z 16 01 1F 1A 01 6 1 £ 10 1 061FA1 6/0/0 1FA1 select (N) 07 01 1F 0B 08 7 1 £ 11 8 071FB8 7/0/0 1FB8 augment (N) by (A) 16 01 1F 0B 08 6 1 £ 11 8 061FB8 6/0/0 1FB8 select (N) 15 01 1F 0B 19 5 1 £ 11 9 051FB9 5/0/0 1FB9 subtract (N) from (A) 3B 13 1F 04 07 * 3 £ 4 7 1B3F47 27/0/1 1F47 jump A != Z 38 19 1F 10 15 H 9 £ 5 189F05 24/1/0 1F05 unconditional jump 10 10 10 10 10 000000 0/0/0 0 Halt 38 19 1F 08 08 H 9 £ 8 8 189F88 24/1/0 1F88 unconditional jump 38 19 0D 1A 0D H 9 : 10 : 189DAD 24/1/0 1DAD unconditional jump 16 01 1F 0B 02 6 1 £ 11 2 061FB2 6/0/0 1FB2 select (N) 3B 13 0E 0D 07 * 3 . : 7 1B3ED7 27/0/1 1ED7 jump A != Z 16 01 1F 1A 1F 6 1 £ 10 £ 061FAF 6/0/0 1FAF select (N) 32 10 10 10 04 B 4 120004 18/0/0 4 shift logical 6E 00 00 00 00 be 1C 01 1A 10 10 + 1 10 0C1A00 12/0/0 1A00 convert 1A 02 01 1F 0B 10 2 1 £ 11 0A21FB 10/0/1 1FB multiply and add 1A 16 01 1F 1A 10 6 1 £ 10 0A61FA 10/0/3 1FA multiply and add 07 02 10 10 10 7 2 072000 7/0/1 0 augment (N) by (A) 19 16 19 1F 1A 9 6 9 £ 10 0969FA 9/0/3 9FA multiply uniform radix 1A 13 08 10 10 10 3 8 0A3800 10/0/1 1800 multiply and add 1A 02 10 10 10 10 2 0A2000 10/0/1 0 multiply and add 1A 38 08 10 10 10 H 8 0A8800 10/1/0 800 multiply and add 19 10 10 10 02 9 2 090002 9/0/0 2 multiply uniform radix 10 10 10 10 10 000000 0/0/0 0 Halt 1F 10 10 10 10 £ 0F0000 15/0/0 0 collate and add 04 10 01 1C 04 4 1 + 4 0401C4 4/0/0 1C4 add (N) to (A) 16 10 01 1F 1C 6 1 £ + 0601FC 6/0/0 1FC select (N) 10 10 04 10 10 4 000400 0/0/0 400 Halt 10 6E 00 00 00 be 00E000 0/1/3 0 Invalid 19 1A 10 10 10 9 10 09A000 9/1/1 0 multiply uniform radix 1A 10 10 04 10 10 4 0A0040 10/0/0 40 multiply and add 10 10 1F 01 1F £ 1 £ 000F1F 0/0/0 F1F Halt 1C 10 1F 01 1F + £ 1 £ 0C0F1F 12/0/0 F1F convert 0E 10 19 16 19 . 9 6 9 0E0969 14/0/0 969 replace selected bits 16 19 16 19 16 6 9 6 9 6 069696 6/1/0 1696 select (N) 19 16 10 10 10 9 6 096000 9/0/3 0 multiply uniform radix 01 04 10 10 10 1 4 014000 1/0/2 0 round off 10 02 10 10 10 2 002000 0/0/1 0 Invalid 10 01 10 10 10 1 001000 0/0/0 1000 Halt 01 1C 10 10 10 1 + 01C000 1/1/2 0 subtract literal address 10 10 07 0E 10 7 . 0007E0 0/0/0 7E0 Halt 10 10 10 07 1F 7 £ 00007F 0/0/0 7F Halt 1F 1F 2A 07 1F £ £ = 7 £ 0FFA7F 15/1/3 1A7F collate and add 0B 1A 6E 00 00 11 10 be 0BAE00 11/1/1 E00 multiply and subtract 1F 1A 08 10 10 £ 10 8 0FA800 15/1/1 800 collate and add 10 10 10 10 10 000000 0/0/0 0 Halt 10 1A 10 29 0B 10 I 11 00A09B 0/1/1 9B replace registers 1F 1F 1F 2A 13 £ £ £ = 3 0FFFA3 15/1/3 1FA3 collate and add 1F 1A 0E 10 01 £ 10 . 1 0FAE01 15/1/1 E01 collate and add 1C 0E 08 10 01 + . 8 1 0CE801 12/1/3 801 convert 1C 0E 08 10 01 + . 8 1 0CE801 12/1/3 801 convert 0B 07 1A 10 10 11 7 10 0B7A00 11/0/3 1A00 multiply and subtract 10 10 1F 10 10 £ 000F00 0/0/0 F00 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 01 10 10 1 000100 0/0/0 100 Halt 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 01 1F 0B 16 10 1 £ 11 6 01FB60 1/1/3 1B60 select literal address 10 10 01 19 10 1 9 000190 0/0/0 190 Halt 10 10 02 10 10 2 000200 0/0/0 200 Halt 01 1F 1C 1C 10 1 £ + + 01FCC0 1/1/3 1CC0 select literal address 01 1F 0D 1C 1F 1 £ : + £ 01FDCF 1/1/3 1DCF select literal address 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 13 0E 08 10 3 . 8 003E80 0/0/1 1E80 Invalid 10 07 0D 02 10 7 : 2 007D20 0/0/3 1D20 set radix 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 1C + 00000C 0/0/0 C Halt 04 0E 04 02 10 4 . 4 2 04E420 4/1/3 420 add (N) to (A) 10 04 01 04 10 4 1 4 004140 0/0/2 140 replace (B) by (N) 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 6E be 00000E 0/0/0 E Halt 10 01 1F 1C 04 1 £ + 4 001FC4 0/0/0 1FC4 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 38 1C 10 08 10 H + 8 18C080 24/1/2 80 modify address of next 01 16 1F 1C 10 1 6 £ + 016FC0 1/0/3 FC0 interchange area addresses 29 0E 08 10 10 I . 8 19E800 25/1/3 800 conditional Halt 38 1C 10 08 10 H + 8 18C080 24/1/2 80 modify address of next 23 02 10 10 10 C 2 132000 19/0/1 0 input one block/reset timer 02 01 1F 0D 10 2 1 £ : 021FD0 2/0/0 1FD0 transfer (A) to N 15 01 1F 1C 1F 5 1 £ + £ 051FCF 5/0/0 1FCF subtract (N) from (A) 07 10 10 08 10 7 8 070080 7/0/0 80 augment (N) by (A) 38 19 1F 0D 01 H 9 £ : 1 189FD1 24/1/0 1FD1 unconditional jump 10 10 10 04 10 4 000040 0/0/0 40 Halt 10 10 10 01 1C 1 + 00001C 0/0/0 1C Halt 38 19 0E 0B 16 H 9 . 11 6 189EB6 24/1/0 1EB6 unconditional jump 6E 00 00 00 00 be 0E 16 10 10 10 . 6 0E6000 14/0/3 0 replace selected bits 0E 16 10 10 13 . 6 3 0E6003 14/0/3 3 replace selected bits 0D 04 10 10 10 : 4 0D4000 13/0/2 0 divide uniform radix 0E 16 10 01 1F . 6 1 £ 0E601F 14/0/3 1F replace selected bits 1F 0E 10 10 10 £ . 0FE000 15/1/3 0 collate and add 1F 16 10 10 10 £ 6 0F6000 15/0/3 0 collate and add 10 0E 10 10 10 . 00E000 0/1/3 0 Invalid 02 13 10 10 10 2 3 023000 2/0/1 1000 transfer (A) to N 10 01 10 10 10 1 001000 0/0/0 1000 Halt 10 01 02 08 13 1 2 8 3 001283 0/0/0 1283 Halt 16 02 10 10 10 6 2 062000 6/0/1 0 select (N) 10 10 10 10 10 000000 0/0/0 0 Halt 02 13 0E 10 10 2 3 . 023E00 2/0/1 1E00 transfer (A) to N 10 10 10 10 10 000000 0/0/0 0 Halt 10 01 6E 00 00 1 be 001E00 0/0/0 1E00 Halt 10 0E 1A 10 10 . 10 00EA00 0/1/3 A00 Invalid 13 15 0D 38 08 3 5 : H 8 035D88 3/0/2 1D88 copy (A) to N 10 0E 0E 38 08 . . H 8 00EE88 0/1/3 E88 Invalid 10 1F 16 38 08 £ 6 H 8 00F688 0/1/3 1688 Invalid 10 1F 10 38 08 £ H 8 00F088 0/1/3 1088 Invalid 10 1F 02 38 08 £ 2 H 8 00F288 0/1/3 1288 Invalid 10 1F 04 10 10 £ 4 00F400 0/1/3 1400 Invalid 19 19 19 2A 02 9 9 9 = 2 0999A2 9/1/0 19A2 multiply uniform radix 10 10 08 10 10 8 000800 0/0/0 800 Halt 19 19 08 2A 02 9 9 8 = 2 0998A2 9/1/0 18A2 multiply uniform radix 10 01 10 10 10 1 001000 0/0/0 1000 Halt 19 19 07 2A 02 9 9 7 = 2 0997A2 9/1/0 17A2 multiply uniform radix 10 01 08 10 16 1 8 6 001806 0/0/0 1806 Halt 01 10 04 38 1A 1 4 H 10 01048A 1/0/0 48A table look up 01 10 04 6E 00 1 4 be 0104E0 1/0/0 4E0 table look up 10 10 1F 08 16 £ 8 6 000F86 0/0/0 F86 Halt 10 10 0E 1C 02 . + 2 000EC2 0/0/0 EC2 Halt 10 10 10 10 16 6 000006 0/0/0 6 Halt 10 10 0E 0D 02 . : 2 000ED2 0/0/0 ED2 Halt 10 10 10 19 16 9 6 000096 0/0/0 96 Halt 10 10 0E 0E 02 . . 2 000EE2 0/0/0 EE2 Halt 10 10 01 01 16 1 1 6 000116 0/0/0 116 Halt 10 10 0E 1F 02 . £ 2 000EF2 0/0/0 EF2 Halt 10 10 01 19 38 1 9 H 000198 0/0/0 198 Halt 08 01 08 02 16 8 1 8 2 6 081826 8/0/0 1826 merge constant length 10 10 0E 0D 0E . : . 000EDE 0/0/0 EDE Halt 10 10 10 10 02 2 000002 0/0/0 2 Halt 01 1C 04 10 10 1 + 4 01C400 1/1/2 400 subtract literal address 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 02 10 6E 2 be 00020E 0/0/0 20E Halt 10 10 01 10 16 1 6 000106 0/0/0 106 Halt 10 10 10 10 1A 10 00000A 0/0/0 A Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 08 8 000008 0/0/0 8 Halt 10 10 10 07 0E 7 . 00007E 0/0/0 7E Halt 07 0E 10 10 10 7 . 07E000 7/1/3 0 augment (N) by (A) 1F 1F 1F 1F 1F £ £ £ £ £ 0FFFFF 15/1/3 1FFF collate and add 1F 1F 1F 1F 1F £ £ £ £ £ 0FFFFF 15/1/3 1FFF collate and add 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 13 3 000003 0/0/0 3 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 02 2 000002 0/0/0 2 Halt 1F 15 1F 15 1F £ 5 £ 5 £ 0F5F5F 15/0/2 1F5F collate and add 15 1F 15 1F 15 5 £ 5 £ 5 05F5F5 5/1/3 15F5 subtract (N) from (A) 6E 00 00 00 00 be 04 10 10 10 10 4 040000 4/0/0 0 add (N) to (A) 10 10 10 10 01 1 000001 0/0/0 1 Halt 08 10 10 10 10 8 080000 8/0/0 0 merge constant length 10 10 02 07 01 2 7 1 000271 0/0/0 271 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 04 10 4 000040 0/0/0 40 Halt 10 0E 01 0B 0E . 1 11 . 00E1BE 0/1/3 1BE Invalid 10 0E 10 13 0E . 3 . 00E03E 0/1/3 3E Invalid 10 0E 10 0B 0E . 11 . 00E0BE 0/1/3 BE Invalid 10 0E 01 13 0E . 1 3 . 00E13E 0/1/3 13E Invalid 10 0E 10 10 10 . 00E000 0/1/3 0 Invalid 10 38 1A 01 10 H 10 1 008A10 0/1/0 A10 copy registers 1C 38 1C 13 1C + H + 3 + 0C8C3C 12/1/0 C3C convert 10 16 10 10 04 6 4 006004 0/0/3 4 set radix 10 6E 00 00 00 be 00E000 0/1/3 0 Invalid 02 02 02 10 13 2 2 2 3 022203 2/0/1 203 transfer (A) to N 1C 0D 16 10 01 + : 6 1 0CD601 12/1/2 1601 convert 01 1A 38 1C 13 1 10 H + 3 01A8C3 1/1/1 8C3 add literal address 1C 10 02 10 10 + 2 0C0200 12/0/0 200 convert 04 10 38 08 01 4 H 8 1 040881 4/0/0 881 add (N) to (A) 02 19 02 08 10 2 9 2 8 029280 2/1/0 1280 transfer (A) to N 19 0B 23 10 10 9 11 C 09B300 9/1/1 1300 multiply uniform radix 13 0E 10 10 15 3 . 5 03E005 3/1/3 5 copy (A) to N 15 15 29 1C 10 5 5 I + 0559C0 5/0/2 19C0 subtract (N) from (A) 10 07 3B 10 01 7 * 1 007B01 0/0/3 1B01 set radix 13 16 02 10 13 3 6 2 3 036203 3/0/3 203 copy (A) to N 1C 1C 38 1C 13 + + H + 3 0CC8C3 12/1/2 8C3 convert 1C 1C 38 08 01 + + H 8 1 0CC881 12/1/2 881 convert 02 0E 38 08 01 2 . H 8 1 02E881 2/1/3 881 transfer (A) to N 16 0E 6E 00 00 6 . be 06EE00 6/1/3 E00 select (N) 01 13 10 38 08 1 3 H 8 013088 1/0/1 1088 prepare for digit collation 01 04 07 38 08 1 4 7 H 8 014788 1/0/2 788 round off 01 15 04 38 08 1 5 4 H 8 015488 1/0/2 1488 round off 01 15 16 38 08 1 5 6 H 8 015688 1/0/2 1688 round off 01 16 04 38 08 1 6 4 H 8 016488 1/0/3 488 interchange area addresses 01 16 0B 38 08 1 6 11 H 8 016B88 1/0/3 B88 interchange area addresses 01 02 16 16 10 1 2 6 6 012660 1/0/1 660 prepare for digit collation 13 1C 0D 38 1C 3 + : H + 03CD8C 3/1/2 D8C copy (A) to N 13 1C 10 02 10 3 + 2 03C020 3/1/2 20 copy (A) to N 10 04 10 38 1A 4 H 10 00408A 0/0/2 8A replace (B) by (N) 01 10 04 2A 02 1 4 = 2 0104A2 1/0/0 4A2 table look up 01 01 0E 10 10 1 1 . 011E00 1/0/0 1E00 table look up 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 01 13 0E 10 1 3 . 0013E0 0/0/0 13E0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 29 I 000009 0/0/0 9 Halt 1C 01 10 10 3B + 1 * 0C100B 12/0/0 100B convert 10 01 02 16 2A 1 2 6 = 00126A 0/0/0 126A Halt 0E 01 01 16 29 . 1 1 6 I 0E1169 14/0/0 1169 replace selected bits 16 10 10 01 38 6 1 H 060018 6/0/0 18 select (N) 08 01 04 04 38 8 1 4 4 H 081448 8/0/0 1448 merge constant length 08 01 02 1A 2A 8 1 2 10 = 0812AA 8/0/0 12AA merge constant length 0E 01 01 10 2A . 1 1 = 0E110A 14/0/0 110A replace selected bits 10 13 02 10 38 3 2 H 003208 0/0/1 1208 Invalid 1C 13 1C 10 23 + 3 + C 0C3C03 12/0/1 1C03 convert 08 10 10 10 29 8 I 080009 8/0/0 9 merge constant length 16 10 10 01 6E 6 1 be 06001E 6/0/0 1E select (N) 10 10 01 04 1C 1 4 + 00014C 0/0/0 14C Halt 38 08 01 04 08 H 8 1 4 8 188148 24/1/0 148 unconditional jump 2A 10 13 02 10 = 3 2 1A0320 26/0/0 320 enter subroutine 2A 0E 01 01 16 = . 1 1 6 1AE116 26/1/3 116 set modification register 29 16 10 10 02 I 6 2 196002 25/0/3 2 step on and test 38 08 01 04 1F H 8 1 4 £ 18814F 24/1/0 14F unconditional jump 38 1C 13 1C 10 H + 3 + 18C3C0 24/1/2 3C0 modify address of next 23 02 10 10 10 C 2 132000 19/0/1 0 input one block/reset timer 38 08 01 16 0E H 8 1 6 . 18816E 24/1/0 16E unconditional jump 2A 0E 01 10 0E = . 1 . 1AE10E 26/1/3 10E set modification register 38 08 01 04 08 H 8 1 4 8 188148 24/1/0 148 unconditional jump 2A 10 13 02 10 = 3 2 1A0320 26/0/0 320 enter subroutine 38 1C 13 1C 10 H + 3 + 18C3C0 24/1/2 3C0 modify address of next 23 04 10 10 10 C 4 134000 19/0/2 0 run back 2A 10 13 02 10 = 3 2 1A0320 26/0/0 320 enter subroutine 6E 00 00 00 00 be 1A 38 1C 13 1C 10 H + 3 + 0A8C3C 10/1/0 C3C multiply and add 10 23 08 10 10 C 8 003800 0/0/1 1800 Invalid 10 38 08 01 04 H 8 1 4 008814 0/1/0 814 copy registers 0D 10 10 10 10 : 0D0000 13/0/0 0 divide uniform radix 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 2A 10 13 02 = 3 2 00A032 0/1/1 32 replace registers 10 38 1C 13 1C H + 3 + 008C3C 0/1/0 C3C copy registers 10 23 16 10 10 C 6 003600 0/0/1 1600 Invalid 10 2A 0E 01 01 = . 1 1 00AE11 0/1/1 E11 replace registers 16 6E 00 00 00 6 be 06E000 6/1/3 0 select (N) 16 08 29 16 10 6 8 I 6 068960 6/1/0 960 select (N) 10 02 38 08 01 2 H 8 1 002881 0/0/1 881 Invalid 16 08 38 08 01 6 8 H 8 1 068881 6/1/0 881 select (N) 04 07 2A 10 13 4 7 = 3 047A03 4/0/3 1A03 add (N) to (A) 02 10 38 1C 13 2 H + 3 0208C3 2/0/0 8C3 transfer (A) to N 1C 10 23 1A 10 + C 10 0C03A0 12/0/0 3A0 convert 10 10 2A 0E 01 = . 1 000AE1 0/0/0 AE1 Halt 01 08 02 19 0B 1 8 2 9 11 01829B 1/1/0 29B table look up 0E 10 02 1F 0B . 2 £ 11 0E02FB 14/0/0 2FB replace selected bits 0E 10 29 16 10 . I 6 0E0960 14/0/0 960 replace selected bits 10 02 38 08 01 2 H 8 1 002881 0/0/1 881 Invalid 07 10 2A 10 13 7 = 3 070A03 7/0/0 A03 augment (N) by (A) 02 10 38 1C 13 2 H + 3 0208C3 2/0/0 8C3 transfer (A) to N 1C 10 23 02 10 + C 2 0C0320 12/0/0 320 convert 10 10 6E 00 00 be 000E00 0/0/0 E00 Halt 01 07 16 2A 10 1 7 6 = 0176A0 1/0/3 16A0 interchange area addresses 13 02 10 38 08 3 2 H 8 032088 3/0/1 88 copy (A) to N 01 04 01 10 10 1 4 1 014100 1/0/2 100 round off 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 16 08 6 8 000068 0/0/0 68 Halt 01 10 1C 13 08 1 + 3 8 010C38 1/0/0 C38 table look up 10 08 10 6E 00 8 be 0080E0 0/1/0 E0 copy registers 10 01 08 04 13 1 8 4 3 001843 0/0/0 1843 Halt 08 10 08 02 13 8 8 2 3 080823 8/0/0 823 merge constant length 08 10 08 04 02 8 8 4 2 080842 8/0/0 842 merge constant length 08 10 08 16 38 8 8 6 H 080868 8/0/0 868 merge constant length 08 01 08 1C 10 8 1 8 + 0818C0 8/0/0 18C0 merge constant length 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 38 H 000008 0/0/0 8 Halt 08 01 08 1F 02 8 1 8 £ 2 0818F2 8/0/0 18F2 merge constant length 08 10 19 0B 23 8 9 11 C 0809B3 8/0/0 9B3 merge constant length 10 10 13 0E 10 3 . 0003E0 0/0/0 3E0 Halt 01 1F 1F 1F 29 1 £ £ £ I 01FFF9 1/1/3 1FF9 select literal address 1C 10 10 01 3B + 1 * 0C001B 12/0/0 1B convert 02 01 19 1C 6E 2 1 9 + be 0219CE 2/0/0 19CE transfer (A) to N 10 10 01 19 02 1 9 2 000192 0/0/0 192 Halt 16 10 01 01 0B 6 1 1 11 06011B 6/0/0 11B select (N) 38 1C 10 08 10 H + 8 18C080 24/1/2 80 modify address of next 02 10 10 04 10 2 4 020040 2/0/0 40 transfer (A) to N 16 10 10 08 02 6 8 2 060082 6/0/0 82 select (N) 15 10 01 10 1C 5 1 + 05010C 5/0/0 10C subtract (N) from (A) 3B 10 01 1A 16 * 1 10 6 1B01A6 27/0/0 1A6 jump A = Z 16 10 01 01 1C 6 1 1 + 06011C 6/0/0 11C select (N) 38 1C 10 08 02 H + 8 2 18C082 24/1/2 82 modify address of next 02 10 10 04 10 2 4 020040 2/0/0 40 transfer (A) to N 38 08 01 1A 16 H 8 1 10 6 1881A6 24/1/0 1A6 unconditional jump 2A 10 01 01 0E = 1 1 . 1A011E 26/0/0 11E enter subroutine 38 08 01 19 02 H 8 1 9 2 188192 24/1/0 192 unconditional jump 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 6E 00 00 00 00 be 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 16 08 01 10 6 8 1 006810 0/0/3 810 set radix 02 2C 1A 13 0E 2 ' 10 3 . 02CA3E 2/1/2 A3E transfer (A) to N 10 16 10 10 08 6 8 006008 0/0/3 8 set radix 10 02 10 13 1C 2 3 + 00203C 0/0/1 3C Invalid 10 2A 10 13 08 = 3 8 00A038 0/1/1 38 replace registers 04 16 10 10 08 4 6 8 046008 4/0/3 8 add (N) to (A) 10 01 1C 10 01 1 + 1 001C01 0/0/0 1C01 Halt 10 3B 16 02 10 * 6 2 00B620 0/1/1 1620 replace registers 1A 6E 00 00 00 10 be 0AE000 10/1/3 0 multiply and add 1A 0E 16 10 10 10 . 6 0AE600 10/1/3 600 multiply and add 08 02 15 10 01 8 2 5 1 082501 8/0/1 501 merge constant length 10 1C 3B 10 02 + * 2 00CB02 0/1/2 B02 replace (B) by (N) 02 1A 16 10 10 2 10 6 02A600 2/1/1 600 transfer (A) to N 08 02 02 10 13 8 2 2 3 082203 8/0/1 203 merge constant length 1C 10 2A 10 13 + = 3 0C0A03 12/0/0 A03 convert 08 04 16 10 10 8 4 6 084600 8/0/2 600 merge constant length 08 02 01 1C 10 8 2 1 + 0821C0 8/0/1 1C0 merge constant length 01 10 3B 16 02 1 * 6 2 010B62 1/0/0 B62 table look up 01 01 2A 1A 01 1 1 = 10 1 011AA1 1/0/0 1AA1 table look up 10 04 16 1A 13 4 6 10 3 0046A3 0/0/2 6A3 replace (B) by (N) 0E 10 15 1A 0B . 5 10 11 0E05AB 14/0/0 5AB replace selected bits 0E 10 3B 02 01 . * 2 1 0E0B21 14/0/0 B21 replace selected bits 1C 0B 16 1A 13 + 11 6 10 3 0CB6A3 12/1/1 16A3 convert 0E 10 6E 00 00 . be 0E0E00 14/0/0 E00 replace selected bits 01 0B 1C 13 0B 1 11 + 3 11 01BC3B 1/1/1 1C3B add literal address 13 0E 10 2A 1C 3 . = + 03E0AC 3/1/3 AC copy (A) to N 01 10 16 32 19 1 6 B 9 010629 1/0/0 629 table look up 10 01 08 01 1C 1 8 1 + 00181C 0/0/0 181C Halt 10 07 0E 3B 10 7 . * 007EB0 0/0/3 1EB0 set radix 02 01 19 29 1C 2 1 9 I + 02199C 2/0/0 199C transfer (A) to N 10 10 10 29 15 I 5 000095 0/0/0 95 Halt 10 10 02 38 08 2 H 8 000288 0/0/0 288 Halt 01 1C 15 38 08 1 + 5 H 8 01C588 1/1/2 588 subtract literal address 01 1F 10 32 08 1 £ B 8 01F028 1/1/3 1028 select literal address 10 10 02 38 08 2 H 8 000288 0/0/0 288 Halt 01 0B 1F 16 10 1 11 £ 6 01BF60 1/1/1 1F60 add literal address 13 0E 01 32 01 3 . 1 B 1 03E121 3/1/3 121 copy (A) to N 10 01 0D 01 1C 1 : 1 + 001D1C 0/0/0 1D1C Halt 10 07 0E 6E 00 7 . be 007EE0 0/0/3 1EE0 set radix 10 01 1C 1A 3B 1 + 10 * 001CAB 0/0/0 1CAB Halt 10 01 0D 0E 16 1 : . 6 001DE6 0/0/0 1DE6 Halt 10 10 08 10 01 8 1 000801 0/0/0 801 Halt 1C 10 01 1C 3B + 1 + * 0C01CB 12/0/0 1CB convert 10 01 0D 10 01 1 : 1 001D01 0/0/0 1D01 Halt 1C 10 10 01 3B + 1 * 0C001B 12/0/0 1B convert 02 02 1A 19 16 2 2 10 9 6 022A96 2/0/1 A96 transfer (A) to N 10 0B 0E 10 32 11 . B 00BE02 0/1/1 1E02 replace registers 01 10 01 0D 01 1 1 : 1 0101D1 1/0/0 1D1 table look up 1C 10 07 0E 3B + 7 . * 0C07EB 12/0/0 7EB convert 02 01 0E 0D 16 2 1 . : 6 021ED6 2/0/0 1ED6 transfer (A) to N 08 10 10 02 02 8 2 2 080022 8/0/0 22 merge constant length 08 10 10 16 29 8 6 I 080069 8/0/0 69 merge constant length 16 10 10 02 38 6 2 H 060028 6/0/0 28 select (N) 08 01 0D 19 6E 8 1 : 9 be 081D9E 8/0/0 1D9E merge constant length 10 10 01 0D 08 1 : 8 0001D8 0/0/0 1D8 Halt 38 08 01 0E 1F H 8 1 . £ 1881EF 24/1/0 1EF unconditional jump 16 0E 13 0E 10 6 . 3 . 06E3E0 6/1/3 3E0 select (N) 3B 02 01 0E 0D * 2 1 . : 1B21ED 27/0/1 1ED jump A != Z 29 16 10 10 02 I 6 2 196002 25/0/3 2 step on and test 38 08 01 0D 19 H 8 1 : 9 1881D9 24/1/0 1D9 unconditional jump 38 08 01 0E 1F H 8 1 . £ 1881EF 24/1/0 1EF unconditional jump 16 10 0B 0E 10 6 11 . 060BE0 6/0/0 BE0 select (N) 32 01 10 01 0D B 1 1 : 12101D 18/0/0 101D shift logical 01 1C 10 07 0E 1 + 7 . 01C07E 1/1/2 7E subtract literal address 3B 10 01 0E 1F * 1 . £ 1B01EF 27/0/0 1EF jump A = Z 16 10 10 08 02 6 8 2 060082 6/0/0 82 select (N) 01 1C 10 01 1C 1 + 1 + 01C01C 1/1/2 1C subtract literal address 3B 10 01 0E 07 * 1 . 7 1B01E7 27/0/0 1E7 jump A = Z 01 1C 10 10 01 1 + 1 01C001 1/1/2 1 subtract literal address 6E 00 00 00 00 be 16 3B 02 02 1A 6 * 2 2 10 06B22A 6/1/1 122A select (N) 19 16 08 10 10 9 6 8 096800 9/0/3 800 multiply uniform radix 02 02 08 10 10 2 2 8 022800 2/0/1 800 transfer (A) to N 16 29 16 10 10 6 I 6 069600 6/1/0 1600 select (N) 02 38 08 01 0E 2 H 8 1 . 02881E 2/1/0 81E transfer (A) to N 1C 38 08 01 0E + H 8 1 . 0C881E 12/1/0 81E convert 1F 16 0E 0B 0E £ 6 . 11 . 0F6EBE 15/0/3 EBE collate and add 10 3B 02 02 1A * 2 2 10 00B22A 0/1/1 122A replace registers 19 38 08 01 0E 9 H 8 1 . 09881E 9/1/0 81E multiply uniform radix 1C 38 08 02 13 + H 8 2 3 0C8823 12/1/0 823 convert 1C 29 02 10 10 + I 2 0C9200 12/1/0 1200 convert 02 38 08 01 0B 2 H 8 1 11 02881B 2/1/0 81B transfer (A) to N 08 16 10 10 08 8 6 8 086008 8/0/3 8 merge constant length 10 01 1C 10 01 1 + 1 001C01 0/0/0 1C01 Halt 1C 6E 00 00 00 + be 0CE000 12/1/3 0 convert 1F 04 3B 10 01 £ 4 * 1 0F4B01 15/0/2 B01 collate and add 1F 07 01 1C 10 £ 7 1 + 0F71C0 15/0/3 11C0 collate and add 10 01 3B 02 01 1 * 2 1 001B21 0/0/0 1B21 Halt 1F 0D 16 10 10 £ : 6 0FD600 15/1/2 1600 collate and add 08 02 01 1C 10 8 2 1 + 0821C0 8/0/1 1C0 merge constant length 01 1C 3B 10 01 1 + * 1 01CB01 1/1/2 B01 subtract literal address 1F 1C 01 1C 10 £ + 1 + 0FC1C0 15/1/2 1C0 collate and add 10 01 3B 02 02 1 * 2 2 001B22 0/0/0 1B22 Halt 10 07 38 08 02 7 H 8 2 007882 0/0/3 1882 set radix 13 1C 16 10 10 3 + 6 03C600 3/1/2 600 copy (A) to N 08 02 01 1C 10 8 2 1 + 0821C0 8/0/1 1C0 merge constant length 01 1C 3B 10 02 1 + * 2 01CB02 1/1/2 B02 subtract literal address 10 02 01 1C 10 2 1 + 0021C0 0/0/1 1C0 Invalid 10 01 3B 02 01 1 * 2 1 001B21 0/0/0 1B21 Halt 0B 08 6E 00 00 11 8 be 0B8E00 11/1/0 E00 multiply and subtract 02 10 02 16 10 2 2 6 020260 2/0/0 260 transfer (A) to N 13 0E 01 32 01 3 . 1 B 1 03E121 3/1/3 121 copy (A) to N 10 01 0D 01 1C 1 : 1 + 001D1C 0/0/0 1D1C Halt 10 07 0E 3B 10 7 . * 007EB0 0/0/3 1EB0 set radix 02 13 1C 38 08 2 3 + H 8 023C88 2/0/1 1C88 transfer (A) to N 02 0B 1A 16 10 2 11 10 6 02BA60 2/1/1 1A60 transfer (A) to N 0B 0E 01 38 08 11 . 1 H 8 0BE188 11/1/3 188 multiply and subtract 02 10 13 10 10 2 3 020300 2/0/0 300 transfer (A) to N 10 10 10 16 08 6 8 000068 0/0/0 68 Halt 13 0E 10 15 08 3 . 5 8 03E058 3/1/3 58 copy (A) to N 01 01 02 3B 10 1 1 2 * 0112B0 1/0/0 12B0 table look up 01 1A 16 16 08 1 10 6 6 8 01A668 1/1/1 668 add literal address 13 0E 02 15 08 3 . 2 5 8 03E258 3/1/3 258 copy (A) to N 01 01 02 3B 10 1 1 2 * 0112B0 1/0/0 12B0 table look up 01 1A 16 6E 00 1 10 6 be 01A6E0 1/1/1 6E0 add literal address 10 02 01 10 38 2 1 H 002108 0/0/1 108 Invalid 08 01 1A 0E 16 8 1 10 . 6 081AE6 8/0/0 1AE6 merge constant length 08 0B 0E 10 15 8 11 . 5 08BE05 8/1/1 1E05 merge variable length 08 01 01 02 3B 8 1 1 2 * 08112B 8/0/0 112B merge constant length 10 01 0B 13 16 1 11 3 6 001B36 0/0/0 1B36 Halt 08 0B 0E 02 15 8 11 . 2 5 08BE25 8/1/1 1E25 merge variable length 08 01 01 02 3B 8 1 1 2 * 08112B 8/0/0 112B merge constant length 10 01 0B 13 38 1 11 3 H 001B38 0/0/0 1B38 Halt 08 01 0B 07 10 8 1 11 7 081B70 8/0/0 1B70 merge constant length 10 10 10 10 16 6 000006 0/0/0 6 Halt 10 10 10 04 01 4 1 000041 0/0/0 41 Halt 1C 10 10 02 02 + 2 2 0C0022 12/0/0 22 convert 10 13 1C 1C 2A 3 + + = 003CCA 0/0/1 1CCA Invalid 0E 01 10 08 16 . 1 8 6 0E1086 14/0/0 1086 replace selected bits 16 10 08 01 6E 6 8 1 be 06081E 6/0/0 81E select (N) 10 10 02 01 0E 2 1 . 00021E 0/0/0 21E Halt 01 1C 10 01 10 1 + 1 01C010 1/1/2 10 subtract literal address 3B 16 02 04 10 * 6 2 4 1B6240 27/0/3 240 jump A < Z 01 1C 10 02 10 1 + 2 01C020 1/1/2 20 subtract literal address 3B 16 02 16 08 * 6 2 6 8 1B6268 27/0/3 268 jump A < Z 01 1C 10 01 01 1 + 1 1 01C011 1/1/2 11 subtract literal address 3B 16 02 15 01 * 6 2 5 1 1B6251 27/0/3 251 jump A < Z 38 08 02 02 15 H 8 2 2 5 188225 24/1/0 225 unconditional jump 01 1C 10 10 07 1 + 7 01C007 1/1/2 7 subtract literal address 3B 16 02 15 01 * 6 2 5 1 1B6251 27/0/3 251 jump A < Z 29 16 10 10 02 I 6 2 196002 25/0/3 2 step on and test 38 08 02 01 0D H 8 2 1 : 18821D 24/1/0 21D unconditional jump 38 08 01 1A 16 H 8 1 10 6 1881A6 24/1/0 1A6 unconditional jump 2A 1A 01 10 04 = 10 1 4 1AA104 26/1/1 104 set modification register 16 1A 13 0E 10 6 10 3 . 06A3E0 6/1/1 3E0 select (N) 6E 00 00 00 00 be 1C 13 0B 13 0E + 3 11 3 . 0C3B3E 12/0/1 1B3E convert 10 2A 1C 01 10 = + 1 00AC10 0/1/1 C10 replace registers 16 32 19 10 01 6 B 9 1 062901 6/0/1 901 select (N) 16 32 08 10 10 6 B 8 062800 6/0/1 800 select (N) 02 01 1C 10 07 2 1 + 7 021C07 2/0/0 1C07 transfer (A) to N 0E 3B 10 02 01 . * 2 1 0EB021 14/1/1 1021 replace selected bits 19 29 1C 10 10 9 I + 099C00 9/1/0 1C00 multiply uniform radix 10 29 15 10 10 I 5 009500 0/1/0 1500 copy registers 02 38 08 02 02 2 H 8 2 2 028822 2/1/0 822 transfer (A) to N 1F 29 02 10 10 £ I 2 0F9200 15/1/0 1200 collate and add 02 38 08 02 02 2 H 8 2 2 028822 2/1/0 822 transfer (A) to N 0B 16 10 10 08 11 6 8 0B6008 11/0/3 8 multiply and subtract 10 01 1C 10 01 1 + 1 001C01 0/0/0 1C01 Halt 1C 3B 10 02 13 + * 2 3 0CB023 12/1/1 1023 convert 1C 6E 00 00 00 + be 0CE000 12/1/3 0 convert 13 1A 01 1C 10 3 10 1 + 03A1C0 3/1/1 1C0 copy (A) to N 10 01 3B 02 02 1 * 2 2 001B22 0/0/0 1B22 Halt 02 0B 16 10 01 2 11 6 1 02B601 2/1/1 1601 transfer (A) to N 10 0B 02 13 13 11 2 3 3 00B233 0/1/1 1233 replace registers 0E 01 38 08 02 . 1 H 8 2 0E1882 14/0/0 1882 replace selected bits 01 19 10 10 10 1 9 019000 1/1/0 1000 table look up 10 10 16 16 10 6 6 000660 0/0/0 660 Halt 08 01 02 10 13 8 1 2 3 081203 8/0/0 1203 merge constant length 1C 10 16 10 01 + 6 1 0C0601 12/0/0 601 convert 01 0D 38 1C 13 1 : H + 3 01D8C3 1/1/2 18C3 subtract literal address 1C 10 02 10 10 + 2 0C0200 12/0/0 200 convert 04 10 16 0B 13 4 6 11 3 0406B3 4/0/0 6B3 add (N) to (A) 0E 10 13 08 13 . 3 8 3 0E0383 14/0/0 383 replace selected bits 1C 16 32 01 10 + 6 B 1 0C6210 12/0/3 210 convert 01 08 6E 00 00 1 8 be 018E00 1/1/0 E00 table look up 02 04 08 01 1C 2 4 8 1 + 02481C 2/0/2 81C transfer (A) to N 10 07 0E 3B 10 7 . * 007EB0 0/0/3 1EB0 set radix 02 16 04 38 08 2 6 4 H 8 026488 2/0/3 488 transfer (A) to N 02 15 0D 16 08 2 5 : 6 8 025D68 2/0/2 1D68 transfer (A) to N 01 10 1A 02 0B 1 10 2 11 010A2B 1/0/0 A2B table look up 13 0E 02 2A 10 3 . 2 = 03E2A0 3/1/3 2A0 copy (A) to N 13 13 04 16 08 3 3 4 6 8 033468 3/0/1 1468 copy (A) to N 13 1C 16 02 0B 3 + 6 2 11 03C62B 3/1/2 62B copy (A) to N 13 0E 10 38 08 3 . H 8 03E088 3/1/3 88 copy (A) to N 02 02 07 16 10 2 2 7 6 022760 2/0/1 760 transfer (A) to N 10 10 02 01 1A 2 1 10 00021A 0/0/0 21A Halt 10 10 02 02 10 2 2 000220 0/0/0 220 Halt 10 10 15 02 10 5 2 000520 0/0/0 520 Halt 10 10 04 16 16 4 6 6 000466 0/0/0 466 Halt 10 08 01 6E 00 8 1 be 0081E0 0/1/0 1E0 copy registers 10 02 15 16 02 2 5 6 2 002562 0/0/1 562 Invalid 10 13 1C 10 16 3 + 6 003C06 0/0/1 1C06 Invalid 0D 13 0E 10 02 : 3 . 2 0D3E02 13/0/1 1E02 divide uniform radix 08 10 19 1A 2A 8 9 10 = 0809AA 8/0/0 9AA merge constant length 10 13 13 04 29 3 3 4 I 003349 0/0/1 1349 Invalid 04 10 10 02 38 4 2 H 040028 4/0/0 28 add (N) to (A) 08 02 15 07 38 8 2 5 7 H 082578 8/0/1 578 merge constant length 08 02 02 07 29 8 2 2 7 I 082279 8/0/1 279 merge constant length 1C 10 10 10 01 + 1 0C0001 12/0/0 1 convert 1C 10 07 0E 38 + 7 . H 0C07E8 12/0/0 7E8 convert 1C 13 1C 1C 32 + 3 + + B 0C3CC2 12/0/1 1CC2 convert 10 10 10 10 04 4 000004 0/0/0 4 Halt 0B 13 0E 10 02 11 3 . 2 0B3E02 11/0/1 1E02 multiply and subtract 0B 13 0E 10 38 11 3 . H 0B3E08 11/0/1 1E08 multiply and subtract 08 02 04 0B 6E 8 2 4 11 be 0824BE 8/0/1 4BE merge constant length 10 10 02 16 04 2 6 4 000264 0/0/0 264 Halt 01 0E 10 07 0E 1 . 7 . 01E07E 1/1/3 7E select literal address 02 13 13 0E 10 2 3 3 . 0233E0 2/0/1 13E0 transfer (A) to N 38 08 02 04 0B H 8 2 4 11 18824B 24/1/0 24B unconditional jump 10 10 10 10 10 000000 0/0/0 0 Halt 16 16 10 08 01 6 6 8 1 066081 6/0/3 81 select (N) 02 10 13 1C 10 2 3 + 0203C0 2/0/0 3C0 transfer (A) to N 02 08 10 10 04 2 8 4 028004 2/1/0 4 transfer (A) to N 16 0D 13 0D 0E 6 : 3 : . 06D3DE 6/1/2 13DE select (N) 02 08 13 1C 16 2 8 3 + 6 0283C6 2/1/0 3C6 transfer (A) to N 16 0D 04 10 10 6 : 4 06D400 6/1/2 1400 select (N) 02 08 13 1C 08 2 8 3 + 8 0283C8 2/1/0 3C8 transfer (A) to N 02 0D 13 0D 0E 2 : 3 : . 02D3DE 2/1/2 13DE transfer (A) to N 16 08 01 10 1A 6 8 1 10 06810A 6/1/0 10A select (N) 02 0D 04 10 10 2 : 4 02D400 2/1/2 1400 transfer (A) to N 6E 00 00 00 00 be 02 16 10 13 1C 2 6 3 + 02603C 2/0/3 3C transfer (A) to N 10 01 1C 10 01 1 + 1 001C01 0/0/0 1C01 Halt 08 3B 16 02 08 8 * 6 2 8 08B628 8/1/1 1628 merge variable length 04 38 1C 10 10 4 H + 048C00 4/1/0 C00 add (N) to (A) 04 01 1F 13 0D 4 1 £ 3 : 041F3D 4/0/0 1F3D add (N) to (A) 0E 04 10 01 10 . 4 1 0E4010 14/0/2 10 replace selected bits 02 38 1C 13 1C 2 H + 3 + 028C3C 2/1/0 C3C transfer (A) to N 10 02 10 10 04 2 4 002004 0/0/1 4 Invalid 10 2A 10 13 13 = 3 3 00A033 0/1/1 33 replace registers 04 16 08 13 1C 4 6 8 3 + 04683C 4/0/3 83C add (N) to (A) 16 02 0D 13 0D 6 2 : 3 : 062D3D 6/0/1 D3D select (N) 0E 16 08 13 1C . 6 8 3 + 0E683C 14/0/3 83C replace selected bits 08 02 0D 04 10 8 2 : 4 082D40 8/0/1 D40 merge constant length 10 29 04 10 02 I 4 2 009402 0/1/0 1402 copy registers 10 6E 00 00 00 be 00E000 0/1/3 0 Invalid 08 10 16 10 10 8 6 080600 8/0/0 600 merge constant length 10 02 15 10 10 2 5 002500 0/0/1 500 Invalid 10 04 3B 16 02 4 * 6 2 004B62 0/0/2 B62 replace (B) by (N) 02 07 38 08 02 2 7 H 8 2 027882 2/0/3 1882 transfer (A) to N 16 0B 38 1C 10 6 11 H + 06B8C0 6/1/1 18C0 select (N) 10 04 01 1F 13 4 1 £ 3 0041F3 0/0/2 1F3 replace (B) by (N) 0D 0E 3D 10 0B : . ? 11 0DED0B 13/1/3 D0B divide uniform radix 0E 10 01 0E 0B . 1 . 11 0E01EB 14/0/0 1EB replace selected bits 0E 10 38 08 02 . H 8 2 0E0882 14/0/0 882 replace selected bits 07 07 10 10 10 7 7 077000 7/0/3 1000 augment (N) by (A) 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 16 10 01 6 1 000601 0/0/0 601 Halt 10 0B 02 13 13 11 2 3 3 00B233 0/1/1 1233 replace registers 0E 01 2A 1C 01 . 1 = + 1 0E1AC1 14/0/0 1AC1 replace selected bits 01 04 6E 00 00 1 4 be 014E00 1/0/2 E00 round off 02 08 0E 16 16 2 8 . 6 6 028E66 2/1/0 E66 transfer (A) to N 10 08 01 02 10 8 1 2 008120 0/1/0 120 copy registers 13 1C 10 16 0D 3 + 6 : 03C06D 3/1/2 6D copy (A) to N 13 0E 10 02 08 3 . 2 8 03E028 3/1/3 28 copy (A) to N 10 19 1A 2A 10 9 10 = 009AA0 0/1/0 1AA0 copy registers 13 13 04 16 10 3 3 4 6 033460 3/0/1 1460 copy (A) to N 10 10 04 15 10 4 5 000450 0/0/0 450 Halt 10 10 02 3B 04 2 * 4 0002B4 0/0/0 2B4 Halt 02 02 07 29 04 2 2 7 I 4 022794 2/0/1 794 transfer (A) to N 10 10 02 38 08 2 H 8 000288 0/0/0 288 Halt 02 19 10 16 10 2 9 6 029060 2/1/0 1060 transfer (A) to N 01 10 0B 02 10 1 11 2 010B20 1/0/0 B20 table look up 10 19 0B 2A 10 9 11 = 009BA0 0/1/0 1BA0 copy registers 13 13 04 01 0E 3 3 4 1 . 03341E 3/0/1 141E copy (A) to N 10 01 08 6E 00 1 8 be 0018E0 0/0/0 18E0 Halt 10 02 19 1C 07 2 9 + 7 0029C7 0/0/1 9C7 Invalid 10 10 10 15 38 5 H 000058 0/0/0 58 Halt 08 02 19 10 10 8 2 9 082900 8/0/1 900 merge constant length 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 29 I 000009 0/0/0 9 Halt 1A 10 01 1F 6E 10 1 £ be 0A01FE 10/0/0 1FE multiply and add 10 10 02 1A 1A 2 10 10 0002AA 0/0/0 2AA Halt 38 08 02 1A 0D H 8 2 10 : 1882AD 24/1/0 2AD unconditional jump 02 08 10 19 0B 2 8 9 11 02809B 2/1/0 9B transfer (A) to N 23 10 10 13 0E C 3 . 13003E 19/0/0 3E output 10 10 10 10 0B 11 00000B 0/0/0 B Halt 29 1C 10 10 01 I + 1 19C001 25/1/2 1 interrogate indicators 3B 02 02 1C 1C * 2 2 + + 1B22CC 27/0/1 2CC jump A != Z 29 1C 10 10 02 I + 2 19C002 25/1/2 2 interrogate indicators 3B 02 02 02 1A * 2 2 2 10 1B222A 27/0/1 22A jump A != Z 29 1C 10 10 04 I + 4 19C004 25/1/2 4 interrogate indicators 3B 02 02 0E 10 * 2 2 . 1B22E0 27/0/1 2E0 jump A != Z 29 1C 10 10 08 I + 8 19C008 25/1/2 8 interrogate indicators 3B 02 02 1F 13 * 2 2 £ 3 1B22F3 27/0/1 2F3 jump A != Z 29 1C 10 01 10 I + 1 19C010 25/1/2 10 interrogate indicators 3B 10 01 08 1C * 1 8 + 1B018C 27/0/0 18C jump A = Z 6E 00 00 00 00 be 08 2A 10 01 01 8 = 1 1 08A011 8/1/1 11 merge variable length 0E 38 08 02 1A . H 8 2 10 0E882A 14/1/0 82A replace selected bits 19 29 1A 10 10 9 I 10 099A00 9/1/0 1A00 multiply uniform radix 1F 38 08 02 0B £ H 8 2 11 0F882B 15/1/0 82B collate and add 0E 02 08 10 19 . 2 8 9 0E2809 14/0/1 809 replace selected bits 0B 23 10 10 13 11 C 3 0B3003 11/0/1 1003 multiply and subtract 0E 10 10 10 01 . 1 0E0001 14/0/0 1 replace selected bits 0B 29 1C 10 01 11 I + 1 0B9C01 11/1/0 1C01 multiply and subtract 10 3B 10 02 1A * 2 10 00B02A 0/1/1 102A replace registers 0E 2A 10 01 01 . = 1 1 0EA011 14/1/1 11 replace selected bits 0E 38 08 02 0B . H 8 2 11 0E882B 14/1/0 82B replace selected bits 1A 10 10 10 10 10 0A0000 10/0/0 0 multiply and add 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 6E 00 00 00 be 00E000 0/1/3 0 Invalid 1C 16 10 10 10 + 6 0C6000 12/0/3 0 convert 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 16 10 10 6 000600 0/0/0 600 Halt 08 10 13 10 13 8 3 3 080303 8/0/0 303 merge constant length 1C 10 01 1C 10 + 1 + 0C01C0 12/0/0 1C0 convert 01 10 3B 16 02 1 * 6 2 010B62 1/0/0 B62 table look up 0D 15 16 10 10 : 5 6 0D5600 13/0/2 1600 divide uniform radix 08 02 13 10 13 8 2 3 3 082303 8/0/1 303 merge constant length 1C 10 01 1C 10 + 1 + 0C01C0 12/0/0 1C0 convert 01 10 3B 04 01 1 * 4 1 010B41 1/0/0 B41 table look up 1A 16 6E 00 00 10 6 be 0A6E00 10/0/3 E00 multiply and add 02 0D 04 29 08 2 : 4 I 8 02D498 2/1/2 1498 transfer (A) to N 04 10 10 2A 10 4 = 0400A0 4/0/0 A0 add (N) to (A) 13 1A 0D 29 1C 3 10 : I + 03AD9C 3/1/1 D9C copy (A) to N 04 10 10 29 1A 4 I 10 04009A 4/0/0 9A add (N) to (A) 04 10 10 3B 10 4 * 0400B0 4/0/0 B0 add (N) to (A) 02 0D 10 38 08 2 : H 8 02D088 2/1/2 1088 transfer (A) to N 01 1A 16 10 10 1 10 6 01A600 1/1/1 600 add literal address 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 2A 1A = 10 0000AA 0/0/0 AA Halt 01 10 04 16 1A 1 4 6 10 01046A 1/0/0 46A table look up 0B 0E 10 6E 00 11 . be 0BE0E0 11/1/3 E0 multiply and subtract 10 02 0E 02 13 2 . 2 3 002E23 0/0/1 E23 Invalid 0B 13 0E 10 2A 11 3 . = 0B3E0A 11/0/1 1E0A multiply and subtract 1C 01 10 16 32 + 1 6 B 0C1062 12/0/0 1062 convert 19 10 01 16 32 9 1 6 B 090162 9/0/0 162 multiply uniform radix 08 10 10 02 3B 8 2 * 08002B 8/0/0 2B merge constant length 10 02 01 19 3B 2 1 9 * 00219B 0/0/1 19B Invalid 10 02 01 1A 29 2 1 10 I 0021A9 0/0/1 1A9 Invalid 1C 10 10 10 29 + I 0C0009 12/0/0 9 convert 15 10 10 02 38 5 2 H 050028 5/0/0 28 subtract (N) from (A) 08 02 0E 15 29 8 2 . 5 I 082E59 8/0/1 E59 merge constant length 02 10 10 02 38 2 2 H 020028 2/0/0 28 transfer (A) to N 08 02 0E 01 16 8 2 . 1 6 082E16 8/0/1 E16 merge constant length 10 13 1C 10 01 3 + 1 003C01 0/0/1 1C01 Invalid 1C 10 01 1C 3B + 1 + * 0C01CB 12/0/0 1CB convert 10 02 1F 02 6E 2 £ 2 be 002F2E 0/0/1 F2E Invalid 10 10 02 1F 10 2 £ 0002F0 0/0/0 2F0 Halt 01 1C 10 10 01 1 + 1 01C001 1/1/2 1 subtract literal address 3B 02 02 0E 01 * 2 2 . 1 1B22E1 27/0/1 2E1 jump A != Z 38 08 02 13 1C H 8 2 3 + 18823C 24/1/0 23C unconditional jump 16 10 01 01 1C 6 1 1 + 06011C 6/0/0 11C select (N) 38 1C 10 08 04 H + 8 4 18C084 24/1/2 84 modify address of next 02 10 10 04 10 2 4 020040 2/0/0 40 transfer (A) to N 16 10 10 08 04 6 8 4 060084 6/0/0 84 select (N) 02 10 13 1C 10 2 3 + 0203C0 2/0/0 3C0 transfer (A) to N 2A 10 13 08 04 = 3 8 4 1A0384 26/0/0 384 enter subroutine 38 08 02 0E 10 H 8 2 . 1882E0 24/1/0 2E0 unconditional jump 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 16 10 13 1C 10 6 3 + 0603C0 6/0/0 3C0 select (N) 6E 00 00 00 00 be 0E 01 1C 10 01 . 1 + 1 0E1C01 14/0/0 1C01 replace selected bits 10 3B 04 13 04 * 4 3 4 00B434 0/1/1 1434 replace registers 07 16 19 13 0E 7 6 9 3 . 07693E 7/0/3 93E augment (N) by (A) 10 02 08 13 1C 2 8 3 + 00283C 0/0/1 83C Invalid 02 16 19 13 0E 2 6 9 3 . 02693E 2/0/3 93E transfer (A) to N 02 02 08 13 1C 2 2 8 3 + 02283C 2/0/1 83C transfer (A) to N 04 16 10 10 10 4 6 046000 4/0/3 0 add (N) to (A) 02 01 1C 10 10 2 1 + 021C00 2/0/0 1C00 transfer (A) to N 13 3B 04 13 10 3 * 4 3 03B430 3/1/1 1430 copy (A) to N 19 16 08 01 10 9 6 8 1 096810 9/0/3 810 multiply uniform radix 1A 02 19 13 0E 10 2 9 3 . 0A293E 10/0/1 93E multiply and add 04 2A 10 13 1A 4 = 3 10 04A03A 4/1/1 3A add (N) to (A) 0D 02 08 10 10 : 2 8 0D2800 13/0/1 800 divide uniform radix 10 16 08 01 01 6 8 1 1 006811 0/0/3 811 set radix 02 6E 00 00 00 2 be 02E000 2/1/3 0 transfer (A) to N 10 1C 13 19 13 + 3 9 3 00C393 0/1/2 393 replace (B) by (N) 0E 10 02 19 13 . 2 9 3 0E0293 14/0/0 293 replace selected bits 0E 02 2A 10 13 . 2 = 3 0E2A03 14/0/1 A03 replace selected bits 02 10 38 1C 13 2 H + 3 0208C3 2/0/0 8C3 transfer (A) to N 1C 10 23 10 10 + C 0C0300 12/0/0 300 convert 10 10 2A 10 13 = 3 000A03 0/0/0 A03 Halt 02 10 16 08 13 2 6 8 3 020683 2/0/0 683 transfer (A) to N 1C 02 02 19 13 + 2 2 9 3 0C2293 12/0/1 293 convert 0E 10 16 08 13 . 6 8 3 0E0683 14/0/0 683 replace selected bits 1C 04 02 19 13 + 4 2 9 3 0C4293 12/0/2 293 convert 0E 02 29 02 10 . 2 I 2 0E2920 14/0/1 920 replace selected bits 10 01 38 08 13 1 H 8 3 001883 0/0/0 1883 Halt 13 0D 38 08 13 3 : H 8 3 03D883 3/1/2 1883 copy (A) to N 01 0B 02 08 10 1 11 2 8 01B280 1/1/1 1280 add literal address 19 0B 6E 00 00 9 11 be 09BE00 9/1/1 1E00 multiply uniform radix 13 01 1A 23 10 3 1 10 C 031A30 3/0/0 1A30 copy (A) to N 10 13 0E 10 10 3 . 003E00 0/0/1 1E00 Invalid 15 15 10 29 1C 5 5 I + 05509C 5/0/2 109C subtract (N) from (A) 10 10 01 3B 10 1 * 0001B0 0/0/0 1B0 Halt 01 08 1C 38 08 1 8 + H 8 018C88 1/1/0 C88 table look up 13 13 0D 38 08 3 3 : H 8 033D88 3/0/1 1D88 copy (A) to N 13 04 02 10 10 3 4 2 034200 3/0/2 200 copy (A) to N 10 10 10 38 1C H + 00008C 0/0/0 8C Halt 13 1C 10 2A 08 3 + = 8 03C0A8 3/1/2 A8 copy (A) to N 10 10 10 10 10 000000 0/0/0 0 Halt 10 04 01 38 08 4 1 H 8 004188 0/0/2 188 replace (B) by (N) 13 02 01 38 08 3 2 1 H 8 032188 3/0/1 188 copy (A) to N 13 02 07 38 08 3 2 7 H 8 032788 3/0/1 788 copy (A) to N 13 02 07 2A 02 3 2 7 = 2 0327A2 3/0/1 7A2 copy (A) to N 13 02 10 6E 00 3 2 be 0320E0 3/0/1 E0 copy (A) to N 10 13 02 08 2A 3 2 8 = 00328A 0/0/1 128A Invalid 02 13 02 10 10 2 3 2 023200 2/0/1 1200 transfer (A) to N 10 10 04 01 02 4 1 2 000412 0/0/0 412 Halt 08 10 19 0B 23 8 9 11 C 0809B3 8/0/0 9B3 merge constant length 10 10 13 0E 10 3 . 0003E0 0/0/0 3E0 Halt 10 10 13 01 38 3 1 H 000318 0/0/0 318 Halt 08 13 02 02 10 8 3 2 2 083220 8/0/1 1220 merge constant length 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 38 H 000008 0/0/0 8 Halt 1A 01 01 02 6E 10 1 1 2 be 0A112E 10/0/0 112E multiply and add 10 10 13 13 16 3 3 6 000336 0/0/0 336 Halt 2A 1A 01 10 0E = 10 1 . 1AA10E 26/1/1 10E set modification register 38 1C 13 1C 10 H + 3 + 18C3C0 24/1/2 3C0 modify address of next 2A 08 10 10 10 = 8 1A8000 26/1/0 0 test route N1 10 10 10 10 01 1 000001 0/0/0 1 Halt 38 08 13 13 07 H 8 3 3 7 188337 24/1/0 337 unconditional jump 38 08 13 13 0D H 8 3 3 : 18833D 24/1/0 33D unconditional jump 38 08 13 13 0D H 8 3 3 : 18833D 24/1/0 33D unconditional jump 38 1C 13 1C 10 H + 3 + 18C3C0 24/1/2 3C0 modify address of next 23 10 10 10 10 C 130000 19/0/0 0 output 38 1C 13 1C 10 H + 3 + 18C3C0 24/1/2 3C0 modify address of next 2A 08 10 10 10 = 8 1A8000 26/1/0 0 test route N1 10 10 10 02 01 2 1 000021 0/0/0 21 Halt 38 08 13 13 1F H 8 3 3 £ 18833F 24/1/0 33F unconditional jump 38 08 02 1F 0D H 8 2 £ : 1882FD 24/1/0 2FD unconditional jump 6E 00 00 00 00 be 04 10 10 10 02 4 2 040002 4/0/0 2 add (N) to (A) 13 38 1A 01 10 3 H 10 1 038A10 3/1/0 A10 copy (A) to N 04 2A 02 13 13 4 = 2 3 3 04A233 4/1/1 233 add (N) to (A) 04 10 10 10 02 4 2 040002 4/0/0 2 add (N) to (A) 02 29 1C 10 10 2 I + 029C00 2/1/0 1C00 transfer (A) to N 01 3B 02 13 13 1 * 2 3 3 01B233 1/1/1 1233 add literal address 07 38 08 13 04 7 H 8 3 4 078834 7/1/0 834 augment (N) by (A) 16 02 08 10 01 6 2 8 1 062801 6/0/1 801 select (N) 02 38 1A 01 10 2 H 10 1 028A10 2/1/0 A10 transfer (A) to N 04 2A 02 13 13 4 = 2 3 3 04A233 4/1/1 233 add (N) to (A) 04 16 10 13 15 4 6 3 5 046035 4/0/3 35 add (N) to (A) 01 02 08 10 19 1 2 8 9 012809 1/0/1 809 prepare for digit collation 0B 23 10 10 13 11 C 3 0B3003 11/0/1 1003 multiply and subtract 0E 10 10 10 10 . 0E0000 14/0/0 0 replace selected bits 01 6E 00 00 00 1 be 01E000 1/1/3 0 select literal address 15 02 38 08 13 5 2 H 8 3 052883 5/0/1 883 subtract (N) from (A) 13 1A 16 10 13 3 10 6 3 03A603 3/1/1 603 copy (A) to N 15 16 02 08 10 5 6 2 8 056280 5/0/3 280 subtract (N) from (A) 19 0B 23 10 10 9 11 C 09B300 9/1/1 1300 multiply uniform radix 13 0E 10 10 10 3 . 03E000 3/1/3 0 copy (A) to N 10 02 38 08 13 2 H 8 3 002883 0/0/1 883 Invalid 04 10 16 10 13 4 6 3 040603 4/0/0 603 add (N) to (A) 15 0B 02 08 10 5 11 2 8 05B280 5/1/1 1280 subtract (N) from (A) 19 0B 23 10 10 9 11 C 09B300 9/1/1 1300 multiply uniform radix 13 0E 10 10 10 3 . 03E000 3/1/3 0 copy (A) to N 10 13 38 08 13 3 H 8 3 003883 0/0/1 1883 Invalid 04 10 16 10 13 4 6 3 040603 4/0/0 603 add (N) to (A) 16 10 02 08 10 6 2 8 060280 6/0/0 280 select (N) 19 0B 23 10 10 9 11 C 09B300 9/1/1 1300 multiply uniform radix 13 0E 6E 00 00 3 . be 03EE00 3/1/3 E00 copy (A) to N 13 16 10 10 10 3 6 036000 3/0/3 0 copy (A) to N 10 02 01 38 08 2 1 H 8 002188 0/0/1 188 Invalid 13 04 04 16 10 3 4 4 6 034460 3/0/2 460 copy (A) to N 13 16 15 02 08 3 6 5 2 8 036528 3/0/3 528 copy (A) to N 10 19 0B 23 10 9 11 C 009B30 0/1/0 1B30 copy registers 10 13 0E 10 10 3 . 003E00 0/0/1 1E00 Invalid 10 02 13 38 08 2 3 H 8 002388 0/0/1 388 Invalid 13 04 1A 16 10 3 4 10 6 034A60 3/0/2 A60 copy (A) to N 13 16 1A 02 08 3 6 10 2 8 036A28 3/0/3 A28 copy (A) to N 10 19 0B 23 10 9 11 C 009B30 0/1/0 1B30 copy registers 10 13 0E 10 10 3 . 003E00 0/0/1 1E00 Invalid 10 02 02 38 08 2 2 H 8 002288 0/0/1 288 Invalid 13 04 1A 10 10 3 4 10 034A00 3/0/2 A00 copy (A) to N 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 13 16 0E 10 3 6 . 0036E0 0/0/1 16E0 Invalid 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 16 6 000006 0/0/0 6 Halt 10 13 1C 10 04 3 + 4 003C04 0/0/1 1C04 Invalid 10 13 1C 10 32 3 + B 003C02 0/0/1 1C02 Invalid 19 10 01 1F 32 9 1 £ B 0901F2 9/0/0 1F2 multiply uniform radix 10 10 10 01 02 1 2 000012 0/0/0 12 Halt 08 10 19 0B 32 8 9 11 B 0809B2 8/0/0 9B2 merge constant length 19 10 01 08 0D 9 1 8 : 09018D 9/0/0 18D multiply uniform radix 10 01 01 01 07 1 1 1 7 001117 0/0/0 1117 Halt 08 10 19 0B 23 8 9 11 C 0809B3 8/0/0 9B3 merge constant length 10 10 13 1F 2A 3 £ = 0003FA 0/0/0 3FA Halt 02 13 07 01 6E 2 3 7 1 be 02371E 2/0/1 171E transfer (A) to N 10 10 13 07 1C 3 7 + 00037C 0/0/0 37C Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 38 1C 13 1C 10 H + 3 + 18C3C0 24/1/2 3C0 modify address of next 2A 08 10 10 10 = 8 1A8000 26/1/0 0 test route N1 10 10 10 01 01 1 1 000011 0/0/0 11 Halt 38 08 13 08 15 H 8 3 8 5 188385 24/1/0 385 unconditional jump 38 08 13 08 0B H 8 3 8 11 18838B 24/1/0 38B unconditional jump 6E 00 00 00 00 be 1A 38 08 13 08 10 H 8 3 8 0A8838 10/1/0 838 multiply and add 0B 38 1C 13 1C 11 H + 3 + 0B8C3C 11/1/0 C3C multiply and subtract 10 23 02 10 10 C 2 003200 0/0/1 1200 Invalid 10 38 1C 13 1C H + 3 + 008C3C 0/1/0 C3C copy registers 10 2A 08 10 10 = 8 00A800 0/1/1 800 replace registers 10 38 08 13 19 H 8 3 9 008839 0/1/0 839 copy registers 04 38 08 13 08 4 H 8 3 8 048838 4/1/0 838 add (N) to (A) 0D 38 08 13 19 : H 8 3 9 0D8839 13/1/0 839 divide uniform radix 16 10 10 10 13 6 3 060003 6/0/0 3 select (N) 13 2A 02 13 08 3 = 2 3 8 03A238 3/1/1 238 copy (A) to N 04 10 10 10 13 4 3 040003 4/0/0 3 add (N) to (A) 01 38 08 13 19 1 H 8 3 9 018839 1/1/0 839 table look up 07 10 10 10 13 7 3 070003 7/0/0 3 augment (N) by (A) 02 29 1C 10 10 2 I + 029C00 2/1/0 1C00 transfer (A) to N 01 6E 00 00 00 1 be 01E000 1/1/3 0 select literal address 19 08 3B 10 13 9 8 * 3 098B03 9/1/0 B03 multiply uniform radix 19 13 16 10 13 9 3 6 3 093603 9/0/1 1603 multiply uniform radix 1C 10 01 1C 10 + 1 + 0C01C0 12/0/0 1C0 convert 01 10 3B 04 13 1 * 4 3 010B43 1/0/0 B43 table look up 08 15 2A 10 13 8 5 = 3 085A03 8/0/2 1A03 merge constant length 1A 0D 38 08 13 10 : H 8 3 0AD883 10/1/2 1883 multiply and add 08 15 02 08 10 8 5 2 8 085280 8/0/2 1280 merge constant length 19 0B 10 10 10 9 11 09B000 9/1/1 1000 multiply uniform radix 04 01 38 08 13 4 1 H 8 3 041883 4/0/0 1883 add (N) to (A) 1A 15 16 10 13 10 5 6 3 0A5603 10/0/2 1603 multiply and add 1A 13 02 08 10 10 3 2 8 0A3280 10/0/1 1280 multiply and add 19 0B 10 10 10 9 11 09B000 9/1/1 1000 multiply uniform radix 04 13 38 08 13 4 3 H 8 3 043883 4/0/1 1883 add (N) to (A) 19 04 16 10 13 9 4 6 3 094603 9/0/2 603 multiply uniform radix 1A 07 6E 00 00 10 7 be 0A7E00 10/0/3 1E00 multiply and add 13 1A 16 02 08 3 10 6 2 8 03A628 3/1/1 628 copy (A) to N 10 19 0B 10 10 9 11 009B00 0/1/0 1B00 copy registers 10 04 02 29 1C 4 2 I + 00429C 0/0/2 29C replace (B) by (N) 10 10 01 3B 02 1 * 2 0001B2 0/0/0 1B2 Halt 13 08 16 38 08 3 8 6 H 8 038688 3/1/0 688 copy (A) to N 13 19 04 10 10 3 9 4 039400 3/1/0 1400 copy (A) to N 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 2A 1C = + 0000AC 0/0/0 AC Halt 01 01 16 29 04 1 1 6 I 4 011694 1/0/0 1694 table look up 10 10 02 38 08 2 H 8 000288 0/0/0 288 Halt 13 1A 1F 38 1C 3 10 £ H + 03AF8C 3/1/1 F8C copy (A) to N 13 1C 10 23 08 3 + C 8 03C038 3/1/2 38 copy (A) to N 10 10 10 38 1C H + 00008C 0/0/0 8C Halt 13 1C 10 6E 00 3 + be 03C0E0 3/1/2 E0 copy (A) to N 10 13 0B 04 23 3 11 4 C 003B43 0/0/1 1B43 Invalid 08 10 10 10 2A 8 = 08000A 8/0/0 A merge constant length 1C 01 01 16 29 + 1 1 6 I 0C1169 12/0/0 1169 convert 04 10 10 02 38 4 2 H 040028 4/0/0 28 add (N) to (A) 08 13 0B 16 2A 8 3 11 6 = 083B6A 8/0/1 1B6A merge constant length 10 13 02 10 38 3 2 H 003208 0/0/1 1208 Invalid 1C 13 1C 10 23 + 3 + C 0C3C03 12/0/1 1C03 convert 0E 10 10 10 2A . = 0E000A 14/0/0 A replace selected bits 02 13 1A 0D 10 2 3 10 : 023AD0 2/0/1 1AD0 transfer (A) to N 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 0E . 00000E 0/0/0 E Halt 01 13 0D 0E 10 1 3 : . 013DE0 1/0/1 1DE0 prepare for digit collation 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 6E be 00000E 0/0/0 E Halt 10 10 13 1C 02 3 + 2 0003C2 0/0/0 3C2 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 6E 00 00 00 00 be 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 6E 00 00 00 be 00E000 0/1/3 0 Invalid 70 78 00 00 00 0 Y 008000 0/1/0 0 copy registers File: old-paper-tapes/U23start.leo 58 10 32 10 10 Q B 080200 8/0/0 200 merge constant length 70 10 13 10 10 0 3 000300 0/0/0 300 Halt 38 08 10 04 13 H 8 4 3 188043 24/1/0 43 unconditional jump 10 08 10 10 10 8 008000 0/1/0 0 copy registers 38 1C 10 08 10 H + 8 18C080 24/1/2 80 modify address of next 01 16 1F 08 10 1 6 £ 8 016F80 1/0/3 F80 interchange area addresses 29 0E 08 10 10 I . 8 19E800 25/1/3 800 conditional Halt 38 1C 10 08 10 H + 8 18C080 24/1/2 80 modify address of next 23 02 10 10 10 C 2 132000 19/0/1 0 input one block/reset timer 38 1C 10 08 10 H + 8 18C080 24/1/2 80 modify address of next 2A 08 10 10 10 = 8 1A8000 26/1/0 0 test route N1 10 10 10 02 01 2 1 000021 0/0/0 21 Halt 38 19 1F 1C 0B H 9 £ + 11 189FCB 24/1/0 1FCB unconditional jump 10 10 10 02 13 2 3 000023 0/0/0 23 Halt 10 10 10 01 1C 1 + 00001C 0/0/0 1C Halt 38 0D 1F 0D 1F H : £ : £ 18DFDF 24/1/2 1FDF modify address of next 16 19 1F 0E 13 6 9 £ . 3 069FE3 6/1/0 1FE3 select (N) 38 0D 1F 0D 0E H : £ : . 18DFDE 24/1/2 1FDE modify address of next 02 10 10 10 10 2 020000 2/0/0 0 transfer (A) to N 16 19 1F 0D 1C 6 9 £ : + 069FDC 6/1/0 1FDC select (N) 07 19 1F 0D 0E 7 9 £ : . 079FDE 7/1/0 1FDE augment (N) by (A) 16 01 1F 0D 1F 6 1 £ : £ 061FDF 6/0/0 1FDF select (N) 15 01 1F 0D 10 5 1 £ : 051FD0 5/0/0 1FD0 subtract (N) from (A) 3B 13 1F 0D 01 * 3 £ : 1 1B3FD1 27/0/1 1FD1 jump A != Z 02 01 1F 0D 1F 2 1 £ : £ 021FDF 2/0/0 1FDF transfer (A) to N 38 19 1F 1C 08 H 9 £ + 8 189FC8 24/1/0 1FC8 unconditional jump 10 10 10 10 01 1 000001 0/0/0 1 Halt 10 10 10 10 02 2 000002 0/0/0 2 Halt 10 01 0E 0B 16 1 . 11 6 001EB6 0/0/0 1EB6 Halt 10 10 10 01 04 1 4 000014 0/0/0 14 Halt 70 10 75 10 7C 0 V , 00050C 0/0/0 50C Halt 70 10 67 10 02 0 X 2 000702 0/0/0 702 Halt 58 10 07 10 13 Q 7 3 080703 8/0/0 703 merge constant length 70 10 04 10 7A 0 4 ( 00040A 0/0/0 40A Halt 70 10 13 10 5E 0 3 hf 00030E 0/0/0 30E Halt 70 10 04 10 51 0 4 J 000401 0/0/0 401 Halt 40 10 32 10 04 & B 4 000204 0/0/0 204 Halt 70 10 16 10 61 0 6 / 000601 0/0/0 601 Halt 58 10 67 10 54 Q X M 080704 8/0/0 704 merge constant length 70 10 67 10 02 0 X 2 000702 0/0/0 702 Halt 70 10 67 10 58 0 X Q 000708 0/0/0 708 Halt 70 10 76 10 02 0 W 2 000602 0/0/0 602 Halt 70 10 75 10 73 0 V T 000503 0/0/0 503 Halt 70 10 62 10 13 0 S 3 000203 0/0/0 203 Halt 08 10 16 10 58 8 6 Q 080608 8/0/0 608 merge constant length 08 10 13 10 4A 8 3 # 08030A 8/0/0 30A merge constant length 08 10 13 10 43 8 3 L 080303 8/0/0 303 merge constant length 58 10 13 10 51 Q 3 J 080301 8/0/0 301 merge constant length 10 10 62 10 7C S , 00020C 0/0/0 20C Halt 10 10 02 10 7A 2 ( 00020A 0/0/0 20A Halt 70 10 62 10 6D 0 S ; 00020D 0/0/0 20D Halt 40 10 26 10 6D & F ; 00060D 0/0/0 60D Halt 40 10 46 10 75 & O V 000605 0/0/0 605 Halt 40 10 62 10 10 & S 000200 0/0/0 200 Halt 58 10 52 10 10 Q K 080200 8/0/0 200 merge constant length 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 40 10 10 & 000000 0/0/0 0 Halt 40 10 40 10 10 & & 000000 0/0/0 0 Halt 16 08 10 10 19 6 8 9 068009 6/1/0 9 select (N) 02 01 1F 1C 16 2 1 £ + 6 021FC6 2/0/0 1FC6 transfer (A) to N 10 01 1F 0E 10 1 £ . 001FE0 0/0/0 1FE0 Halt 38 19 1F 1C 16 H 9 £ + 6 189FC6 24/1/0 1FC6 unconditional jump 10 10 20 10 10 - 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 1F 10 29 £ I 000F09 0/0/0 F09 Halt 6E 00 00 00 00 be 10 01 0E 0B 16 1 . 11 6 001EB6 0/0/0 1EB6 Halt 10 01 0E 0B 16 1 . 11 6 001EB6 0/0/0 1EB6 Halt 10 01 1F 0D 10 1 £ : 001FD0 0/0/0 1FD0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 01 0E 0B 16 1 . 11 6 001EB6 0/0/0 1EB6 Halt 10 10 10 10 1F £ 00000F 0/0/0 F Halt 10 10 10 10 01 1 000001 0/0/0 1 Halt 10 10 10 10 01 1 000001 0/0/0 1 Halt 10 10 10 10 13 3 000003 0/0/0 3 Halt 01 04 0B 16 01 1 4 11 6 1 014B61 1/0/2 B61 round off 16 01 1F 19 04 6 1 £ 9 4 061F94 6/0/0 1F94 select (N) 02 10 10 08 01 2 8 1 020081 2/0/0 81 transfer (A) to N 01 1A 10 10 10 1 10 01A000 1/1/1 0 add literal address 16 01 1F 01 0E 6 1 £ 1 . 061F1E 6/0/0 1F1E select (N) 6E 00 00 00 00 be 10 01 0E 0B 1A 1 . 11 10 001EBA 0/0/0 1EBA Halt 02 01 1F 01 0D 2 1 £ 1 : 021F1D 2/0/0 1F1D transfer (A) to N 29 0E 10 01 10 I . 1 19E010 25/1/3 10 conditional Halt 29 1C 10 01 10 I + 1 19C010 25/1/2 10 interrogate indicators 3B 01 0E 0D 13 * 1 . : 3 1B1ED3 27/0/0 1ED3 jump A = Z 16 08 10 08 10 6 8 8 068080 6/1/0 80 select (N) 02 19 1F 0B 16 2 9 £ 11 6 029FB6 2/1/0 1FB6 transfer (A) to N 2A 0B 1F 1A 08 = 11 £ 10 8 1ABFA8 26/1/1 1FA8 set modification register 37 1A 10 10 10 G 10 17A000 23/1/1 0 copy into tag 29 02 10 10 02 I 2 2 192002 25/0/1 2 step on and test 38 19 0E 1C 01 H 9 . + 1 189EC1 24/1/0 1EC1 unconditional jump 2A 0B 1F 19 16 = 11 £ 9 6 1ABF96 26/1/1 1F96 set modification register 02 1A 10 10 10 2 10 02A000 2/1/1 0 transfer (A) to N 29 02 10 10 02 I 2 2 192002 25/0/1 2 step on and test 38 19 0E 1C 15 H 9 . + 5 189EC5 24/1/0 1EC5 unconditional jump 6E 00 00 00 00 be 10 01 0E 1C 08 1 . + 8 001EC8 0/0/0 1EC8 Halt 2A 0B 1F 19 08 = 11 £ 9 8 1ABF98 26/1/1 1F98 set modification register 02 1A 10 10 10 2 10 02A000 2/1/1 0 transfer (A) to N 29 02 10 10 02 I 2 2 192002 25/0/1 2 step on and test 38 19 0E 1C 19 H 9 . + 9 189EC9 24/1/0 1EC9 unconditional jump 2A 0B 1F 19 1A = 11 £ 9 10 1ABF9A 26/1/1 1F9A set modification register 16 01 1F 19 15 6 1 £ 9 5 061F95 6/0/0 1F95 select (N) 37 1A 10 10 10 G 10 17A000 23/1/1 0 copy into tag 29 02 10 10 02 I 2 2 192002 25/0/1 2 step on and test 38 19 0E 1C 0E H 9 . + . 189ECE 24/1/0 1ECE unconditional jump 16 19 1F 0B 16 6 9 £ 11 6 069FB6 6/1/0 1FB6 select (N) 02 08 10 08 10 2 8 8 028080 2/1/0 80 transfer (A) to N 02 10 10 10 19 2 9 020009 2/0/0 9 transfer (A) to N 02 10 10 01 01 2 1 1 020011 2/0/0 11 transfer (A) to N 02 10 10 01 19 2 1 9 020019 2/0/0 19 transfer (A) to N 6E 00 00 00 00 be 10 01 0E 0D 16 1 . : 6 001ED6 0/0/0 1ED6 Halt 38 19 0E 0D 0E H 9 . : . 189EDE 24/1/0 1EDE unconditional jump 29 0B 1F 1F 1F I 11 £ £ £ 19BFFF 25/1/1 1FFF clear indicators 16 01 1F 0B 13 6 1 £ 11 3 061FB3 6/0/0 1FB3 select (N) 3B 01 0E 0B 08 * 1 . 11 8 1B1EB8 27/0/0 1EB8 jump A = Z 02 01 1F 0B 1A 2 1 £ 11 10 021FBA 2/0/0 1FBA transfer (A) to N 38 19 1C 04 16 H 9 + 4 6 189C46 24/1/0 1C46 unconditional jump 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 29 1C 10 10 01 I + 1 19C001 25/1/2 1 interrogate indicators 02 01 1F 0B 10 2 1 £ 11 021FB0 2/0/0 1FB0 transfer (A) to N 29 1C 10 10 02 I + 2 19C002 25/1/2 2 interrogate indicators 02 01 1F 0B 01 2 1 £ 11 1 021FB1 2/0/0 1FB1 transfer (A) to N 29 1C 10 10 04 I + 4 19C004 25/1/2 4 interrogate indicators 02 01 1F 0B 02 2 1 £ 11 2 021FB2 2/0/0 1FB2 transfer (A) to N 6E 00 00 00 00 be 10 01 0E 0E 04 1 . . 4 001EE4 0/0/0 1EE4 Halt 29 1C 10 10 08 I + 8 19C008 25/1/2 8 interrogate indicators 02 01 1F 0B 13 2 1 £ 11 3 021FB3 2/0/0 1FB3 transfer (A) to N 38 19 0E 0E 08 H 9 . . 8 189EE8 24/1/0 1EE8 unconditional jump 10 10 10 10 10 000000 0/0/0 0 Halt 38 0D 1F 0B 10 H : £ 11 18DFB0 24/1/2 1FB0 modify address of next 16 01 1F 15 15 6 1 £ 5 5 061F55 6/0/0 1F55 select (N) 02 01 1F 15 04 2 1 £ 5 4 021F54 2/0/0 1F54 transfer (A) to N 38 0D 1F 0B 10 H : £ 11 18DFB0 24/1/2 1FB0 modify address of next 16 01 1F 08 16 6 1 £ 8 6 061F86 6/0/0 1F86 select (N) 02 01 1F 08 15 2 1 £ 8 5 021F85 2/0/0 1F85 transfer (A) to N 16 01 1F 19 1C 6 1 £ 9 + 061F9C 6/0/0 1F9C select (N) 38 1C 10 08 10 H + 8 18C080 24/1/2 80 modify address of next 02 10 10 04 10 2 4 020040 2/0/0 40 transfer (A) to N 16 01 1F 19 0D 6 1 £ 9 : 061F9D 6/0/0 1F9D select (N) 6E 00 00 00 00 be 10 01 0E 1F 02 1 . £ 2 001EF2 0/0/0 1EF2 Halt 02 10 10 16 07 2 6 7 020067 2/0/0 67 transfer (A) to N 38 1C 10 08 10 H + 8 18C080 24/1/2 80 modify address of next 2A 08 10 10 10 = 8 1A8000 26/1/0 0 test route N1 38 19 1F 10 01 H 9 £ 1 189F01 24/1/0 1F01 unconditional jump 38 19 1F 10 13 H 9 £ 3 189F03 24/1/0 1F03 unconditional jump 38 19 0E 1F 19 H 9 . £ 9 189EF9 24/1/0 1EF9 unconditional jump 10 10 10 10 07 7 000007 0/0/0 7 Halt 02 01 1F 0B 1A 2 1 £ 11 10 021FBA 2/0/0 1FBA transfer (A) to N 38 1C 10 16 07 H + 6 7 18C067 24/1/2 67 modify address of next 02 08 10 01 0E 2 8 1 . 02801E 2/1/0 1E transfer (A) to N 38 1C 10 08 10 H + 8 18C080 24/1/2 80 modify address of next 01 16 19 1C 10 1 6 9 + 0169C0 1/0/3 9C0 interchange area addresses 38 1C 10 08 10 H + 8 18C080 24/1/2 80 modify address of next 23 02 10 10 10 C 2 132000 19/0/1 0 input one block/reset timer 6E 00 00 00 00 be 10 01 1F 10 10 1 £ 001F00 0/0/0 1F00 Halt 38 19 1F 10 15 H 9 £ 5 189F05 24/1/0 1F05 unconditional jump 10 10 10 10 13 3 000003 0/0/0 3 Halt 38 19 0E 1F 13 H 9 . £ 3 189EF3 24/1/0 1EF3 unconditional jump 01 1A 10 10 10 1 10 01A000 1/1/1 0 add literal address 38 19 0E 1F 13 H 9 . £ 3 189EF3 24/1/0 1EF3 unconditional jump 38 1C 10 08 10 H + 8 18C080 24/1/2 80 modify address of next 2A 08 10 10 10 = 8 1A8000 26/1/0 0 test route N1 10 10 10 10 19 9 000009 0/0/0 9 Halt 38 19 1F 10 15 H 9 £ 5 189F05 24/1/0 1F05 unconditional jump 38 19 1F 01 04 H 9 £ 1 4 189F14 24/1/0 1F14 unconditional jump 38 19 0E 1F 13 H 9 . £ 3 189EF3 24/1/0 1EF3 unconditional jump 02 01 1F 0B 1A 2 1 £ 11 10 021FBA 2/0/0 1FBA transfer (A) to N 38 1C 10 16 07 H + 6 7 18C067 24/1/2 67 modify address of next 02 08 10 01 0E 2 8 1 . 02801E 2/1/0 1E transfer (A) to N 6E 00 00 00 00 be 10 01 1F 10 0E 1 £ . 001F0E 0/0/0 1F0E Halt 38 1C 10 08 10 H + 8 18C080 24/1/2 80 modify address of next 01 16 19 1C 10 1 6 9 + 0169C0 1/0/3 9C0 interchange area addresses 29 0E 08 10 10 I . 8 19E800 25/1/3 800 conditional Halt 38 1C 10 08 10 H + 8 18C080 24/1/2 80 modify address of next 23 02 10 10 10 C 2 132000 19/0/1 0 input one block/reset timer 38 19 1F 01 16 H 9 £ 1 6 189F16 24/1/0 1F16 unconditional jump 10 10 10 10 0B 11 00000B 0/0/0 B Halt 38 19 0E 1F 04 H 9 . £ 4 189EF4 24/1/0 1EF4 unconditional jump 10 15 1F 1A 16 5 £ 10 6 005FA6 0/0/2 1FA6 replace (B) by (N) 1F 10 10 16 07 £ 6 7 0F0067 15/0/0 67 collate and add 13 01 1F 0B 08 3 1 £ 11 8 031FB8 3/0/0 1FB8 copy (A) to N 04 01 1F 1A 13 4 1 £ 10 3 041FA3 4/0/0 1FA3 add (N) to (A) 02 01 1F 0B 19 2 1 £ 11 9 021FB9 2/0/0 1FB9 transfer (A) to N 16 01 1F 1A 02 6 1 £ 10 2 061FA2 6/0/0 1FA2 select (N) 6E 00 00 00 00 be 10 01 1F 01 1C 1 £ 1 + 001F1C 0/0/0 1F1C Halt 02 01 1F 0B 04 2 1 £ 11 4 021FB4 2/0/0 1FB4 transfer (A) to N 10 10 10 10 10 000000 0/0/0 0 Halt 38 19 1F 02 01 H 9 £ 2 1 189F21 24/1/0 1F21 unconditional jump 38 19 1F 13 1A H 9 £ 3 10 189F3A 24/1/0 1F3A unconditional jump 38 19 1C 04 1A H 9 + 4 10 189C4A 24/1/0 1C4A unconditional jump 16 01 1F 1A 10 6 1 £ 10 061FA0 6/0/0 1FA0 select (N) 07 01 1F 0B 08 7 1 £ 11 8 071FB8 7/0/0 1FB8 augment (N) by (A) 38 1C 10 16 07 H + 6 7 18C067 24/1/2 67 modify address of next 16 08 10 10 13 6 8 3 068003 6/1/0 3 select (N) 15 01 1F 1A 02 5 1 £ 10 2 051FA2 5/0/0 1FA2 subtract (N) from (A) 02 01 1F 1A 1C 2 1 £ 10 + 021FAC 2/0/0 1FAC transfer (A) to N 38 1C 10 16 07 H + 6 7 18C067 24/1/2 67 modify address of next 16 08 10 10 15 6 8 5 068005 6/1/0 5 select (N) 02 01 1F 1A 0D 2 1 £ 10 : 021FAD 2/0/0 1FAD transfer (A) to N 6E 00 00 00 00 be 10 01 1F 02 1A 1 £ 2 10 001F2A 0/0/0 1F2A Halt 38 1C 10 16 07 H + 6 7 18C067 24/1/2 67 modify address of next 16 08 10 10 0B 6 8 11 06800B 6/1/0 B select (N) 02 01 1F 1A 0E 2 1 £ 10 . 021FAE 2/0/0 1FAE transfer (A) to N 38 1C 10 16 07 H + 6 7 18C067 24/1/2 67 modify address of next 16 08 10 10 0D 6 8 : 06800D 6/1/0 D select (N) 02 01 1F 1A 1F 2 1 £ 10 £ 021FAF 2/0/0 1FAF transfer (A) to N 10 15 1F 1A 1C 5 £ 10 + 005FAC 0/0/2 1FAC replace (B) by (N) 1F 01 1F 1A 02 £ 1 £ 10 2 0F1FA2 15/0/0 1FA2 collate and add 02 01 1F 0B 15 2 1 £ 11 5 021FB5 2/0/0 1FB5 transfer (A) to N 38 1C 10 16 07 H + 6 7 18C067 24/1/2 67 modify address of next 16 08 10 10 07 6 8 7 068007 6/1/0 7 select (N) 02 01 1F 0B 1C 2 1 £ 11 + 021FBC 2/0/0 1FBC transfer (A) to N 38 1C 10 16 07 H + 6 7 18C067 24/1/2 67 modify address of next 16 08 10 10 19 6 8 9 068009 6/1/0 9 select (N) 6E 00 00 00 00 be 10 01 1F 13 08 1 £ 3 8 001F38 0/0/0 1F38 Halt 04 01 1F 1A 01 4 1 £ 10 1 041FA1 4/0/0 1FA1 add (N) to (A) 02 01 1F 0B 0D 2 1 £ 11 : 021FBD 2/0/0 1FBD transfer (A) to N 16 19 1F 1A 04 6 9 £ 10 4 069FA4 6/1/0 1FA4 select (N) 38 1C 10 16 07 H + 6 7 18C067 24/1/2 67 modify address of next 15 08 10 01 0E 5 8 1 . 05801E 5/1/0 1E subtract (N) from (A) 3B 01 1F 04 10 * 1 £ 4 1B1F40 27/0/0 1F40 jump A = Z 10 10 10 10 0D : 00000D 0/0/0 D Halt 38 19 0E 1F 13 H 9 . £ 3 189EF3 24/1/0 1EF3 unconditional jump 38 1C 10 16 07 H + 6 7 18C067 24/1/2 67 modify address of next 16 08 10 10 01 6 8 1 068001 6/1/0 1 select (N) 15 01 1F 1A 02 5 1 £ 10 2 051FA2 5/0/0 1FA2 subtract (N) from (A) 15 01 1F 1A 1C 5 1 £ 10 + 051FAC 5/0/0 1FAC subtract (N) from (A) 3B 01 1F 04 07 * 1 £ 4 7 1B1F47 27/0/0 1F47 jump A = Z 10 10 10 10 1F £ 00000F 0/0/0 F Halt 6E 00 00 00 00 be 10 01 1F 04 16 1 £ 4 6 001F46 0/0/0 1F46 Halt 38 19 0E 1F 13 H 9 . £ 3 189EF3 24/1/0 1EF3 unconditional jump 38 0D 1F 0B 08 H : £ 11 8 18DFB8 24/1/2 1FB8 modify address of next 16 08 10 10 02 6 8 2 068002 6/1/0 2 select (N) 15 19 1F 19 0E 5 9 £ 9 . 059F9E 5/1/0 1F9E subtract (N) from (A) 3B 13 1F 15 08 * 3 £ 5 8 1B3F58 27/0/1 1F58 jump A != Z 02 01 1F 0B 04 2 1 £ 11 4 021FB4 2/0/0 1FB4 transfer (A) to N 16 01 1F 0B 15 6 1 £ 11 5 061FB5 6/0/0 1FB5 select (N) 3B 01 1F 15 10 * 1 £ 5 1B1F50 27/0/0 1F50 jump A = Z 10 10 10 01 1F 1 £ 00001F 0/0/0 1F Halt 38 19 0E 1F 13 H 9 . £ 3 189EF3 24/1/0 1EF3 unconditional jump 16 01 1F 01 1F 6 1 £ 1 £ 061F1F 6/0/0 1F1F select (N) 02 01 1F 01 0D 2 1 £ 1 : 021F1D 2/0/0 1F1D transfer (A) to N 38 0D 1F 0B 08 H : £ 11 8 18DFB8 24/1/2 1FB8 modify address of next 16 08 10 10 13 6 8 3 068003 6/1/0 3 select (N) 6E 00 00 00 00 be 10 01 1F 15 04 1 £ 5 4 001F54 0/0/0 1F54 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 38 19 1F 15 0B H 9 £ 5 11 189F5B 24/1/0 1F5B unconditional jump 38 19 0D 10 10 H 9 : 189D00 24/1/0 1D00 unconditional jump 38 19 0D 04 1A H 9 : 4 10 189D4A 24/1/0 1D4A unconditional jump 16 01 1F 1A 02 6 1 £ 10 2 061FA2 6/0/0 1FA2 select (N) 02 01 1F 0B 04 2 1 £ 11 4 021FB4 2/0/0 1FB4 transfer (A) to N 38 19 1F 15 10 H 9 £ 5 189F50 24/1/0 1F50 unconditional jump 38 0D 1F 1A 1C H : £ 10 + 18DFAC 24/1/2 1FAC modify address of next 02 10 10 10 01 2 1 020001 2/0/0 1 transfer (A) to N 16 01 1F 0B 04 6 1 £ 11 4 061FB4 6/0/0 1FB4 select (N) 3B 13 1F 16 08 * 3 £ 6 8 1B3F68 27/0/1 1F68 jump A != Z 38 0D 1F 1A 1C H : £ 10 + 18DFAC 24/1/2 1FAC modify address of next 16 10 10 10 10 6 060000 6/0/0 0 select (N) 02 01 1F 0B 0B 2 1 £ 11 11 021FBB 2/0/0 1FBB transfer (A) to N 6E 00 00 00 00 be 10 01 1F 16 02 1 £ 6 2 001F62 0/0/0 1F62 Halt 15 01 1F 1A 02 5 1 £ 10 2 051FA2 5/0/0 1FA2 subtract (N) from (A) 38 0D 1F 1A 1C H : £ 10 + 18DFAC 24/1/2 1FAC modify address of next 02 08 10 10 10 2 8 028000 2/1/0 0 transfer (A) to N 16 01 1F 0B 0B 6 1 £ 11 11 061FBB 6/0/0 1FBB select (N) 38 0D 1F 1A 1C H : £ 10 + 18DFAC 24/1/2 1FAC modify address of next 02 10 10 10 10 2 020000 2/0/0 0 transfer (A) to N 16 01 1F 0B 15 6 1 £ 11 5 061FB5 6/0/0 1FB5 select (N) 3B 01 1F 16 0D * 1 £ 6 : 1B1F6D 27/0/0 1F6D jump A = Z 16 01 1F 1A 1F 6 1 £ 10 £ 061FAF 6/0/0 1FAF select (N) 38 0D 1F 1A 1C H : £ 10 + 18DFAC 24/1/2 1FAC modify address of next 37 08 10 10 10 G 8 178000 23/1/0 0 copy into tag 16 19 1F 0B 1C 6 9 £ 11 + 069FBC 6/1/0 1FBC select (N) 3B 01 1F 07 16 * 1 £ 7 6 1B1F76 27/0/0 1F76 jump A = Z 2A 0B 1F 0B 1C = 11 £ 11 + 1ABFBC 26/1/1 1FBC set modification register 6E 00 00 00 00 be 10 01 1F 07 10 1 £ 7 001F70 0/0/0 1F70 Halt 16 01 1F 1A 1F 6 1 £ 10 £ 061FAF 6/0/0 1FAF select (N) 37 1A 10 10 10 G 10 17A000 23/1/1 0 copy into tag 29 02 10 10 02 I 2 2 192002 25/0/1 2 step on and test 38 19 1F 07 01 H 9 £ 7 1 189F71 24/1/0 1F71 unconditional jump 02 19 1F 0B 1C 2 9 £ 11 + 029FBC 2/1/0 1FBC transfer (A) to N 02 19 1F 0B 1C 2 9 £ 11 + 029FBC 2/1/0 1FBC transfer (A) to N 29 0E 04 10 10 I . 4 19E400 25/1/3 400 conditional Halt 16 01 1F 1A 02 6 1 £ 10 2 061FA2 6/0/0 1FA2 select (N) 15 01 1F 0B 15 5 1 £ 11 5 051FB5 5/0/0 1FB5 subtract (N) from (A) 02 01 1F 0B 15 2 1 £ 11 5 021FB5 2/0/0 1FB5 transfer (A) to N 16 01 1F 1A 1C 6 1 £ 10 + 061FAC 6/0/0 1FAC select (N) 04 01 1F 1A 02 4 1 £ 10 2 041FA2 4/0/0 1FA2 add (N) to (A) 13 01 1F 1A 1C 3 1 £ 10 + 031FAC 3/0/0 1FAC copy (A) to N 15 01 1F 1A 0D 5 1 £ 10 : 051FAD 5/0/0 1FAD subtract (N) from (A) 6E 00 00 00 00 be 10 01 1F 07 0E 1 £ 7 . 001F7E 0/0/0 1F7E Halt 3B 15 1F 08 15 * 5 £ 8 5 1B5F85 27/0/2 1F85 jump A >= Z 16 01 1F 1A 01 6 1 £ 10 1 061FA1 6/0/0 1FA1 select (N) 07 01 1F 0B 08 7 1 £ 11 8 071FB8 7/0/0 1FB8 augment (N) by (A) 16 01 1F 0B 08 6 1 £ 11 8 061FB8 6/0/0 1FB8 select (N) 15 01 1F 0B 19 5 1 £ 11 9 051FB9 5/0/0 1FB9 subtract (N) from (A) 3B 13 1F 04 07 * 3 £ 4 7 1B3F47 27/0/1 1F47 jump A != Z 38 19 1F 10 15 H 9 £ 5 189F05 24/1/0 1F05 unconditional jump 10 10 10 10 10 000000 0/0/0 0 Halt 38 19 1F 08 08 H 9 £ 8 8 189F88 24/1/0 1F88 unconditional jump 38 19 0D 1A 0D H 9 : 10 : 189DAD 24/1/0 1DAD unconditional jump 16 01 1F 0B 02 6 1 £ 11 2 061FB2 6/0/0 1FB2 select (N) 3B 13 0E 0D 07 * 3 . : 7 1B3ED7 27/0/1 1ED7 jump A != Z 16 01 1F 1A 1F 6 1 £ 10 £ 061FAF 6/0/0 1FAF select (N) 32 10 10 10 04 B 4 120004 18/0/0 4 shift logical 6E 00 00 00 00 be 01 1F 08 1C 01 1 £ 8 + 1 01F8C1 1/1/3 18C1 select literal address 1A 10 10 1A 02 10 10 2 0A00A2 10/0/0 A2 multiply and add 01 1F 0B 1A 16 1 £ 11 10 6 01FBA6 1/1/3 1BA6 select literal address 01 1F 1A 07 02 1 £ 10 7 2 01FA72 1/1/3 1A72 select literal address 10 10 10 19 16 9 6 000096 0/0/0 96 Halt 19 1F 1A 1A 13 9 £ 10 10 3 09FAA3 9/1/3 1AA3 multiply uniform radix 08 10 10 1A 02 8 10 2 0800A2 8/0/0 A2 merge constant length 10 10 10 1A 38 10 H 0000A8 0/0/0 A8 Halt 08 10 10 19 10 8 9 080090 8/0/0 90 merge constant length 10 10 02 10 10 2 000200 0/0/0 200 Halt 10 10 10 1F 10 £ 0000F0 0/0/0 F0 Halt 10 10 10 04 10 4 000040 0/0/0 40 Halt 01 1C 04 16 10 1 + 4 6 01C460 1/1/2 460 subtract literal address 01 1F 1C 10 10 1 £ + 01FC00 1/1/3 1C00 select literal address 04 10 10 10 6E 4 be 04000E 4/0/0 E add (N) to (A) 10 01 1F 19 1A 1 £ 9 10 001F9A 0/0/0 1F9A Halt 10 10 10 1A 10 10 0000A0 0/0/0 A0 Halt 10 04 10 10 10 4 004000 0/0/2 0 replace (B) by (N) 1F 01 1F 1C 10 £ 1 £ + 0F1FC0 15/0/0 1FC0 collate and add 1F 01 1F 0E 10 £ 1 £ . 0F1FE0 15/0/0 1FE0 collate and add 19 16 19 16 19 9 6 9 6 9 096969 9/0/3 969 multiply uniform radix 16 19 16 19 16 6 9 6 9 6 069696 6/1/0 1696 select (N) 10 10 10 01 04 1 4 000014 0/0/0 14 Halt 10 10 10 10 02 2 000002 0/0/0 2 Halt 10 10 10 10 01 1 000001 0/0/0 1 Halt 10 10 10 01 1C 1 + 00001C 0/0/0 1C Halt 10 10 10 10 10 000000 0/0/0 0 Halt 07 0E 10 10 10 7 . 07E000 7/1/3 0 augment (N) by (A) 10 07 1F 1F 1F 7 £ £ £ 007FFF 0/0/3 1FFF set radix 2A 07 1F 0B 1A = 7 £ 11 10 1A7FBA 26/0/3 1FBA leave master routine 6E 00 00 00 00 be 08 10 10 10 10 8 080000 8/0/0 0 merge constant length 10 10 10 10 1A 10 00000A 0/0/0 A Halt 10 29 0B 1F 1F I 11 £ £ 009BFF 0/1/0 1BFF copy registers 1F 2A 13 1F 1A £ = 3 £ 10 0FA3FA 15/1/1 3FA collate and add 0E 10 01 1C 0E . 1 + . 0E01CE 14/0/0 1CE replace selected bits 08 10 01 1C 0E 8 1 + . 0801CE 8/0/0 1CE merge constant length 08 10 01 0B 07 8 1 11 7 0801B7 8/0/0 1B7 merge constant length 1A 10 10 10 10 10 0A0000 10/0/0 0 multiply and add 1F 10 10 10 10 £ 0F0000 15/0/0 0 collate and add 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 01 10 10 10 10 1 010000 1/0/0 0 table look up 10 6E 00 00 00 be 00E000 0/1/3 0 Invalid 0B 16 10 10 10 11 6 0B6000 11/0/3 0 multiply and subtract 01 19 10 10 10 1 9 019000 1/1/0 1000 table look up 02 10 10 01 1F 2 1 £ 02001F 2/0/0 1F transfer (A) to N 1C 1C 10 01 1F + + 1 £ 0CC01F 12/1/2 1F convert 0D 1C 1F 10 10 : + £ 0DCF00 13/1/2 F00 divide uniform radix 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 13 3 000003 0/0/0 3 Halt 0E 08 10 10 07 . 8 7 0E8007 14/1/0 7 replace selected bits 0D 02 10 10 10 : 2 0D2000 13/0/1 0 divide uniform radix 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 1C 04 0E + 4 . 000C4E 0/0/0 C4E Halt 04 02 10 10 04 4 2 4 042004 4/0/1 4 add (N) to (A) 01 04 10 10 10 1 4 014000 1/0/2 0 round off 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 6E 00 00 be 000E00 0/0/0 E00 Halt 1F 1C 04 10 10 £ + 4 0FC400 15/1/2 400 collate and add 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 38 1C H + 00008C 0/0/0 8C Halt 10 08 10 01 16 8 1 6 008016 0/1/0 16 copy registers 1F 1C 10 29 0E £ + I . 0FC09E 15/1/2 9E collate and add 08 10 10 38 1C 8 H + 08008C 8/0/0 8C merge constant length 10 08 10 23 02 8 C 2 008032 0/1/0 32 copy registers 10 10 10 02 01 2 1 000021 0/0/0 21 Halt 1F 0D 10 15 01 £ : 5 1 0FD051 15/1/2 1051 collate and add 1F 1C 1F 07 10 £ + £ 7 0FCF70 15/1/2 F70 collate and add 10 08 10 38 19 8 H 9 008089 0/1/0 89 copy registers 1F 0D 01 10 10 £ : 1 0FD100 15/1/2 1100 collate and add 10 04 10 10 10 4 004000 0/0/2 0 replace (B) by (N) 10 01 1C 38 19 1 + H 9 001C89 0/0/0 1C89 Halt 0E 0B 16 6E 00 . 11 6 be 0EB6E0 14/1/1 16E0 replace selected bits 10 10 10 0E 16 . 6 0000E6 0/0/0 E6 Halt 10 10 10 0E 16 . 6 0000E6 0/0/0 E6 Halt 10 10 13 0D 04 3 : 4 0003D4 0/0/0 3D4 Halt 10 10 10 0E 16 . 6 0000E6 0/0/0 E6 Halt 10 01 1F 1F 0E 1 £ £ . 001FFE 0/0/0 1FFE Halt 10 10 10 1F 16 £ 6 0000F6 0/0/0 F6 Halt 10 10 10 10 0E . 00000E 0/0/0 E Halt 10 10 10 02 13 2 3 000023 0/0/0 23 Halt 10 10 10 10 01 1 000001 0/0/0 1 Halt 10 10 10 10 01 1 000001 0/0/0 1 Halt 02 08 13 16 02 2 8 3 6 2 028362 2/1/0 362 transfer (A) to N 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 02 13 2 3 000023 0/0/0 23 Halt 0E 10 10 10 10 . 0E0000 14/0/0 0 replace selected bits 10 10 10 10 01 1 000001 0/0/0 1 Halt 6E 00 00 00 00 be 1A 10 10 13 15 10 3 5 0A0035 10/0/0 35 multiply and add 0D 38 08 10 0E : H 8 . 0D880E 13/1/0 80E divide uniform radix 0E 38 08 10 1F . H 8 £ 0E880F 14/1/0 80F replace selected bits 16 38 08 10 1F 6 H 8 £ 06880F 6/1/0 80F select (N) 10 38 08 10 1F H 8 £ 00880F 0/1/0 80F copy registers 02 38 08 10 1F 2 H 8 £ 02880F 2/1/0 80F transfer (A) to N 04 10 10 19 19 4 9 9 040099 4/0/0 99 add (N) to (A) 19 2A 02 10 10 9 = 2 09A200 9/1/1 200 multiply uniform radix 08 10 10 19 19 8 9 9 080099 8/0/0 99 merge constant length 08 2A 02 10 01 8 = 2 1 08A201 8/1/1 201 merge variable length 10 10 10 19 19 9 9 000099 0/0/0 99 Halt 07 2A 02 10 01 7 = 2 1 07A201 7/1/1 201 augment (N) by (A) 08 10 16 01 10 8 6 1 080610 8/0/0 610 merge constant length 04 38 1A 01 10 4 H 10 1 048A10 4/1/0 A10 add (N) to (A) 04 6E 00 00 00 4 be 04E000 4/1/3 0 add (N) to (A) 1F 08 16 10 10 £ 8 6 0F8600 15/1/0 600 collate and add 0E 1C 02 10 10 . + 2 0EC200 14/1/2 200 replace selected bits 10 10 16 10 10 6 000600 0/0/0 600 Halt 0E 0D 02 10 10 . : 2 0ED200 14/1/2 1200 replace selected bits 10 19 16 10 10 9 6 009600 0/1/0 1600 copy registers 0E 0E 02 10 10 . . 2 0EE200 14/1/3 200 replace selected bits 01 01 16 10 10 1 1 6 011600 1/0/0 1600 table look up 0E 1F 02 10 10 . £ 2 0EF200 14/1/3 1200 replace selected bits 01 19 38 08 01 1 9 H 8 1 019881 1/1/0 1881 table look up 08 02 16 10 10 8 2 6 082600 8/0/1 600 merge constant length 0E 0D 0E 10 10 . : . 0EDE00 14/1/2 1E00 replace selected bits 10 10 02 01 1C 2 1 + 00021C 0/0/0 21C Halt 04 10 10 10 10 4 040000 4/0/0 0 add (N) to (A) 10 10 10 10 10 000000 0/0/0 0 Halt 02 10 6E 00 00 2 be 020E00 2/0/0 E00 transfer (A) to N 01 10 16 10 10 1 6 010600 1/0/0 600 table look up 10 10 1A 10 10 10 000A00 0/0/0 A00 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 08 10 10 8 000800 0/0/0 800 Halt 10 07 0E 07 0E 7 . 7 . 007E7E 0/0/3 1E7E set radix 10 10 10 1F 1F £ £ 0000FF 0/0/0 FF Halt 1F 1F 1F 1F 1F £ £ £ £ £ 0FFFFF 15/1/3 1FFF collate and add 1F 1F 1F 10 10 £ £ £ 0FFF00 15/1/3 1F00 collate and add 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 13 10 10 3 000300 0/0/0 300 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 02 1F 15 2 £ 5 0002F5 0/0/0 2F5 Halt 1F 15 1F 15 1F £ 5 £ 5 £ 0F5F5F 15/0/2 1F5F collate and add 15 1F 15 6E 00 5 £ 5 be 05F5E0 5/1/3 15E0 subtract (N) from (A) 10 01 01 04 10 1 1 4 001140 0/0/0 1140 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 01 08 10 1 8 000180 0/0/0 180 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 02 07 01 10 10 2 7 1 027100 2/0/3 1100 transfer (A) to N 10 10 10 10 10 000000 0/0/0 0 Halt 10 04 10 10 0E 4 . 00400E 0/0/2 E replace (B) by (N) 01 0B 0E 10 0E 1 11 . . 01BE0E 1/1/1 1E0E add literal address 10 13 0E 10 0E 3 . . 003E0E 0/0/1 1E0E Invalid 10 0B 0E 10 0E 11 . . 00BE0E 0/1/1 1E0E replace registers 01 13 0E 10 0E 1 3 . . 013E0E 1/0/1 1E0E prepare for digit collation 10 10 10 10 38 H 000008 0/0/0 8 Halt 1A 01 10 1C 38 10 1 + H 0A10C8 10/0/0 10C8 multiply and add 1C 13 1C 10 16 + 3 + 6 0C3C06 12/0/1 1C06 convert 10 10 04 10 6E 4 be 00040E 0/0/0 40E Halt 10 10 01 02 02 1 2 2 000122 0/0/0 122 Halt 02 10 13 1C 0D 2 3 + : 0203CD 2/0/0 3CD transfer (A) to N 16 10 01 01 1A 6 1 1 10 06011A 6/0/0 11A select (N) 38 1C 13 1C 10 H + 3 + 18C3C0 24/1/2 3C0 modify address of next 02 10 10 04 10 2 4 020040 2/0/0 40 transfer (A) to N 38 08 01 02 19 H 8 1 2 9 188129 24/1/0 129 unconditional jump 02 08 10 19 0B 2 8 9 11 02809B 2/1/0 9B transfer (A) to N 23 10 10 13 0E C 3 . 13003E 19/0/0 3E output 10 10 15 15 15 5 5 5 000555 0/0/0 555 Halt 29 1C 10 10 07 I + 7 19C007 25/1/2 7 interrogate indicators 3B 10 01 13 16 * 1 3 6 1B0136 27/0/0 136 jump A = Z 02 10 13 1C 1C 2 3 + + 0203CC 2/0/0 3CC transfer (A) to N 38 1C 13 1C 1C H + 3 + + 18C3CC 24/1/2 3CC modify address of next 38 08 01 02 0E H 8 1 2 . 18812E 24/1/0 12E unconditional jump 38 08 01 16 0E H 8 1 6 . 18816E 24/1/0 16E unconditional jump 6E 00 00 00 00 be 10 38 08 01 04 H 8 1 4 008814 0/1/0 814 copy registers 07 38 08 01 15 7 H 8 1 5 078815 7/1/0 815 augment (N) by (A) 04 38 08 01 15 4 H 8 1 5 048815 4/1/0 815 add (N) to (A) 16 38 08 01 16 6 H 8 1 6 068816 6/1/0 816 select (N) 04 38 08 01 16 4 H 8 1 6 048816 4/1/0 816 add (N) to (A) 0B 38 08 01 02 11 H 8 1 2 0B8812 11/1/0 812 multiply and subtract 16 16 10 13 1C 6 6 3 + 06603C 6/0/3 3C select (N) 0D 38 1C 13 1C : H + 3 + 0D8C3C 13/1/0 C3C divide uniform radix 10 02 10 10 04 2 4 002004 0/0/1 4 Invalid 10 38 1A 01 10 H 10 1 008A10 0/1/0 A10 copy registers 04 2A 02 01 01 4 = 2 1 1 04A211 4/1/1 211 add (N) to (A) 0E 10 10 10 10 . 0E0000 14/0/0 0 replace selected bits 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 6E 00 00 00 be 00E000 0/1/3 0 Invalid 13 0E 10 10 10 3 . 03E000 3/1/3 0 copy (A) to N 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 29 1C 01 I + 1 0009C1 0/0/0 9C1 Halt 10 10 3B 10 01 * 1 000B01 0/0/0 B01 Halt 02 16 2A 0E 01 2 6 = . 1 026AE1 2/0/3 AE1 transfer (A) to N 01 16 29 16 10 1 6 I 6 016960 1/0/3 960 interchange area addresses 10 01 38 08 01 1 H 8 1 001881 0/0/0 1881 Halt 04 04 38 08 01 4 4 H 8 1 044881 4/0/2 881 add (N) to (A) 02 1A 2A 0E 01 2 10 = . 1 02AAE1 2/1/1 AE1 transfer (A) to N 01 10 2A 10 13 1 = 3 010A03 1/0/0 A03 table look up 02 10 38 1C 13 2 H + 3 0208C3 2/0/0 8C3 transfer (A) to N 1C 10 23 08 10 + C 8 0C0380 12/0/0 380 convert 10 10 29 16 10 I 6 000960 0/0/0 960 Halt 10 01 6E 00 00 1 be 001E00 0/0/0 1E00 Halt 01 04 1C 38 08 1 4 + H 8 014C88 1/0/2 C88 round off 01 04 08 2A 10 1 4 8 = 0148A0 1/0/2 8A0 round off 13 02 10 2A 0E 3 2 = . 0320AE 3/0/1 AE copy (A) to N 01 01 16 29 16 1 1 6 I 6 011696 1/0/0 1696 table look up 10 10 02 38 08 2 H 8 000288 0/0/0 288 Halt 01 04 1F 38 1C 1 4 £ H + 014F8C 1/0/2 F8C round off 13 1C 10 23 02 3 + C 2 03C032 3/1/2 32 copy (A) to N 10 10 10 38 08 H 8 000088 0/0/0 88 Halt 01 16 0E 2A 0E 1 6 . = . 016EAE 1/0/3 EAE interchange area addresses 01 10 0E 38 08 1 . H 8 010E88 1/0/0 E88 table look up 01 04 08 2A 10 1 4 8 = 0148A0 1/0/2 8A0 round off 13 02 10 38 1C 3 2 H + 03208C 3/0/1 8C copy (A) to N 13 1C 10 23 04 3 + C 4 03C034 3/1/2 34 copy (A) to N 10 10 10 2A 10 = 0000A0 0/0/0 A0 Halt 13 02 10 6E 00 3 2 be 0320E0 3/0/1 E0 copy (A) to N 10 01 15 1A 38 1 5 10 H 0015A8 0/0/0 15A8 Halt 1C 13 1C 10 23 + 3 + C 0C3C03 12/0/1 1C03 convert 08 10 10 10 38 8 H 080008 8/0/0 8 merge constant length 08 01 04 0D 10 8 1 4 : 0814D0 8/0/0 14D0 merge constant length 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 2A = 00000A 0/0/0 A Halt 10 13 02 10 38 3 2 H 003208 0/0/1 1208 Invalid 1C 13 1C 10 23 + 3 + C 0C3C03 12/0/1 1C03 convert 16 10 10 10 2A 6 = 06000A 6/0/0 A select (N) 0E 01 01 16 6E . 1 1 6 be 0E116E 14/0/0 116E replace selected bits 10 10 01 16 08 1 6 8 000168 0/0/0 168 Halt 29 16 10 10 02 I 6 2 196002 25/0/3 2 step on and test 38 08 01 16 08 H 8 1 6 8 188168 24/1/0 168 unconditional jump 38 08 01 04 07 H 8 1 4 7 188147 24/1/0 147 unconditional jump 2A 10 13 02 10 = 3 2 1A0320 26/0/0 320 enter subroutine 38 1C 13 1C 10 H + 3 + 18C3C0 24/1/2 3C0 modify address of next 23 1A 10 10 10 C 10 13A000 19/1/1 0 rewind 2A 0E 01 01 08 = . 1 1 8 1AE118 26/1/3 118 set modification register 02 19 0B 0E 10 2 9 11 . 029BE0 2/1/0 1BE0 transfer (A) to N 02 1F 0B 0E 10 2 £ 11 . 02FBE0 2/1/3 1BE0 transfer (A) to N 29 16 10 10 02 I 6 2 196002 25/0/3 2 step on and test 38 08 01 07 10 H 8 1 7 188170 24/1/0 170 unconditional jump 2A 10 13 02 10 = 3 2 1A0320 26/0/0 320 enter subroutine 38 1C 13 1C 10 H + 3 + 18C3C0 24/1/2 3C0 modify address of next 23 02 10 10 10 C 2 132000 19/0/1 0 input one block/reset timer 6E 00 00 00 00 be 16 2A 10 13 02 6 = 3 2 06A032 6/1/1 32 select (N) 10 38 08 01 04 H 8 1 4 008814 0/1/0 814 copy registers 01 10 10 10 10 1 010000 1/0/0 0 table look up 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 16 08 01 10 6 8 1 006810 0/0/3 810 set radix 1C 13 08 10 08 + 3 8 8 0C3808 12/0/1 1808 convert 10 6E 00 00 00 be 00E000 0/1/3 0 Invalid 08 04 13 08 10 8 4 3 8 084380 8/0/2 380 merge constant length 08 02 13 08 10 8 2 3 8 082380 8/0/1 380 merge constant length 08 04 02 08 10 8 4 2 8 084280 8/0/2 280 merge constant length 08 16 38 08 01 8 6 H 8 1 086881 8/0/3 881 merge constant length 08 1C 10 10 10 8 + 08C000 8/1/2 0 merge variable length 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 38 08 01 H 8 1 000881 0/0/0 881 Halt 08 1F 02 08 10 8 £ 2 8 08F280 8/1/3 1280 merge variable length 19 0B 23 10 10 9 11 C 09B300 9/1/1 1300 multiply uniform radix 13 0E 10 01 1F 3 . 1 £ 03E01F 3/1/3 1F copy (A) to N 1F 1F 29 1C 10 £ £ I + 0FF9C0 15/1/3 19C0 collate and add 10 01 3B 02 01 1 * 2 1 001B21 0/0/0 1B21 Halt 19 1C 6E 00 00 9 + be 09CE00 9/1/2 E00 multiply uniform radix 01 19 02 16 10 1 9 2 6 019260 1/1/0 1260 table look up 01 01 0B 38 1C 1 1 11 H + 011B8C 1/0/0 1B8C table look up 10 08 10 02 10 8 2 008020 0/1/0 20 copy registers 10 04 10 16 10 4 6 004060 0/0/2 60 replace (B) by (N) 10 08 02 15 10 8 2 5 008250 0/1/0 250 copy registers 01 10 1C 3B 10 1 + * 010CB0 1/0/0 CB0 table look up 01 1A 16 16 10 1 10 6 6 01A660 1/1/1 660 add literal address 01 01 1C 38 1C 1 1 + H + 011C8C 1/0/0 1C8C table look up 10 08 02 02 10 8 2 2 008220 0/1/0 220 copy registers 10 04 10 38 08 4 H 8 004088 0/0/2 88 replace (B) by (N) 01 1A 16 2A 10 1 10 6 = 01A6A0 1/1/1 6A0 add literal address 01 01 0E 38 08 1 1 . H 8 011E88 1/0/0 1E88 table look up 01 19 02 10 10 1 9 2 019200 1/1/0 1200 table look up 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 01 1A 10 10 1 10 001A00 0/0/0 1A00 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 16 6 000006 0/0/0 6 Halt 08 01 10 02 2C 8 1 2 ' 08102C 8/0/0 102C merge constant length 1A 13 0E 10 16 10 3 . 6 0A3E06 10/0/1 1E06 multiply and add 10 10 08 10 02 8 2 000802 0/0/0 802 Halt 10 13 1C 10 2A 3 + = 003C0A 0/0/1 1C0A Invalid 10 13 08 04 16 3 8 4 6 003846 0/0/1 1846 Invalid 10 10 08 10 01 8 1 000801 0/0/0 801 Halt 1C 10 01 10 3B + 1 * 0C010B 12/0/0 10B convert 16 02 10 1A 6E 6 2 10 be 0620AE 6/0/1 AE select (N) 10 10 01 1A 0E 1 10 . 0001AE 0/0/0 1AE Halt 16 10 10 08 02 6 8 2 060082 6/0/0 82 select (N) 15 10 01 10 1C 5 1 + 05010C 5/0/0 10C subtract (N) from (A) 3B 10 02 02 1A * 2 2 10 1B022A 27/0/0 22A jump A = Z 16 10 10 08 02 6 8 2 060082 6/0/0 82 select (N) 02 10 13 1C 10 2 3 + 0203C0 2/0/0 3C0 transfer (A) to N 2A 10 13 08 04 = 3 8 4 1A0384 26/0/0 384 enter subroutine 16 10 10 08 02 6 8 2 060082 6/0/0 82 select (N) 01 1C 10 01 10 1 + 1 01C010 1/1/2 10 subtract literal address 3B 16 02 01 01 * 6 2 1 1 1B6211 27/0/3 211 jump A < Z 2A 1A 01 10 04 = 10 1 4 1AA104 26/1/1 104 set modification register 16 1A 13 0E 10 6 10 3 . 06A3E0 6/1/1 3E0 select (N) 15 1A 0B 0E 10 5 10 11 . 05ABE0 5/1/1 BE0 subtract (N) from (A) 3B 02 01 1C 0B * 2 1 + 11 1B21CB 27/0/1 1CB jump A != Z 16 1A 13 0E 10 6 10 3 . 06A3E0 6/1/1 3E0 select (N) 6E 00 00 00 00 be 1C 13 0B 13 0E + 3 11 3 . 0C3B3E 12/0/1 1B3E convert 10 2A 1C 01 10 = + 1 00AC10 0/1/1 C10 replace registers 16 32 19 10 01 6 B 9 1 062901 6/0/1 901 select (N) 08 01 1C 10 07 8 1 + 7 081C07 8/0/0 1C07 merge constant length 0E 3B 10 02 01 . * 2 1 0EB021 14/1/1 1021 replace selected bits 19 29 1C 10 10 9 I + 099C00 9/1/0 1C00 multiply uniform radix 10 29 15 10 10 I 5 009500 0/1/0 1500 copy registers 02 38 08 01 1C 2 H 8 1 + 02881C 2/1/0 81C transfer (A) to N 15 38 08 01 1F 5 H 8 1 £ 05881F 5/1/0 81F subtract (N) from (A) 10 32 08 10 10 B 8 002800 0/0/1 800 Invalid 02 38 08 01 0B 2 H 8 1 11 02881B 2/1/0 81B transfer (A) to N 1F 16 10 13 0E £ 6 3 . 0F603E 15/0/3 3E collate and add 01 32 01 10 01 1 B 1 1 012101 1/0/1 101 prepare for digit collation 0D 01 1C 10 07 : 1 + 7 0D1C07 13/0/0 1C07 divide uniform radix 0E 6E 00 00 00 . be 0EE000 14/1/3 0 replace selected bits 1C 1A 3B 10 01 + 10 * 1 0CAB01 12/1/1 B01 convert 0D 0E 16 10 10 : . 6 0DE600 13/1/3 600 divide uniform radix 08 10 01 1C 10 8 1 + 0801C0 8/0/0 1C0 merge constant length 01 1C 3B 10 01 1 + * 1 01CB01 1/1/2 B01 subtract literal address 0D 10 01 1C 10 : 1 + 0D01C0 13/0/0 1C0 divide uniform radix 10 01 3B 02 02 1 * 2 2 001B22 0/0/0 1B22 Halt 1A 19 16 10 0B 10 9 6 11 0A960B 10/1/0 160B multiply and add 0E 10 32 01 10 . B 1 0E0210 14/0/0 210 replace selected bits 01 0D 01 1C 10 1 : 1 + 01D1C0 1/1/2 11C0 subtract literal address 07 0E 3B 02 01 7 . * 2 1 07EB21 7/1/3 B21 augment (N) by (A) 0E 0D 16 08 10 . : 6 8 0ED680 14/1/2 1680 replace selected bits 10 02 02 08 10 2 2 8 002280 0/0/1 280 Invalid 10 16 29 16 10 6 I 6 006960 0/0/3 960 set radix 10 02 38 08 01 2 H 8 1 002881 0/0/1 881 Invalid 0D 19 6E 00 00 : 9 be 0D9E00 13/1/0 1E00 divide uniform radix 01 0D 08 38 08 1 : 8 H 8 01D888 1/1/2 1888 subtract literal address 01 0E 1F 16 0E 1 . £ 6 . 01EF6E 1/1/3 F6E select literal address 13 0E 10 3B 02 3 . * 2 03E0B2 3/1/3 B2 copy (A) to N 01 0E 0D 29 16 1 . : I 6 01ED96 1/1/3 D96 select literal address 10 10 02 38 08 2 H 8 000288 0/0/0 288 Halt 01 0D 19 38 08 1 : 9 H 8 01D988 1/1/2 1988 subtract literal address 01 0E 1F 16 10 1 . £ 6 01EF60 1/1/3 F60 select literal address 0B 0E 10 32 01 11 . B 1 0BE021 11/1/3 21 multiply and subtract 10 01 0D 01 1C 1 : 1 + 001D1C 0/0/0 1D1C Halt 10 07 0E 3B 10 7 . * 007EB0 0/0/3 1EB0 set radix 01 0E 1F 16 10 1 . £ 6 01EF60 1/1/3 F60 select literal address 10 08 02 01 1C 8 2 1 + 00821C 0/1/0 21C copy registers 10 01 1C 3B 10 1 + * 001CB0 0/0/0 1CB0 Halt 01 0E 07 01 1C 1 . 7 1 + 01E71C 1/1/3 71C select literal address 10 10 01 6E 00 1 be 0001E0 0/0/0 1E0 Halt 10 01 0E 16 3B 1 . 6 * 001E6B 0/0/0 1E6B Halt 02 02 1A 19 16 2 2 10 9 6 022A96 2/0/1 A96 transfer (A) to N 08 10 10 02 02 8 2 2 080022 8/0/0 22 merge constant length 08 10 10 16 29 8 6 I 080069 8/0/0 69 merge constant length 16 10 10 02 38 6 2 H 060028 6/0/0 28 select (N) 08 01 0E 1C 38 8 1 . + H 081EC8 8/0/0 1EC8 merge constant length 08 01 0E 1F 16 8 1 . £ 6 081EF6 8/0/0 1EF6 merge constant length 0E 0B 0E 10 3B . 11 . * 0EBE0B 14/1/1 1E0B replace selected bits 02 02 1A 19 38 2 2 10 9 H 022A98 2/0/1 A98 transfer (A) to N 08 01 0E 1C 38 8 1 . + H 081EC8 8/0/0 1EC8 merge constant length 08 02 13 1C 29 8 2 3 + I 0823C9 8/0/1 3C9 merge constant length 02 10 10 02 38 2 2 H 020028 2/0/0 28 transfer (A) to N 08 01 0B 08 16 8 1 11 8 6 081B86 8/0/0 1B86 merge constant length 10 10 08 10 01 8 1 000801 0/0/0 801 Halt 1C 10 01 1C 6E + 1 + be 0C01CE 12/0/0 1CE convert 10 10 01 1F 04 1 £ 4 0001F4 0/0/0 1F4 Halt 3B 10 01 1F 07 * 1 £ 7 1B01F7 27/0/0 1F7 jump A = Z 01 1C 10 10 01 1 + 1 01C001 1/1/2 1 subtract literal address 3B 02 01 1F 0D * 2 1 £ : 1B21FD 27/0/1 1FD jump A != Z 16 10 10 08 02 6 8 2 060082 6/0/0 82 select (N) 01 1C 10 01 1C 1 + 1 + 01C01C 1/1/2 1C subtract literal address 3B 10 01 1F 1C * 1 £ + 1B01FC 27/0/0 1FC jump A = Z 01 1C 10 10 01 1 + 1 01C001 1/1/2 1 subtract literal address 3B 02 02 10 07 * 2 2 7 1B2207 27/0/1 207 jump A != Z 38 08 02 13 1C H 8 2 3 + 18823C 24/1/0 23C unconditional jump 16 10 10 08 02 6 8 2 060082 6/0/0 82 select (N) 01 1C 10 01 1C 1 + 1 + 01C01C 1/1/2 1C subtract literal address 3B 10 02 10 02 * 2 2 1B0202 27/0/0 202 jump A = Z 01 1C 10 10 01 1 + 1 01C001 1/1/2 1 subtract literal address 3B 02 01 0B 08 * 2 1 11 8 1B21B8 27/0/1 1B8 jump A != Z 6E 00 00 00 00 be 02 16 10 13 0E 2 6 3 . 02603E 2/0/3 3E transfer (A) to N 01 32 01 10 01 1 B 1 1 012101 1/0/1 101 prepare for digit collation 0D 01 1C 10 07 : 1 + 7 0D1C07 13/0/0 1C07 divide uniform radix 0E 3B 10 02 13 . * 2 3 0EB023 14/1/1 1023 replace selected bits 1C 38 08 02 0B + H 8 2 11 0C882B 12/1/0 82B convert 1A 16 10 0B 0E 10 6 11 . 0A60BE 10/0/3 BE multiply and add 01 38 08 02 10 1 H 8 2 018820 1/1/0 820 table look up 13 10 10 10 10 3 030000 3/0/0 0 copy (A) to N 10 16 08 13 0E 6 8 3 . 00683E 0/0/3 83E set radix 10 15 08 01 01 5 8 1 1 005811 0/0/2 1811 replace (B) by (N) 02 3B 10 01 1A 2 * 1 10 02B01A 2/1/1 101A transfer (A) to N 16 16 08 13 0E 6 6 8 3 . 06683E 6/0/3 83E select (N) 02 15 08 01 01 2 5 8 1 1 025811 2/0/2 1811 transfer (A) to N 02 3B 10 01 1A 2 * 1 10 02B01A 2/1/1 101A transfer (A) to N 16 6E 00 00 00 6 be 06E000 6/1/3 0 select (N) 01 10 38 08 01 1 H 8 1 010881 1/0/0 881 table look up 1A 0E 16 08 0B 10 . 6 8 11 0AE68B 10/1/3 68B multiply and add 0E 10 15 08 01 . 5 8 1 0E0581 14/0/0 581 replace selected bits 01 02 3B 10 01 1 2 * 1 012B01 1/0/1 B01 prepare for digit collation 0B 13 16 08 0B 11 3 6 8 11 0B368B 11/0/1 168B multiply and subtract 0E 02 15 08 01 . 2 5 8 1 0E2581 14/0/1 581 replace selected bits 01 02 3B 10 01 1 2 * 1 012B01 1/0/1 B01 prepare for digit collation 0B 13 38 08 01 11 3 H 8 1 0B3881 11/0/1 1881 multiply and subtract 0B 07 10 10 10 11 7 0B7000 11/0/3 1000 multiply and subtract 10 10 16 10 10 6 000600 0/0/0 600 Halt 10 04 01 1C 10 4 1 + 0041C0 0/0/2 1C0 replace (B) by (N) 10 02 02 10 13 2 2 3 002203 0/0/1 203 Invalid 1C 1C 2A 0E 01 + + = . 1 0CCAE1 12/1/2 AE1 convert 10 08 16 16 10 8 6 6 008660 0/1/0 660 copy registers 08 01 6E 00 00 8 1 be 081E00 8/0/0 1E00 merge constant length 02 01 0E 01 1C 2 1 . 1 + 021E1C 2/0/0 1E1C transfer (A) to N 10 01 10 3B 16 1 * 6 0010B6 0/0/0 10B6 Halt 02 04 10 01 1C 2 4 1 + 02401C 2/0/2 1C transfer (A) to N 10 02 10 3B 16 2 * 6 0020B6 0/0/1 B6 Invalid 02 16 08 01 1C 2 6 8 1 + 02681C 2/0/3 81C transfer (A) to N 10 01 01 3B 16 1 1 * 6 0011B6 0/0/0 11B6 Halt 02 15 01 38 08 2 5 1 H 8 025188 2/0/2 1188 transfer (A) to N 02 02 15 01 1C 2 2 5 1 + 02251C 2/0/1 51C transfer (A) to N 10 10 07 3B 16 7 * 6 0007B6 0/0/0 7B6 Halt 02 15 01 29 16 2 5 1 I 6 025196 2/0/2 1196 transfer (A) to N 10 10 02 38 08 2 H 8 000288 0/0/0 288 Halt 02 01 0D 38 08 2 1 : H 8 021D88 2/0/0 1D88 transfer (A) to N 01 1A 16 2A 1A 1 10 6 = 10 01A6AA 1/1/1 6AA add literal address 01 10 04 16 1A 1 4 6 10 01046A 1/0/0 46A table look up 13 0E 10 6E 00 3 . be 03E0E0 3/1/3 E0 copy (A) to N 10 02 02 1C 13 2 2 + 3 0022C3 0/0/1 2C3 Invalid 0B 13 0E 10 2A 11 3 . = 0B3E0A 11/0/1 1E0A multiply and subtract 1C 01 10 16 32 + 1 6 B 0C1062 12/0/0 1062 convert 19 10 01 16 32 9 1 6 B 090162 9/0/0 162 multiply uniform radix 08 10 10 02 01 8 2 1 080021 8/0/0 21 merge constant length 1C 10 07 0E 3B + 7 . * 0C07EB 12/0/0 7EB convert 10 02 01 19 29 2 1 9 I 002199 0/0/1 199 Invalid 1C 10 10 10 29 + I 0C0009 12/0/0 9 convert 15 10 10 02 38 5 2 H 050028 5/0/0 28 subtract (N) from (A) 08 02 02 1F 29 8 2 2 £ I 0822F9 8/0/1 2F9 merge constant length 02 10 10 02 38 2 2 H 020028 2/0/0 28 transfer (A) to N 08 02 02 0B 16 8 2 2 11 6 0822B6 8/0/1 2B6 merge constant length 10 10 08 10 01 8 1 000801 0/0/0 801 Halt 1C 10 01 1C 3B + 1 + * 0C01CB 12/0/0 1CB convert 10 02 13 1C 6E 2 3 + be 0023CE 0/0/1 3CE Invalid 10 10 02 13 1A 2 3 10 00023A 0/0/0 23A Halt 01 1C 10 10 01 1 + 1 01C001 1/1/2 1 subtract literal address 3B 02 02 02 0B * 2 2 2 11 1B222B 27/0/1 22B jump A != Z 16 10 01 10 0B 6 1 11 06010B 6/0/0 10B select (N) 02 13 13 0E 01 2 3 3 . 1 0233E1 2/0/1 13E1 transfer (A) to N 38 08 02 01 19 H 8 2 1 9 188219 24/1/0 219 unconditional jump 10 10 10 10 10 000000 0/0/0 0 Halt 16 16 10 08 01 6 6 8 1 066081 6/0/3 81 select (N) 02 10 13 1C 10 2 3 + 0203C0 2/0/0 3C0 transfer (A) to N 16 10 01 01 0D 6 1 1 : 06011D 6/0/0 11D select (N) 38 1C 13 1C 10 H + 3 + 18C3C0 24/1/2 3C0 modify address of next 02 10 10 04 10 2 4 020040 2/0/0 40 transfer (A) to N 16 0B 13 0E 10 6 11 3 . 06B3E0 6/1/1 13E0 select (N) 13 08 13 1C 16 3 8 3 + 6 0383C6 3/1/0 3C6 copy (A) to N 32 01 10 01 08 B 1 1 8 121018 18/0/0 1018 shift logical 6E 00 00 00 00 be 08 01 1C 10 07 8 1 + 7 081C07 8/0/0 1C07 merge constant length 0E 3B 10 02 16 . * 2 6 0EB026 14/1/1 1026 replace selected bits 04 38 08 02 15 4 H 8 2 5 048825 4/1/0 825 add (N) to (A) 0D 16 08 01 10 : 6 8 1 0D6810 13/0/3 810 divide uniform radix 1A 02 0B 13 0E 10 2 11 3 . 0A2B3E 10/0/1 B3E multiply and add 02 2A 10 13 13 2 = 3 3 02A033 2/1/1 33 transfer (A) to N 04 16 08 13 1C 4 6 8 3 + 04683C 4/0/3 83C add (N) to (A) 16 02 0B 13 0E 6 2 11 3 . 062B3E 6/0/1 B3E select (N) 10 38 08 02 02 H 8 2 2 008822 0/1/0 822 copy registers 07 16 10 10 10 7 6 076000 7/0/3 0 augment (N) by (A) 02 01 1A 10 10 2 1 10 021A00 2/0/0 1A00 transfer (A) to N 02 02 10 10 10 2 2 022000 2/0/1 0 transfer (A) to N 15 02 10 10 10 5 2 052000 5/0/1 0 subtract (N) from (A) 04 16 16 10 08 4 6 6 8 046608 4/0/3 608 add (N) to (A) 01 6E 00 00 00 1 be 01E000 1/1/3 0 select literal address 15 16 02 10 13 5 6 2 3 056203 5/0/3 203 subtract (N) from (A) 1C 10 16 0D 13 + 6 : 3 0C06D3 12/0/0 6D3 convert 0E 10 02 08 10 . 2 8 0E0280 14/0/0 280 replace selected bits 19 1A 2A 10 13 9 10 = 3 09AA03 9/1/1 A03 multiply uniform radix 13 04 29 04 10 3 4 I 4 034940 3/0/2 940 copy (A) to N 10 02 38 08 02 2 H 8 2 002882 0/0/1 882 Invalid 15 07 38 08 02 5 7 H 8 2 057882 5/0/3 1882 subtract (N) from (A) 02 07 29 1C 10 2 7 I + 0279C0 2/0/3 19C0 transfer (A) to N 10 10 01 1C 10 1 + 0001C0 0/0/0 1C0 Halt 07 0E 38 1C 13 7 . H + 3 07E8C3 7/1/3 8C3 augment (N) by (A) 1C 1C 32 10 10 + + B 0CC200 12/1/2 200 convert 10 10 04 0B 13 4 11 3 0004B3 0/0/0 4B3 Halt 0E 10 02 0B 13 . 2 11 3 0E02B3 14/0/0 2B3 replace selected bits 0E 10 38 08 02 . H 8 2 0E0882 14/0/0 882 replace selected bits 04 0B 6E 00 00 4 11 be 04BE00 4/1/1 1E00 add (N) to (A) 02 16 04 01 0E 2 6 4 1 . 02641E 2/0/3 41E transfer (A) to N 10 07 0E 02 13 7 . 2 3 007E23 0/0/3 1E23 set radix 13 0E 10 38 08 3 . H 8 03E088 3/1/3 88 copy (A) to N 02 04 0B 10 10 2 4 11 024B00 2/0/2 B00 transfer (A) to N 10 10 10 16 16 6 6 000066 0/0/0 66 Halt 10 08 01 02 10 8 1 2 008120 0/1/0 120 copy registers 13 1C 10 02 08 3 + 2 8 03C028 3/1/2 28 copy (A) to N 10 10 04 16 0D 4 6 : 00046D 0/0/0 46D Halt 13 0D 0E 02 08 3 : . 2 8 03DE28 3/1/2 1E28 copy (A) to N 13 1C 16 16 0D 3 + 6 6 : 03C66D 3/1/2 66D copy (A) to N 04 10 10 02 08 4 2 8 040028 4/0/0 28 add (N) to (A) 13 1C 08 02 0D 3 + 8 2 : 03C82D 3/1/2 82D copy (A) to N 13 0D 0E 16 08 3 : . 6 8 03DE68 3/1/2 1E68 copy (A) to N 01 10 1A 02 0D 1 10 2 : 010A2D 1/0/0 A2D table look up 04 10 10 6E 00 4 be 0400E0 4/0/0 E0 add (N) to (A) 10 02 07 02 16 2 7 2 6 002726 0/0/1 726 Invalid 10 13 1C 10 01 3 + 1 003C01 0/0/1 1C01 Invalid 1C 10 01 08 3B + 1 8 * 0C018B 12/0/0 18B convert 16 02 08 04 38 6 2 8 4 H 062848 6/0/1 848 select (N) 1C 10 10 04 01 + 4 1 0C0041 12/0/0 41 convert 1F 13 0D 0E 04 £ 3 : . 4 0F3DE4 15/0/1 1DE4 collate and add 10 01 10 02 38 1 2 H 001028 0/0/0 1028 Halt 1C 13 1C 10 02 + 3 + 2 0C3C02 12/0/1 1C02 convert 10 10 04 10 2A 4 = 00040A 0/0/0 40A Halt 10 13 13 04 16 3 3 4 6 003346 0/0/1 1346 Invalid 08 13 1C 16 02 8 3 + 6 2 083C62 8/0/1 1C62 merge constant length 0D 13 0D 0E 16 : 3 : . 6 0D3DE6 13/0/1 1DE6 divide uniform radix 08 13 1C 08 02 8 3 + 8 2 083C82 8/0/1 1C82 merge constant length 0D 04 10 10 29 : 4 I 0D4009 13/0/2 9 divide uniform radix 04 10 02 10 6E 4 2 be 04020E 4/0/0 20E add (N) to (A) 10 10 02 08 10 2 8 000280 0/0/0 280 Halt 16 10 10 10 02 6 2 060002 6/0/0 2 select (N) 15 10 10 10 04 5 4 050004 5/0/0 4 subtract (N) from (A) 3B 16 02 02 07 * 6 2 2 7 1B6227 27/0/3 227 jump A < Z 38 08 02 16 0B H 8 2 6 11 18826B 24/1/0 26B unconditional jump 38 1C 10 10 04 H + 4 18C004 24/1/2 4 modify address of next 01 1F 13 0D 0E 1 £ 3 : . 01F3DE 1/1/3 13DE select literal address 3D 10 0B 0E 10 ? 11 . 1D0BE0 29/0/0 BE0 edit for hollerith output 01 0E 0B 0E 10 1 . 11 . 01EBE0 1/1/3 BE0 select literal address 38 08 02 07 07 H 8 2 7 7 188277 24/1/0 277 unconditional jump 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 16 10 01 10 0B 6 1 11 06010B 6/0/0 10B select (N) 02 13 13 0E 01 2 3 3 . 1 0233E1 2/0/1 13E1 transfer (A) to N 2A 1C 01 01 04 = + 1 1 4 1AC114 26/1/2 114 set modification register 6E 00 00 00 00 be 0E 16 16 10 08 . 6 6 8 0E6608 14/0/3 608 replace selected bits 01 02 10 13 1C 1 2 3 + 01203C 1/0/1 3C prepare for digit collation 10 16 0D 13 0E 6 : 3 . 006D3E 0/0/3 D3E set radix 10 02 08 10 19 2 8 9 002809 0/0/1 809 Invalid 1A 2A 10 13 13 10 = 3 3 0AA033 10/1/1 33 multiply and add 04 16 10 10 10 4 6 046000 4/0/3 0 add (N) to (A) 04 15 10 10 10 4 5 045000 4/0/2 1000 add (N) to (A) 02 3B 04 02 02 2 * 4 2 2 02B422 2/1/1 1422 transfer (A) to N 07 29 04 10 10 7 I 4 079400 7/1/0 1400 augment (N) by (A) 02 38 08 02 19 2 H 8 2 9 028829 2/1/0 829 transfer (A) to N 10 16 10 01 10 6 1 006010 0/0/3 10 set radix 0B 02 10 10 19 11 2 9 0B2009 11/0/1 9 multiply and subtract 0B 2A 10 13 13 11 = 3 3 0BA033 11/1/1 33 multiply and subtract 04 01 0E 10 01 4 1 . 1 041E01 4/0/0 1E01 add (N) to (A) 08 6E 00 00 00 8 be 08E000 8/1/3 0 merge variable length 19 1C 07 10 10 9 + 7 09C700 9/1/2 700 multiply uniform radix 10 15 38 08 02 5 H 8 2 005882 0/0/2 1882 replace (B) by (N) 19 10 10 10 10 9 090000 9/0/0 0 multiply uniform radix 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 29 1A 10 I 10 0009A0 0/0/0 9A0 Halt 01 1F 6E 00 00 1 £ be 01FE00 1/1/3 1E00 select literal address 02 1A 1A 38 08 2 10 10 H 8 02AA88 2/1/1 A88 transfer (A) to N 02 1A 0D 02 08 2 10 : 2 8 02AD28 2/1/1 D28 transfer (A) to N 10 19 0B 23 10 9 11 C 009B30 0/1/0 1B30 copy registers 10 13 0E 10 10 3 . 003E00 0/0/1 1E00 Invalid 10 10 0B 29 1C 11 I + 000B9C 0/0/0 B9C Halt 10 10 01 3B 02 1 * 2 0001B2 0/0/0 1B2 Halt 02 1C 1C 29 1C 2 + + I + 02CC9C 2/1/2 C9C transfer (A) to N 10 10 02 3B 02 2 * 2 0002B2 0/0/0 2B2 Halt 02 02 1A 29 1C 2 2 10 I + 022A9C 2/0/1 A9C transfer (A) to N 10 10 04 3B 02 4 * 2 0004B2 0/0/0 4B2 Halt 02 0E 10 29 1C 2 . I + 02E09C 2/1/3 9C transfer (A) to N 10 10 08 3B 02 8 * 2 0008B2 0/0/0 8B2 Halt 02 1F 13 29 1C 2 £ 3 I + 02F39C 2/1/3 139C transfer (A) to N 10 01 10 3B 10 1 * 0010B0 0/0/0 10B0 Halt 01 08 1C 6E 00 1 8 + be 018CE0 1/1/0 CE0 table look up 10 02 0B 08 2A 2 11 8 = 002B8A 0/0/1 B8A Invalid 10 01 01 0E 38 1 1 . H 0011E8 0/0/0 11E8 Halt 08 02 1A 19 29 8 2 10 9 I 082A99 8/0/1 A99 merge constant length 1A 10 10 1F 38 10 £ H 0A00F8 10/0/0 F8 multiply and add 08 02 0B 0E 02 8 2 11 . 2 082BE2 8/0/1 BE2 merge constant length 08 10 19 0B 23 8 9 11 C 0809B3 8/0/0 9B3 merge constant length 10 10 13 0E 10 3 . 0003E0 0/0/0 3E0 Halt 10 10 01 0B 29 1 11 I 0001B9 0/0/0 1B9 Halt 1C 10 01 10 3B + 1 * 0C010B 12/0/0 10B convert 10 02 1A 0E 2A 2 10 . = 002AEA 0/0/1 AEA Invalid 10 01 01 0E 38 1 1 . H 0011E8 0/0/0 11E8 Halt 08 02 0B 1A 10 8 2 11 10 082BA0 8/0/1 BA0 merge constant length 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 6E be 00000E 0/0/0 E Halt 10 10 02 1C 16 2 + 6 0002C6 0/0/0 2C6 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 16 10 10 08 10 6 8 060080 6/0/0 80 select (N) 13 10 13 1C 10 3 3 + 0303C0 3/0/0 3C0 copy (A) to N 01 1C 10 01 10 1 + 1 01C010 1/1/2 10 subtract literal address 3B 16 02 0D 15 * 6 2 : 5 1B62D5 27/0/3 2D5 jump A < Z 16 10 10 08 02 6 8 2 060082 6/0/0 82 select (N) 13 10 13 1C 10 3 3 + 0303C0 3/0/0 3C0 copy (A) to N 01 1C 10 01 10 1 + 1 01C010 1/1/2 10 subtract literal address 3B 04 01 1A 16 * 4 1 10 6 1B41A6 27/0/2 1A6 jump A >= Z 6E 00 00 00 00 be 04 29 08 04 10 4 I 8 4 049840 4/1/0 1840 add (N) to (A) 10 2A 10 13 1A = 3 10 00A03A 0/1/1 3A replace registers 0D 29 1C 04 10 : I + 4 0D9C40 13/1/0 1C40 divide uniform radix 10 29 1A 04 10 I 10 4 009A40 0/1/0 1A40 copy registers 10 3B 10 02 0D * 2 : 00B02D 0/1/1 102D replace registers 10 38 08 01 1A H 8 1 10 00881A 0/1/0 81A copy registers 16 10 10 10 10 6 060000 6/0/0 0 select (N) 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 2A 1A 01 10 = 10 1 00AA10 0/1/1 A10 replace registers 04 16 1A 0B 0E 4 6 10 11 . 046ABE 4/0/3 ABE add (N) to (A) 10 6E 00 00 00 be 00E000 0/1/3 0 Invalid 0E 02 13 0B 13 . 2 3 11 3 0E23B3 14/0/1 3B3 replace selected bits 0E 10 2A 1C 01 . = + 1 0E0AC1 14/0/0 AC1 replace selected bits 10 16 32 19 10 6 B 9 006290 0/0/3 290 set radix 01 16 32 08 10 1 6 B 8 016280 1/0/3 280 interchange area addresses 10 02 3B 10 02 2 * 2 002B02 0/0/1 B02 Invalid 01 19 3B 10 02 1 9 * 2 019B02 1/1/0 1B02 table look up 01 1A 29 1C 10 1 10 I + 01A9C0 1/1/1 9C0 add literal address 10 10 29 15 10 I 5 000950 0/0/0 950 Halt 10 02 38 08 02 2 H 8 2 002882 0/0/1 882 Invalid 0E 15 29 02 10 . 5 I 2 0E5920 14/0/2 1920 replace selected bits 10 02 38 08 02 2 H 8 2 002882 0/0/1 882 Invalid 0E 01 16 10 13 . 1 6 3 0E1603 14/0/0 1603 replace selected bits 1C 10 01 1C 10 + 1 + 0C01C0 12/0/0 1C0 convert 01 1C 3B 10 02 1 + * 2 01CB02 1/1/2 B02 subtract literal address 1F 02 6E 00 00 £ 2 be 0F2E00 15/0/1 E00 collate and add 02 1F 10 01 1C 2 £ 1 + 02F01C 2/1/3 101C transfer (A) to N 10 10 01 3B 02 1 * 2 0001B2 0/0/0 1B2 Halt 02 0E 01 38 08 2 . 1 H 8 02E188 2/1/3 188 transfer (A) to N 02 13 1C 16 10 2 3 + 6 023C60 2/0/1 1C60 transfer (A) to N 01 01 1C 38 1C 1 1 + H + 011C8C 1/0/0 1C8C table look up 10 08 04 02 10 8 4 2 008420 0/1/0 420 copy registers 10 04 10 16 10 4 6 004060 0/0/2 60 replace (B) by (N) 10 08 04 02 10 8 4 2 008420 0/1/0 420 copy registers 13 1C 10 2A 10 3 + = 03C0A0 3/1/2 A0 copy (A) to N 13 08 04 38 08 3 8 4 H 8 038488 3/1/0 488 copy (A) to N 02 0E 10 10 10 2 . 02E000 2/1/3 0 transfer (A) to N 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 16 10 6 000060 0/0/0 60 Halt 13 1C 10 6E 00 3 + be 03C0E0 3/1/2 E0 copy (A) to N 10 02 1F 0E 01 2 £ . 1 002FE1 0/0/1 FE1 Invalid 1C 10 01 10 3B + 1 * 0C010B 12/0/0 10B convert 04 13 04 07 16 4 3 4 7 6 043476 4/0/1 1476 add (N) to (A) 19 13 0E 10 02 9 3 . 2 093E02 9/0/1 1E02 multiply uniform radix 08 13 1C 02 16 8 3 + 2 6 083C26 8/0/1 1C26 merge constant length 19 13 0E 02 02 9 3 . 2 2 093E22 9/0/1 1E22 multiply uniform radix 08 13 1C 04 16 8 3 + 4 6 083C46 8/0/1 1C46 merge constant length 10 10 10 02 01 2 1 000021 0/0/0 21 Halt 1C 10 10 13 3B + 3 * 0C003B 12/0/0 3B convert 04 13 10 19 16 4 3 9 6 043096 4/0/1 1096 add (N) to (A) 08 01 10 1A 02 8 1 10 2 0810A2 8/0/0 10A2 merge constant length 19 13 0E 04 2A 9 3 . 4 = 093E4A 9/0/1 1E4A multiply uniform radix 10 13 1A 0D 02 3 10 : 2 003AD2 0/0/1 1AD2 Invalid 08 10 10 10 16 8 6 080006 8/0/0 6 merge constant length 08 01 01 02 6E 8 1 1 2 be 08112E 8/0/0 112E merge constant length 10 10 13 10 1C 3 + 00030C 0/0/0 30C Halt 13 19 13 0E 10 3 9 3 . 0393E0 3/1/0 13E0 copy (A) to N 02 19 13 0E 02 2 9 3 . 2 0293E2 2/1/0 13E2 transfer (A) to N 2A 10 13 02 10 = 3 2 1A0320 26/0/0 320 enter subroutine 38 1C 13 1C 10 H + 3 + 18C3C0 24/1/2 3C0 modify address of next 23 10 10 10 10 C 130000 19/0/0 0 output 2A 10 13 02 10 = 3 2 1A0320 26/0/0 320 enter subroutine 16 08 13 1C 02 6 8 3 + 2 0683C2 6/1/0 3C2 select (N) 02 19 13 0E 10 2 9 3 . 0293E0 2/1/0 13E0 transfer (A) to N 16 08 13 1C 04 6 8 3 + 4 0683C4 6/1/0 3C4 select (N) 02 19 13 0E 02 2 9 3 . 2 0293E2 2/1/0 13E2 transfer (A) to N 29 02 10 10 01 I 2 1 192001 25/0/1 1 step on and test 38 08 13 13 0D H 8 3 3 : 18833D 24/1/0 33D unconditional jump 38 08 13 01 0B H 8 3 1 11 18831B 24/1/0 31B unconditional jump 02 08 10 19 0B 2 8 9 11 02809B 2/1/0 9B transfer (A) to N 6E 00 00 00 00 be 1A 23 10 10 13 10 C 3 0A3003 10/0/1 1003 multiply and add 0E 10 10 15 15 . 5 5 0E0055 14/0/0 55 replace selected bits 10 29 1C 10 10 I + 009C00 0/1/0 1C00 copy registers 01 3B 10 01 08 1 * 1 8 01B018 1/1/1 1018 add literal address 1C 38 08 13 13 + H 8 3 3 0C8833 12/1/0 833 convert 0D 38 08 13 04 : H 8 3 4 0D8834 13/1/0 834 divide uniform radix 02 10 10 10 10 2 020000 2/0/0 0 transfer (A) to N 10 38 1C 13 1C H + 3 + 008C3C 0/1/0 C3C copy registers 10 2A 08 10 10 = 8 00A800 0/1/1 800 replace registers 10 10 10 10 04 4 000004 0/0/0 4 Halt 01 38 08 13 02 1 H 8 3 2 018832 1/1/0 832 table look up 01 38 08 13 02 1 H 8 3 2 018832 1/1/0 832 table look up 07 38 08 13 02 7 H 8 3 2 078832 7/1/0 832 augment (N) by (A) 07 2A 02 13 02 7 = 2 3 2 07A232 7/1/1 232 augment (N) by (A) 10 6E 00 00 00 be 00E000 0/1/3 0 Invalid 02 08 2A 02 13 2 8 = 2 3 028A23 2/1/0 A23 transfer (A) to N 02 10 10 10 10 2 020000 2/0/0 0 transfer (A) to N 04 01 02 08 10 4 1 2 8 041280 4/0/0 1280 add (N) to (A) 19 0B 23 10 10 9 11 C 09B300 9/1/1 1300 multiply uniform radix 13 0E 10 10 10 3 . 03E000 3/1/3 0 copy (A) to N 13 01 38 08 13 3 1 H 8 3 031883 3/0/0 1883 copy (A) to N 02 02 10 10 10 2 2 022000 2/0/1 0 transfer (A) to N 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 38 1A 01 H 10 1 0008A1 0/0/0 8A1 Halt 01 02 6E 00 00 1 2 be 012E00 1/0/1 E00 prepare for digit collation 13 13 16 2A 1A 3 3 6 = 10 0336AA 3/0/1 16AA copy (A) to N 01 10 0E 38 1C 1 . H + 010E8C 1/0/0 E8C table look up 13 1C 10 2A 08 3 + = 8 03C0A8 3/1/2 A8 copy (A) to N 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 01 38 08 1 H 8 000188 0/0/0 188 Halt 13 13 07 38 08 3 3 7 H 8 033788 3/0/1 1788 copy (A) to N 13 13 0D 38 08 3 3 : H 8 033D88 3/0/1 1D88 copy (A) to N 13 13 0D 38 1C 3 3 : H + 033D8C 3/0/1 1D8C copy (A) to N 13 1C 10 23 10 3 + C 03C030 3/1/2 30 copy (A) to N 10 10 10 38 1C H + 00008C 0/0/0 8C Halt 13 1C 10 2A 08 3 + = 8 03C0A8 3/1/2 A8 copy (A) to N 10 10 10 10 10 000000 0/0/0 0 Halt 10 02 01 38 08 2 1 H 8 002188 0/0/1 188 Invalid 13 13 1F 38 08 3 3 £ H 8 033F88 3/0/1 1F88 copy (A) to N 02 1F 0D 6E 00 2 £ : be 02FDE0 2/1/3 1DE0 transfer (A) to N 10 13 04 04 10 3 4 4 003440 0/0/1 1440 Invalid 10 10 02 13 38 2 3 H 000238 0/0/0 238 Halt 1A 01 10 04 2A 10 1 4 = 0A104A 10/0/0 104A multiply and add 02 13 13 04 10 2 3 3 4 023340 2/0/1 1340 transfer (A) to N 10 10 02 02 29 2 2 I 000229 0/0/0 229 Halt 1C 10 10 01 3B + 1 * 0C001B 12/0/0 1B convert 02 13 13 07 38 2 3 3 7 H 023378 2/0/1 1378 transfer (A) to N 08 13 04 16 02 8 3 4 6 2 083462 8/0/1 1462 merge constant length 08 10 01 02 38 8 1 2 H 080128 8/0/0 128 merge constant length 1A 01 10 04 2A 10 1 4 = 0A104A 10/0/0 104A multiply and add 02 13 13 04 16 2 3 3 4 6 023346 2/0/1 1346 transfer (A) to N 10 13 15 01 02 3 5 1 2 003512 0/0/1 1512 Invalid 08 10 19 0B 23 8 9 11 C 0809B3 8/0/0 9B3 merge constant length 10 10 13 0E 10 3 . 0003E0 0/0/0 3E0 Halt 10 10 10 01 6E 1 be 00001E 0/0/0 1E Halt 10 10 13 15 02 3 5 2 000352 0/0/0 352 Halt 38 08 13 13 1A H 8 3 3 10 18833A 24/1/0 33A unconditional jump 16 10 13 15 16 6 3 5 6 060356 6/0/0 356 select (N) 02 08 10 19 0B 2 8 9 11 02809B 2/1/0 9B transfer (A) to N 23 10 10 13 0E C 3 . 13003E 19/0/0 3E output 10 10 10 10 02 2 000002 0/0/0 2 Halt 38 08 13 04 10 H 8 3 4 188340 24/1/0 340 unconditional jump 16 10 13 15 0B 6 3 5 11 06035B 6/0/0 35B select (N) 02 08 10 19 0B 2 8 9 11 02809B 2/1/0 9B transfer (A) to N 23 10 10 13 0E C 3 . 13003E 19/0/0 3E output 10 10 10 10 13 3 000003 0/0/0 3 Halt 38 08 13 04 10 H 8 3 4 188340 24/1/0 340 unconditional jump 16 10 13 16 10 6 3 6 060360 6/0/0 360 select (N) 02 08 10 19 0B 2 8 9 11 02809B 2/1/0 9B transfer (A) to N 23 10 10 13 0E C 3 . 13003E 19/0/0 3E output 6E 00 00 00 00 be 10 10 10 10 02 2 000002 0/0/0 2 Halt 01 38 08 13 04 1 H 8 3 4 018834 1/1/0 834 table look up 04 16 10 13 16 4 6 3 6 046036 4/0/3 36 add (N) to (A) 15 02 08 10 19 5 2 8 9 052809 5/0/1 809 subtract (N) from (A) 0B 23 10 10 13 11 C 3 0B3003 11/0/1 1003 multiply and subtract 0E 10 10 10 02 . 2 0E0002 14/0/0 2 replace selected bits 13 38 08 13 04 3 H 8 3 4 038834 3/1/0 834 copy (A) to N 1A 16 10 13 16 10 6 3 6 0A6036 10/0/3 36 multiply and add 1A 02 08 10 19 10 2 8 9 0A2809 10/0/1 809 multiply and add 0B 23 10 10 13 11 C 3 0B3003 11/0/1 1003 multiply and subtract 0E 10 10 10 02 . 2 0E0002 14/0/0 2 replace selected bits 02 38 08 13 04 2 H 8 3 4 028834 2/1/0 834 transfer (A) to N 1A 10 10 10 10 10 0A0000 10/0/0 0 multiply and add 10 10 10 10 10 000000 0/0/0 0 Halt 10 6E 00 00 00 be 00E000 0/1/3 0 Invalid 16 0E 10 10 10 6 . 06E000 6/1/3 0 select (N) 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 16 10 13 6 3 000603 0/0/0 603 Halt 1C 10 04 10 13 + 4 3 0C0403 12/0/0 403 convert 1C 10 32 19 10 + B 9 0C0290 12/0/0 290 convert 01 1F 32 10 10 1 £ B 01F200 1/1/3 1200 select literal address 10 01 02 08 10 1 2 8 001280 0/0/0 1280 Halt 19 0B 32 19 10 9 11 B 9 09B290 9/1/1 1290 multiply uniform radix 01 08 0D 10 01 1 8 : 1 018D01 1/1/0 D01 table look up 01 01 07 08 10 1 1 7 8 011780 1/0/0 1780 table look up 19 0B 23 10 10 9 11 C 09B300 9/1/1 1300 multiply uniform radix 13 1F 2A 02 13 3 £ = 2 3 03FA23 3/1/3 1A23 copy (A) to N 07 01 6E 00 00 7 1 be 071E00 7/0/0 1E00 augment (N) by (A) 13 07 1C 10 10 3 7 + 037C00 3/0/3 1C00 copy (A) to N 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 38 1C H + 00008C 0/0/0 8C Halt 13 1C 10 2A 08 3 + = 8 03C0A8 3/1/2 A8 copy (A) to N 10 10 10 10 10 000000 0/0/0 0 Halt 10 01 01 38 08 1 1 H 8 001188 0/0/0 1188 Halt 13 08 15 38 08 3 8 5 H 8 038588 3/1/0 588 copy (A) to N 13 08 0B 6E 00 3 8 11 be 038BE0 3/1/0 BE0 copy (A) to N 10 13 08 1A 38 3 8 10 H 0038A8 0/0/1 18A8 Invalid 08 13 08 0B 38 8 3 8 11 H 0838B8 8/0/1 18B8 merge constant length 1C 13 1C 10 23 + 3 + C 0C3C03 12/0/1 1C03 convert 02 10 10 10 38 2 H 020008 2/0/0 8 transfer (A) to N 1C 13 1C 10 2A + 3 + = 0C3C0A 12/0/1 1C0A convert 08 10 10 10 38 8 H 080008 8/0/0 8 merge constant length 08 13 19 04 38 8 3 9 4 H 083948 8/0/1 1948 merge constant length 08 13 08 0D 38 8 3 8 : H 0838D8 8/0/1 18D8 merge constant length 08 13 19 16 10 8 3 9 6 083960 8/0/1 1960 merge constant length 10 10 13 13 2A 3 3 = 00033A 0/0/0 33A Halt 02 13 08 04 10 2 3 8 4 023840 2/0/1 1840 transfer (A) to N 10 10 13 01 38 3 1 H 000318 0/0/0 318 Halt 08 13 19 07 10 8 3 9 7 083970 8/0/1 1970 merge constant length 10 10 13 02 29 3 2 I 000329 0/0/0 329 Halt 1C 10 10 01 6E + 1 be 0C001E 12/0/0 1E convert 10 10 13 19 08 3 9 8 000398 0/0/0 398 Halt 3B 10 13 19 13 * 3 9 3 1B0393 27/0/0 393 jump A = Z 16 10 13 1C 10 6 3 + 0603C0 6/0/0 3C0 select (N) 01 1C 10 01 10 1 + 1 01C010 1/1/2 10 subtract literal address 3B 04 13 08 15 * 4 3 8 5 1B4385 27/0/2 385 jump A >= Z 2A 10 13 1A 0D = 3 10 : 1A03AD 26/0/0 3AD enter subroutine 38 08 13 08 15 H 8 3 8 5 188385 24/1/0 385 unconditional jump 02 08 10 19 0B 2 8 9 11 02809B 2/1/0 9B transfer (A) to N 10 10 10 04 01 4 1 000041 0/0/0 41 Halt 38 08 13 1A 15 H 8 3 10 5 1883A5 24/1/0 3A5 unconditional jump 16 10 13 1A 13 6 3 10 3 0603A3 6/0/0 3A3 select (N) 02 08 10 19 0B 2 8 9 11 02809B 2/1/0 9B transfer (A) to N 10 10 10 04 13 4 3 000043 0/0/0 43 Halt 38 08 13 19 04 H 8 3 9 4 188394 24/1/0 394 unconditional jump 16 10 13 1A 07 6 3 10 7 0603A7 6/0/0 3A7 select (N) 6E 00 00 00 00 be 16 02 08 10 19 6 2 8 9 062809 6/0/1 809 select (N) 0B 10 10 10 04 11 4 0B0004 11/0/0 4 multiply and subtract 02 29 1C 10 10 2 I + 029C00 2/1/0 1C00 transfer (A) to N 01 3B 02 13 08 1 * 2 3 8 01B238 1/1/1 1238 add literal address 16 38 08 13 19 6 H 8 3 9 068839 6/1/0 839 select (N) 04 10 10 10 10 4 040000 4/0/0 0 add (N) to (A) 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 2A 1C 01 01 = + 1 1 00AC11 0/1/1 C11 replace registers 16 29 04 10 10 6 I 4 069400 6/1/0 1400 select (N) 02 38 08 13 1A 2 H 8 3 10 02883A 2/1/0 83A transfer (A) to N 1F 38 1C 13 1C £ H + 3 + 0F8C3C 15/1/0 C3C collate and add 10 23 08 10 10 C 8 003800 0/0/1 1800 Invalid 10 38 1C 13 1C H + 3 + 008C3C 0/1/0 C3C copy registers 10 6E 00 00 00 be 00E000 0/1/3 0 Invalid 0B 04 23 08 10 11 4 C 8 0B4380 11/0/2 380 multiply and subtract 10 10 2A 1C 01 = + 1 000AC1 0/0/0 AC1 Halt 01 16 29 04 10 1 6 I 4 016940 1/0/3 940 interchange area addresses 10 02 38 08 13 2 H 8 3 002883 0/0/1 883 Invalid 0B 16 2A 10 13 11 6 = 3 0B6A03 11/0/3 A03 multiply and subtract 02 10 38 1C 13 2 H + 3 0208C3 2/0/0 8C3 transfer (A) to N 1C 10 23 0E 10 + C . 0C03E0 12/0/0 3E0 convert 10 10 2A 02 13 = 2 3 000A23 0/0/0 A23 Halt 1A 0D 10 10 10 10 : 0AD000 10/1/2 1000 multiply and add 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 0E 01 13 . 1 3 000E13 0/0/0 E13 Halt 0D 0E 10 10 10 : . 0DE000 13/1/3 0 divide uniform radix 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 6E 00 00 be 000E00 0/0/0 E00 Halt 13 1C 02 10 10 3 + 2 03C200 3/1/2 200 copy (A) to N 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 13 0D 10 10 3 : 003D00 0/0/1 1D00 Invalid 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 6E be 00000E 0/0/0 E Halt 6E 00 00 00 00 be 01 03 07 00 00 1 3 7 013700 1/0/1 1700 prepare for digit collation File: old-paper-tapes/U7notsta.leo 10 10 02 10 10 2 000200 0/0/0 200 Halt 10 10 02 10 10 2 000200 0/0/0 200 Halt 10 10 02 07 16 2 7 6 000276 0/0/0 276 Halt 10 10 02 10 10 2 000200 0/0/0 200 Halt 10 10 1A 04 08 10 4 8 000A48 0/0/0 A48 Halt 10 10 02 02 08 2 2 8 000228 0/0/0 228 Halt 10 10 10 10 0E . 00000E 0/0/0 E Halt 10 10 10 10 07 7 000007 0/0/0 7 Halt 10 10 10 10 01 1 000001 0/0/0 1 Halt 10 10 10 10 01 1 000001 0/0/0 1 Halt 10 16 1C 16 01 6 + 6 1 006C61 0/0/3 C61 set radix 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 07 0D 10 7 : 0007D0 0/0/0 7D0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 1A 10 00000A 0/0/0 A Halt 6E 00 00 00 00 be 10 10 02 10 04 2 4 000204 0/0/0 204 Halt 0E 10 02 07 08 . 2 7 8 0E0278 14/0/0 278 replace selected bits 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 1F 1F £ £ 0000FF 0/0/0 FF Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 1F 1F 10 10 £ £ 00FF00 0/1/3 1F00 Invalid 10 10 10 10 10 000000 0/0/0 0 Halt 1F 10 10 10 10 £ 0F0000 15/0/0 0 collate and add 10 10 10 10 1F £ 00000F 0/0/0 F Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 1F 1F 10 £ £ 000FF0 0/0/0 FF0 Halt 6E 00 00 00 00 be 10 10 02 01 02 2 1 2 000212 0/0/0 212 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 1F 1F 10 10 10 £ £ 0FF000 15/1/3 1000 collate and add 10 10 10 07 0E 7 . 00007E 0/0/0 7E Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 07 0E 10 10 7 . 007E00 0/0/3 1E00 set radix 10 10 10 10 10 000000 0/0/0 0 Halt 0E 10 10 10 10 . 0E0000 14/0/0 0 replace selected bits 10 10 10 10 07 7 000007 0/0/0 7 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 07 0E 10 7 . 0007E0 0/0/0 7E0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 07 0E 10 10 10 7 . 07E000 7/1/3 0 augment (N) by (A) 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 6E 00 00 00 00 be 10 10 02 02 10 2 2 000220 0/0/0 220 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 01 1F 1F 1F 1 £ £ £ 001FFF 0/0/0 1FFF Halt 16 10 02 10 04 6 2 4 060204 6/0/0 204 select (N) 38 1C 10 08 10 H + 8 18C080 24/1/2 80 modify address of next 02 10 10 04 10 2 4 020040 2/0/0 40 transfer (A) to N 38 08 02 04 15 H 8 2 4 5 188245 24/1/0 245 unconditional jump 10 10 10 10 10 000000 0/0/0 0 Halt 6E 00 00 00 00 be 10 10 02 02 0E 2 2 . 00022E 0/0/0 22E Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 2A 10 02 15 10 = 2 5 1A0250 26/0/0 250 enter subroutine 2A 1A 02 10 10 = 10 2 1AA200 26/1/1 200 set modification register 2A 1C 02 10 02 = + 2 2 1AC202 26/1/2 202 set modification register 01 0E 10 10 10 1 . 01E000 1/1/3 0 select literal address 38 1C 10 10 02 H + 2 18C002 24/1/2 2 modify address of next 10 1C 02 07 08 + 2 7 8 00C278 0/1/2 278 replace (B) by (N) 1F 1C 02 10 1A £ + 2 10 0FC20A 15/1/2 20A collate and add 15 1C 02 01 04 5 + 2 1 4 05C214 5/1/2 214 subtract (N) from (A) 3B 10 02 04 08 * 2 4 8 1B0248 27/0/0 248 jump A = Z 29 04 10 10 02 I 4 2 194002 25/0/2 2 step on and test 6E 00 00 00 00 be 10 10 02 13 1C 2 3 + 00023C 0/0/0 23C Halt 38 08 02 13 15 H 8 2 3 5 188235 24/1/0 235 unconditional jump 2A 10 02 16 04 = 2 6 4 1A0264 26/0/0 264 enter subroutine 10 10 10 10 10 000000 0/0/0 0 Halt 38 08 02 04 01 H 8 2 4 1 188241 24/1/0 241 unconditional jump 38 08 02 04 15 H 8 2 4 5 188245 24/1/0 245 unconditional jump 29 02 10 10 02 I 2 2 192002 25/0/1 2 step on and test 38 08 02 13 04 H 8 2 3 4 188234 24/1/0 234 unconditional jump 10 10 10 10 1F £ 00000F 0/0/0 F Halt 38 08 02 13 02 H 8 2 3 2 188232 24/1/0 232 unconditional jump 16 10 02 13 1F 6 2 3 £ 06023F 6/0/0 23F select (N) 02 10 02 13 0E 2 2 3 . 02023E 2/0/0 23E transfer (A) to N 38 08 02 13 02 H 8 2 3 2 188232 24/1/0 232 unconditional jump 16 10 02 04 10 6 2 4 060240 6/0/0 240 select (N) 02 10 02 13 0E 2 2 3 . 02023E 2/0/0 23E transfer (A) to N 6E 00 00 00 00 be 10 10 02 04 1A 2 4 10 00024A 0/0/0 24A Halt 38 08 02 13 0D H 8 2 3 : 18823D 24/1/0 23D unconditional jump 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 2A 10 02 15 16 = 2 5 6 1A0256 26/0/0 256 enter subroutine 38 1C 10 08 10 H + 8 18C080 24/1/2 80 modify address of next 23 02 10 10 10 C 2 132000 19/0/1 0 input one block/reset timer 2A 10 02 15 16 = 2 5 6 1A0256 26/0/0 256 enter subroutine 2A 02 02 15 10 = 2 2 5 1A2250 26/0/1 250 leave subroutine 10 10 10 10 10 000000 0/0/0 0 Halt 38 1C 10 08 10 H + 8 18C080 24/1/2 80 modify address of next 6E 00 00 00 00 be 15 08 2A 08 10 5 8 = 8 058A80 5/1/0 A80 subtract (N) from (A) 10 10 10 10 10 000000 0/0/0 0 Halt 10 01 38 08 02 1 H 8 2 001882 0/0/0 1882 Halt 15 07 38 08 02 5 7 H 8 2 057882 5/0/3 1882 subtract (N) from (A) 15 0E 10 10 10 5 . 05E000 5/1/3 0 subtract (N) from (A) 10 13 38 08 02 3 H 8 2 003882 0/0/1 1882 Invalid 15 1F 10 10 10 5 £ 05F000 5/1/3 1000 subtract (N) from (A) 10 02 2A 02 02 2 = 2 2 002A22 0/0/1 A22 Invalid 15 16 10 10 10 5 6 056000 5/0/3 0 subtract (N) from (A) 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 2A 10 02 = 2 000A02 0/0/0 A02 Halt 16 1C 6E 00 00 6 + be 06CE00 6/1/2 E00 select (N) 02 16 16 16 1A 2 6 6 6 10 02666A 2/0/3 66A transfer (A) to N 02 07 08 02 08 2 7 8 2 8 027828 2/0/3 1828 transfer (A) to N 10 19 1A 38 1C 9 10 H + 009A8C 0/1/0 1A8C copy registers 10 08 01 23 10 8 1 C 008130 0/1/0 130 copy registers 10 10 10 2A 10 = 0000A0 0/0/0 A0 Halt 02 16 1C 2A 02 2 6 + = 2 026CA2 2/0/3 CA2 transfer (A) to N 02 16 04 10 10 2 6 4 026400 2/0/3 400 transfer (A) to N 10 10 10 38 1C H + 00008C 0/0/0 8C Halt 10 08 01 2A 08 8 1 = 8 0081A8 0/1/0 1A8 copy registers 10 10 10 10 10 000000 0/0/0 0 Halt 10 01 01 38 08 1 1 H 8 001188 0/0/0 1188 Halt 02 16 0D 38 08 2 6 : H 8 026D88 2/0/3 D88 transfer (A) to N 02 07 04 10 10 2 7 4 027400 2/0/3 1400 transfer (A) to N 10 01 13 38 08 1 3 H 8 001388 0/0/0 1388 Halt 02 07 15 6E 00 2 7 5 be 0275E0 2/0/3 15E0 transfer (A) to N 10 02 07 04 10 2 7 4 002740 0/0/1 740 Invalid 10 10 01 02 2A 1 2 = 00012A 0/0/0 12A Halt 02 02 16 1C 10 2 2 6 + 0226C0 2/0/1 6C0 transfer (A) to N 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 6E be 00000E 0/0/0 E Halt 6E 00 00 00 00 be 70 00 00 00 00 0 000000 0/0/0 0 Halt File: old-paper-tapes/U7start.leo 58 10 32 10 10 Q B 080200 8/0/0 200 merge constant length 70 10 13 10 10 0 3 000300 0/0/0 300 Halt 38 08 10 04 13 H 8 4 3 188043 24/1/0 43 unconditional jump 10 08 10 10 10 8 008000 0/1/0 0 copy registers 38 1C 10 08 10 H + 8 18C080 24/1/2 80 modify address of next 01 16 1F 08 10 1 6 £ 8 016F80 1/0/3 F80 interchange area addresses 29 0E 08 10 10 I . 8 19E800 25/1/3 800 conditional Halt 38 1C 10 08 10 H + 8 18C080 24/1/2 80 modify address of next 23 02 10 10 10 C 2 132000 19/0/1 0 input one block/reset timer 38 1C 10 08 10 H + 8 18C080 24/1/2 80 modify address of next 2A 08 10 10 10 = 8 1A8000 26/1/0 0 test route N1 10 10 10 02 01 2 1 000021 0/0/0 21 Halt 38 19 1F 1C 0B H 9 £ + 11 189FCB 24/1/0 1FCB unconditional jump 10 10 10 02 13 2 3 000023 0/0/0 23 Halt 10 10 10 01 1C 1 + 00001C 0/0/0 1C Halt 38 0D 1F 0D 1F H : £ : £ 18DFDF 24/1/2 1FDF modify address of next 16 19 1F 0E 13 6 9 £ . 3 069FE3 6/1/0 1FE3 select (N) 38 0D 1F 0D 0E H : £ : . 18DFDE 24/1/2 1FDE modify address of next 02 10 10 10 10 2 020000 2/0/0 0 transfer (A) to N 16 19 1F 0D 1C 6 9 £ : + 069FDC 6/1/0 1FDC select (N) 07 19 1F 0D 0E 7 9 £ : . 079FDE 7/1/0 1FDE augment (N) by (A) 16 01 1F 0D 1F 6 1 £ : £ 061FDF 6/0/0 1FDF select (N) 15 01 1F 0D 10 5 1 £ : 051FD0 5/0/0 1FD0 subtract (N) from (A) 3B 13 1F 0D 01 * 3 £ : 1 1B3FD1 27/0/1 1FD1 jump A != Z 02 01 1F 0D 1F 2 1 £ : £ 021FDF 2/0/0 1FDF transfer (A) to N 38 19 1F 1C 08 H 9 £ + 8 189FC8 24/1/0 1FC8 unconditional jump 10 10 10 10 01 1 000001 0/0/0 1 Halt 10 10 10 10 02 2 000002 0/0/0 2 Halt 10 01 0E 0B 16 1 . 11 6 001EB6 0/0/0 1EB6 Halt 10 10 10 01 04 1 4 000014 0/0/0 14 Halt 70 10 75 10 7C 0 V , 00050C 0/0/0 50C Halt 70 10 67 10 02 0 X 2 000702 0/0/0 702 Halt 58 10 07 10 13 Q 7 3 080703 8/0/0 703 merge constant length 70 10 04 10 7A 0 4 ( 00040A 0/0/0 40A Halt 70 10 13 10 5E 0 3 hf 00030E 0/0/0 30E Halt 70 10 04 10 51 0 4 J 000401 0/0/0 401 Halt 40 10 32 10 04 & B 4 000204 0/0/0 204 Halt 70 10 16 10 61 0 6 / 000601 0/0/0 601 Halt 58 10 67 10 54 Q X M 080704 8/0/0 704 merge constant length 70 10 67 10 02 0 X 2 000702 0/0/0 702 Halt 70 10 67 10 58 0 X Q 000708 0/0/0 708 Halt 70 10 76 10 02 0 W 2 000602 0/0/0 602 Halt 70 10 75 10 73 0 V T 000503 0/0/0 503 Halt 70 10 62 10 13 0 S 3 000203 0/0/0 203 Halt 08 10 16 10 58 8 6 Q 080608 8/0/0 608 merge constant length 08 10 13 10 4A 8 3 # 08030A 8/0/0 30A merge constant length 08 10 13 10 43 8 3 L 080303 8/0/0 303 merge constant length 58 10 13 10 51 Q 3 J 080301 8/0/0 301 merge constant length 10 10 62 10 7C S , 00020C 0/0/0 20C Halt 10 10 02 10 7A 2 ( 00020A 0/0/0 20A Halt 70 10 62 10 6D 0 S ; 00020D 0/0/0 20D Halt 40 10 26 10 6D & F ; 00060D 0/0/0 60D Halt 40 10 46 10 75 & O V 000605 0/0/0 605 Halt 40 10 62 10 10 & S 000200 0/0/0 200 Halt 58 10 52 10 10 Q K 080200 8/0/0 200 merge constant length 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 40 10 10 & 000000 0/0/0 0 Halt 40 10 40 10 10 & & 000000 0/0/0 0 Halt 16 08 10 10 19 6 8 9 068009 6/1/0 9 select (N) 02 01 1F 1C 16 2 1 £ + 6 021FC6 2/0/0 1FC6 transfer (A) to N 10 01 1F 0E 10 1 £ . 001FE0 0/0/0 1FE0 Halt 38 19 1F 1C 16 H 9 £ + 6 189FC6 24/1/0 1FC6 unconditional jump 10 10 20 10 10 - 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 1F 10 29 £ I 000F09 0/0/0 F09 Halt 6E 00 00 00 00 be 10 01 0E 0B 16 1 . 11 6 001EB6 0/0/0 1EB6 Halt 10 01 0E 0B 16 1 . 11 6 001EB6 0/0/0 1EB6 Halt 10 01 1F 0D 10 1 £ : 001FD0 0/0/0 1FD0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 01 0E 0B 16 1 . 11 6 001EB6 0/0/0 1EB6 Halt 10 10 10 10 1F £ 00000F 0/0/0 F Halt 10 10 10 10 01 1 000001 0/0/0 1 Halt 10 10 10 10 01 1 000001 0/0/0 1 Halt 10 10 10 10 13 3 000003 0/0/0 3 Halt 01 04 0B 16 01 1 4 11 6 1 014B61 1/0/2 B61 round off 16 01 1F 19 04 6 1 £ 9 4 061F94 6/0/0 1F94 select (N) 02 10 10 08 01 2 8 1 020081 2/0/0 81 transfer (A) to N 01 1A 10 10 10 1 10 01A000 1/1/1 0 add literal address 16 01 1F 01 0E 6 1 £ 1 . 061F1E 6/0/0 1F1E select (N) 6E 00 00 00 00 be 10 01 0E 0B 1A 1 . 11 10 001EBA 0/0/0 1EBA Halt 02 01 1F 01 0D 2 1 £ 1 : 021F1D 2/0/0 1F1D transfer (A) to N 29 0E 10 01 10 I . 1 19E010 25/1/3 10 conditional Halt 29 1C 10 01 10 I + 1 19C010 25/1/2 10 interrogate indicators 3B 01 0E 0D 13 * 1 . : 3 1B1ED3 27/0/0 1ED3 jump A = Z 16 08 10 08 10 6 8 8 068080 6/1/0 80 select (N) 02 19 1F 0B 16 2 9 £ 11 6 029FB6 2/1/0 1FB6 transfer (A) to N 2A 0B 1F 1A 08 = 11 £ 10 8 1ABFA8 26/1/1 1FA8 set modification register 37 1A 10 10 10 G 10 17A000 23/1/1 0 copy into tag 29 02 10 10 02 I 2 2 192002 25/0/1 2 step on and test 38 19 0E 1C 01 H 9 . + 1 189EC1 24/1/0 1EC1 unconditional jump 2A 0B 1F 19 16 = 11 £ 9 6 1ABF96 26/1/1 1F96 set modification register 02 1A 10 10 10 2 10 02A000 2/1/1 0 transfer (A) to N 29 02 10 10 02 I 2 2 192002 25/0/1 2 step on and test 38 19 0E 1C 15 H 9 . + 5 189EC5 24/1/0 1EC5 unconditional jump 6E 00 00 00 00 be 10 01 0E 1C 08 1 . + 8 001EC8 0/0/0 1EC8 Halt 2A 0B 1F 19 08 = 11 £ 9 8 1ABF98 26/1/1 1F98 set modification register 02 1A 10 10 10 2 10 02A000 2/1/1 0 transfer (A) to N 29 02 10 10 02 I 2 2 192002 25/0/1 2 step on and test 38 19 0E 1C 19 H 9 . + 9 189EC9 24/1/0 1EC9 unconditional jump 2A 0B 1F 19 1A = 11 £ 9 10 1ABF9A 26/1/1 1F9A set modification register 16 01 1F 19 15 6 1 £ 9 5 061F95 6/0/0 1F95 select (N) 37 1A 10 10 10 G 10 17A000 23/1/1 0 copy into tag 29 02 10 10 02 I 2 2 192002 25/0/1 2 step on and test 38 19 0E 1C 0E H 9 . + . 189ECE 24/1/0 1ECE unconditional jump 16 19 1F 0B 16 6 9 £ 11 6 069FB6 6/1/0 1FB6 select (N) 02 08 10 08 10 2 8 8 028080 2/1/0 80 transfer (A) to N 02 10 10 10 19 2 9 020009 2/0/0 9 transfer (A) to N 02 10 10 01 01 2 1 1 020011 2/0/0 11 transfer (A) to N 02 10 10 01 19 2 1 9 020019 2/0/0 19 transfer (A) to N 6E 00 00 00 00 be 10 01 0E 0D 16 1 . : 6 001ED6 0/0/0 1ED6 Halt 38 19 0E 0D 0E H 9 . : . 189EDE 24/1/0 1EDE unconditional jump 29 0B 1F 1F 1F I 11 £ £ £ 19BFFF 25/1/1 1FFF clear indicators 16 01 1F 0B 13 6 1 £ 11 3 061FB3 6/0/0 1FB3 select (N) 3B 01 0E 0B 08 * 1 . 11 8 1B1EB8 27/0/0 1EB8 jump A = Z 02 01 1F 0B 1A 2 1 £ 11 10 021FBA 2/0/0 1FBA transfer (A) to N 38 19 1C 04 16 H 9 + 4 6 189C46 24/1/0 1C46 unconditional jump 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 29 1C 10 10 01 I + 1 19C001 25/1/2 1 interrogate indicators 02 01 1F 0B 10 2 1 £ 11 021FB0 2/0/0 1FB0 transfer (A) to N 29 1C 10 10 02 I + 2 19C002 25/1/2 2 interrogate indicators 02 01 1F 0B 01 2 1 £ 11 1 021FB1 2/0/0 1FB1 transfer (A) to N 29 1C 10 10 04 I + 4 19C004 25/1/2 4 interrogate indicators 02 01 1F 0B 02 2 1 £ 11 2 021FB2 2/0/0 1FB2 transfer (A) to N 6E 00 00 00 00 be 10 01 0E 0E 04 1 . . 4 001EE4 0/0/0 1EE4 Halt 29 1C 10 10 08 I + 8 19C008 25/1/2 8 interrogate indicators 02 01 1F 0B 13 2 1 £ 11 3 021FB3 2/0/0 1FB3 transfer (A) to N 38 19 0E 0E 08 H 9 . . 8 189EE8 24/1/0 1EE8 unconditional jump 10 10 10 10 10 000000 0/0/0 0 Halt 38 0D 1F 0B 10 H : £ 11 18DFB0 24/1/2 1FB0 modify address of next 16 01 1F 15 15 6 1 £ 5 5 061F55 6/0/0 1F55 select (N) 02 01 1F 15 04 2 1 £ 5 4 021F54 2/0/0 1F54 transfer (A) to N 38 0D 1F 0B 10 H : £ 11 18DFB0 24/1/2 1FB0 modify address of next 16 01 1F 08 16 6 1 £ 8 6 061F86 6/0/0 1F86 select (N) 02 01 1F 08 15 2 1 £ 8 5 021F85 2/0/0 1F85 transfer (A) to N 16 01 1F 19 1C 6 1 £ 9 + 061F9C 6/0/0 1F9C select (N) 38 1C 10 08 10 H + 8 18C080 24/1/2 80 modify address of next 02 10 10 04 10 2 4 020040 2/0/0 40 transfer (A) to N 16 01 1F 19 0D 6 1 £ 9 : 061F9D 6/0/0 1F9D select (N) 6E 00 00 00 00 be 10 01 0E 1F 02 1 . £ 2 001EF2 0/0/0 1EF2 Halt 02 10 10 16 07 2 6 7 020067 2/0/0 67 transfer (A) to N 38 1C 10 08 10 H + 8 18C080 24/1/2 80 modify address of next 2A 08 10 10 10 = 8 1A8000 26/1/0 0 test route N1 38 19 1F 10 01 H 9 £ 1 189F01 24/1/0 1F01 unconditional jump 38 19 1F 10 13 H 9 £ 3 189F03 24/1/0 1F03 unconditional jump 38 19 0E 1F 19 H 9 . £ 9 189EF9 24/1/0 1EF9 unconditional jump 10 10 10 10 07 7 000007 0/0/0 7 Halt 02 01 1F 0B 1A 2 1 £ 11 10 021FBA 2/0/0 1FBA transfer (A) to N 38 1C 10 16 07 H + 6 7 18C067 24/1/2 67 modify address of next 02 08 10 01 0E 2 8 1 . 02801E 2/1/0 1E transfer (A) to N 38 1C 10 08 10 H + 8 18C080 24/1/2 80 modify address of next 01 16 19 1C 10 1 6 9 + 0169C0 1/0/3 9C0 interchange area addresses 38 1C 10 08 10 H + 8 18C080 24/1/2 80 modify address of next 23 02 10 10 10 C 2 132000 19/0/1 0 input one block/reset timer 6E 00 00 00 00 be 10 01 1F 10 10 1 £ 001F00 0/0/0 1F00 Halt 38 19 1F 10 15 H 9 £ 5 189F05 24/1/0 1F05 unconditional jump 10 10 10 10 13 3 000003 0/0/0 3 Halt 38 19 0E 1F 13 H 9 . £ 3 189EF3 24/1/0 1EF3 unconditional jump 01 1A 10 10 10 1 10 01A000 1/1/1 0 add literal address 38 19 0E 1F 13 H 9 . £ 3 189EF3 24/1/0 1EF3 unconditional jump 38 1C 10 08 10 H + 8 18C080 24/1/2 80 modify address of next 2A 08 10 10 10 = 8 1A8000 26/1/0 0 test route N1 10 10 10 10 19 9 000009 0/0/0 9 Halt 38 19 1F 10 15 H 9 £ 5 189F05 24/1/0 1F05 unconditional jump 38 19 1F 01 04 H 9 £ 1 4 189F14 24/1/0 1F14 unconditional jump 38 19 0E 1F 13 H 9 . £ 3 189EF3 24/1/0 1EF3 unconditional jump 02 01 1F 0B 1A 2 1 £ 11 10 021FBA 2/0/0 1FBA transfer (A) to N 38 1C 10 16 07 H + 6 7 18C067 24/1/2 67 modify address of next 02 08 10 01 0E 2 8 1 . 02801E 2/1/0 1E transfer (A) to N 6E 00 00 00 00 be 10 01 1F 10 0E 1 £ . 001F0E 0/0/0 1F0E Halt 38 1C 10 08 10 H + 8 18C080 24/1/2 80 modify address of next 01 16 19 1C 10 1 6 9 + 0169C0 1/0/3 9C0 interchange area addresses 29 0E 08 10 10 I . 8 19E800 25/1/3 800 conditional Halt 38 1C 10 08 10 H + 8 18C080 24/1/2 80 modify address of next 23 02 10 10 10 C 2 132000 19/0/1 0 input one block/reset timer 38 19 1F 01 16 H 9 £ 1 6 189F16 24/1/0 1F16 unconditional jump 10 10 10 10 0B 11 00000B 0/0/0 B Halt 38 19 0E 1F 04 H 9 . £ 4 189EF4 24/1/0 1EF4 unconditional jump 10 15 1F 1A 16 5 £ 10 6 005FA6 0/0/2 1FA6 replace (B) by (N) 1F 10 10 16 07 £ 6 7 0F0067 15/0/0 67 collate and add 13 01 1F 0B 08 3 1 £ 11 8 031FB8 3/0/0 1FB8 copy (A) to N 04 01 1F 1A 13 4 1 £ 10 3 041FA3 4/0/0 1FA3 add (N) to (A) 02 01 1F 0B 19 2 1 £ 11 9 021FB9 2/0/0 1FB9 transfer (A) to N 16 01 1F 1A 02 6 1 £ 10 2 061FA2 6/0/0 1FA2 select (N) 6E 00 00 00 00 be 10 01 1F 01 1C 1 £ 1 + 001F1C 0/0/0 1F1C Halt 02 01 1F 0B 04 2 1 £ 11 4 021FB4 2/0/0 1FB4 transfer (A) to N 10 10 10 10 10 000000 0/0/0 0 Halt 38 19 1F 02 01 H 9 £ 2 1 189F21 24/1/0 1F21 unconditional jump 38 19 1F 13 1A H 9 £ 3 10 189F3A 24/1/0 1F3A unconditional jump 38 19 1C 04 1A H 9 + 4 10 189C4A 24/1/0 1C4A unconditional jump 16 01 1F 1A 10 6 1 £ 10 061FA0 6/0/0 1FA0 select (N) 07 01 1F 0B 08 7 1 £ 11 8 071FB8 7/0/0 1FB8 augment (N) by (A) 38 1C 10 16 07 H + 6 7 18C067 24/1/2 67 modify address of next 16 08 10 10 13 6 8 3 068003 6/1/0 3 select (N) 15 01 1F 1A 02 5 1 £ 10 2 051FA2 5/0/0 1FA2 subtract (N) from (A) 02 01 1F 1A 1C 2 1 £ 10 + 021FAC 2/0/0 1FAC transfer (A) to N 38 1C 10 16 07 H + 6 7 18C067 24/1/2 67 modify address of next 16 08 10 10 15 6 8 5 068005 6/1/0 5 select (N) 02 01 1F 1A 0D 2 1 £ 10 : 021FAD 2/0/0 1FAD transfer (A) to N 6E 00 00 00 00 be 10 01 1F 02 1A 1 £ 2 10 001F2A 0/0/0 1F2A Halt 38 1C 10 16 07 H + 6 7 18C067 24/1/2 67 modify address of next 16 08 10 10 0B 6 8 11 06800B 6/1/0 B select (N) 02 01 1F 1A 0E 2 1 £ 10 . 021FAE 2/0/0 1FAE transfer (A) to N 38 1C 10 16 07 H + 6 7 18C067 24/1/2 67 modify address of next 16 08 10 10 0D 6 8 : 06800D 6/1/0 D select (N) 02 01 1F 1A 1F 2 1 £ 10 £ 021FAF 2/0/0 1FAF transfer (A) to N 10 15 1F 1A 1C 5 £ 10 + 005FAC 0/0/2 1FAC replace (B) by (N) 1F 01 1F 1A 02 £ 1 £ 10 2 0F1FA2 15/0/0 1FA2 collate and add 02 01 1F 0B 15 2 1 £ 11 5 021FB5 2/0/0 1FB5 transfer (A) to N 38 1C 10 16 07 H + 6 7 18C067 24/1/2 67 modify address of next 16 08 10 10 07 6 8 7 068007 6/1/0 7 select (N) 02 01 1F 0B 1C 2 1 £ 11 + 021FBC 2/0/0 1FBC transfer (A) to N 38 1C 10 16 07 H + 6 7 18C067 24/1/2 67 modify address of next 16 08 10 10 19 6 8 9 068009 6/1/0 9 select (N) 6E 00 00 00 00 be 10 01 1F 13 08 1 £ 3 8 001F38 0/0/0 1F38 Halt 04 01 1F 1A 01 4 1 £ 10 1 041FA1 4/0/0 1FA1 add (N) to (A) 02 01 1F 0B 0D 2 1 £ 11 : 021FBD 2/0/0 1FBD transfer (A) to N 16 19 1F 1A 04 6 9 £ 10 4 069FA4 6/1/0 1FA4 select (N) 38 1C 10 16 07 H + 6 7 18C067 24/1/2 67 modify address of next 15 08 10 01 0E 5 8 1 . 05801E 5/1/0 1E subtract (N) from (A) 3B 01 1F 04 10 * 1 £ 4 1B1F40 27/0/0 1F40 jump A = Z 10 10 10 10 0D : 00000D 0/0/0 D Halt 38 19 0E 1F 13 H 9 . £ 3 189EF3 24/1/0 1EF3 unconditional jump 38 1C 10 16 07 H + 6 7 18C067 24/1/2 67 modify address of next 16 08 10 10 01 6 8 1 068001 6/1/0 1 select (N) 15 01 1F 1A 02 5 1 £ 10 2 051FA2 5/0/0 1FA2 subtract (N) from (A) 15 01 1F 1A 1C 5 1 £ 10 + 051FAC 5/0/0 1FAC subtract (N) from (A) 3B 01 1F 04 07 * 1 £ 4 7 1B1F47 27/0/0 1F47 jump A = Z 10 10 10 10 1F £ 00000F 0/0/0 F Halt 6E 00 00 00 00 be 16 38 19 0E 1F 6 H 9 . £ 0689EF 6/1/0 9EF select (N) 13 38 0D 1F 0B 3 H : £ 11 038DFB 3/1/0 DFB copy (A) to N 08 16 08 10 10 8 6 8 086800 8/0/3 800 merge constant length 02 15 19 1F 19 2 5 9 £ 9 0259F9 2/0/2 19F9 transfer (A) to N 0E 3B 13 1F 15 . * 3 £ 5 0EB3F5 14/1/1 13F5 replace selected bits 08 02 01 1F 0B 8 2 1 £ 11 0821FB 8/0/1 1FB merge constant length 04 16 01 1F 0B 4 6 1 £ 11 0461FB 4/0/3 1FB add (N) to (A) 15 3B 01 1F 15 5 * 1 £ 5 05B1F5 5/1/1 11F5 subtract (N) from (A) 10 10 10 10 01 1 000001 0/0/0 1 Halt 1F 38 19 0E 1F £ H 9 . £ 0F89EF 15/1/0 9EF collate and add 13 16 01 1F 01 3 6 1 £ 1 0361F1 3/0/3 1F1 copy (A) to N 1F 02 01 1F 01 £ 2 1 £ 1 0F21F1 15/0/1 1F1 collate and add 0D 38 0D 1F 0B : H : £ 11 0D8DFB 13/1/0 DFB divide uniform radix 08 16 08 10 10 8 6 8 086800 8/0/3 800 merge constant length 13 6E 00 00 00 3 be 03E000 3/1/3 0 copy (A) to N 15 04 10 10 10 5 4 054000 5/0/2 0 subtract (N) from (A) 10 10 38 19 1F H 9 £ 00089F 0/0/0 89F Halt 15 0B 38 19 0D 5 11 H 9 : 05B89D 5/1/1 189D subtract (N) from (A) 10 10 38 19 0D H 9 : 00089D 0/0/0 89D Halt 04 1A 16 01 1F 4 10 6 1 £ 04A61F 4/1/1 61F add (N) to (A) 1A 02 02 01 1F 10 2 2 1 £ 0A221F 10/0/1 21F multiply and add 0B 04 38 19 1F 11 4 H 9 £ 0B489F 11/0/2 89F multiply and subtract 15 10 38 0D 1F 5 H : £ 0508DF 5/0/0 8DF subtract (N) from (A) 1A 1C 02 10 10 10 + 2 0AC200 10/1/2 200 multiply and add 10 01 16 01 1F 1 6 1 £ 00161F 0/0/0 161F Halt 0B 04 3B 13 1F 11 4 * 3 £ 0B4B3F 11/0/2 B3F multiply and subtract 16 08 38 0D 1F 6 8 H : £ 0688DF 6/1/0 8DF select (N) 1A 1C 16 10 10 10 + 6 0AC600 10/1/2 600 multiply and add 10 10 02 01 1F 2 1 £ 00021F 0/0/0 21F Halt 0B 0B 6E 00 00 11 11 be 0BBE00 11/1/1 1E00 multiply and subtract 1F 16 02 15 01 £ 6 2 5 1 0F6251 15/0/3 251 collate and add 1F 1A 02 38 0D £ 10 2 H : 0FA28D 15/1/1 28D collate and add 1F 1A 1C 02 08 £ 10 + 2 8 0FAC28 15/1/1 C28 collate and add 10 10 10 16 01 6 1 000061 0/0/0 61 Halt 1F 0B 0B 38 0D £ 11 11 H : 0FBB8D 15/1/1 1B8D collate and add 1F 1A 1C 02 10 £ 10 + 2 0FAC20 15/1/1 C20 collate and add 10 10 10 16 01 6 1 000061 0/0/0 61 Halt 1F 0B 15 3B 01 £ 11 5 * 1 0FB5B1 15/1/1 15B1 collate and add 1F 16 0D 16 01 £ 6 : 6 1 0F6D61 15/0/3 D61 collate and add 1F 1A 1F 38 0D £ 10 £ H : 0FAF8D 15/1/1 F8D collate and add 1F 1A 1C 37 08 £ 10 + G 8 0FAC78 15/1/1 C78 collate and add 10 10 10 16 19 6 9 000069 0/0/0 69 Halt 1F 0B 1C 3B 01 £ 11 + * 1 0FBCB1 15/1/1 1CB1 collate and add 1F 07 16 2A 0B £ 7 6 = 11 0F76AB 15/0/3 16AB collate and add 1F 0B 1C 6E 00 £ 11 + be 0FBCE0 15/1/1 1CE0 collate and add 01 1F 07 10 16 1 £ 7 6 01F706 1/1/3 1706 select literal address 01 1F 1A 1F 37 1 £ 10 £ G 01FAF7 1/1/3 1AF7 select literal address 1A 10 10 10 29 10 I 0A0009 10/0/0 9 multiply and add 02 10 10 02 38 2 2 H 020028 2/0/0 28 transfer (A) to N 19 1F 07 01 02 9 £ 7 1 2 09F712 9/1/3 1712 multiply uniform radix 19 1F 0B 1C 02 9 £ 11 + 2 09FBC2 9/1/3 1BC2 multiply uniform radix 19 1F 0B 1C 29 9 £ 11 + I 09FBC9 9/1/3 1BC9 multiply uniform radix 0E 04 10 10 16 . 4 6 0E4006 14/0/2 6 replace selected bits 01 1F 1A 02 15 1 £ 10 2 5 01FA25 1/1/3 1A25 select literal address 01 1F 0B 15 02 1 £ 11 5 2 01FB52 1/1/3 1B52 select literal address 01 1F 0B 15 16 1 £ 11 5 6 01FB56 1/1/3 1B56 select literal address 01 1F 1A 1C 04 1 £ 10 + 4 01FAC4 1/1/3 1AC4 select literal address 01 1F 1A 02 13 1 £ 10 2 3 01FA23 1/1/3 1A23 select literal address 01 1F 1A 1C 15 1 £ 10 + 5 01FAC5 1/1/3 1AC5 select literal address 01 1F 1A 0D 6E 1 £ 10 : be 01FADE 1/1/3 1ADE select literal address 10 01 1F 07 0E 1 £ 7 . 001F7E 0/0/0 1F7E Halt 3B 15 1F 08 15 * 5 £ 8 5 1B5F85 27/0/2 1F85 jump A >= Z 16 01 1F 1A 01 6 1 £ 10 1 061FA1 6/0/0 1FA1 select (N) 07 01 1F 0B 08 7 1 £ 11 8 071FB8 7/0/0 1FB8 augment (N) by (A) 16 01 1F 0B 08 6 1 £ 11 8 061FB8 6/0/0 1FB8 select (N) 15 01 1F 0B 19 5 1 £ 11 9 051FB9 5/0/0 1FB9 subtract (N) from (A) 3B 13 1F 04 07 * 3 £ 4 7 1B3F47 27/0/1 1F47 jump A != Z 38 19 1F 10 15 H 9 £ 5 189F05 24/1/0 1F05 unconditional jump 10 10 10 10 10 000000 0/0/0 0 Halt 38 19 1F 08 08 H 9 £ 8 8 189F88 24/1/0 1F88 unconditional jump 38 19 0D 1A 0D H 9 : 10 : 189DAD 24/1/0 1DAD unconditional jump 16 01 1F 0B 02 6 1 £ 11 2 061FB2 6/0/0 1FB2 select (N) 3B 13 0E 0D 07 * 3 . : 7 1B3ED7 27/0/1 1ED7 jump A != Z 16 01 1F 1A 1F 6 1 £ 10 £ 061FAF 6/0/0 1FAF select (N) 32 10 10 10 04 B 4 120004 18/0/0 4 shift logical 6E 00 00 00 00 be 1C 01 1A 10 10 + 1 10 0C1A00 12/0/0 1A00 convert 1A 02 01 1F 0B 10 2 1 £ 11 0A21FB 10/0/1 1FB multiply and add 1A 16 01 1F 1A 10 6 1 £ 10 0A61FA 10/0/3 1FA multiply and add 07 02 10 10 10 7 2 072000 7/0/1 0 augment (N) by (A) 19 16 19 1F 1A 9 6 9 £ 10 0969FA 9/0/3 9FA multiply uniform radix 1A 13 08 10 10 10 3 8 0A3800 10/0/1 1800 multiply and add 1A 02 10 10 10 10 2 0A2000 10/0/1 0 multiply and add 1A 38 08 10 10 10 H 8 0A8800 10/1/0 800 multiply and add 19 10 10 10 02 9 2 090002 9/0/0 2 multiply uniform radix 10 10 10 10 10 000000 0/0/0 0 Halt 1F 10 10 10 10 £ 0F0000 15/0/0 0 collate and add 04 10 01 1C 04 4 1 + 4 0401C4 4/0/0 1C4 add (N) to (A) 16 10 01 1F 1C 6 1 £ + 0601FC 6/0/0 1FC select (N) 10 10 04 10 10 4 000400 0/0/0 400 Halt 10 6E 00 00 00 be 00E000 0/1/3 0 Invalid 19 1A 10 10 10 9 10 09A000 9/1/1 0 multiply uniform radix 1A 10 10 04 10 10 4 0A0040 10/0/0 40 multiply and add 10 10 1F 01 1F £ 1 £ 000F1F 0/0/0 F1F Halt 1C 10 1F 01 1F + £ 1 £ 0C0F1F 12/0/0 F1F convert 0E 10 19 16 19 . 9 6 9 0E0969 14/0/0 969 replace selected bits 16 19 16 19 16 6 9 6 9 6 069696 6/1/0 1696 select (N) 19 16 10 10 10 9 6 096000 9/0/3 0 multiply uniform radix 01 04 10 10 10 1 4 014000 1/0/2 0 round off 10 02 10 10 10 2 002000 0/0/1 0 Invalid 10 01 10 10 10 1 001000 0/0/0 1000 Halt 01 1C 10 10 10 1 + 01C000 1/1/2 0 subtract literal address 10 10 07 0E 10 7 . 0007E0 0/0/0 7E0 Halt 10 10 10 07 1F 7 £ 00007F 0/0/0 7F Halt 1F 1F 2A 07 1F £ £ = 7 £ 0FFA7F 15/1/3 1A7F collate and add 0B 1A 6E 00 00 11 10 be 0BAE00 11/1/1 E00 multiply and subtract 1F 1A 08 10 10 £ 10 8 0FA800 15/1/1 800 collate and add 10 10 10 10 10 000000 0/0/0 0 Halt 10 1A 10 29 0B 10 I 11 00A09B 0/1/1 9B replace registers 1F 1F 1F 2A 13 £ £ £ = 3 0FFFA3 15/1/3 1FA3 collate and add 1F 1A 0E 10 01 £ 10 . 1 0FAE01 15/1/1 E01 collate and add 1C 0E 08 10 01 + . 8 1 0CE801 12/1/3 801 convert 1C 0E 08 10 01 + . 8 1 0CE801 12/1/3 801 convert 0B 07 1A 10 10 11 7 10 0B7A00 11/0/3 1A00 multiply and subtract 10 10 1F 10 10 £ 000F00 0/0/0 F00 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 01 10 10 1 000100 0/0/0 100 Halt 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 01 1F 0B 16 10 1 £ 11 6 01FB60 1/1/3 1B60 select literal address 10 10 01 19 10 1 9 000190 0/0/0 190 Halt 10 10 02 10 10 2 000200 0/0/0 200 Halt 01 1F 1C 1C 10 1 £ + + 01FCC0 1/1/3 1CC0 select literal address 01 1F 0D 1C 1F 1 £ : + £ 01FDCF 1/1/3 1DCF select literal address 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 13 0E 08 10 3 . 8 003E80 0/0/1 1E80 Invalid 10 07 0D 02 10 7 : 2 007D20 0/0/3 1D20 set radix 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 1C + 00000C 0/0/0 C Halt 04 0E 04 02 10 4 . 4 2 04E420 4/1/3 420 add (N) to (A) 10 04 01 04 10 4 1 4 004140 0/0/2 140 replace (B) by (N) 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 6E be 00000E 0/0/0 E Halt 10 01 1F 1C 04 1 £ + 4 001FC4 0/0/0 1FC4 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 38 1C 10 08 10 H + 8 18C080 24/1/2 80 modify address of next 01 16 1F 1C 10 1 6 £ + 016FC0 1/0/3 FC0 interchange area addresses 29 0E 08 10 10 I . 8 19E800 25/1/3 800 conditional Halt 38 1C 10 08 10 H + 8 18C080 24/1/2 80 modify address of next 23 02 10 10 10 C 2 132000 19/0/1 0 input one block/reset timer 02 01 1F 0D 10 2 1 £ : 021FD0 2/0/0 1FD0 transfer (A) to N 15 01 1F 1C 1F 5 1 £ + £ 051FCF 5/0/0 1FCF subtract (N) from (A) 07 10 10 08 10 7 8 070080 7/0/0 80 augment (N) by (A) 38 19 1F 0D 01 H 9 £ : 1 189FD1 24/1/0 1FD1 unconditional jump 10 10 10 04 10 4 000040 0/0/0 40 Halt 10 10 10 01 1C 1 + 00001C 0/0/0 1C Halt 38 19 0E 0B 16 H 9 . 11 6 189EB6 24/1/0 1EB6 unconditional jump 6E 00 00 00 00 be 10 10 02 10 10 2 000200 0/0/0 200 Halt 10 10 02 10 10 2 000200 0/0/0 200 Halt 10 10 02 07 16 2 7 6 000276 0/0/0 276 Halt 10 10 02 10 10 2 000200 0/0/0 200 Halt 10 10 1A 04 08 10 4 8 000A48 0/0/0 A48 Halt 10 10 02 02 08 2 2 8 000228 0/0/0 228 Halt 10 10 10 10 0E . 00000E 0/0/0 E Halt 10 10 10 10 07 7 000007 0/0/0 7 Halt 10 10 10 10 01 1 000001 0/0/0 1 Halt 10 10 10 10 01 1 000001 0/0/0 1 Halt 10 16 1C 16 01 6 + 6 1 006C61 0/0/3 C61 set radix 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 07 0D 10 7 : 0007D0 0/0/0 7D0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 1A 10 00000A 0/0/0 A Halt 6E 00 00 00 00 be 10 10 02 10 04 2 4 000204 0/0/0 204 Halt 0E 10 02 07 08 . 2 7 8 0E0278 14/0/0 278 replace selected bits 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 1F 1F £ £ 0000FF 0/0/0 FF Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 1F 1F 10 10 £ £ 00FF00 0/1/3 1F00 Invalid 10 10 10 10 10 000000 0/0/0 0 Halt 1F 10 10 10 10 £ 0F0000 15/0/0 0 collate and add 10 10 10 10 1F £ 00000F 0/0/0 F Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 1F 1F 10 £ £ 000FF0 0/0/0 FF0 Halt 6E 00 00 00 00 be 10 10 02 01 02 2 1 2 000212 0/0/0 212 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 1F 1F 10 10 10 £ £ 0FF000 15/1/3 1000 collate and add 10 10 10 07 0E 7 . 00007E 0/0/0 7E Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 07 0E 10 10 7 . 007E00 0/0/3 1E00 set radix 10 10 10 10 10 000000 0/0/0 0 Halt 0E 10 10 10 10 . 0E0000 14/0/0 0 replace selected bits 10 10 10 10 07 7 000007 0/0/0 7 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 07 0E 10 7 . 0007E0 0/0/0 7E0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 07 0E 10 10 10 7 . 07E000 7/1/3 0 augment (N) by (A) 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 6E 00 00 00 00 be 10 10 02 02 10 2 2 000220 0/0/0 220 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 01 1F 1F 1F 1 £ £ £ 001FFF 0/0/0 1FFF Halt 16 10 02 10 04 6 2 4 060204 6/0/0 204 select (N) 38 1C 10 08 10 H + 8 18C080 24/1/2 80 modify address of next 02 10 10 04 10 2 4 020040 2/0/0 40 transfer (A) to N 38 08 02 04 15 H 8 2 4 5 188245 24/1/0 245 unconditional jump 10 10 10 10 10 000000 0/0/0 0 Halt 6E 00 00 00 00 be 10 10 02 02 0E 2 2 . 00022E 0/0/0 22E Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 2A 10 02 15 10 = 2 5 1A0250 26/0/0 250 enter subroutine 2A 1A 02 10 10 = 10 2 1AA200 26/1/1 200 set modification register 2A 1C 02 10 02 = + 2 2 1AC202 26/1/2 202 set modification register 01 0E 10 10 10 1 . 01E000 1/1/3 0 select literal address 38 1C 10 10 02 H + 2 18C002 24/1/2 2 modify address of next 10 1C 02 07 08 + 2 7 8 00C278 0/1/2 278 replace (B) by (N) 1F 1C 02 10 1A £ + 2 10 0FC20A 15/1/2 20A collate and add 15 1C 02 01 04 5 + 2 1 4 05C214 5/1/2 214 subtract (N) from (A) 3B 10 02 04 08 * 2 4 8 1B0248 27/0/0 248 jump A = Z 29 04 10 10 02 I 4 2 194002 25/0/2 2 step on and test 6E 00 00 00 00 be 10 10 02 13 1C 2 3 + 00023C 0/0/0 23C Halt 38 08 02 13 15 H 8 2 3 5 188235 24/1/0 235 unconditional jump 2A 10 02 16 04 = 2 6 4 1A0264 26/0/0 264 enter subroutine 10 10 10 10 10 000000 0/0/0 0 Halt 38 08 02 04 01 H 8 2 4 1 188241 24/1/0 241 unconditional jump 38 08 02 04 15 H 8 2 4 5 188245 24/1/0 245 unconditional jump 29 02 10 10 02 I 2 2 192002 25/0/1 2 step on and test 38 08 02 13 04 H 8 2 3 4 188234 24/1/0 234 unconditional jump 10 10 10 10 1F £ 00000F 0/0/0 F Halt 38 08 02 13 02 H 8 2 3 2 188232 24/1/0 232 unconditional jump 16 10 02 13 1F 6 2 3 £ 06023F 6/0/0 23F select (N) 02 10 02 13 0E 2 2 3 . 02023E 2/0/0 23E transfer (A) to N 38 08 02 13 02 H 8 2 3 2 188232 24/1/0 232 unconditional jump 16 10 02 04 10 6 2 4 060240 6/0/0 240 select (N) 02 10 02 13 0E 2 2 3 . 02023E 2/0/0 23E transfer (A) to N 6E 00 00 00 00 be 10 10 02 04 1A 2 4 10 00024A 0/0/0 24A Halt 38 08 02 13 0D H 8 2 3 : 18823D 24/1/0 23D unconditional jump 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 2A 10 02 15 16 = 2 5 6 1A0256 26/0/0 256 enter subroutine 38 1C 10 08 10 H + 8 18C080 24/1/2 80 modify address of next 23 02 10 10 10 C 2 132000 19/0/1 0 input one block/reset timer 2A 10 02 15 16 = 2 5 6 1A0256 26/0/0 256 enter subroutine 2A 02 02 15 10 = 2 2 5 1A2250 26/0/1 250 leave subroutine 10 10 10 10 10 000000 0/0/0 0 Halt 38 1C 10 08 10 H + 8 18C080 24/1/2 80 modify address of next 6E 00 00 00 00 be 10 10 02 15 08 2 5 8 000258 0/0/0 258 Halt 2A 08 10 10 10 = 8 1A8000 26/1/0 0 test route N1 10 10 10 10 01 1 000001 0/0/0 1 Halt 38 08 02 15 07 H 8 2 5 7 188257 24/1/0 257 unconditional jump 38 08 02 15 0E H 8 2 5 . 18825E 24/1/0 25E unconditional jump 10 10 10 10 13 3 000003 0/0/0 3 Halt 38 08 02 15 1F H 8 2 5 £ 18825F 24/1/0 25F unconditional jump 10 10 10 10 02 2 000002 0/0/0 2 Halt 2A 02 02 15 16 = 2 2 5 6 1A2256 26/0/1 256 leave subroutine 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 2A 10 02 16 1C = 2 6 + 1A026C 26/0/0 26C enter subroutine 6E 00 00 00 00 be 10 10 02 16 16 2 6 6 000266 0/0/0 266 Halt 16 1A 02 07 08 6 10 2 7 8 06A278 6/1/1 278 select (N) 02 08 10 19 1A 2 8 9 10 02809A 2/1/0 9A transfer (A) to N 38 1C 10 08 01 H + 8 1 18C081 24/1/2 81 modify address of next 23 10 10 10 10 C 130000 19/0/0 0 output 2A 10 02 16 1C = 2 6 + 1A026C 26/0/0 26C enter subroutine 2A 02 02 16 04 = 2 2 6 4 1A2264 26/0/1 264 leave subroutine 10 10 10 10 10 000000 0/0/0 0 Halt 38 1C 10 08 01 H + 8 1 18C081 24/1/2 81 modify address of next 2A 08 10 10 10 = 8 1A8000 26/1/0 0 test route N1 10 10 10 01 01 1 1 000011 0/0/0 11 Halt 38 08 02 16 0D H 8 2 6 : 18826D 24/1/0 26D unconditional jump 38 08 02 07 04 H 8 2 7 4 188274 24/1/0 274 unconditional jump 10 10 10 01 13 1 3 000013 0/0/0 13 Halt 38 08 02 07 15 H 8 2 7 5 188275 24/1/0 275 unconditional jump 6E 00 00 00 00 be 10 10 02 07 04 2 7 4 000274 0/0/0 274 Halt 10 10 10 01 02 1 2 000012 0/0/0 12 Halt 2A 02 02 16 1C = 2 2 6 + 1A226C 26/0/1 26C leave subroutine 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 6E 00 00 00 00 be 6E 00 00 00 00 be 40 60 70 08 10 & 0 0 8 000080 0/0/0 80 Halt File: old-paper-tapes/U9005-2.leo 16 10 10 19 10 6 9 060090 6/0/0 90 select (N) 02 10 10 10 01 2 1 020001 2/0/0 1 transfer (A) to N 10 10 10 10 10 000000 0/0/0 0 Halt 38 08 10 10 16 H 8 6 188006 24/1/0 6 unconditional jump 10 10 13 10 13 3 3 000303 0/0/0 303 Halt 10 01 1F 0D 1F 1 £ : £ 001FDF 0/0/0 1FDF Halt 10 10 10 02 10 2 000020 0/0/0 20 Halt 38 02 10 10 01 H 2 1 182001 24/0/1 1 modify address of next 2A 08 10 10 10 = 8 1A8000 26/1/0 0 test route N1 10 10 13 10 01 3 1 000301 0/0/0 301 Halt 38 08 10 10 16 H 8 6 188006 24/1/0 6 unconditional jump 38 08 10 10 13 H 8 3 188003 24/1/0 3 unconditional jump 10 10 13 10 15 3 5 000305 0/0/0 305 Halt 16 08 10 10 04 6 8 4 068004 6/1/0 4 select (N) 10 16 10 10 07 6 7 006007 0/0/3 7 set radix 2C 08 10 10 1F ' 8 £ 1C800F 28/1/0 F bulk copy alpha to short 6E 00 00 00 00 be 16 10 10 01 01 6 1 1 060011 6/0/0 11 select (N) 02 10 10 10 0D 2 : 02000D 2/0/0 D transfer (A) to N 38 02 10 01 1C H 2 1 + 18201C 24/0/1 1C modify address of next 16 10 10 01 0E 6 1 . 06001E 6/0/0 1E select (N) 15 10 10 01 1C 5 1 + 05001C 5/0/0 1C subtract (N) from (A) 01 1C 10 10 1F 1 + £ 01C00F 1/1/2 F subtract literal address 3B 02 10 01 1A * 2 1 10 1B201A 27/0/1 1A jump A != Z 37 10 10 10 1F G £ 17000F 23/0/0 F step on and test 10 02 10 01 1C 2 1 + 00201C 0/0/1 1C Invalid 38 08 10 10 01 H 8 1 188001 24/1/0 1 unconditional jump 38 08 10 04 0B H 8 4 11 18804B 24/1/0 4B unconditional jump 10 10 13 10 0E 3 . 00030E 0/0/0 30E Halt 38 08 10 01 1A H 8 1 10 18801A 24/1/0 1A unconditional jump 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 04 0B 4 11 00004B 0/0/0 4B Halt 10 10 10 10 1F £ 00000F 0/0/0 F Halt 6E 00 00 00 00 be 10 10 10 10 10 000000 0/0/0 0 Halt 23 10 10 10 10 C 130000 19/0/0 0 output 2A 08 10 10 10 = 8 1A8000 26/1/0 0 test route N1 10 10 13 10 01 3 1 000301 0/0/0 301 Halt 38 08 10 10 1A H 8 10 18800A 24/1/0 A unconditional jump 38 08 10 02 07 H 8 2 7 188027 24/1/0 27 unconditional jump 10 10 13 10 15 3 5 000305 0/0/0 305 Halt 38 16 10 10 08 H 6 8 186008 24/0/3 8 modify address of next 16 19 1F 0D 1F 6 9 £ : £ 069FDF 6/1/0 1FDF select (N) 15 10 10 02 1A 5 2 10 05002A 5/0/0 2A subtract (N) from (A) 3B 02 10 02 08 * 2 2 8 1B2028 27/0/1 28 jump A != Z 01 0E 10 10 01 1 . 1 01E001 1/1/3 1 select literal address 07 10 10 02 1A 7 2 10 07002A 7/0/0 2A augment (N) by (A) 38 16 10 10 08 H 6 8 186008 24/0/3 8 modify address of next 16 19 1F 0E 01 6 9 £ . 1 069FE1 6/1/0 1FE1 select (N) 10 10 10 01 0E 1 . 00001E 0/0/0 1E Halt 6E 00 00 00 00 be 38 16 10 10 08 H 6 8 186008 24/0/3 8 modify address of next 38 13 1F 0E 13 H 3 £ . 3 183FE3 24/0/1 1FE3 modify address of next 38 08 10 01 1A H 8 1 10 18801A 24/1/0 1A unconditional jump 38 08 10 02 02 H 8 2 2 188022 24/1/0 22 unconditional jump 38 08 10 02 10 H 8 2 188020 24/1/0 20 unconditional jump 38 08 10 01 0E H 8 1 . 18801E 24/1/0 1E unconditional jump 23 0E 10 10 10 C . 13E000 19/1/3 0 step on/set manual 02 10 10 02 0B 2 2 11 02002B 2/0/0 2B transfer (A) to N 2A 02 10 02 0B = 2 2 11 1A202B 26/0/1 2B leave subroutine 02 10 10 02 0B 2 2 11 02002B 2/0/0 2B transfer (A) to N 38 08 10 10 19 H 8 9 188009 24/1/0 9 unconditional jump 38 16 10 02 0B H 6 2 11 18602B 24/0/3 2B modify address of next 02 10 10 10 10 2 020000 2/0/0 0 transfer (A) to N 01 0E 10 10 01 1 . 1 01E001 1/1/3 1 select literal address 07 10 10 02 0B 7 2 11 07002B 7/0/0 2B augment (N) by (A) 10 10 10 02 0D 2 : 00002D 0/0/0 2D Halt 6E 00 00 00 00 be 38 08 10 10 19 H 8 9 188009 24/1/0 9 unconditional jump 10 10 13 10 13 3 3 000303 0/0/0 303 Halt 10 10 13 10 0E 3 . 00030E 0/0/0 30E Halt 38 08 10 02 07 H 8 2 7 188027 24/1/0 27 unconditional jump 10 10 10 10 01 1 000001 0/0/0 1 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 13 1C 3 + 00003C 0/0/0 3C Halt 6E 00 00 00 00 be 16 10 10 10 01 6 1 060001 6/0/0 1 select (N) 01 02 10 10 13 1 2 3 012003 1/0/1 3 prepare for digit collation 0E 10 10 01 1F . 1 £ 0E001F 14/0/0 1F replace selected bits 0E 10 10 02 10 . 2 0E0020 14/0/0 20 replace selected bits 0E 10 10 13 13 . 3 3 0E0033 14/0/0 33 replace selected bits 10 16 10 01 0E 6 1 . 00601E 0/0/3 1E set radix 16 08 10 15 04 6 8 5 4 068054 6/1/0 54 select (N) 2C 10 10 10 08 ' 8 1C0008 28/0/0 8 bulk copy short numeric 38 08 10 10 19 H 8 9 188009 24/1/0 9 unconditional jump 10 02 10 01 0E 2 1 . 00201E 0/0/1 1E Invalid 10 10 10 02 04 2 4 000024 0/0/0 24 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 04 0B 4 11 00004B 0/0/0 4B Halt 6E 00 00 00 00 be 10 10 10 10 01 1 000001 0/0/0 1 Halt 10 02 10 02 0E 2 2 . 00202E 0/0/1 2E Invalid 10 10 20 6E 00 - be 0000E0 0/0/0 E0 Halt 10 10 10 10 02 2 000002 0/0/0 2 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 10 10 13 3 000003 0/0/0 3 Halt 07 0E 10 10 10 7 . 07E000 7/1/3 0 augment (N) by (A) 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 10 10 04 4 000004 0/0/0 4 Halt 16 08 10 1C 10 6 8 + 0680C0 6/1/0 C0 select (N) 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 10 10 15 5 000005 0/0/0 5 Halt 04 10 10 0D 16 4 : 6 0400D6 4/0/0 D6 add (N) to (A) 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 10 10 16 6 000006 0/0/0 6 Halt 2C 02 10 0D 19 ' 2 : 9 1C20D9 28/0/1 D9 bulk copy short numeric 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 10 10 07 7 000007 0/0/0 7 Halt 02 08 10 0E 1C 2 8 . + 0280EC 2/1/0 EC transfer (A) to N 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 10 10 08 8 000008 0/0/0 8 Halt 38 16 10 0D 16 H 6 : 6 1860D6 24/0/3 D6 modify address of next 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 10 10 19 9 000009 0/0/0 9 Halt 37 16 10 10 10 G 6 176000 23/0/3 0 select tag 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 10 10 1A 10 00000A 0/0/0 A Halt 13 10 10 0E 08 3 . 8 0300E8 3/0/0 E8 copy (A) to N 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 10 10 0B 11 00000B 0/0/0 B Halt 15 10 10 0E 19 5 . 9 0500E9 5/0/0 E9 subtract (N) from (A) 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 10 10 1C + 00000C 0/0/0 C Halt 3B 10 10 01 1C * 1 + 1B001C 27/0/0 1C jump A = Z 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 10 10 0D : 00000D 0/0/0 D Halt 02 10 10 0E 0D 2 . : 0200ED 2/0/0 ED transfer (A) to N 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 10 10 0E . 00000E 0/0/0 E Halt 38 16 10 0D 16 H 6 : 6 1860D6 24/0/3 D6 modify address of next 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 10 10 1F £ 00000F 0/0/0 F Halt 37 16 10 10 02 G 6 2 176002 23/0/3 2 select tag 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 10 01 10 1 000010 0/0/0 10 Halt 13 10 10 0E 19 3 . 9 0300E9 3/0/0 E9 copy (A) to N 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 10 01 01 1 1 000011 0/0/0 11 Halt 15 10 10 0E 08 5 . 8 0500E8 5/0/0 E8 subtract (N) from (A) 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 10 01 02 1 2 000012 0/0/0 12 Halt 3B 10 10 02 02 * 2 2 1B0022 27/0/0 22 jump A = Z 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 10 01 13 1 3 000013 0/0/0 13 Halt 02 10 10 0E 0D 2 . : 0200ED 2/0/0 ED transfer (A) to N 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 10 01 04 1 4 000014 0/0/0 14 Halt 02 10 10 1C 02 2 + 2 0200C2 2/0/0 C2 transfer (A) to N 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 10 01 15 1 5 000015 0/0/0 15 Halt 38 02 10 1C 02 H 2 + 2 1820C2 24/0/1 C2 modify address of next 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 10 01 16 1 6 000016 0/0/0 16 Halt 16 08 10 0D 08 6 8 : 8 0680D8 6/1/0 D8 select (N) 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 10 01 07 1 7 000017 0/0/0 17 Halt 3B 10 10 13 1A * 3 10 1B003A 27/0/0 3A jump A = Z 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 10 01 08 1 8 000018 0/0/0 18 Halt 02 08 10 0E 1A 2 8 . 10 0280EA 2/1/0 EA transfer (A) to N 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 10 01 19 1 9 000019 0/0/0 19 Halt 10 04 10 0D 02 4 : 2 0040D2 0/0/2 D2 replace (B) by (N) 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 10 01 1A 1 10 00001A 0/0/0 1A Halt 1F 10 10 0E 0B £ . 11 0F00EB 15/0/0 EB collate and add 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 10 01 0B 1 11 00001B 0/0/0 1B Halt 32 01 10 01 0D B 1 1 : 12101D 18/0/0 101D shift logical 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 10 01 1C 1 + 00001C 0/0/0 1C Halt 2A 10 10 08 10 = 8 1A0080 26/0/0 80 enter subroutine 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 10 01 0D 1 : 00001D 0/0/0 1D Halt 10 1C 10 0E 0B + . 11 00C0EB 0/1/2 EB replace (B) by (N) 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 10 01 0E 1 . 00001E 0/0/0 1E Halt 02 10 10 0E 1A 2 . 10 0200EA 2/0/0 EA transfer (A) to N 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 10 01 1F 1 £ 00001F 0/0/0 1F Halt 32 08 10 10 16 B 8 6 128006 18/1/0 6 shift logical 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 10 02 10 2 000020 0/0/0 20 Halt 16 10 10 0E 1A 6 . 10 0600EA 6/0/0 EA select (N) 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 10 02 01 2 1 000021 0/0/0 21 Halt 32 16 10 10 13 B 6 3 126003 18/0/3 3 shift binary 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 10 02 02 2 2 000022 0/0/0 22 Halt 32 0E 10 10 01 B . 1 12E001 18/1/3 1 shift binary 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 10 02 13 2 3 000023 0/0/0 23 Halt 32 16 10 10 02 B 6 2 126002 18/0/3 2 shift binary 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 10 02 04 2 4 000024 0/0/0 24 Halt 32 0E 10 10 02 B . 2 12E002 18/1/3 2 shift binary 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 10 02 15 2 5 000025 0/0/0 25 Halt 02 10 10 0E 0B 2 . 11 0200EB 2/0/0 EB transfer (A) to N 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 10 02 16 2 6 000026 0/0/0 26 Halt 32 0E 10 10 0D B . : 12E00D 18/1/3 D shift binary 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 10 02 07 2 7 000027 0/0/0 27 Halt 2A 10 10 08 10 = 8 1A0080 26/0/0 80 enter subroutine 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 10 02 08 2 8 000028 0/0/0 28 Halt 02 10 10 0E 1A 2 . 10 0200EA 2/0/0 EA transfer (A) to N 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 10 02 19 2 9 000029 0/0/0 29 Halt 16 08 10 0E 1A 6 8 . 10 0680EA 6/1/0 EA select (N) 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 10 02 1A 2 10 00002A 0/0/0 2A Halt 38 02 10 1C 02 H 2 + 2 1820C2 24/0/1 C2 modify address of next 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 10 02 0B 2 11 00002B 0/0/0 2B Halt 02 08 10 0D 08 2 8 : 8 0280D8 2/1/0 D8 transfer (A) to N 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 10 02 1C 2 + 00002C 0/0/0 2C Halt 37 10 10 10 02 G 2 170002 23/0/0 2 step on and test 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 10 02 0D 2 : 00002D 0/0/0 2D Halt 10 02 10 1C 02 2 + 2 0020C2 0/0/1 C2 Invalid 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 10 02 0E 2 . 00002E 0/0/0 2E Halt 38 08 10 02 13 H 8 2 3 188023 24/1/0 23 unconditional jump 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 10 02 1F 2 £ 00002F 0/0/0 2F Halt 16 10 10 0E 0D 6 . : 0600ED 6/0/0 ED select (N) 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 10 13 10 3 000030 0/0/0 30 Halt 3B 10 10 16 10 * 6 1B0060 27/0/0 60 jump A = Z 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 10 13 01 3 1 000031 0/0/0 31 Halt 10 02 10 15 0D 2 5 : 00205D 0/0/1 5D Invalid 10 10 20 6E 00 - be 0000E0 0/0/0 E0 Halt 10 10 10 13 02 3 2 000032 0/0/0 32 Halt 16 08 10 1C 10 6 8 + 0680C0 6/1/0 C0 select (N) 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 10 13 13 3 3 000033 0/0/0 33 Halt 04 10 10 0D 16 4 : 6 0400D6 4/0/0 D6 add (N) to (A) 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 10 13 04 3 4 000034 0/0/0 34 Halt 2C 10 10 0E 10 ' . 1C00E0 28/0/0 E0 bulk copy short numeric 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 10 13 15 3 5 000035 0/0/0 35 Halt 16 08 10 0E 10 6 8 . 0680E0 6/1/0 E0 select (N) 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 10 13 16 3 6 000036 0/0/0 36 Halt 2A 10 10 16 07 = 6 7 1A0067 26/0/0 67 enter subroutine 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 10 13 07 3 7 000037 0/0/0 37 Halt 02 08 10 0E 04 2 8 . 4 0280E4 2/1/0 E4 transfer (A) to N 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 10 13 08 3 8 000038 0/0/0 38 Halt 16 08 10 0E 02 6 8 . 2 0680E2 6/1/0 E2 select (N) 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 10 13 19 3 9 000039 0/0/0 39 Halt 2A 10 10 16 07 = 6 7 1A0067 26/0/0 67 enter subroutine 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 10 13 1A 3 10 00003A 0/0/0 3A Halt 02 08 10 0E 16 2 8 . 6 0280E6 2/1/0 E6 transfer (A) to N 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 10 13 0B 3 11 00003B 0/0/0 3B Halt 38 02 10 0D 16 H 2 : 6 1820D6 24/0/1 D6 modify address of next 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 10 13 1C 3 + 00003C 0/0/0 3C Halt 01 0E 10 10 10 1 . 01E000 1/1/3 0 select literal address 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 10 13 0D 3 : 00003D 0/0/0 3D Halt 2A 10 10 08 10 = 8 1A0080 26/0/0 80 enter subroutine 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 10 13 0E 3 . 00003E 0/0/0 3E Halt 02 10 10 0E 1A 2 . 10 0200EA 2/0/0 EA transfer (A) to N 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 10 13 1F 3 £ 00003F 0/0/0 3F Halt 10 04 10 0D 16 4 : 6 0040D6 0/0/2 D6 replace (B) by (N) 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 10 04 10 4 000040 0/0/0 40 Halt 32 0E 10 01 0B B . 1 11 12E01B 18/1/3 1B shift binary 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 10 04 01 4 1 000041 0/0/0 41 Halt 32 10 10 10 04 B 4 120004 18/0/0 4 shift logical 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 10 04 02 4 2 000042 0/0/0 42 Halt 07 10 10 0E 1A 7 . 10 0700EA 7/0/0 EA augment (N) by (A) 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 10 04 13 4 3 000043 0/0/0 43 Halt 10 02 10 16 0E 2 6 . 00206E 0/0/1 6E Invalid 10 10 20 6E 00 - be 0000E0 0/0/0 E0 Halt 10 10 10 04 04 4 4 000044 0/0/0 44 Halt 16 10 10 16 16 6 6 6 060066 6/0/0 66 select (N) 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 10 04 15 4 5 000045 0/0/0 45 Halt 38 16 10 01 10 H 6 1 186010 24/0/3 10 modify address of next 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 10 04 16 4 6 000046 0/0/0 46 Halt 02 10 10 10 10 2 020000 2/0/0 0 transfer (A) to N 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 10 04 07 4 7 000047 0/0/0 47 Halt 2A 10 10 07 19 = 7 9 1A0079 26/0/0 79 enter subroutine 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 10 04 08 4 8 000048 0/0/0 48 Halt 38 04 10 08 08 H 4 8 8 184088 24/0/2 88 select literal and division 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 10 04 19 4 9 000049 0/0/0 49 Halt 38 16 10 01 10 H 6 1 186010 24/0/3 10 modify address of next 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 10 04 1A 4 10 00004A 0/0/0 4A Halt 2C 0D 1F 0E 10 ' : £ . 1CDFE0 28/1/2 1FE0 edit fixed field formats 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 10 04 0B 4 11 00004B 0/0/0 4B Halt 38 08 10 15 1C H 8 5 + 18805C 24/1/0 5C unconditional jump 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 10 04 1C 4 + 00004C 0/0/0 4C Halt 16 08 10 1C 08 6 8 + 8 0680C8 6/1/0 C8 select (N) 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 10 04 0D 4 : 00004D 0/0/0 4D Halt 2C 1A 10 0E 0E ' 10 . . 1CA0EE 28/1/1 EE bulk copy long numeric 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 10 04 0E 4 . 00004E 0/0/0 4E Halt 01 1F 1F 0D 0E 1 £ £ : . 01FFDE 1/1/3 1FDE select literal address 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 10 04 1F 4 £ 00004F 0/0/0 4F Halt 3D 02 10 0E 0E ? 2 . . 1D20EE 29/0/1 EE edit for anelex output 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 10 15 10 5 000050 0/0/0 50 Halt 23 10 10 10 10 C 130000 19/0/0 0 output 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 10 15 01 5 1 000051 0/0/0 51 Halt 16 10 10 16 15 6 6 5 060065 6/0/0 65 select (N) 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 15 02 38 5 2 H 000528 0/0/0 528 Halt 16 10 01 10 10 6 1 060100 6/0/0 100 select (N) 10 10 6E 00 00 be 000E00 0/0/0 E00 Halt 10 15 13 02 10 5 3 2 005320 0/0/2 1320 replace (B) by (N) 10 10 10 10 10 000000 0/0/0 0 Halt 10 6E 00 00 00 be 00E000 0/1/3 0 Invalid 15 04 37 10 10 5 4 G 054700 5/0/2 700 subtract (N) from (A) 10 04 10 10 10 4 004000 0/0/2 0 replace (B) by (N) 6E 00 00 00 00 be 15 10 02 10 0D 5 2 : 05020D 5/0/0 20D subtract (N) from (A) 16 10 10 10 6E 6 be 06000E 6/0/0 E select (N) 10 10 10 15 16 5 6 000056 0/0/0 56 Halt 38 08 10 01 02 H 8 1 2 188012 24/1/0 12 unconditional jump 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 15 07 10 5 7 000570 0/0/0 570 Halt 10 1F 10 1F 10 £ £ 00F0F0 0/1/3 10F0 Invalid 10 10 6E 00 00 be 000E00 0/0/0 E00 Halt 10 15 08 38 08 5 8 H 8 005888 0/0/2 1888 replace (B) by (N) 10 16 13 10 10 6 3 006300 0/0/3 300 set radix 10 6E 00 00 00 be 00E000 0/1/3 0 Invalid 15 19 10 10 10 5 9 059000 5/1/0 1000 subtract (N) from (A) 10 10 10 10 10 000000 0/0/0 0 Halt 6E 00 00 00 00 be 1A 1F 01 1F 0D 10 £ 1 £ : 0AF1FD 10/1/3 11FD multiply and add 0E 10 10 10 6E . be 0E000E 14/0/0 E replace selected bits 10 10 10 15 0B 5 11 00005B 0/0/0 5B Halt 10 02 10 08 15 2 8 5 002085 0/0/1 85 Invalid 10 10 20 6E 00 - be 0000E0 0/0/0 E0 Halt 10 10 15 1C 10 5 + 0005C0 0/0/0 5C0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 6E 00 00 be 000E00 0/0/0 E00 Halt 10 15 0D 02 08 5 : 2 8 005D28 0/0/2 1D28 replace (B) by (N) 10 0E 1A 10 10 . 10 00EA00 0/1/3 A00 Invalid 10 6E 00 00 00 be 00E000 0/1/3 0 Invalid 15 0E 01 02 04 5 . 1 2 4 05E124 5/1/3 124 subtract (N) from (A) 10 10 10 10 10 000000 0/0/0 0 Halt 6E 00 00 00 00 be 1F 0E 08 10 0E £ . 8 . 0FE80E 15/1/3 80E collate and add 1A 10 10 10 6E 10 be 0A000E 10/0/0 E multiply and add 10 10 10 16 10 6 000060 0/0/0 60 Halt 10 04 10 0D 13 4 : 3 0040D3 0/0/2 D3 replace (B) by (N) 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 16 01 1F 6 1 £ 00061F 0/0/0 61F Halt 08 10 0E 1A 10 8 . 10 080EA0 8/0/0 EA0 merge constant length 10 10 6E 00 00 be 000E00 0/0/0 E00 Halt 10 16 02 1F 08 6 2 £ 8 0062F8 0/0/3 2F8 set radix 10 1C 04 10 10 + 4 00C400 0/1/2 400 replace (B) by (N) 10 6E 00 00 00 be 00E000 0/1/3 0 Invalid 16 13 3B 10 10 6 3 * 063B00 6/0/1 1B00 select (N) 07 01 10 10 10 7 1 071000 7/0/0 1000 augment (N) by (A) 6E 00 00 00 00 be 04 1F 08 10 1C 4 £ 8 + 04F80C 4/1/3 180C add (N) to (A) 16 10 10 10 6E 6 be 06000E 6/0/0 E select (N) 10 10 10 16 15 6 5 000065 0/0/0 65 Halt 3B 02 10 07 04 * 2 7 4 1B2074 27/0/1 74 jump A != Z 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 16 16 0E 6 6 . 00066E 0/0/0 66E Halt 08 10 0E 1A 10 8 . 10 080EA0 8/0/0 EA0 merge constant length 10 10 6E 00 00 be 000E00 0/0/0 E00 Halt 10 16 07 01 0E 6 7 1 . 00671E 0/0/3 71E set radix 10 15 0B 10 10 5 11 005B00 0/0/2 1B00 replace (B) by (N) 10 6E 00 00 00 be 00E000 0/1/3 0 Invalid 16 08 02 10 10 6 8 2 068200 6/1/0 200 select (N) 0E 1C 10 10 10 . + 0EC000 14/1/2 0 replace selected bits 6E 00 00 00 00 be 19 32 08 10 10 9 B 8 092800 9/0/1 800 multiply uniform radix 02 10 10 10 6E 2 be 02000E 2/0/0 E transfer (A) to N 10 10 10 16 1A 6 10 00006A 0/0/0 6A Halt 01 0E 10 10 10 1 . 01E000 1/1/3 0 select literal address 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 16 0B 3B 6 11 * 0006BB 0/0/0 6BB Halt 1A 10 16 1C 10 10 6 + 0A06C0 10/0/0 6C0 multiply and add 10 10 6E 00 00 be 000E00 0/0/0 E00 Halt 10 16 1C 16 08 6 + 6 8 006C68 0/0/3 C68 set radix 10 0E 1A 10 10 . 10 00EA00 0/1/3 A00 Invalid 10 6E 00 00 00 be 00E000 0/1/3 0 Invalid 16 0D 2A 02 10 6 : = 2 06DA20 6/1/2 1A20 select (N) 16 07 10 10 10 6 7 067000 6/0/3 1000 select (N) 6E 00 00 00 00 be 0E 10 02 10 19 . 2 9 0E0209 14/0/0 209 replace selected bits 07 10 10 20 6E 7 - be 07000E 7/0/0 E augment (N) by (A) 10 10 10 16 1F 6 £ 00006F 0/0/0 6F Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 07 10 2A 7 = 00070A 0/0/0 70A Halt 08 10 10 10 10 8 080000 8/0/0 0 merge constant length 10 10 6E 00 00 be 000E00 0/0/0 E00 Halt 10 07 01 10 10 7 1 007100 0/0/3 1100 set radix 1F 10 01 10 10 £ 1 0F0100 15/0/0 100 collate and add 10 6E 00 00 00 be 00E000 0/1/3 0 Invalid 07 02 38 08 10 7 2 H 8 072880 7/0/1 880 augment (N) by (A) 07 1A 10 10 10 7 10 07A000 7/1/1 0 augment (N) by (A) 6E 00 00 00 00 be 13 38 16 10 0D 3 H 6 : 03860D 3/1/0 60D copy (A) to N 15 10 10 10 6E 5 be 05000E 5/0/0 E subtract (N) from (A) 10 10 10 07 04 7 4 000074 0/0/0 74 Halt 10 10 1F 10 15 £ 5 000F05 0/0/0 F05 Halt 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 07 15 2A 7 5 = 00075A 0/0/0 75A Halt 02 10 07 19 10 2 7 9 020790 2/0/0 790 transfer (A) to N 10 10 6E 00 00 be 000E00 0/0/0 E00 Halt 10 07 16 10 10 7 6 007600 0/0/3 1600 set radix 10 10 10 10 10 000000 0/0/0 0 Halt 10 6E 00 00 00 be 00E000 0/1/3 0 Invalid 07 07 02 10 10 7 7 2 077200 7/0/3 1200 augment (N) by (A) 07 19 10 10 10 7 9 079000 7/1/0 1000 augment (N) by (A) 6E 00 00 00 00 be 08 10 16 10 0D 8 6 : 08060D 8/0/0 60D merge constant length 04 10 10 10 6E 4 be 04000E 4/0/0 E add (N) to (A) 10 10 10 07 19 7 9 000079 0/0/0 79 Halt 38 04 10 1C 1A H 4 + 10 1840CA 24/0/2 CA select literal and division 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 07 1A 13 7 10 3 0007A3 0/0/0 7A3 Halt 10 10 0E 0D 10 . : 000ED0 0/0/0 ED0 Halt 10 10 6E 00 00 be 000E00 0/0/0 E00 Halt 10 07 0B 1C 10 7 11 + 007BC0 0/0/3 1BC0 set radix 10 07 19 10 10 7 9 007900 0/0/3 1900 set radix 10 6E 00 00 00 be 00E000 0/1/3 0 Invalid 07 1C 10 16 10 7 + 6 07C060 7/1/2 60 augment (N) by (A) 01 10 10 10 10 1 010000 1/0/0 0 table look up 6E 00 00 00 00 be 0D 2A 02 10 08 : = 2 8 0DA208 13/1/1 208 divide uniform radix 10 10 10 10 6E be 00000E 0/0/0 E Halt 10 10 10 07 0E 7 . 00007E 0/0/0 7E Halt 10 02 10 1A 16 2 10 6 0020A6 0/0/1 A6 Invalid 10 10 20 6E 00 - be 0000E0 0/0/0 E0 Halt 10 10 07 1F 38 7 £ H 0007F8 0/0/0 7F8 Halt 16 10 02 0E 10 6 2 . 0602E0 6/0/0 2E0 select (N) 10 10 6E 00 00 be 000E00 0/0/0 E00 Halt 10 08 10 16 10 8 6 008060 0/1/0 60 copy registers 10 19 19 10 10 9 9 009900 0/1/0 1900 copy registers 10 6E 00 00 00 be 00E000 0/1/3 0 Invalid 08 01 02 10 10 8 1 2 081200 8/0/0 1200 merge constant length 1A 16 10 10 10 10 6 0A6000 10/0/3 0 multiply and add 6E 00 00 00 00 be 02 01 02 10 10 2 1 2 021200 2/0/0 1200 transfer (A) to N 08 10 10 10 6E 8 be 08000E 8/0/0 E merge constant length 10 10 10 08 13 8 3 000083 0/0/0 83 Halt 1F 10 10 1A 16 £ 10 6 0F00A6 15/0/0 A6 collate and add 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 08 04 02 8 4 2 000842 0/0/0 842 Halt 10 10 1F 15 10 £ 5 000F50 0/0/0 F50 Halt 10 10 6E 00 00 be 000E00 0/0/0 E00 Halt 10 08 15 16 10 8 5 6 008560 0/1/0 560 copy registers 10 1C 0E 10 10 + . 00CE00 0/1/2 E00 replace (B) by (N) 10 6E 00 00 00 be 00E000 0/1/3 0 Invalid 08 16 02 10 10 8 6 2 086200 8/0/3 200 merge constant length 1F 04 10 10 10 £ 4 0F4000 15/0/2 0 collate and add 6E 00 00 00 00 be 07 01 02 10 10 7 1 2 071200 7/0/0 1200 augment (N) by (A) 13 10 10 10 6E 3 be 03000E 3/0/0 E copy (A) to N 10 10 10 08 08 8 8 000088 0/0/0 88 Halt 1F 10 10 1A 16 £ 10 6 0F00A6 15/0/0 A6 collate and add 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 08 19 13 8 9 3 000893 0/0/0 893 Halt 10 10 1A 07 10 10 7 000A70 0/0/0 A70 Halt 10 10 6E 00 00 be 000E00 0/0/0 E00 Halt 10 08 1A 0E 10 8 10 . 008AE0 0/1/0 AE0 copy registers 10 07 1A 10 10 7 10 007A00 0/0/3 1A00 set radix 10 6E 00 00 00 be 00E000 0/1/3 0 Invalid 08 0B 0E 10 10 8 11 . 08BE00 8/1/1 1E00 merge variable length 19 08 10 10 10 9 8 098000 9/1/0 0 multiply uniform radix 6E 00 00 00 00 be 1C 01 1A 10 04 + 1 10 4 0C1A04 12/0/0 1A04 convert 10 10 10 10 6E be 00000E 0/0/0 E Halt 10 10 10 08 0D 8 : 00008D 0/0/0 8D Halt 0E 10 10 07 10 . 7 0E0070 14/0/0 70 replace selected bits 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 08 0E 0E 8 . . 0008EE 0/0/0 8EE Halt 10 10 07 0D 10 7 : 0007D0 0/0/0 7D0 Halt 10 10 6E 00 00 be 000E00 0/0/0 E00 Halt 10 08 1F 16 10 8 £ 6 008F60 0/1/0 F60 copy registers 10 1A 16 10 10 10 6 00A600 0/1/1 600 replace registers 10 6E 00 00 00 be 00E000 0/1/3 0 Invalid 19 10 32 01 10 9 B 1 090210 9/0/0 210 multiply uniform radix 01 1C 10 10 10 1 + 01C000 1/1/2 0 subtract literal address 6E 00 00 00 00 be 01 01 1C 10 10 1 1 + 011C00 1/0/0 1C00 table look up 19 10 10 10 6E 9 be 09000E 9/0/0 E multiply uniform radix 10 10 10 19 02 9 2 000092 0/0/0 92 Halt 3B 10 10 1C 04 * + 4 1B00C4 27/0/0 C4 jump A = Z 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 19 13 16 9 3 6 000936 0/0/0 936 Halt 10 10 1C 1F 10 + £ 000CF0 0/0/0 CF0 Halt 10 10 6E 00 00 be 000E00 0/0/0 E00 Halt 10 19 04 02 10 9 4 2 009420 0/1/0 1420 copy registers 10 07 01 10 10 7 1 007100 0/0/3 1100 set radix 10 6E 00 00 00 be 00E000 0/1/3 0 Invalid 19 15 16 10 10 9 5 6 095600 9/0/2 1600 multiply uniform radix 0D 10 10 10 10 : 0D0000 13/0/0 0 divide uniform radix 6E 00 00 00 00 be 16 02 10 10 07 6 2 7 062007 6/0/1 7 select (N) 15 10 10 10 6E 5 be 05000E 5/0/0 E subtract (N) from (A) 10 10 10 19 07 9 7 000097 0/0/0 97 Halt 16 10 10 0D 01 6 : 1 0600D1 6/0/0 D1 select (N) 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 19 08 02 9 8 2 000982 0/0/0 982 Halt 10 10 08 04 10 8 4 000840 0/0/0 840 Halt 10 10 6E 00 00 be 000E00 0/0/0 E00 Halt 10 19 19 16 10 9 9 6 009960 0/1/0 1960 copy registers 10 0D 02 10 10 : 2 00D200 0/1/2 1200 replace (B) by (N) 10 6E 00 00 00 be 00E000 0/1/3 0 Invalid 19 1A 02 10 10 9 10 2 09A200 9/1/1 200 multiply uniform radix 1F 0B 10 10 10 £ 11 0FB000 15/1/1 1000 collate and add 6E 00 00 00 00 be 0B 16 08 10 0D 11 6 8 : 0B680D 11/0/3 80D multiply and subtract 08 10 10 10 6E 8 be 08000E 8/0/0 E merge constant length 10 10 10 19 1C 9 + 00009C 0/0/0 9C Halt 02 08 01 10 10 2 8 1 028100 2/1/0 100 transfer (A) to N 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 19 0D 38 9 : H 0009D8 0/0/0 9D8 Halt 16 10 1A 07 10 6 10 7 060A70 6/0/0 A70 select (N) 10 10 6E 00 00 be 000E00 0/0/0 E00 Halt 10 19 0E 16 10 9 . 6 009E60 0/1/0 1E60 copy registers 10 04 10 10 10 4 004000 0/0/2 0 replace (B) by (N) 10 6E 00 00 00 be 00E000 0/1/3 0 Invalid 19 1F 02 10 10 9 £ 2 09F200 9/1/3 1200 multiply uniform radix 08 13 10 10 10 8 3 083000 8/0/1 1000 merge constant length 6E 00 00 00 00 be 10 16 10 10 08 6 8 006008 0/0/3 8 set radix 04 10 10 10 6E 4 be 04000E 4/0/0 E add (N) to (A) 10 10 10 1A 01 10 1 0000A1 0/0/0 A1 Halt 38 16 10 1A 07 H 6 10 7 1860A7 24/0/3 A7 modify address of next 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 1A 02 02 10 2 2 000A22 0/0/0 A22 Halt 10 10 04 10 10 4 000400 0/0/0 400 Halt 10 10 6E 00 00 be 000E00 0/0/0 E00 Halt 10 1A 13 38 04 10 3 H 4 00A384 0/1/1 384 replace registers 10 0D 1A 10 10 : 10 00DA00 0/1/2 1A00 replace (B) by (N) 10 6E 00 00 00 be 00E000 0/1/3 0 Invalid 1A 04 38 16 10 10 4 H 6 0A4860 10/0/2 860 multiply and add 02 0E 10 10 10 2 . 02E000 2/1/3 0 transfer (A) to N 6E 00 00 00 00 be 15 2C 0D 1F 1F 5 ' : £ £ 05CDFF 5/1/2 DFF subtract (N) from (A) 0E 10 10 10 6E . be 0E000E 14/0/0 E replace selected bits 10 10 10 1A 16 10 6 0000A6 0/0/0 A6 Halt 38 08 10 10 19 H 8 9 188009 24/1/0 9 unconditional jump 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 1A 07 10 10 7 000A70 0/0/0 A70 Halt 02 10 1C 0E 10 2 + . 020CE0 2/0/0 CE0 transfer (A) to N 10 20 6E 00 00 - be 000E00 0/0/0 E00 Halt 10 1A 08 1F 1F 10 8 £ £ 00A8FF 0/1/1 8FF replace registers 1F 1F 1C 10 10 £ £ + 0FFC00 15/1/3 1C00 collate and add 10 6E 00 00 00 be 00E000 0/1/3 0 Invalid 1A 19 29 08 10 10 9 I 8 0A9980 10/1/0 1980 multiply and add 10 10 10 10 10 000000 0/0/0 0 Halt 6E 00 00 00 00 be 1A 2A 10 10 07 10 = 7 0AA007 10/1/1 7 multiply and add 19 10 10 10 6E 9 be 09000E 9/0/0 E multiply uniform radix 10 10 10 1A 0B 10 11 0000AB 0/0/0 AB Halt 1F 02 10 0E 0E £ 2 . . 0F20EE 15/0/1 EE collate and add 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 1A 1C 16 10 + 6 000AC6 0/0/0 AC6 Halt 08 01 10 10 10 8 1 081000 8/0/0 1000 merge constant length 10 10 6E 00 00 be 000E00 0/0/0 E00 Halt 10 1A 0D 10 02 10 : 2 00AD02 0/1/1 D02 replace registers 10 0D 04 10 10 : 4 00D400 0/1/2 1400 replace (B) by (N) 20 6E 00 00 00 - be 10E000 16/1/3 0 Invalid 1A 0E 19 02 16 10 . 9 2 6 0AE926 10/1/3 926 multiply and add 02 15 10 10 10 2 5 025000 2/0/2 1000 transfer (A) to N 6E 00 00 00 00 be 1F 02 04 13 01 £ 2 4 3 1 0F2431 15/0/1 431 collate and add 02 10 10 10 6E 2 be 02000E 2/0/0 E transfer (A) to N 10 10 10 0B 10 11 0000B0 0/0/0 B0 Halt 01 13 13 13 0E 1 3 3 3 . 01333E 1/0/1 133E prepare for digit collation 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 0B 01 10 11 1 000B10 0/0/0 B10 Halt 10 10 10 01 10 1 000010 0/0/0 10 Halt 10 10 6E 00 00 be 000E00 0/0/0 E00 Halt 10 0B 02 10 10 11 2 00B200 0/1/1 1200 replace registers 10 10 10 10 10 000000 0/0/0 0 Halt 10 6E 00 00 00 be 00E000 0/1/3 0 Invalid 0B 13 08 10 10 11 3 8 0B3800 11/0/1 1800 multiply and subtract 10 10 10 10 10 000000 0/0/0 0 Halt 6E 00 00 00 00 be 04 10 02 10 0D 4 2 : 04020D 4/0/0 20D add (N) to (A) 1A 10 10 20 6E 10 - be 0A000E 10/0/0 E multiply and add 10 10 10 0B 15 11 5 0000B5 0/0/0 B5 Halt 10 02 10 0D 04 2 : 4 0020D4 0/0/1 D4 Invalid 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 0B 16 13 11 6 3 000B63 0/0/0 B63 Halt 10 10 10 13 10 3 000030 0/0/0 30 Halt 10 10 6E 00 00 be 000E00 0/0/0 E00 Halt 10 0B 07 10 02 11 7 2 00B702 0/1/1 1702 replace registers 10 0D 04 10 10 : 4 00D400 0/1/2 1400 replace (B) by (N) 10 6E 00 00 00 be 00E000 0/1/3 0 Invalid 0B 08 13 10 13 11 8 3 3 0B8303 11/1/0 303 multiply and subtract 01 02 10 10 10 1 2 012000 1/0/1 0 prepare for digit collation 6E 00 00 00 00 be 19 10 10 10 08 9 8 090008 9/0/0 8 multiply uniform radix 1A 10 10 10 6E 10 be 0A000E 10/0/0 E multiply and add 10 10 10 0B 1A 11 10 0000BA 0/0/0 BA Halt 02 01 04 01 02 2 1 4 1 2 021412 2/0/0 1412 transfer (A) to N 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 0B 0B 10 11 11 000BB0 0/0/0 BB0 Halt 10 10 08 1A 10 8 10 0008A0 0/0/0 8A0 Halt 10 10 6E 00 00 be 000E00 0/0/0 E00 Halt 10 0B 1C 02 01 11 + 2 1 00BC21 0/1/1 1C21 replace registers 16 01 02 10 10 6 1 2 061200 6/0/0 1200 select (N) 10 6E 00 00 00 be 00E000 0/1/3 0 Invalid 0B 0D 10 10 10 11 : 0BD000 11/1/2 1000 multiply and subtract 08 1A 10 10 10 8 10 08A000 8/1/1 0 merge variable length 6E 00 00 00 00 be 0E 02 10 08 01 . 2 8 1 0E2081 14/0/1 81 replace selected bits 02 10 10 10 6E 2 be 02000E 2/0/0 E transfer (A) to N 10 10 10 0B 1F 11 £ 0000BF 0/0/0 BF Halt 10 02 10 0D 16 2 : 6 0020D6 0/0/1 D6 Invalid 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 1C 10 13 + 3 000C03 0/0/0 C03 Halt 10 02 01 02 10 2 1 2 002120 0/0/1 120 Invalid 10 10 6E 00 00 be 000E00 0/0/0 E00 Halt 10 1C 01 10 10 + 1 00C100 0/1/2 100 replace (B) by (N) 10 19 1C 10 10 9 + 009C00 0/1/0 1C00 copy registers 10 6E 00 00 00 be 00E000 0/1/3 0 Invalid 1C 02 10 01 10 + 2 1 0C2010 12/0/1 10 convert 01 02 10 10 10 1 2 012000 1/0/1 0 prepare for digit collation 6E 00 00 00 00 be 13 10 10 10 19 3 9 030009 3/0/0 9 copy (A) to N 1C 10 10 10 6E + be 0C000E 12/0/0 E convert 10 10 10 1C 04 + 4 0000C4 0/0/0 C4 Halt 10 10 02 01 02 2 1 2 000212 0/0/0 212 Halt 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 1C 15 10 + 5 000C50 0/0/0 C50 Halt 02 10 0D 16 10 2 : 6 020D60 2/0/0 D60 transfer (A) to N 10 10 6E 00 00 be 000E00 0/0/0 E00 Halt 10 1C 16 23 10 + 6 C 00C630 0/1/2 630 replace (B) by (N) 04 10 01 10 10 4 1 040100 4/0/0 100 add (N) to (A) 10 6E 00 00 00 be 00E000 0/1/3 0 Invalid 1C 07 10 02 10 + 7 2 0C7020 12/0/3 1020 convert 1F 16 10 10 20 £ 6 - 0F6000 15/0/3 0 collate and add 6E 00 00 00 00 be 08 10 01 1F 1F 8 1 £ £ 0801FF 8/0/0 1FF merge constant length 0E 10 10 10 6E . be 0E000E 14/0/0 E replace selected bits 10 10 10 1C 19 + 9 0000C9 0/0/0 C9 Halt 10 10 01 10 16 1 6 000106 0/0/0 106 Halt 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 1C 1A 16 + 10 6 000CA6 0/0/0 CA6 Halt 08 10 1F 16 10 8 £ 6 080F60 8/0/0 F60 merge constant length 10 10 6E 00 00 be 000E00 0/0/0 E00 Halt 10 1C 0B 38 16 + 11 H 6 00CB86 0/1/2 B86 replace (B) by (N) 10 02 0E 10 10 2 . 002E00 0/0/1 E00 Invalid 10 6E 00 00 00 be 00E000 0/1/3 0 Invalid 1C 1C 2C 01 1F + + ' 1 £ 0CCC1F 12/1/2 C1F convert 0E 10 10 10 10 . 0E0000 14/0/0 0 replace selected bits 6E 00 00 00 00 be 0D 2A 10 10 07 : = 7 0DA007 13/1/1 7 divide uniform radix 19 10 10 10 6E 9 be 09000E 9/0/0 E multiply uniform radix 10 10 10 1C 0E + . 0000CE 0/0/0 CE Halt 38 16 10 01 10 H 6 1 186010 24/0/3 10 modify address of next 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 1C 1F 02 + £ 2 000CF2 0/0/0 CF2 Halt 19 1F 0D 0E 10 9 £ : . 09FDE0 9/1/3 1DE0 multiply uniform radix 10 10 6E 00 00 be 000E00 0/0/0 E00 Halt 10 0D 10 38 08 : H 8 00D088 0/1/2 1088 replace (B) by (N) 10 15 07 10 10 5 7 005700 0/0/2 1700 replace (B) by (N) 10 6E 00 00 00 be 00E000 0/1/3 0 Invalid 0D 01 10 02 10 : 1 2 0D1020 13/0/0 1020 divide uniform radix 1A 16 10 10 40 10 6 & 0A6000 10/0/3 0 multiply and add 6E 00 00 00 00 be 02 10 02 10 1A 2 2 10 02020A 2/0/0 20A transfer (A) to N 16 10 10 20 6E 6 - be 06000E 6/0/0 E select (N) 10 10 10 0D 13 : 3 0000D3 0/0/0 D3 Halt 10 02 10 0E 1A 2 . 10 0020EA 0/0/1 EA Invalid 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 0D 04 10 : 4 000D40 0/0/0 D40 Halt 10 10 01 01 10 1 1 000110 0/0/0 110 Halt 10 10 6E 00 00 be 000E00 0/0/0 E00 Halt 10 0D 15 10 02 : 5 2 00D502 0/1/2 1502 replace (B) by (N) 10 0E 1A 10 10 . 10 00EA00 0/1/3 A00 Invalid 10 6E 00 00 00 be 00E000 0/1/3 0 Invalid 0D 16 10 13 01 : 6 3 1 0D6031 13/0/3 31 divide uniform radix 01 04 10 10 10 1 4 014000 1/0/2 0 round off 6E 00 00 00 00 be 07 10 02 10 0D 7 2 : 07020D 7/0/0 20D augment (N) by (A) 16 10 10 10 6E 6 be 06000E 6/0/0 E select (N) 10 10 10 0D 08 : 8 0000D8 0/0/0 D8 Halt 10 10 01 01 04 1 1 4 000114 0/0/0 114 Halt 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 0D 19 10 : 9 000D90 0/0/0 D90 Halt 02 10 0D 08 10 2 : 8 020D80 2/0/0 D80 transfer (A) to N 10 10 6E 00 00 be 000E00 0/0/0 E00 Halt 10 0D 1A 02 01 : 10 2 1 00DA21 0/1/2 1A21 replace (B) by (N) 01 13 02 10 10 1 3 2 013200 1/0/1 1200 prepare for digit collation 10 6E 00 00 00 be 00E000 0/1/3 0 Invalid 0D 0B 10 02 10 : 11 2 0DB020 13/1/1 1020 divide uniform radix 0D 08 10 10 10 : 8 0D8000 13/1/0 0 divide uniform radix 6E 00 00 00 00 be 1C 02 10 13 01 + 2 3 1 0C2031 12/0/1 31 convert 01 10 10 10 6E 1 be 01000E 1/0/0 E table look up 10 10 10 0D 0D : : 0000DD 0/0/0 DD Halt 10 02 10 0D 08 2 : 8 0020D8 0/0/1 D8 Invalid 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 0D 0E 02 : . 2 000DE2 0/0/0 DE2 Halt 10 04 01 01 10 4 1 1 004110 0/0/2 110 replace (B) by (N) 10 10 6E 00 00 be 000E00 0/0/0 E00 Halt 10 0D 1F 10 02 : £ 2 00DF02 0/1/2 1F02 replace (B) by (N) 10 0D 08 10 10 : 8 00D800 0/1/2 1800 replace (B) by (N) 10 6E 00 00 00 be 00E000 0/1/3 0 Invalid 0E 10 10 13 01 . 3 1 0E0031 14/0/0 31 replace selected bits 01 04 10 10 10 1 4 014000 1/0/2 0 round off 6E 00 00 00 00 be 01 10 02 10 0D 1 2 : 01020D 1/0/0 20D table look up 1A 10 10 10 6E 10 be 0A000E 10/0/0 E multiply and add 10 10 10 0E 02 . 2 0000E2 0/0/0 E2 Halt 02 01 01 13 02 2 1 1 3 2 021132 2/0/0 1132 transfer (A) to N 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 0E 13 10 . 3 000E30 0/0/0 E30 Halt 02 10 0D 1A 10 2 : 10 020DA0 2/0/0 DA0 transfer (A) to N 10 10 6E 00 00 be 000E00 0/0/0 E00 Halt 10 0E 04 02 10 . 4 2 00E420 0/1/3 420 Invalid 13 01 01 10 10 3 1 1 031100 3/0/0 1100 copy (A) to N 10 6E 00 00 00 be 00E000 0/1/3 0 Invalid 0E 15 10 02 10 . 5 2 0E5020 14/0/2 1020 replace selected bits 0D 1A 10 10 10 : 10 0DA000 13/1/1 0 divide uniform radix 6E 00 00 00 00 be 16 02 10 04 01 6 2 4 1 062041 6/0/1 41 select (N) 01 10 10 10 6E 1 be 01000E 1/0/0 E table look up 10 10 10 0E 07 . 7 0000E7 0/0/0 E7 Halt 10 02 10 0D 1A 2 : 10 0020DA 0/0/1 DA Invalid 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 0E 08 10 . 8 000E80 0/0/0 E80 Halt 13 01 01 04 10 3 1 1 4 031140 3/0/0 1140 copy (A) to N 10 10 6E 00 00 be 000E00 0/0/0 E00 Halt 10 0E 19 10 02 . 9 2 00E902 0/1/3 902 Invalid 10 0D 1C 10 10 : + 00DC00 0/1/2 1C00 replace (B) by (N) 10 6E 00 00 00 be 00E000 0/1/3 0 Invalid 0E 1A 02 01 01 . 10 2 1 1 0EA211 14/1/1 211 replace selected bits 13 02 10 10 10 3 2 032000 3/0/1 0 copy (A) to N 6E 00 00 00 00 be 0B 10 02 10 0D 11 2 : 0B020D 11/0/0 20D multiply and subtract 1C 10 10 10 6E + be 0C000E 12/0/0 E convert 10 10 10 0E 1C . + 0000EC 0/0/0 EC Halt 02 10 13 01 01 2 3 1 1 020311 2/0/0 311 transfer (A) to N 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 0E 0D 10 . : 000ED0 0/0/0 ED0 Halt 02 10 0D 1C 10 2 : + 020DC0 2/0/0 DC0 transfer (A) to N 10 10 6E 00 00 be 000E00 0/0/0 E00 Halt 10 0E 0E 02 10 . . 2 00EE20 0/1/3 E20 Invalid 04 01 01 10 10 4 1 1 041100 4/0/0 1100 add (N) to (A) 10 6E 00 00 00 be 00E000 0/1/3 0 Invalid 0E 1F 10 02 10 . £ 2 0EF020 14/1/3 1020 replace selected bits 0D 1C 10 10 10 : + 0DC000 13/1/2 0 divide uniform radix 6E 00 00 00 00 be 10 10 13 01 01 3 1 1 000311 0/0/0 311 Halt 04 10 10 10 6E 4 be 04000E 4/0/0 E add (N) to (A) 10 10 10 1F 01 £ 1 0000F1 0/0/0 F1 Halt 10 02 10 0D 0E 2 : . 0020DE 0/0/1 DE Invalid 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 1F 02 02 £ 2 2 000F22 0/0/0 F22 Halt 01 01 13 02 10 1 1 3 2 011320 1/0/0 1320 table look up 10 10 6E 00 00 be 000E00 0/0/0 E00 Halt 10 1F 13 10 02 £ 3 2 00F302 0/1/3 1302 Invalid 10 0D 0E 10 10 : . 00DE00 0/1/2 1E00 replace (B) by (N) 10 6E 00 00 00 be 00E000 0/1/3 0 Invalid 1F 04 02 10 13 £ 4 2 3 0F4203 15/0/2 203 collate and add 01 01 10 10 10 1 1 011000 1/0/0 1000 table look up 6E 00 00 00 00 be 15 10 02 10 0D 5 2 : 05020D 5/0/0 20D subtract (N) from (A) 0E 10 10 10 6E . be 0E000E 14/0/0 E replace selected bits 10 10 10 1F 16 £ 6 0000F6 0/0/0 F6 Halt 02 10 04 01 01 2 4 1 1 020411 2/0/0 411 transfer (A) to N 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 1F 07 10 £ 7 000F70 0/0/0 F70 Halt 02 10 0D 0E 10 2 : . 020DE0 2/0/0 DE0 transfer (A) to N 10 10 6E 00 00 be 000E00 0/0/0 E00 Halt 10 1F 08 10 13 £ 8 3 00F803 0/1/3 1803 Invalid 01 01 04 10 10 1 1 4 011400 1/0/0 1400 table look up 10 6E 00 00 00 be 00E000 0/1/3 0 Invalid 1F 19 10 02 10 £ 9 2 0F9020 15/1/0 1020 collate and add 0E 10 10 10 10 . 0E0000 14/0/0 0 replace selected bits 6E 00 00 00 00 be 1A 04 04 10 13 10 4 4 3 0A4403 10/0/2 403 multiply and add 15 10 10 10 6E 5 be 05000E 5/0/0 E subtract (N) from (A) 10 10 10 1F 0B £ 11 0000FB 0/0/0 FB Halt 10 02 10 0E 01 2 . 1 0020E1 0/0/1 E1 Invalid 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 1F 1C 04 £ + 4 000FC4 0/0/0 FC4 Halt 04 10 01 15 10 4 1 5 040150 4/0/0 150 add (N) to (A) 10 10 6E 00 00 be 000E00 0/0/0 E00 Halt 10 1F 0D 10 02 £ : 2 00FD02 0/1/3 1D02 Invalid 10 0E 02 10 10 . 2 00E200 0/1/3 200 Invalid 10 6E 00 00 00 be 00E000 0/1/3 0 Invalid 1F 0E 04 04 10 £ . 4 4 0FE440 15/1/3 440 collate and add 01 15 10 10 10 1 5 015000 1/0/2 1000 round off 6E 00 00 00 00 be 1F 10 02 10 0E £ 2 . 0F020E 15/0/0 20E collate and add 13 10 10 10 6E 3 be 03000E 3/0/0 E copy (A) to N 10 10 01 10 10 1 000100 0/0/0 100 Halt 04 04 10 01 15 4 4 1 5 044015 4/0/2 15 add (N) to (A) 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 01 10 01 10 1 1 001010 0/0/0 1010 Halt 02 10 0E 04 10 2 . 4 020E40 2/0/0 E40 transfer (A) to N 10 10 6E 00 00 be 000E00 0/0/0 E00 Halt 01 10 02 13 10 1 2 3 010230 1/0/0 230 table look up 10 02 15 10 10 2 5 002500 0/0/1 500 Invalid 10 6E 00 00 00 be 00E000 0/1/3 0 Invalid 10 13 10 02 10 3 2 003020 0/0/1 1020 Invalid 0E 16 10 10 10 . 6 0E6000 14/0/3 0 replace selected bits 6E 00 00 00 00 be 04 13 10 10 02 4 3 2 043002 4/0/1 1002 add (N) to (A) 15 10 10 10 6E 5 be 05000E 5/0/0 E subtract (N) from (A) 10 10 01 10 15 1 5 000105 0/0/0 105 Halt 10 02 10 0E 08 2 . 8 0020E8 0/0/1 E8 Invalid 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 01 10 16 10 1 6 001060 0/0/0 1060 Halt 10 04 02 01 10 4 2 1 004210 0/0/2 210 replace (B) by (N) 10 10 6E 00 00 be 000E00 0/0/0 E00 Halt 01 10 07 10 02 1 7 2 010702 1/0/0 702 table look up 10 0E 19 10 10 . 9 00E900 0/1/3 900 Invalid 10 6E 00 00 00 be 00E000 0/1/3 0 Invalid 10 08 10 10 04 8 4 008004 0/1/0 4 copy registers 01 01 10 10 10 1 1 011000 1/0/0 1000 table look up 6E 00 00 00 00 be 19 10 02 10 0E 9 2 . 09020E 9/0/0 20E multiply uniform radix 1C 10 10 10 6E + be 0C000E 12/0/0 E convert 10 10 01 10 1A 1 10 00010A 0/0/0 10A Halt 23 10 04 01 02 C 4 1 2 130412 19/0/0 412 output 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 01 10 0B 10 1 11 0010B0 0/0/0 10B0 Halt 02 10 0D 0E 10 2 : . 020DE0 2/0/0 DE0 transfer (A) to N 10 20 6E 00 00 - be 000E00 0/0/0 E00 Halt 01 10 1C 10 10 1 + 010C00 1/0/0 C00 table look up 10 10 10 10 10 000000 0/0/0 0 Halt 10 6E 00 00 00 be 00E000 0/1/3 0 Invalid 10 0D 10 10 10 : 00D000 0/1/2 1000 replace (B) by (N) 10 04 10 10 10 4 004000 0/0/2 0 replace (B) by (N) 6E 00 00 00 00 be 0E 10 10 10 10 . 0E0000 14/0/0 0 replace selected bits 10 10 10 10 6E be 00000E 0/0/0 E Halt 10 10 01 10 1F 1 £ 00010F 0/0/0 10F Halt 10 10 10 10 08 8 000008 0/0/0 8 Halt 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 01 01 10 0E 1 1 . 00110E 0/0/0 110E Halt 01 0E 01 0E 10 1 . 1 . 01E1E0 1/1/3 1E0 select literal address 10 10 6E 00 00 be 000E00 0/0/0 E00 Halt 01 01 01 31 0E 1 1 1 A . 01111E 1/0/0 111E table look up 01 0E 01 10 10 1 . 1 01E100 1/1/3 100 select literal address 10 6E 00 00 00 be 00E000 0/1/3 0 Invalid 01 02 10 02 10 1 2 2 012020 1/0/1 20 prepare for digit collation 02 10 10 10 10 2 020000 2/0/0 0 transfer (A) to N 6E 00 00 00 00 be 13 32 10 02 10 3 B 2 032020 3/0/1 20 copy (A) to N 02 10 10 10 6E 2 be 02000E 2/0/0 E transfer (A) to N 10 10 01 01 04 1 1 4 000114 0/0/0 114 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 01 01 15 02 1 1 5 2 001152 0/0/0 1152 Halt 10 01 08 10 10 1 8 001800 0/0/0 1800 Halt 10 10 6E 00 00 be 000E00 0/0/0 E00 Halt 01 01 16 10 10 1 1 6 011600 1/0/0 1600 table look up 10 10 01 10 10 1 000100 0/0/0 100 Halt 10 6E 00 00 00 be 00E000 0/1/3 0 Invalid 01 07 10 10 10 1 7 017000 1/0/3 1000 interchange area addresses 10 10 10 10 10 000000 0/0/0 0 Halt 6E 00 00 00 00 be 08 10 10 10 01 8 1 080001 8/0/0 1 merge constant length 16 10 10 10 6E 6 be 06000E 6/0/0 E select (N) 10 10 01 01 19 1 1 9 000119 0/0/0 119 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 01 01 1A 10 1 1 10 0011A0 0/0/0 11A0 Halt 10 02 15 16 10 2 5 6 002560 0/0/1 560 Invalid 10 10 6E 00 00 be 000E00 0/0/0 E00 Halt 01 01 0B 10 10 1 1 11 011B00 1/0/0 1B00 table look up 10 10 10 10 10 000000 0/0/0 0 Halt 10 6E 00 00 00 be 00E000 0/1/3 0 Invalid 01 1C 10 04 10 1 + 4 01C040 1/1/2 40 subtract literal address 19 16 10 10 10 9 6 096000 9/0/3 0 multiply uniform radix 6E 00 00 00 00 be 0D 10 10 10 10 : 0D0000 13/0/0 0 divide uniform radix 10 10 10 10 6E be 00000E 0/0/0 E Halt 10 10 01 01 0E 1 1 . 00011E 0/0/0 11E Halt 10 02 10 1F 10 2 £ 0020F0 0/0/1 F0 Invalid 10 10 20 6E 00 - be 0000E0 0/0/0 E0 Halt 10 01 01 1F 01 1 1 £ 1 0011F1 0/0/0 11F1 Halt 1F 10 10 10 10 £ 0F0000 15/0/0 0 collate and add 10 10 6E 00 00 be 000E00 0/0/0 E00 Halt 01 02 10 20 10 1 2 - 012000 1/0/1 0 prepare for digit collation 10 13 1F 10 10 3 £ 003F00 0/0/1 1F00 Invalid 10 6E 00 00 00 be 00E000 0/1/3 0 Invalid 02 01 16 16 16 2 1 6 6 6 021666 2/0/0 1666 transfer (A) to N 16 16 10 10 10 6 6 066000 6/0/3 0 select (N) 6E 00 00 00 00 be 02 10 1F 1F 1F 2 £ £ £ 020FFF 2/0/0 FFF transfer (A) to N 0E 10 10 10 6E . be 0E000E 14/0/0 E replace selected bits 10 10 01 02 13 1 2 3 000123 0/0/0 123 Halt 10 02 10 1F 08 2 £ 8 0020F8 0/0/1 F8 Invalid 10 10 70 6E 00 0 be 0000E0 0/0/0 E0 Halt 61 61 61 61 10 / / / / 011110 1/0/0 1110 table look up 19 10 10 15 32 9 5 B 090052 9/0/0 52 multiply uniform radix 02 13 10 01 6E 2 3 1 be 02301E 2/0/1 101E transfer (A) to N 01 00 00 00 00 1 010000 1/0/0 0 table look up File: old-paper-tapes/U9005-3.leo 16 70 70 19 70 6 0 0 9 0 060090 6/0/0 90 select (N) 02 70 70 70 01 2 0 0 0 1 020001 2/0/0 1 transfer (A) to N 10 10 10 10 70 0 000000 0/0/0 0 Halt 38 08 70 70 16 H 8 0 0 6 188006 24/1/0 6 unconditional jump 10 10 13 70 13 3 0 3 000303 0/0/0 303 Halt 10 01 1F 0D 1F 1 £ : £ 001FDF 0/0/0 1FDF Halt 10 10 10 02 70 2 0 000020 0/0/0 20 Halt 38 02 70 70 01 H 2 0 0 1 182001 24/0/1 1 modify address of next 2A 08 70 70 70 = 8 0 0 0 1A8000 26/1/0 0 test route N1 10 10 13 70 01 3 0 1 000301 0/0/0 301 Halt 38 08 70 70 16 H 8 0 0 6 188006 24/1/0 6 unconditional jump 38 08 70 70 13 H 8 0 0 3 188003 24/1/0 3 unconditional jump 10 10 13 70 15 3 0 5 000305 0/0/0 305 Halt 16 08 70 70 04 6 8 0 0 4 068004 6/1/0 4 select (N) 10 16 70 70 07 6 0 0 7 006007 0/0/3 7 set radix 2C 08 70 70 1F ' 8 0 0 £ 1C800F 28/1/0 F bulk copy alpha to short 6E 00 00 00 00 be 16 70 70 01 01 6 0 0 1 1 060011 6/0/0 11 select (N) 02 70 70 70 0D 2 0 0 0 : 02000D 2/0/0 D transfer (A) to N 38 02 70 01 1C H 2 0 1 + 18201C 24/0/1 1C modify address of next 16 70 70 01 0E 6 0 0 1 . 06001E 6/0/0 1E select (N) 15 70 70 01 1C 5 0 0 1 + 05001C 5/0/0 1C subtract (N) from (A) 01 1C 70 70 1F 1 + 0 0 £ 01C00F 1/1/2 F subtract literal address 3B 02 70 01 1A * 2 0 1 10 1B201A 27/0/1 1A jump A != Z 37 70 70 70 1F G 0 0 0 £ 17000F 23/0/0 F step on and test 10 02 70 01 1C 2 0 1 + 00201C 0/0/1 1C Invalid 38 08 70 70 01 H 8 0 0 1 188001 24/1/0 1 unconditional jump 38 08 70 04 0B H 8 0 4 11 18804B 24/1/0 4B unconditional jump 10 10 13 70 0E 3 0 . 00030E 0/0/0 30E Halt 38 08 70 01 1A H 8 0 1 10 18801A 24/1/0 1A unconditional jump 10 10 10 10 70 0 000000 0/0/0 0 Halt 10 10 10 04 0B 4 11 00004B 0/0/0 4B Halt 10 10 10 10 1F £ 00000F 0/0/0 F Halt 6E 00 00 00 00 be 10 10 10 10 70 0 000000 0/0/0 0 Halt 23 70 70 70 70 C 0 0 0 0 130000 19/0/0 0 output 2A 08 70 70 70 = 8 0 0 0 1A8000 26/1/0 0 test route N1 10 10 13 70 01 3 0 1 000301 0/0/0 301 Halt 38 08 70 70 1A H 8 0 0 10 18800A 24/1/0 A unconditional jump 38 08 70 02 07 H 8 0 2 7 188027 24/1/0 27 unconditional jump 10 10 13 70 15 3 0 5 000305 0/0/0 305 Halt 38 16 70 70 08 H 6 0 0 8 186008 24/0/3 8 modify address of next 16 19 1F 0D 1F 6 9 £ : £ 069FDF 6/1/0 1FDF select (N) 15 70 70 02 1A 5 0 0 2 10 05002A 5/0/0 2A subtract (N) from (A) 3B 02 70 02 08 * 2 0 2 8 1B2028 27/0/1 28 jump A != Z 01 0E 70 70 01 1 . 0 0 1 01E001 1/1/3 1 select literal address 07 70 70 02 1A 7 0 0 2 10 07002A 7/0/0 2A augment (N) by (A) 38 16 70 70 08 H 6 0 0 8 186008 24/0/3 8 modify address of next 16 19 1F 0E 01 6 9 £ . 1 069FE1 6/1/0 1FE1 select (N) 10 10 10 01 0E 1 . 00001E 0/0/0 1E Halt 6E 00 00 00 00 be 38 16 70 70 08 H 6 0 0 8 186008 24/0/3 8 modify address of next 38 13 1F 0E 13 H 3 £ . 3 183FE3 24/0/1 1FE3 modify address of next 38 08 70 01 1A H 8 0 1 10 18801A 24/1/0 1A unconditional jump 38 08 70 02 02 H 8 0 2 2 188022 24/1/0 22 unconditional jump 38 08 70 02 70 H 8 0 2 0 188020 24/1/0 20 unconditional jump 38 08 70 01 0E H 8 0 1 . 18801E 24/1/0 1E unconditional jump 23 0E 70 70 70 C . 0 0 0 13E000 19/1/3 0 step on/set manual 02 70 70 02 0B 2 0 0 2 11 02002B 2/0/0 2B transfer (A) to N 2A 02 70 02 0B = 2 0 2 11 1A202B 26/0/1 2B leave subroutine 02 70 70 02 0B 2 0 0 2 11 02002B 2/0/0 2B transfer (A) to N 38 08 70 70 19 H 8 0 0 9 188009 24/1/0 9 unconditional jump 38 16 70 02 0B H 6 0 2 11 18602B 24/0/3 2B modify address of next 02 70 70 70 70 2 0 0 0 0 020000 2/0/0 0 transfer (A) to N 01 0E 70 70 01 1 . 0 0 1 01E001 1/1/3 1 select literal address 07 70 70 02 0B 7 0 0 2 11 07002B 7/0/0 2B augment (N) by (A) 10 10 10 02 0D 2 : 00002D 0/0/0 2D Halt 6E 00 00 00 00 be 38 08 70 70 19 H 8 0 0 9 188009 24/1/0 9 unconditional jump 10 10 13 70 13 3 0 3 000303 0/0/0 303 Halt 10 10 13 70 0E 3 0 . 00030E 0/0/0 30E Halt 38 08 70 02 07 H 8 0 2 7 188027 24/1/0 27 unconditional jump 10 10 10 10 01 1 000001 0/0/0 1 Halt 10 10 10 10 70 0 000000 0/0/0 0 Halt 10 10 10 10 70 0 000000 0/0/0 0 Halt 10 10 10 10 70 0 000000 0/0/0 0 Halt 10 10 10 10 70 0 000000 0/0/0 0 Halt 10 10 10 10 70 0 000000 0/0/0 0 Halt 10 10 10 10 70 0 000000 0/0/0 0 Halt 10 10 10 10 70 0 000000 0/0/0 0 Halt 10 10 10 10 70 0 000000 0/0/0 0 Halt 10 10 10 10 70 0 000000 0/0/0 0 Halt 10 10 10 10 70 0 000000 0/0/0 0 Halt 10 10 10 13 1C 3 + 00003C 0/0/0 3C Halt 6E 00 00 00 00 be 16 70 70 70 01 6 0 0 0 1 060001 6/0/0 1 select (N) 01 02 70 70 13 1 2 0 0 3 012003 1/0/1 3 prepare for digit collation 0E 70 70 01 1F . 0 0 1 £ 0E001F 14/0/0 1F replace selected bits 0E 70 70 02 70 . 0 0 2 0 0E0020 14/0/0 20 replace selected bits 0E 70 70 13 13 . 0 0 3 3 0E0033 14/0/0 33 replace selected bits 10 16 70 01 0E 6 0 1 . 00601E 0/0/3 1E set radix 16 08 70 15 04 6 8 0 5 4 068054 6/1/0 54 select (N) 2C 70 70 70 08 ' 0 0 0 8 1C0008 28/0/0 8 bulk copy short numeric 38 08 70 70 19 H 8 0 0 9 188009 24/1/0 9 unconditional jump 10 02 70 01 0E 2 0 1 . 00201E 0/0/1 1E Invalid 10 10 10 02 04 2 4 000024 0/0/0 24 Halt 10 10 10 10 70 0 000000 0/0/0 0 Halt 10 10 10 10 70 0 000000 0/0/0 0 Halt 10 10 10 10 70 0 000000 0/0/0 0 Halt 10 10 10 10 70 0 000000 0/0/0 0 Halt 10 10 10 04 0B 4 11 00004B 0/0/0 4B Halt 6E 00 00 00 00 be 10 10 10 10 01 1 000001 0/0/0 1 Halt 10 02 70 02 0E 2 0 2 . 00202E 0/0/1 2E Invalid 10 10 20 6E 00 - be 0000E0 0/0/0 E0 Halt 10 10 10 10 02 2 000002 0/0/0 2 Halt 10 10 10 10 70 0 000000 0/0/0 0 Halt 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 10 10 13 3 000003 0/0/0 3 Halt 07 0E 70 70 70 7 . 0 0 0 07E000 7/1/3 0 augment (N) by (A) 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 10 10 04 4 000004 0/0/0 4 Halt 16 08 70 1C 70 6 8 0 + 0 0680C0 6/1/0 C0 select (N) 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 10 10 15 5 000005 0/0/0 5 Halt 04 70 70 0D 1A 4 0 0 : 10 0400DA 4/0/0 DA add (N) to (A) 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 10 10 16 6 000006 0/0/0 6 Halt 2C 02 70 0D 0D ' 2 0 : : 1C20DD 28/0/1 DD bulk copy short numeric 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 10 10 07 7 000007 0/0/0 7 Halt 02 08 70 1F 16 2 8 0 £ 6 0280F6 2/1/0 F6 transfer (A) to N 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 10 10 08 8 000008 0/0/0 8 Halt 38 16 70 0D 1A H 6 0 : 10 1860DA 24/0/3 DA modify address of next 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 10 10 19 9 000009 0/0/0 9 Halt 37 16 70 70 70 G 6 0 0 0 176000 23/0/3 0 select tag 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 10 10 1A 10 00000A 0/0/0 A Halt 13 70 70 1F 02 3 0 0 £ 2 0300F2 3/0/0 F2 copy (A) to N 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 10 10 0B 11 00000B 0/0/0 B Halt 15 70 70 1F 13 5 0 0 £ 3 0500F3 5/0/0 F3 subtract (N) from (A) 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 10 10 1C + 00000C 0/0/0 C Halt 3B 70 70 01 1C * 0 0 1 + 1B001C 27/0/0 1C jump A = Z 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 10 10 0D : 00000D 0/0/0 D Halt 02 70 70 1F 07 2 0 0 £ 7 0200F7 2/0/0 F7 transfer (A) to N 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 10 10 0E . 00000E 0/0/0 E Halt 38 16 70 0D 1A H 6 0 : 10 1860DA 24/0/3 DA modify address of next 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 10 10 1F £ 00000F 0/0/0 F Halt 37 16 70 70 02 G 6 0 0 2 176002 23/0/3 2 select tag 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 10 01 70 1 0 000010 0/0/0 10 Halt 13 70 70 1F 13 3 0 0 £ 3 0300F3 3/0/0 F3 copy (A) to N 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 10 01 01 1 1 000011 0/0/0 11 Halt 15 70 70 1F 02 5 0 0 £ 2 0500F2 5/0/0 F2 subtract (N) from (A) 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 10 01 02 1 2 000012 0/0/0 12 Halt 3B 70 70 02 02 * 0 0 2 2 1B0022 27/0/0 22 jump A = Z 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 10 01 13 1 3 000013 0/0/0 13 Halt 02 70 70 1F 07 2 0 0 £ 7 0200F7 2/0/0 F7 transfer (A) to N 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 10 01 04 1 4 000014 0/0/0 14 Halt 02 70 70 1C 02 2 0 0 + 2 0200C2 2/0/0 C2 transfer (A) to N 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 10 01 15 1 5 000015 0/0/0 15 Halt 38 02 70 1C 02 H 2 0 + 2 1820C2 24/0/1 C2 modify address of next 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 10 01 16 1 6 000016 0/0/0 16 Halt 16 08 70 0D 1C 6 8 0 : + 0680DC 6/1/0 DC select (N) 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 10 01 07 1 7 000017 0/0/0 17 Halt 3B 70 70 13 1A * 0 0 3 10 1B003A 27/0/0 3A jump A = Z 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 10 01 08 1 8 000018 0/0/0 18 Halt 02 08 70 1F 04 2 8 0 £ 4 0280F4 2/1/0 F4 transfer (A) to N 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 10 01 19 1 9 000019 0/0/0 19 Halt 10 04 70 0D 02 4 0 : 2 0040D2 0/0/2 D2 replace (B) by (N) 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 10 01 1A 1 10 00001A 0/0/0 1A Halt 1F 70 70 1F 15 £ 0 0 £ 5 0F00F5 15/0/0 F5 collate and add 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 10 01 0B 1 11 00001B 0/0/0 1B Halt 32 01 70 01 0D B 1 0 1 : 12101D 18/0/0 101D shift logical 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 10 01 1C 1 + 00001C 0/0/0 1C Halt 2A 70 70 08 70 = 0 0 8 0 1A0080 26/0/0 80 enter subroutine 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 10 01 0D 1 : 00001D 0/0/0 1D Halt 10 1C 70 1F 15 + 0 £ 5 00C0F5 0/1/2 F5 replace (B) by (N) 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 10 01 0E 1 . 00001E 0/0/0 1E Halt 02 70 70 1F 04 2 0 0 £ 4 0200F4 2/0/0 F4 transfer (A) to N 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 10 01 1F 1 £ 00001F 0/0/0 1F Halt 32 08 70 70 16 B 8 0 0 6 128006 18/1/0 6 shift logical 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 10 02 70 2 0 000020 0/0/0 20 Halt 16 70 70 1F 04 6 0 0 £ 4 0600F4 6/0/0 F4 select (N) 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 10 02 01 2 1 000021 0/0/0 21 Halt 32 16 70 70 13 B 6 0 0 3 126003 18/0/3 3 shift binary 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 10 02 02 2 2 000022 0/0/0 22 Halt 32 0E 70 70 01 B . 0 0 1 12E001 18/1/3 1 shift binary 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 10 02 13 2 3 000023 0/0/0 23 Halt 32 16 70 70 02 B 6 0 0 2 126002 18/0/3 2 shift binary 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 10 02 04 2 4 000024 0/0/0 24 Halt 32 0E 70 70 02 B . 0 0 2 12E002 18/1/3 2 shift binary 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 10 02 15 2 5 000025 0/0/0 25 Halt 02 70 70 1F 15 2 0 0 £ 5 0200F5 2/0/0 F5 transfer (A) to N 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 10 02 16 2 6 000026 0/0/0 26 Halt 32 0E 70 70 0D B . 0 0 : 12E00D 18/1/3 D shift binary 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 10 02 07 2 7 000027 0/0/0 27 Halt 2A 70 70 08 70 = 0 0 8 0 1A0080 26/0/0 80 enter subroutine 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 10 02 08 2 8 000028 0/0/0 28 Halt 02 70 70 1F 04 2 0 0 £ 4 0200F4 2/0/0 F4 transfer (A) to N 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 10 02 19 2 9 000029 0/0/0 29 Halt 16 08 70 1F 04 6 8 0 £ 4 0680F4 6/1/0 F4 select (N) 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 10 02 1A 2 10 00002A 0/0/0 2A Halt 38 02 70 1C 02 H 2 0 + 2 1820C2 24/0/1 C2 modify address of next 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 10 02 0B 2 11 00002B 0/0/0 2B Halt 02 08 70 0D 1C 2 8 0 : + 0280DC 2/1/0 DC transfer (A) to N 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 10 02 1C 2 + 00002C 0/0/0 2C Halt 37 70 70 70 02 G 0 0 0 2 170002 23/0/0 2 step on and test 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 10 02 0D 2 : 00002D 0/0/0 2D Halt 10 02 70 1C 02 2 0 + 2 0020C2 0/0/1 C2 Invalid 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 10 02 0E 2 . 00002E 0/0/0 2E Halt 38 08 70 02 13 H 8 0 2 3 188023 24/1/0 23 unconditional jump 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 10 02 1F 2 £ 00002F 0/0/0 2F Halt 16 70 70 1F 07 6 0 0 £ 7 0600F7 6/0/0 F7 select (N) 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 10 13 70 3 0 000030 0/0/0 30 Halt 3B 70 70 16 70 * 0 0 6 0 1B0060 27/0/0 60 jump A = Z 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 10 13 01 3 1 000031 0/0/0 31 Halt 10 02 70 15 0D 2 0 5 : 00205D 0/0/1 5D Invalid 10 10 20 6E 00 - be 0000E0 0/0/0 E0 Halt 10 10 10 13 02 3 2 000032 0/0/0 32 Halt 16 08 70 1C 70 6 8 0 + 0 0680C0 6/1/0 C0 select (N) 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 10 13 13 3 3 000033 0/0/0 33 Halt 04 70 70 0D 1A 4 0 0 : 10 0400DA 4/0/0 DA add (N) to (A) 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 10 13 04 3 4 000034 0/0/0 34 Halt 2C 70 70 0E 1A ' 0 0 . 10 1C00EA 28/0/0 EA bulk copy short numeric 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 10 13 15 3 5 000035 0/0/0 35 Halt 16 08 70 0E 1A 6 8 0 . 10 0680EA 6/1/0 EA select (N) 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 10 13 16 3 6 000036 0/0/0 36 Halt 2A 70 70 16 07 = 0 0 6 7 1A0067 26/0/0 67 enter subroutine 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 10 13 07 3 7 000037 0/0/0 37 Halt 02 08 70 0E 0E 2 8 0 . . 0280EE 2/1/0 EE transfer (A) to N 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 10 13 08 3 8 000038 0/0/0 38 Halt 16 08 70 0E 1C 6 8 0 . + 0680EC 6/1/0 EC select (N) 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 10 13 19 3 9 000039 0/0/0 39 Halt 2A 70 70 16 07 = 0 0 6 7 1A0067 26/0/0 67 enter subroutine 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 10 13 1A 3 10 00003A 0/0/0 3A Halt 02 08 70 1F 70 2 8 0 £ 0 0280F0 2/1/0 F0 transfer (A) to N 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 10 13 0B 3 11 00003B 0/0/0 3B Halt 38 02 70 0D 1A H 2 0 : 10 1820DA 24/0/1 DA modify address of next 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 10 13 1C 3 + 00003C 0/0/0 3C Halt 01 0E 70 70 70 1 . 0 0 0 01E000 1/1/3 0 select literal address 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 10 13 0D 3 : 00003D 0/0/0 3D Halt 2A 70 70 08 70 = 0 0 8 0 1A0080 26/0/0 80 enter subroutine 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 10 13 0E 3 . 00003E 0/0/0 3E Halt 02 70 70 1F 04 2 0 0 £ 4 0200F4 2/0/0 F4 transfer (A) to N 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 10 13 1F 3 £ 00003F 0/0/0 3F Halt 10 04 70 0D 1A 4 0 : 10 0040DA 0/0/2 DA replace (B) by (N) 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 10 04 70 4 0 000040 0/0/0 40 Halt 32 0E 70 01 0B B . 0 1 11 12E01B 18/1/3 1B shift binary 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 10 04 01 4 1 000041 0/0/0 41 Halt 32 70 70 70 04 B 0 0 0 4 120004 18/0/0 4 shift logical 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 04 02 07 4 2 7 000427 0/0/0 427 Halt 70 70 1F 04 10 0 0 £ 4 000F40 0/0/0 F40 Halt 10 10 6E 00 00 be 000E00 0/0/0 E00 Halt 10 04 13 10 02 4 3 2 004302 0/0/2 302 replace (B) by (N) 70 16 0E 10 10 0 6 . 006E00 0/0/3 E00 set radix 20 6E 00 00 00 - be 10E000 16/1/3 0 Invalid 04 04 16 70 70 4 4 6 0 0 044600 4/0/2 600 add (N) to (A) 16 16 10 10 10 6 6 066000 6/0/3 0 select (N) 6E 00 00 00 00 be 15 38 16 70 01 5 H 6 0 1 058601 5/1/0 601 subtract (N) from (A) 70 10 10 10 6E 0 be 00000E 0/0/0 E Halt 10 10 10 04 16 4 6 000046 0/0/0 46 Halt 02 70 70 70 70 2 0 0 0 0 020000 2/0/0 0 transfer (A) to N 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 04 07 2A 4 7 = 00047A 0/0/0 47A Halt 70 70 07 19 10 0 0 7 9 000790 0/0/0 790 Halt 10 10 6E 00 00 be 000E00 0/0/0 E00 Halt 10 04 08 38 04 4 8 H 4 004884 0/0/2 884 replace (B) by (N) 70 08 08 10 10 0 8 8 008800 0/1/0 800 copy registers 10 6E 00 00 00 be 00E000 0/1/3 0 Invalid 04 19 38 16 70 4 9 H 6 0 049860 4/1/0 1860 add (N) to (A) 01 70 10 10 10 1 0 010000 1/0/0 0 table look up 6E 00 00 00 00 be 1A 2C 0D 1F 0E 10 ' : £ . 0ACDFE 10/1/2 DFE multiply and add 70 10 10 10 6E 0 be 00000E 0/0/0 E Halt 10 10 10 04 0B 4 11 00004B 0/0/0 4B Halt 38 08 70 15 1C H 8 0 5 + 18805C 24/1/0 5C unconditional jump 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 04 1C 16 4 + 6 0004C6 0/0/0 4C6 Halt 08 70 1C 08 10 8 0 + 8 080C80 8/0/0 C80 merge constant length 10 10 6E 00 00 be 000E00 0/0/0 E00 Halt 10 04 0D 2C 1A 4 : ' 10 004DCA 0/0/2 DCA replace (B) by (N) 70 1F 08 10 10 0 £ 8 00F800 0/1/3 1800 Invalid 10 6E 00 00 00 be 00E000 0/1/3 0 Invalid 04 0E 01 1F 1F 4 . 1 £ £ 04E1FF 4/1/3 1FF add (N) to (A) 0D 0E 10 10 10 : . 0DE000 13/1/3 0 divide uniform radix 6E 00 00 00 00 be 1F 3D 02 70 1F £ ? 2 0 £ 0FD20F 15/1/2 120F collate and add 08 10 10 10 6E 8 be 08000E 8/0/0 E merge constant length 10 10 10 15 70 5 0 000050 0/0/0 50 Halt 23 70 70 70 70 C 0 0 0 0 130000 19/0/0 0 output 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 15 01 16 5 1 6 000516 0/0/0 516 Halt 70 70 16 15 10 0 0 6 5 000650 0/0/0 650 Halt 10 10 6E 00 00 be 000E00 0/0/0 E00 Halt 10 15 02 38 16 5 2 H 6 005286 0/0/2 1286 replace (B) by (N) 70 01 70 10 10 0 1 0 001000 0/0/0 1000 Halt 10 6E 00 00 00 be 00E000 0/1/3 0 Invalid 15 13 02 70 70 5 3 2 0 0 053200 5/0/1 1200 subtract (N) from (A) 70 70 10 10 10 0 0 000000 0/0/0 0 Halt 6E 00 00 00 00 be 04 37 70 70 70 4 G 0 0 0 047000 4/0/3 1000 add (N) to (A) 04 10 10 10 6E 4 be 04000E 4/0/0 E add (N) to (A) 10 10 10 15 15 5 5 000055 0/0/0 55 Halt 10 02 70 0D 1A 2 0 : 10 0020DA 0/0/1 DA Invalid 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 15 16 38 5 6 H 000568 0/0/0 568 Halt 08 70 01 02 10 8 0 1 2 080120 8/0/0 120 merge constant length 10 10 6E 00 00 be 000E00 0/0/0 E00 Halt 10 15 07 38 08 5 7 H 8 005788 0/0/2 1788 replace (B) by (N) 70 0E 15 10 10 0 . 5 00E500 0/1/3 500 Invalid 10 6E 00 00 00 be 00E000 0/1/3 0 Invalid 15 08 38 08 70 5 8 H 8 0 058880 5/1/0 880 subtract (N) from (A) 16 13 10 10 10 6 3 063000 6/0/1 1000 select (N) 6E 00 00 00 00 be 19 10 10 10 10 9 090000 9/0/0 0 multiply uniform radix 70 10 10 10 6E 0 be 00000E 0/0/0 E Halt 10 10 10 15 1A 5 10 00005A 0/0/0 5A Halt 1F 01 1F 0D 0E £ 1 £ : . 0F1FDE 15/0/0 1FDE collate and add 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 15 0B 10 5 11 0005B0 0/0/0 5B0 Halt 02 70 08 15 10 2 0 8 5 020850 2/0/0 850 transfer (A) to N 10 20 6E 00 00 - be 000E00 0/0/0 E00 Halt 10 15 1C 10 10 5 + 005C00 0/0/2 1C00 replace (B) by (N) 10 10 70 10 10 0 000000 0/0/0 0 Halt 10 6E 00 00 00 be 00E000 0/1/3 0 Invalid 15 0D 02 08 70 5 : 2 8 0 05D280 5/1/2 1280 subtract (N) from (A) 1F 04 10 10 10 £ 4 0F4000 15/0/2 0 collate and add 6E 00 00 00 00 be 0E 01 02 04 70 . 1 2 4 0 0E1240 14/0/0 1240 replace selected bits 70 10 10 10 6E 0 be 00000E 0/0/0 E Halt 10 10 10 15 1F 5 £ 00005F 0/0/0 5F Halt 0E 08 70 1F 04 . 8 0 £ 4 0E80F4 14/1/0 F4 replace selected bits 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 16 70 10 6 0 000600 0/0/0 600 Halt 04 70 0D 13 10 4 0 : 3 040D30 4/0/0 D30 add (N) to (A) 10 10 6E 00 00 be 000E00 0/0/0 E00 Halt 10 16 01 1F 08 6 1 £ 8 0061F8 0/0/3 1F8 set radix 70 1F 04 10 10 0 £ 4 00F400 0/1/3 1400 Invalid 10 6E 00 00 00 be 00E000 0/1/3 0 Invalid 16 02 1F 08 70 6 2 £ 8 0 062F80 6/0/1 F80 select (N) 1C 04 10 10 10 + 4 0C4000 12/0/2 0 convert 6E 00 00 00 00 be 13 3B 70 70 07 3 * 0 0 7 03B007 3/1/1 1007 copy (A) to N 01 10 10 10 6E 1 be 01000E 1/0/0 E table look up 10 10 10 16 04 6 4 000064 0/0/0 64 Halt 1F 08 70 1C 16 £ 8 0 + 6 0F80C6 15/1/0 C6 collate and add 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 16 15 3B 6 5 * 00065B 0/0/0 65B Halt 02 70 07 04 10 2 0 7 4 020740 2/0/0 740 transfer (A) to N 10 10 6E 00 00 be 000E00 0/0/0 E00 Halt 10 16 16 0E 08 6 6 . 8 0066E8 0/0/3 6E8 set radix 70 1F 04 10 10 0 £ 4 00F400 0/1/3 1400 Invalid 10 6E 00 00 00 be 00E000 0/1/3 0 Invalid 16 07 01 0E 70 6 7 1 . 0 0671E0 6/0/3 11E0 select (N) 15 0B 10 10 10 5 11 05B000 5/1/1 1000 subtract (N) from (A) 6E 00 00 00 00 be 08 02 70 70 1F 8 2 0 0 £ 08200F 8/0/1 F merge constant length 16 10 10 10 6E 6 be 06000E 6/0/0 E select (N) 10 10 10 16 19 6 9 000069 0/0/0 69 Halt 32 08 70 70 02 B 8 0 0 2 128002 18/1/0 2 shift logical 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 16 1A 01 6 10 1 0006A1 0/0/0 6A1 Halt 0E 70 70 70 10 . 0 0 0 0E0000 14/0/0 0 replace selected bits 10 10 6E 00 00 be 000E00 0/0/0 E00 Halt 10 16 0B 3B 1A 6 11 * 10 006BBA 0/0/3 BBA set radix 70 16 1C 10 10 0 6 + 006C00 0/0/3 C00 set radix 10 6E 00 00 00 be 00E000 0/1/3 0 Invalid 16 1C 16 08 70 6 + 6 8 0 06C680 6/1/2 680 select (N) 1F 04 10 10 10 £ 4 0F4000 15/0/2 0 collate and add 6E 00 00 00 00 be 0D 2A 02 70 16 : = 2 0 6 0DA206 13/1/1 206 divide uniform radix 07 10 10 10 6E 7 be 07000E 7/0/0 E augment (N) by (A) 10 10 10 16 0E 6 . 00006E 0/0/0 6E Halt 10 02 70 19 07 2 0 9 7 002097 0/0/1 97 Invalid 10 10 20 6E 00 - be 0000E0 0/0/0 E0 Halt 10 10 16 1F 10 6 £ 0006F0 0/0/0 6F0 Halt 10 10 10 70 10 0 000000 0/0/0 0 Halt 10 10 6E 00 00 be 000E00 0/0/0 E00 Halt 10 07 70 2A 08 7 0 = 8 0070A8 0/0/3 10A8 set radix 70 70 70 10 10 0 0 0 000000 0/0/0 0 Halt 10 6E 00 00 00 be 00E000 0/1/3 0 Invalid 07 01 10 10 1F 7 1 £ 07100F 7/0/0 100F augment (N) by (A) 70 01 10 10 10 0 1 001000 0/0/0 1000 Halt 6E 00 00 00 00 be 02 38 08 70 07 2 H 8 0 7 028807 2/1/0 807 transfer (A) to N 1A 10 10 10 6E 10 be 0A000E 10/0/0 E multiply and add 10 10 10 07 13 7 3 000073 0/0/0 73 Halt 38 16 70 0D 15 H 6 0 : 5 1860D5 24/0/3 D5 modify address of next 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 07 04 10 7 4 000740 0/0/0 740 Halt 10 1F 70 15 10 £ 0 5 00F050 0/1/3 1050 Invalid 10 10 6E 00 00 be 000E00 0/0/0 E00 Halt 10 07 15 2A 02 7 5 = 2 0075A2 0/0/3 15A2 set radix 70 07 19 10 10 0 7 9 007900 0/0/3 1900 set radix 10 6E 00 00 00 be 00E000 0/1/3 0 Invalid 07 16 10 10 10 7 6 076000 7/0/3 0 augment (N) by (A) 10 70 10 10 10 0 000000 0/0/0 0 Halt 6E 00 00 00 00 be 07 02 70 70 07 7 2 0 0 7 072007 7/0/1 7 augment (N) by (A) 19 10 10 10 6E 9 be 09000E 9/0/0 E multiply uniform radix 10 10 10 07 08 7 8 000078 0/0/0 78 Halt 10 16 70 0D 04 6 0 : 4 0060D4 0/0/3 D4 set radix 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 07 19 38 7 9 H 000798 0/0/0 798 Halt 04 70 1C 1A 10 4 0 + 10 040CA0 4/0/0 CA0 add (N) to (A) 10 10 6E 00 00 be 000E00 0/0/0 E00 Halt 10 07 1A 13 70 7 10 3 0 007A30 0/0/3 1A30 set radix 70 1F 07 10 10 0 £ 7 00F700 0/1/3 1700 Invalid 10 6E 00 00 00 be 00E000 0/1/3 0 Invalid 07 0B 1C 70 70 7 11 + 0 0 07BC00 7/1/1 1C00 augment (N) by (A) 07 19 10 10 10 7 9 079000 7/1/0 1000 augment (N) by (A) 6E 00 00 00 00 be 1C 10 16 70 01 + 6 0 1 0C0601 12/0/0 601 convert 70 10 10 10 6E 0 be 00000E 0/0/0 E Halt 10 10 10 07 0D 7 : 00007D 0/0/0 7D Halt 2A 02 70 08 70 = 2 0 8 0 1A2080 26/0/1 80 leave subroutine 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 07 0E 10 7 . 0007E0 0/0/0 7E0 Halt 02 70 1A 16 10 2 0 10 6 020A60 2/0/0 A60 transfer (A) to N 10 20 6E 00 00 - be 000E00 0/0/0 E00 Halt 10 07 1F 38 16 7 £ H 6 007F86 0/0/3 1F86 set radix 70 02 0E 10 10 0 2 . 002E00 0/0/1 E00 Invalid 10 6E 00 00 00 be 00E000 0/1/3 0 Invalid 08 70 16 70 70 8 0 6 0 0 080600 8/0/0 600 merge constant length 19 19 10 10 10 9 9 099000 9/1/0 1000 multiply uniform radix 6E 00 00 00 00 be 01 02 70 70 1A 1 2 0 0 10 01200A 1/0/1 A prepare for digit collation 16 10 10 10 6E 6 be 06000E 6/0/0 E select (N) 10 10 10 08 02 8 2 000082 0/0/0 82 Halt 01 02 70 70 08 1 2 0 0 8 012008 1/0/1 8 prepare for digit collation 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 08 13 1F 8 3 £ 00083F 0/0/0 83F Halt 70 70 1A 16 10 0 0 10 6 000A60 0/0/0 A60 Halt 10 10 6E 00 00 be 000E00 0/0/0 E00 Halt 10 08 04 02 70 8 4 2 0 008420 0/1/0 420 copy registers 70 1F 19 10 10 0 £ 9 00F900 0/1/3 1900 Invalid 10 6E 00 00 00 be 00E000 0/1/3 0 Invalid 08 15 01 02 70 8 5 1 2 0 085120 8/0/2 1120 merge constant length 70 04 10 10 10 0 4 004000 0/0/2 0 replace (B) by (N) 6E 00 00 00 00 be 16 1F 70 70 1A 6 £ 0 0 10 06F00A 6/1/3 100A select (N) 16 10 10 10 6E 6 be 06000E 6/0/0 E select (N) 10 10 10 08 07 8 7 000087 0/0/0 87 Halt 32 70 70 70 01 B 0 0 0 1 120001 18/0/0 1 shift logical 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 08 08 07 8 8 7 000887 0/0/0 887 Halt 70 70 1F 15 10 0 0 £ 5 000F50 0/0/0 F50 Halt 10 10 6E 00 00 be 000E00 0/0/0 E00 Halt 10 08 19 16 70 8 9 6 0 008960 0/1/0 960 copy registers 70 0D 02 10 10 0 : 2 00D200 0/1/2 1200 replace (B) by (N) 10 6E 00 00 00 be 00E000 0/1/3 0 Invalid 08 1A 02 70 70 8 10 2 0 0 08A200 8/1/1 200 merge variable length 1F 08 10 10 10 £ 8 0F8000 15/1/0 0 collate and add 6E 00 00 00 00 be 0B 01 02 70 70 11 1 2 0 0 0B1200 11/0/0 1200 multiply and subtract 13 10 10 10 6E 3 be 03000E 3/0/0 E copy (A) to N 10 10 10 08 1C 8 + 00008C 0/0/0 8C Halt 1F 70 70 1A 16 £ 0 0 10 6 0F00A6 15/0/0 A6 collate and add 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 08 0D 13 8 : 3 0008D3 0/0/0 8D3 Halt 70 70 1A 07 10 0 0 10 7 000A70 0/0/0 A70 Halt 10 10 6E 00 00 be 000E00 0/0/0 E00 Halt 10 08 0E 0E 70 8 . . 0 008EE0 0/1/0 EE0 copy registers 70 07 1A 10 10 0 7 10 007A00 0/0/3 1A00 set radix 10 6E 00 00 00 be 00E000 0/1/3 0 Invalid 08 1F 0E 70 70 8 £ . 0 0 08FE00 8/1/3 1E00 merge variable length 19 08 10 10 10 9 8 098000 9/1/0 0 multiply uniform radix 6E 00 00 00 00 be 70 01 1A 70 04 0 1 10 0 4 001A04 0/0/0 1A04 Halt 70 10 10 10 6E 0 be 00000E 0/0/0 E Halt 10 10 10 19 01 9 1 000091 0/0/0 91 Halt 0E 70 70 07 70 . 0 0 7 0 0E0070 14/0/0 70 replace selected bits 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 19 02 0E 9 2 . 00092E 0/0/0 92E Halt 70 70 07 0D 10 0 0 7 : 0007D0 0/0/0 7D0 Halt 10 10 6E 00 00 be 000E00 0/0/0 E00 Halt 10 19 13 16 70 9 3 6 0 009360 0/1/0 1360 copy registers 70 1A 16 10 10 0 10 6 00A600 0/1/1 600 replace registers 10 6E 00 00 00 be 00E000 0/1/3 0 Invalid 19 04 32 01 70 9 4 B 1 0 094210 9/0/2 210 multiply uniform radix 01 1C 10 10 10 1 + 01C000 1/1/2 0 subtract literal address 6E 00 00 00 00 be 15 01 1C 70 70 5 1 + 0 0 051C00 5/0/0 1C00 subtract (N) from (A) 19 10 10 10 6E 9 be 09000E 9/0/0 E multiply uniform radix 10 10 10 19 16 9 6 000096 0/0/0 96 Halt 3B 70 70 1C 08 * 0 0 + 8 1B00C8 27/0/0 C8 jump A = Z 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 19 07 16 9 7 6 000976 0/0/0 976 Halt 70 70 0D 13 10 0 0 : 3 000D30 0/0/0 D30 Halt 10 10 6E 00 00 be 000E00 0/0/0 E00 Halt 10 19 08 02 70 9 8 2 0 009820 0/1/0 1820 copy registers 70 07 01 10 10 0 7 1 007100 0/0/3 1100 set radix 10 6E 00 00 00 be 00E000 0/1/3 0 Invalid 19 19 16 70 70 9 9 6 0 0 099600 9/1/0 1600 multiply uniform radix 0D 04 10 10 10 : 4 0D4000 13/0/2 0 divide uniform radix 6E 00 00 00 00 be 1A 02 70 70 07 10 2 0 0 7 0A2007 10/0/1 7 multiply and add 15 10 10 10 6E 5 be 05000E 5/0/0 E subtract (N) from (A) 10 10 10 19 0B 9 11 00009B 0/0/0 9B Halt 16 70 70 0D 15 6 0 0 : 5 0600D5 6/0/0 D5 select (N) 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 19 1C 02 9 + 2 0009C2 0/0/0 9C2 Halt 70 70 08 04 10 0 0 8 4 000840 0/0/0 840 Halt 10 10 6E 00 00 be 000E00 0/0/0 E00 Halt 10 19 0D 16 70 9 : 6 0 009D60 0/1/0 1D60 copy registers 70 0D 16 10 10 0 : 6 00D600 0/1/2 1600 replace (B) by (N) 10 6E 00 00 00 be 00E000 0/1/3 0 Invalid 19 0E 02 70 70 9 . 2 0 0 09E200 9/1/3 200 multiply uniform radix 1F 1F 10 10 10 £ £ 0FF000 15/1/3 1000 collate and add 6E 00 00 00 00 be 1F 16 08 70 0D £ 6 8 0 : 0F680D 15/0/3 80D collate and add 1C 10 10 10 6E + be 0C000E 12/0/0 E convert 10 10 10 1A 70 10 0 0000A0 0/0/0 A0 Halt 02 08 01 70 04 2 8 1 0 4 028104 2/1/0 104 transfer (A) to N 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 1A 01 38 10 1 H 000A18 0/0/0 A18 Halt 16 70 1A 07 10 6 0 10 7 060A70 6/0/0 A70 select (N) 10 10 6E 00 00 be 000E00 0/0/0 E00 Halt 10 1A 02 16 70 10 2 6 0 00A260 0/1/1 260 replace registers 70 04 70 10 10 0 4 0 004000 0/0/2 0 replace (B) by (N) 10 6E 00 00 00 be 00E000 0/1/3 0 Invalid 1A 13 02 70 70 10 3 2 0 0 0A3200 10/0/1 1200 multiply and add 08 13 10 10 10 8 3 083000 8/0/1 1000 merge constant length 6E 00 00 00 00 be 04 16 70 70 08 4 6 0 0 8 046008 4/0/3 8 add (N) to (A) 04 10 10 10 6E 4 be 04000E 4/0/0 E add (N) to (A) 10 10 10 1A 15 10 5 0000A5 0/0/0 A5 Halt 38 16 70 1A 07 H 6 0 10 7 1860A7 24/0/3 A7 modify address of next 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 1A 16 02 10 6 2 000A62 0/0/0 A62 Halt 70 70 04 70 10 0 0 4 0 000400 0/0/0 400 Halt 10 10 6E 00 00 be 000E00 0/0/0 E00 Halt 10 1A 07 38 04 10 7 H 4 00A784 0/1/1 784 replace registers 70 0D 0E 10 10 0 : . 00DE00 0/1/2 1E00 replace (B) by (N) 10 6E 00 00 00 be 00E000 0/1/3 0 Invalid 1A 08 38 16 70 10 8 H 6 0 0A8860 10/1/0 860 multiply and add 02 0E 10 10 10 2 . 02E000 2/1/3 0 transfer (A) to N 6E 00 00 00 00 be 19 2C 0D 1F 1F 9 ' : £ £ 09CDFF 9/1/2 DFF multiply uniform radix 0E 10 10 10 6E . be 0E000E 14/0/0 E replace selected bits 10 10 10 1A 1A 10 10 0000AA 0/0/0 AA Halt 38 08 70 70 19 H 8 0 0 9 188009 24/1/0 9 unconditional jump 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 1A 0B 10 10 11 000AB0 0/0/0 AB0 Halt 02 70 0D 02 10 2 0 : 2 020D20 2/0/0 D20 transfer (A) to N 10 20 6E 00 00 - be 000E00 0/0/0 E00 Halt 10 1A 1C 1F 1F 10 + £ £ 00ACFF 0/1/1 CFF replace registers 1F 1F 1C 10 10 £ £ + 0FFC00 15/1/3 1C00 collate and add 10 6E 00 00 00 be 00E000 0/1/3 0 Invalid 1A 0D 29 08 70 10 : I 8 0 0AD980 10/1/2 1980 multiply and add 70 70 10 10 10 0 0 000000 0/0/0 0 Halt 6E 00 00 00 00 be 0E 2A 70 70 07 . = 0 0 7 0EA007 14/1/1 7 replace selected bits 19 10 10 10 6E 9 be 09000E 9/0/0 E multiply uniform radix 10 10 10 1A 1F 10 £ 0000AF 0/0/0 AF Halt 1F 02 70 1F 08 £ 2 0 £ 8 0F20F8 15/0/1 F8 collate and add 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 0B 70 16 11 0 6 000B06 0/0/0 B06 Halt 08 01 70 1A 10 8 1 0 10 0810A0 8/0/0 10A0 merge constant length 10 10 6E 00 00 be 000E00 0/0/0 E00 Halt 10 0B 01 10 02 11 1 2 00B102 0/1/1 1102 replace registers 70 0D 08 10 10 0 : 8 00D800 0/1/2 1800 replace (B) by (N) 20 6E 00 00 00 - be 10E000 16/1/3 0 Invalid 0B 02 19 02 16 11 2 9 2 6 0B2926 11/0/1 926 multiply and subtract 02 15 10 10 10 2 5 025000 2/0/2 1000 transfer (A) to N 6E 00 00 00 00 be 13 02 04 13 01 3 2 4 3 1 032431 3/0/1 431 copy (A) to N 02 10 10 10 6E 2 be 02000E 2/0/0 E transfer (A) to N 10 10 10 0B 04 11 4 0000B4 0/0/0 B4 Halt 01 13 13 13 0E 1 3 3 3 . 01333E 1/0/1 133E prepare for digit collation 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 0B 15 10 11 5 000B50 0/0/0 B50 Halt 10 10 10 01 10 1 000010 0/0/0 10 Halt 10 10 6E 00 00 be 000E00 0/0/0 E00 Halt 10 0B 16 10 10 11 6 00B600 0/1/1 1600 replace registers 10 10 70 10 10 0 000000 0/0/0 0 Halt 10 6E 00 00 00 be 00E000 0/1/3 0 Invalid 0B 07 08 70 70 11 7 8 0 0 0B7800 11/0/3 1800 multiply and subtract 70 70 10 10 10 0 0 000000 0/0/0 0 Halt 6E 00 00 00 00 be 08 10 02 70 0D 8 2 0 : 08020D 8/0/0 20D merge constant length 0E 10 10 20 6E . - be 0E000E 14/0/0 E replace selected bits 10 10 10 0B 19 11 9 0000B9 0/0/0 B9 Halt 10 02 70 0D 08 2 0 : 8 0020D8 0/0/1 D8 Invalid 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 0B 1A 13 11 10 3 000BA3 0/0/0 BA3 Halt 70 70 70 13 10 0 0 0 3 000030 0/0/0 30 Halt 10 10 6E 00 00 be 000E00 0/0/0 E00 Halt 10 0B 0B 10 02 11 11 2 00BB02 0/1/1 1B02 replace registers 70 0D 08 10 10 0 : 8 00D800 0/1/2 1800 replace (B) by (N) 10 6E 00 00 00 be 00E000 0/1/3 0 Invalid 0B 1C 13 70 13 11 + 3 0 3 0BC303 11/1/2 303 multiply and subtract 01 02 10 10 10 1 2 012000 1/0/1 0 prepare for digit collation 6E 00 00 00 00 be 0D 10 10 10 08 : 8 0D0008 13/0/0 8 divide uniform radix 1A 10 10 10 6E 10 be 0A000E 10/0/0 E multiply and add 10 10 10 0B 0E 11 . 0000BE 0/0/0 BE Halt 02 01 04 01 02 2 1 4 1 2 021412 2/0/0 1412 transfer (A) to N 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 0B 1F 10 11 £ 000BF0 0/0/0 BF0 Halt 10 10 08 1A 10 8 10 0008A0 0/0/0 8A0 Halt 10 10 6E 00 00 be 000E00 0/0/0 E00 Halt 10 1C 70 02 01 + 0 2 1 00C021 0/1/2 21 replace (B) by (N) 16 01 02 10 10 6 1 2 061200 6/0/0 1200 select (N) 10 6E 00 00 00 be 00E000 0/1/3 0 Invalid 1C 01 10 10 10 + 1 0C1000 12/0/0 1000 convert 08 1A 10 10 10 8 10 08A000 8/1/1 0 merge variable length 6E 00 00 00 00 be 02 02 70 08 01 2 2 0 8 1 022081 2/0/1 81 transfer (A) to N 02 10 10 10 6E 2 be 02000E 2/0/0 E transfer (A) to N 10 10 10 1C 13 + 3 0000C3 0/0/0 C3 Halt 10 02 70 0D 1A 2 0 : 10 0020DA 0/0/1 DA Invalid 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 1C 04 13 + 4 3 000C43 0/0/0 C43 Halt 70 02 01 02 10 0 2 1 2 002120 0/0/1 120 Invalid 10 10 6E 00 00 be 000E00 0/0/0 E00 Halt 10 1C 15 10 10 + 5 00C500 0/1/2 500 replace (B) by (N) 10 19 1C 10 10 9 + 009C00 0/1/0 1C00 copy registers 10 6E 00 00 00 be 00E000 0/1/3 0 Invalid 1C 16 10 01 70 + 6 1 0 0C6010 12/0/3 10 convert 01 02 10 10 10 1 2 012000 1/0/1 0 prepare for digit collation 6E 00 00 00 00 be 07 10 10 10 19 7 9 070009 7/0/0 9 augment (N) by (A) 1C 10 10 10 6E + be 0C000E 12/0/0 E convert 10 10 10 1C 08 + 8 0000C8 0/0/0 C8 Halt 10 10 02 01 02 2 1 2 000212 0/0/0 212 Halt 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 1C 19 10 + 9 000C90 0/0/0 C90 Halt 02 70 0D 1A 10 2 0 : 10 020DA0 2/0/0 DA0 transfer (A) to N 10 10 6E 00 00 be 000E00 0/0/0 E00 Halt 10 1C 1A 23 70 + 10 C 0 00CA30 0/1/2 A30 replace (B) by (N) 04 70 01 10 10 4 0 1 040100 4/0/0 100 add (N) to (A) 10 6E 00 00 00 be 00E000 0/1/3 0 Invalid 1C 0B 10 10 10 + 11 0CB000 12/1/1 1000 convert 10 70 10 10 10 0 000000 0/0/0 0 Halt 6E 00 00 00 00 be 1C 10 10 10 10 + 0C0000 12/0/0 0 convert 70 10 10 10 6E 0 be 00000E 0/0/0 E Halt 10 10 10 1C 0D + : 0000CD 0/0/0 CD Halt 10 10 10 10 70 0 000000 0/0/0 0 Halt 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 1C 0E 10 + . 000CE0 0/0/0 CE0 Halt 10 10 10 70 10 0 000000 0/0/0 0 Halt 10 10 6E 00 00 be 000E00 0/0/0 E00 Halt 10 1C 1F 10 08 + £ 8 00CF08 0/1/2 F08 replace (B) by (N) 70 70 70 10 10 0 0 0 000000 0/0/0 0 Halt 10 6E 00 00 00 be 00E000 0/1/3 0 Invalid 0D 70 10 08 70 : 0 8 0 0D0080 13/0/0 80 divide uniform radix 70 70 10 10 10 0 0 000000 0/0/0 0 Halt 6E 00 00 00 00 be 01 10 10 1F 70 1 £ 0 0100F0 1/0/0 F0 table look up 1F 10 10 10 6E £ be 0F000E 15/0/0 E collate and add 10 10 10 0D 02 : 2 0000D2 0/0/0 D2 Halt 10 02 70 1F 1A 2 0 £ 10 0020FA 0/0/1 FA Invalid 10 10 20 6E 00 - be 0000E0 0/0/0 E0 Halt 10 10 0D 13 10 : 3 000D30 0/0/0 D30 Halt 01 1F 1F 0E 10 1 £ £ . 01FFE0 1/1/3 1FE0 select literal address 10 10 6E 00 00 be 000E00 0/0/0 E00 Halt 10 0D 04 10 10 : 4 00D400 0/1/2 1400 replace (B) by (N) 01 01 70 10 10 1 1 0 011000 1/0/0 1000 table look up 10 6E 00 00 00 be 00E000 0/1/3 0 Invalid 0D 15 16 08 70 : 5 6 8 0 0D5680 13/0/2 1680 divide uniform radix 1F 1A 10 10 10 £ 10 0FA000 15/1/1 0 collate and add 6E 00 00 00 00 be 16 38 16 70 02 6 H 6 0 2 068602 6/1/0 602 select (N) 0E 10 10 10 6E . be 0E000E 14/0/0 E replace selected bits 10 10 10 0D 07 : 7 0000D7 0/0/0 D7 Halt 2C 01 1F 0E 70 ' 1 £ . 0 1C1FE0 28/0/0 1FE0 bulk copy short numeric 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 0D 08 2A : 8 = 000D8A 0/0/0 D8A Halt 70 70 07 19 10 0 0 7 9 000790 0/0/0 790 Halt 10 10 6E 00 00 be 000E00 0/0/0 E00 Halt 10 0D 19 38 16 : 9 H 6 00D986 0/1/2 1986 replace (B) by (N) 70 01 70 10 10 0 1 0 001000 0/0/0 1000 Halt 10 6E 00 00 00 be 00E000 0/1/3 0 Invalid 0D 1A 02 19 1F : 10 2 9 £ 0DA29F 13/1/1 29F divide uniform radix 0D 0E 10 10 10 : . 0DE000 13/1/3 0 divide uniform radix 6E 00 00 00 00 be 0B 38 08 70 15 11 H 8 0 5 0B8805 11/1/0 805 multiply and subtract 07 10 10 10 6E 7 be 07000E 7/0/0 E augment (N) by (A) 10 10 10 0D 1C : + 0000DC 0/0/0 DC Halt 16 08 70 0D 16 6 8 0 : 6 0680D6 6/1/0 D6 select (N) 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 0D 0D 02 : : 2 000DD2 0/0/0 DD2 Halt 08 70 0D 1A 10 8 0 : 10 080DA0 8/0/0 DA0 merge constant length 10 10 6E 00 00 be 000E00 0/0/0 E00 Halt 10 0D 0E 16 70 : . 6 0 00DE60 0/1/2 1E60 replace (B) by (N) 70 0D 08 10 10 0 : 8 00D800 0/1/2 1800 replace (B) by (N) 10 6E 00 00 00 be 00E000 0/1/3 0 Invalid 0D 1F 02 70 70 : £ 2 0 0 0DF200 13/1/3 1200 divide uniform radix 16 13 10 10 10 6 3 063000 6/0/1 1000 select (N) 6E 00 00 00 00 be 70 38 08 70 01 0 H 8 0 1 008801 0/1/0 801 copy registers 02 10 10 10 6E 2 be 02000E 2/0/0 E transfer (A) to N 10 10 10 0E 01 . 1 0000E1 0/0/0 E1 Halt 10 02 70 1A 16 2 0 10 6 0020A6 0/0/1 A6 Invalid 10 10 40 6E 00 & be 0000E0 0/0/0 E0 Halt 10 10 0E 02 10 . 2 000E20 0/0/0 E20 Halt 02 70 1A 16 10 2 0 10 6 020A60 2/0/0 A60 transfer (A) to N 10 20 6E 00 00 - be 000E00 0/0/0 E00 Halt 10 0E 13 10 02 . 3 2 00E302 0/1/3 302 Invalid 70 1F 04 10 10 0 £ 4 00F400 0/1/3 1400 Invalid 10 6E 00 00 00 be 00E000 0/1/3 0 Invalid 0E 04 10 10 10 . 4 0E4000 14/0/2 0 replace selected bits 01 01 10 10 10 1 1 011000 1/0/0 1000 table look up 6E 00 00 00 00 be 15 10 02 70 1F 5 2 0 £ 05020F 5/0/0 20F subtract (N) from (A) 04 10 10 10 6E 4 be 04000E 4/0/0 E add (N) to (A) 10 10 10 0E 16 . 6 0000E6 0/0/0 E6 Halt 10 13 01 01 04 3 1 1 4 003114 0/0/1 1114 Invalid 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 0E 07 10 . 7 000E70 0/0/0 E70 Halt 02 70 0D 1A 10 2 0 : 10 020DA0 2/0/0 DA0 transfer (A) to N 10 10 6E 00 00 be 000E00 0/0/0 E00 Halt 10 0E 08 10 10 . 8 00E800 0/1/3 800 Invalid 01 01 04 10 10 1 1 4 011400 1/0/0 1400 table look up 10 6E 00 00 00 be 00E000 0/1/3 0 Invalid 0E 19 10 02 70 . 9 2 0 0E9020 14/1/0 1020 replace selected bits 0D 1C 10 10 10 : + 0DC000 13/1/2 0 divide uniform radix 6E 00 00 00 00 be 1A 02 01 01 13 10 2 1 1 3 0A2113 10/0/1 113 multiply and add 02 10 10 10 6E 2 be 02000E 2/0/0 E transfer (A) to N 10 10 10 0E 0B . 11 0000EB 0/0/0 EB Halt 10 02 70 0D 1C 2 0 : + 0020DC 0/0/1 DC Invalid 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 0E 1C 02 . + 2 000EC2 0/0/0 EC2 Halt 70 13 01 01 10 0 3 1 1 003110 0/0/1 1110 Invalid 10 10 6E 00 00 be 000E00 0/0/0 E00 Halt 10 0E 0D 10 02 . : 2 00ED02 0/1/3 D02 Invalid 70 0D 1C 10 10 0 : + 00DC00 0/1/2 1C00 replace (B) by (N) 10 6E 00 00 00 be 00E000 0/1/3 0 Invalid 0E 0E 02 70 04 . . 2 0 4 0EE204 14/1/3 204 replace selected bits 01 01 10 10 10 1 1 011000 1/0/0 1000 table look up 6E 00 00 00 00 be 1F 10 02 70 0D £ 2 0 : 0F020D 15/0/0 20D collate and add 1C 10 10 10 6E + be 0C000E 12/0/0 E convert 10 10 10 1F 70 £ 0 0000F0 0/0/0 F0 Halt 10 13 01 01 04 3 1 1 4 003114 0/0/1 1114 Invalid 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 1F 01 10 £ 1 000F10 0/0/0 F10 Halt 02 70 0D 0E 10 2 0 : . 020DE0 2/0/0 DE0 transfer (A) to N 10 10 6E 00 00 be 000E00 0/0/0 E00 Halt 10 1F 02 02 01 £ 2 2 1 00F221 0/1/3 1221 Invalid 01 13 02 10 10 1 3 2 013200 1/0/1 1200 prepare for digit collation 10 6E 00 00 00 be 00E000 0/1/3 0 Invalid 1F 13 10 02 70 £ 3 2 0 0F3020 15/0/1 1020 collate and add 0D 0E 10 10 10 : . 0DE000 13/1/3 0 divide uniform radix 6E 00 00 00 00 be 04 02 70 13 01 4 2 0 3 1 042031 4/0/1 31 add (N) to (A) 01 10 10 10 6E 1 be 01000E 1/0/0 E table look up 10 10 10 1F 15 £ 5 0000F5 0/0/0 F5 Halt 10 02 70 0D 0E 2 0 : . 0020DE 0/0/1 DE Invalid 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 1F 16 02 £ 6 2 000F62 0/0/0 F62 Halt 70 04 01 01 10 0 4 1 1 004110 0/0/2 110 replace (B) by (N) 10 10 6E 00 00 be 000E00 0/0/0 E00 Halt 10 1F 07 10 02 £ 7 2 00F702 0/1/3 1702 Invalid 70 0D 0E 10 10 0 : . 00DE00 0/1/2 1E00 replace (B) by (N) 10 6E 00 00 00 be 00E000 0/1/3 0 Invalid 1F 08 10 13 01 £ 8 3 1 0F8031 15/1/0 31 collate and add 01 04 10 10 10 1 4 014000 1/0/2 0 round off 6E 00 00 00 00 be 19 10 02 70 0E 9 2 0 . 09020E 9/0/0 20E multiply uniform radix 70 10 10 10 6E 0 be 00000E 0/0/0 E Halt 10 10 10 1F 1A £ 10 0000FA 0/0/0 FA Halt 02 01 01 13 02 2 1 1 3 2 021132 2/0/0 1132 transfer (A) to N 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 10 1F 0B 10 £ 11 000FB0 0/0/0 FB0 Halt 02 70 0E 70 10 2 0 . 0 020E00 2/0/0 E00 transfer (A) to N 10 10 6E 00 00 be 000E00 0/0/0 E00 Halt 10 1F 1C 02 70 £ + 2 0 00FC20 0/1/3 1C20 Invalid 13 01 01 10 10 3 1 1 031100 3/0/0 1100 copy (A) to N 10 6E 00 00 00 be 00E000 0/1/3 0 Invalid 1F 0D 10 02 70 £ : 2 0 0FD020 15/1/2 1020 collate and add 0E 70 10 10 10 . 0 0E0000 14/0/0 0 replace selected bits 6E 00 00 00 00 be 0E 02 70 04 01 . 2 0 4 1 0E2041 14/0/1 41 replace selected bits 01 10 10 10 6E 1 be 01000E 1/0/0 E table look up 10 10 10 1F 1F £ £ 0000FF 0/0/0 FF Halt 10 02 70 0E 70 2 0 . 0 0020E0 0/0/1 E0 Invalid 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 01 70 70 10 1 0 0 001000 0/0/0 1000 Halt 13 01 01 04 10 3 1 1 4 031140 3/0/0 1140 copy (A) to N 10 10 6E 00 00 be 000E00 0/0/0 E00 Halt 01 70 01 10 02 1 0 1 2 010102 1/0/0 102 table look up 70 0E 02 10 10 0 . 2 00E200 0/1/3 200 Invalid 10 6E 00 00 00 be 00E000 0/1/3 0 Invalid 70 02 02 01 01 0 2 2 1 1 002211 0/0/1 211 Invalid 13 02 10 10 10 3 2 032000 3/0/1 0 copy (A) to N 6E 00 00 00 00 be 13 10 02 70 0E 3 2 0 . 03020E 3/0/0 20E copy (A) to N 02 10 10 10 6E 2 be 02000E 2/0/0 E transfer (A) to N 10 10 01 70 04 1 0 4 000104 0/0/0 104 Halt 02 70 13 01 01 2 0 3 1 1 020311 2/0/0 311 transfer (A) to N 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 01 70 15 10 1 0 5 001050 0/0/0 1050 Halt 02 70 0E 02 10 2 0 . 2 020E20 2/0/0 E20 transfer (A) to N 10 10 6E 00 00 be 000E00 0/0/0 E00 Halt 01 70 16 02 70 1 0 6 2 0 010620 1/0/0 620 table look up 04 01 01 10 10 4 1 1 041100 4/0/0 1100 add (N) to (A) 10 6E 00 00 00 be 00E000 0/1/3 0 Invalid 70 07 10 02 70 0 7 2 0 007020 0/0/3 1020 set radix 0E 02 10 10 10 . 2 0E2000 14/0/1 0 replace selected bits 6E 00 00 00 00 be 08 10 13 01 01 8 3 1 1 080311 8/0/0 311 merge constant length 04 10 10 10 6E 4 be 04000E 4/0/0 E add (N) to (A) 10 10 01 70 19 1 0 9 000109 0/0/0 109 Halt 10 02 70 0E 1A 2 0 . 10 0020EA 0/0/1 EA Invalid 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 01 70 1A 04 1 0 10 4 0010A4 0/0/0 10A4 Halt 04 70 13 15 10 4 0 3 5 040350 4/0/0 350 add (N) to (A) 10 10 6E 00 00 be 000E00 0/0/0 E00 Halt 01 70 0B 10 02 1 0 11 2 010B02 1/0/0 B02 table look up 70 0E 0B 10 10 0 . 11 00EB00 0/1/3 B00 Invalid 10 6E 00 00 00 be 00E000 0/1/3 0 Invalid 70 1C 04 04 70 0 + 4 4 0 00C440 0/1/2 440 replace (B) by (N) 01 15 10 10 10 1 5 015000 1/0/2 1000 round off 6E 00 00 00 00 be 0D 10 02 70 0E : 2 0 . 0D020E 13/0/0 20E divide uniform radix 1C 10 10 10 6E + be 0C000E 12/0/0 E convert 10 10 01 70 0E 1 0 . 00010E 0/0/0 10E Halt 04 04 70 01 15 4 4 0 1 5 044015 4/0/2 15 add (N) to (A) 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 01 70 1F 10 1 0 £ 0010F0 0/0/0 10F0 Halt 02 70 0E 0D 10 2 0 . : 020ED0 2/0/0 ED0 transfer (A) to N 10 10 6E 00 00 be 000E00 0/0/0 E00 Halt 01 01 70 04 04 1 1 0 4 4 011044 1/0/0 1044 table look up 70 01 15 10 10 0 1 5 001500 0/0/0 1500 Halt 10 6E 00 00 00 be 00E000 0/1/3 0 Invalid 01 01 10 02 70 1 1 2 0 011020 1/0/0 1020 table look up 0E 0E 10 10 10 . . 0EE000 14/1/3 0 replace selected bits 6E 00 00 00 00 be 02 13 70 70 02 2 3 0 0 2 023002 2/0/1 1002 transfer (A) to N 15 10 10 10 6E 5 be 05000E 5/0/0 E subtract (N) from (A) 10 10 01 01 13 1 1 3 000113 0/0/0 113 Halt 10 02 70 1F 70 2 0 £ 0 0020F0 0/0/1 F0 Invalid 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 01 01 04 13 1 1 4 3 001143 0/0/0 1143 Halt 70 70 02 15 10 0 0 2 5 000250 0/0/0 250 Halt 10 10 6E 00 00 be 000E00 0/0/0 E00 Halt 01 01 15 10 02 1 1 5 2 011502 1/0/0 1502 table look up 70 1F 02 10 10 0 £ 2 00F200 0/1/3 1200 Invalid 10 6E 00 00 00 be 00E000 0/1/3 0 Invalid 01 16 10 10 04 1 6 4 016004 1/0/3 4 interchange area addresses 02 01 10 10 10 2 1 021000 2/0/0 1000 transfer (A) to N 6E 00 00 00 00 be 07 10 02 70 1F 7 2 0 £ 07020F 7/0/0 20F augment (N) by (A) 13 10 10 10 6E 3 be 03000E 3/0/0 E copy (A) to N 10 10 01 01 08 1 1 8 000118 0/0/0 118 Halt 10 10 04 01 01 4 1 1 000411 0/0/0 411 Halt 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 01 01 19 10 1 1 9 001190 0/0/0 1190 Halt 02 70 1F 16 10 2 0 £ 6 020F60 2/0/0 F60 transfer (A) to N 10 10 6E 00 00 be 000E00 0/0/0 E00 Halt 01 01 1A 23 70 1 1 10 C 0 011A30 1/0/0 1A30 table look up 04 01 02 10 10 4 1 2 041200 4/0/0 1200 add (N) to (A) 10 6E 00 00 00 be 00E000 0/1/3 0 Invalid 01 0B 10 02 70 1 11 2 0 01B020 1/1/1 1020 add literal address 0D 0E 10 10 20 : . - 0DE000 13/1/3 0 divide uniform radix 6E 00 00 00 00 be 1C 10 10 10 10 + 0C0000 12/0/0 0 convert 70 10 10 10 6E 0 be 00000E 0/0/0 E Halt 10 10 01 01 0D 1 1 : 00011D 0/0/0 11D Halt 10 10 10 10 04 4 000004 0/0/0 4 Halt 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 01 01 0E 10 1 1 . 0011E0 0/0/0 11E0 Halt 10 10 10 70 10 0 000000 0/0/0 0 Halt 10 10 6E 00 00 be 000E00 0/0/0 E00 Halt 01 01 1F 10 10 1 1 £ 011F00 1/0/0 1F00 table look up 10 10 08 10 10 8 000800 0/0/0 800 Halt 10 6E 00 00 00 be 00E000 0/1/3 0 Invalid 02 70 0E 01 0E 2 0 . 1 . 020E1E 2/0/0 E1E transfer (A) to N 01 0E 10 10 10 1 . 01E000 1/1/3 0 select literal address 6E 00 00 00 00 be 01 31 0E 01 0E 1 A . 1 . 011E1E 1/0/0 1E1E table look up 01 10 10 10 6E 1 be 01000E 1/0/0 E table look up 10 10 01 02 02 1 2 2 000122 0/0/0 122 Halt 10 02 70 02 70 2 0 2 0 002020 0/0/1 20 Invalid 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 01 02 13 32 1 2 3 B 001232 0/0/0 1232 Halt 70 02 70 02 10 0 2 0 2 002020 0/0/1 20 Invalid 10 10 6E 00 00 be 000E00 0/0/0 E00 Halt 01 02 04 10 10 1 2 4 012400 1/0/1 400 prepare for digit collation 10 10 70 10 10 0 000000 0/0/0 0 Halt 10 6E 00 00 00 be 00E000 0/1/3 0 Invalid 02 15 02 70 01 2 5 2 0 1 025201 2/0/2 1201 transfer (A) to N 08 70 10 10 10 8 0 080000 8/0/0 0 merge constant length 6E 00 00 00 00 be 16 10 10 10 10 6 060000 6/0/0 0 select (N) 01 10 10 10 6E 1 be 01000E 1/0/0 E table look up 10 10 01 02 07 1 2 7 000127 0/0/0 127 Halt 10 10 10 10 70 0 000000 0/0/0 0 Halt 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 01 02 08 10 1 2 8 001280 0/0/0 1280 Halt 10 10 01 16 10 1 6 000160 0/0/0 160 Halt 10 10 6E 00 00 be 000E00 0/0/0 E00 Halt 01 02 19 10 10 1 2 9 012900 1/0/1 900 prepare for digit collation 10 10 70 10 10 0 000000 0/0/0 0 Halt 10 6E 00 00 00 be 00E000 0/1/3 0 Invalid 02 1A 10 10 02 2 10 2 02A002 2/1/1 2 transfer (A) to N 15 16 10 10 10 5 6 056000 5/0/3 0 subtract (N) from (A) 6E 00 00 00 00 be 0B 10 10 10 10 11 0B0000 11/0/0 0 multiply and subtract 70 10 10 10 6E 0 be 00000E 0/0/0 E Halt 10 10 01 02 1C 1 2 + 00012C 0/0/0 12C Halt 10 04 70 19 16 4 0 9 6 004096 0/0/2 96 replace (B) by (N) 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 01 02 0D 10 1 2 : 0012D0 0/0/0 12D0 Halt 10 10 10 70 10 0 000000 0/0/0 0 Halt 10 10 6E 00 00 be 000E00 0/0/0 E00 Halt 01 02 0E 10 02 1 2 . 2 012E02 1/0/1 E02 prepare for digit collation 70 1F 70 10 10 0 £ 0 00F000 0/1/3 1000 Invalid 20 6E 00 00 00 - be 10E000 16/1/3 0 Invalid 02 1F 01 1F 70 2 £ 1 £ 0 02F1F0 2/1/3 11F0 transfer (A) to N 70 70 10 10 10 0 0 000000 0/0/0 0 Halt 6E 00 00 00 00 be 70 20 10 10 13 0 - 3 000003 0/0/0 3 Halt 1F 10 10 10 6E £ be 0F000E 15/0/0 E collate and add 10 10 01 13 01 1 3 1 000131 0/0/0 131 Halt 16 16 16 16 16 6 6 6 6 6 066666 6/0/3 666 select (N) 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 01 13 02 10 1 3 2 001320 0/0/0 1320 Halt 1F 1F 1F 0E 10 £ £ £ . 0FFFE0 15/1/3 1FE0 collate and add 10 10 6E 00 00 be 000E00 0/0/0 E00 Halt 01 13 13 10 02 1 3 3 2 013302 1/0/1 1302 prepare for digit collation 70 1F 1C 10 10 0 £ + 00FC00 0/1/3 1C00 Invalid 70 6E 00 00 00 0 be 00E000 0/1/3 0 Invalid File: old-paper-tapes/U98-1-2s.leo 58 10 32 10 10 Q B 080200 8/0/0 200 merge constant length 70 10 13 10 10 0 3 000300 0/0/0 300 Halt 38 08 10 04 13 H 8 4 3 188043 24/1/0 43 unconditional jump 10 08 10 10 10 8 008000 0/1/0 0 copy registers 38 1C 10 08 10 H + 8 18C080 24/1/2 80 modify address of next 01 16 1F 08 10 1 6 £ 8 016F80 1/0/3 F80 interchange area addresses 29 0E 08 10 10 I . 8 19E800 25/1/3 800 conditional Halt 38 1C 10 08 10 H + 8 18C080 24/1/2 80 modify address of next 23 02 10 10 10 C 2 132000 19/0/1 0 input one block/reset timer 38 1C 10 08 10 H + 8 18C080 24/1/2 80 modify address of next 2A 08 10 10 10 = 8 1A8000 26/1/0 0 test route N1 10 10 10 02 01 2 1 000021 0/0/0 21 Halt 38 19 1F 1C 0B H 9 £ + 11 189FCB 24/1/0 1FCB unconditional jump 10 10 10 02 13 2 3 000023 0/0/0 23 Halt 10 10 10 01 1C 1 + 00001C 0/0/0 1C Halt 38 0D 1F 0D 1F H : £ : £ 18DFDF 24/1/2 1FDF modify address of next 16 19 1F 0E 13 6 9 £ . 3 069FE3 6/1/0 1FE3 select (N) 38 0D 1F 0D 0E H : £ : . 18DFDE 24/1/2 1FDE modify address of next 02 10 10 10 10 2 020000 2/0/0 0 transfer (A) to N 16 19 1F 0D 1C 6 9 £ : + 069FDC 6/1/0 1FDC select (N) 07 19 1F 0D 0E 7 9 £ : . 079FDE 7/1/0 1FDE augment (N) by (A) 16 01 1F 0D 1F 6 1 £ : £ 061FDF 6/0/0 1FDF select (N) 15 01 1F 0D 10 5 1 £ : 051FD0 5/0/0 1FD0 subtract (N) from (A) 3B 13 1F 0D 01 * 3 £ : 1 1B3FD1 27/0/1 1FD1 jump A != Z 02 01 1F 0D 1F 2 1 £ : £ 021FDF 2/0/0 1FDF transfer (A) to N 38 19 1F 1C 08 H 9 £ + 8 189FC8 24/1/0 1FC8 unconditional jump 10 10 10 10 01 1 000001 0/0/0 1 Halt 10 10 10 10 02 2 000002 0/0/0 2 Halt 10 01 0E 0B 16 1 . 11 6 001EB6 0/0/0 1EB6 Halt 10 10 10 01 04 1 4 000014 0/0/0 14 Halt 70 10 75 10 7C 0 V , 00050C 0/0/0 50C Halt 70 10 67 10 02 0 X 2 000702 0/0/0 702 Halt 58 10 07 10 13 Q 7 3 080703 8/0/0 703 merge constant length 70 10 04 10 7A 0 4 ( 00040A 0/0/0 40A Halt 70 10 13 10 5E 0 3 hf 00030E 0/0/0 30E Halt 70 10 04 10 51 0 4 J 000401 0/0/0 401 Halt 40 10 32 10 04 & B 4 000204 0/0/0 204 Halt 70 10 16 10 61 0 6 / 000601 0/0/0 601 Halt 58 10 67 10 54 Q X M 080704 8/0/0 704 merge constant length 70 10 67 10 02 0 X 2 000702 0/0/0 702 Halt 70 10 67 10 58 0 X Q 000708 0/0/0 708 Halt 70 10 76 10 02 0 W 2 000602 0/0/0 602 Halt 70 10 75 10 73 0 V T 000503 0/0/0 503 Halt 70 10 62 10 13 0 S 3 000203 0/0/0 203 Halt 08 10 16 10 58 8 6 Q 080608 8/0/0 608 merge constant length 08 10 13 10 4A 8 3 # 08030A 8/0/0 30A merge constant length 08 10 13 10 43 8 3 L 080303 8/0/0 303 merge constant length 58 10 13 10 51 Q 3 J 080301 8/0/0 301 merge constant length 10 10 62 10 7C S , 00020C 0/0/0 20C Halt 10 10 02 10 7A 2 ( 00020A 0/0/0 20A Halt 70 10 62 10 6D 0 S ; 00020D 0/0/0 20D Halt 40 10 26 10 6D & F ; 00060D 0/0/0 60D Halt 40 10 46 10 75 & O V 000605 0/0/0 605 Halt 40 10 62 10 10 & S 000200 0/0/0 200 Halt 58 10 52 10 10 Q K 080200 8/0/0 200 merge constant length 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 40 10 10 & 000000 0/0/0 0 Halt 40 10 40 10 10 & & 000000 0/0/0 0 Halt 16 08 10 10 19 6 8 9 068009 6/1/0 9 select (N) 02 01 1F 1C 16 2 1 £ + 6 021FC6 2/0/0 1FC6 transfer (A) to N 10 01 1F 0E 10 1 £ . 001FE0 0/0/0 1FE0 Halt 38 19 1F 1C 16 H 9 £ + 6 189FC6 24/1/0 1FC6 unconditional jump 10 10 20 10 10 - 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 1F 10 29 £ I 000F09 0/0/0 F09 Halt 6E 00 00 00 00 be 10 01 0E 0B 16 1 . 11 6 001EB6 0/0/0 1EB6 Halt 10 01 0E 0B 16 1 . 11 6 001EB6 0/0/0 1EB6 Halt 10 01 1F 0D 10 1 £ : 001FD0 0/0/0 1FD0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 01 0E 0B 16 1 . 11 6 001EB6 0/0/0 1EB6 Halt 10 10 10 10 1F £ 00000F 0/0/0 F Halt 10 10 10 10 01 1 000001 0/0/0 1 Halt 10 10 10 10 01 1 000001 0/0/0 1 Halt 10 10 10 10 13 3 000003 0/0/0 3 Halt 01 04 0B 16 01 1 4 11 6 1 014B61 1/0/2 B61 round off 16 01 1F 19 04 6 1 £ 9 4 061F94 6/0/0 1F94 select (N) 02 10 10 08 01 2 8 1 020081 2/0/0 81 transfer (A) to N 01 1A 10 10 10 1 10 01A000 1/1/1 0 add literal address 16 01 1F 01 0E 6 1 £ 1 . 061F1E 6/0/0 1F1E select (N) 6E 00 00 00 00 be 10 01 0E 0B 1A 1 . 11 10 001EBA 0/0/0 1EBA Halt 02 01 1F 01 0D 2 1 £ 1 : 021F1D 2/0/0 1F1D transfer (A) to N 29 0E 10 01 10 I . 1 19E010 25/1/3 10 conditional Halt 29 1C 10 01 10 I + 1 19C010 25/1/2 10 interrogate indicators 3B 01 0E 0D 13 * 1 . : 3 1B1ED3 27/0/0 1ED3 jump A = Z 16 08 10 08 10 6 8 8 068080 6/1/0 80 select (N) 02 19 1F 0B 16 2 9 £ 11 6 029FB6 2/1/0 1FB6 transfer (A) to N 2A 0B 1F 1A 08 = 11 £ 10 8 1ABFA8 26/1/1 1FA8 set modification register 37 1A 10 10 10 G 10 17A000 23/1/1 0 copy into tag 29 02 10 10 02 I 2 2 192002 25/0/1 2 step on and test 38 19 0E 1C 01 H 9 . + 1 189EC1 24/1/0 1EC1 unconditional jump 2A 0B 1F 19 16 = 11 £ 9 6 1ABF96 26/1/1 1F96 set modification register 02 1A 10 10 10 2 10 02A000 2/1/1 0 transfer (A) to N 29 02 10 10 02 I 2 2 192002 25/0/1 2 step on and test 38 19 0E 1C 15 H 9 . + 5 189EC5 24/1/0 1EC5 unconditional jump 6E 00 00 00 00 be 10 01 0E 1C 08 1 . + 8 001EC8 0/0/0 1EC8 Halt 2A 0B 1F 19 08 = 11 £ 9 8 1ABF98 26/1/1 1F98 set modification register 02 1A 10 10 10 2 10 02A000 2/1/1 0 transfer (A) to N 29 02 10 10 02 I 2 2 192002 25/0/1 2 step on and test 38 19 0E 1C 19 H 9 . + 9 189EC9 24/1/0 1EC9 unconditional jump 2A 0B 1F 19 1A = 11 £ 9 10 1ABF9A 26/1/1 1F9A set modification register 16 01 1F 19 15 6 1 £ 9 5 061F95 6/0/0 1F95 select (N) 37 1A 10 10 10 G 10 17A000 23/1/1 0 copy into tag 29 02 10 10 02 I 2 2 192002 25/0/1 2 step on and test 38 19 0E 1C 0E H 9 . + . 189ECE 24/1/0 1ECE unconditional jump 16 19 1F 0B 16 6 9 £ 11 6 069FB6 6/1/0 1FB6 select (N) 02 08 10 08 10 2 8 8 028080 2/1/0 80 transfer (A) to N 02 10 10 10 19 2 9 020009 2/0/0 9 transfer (A) to N 02 10 10 01 01 2 1 1 020011 2/0/0 11 transfer (A) to N 02 10 10 01 19 2 1 9 020019 2/0/0 19 transfer (A) to N 6E 00 00 00 00 be 10 01 0E 0D 16 1 . : 6 001ED6 0/0/0 1ED6 Halt 38 19 0E 0D 0E H 9 . : . 189EDE 24/1/0 1EDE unconditional jump 29 0B 1F 1F 1F I 11 £ £ £ 19BFFF 25/1/1 1FFF clear indicators 16 01 1F 0B 13 6 1 £ 11 3 061FB3 6/0/0 1FB3 select (N) 3B 01 0E 0B 08 * 1 . 11 8 1B1EB8 27/0/0 1EB8 jump A = Z 02 01 1F 0B 1A 2 1 £ 11 10 021FBA 2/0/0 1FBA transfer (A) to N 38 19 1C 04 16 H 9 + 4 6 189C46 24/1/0 1C46 unconditional jump 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 29 1C 10 10 01 I + 1 19C001 25/1/2 1 interrogate indicators 02 01 1F 0B 10 2 1 £ 11 021FB0 2/0/0 1FB0 transfer (A) to N 29 1C 10 10 02 I + 2 19C002 25/1/2 2 interrogate indicators 02 01 1F 0B 01 2 1 £ 11 1 021FB1 2/0/0 1FB1 transfer (A) to N 29 1C 10 10 04 I + 4 19C004 25/1/2 4 interrogate indicators 02 01 1F 0B 02 2 1 £ 11 2 021FB2 2/0/0 1FB2 transfer (A) to N 6E 00 00 00 00 be 10 01 0E 0E 04 1 . . 4 001EE4 0/0/0 1EE4 Halt 29 1C 10 10 08 I + 8 19C008 25/1/2 8 interrogate indicators 02 01 1F 0B 13 2 1 £ 11 3 021FB3 2/0/0 1FB3 transfer (A) to N 38 19 0E 0E 08 H 9 . . 8 189EE8 24/1/0 1EE8 unconditional jump 10 10 10 10 10 000000 0/0/0 0 Halt 38 0D 1F 0B 10 H : £ 11 18DFB0 24/1/2 1FB0 modify address of next 16 01 1F 15 15 6 1 £ 5 5 061F55 6/0/0 1F55 select (N) 02 01 1F 15 04 2 1 £ 5 4 021F54 2/0/0 1F54 transfer (A) to N 38 0D 1F 0B 10 H : £ 11 18DFB0 24/1/2 1FB0 modify address of next 16 01 1F 08 16 6 1 £ 8 6 061F86 6/0/0 1F86 select (N) 02 01 1F 08 15 2 1 £ 8 5 021F85 2/0/0 1F85 transfer (A) to N 16 01 1F 19 1C 6 1 £ 9 + 061F9C 6/0/0 1F9C select (N) 38 1C 10 08 10 H + 8 18C080 24/1/2 80 modify address of next 02 10 10 04 10 2 4 020040 2/0/0 40 transfer (A) to N 16 01 1F 19 0D 6 1 £ 9 : 061F9D 6/0/0 1F9D select (N) 6E 00 00 00 00 be 10 01 0E 1F 02 1 . £ 2 001EF2 0/0/0 1EF2 Halt 02 10 10 16 07 2 6 7 020067 2/0/0 67 transfer (A) to N 38 1C 10 08 10 H + 8 18C080 24/1/2 80 modify address of next 2A 08 10 10 10 = 8 1A8000 26/1/0 0 test route N1 38 19 1F 10 01 H 9 £ 1 189F01 24/1/0 1F01 unconditional jump 38 19 1F 10 13 H 9 £ 3 189F03 24/1/0 1F03 unconditional jump 38 19 0E 1F 19 H 9 . £ 9 189EF9 24/1/0 1EF9 unconditional jump 10 10 10 10 07 7 000007 0/0/0 7 Halt 02 01 1F 0B 1A 2 1 £ 11 10 021FBA 2/0/0 1FBA transfer (A) to N 38 1C 10 16 07 H + 6 7 18C067 24/1/2 67 modify address of next 02 08 10 01 0E 2 8 1 . 02801E 2/1/0 1E transfer (A) to N 38 1C 10 08 10 H + 8 18C080 24/1/2 80 modify address of next 01 16 19 1C 10 1 6 9 + 0169C0 1/0/3 9C0 interchange area addresses 38 1C 10 08 10 H + 8 18C080 24/1/2 80 modify address of next 23 02 10 10 10 C 2 132000 19/0/1 0 input one block/reset timer 6E 00 00 00 00 be 10 01 1F 10 10 1 £ 001F00 0/0/0 1F00 Halt 38 19 1F 10 15 H 9 £ 5 189F05 24/1/0 1F05 unconditional jump 10 10 10 10 13 3 000003 0/0/0 3 Halt 38 19 0E 1F 13 H 9 . £ 3 189EF3 24/1/0 1EF3 unconditional jump 01 1A 10 10 10 1 10 01A000 1/1/1 0 add literal address 38 19 0E 1F 13 H 9 . £ 3 189EF3 24/1/0 1EF3 unconditional jump 38 1C 10 08 10 H + 8 18C080 24/1/2 80 modify address of next 2A 08 10 10 10 = 8 1A8000 26/1/0 0 test route N1 10 10 10 10 19 9 000009 0/0/0 9 Halt 38 19 1F 10 15 H 9 £ 5 189F05 24/1/0 1F05 unconditional jump 38 19 1F 01 04 H 9 £ 1 4 189F14 24/1/0 1F14 unconditional jump 38 19 0E 1F 13 H 9 . £ 3 189EF3 24/1/0 1EF3 unconditional jump 02 01 1F 0B 1A 2 1 £ 11 10 021FBA 2/0/0 1FBA transfer (A) to N 38 1C 10 16 07 H + 6 7 18C067 24/1/2 67 modify address of next 02 08 10 01 0E 2 8 1 . 02801E 2/1/0 1E transfer (A) to N 6E 00 00 00 00 be 10 01 1F 10 0E 1 £ . 001F0E 0/0/0 1F0E Halt 38 1C 10 08 10 H + 8 18C080 24/1/2 80 modify address of next 01 16 19 1C 10 1 6 9 + 0169C0 1/0/3 9C0 interchange area addresses 29 0E 08 10 10 I . 8 19E800 25/1/3 800 conditional Halt 38 1C 10 08 10 H + 8 18C080 24/1/2 80 modify address of next 23 02 10 10 10 C 2 132000 19/0/1 0 input one block/reset timer 38 19 1F 01 16 H 9 £ 1 6 189F16 24/1/0 1F16 unconditional jump 10 10 10 10 0B 11 00000B 0/0/0 B Halt 38 19 0E 1F 04 H 9 . £ 4 189EF4 24/1/0 1EF4 unconditional jump 10 15 1F 1A 16 5 £ 10 6 005FA6 0/0/2 1FA6 replace (B) by (N) 1F 10 10 16 07 £ 6 7 0F0067 15/0/0 67 collate and add 13 01 1F 0B 08 3 1 £ 11 8 031FB8 3/0/0 1FB8 copy (A) to N 04 01 1F 1A 13 4 1 £ 10 3 041FA3 4/0/0 1FA3 add (N) to (A) 02 01 1F 0B 19 2 1 £ 11 9 021FB9 2/0/0 1FB9 transfer (A) to N 16 01 1F 1A 02 6 1 £ 10 2 061FA2 6/0/0 1FA2 select (N) 6E 00 00 00 00 be 01 1F 01 1C 02 1 £ 1 + 2 01F1C2 1/1/3 11C2 select literal address 01 1F 0B 04 10 1 £ 11 4 01FB40 1/1/3 1B40 select literal address 10 10 10 10 38 H 000008 0/0/0 8 Halt 19 1F 02 01 38 9 £ 2 1 H 09F218 9/1/3 1218 multiply uniform radix 19 1F 13 1A 38 9 £ 3 10 H 09F3A8 9/1/3 13A8 multiply uniform radix 19 1C 04 1A 16 9 + 4 10 6 09C4A6 9/1/2 4A6 multiply uniform radix 01 1F 1A 10 07 1 £ 10 7 01FA07 1/1/3 1A07 select literal address 01 1F 0B 08 38 1 £ 11 8 H 01FB88 1/1/3 1B88 select literal address 1C 10 16 07 16 + 6 7 6 0C0676 12/0/0 676 convert 08 10 10 13 15 8 3 5 080035 8/0/0 35 merge constant length 01 1F 1A 02 02 1 £ 10 2 2 01FA22 1/1/3 1A22 select literal address 01 1F 1A 1C 38 1 £ 10 + H 01FAC8 1/1/3 1AC8 select literal address 1C 10 16 07 16 + 6 7 6 0C0676 12/0/0 676 convert 08 10 10 15 02 8 5 2 080052 8/0/0 52 merge constant length 01 1F 1A 0D 6E 1 £ 10 : be 01FADE 1/1/3 1ADE select literal address 10 01 1F 02 1A 1 £ 2 10 001F2A 0/0/0 1F2A Halt 38 1C 10 16 07 H + 6 7 18C067 24/1/2 67 modify address of next 16 08 10 10 0B 6 8 11 06800B 6/1/0 B select (N) 02 01 1F 1A 0E 2 1 £ 10 . 021FAE 2/0/0 1FAE transfer (A) to N 38 1C 10 16 07 H + 6 7 18C067 24/1/2 67 modify address of next 16 08 10 10 0D 6 8 : 06800D 6/1/0 D select (N) 02 01 1F 1A 1F 2 1 £ 10 £ 021FAF 2/0/0 1FAF transfer (A) to N 10 15 1F 1A 1C 5 £ 10 + 005FAC 0/0/2 1FAC replace (B) by (N) 1F 01 1F 1A 02 £ 1 £ 10 2 0F1FA2 15/0/0 1FA2 collate and add 02 01 1F 0B 15 2 1 £ 11 5 021FB5 2/0/0 1FB5 transfer (A) to N 38 1C 10 16 07 H + 6 7 18C067 24/1/2 67 modify address of next 16 08 10 10 07 6 8 7 068007 6/1/0 7 select (N) 02 01 1F 0B 1C 2 1 £ 11 + 021FBC 2/0/0 1FBC transfer (A) to N 38 1C 10 16 07 H + 6 7 18C067 24/1/2 67 modify address of next 16 08 10 10 19 6 8 9 068009 6/1/0 9 select (N) 6E 00 00 00 00 be 08 04 01 1F 1A 8 4 1 £ 10 0841FA 8/0/2 1FA merge constant length 01 02 01 1F 0B 1 2 1 £ 11 0121FB 1/0/1 1FB prepare for digit collation 0D 16 19 1F 1A : 6 9 £ 10 0D69FA 13/0/3 9FA divide uniform radix 04 38 1C 10 16 4 H + 6 048C06 4/1/0 C06 add (N) to (A) 07 15 08 10 01 7 5 8 1 075801 7/0/2 1801 augment (N) by (A) 0E 3B 01 1F 04 . * 1 £ 4 0EB1F4 14/1/1 11F4 replace selected bits 10 10 10 10 10 000000 0/0/0 0 Halt 0D 38 19 0E 1F : H 9 . £ 0D89EF 13/1/0 9EF divide uniform radix 13 38 1C 10 16 3 H + 6 038C06 3/1/0 C06 copy (A) to N 07 16 08 10 10 7 6 8 076800 7/0/3 800 augment (N) by (A) 01 15 01 1F 1A 1 5 1 £ 10 0151FA 1/0/2 11FA round off 02 15 01 1F 1A 2 5 1 £ 10 0251FA 2/0/2 11FA transfer (A) to N 1C 3B 01 1F 04 + * 1 £ 4 0CB1F4 12/1/1 11F4 convert 07 10 10 10 10 7 070000 7/0/0 0 augment (N) by (A) 1F 6E 00 00 00 £ be 0FE000 15/1/3 0 collate and add 04 16 38 19 0E 4 6 H 9 . 04689E 4/0/3 89E add (N) to (A) 1F 13 38 0D 1F £ 3 H : £ 0F38DF 15/0/1 18DF collate and add 0B 08 16 08 10 11 8 6 8 0B8680 11/1/0 680 multiply and subtract 10 02 15 19 1F 2 5 9 £ 00259F 0/0/1 59F Invalid 19 0E 3B 13 1F 9 . * 3 £ 09EB3F 9/1/3 B3F multiply uniform radix 15 08 02 01 1F 5 8 2 1 £ 05821F 5/1/0 21F subtract (N) from (A) 0B 04 16 01 1F 11 4 6 1 £ 0B461F 11/0/2 61F multiply and subtract 0B 15 3B 01 1F 11 5 * 1 £ 0B5B1F 11/0/2 1B1F multiply and subtract 15 10 10 10 10 5 050000 5/0/0 0 subtract (N) from (A) 01 1F 38 19 0E 1 £ H 9 . 01F89E 1/1/3 189E select literal address 1F 13 16 01 1F £ 3 6 1 £ 0F361F 15/0/1 161F collate and add 01 1F 02 01 1F 1 £ 2 1 £ 01F21F 1/1/3 121F select literal address 01 0D 38 0D 1F 1 : H : £ 01D8DF 1/1/2 18DF subtract literal address 0B 08 16 08 10 11 8 6 8 0B8680 11/1/0 680 multiply and subtract 10 13 6E 00 00 3 be 003E00 0/0/1 1E00 Invalid 1F 15 04 10 10 £ 5 4 0F5400 15/0/2 1400 collate and add 10 10 10 38 19 H 9 000089 0/0/0 89 Halt 1F 15 0B 38 19 £ 5 11 H 9 0F5B89 15/0/2 1B89 collate and add 0D 10 10 38 19 : H 9 0D0089 13/0/0 89 divide uniform radix 0D 04 1A 16 01 : 4 10 6 1 0D4A61 13/0/2 A61 divide uniform radix 1F 1A 02 02 01 £ 10 2 2 1 0FA221 15/1/1 221 collate and add 1F 0B 04 38 19 £ 11 4 H 9 0FB489 15/1/1 1489 collate and add 1F 15 10 38 0D £ 5 H : 0F508D 15/0/2 108D collate and add 1F 1A 1C 02 10 £ 10 + 2 0FAC20 15/1/1 C20 collate and add 10 10 01 16 01 1 6 1 000161 0/0/0 161 Halt 1F 0B 04 3B 13 £ 11 4 * 3 0FB4B3 15/1/1 14B3 collate and add 1F 16 08 38 0D £ 6 8 H : 0F688D 15/0/3 88D collate and add 1F 1A 1C 16 10 £ 10 + 6 0FAC60 15/1/1 C60 collate and add 10 10 10 02 01 2 1 000021 0/0/0 21 Halt 1F 0B 0B 6E 00 £ 11 11 be 0FBBE0 15/1/1 1BE0 collate and add 01 1F 16 02 15 1 £ 6 2 5 01F625 1/1/3 1625 select literal address 01 1F 1A 02 38 1 £ 10 2 H 01FA28 1/1/3 1A28 select literal address 0D 1F 1A 1C 02 : £ 10 + 2 0DFAC2 13/1/3 1AC2 divide uniform radix 08 10 10 10 16 8 6 080006 8/0/0 6 merge constant length 01 1F 0B 0B 38 1 £ 11 11 H 01FBB8 1/1/3 1BB8 select literal address 0D 1F 1A 1C 02 : £ 10 + 2 0DFAC2 13/1/3 1AC2 divide uniform radix 10 10 10 10 16 6 000006 0/0/0 6 Halt 01 1F 0B 15 3B 1 £ 11 5 * 01FB5B 1/1/3 1B5B select literal address 01 1F 16 0D 16 1 £ 6 : 6 01F6D6 1/1/3 16D6 select literal address 01 1F 1A 1F 38 1 £ 10 £ H 01FAF8 1/1/3 1AF8 select literal address 0D 1F 1A 1C 37 : £ 10 + G 0DFAC7 13/1/3 1AC7 divide uniform radix 08 10 10 10 16 8 6 080006 8/0/0 6 merge constant length 19 1F 0B 1C 3B 9 £ 11 + * 09FBCB 9/1/3 1BCB multiply uniform radix 01 1F 07 16 2A 1 £ 7 6 = 01F76A 1/1/3 176A select literal address 0B 1F 0B 1C 6E 11 £ 11 + be 0BFBCE 11/1/3 1BCE multiply and subtract 10 01 1F 07 10 1 £ 7 001F70 0/0/0 1F70 Halt 16 01 1F 1A 1F 6 1 £ 10 £ 061FAF 6/0/0 1FAF select (N) 37 1A 10 10 10 G 10 17A000 23/1/1 0 copy into tag 29 02 10 10 02 I 2 2 192002 25/0/1 2 step on and test 38 19 1F 07 01 H 9 £ 7 1 189F71 24/1/0 1F71 unconditional jump 02 19 1F 0B 1C 2 9 £ 11 + 029FBC 2/1/0 1FBC transfer (A) to N 02 19 1F 0B 1C 2 9 £ 11 + 029FBC 2/1/0 1FBC transfer (A) to N 29 0E 04 10 10 I . 4 19E400 25/1/3 400 conditional Halt 16 01 1F 1A 02 6 1 £ 10 2 061FA2 6/0/0 1FA2 select (N) 15 01 1F 0B 15 5 1 £ 11 5 051FB5 5/0/0 1FB5 subtract (N) from (A) 02 01 1F 0B 15 2 1 £ 11 5 021FB5 2/0/0 1FB5 transfer (A) to N 16 01 1F 1A 1C 6 1 £ 10 + 061FAC 6/0/0 1FAC select (N) 04 01 1F 1A 02 4 1 £ 10 2 041FA2 4/0/0 1FA2 add (N) to (A) 13 01 1F 1A 1C 3 1 £ 10 + 031FAC 3/0/0 1FAC copy (A) to N 15 01 1F 1A 0D 5 1 £ 10 : 051FAD 5/0/0 1FAD subtract (N) from (A) 6E 00 00 00 00 be 0E 3B 15 1F 08 . * 5 £ 8 0EB5F8 14/1/1 15F8 replace selected bits 15 16 01 1F 1A 5 6 1 £ 10 0561FA 5/0/3 1FA subtract (N) from (A) 01 07 01 1F 0B 1 7 1 £ 11 0171FB 1/0/3 11FB interchange area addresses 08 16 01 1F 0B 8 6 1 £ 11 0861FB 8/0/3 1FB merge constant length 08 15 01 1F 0B 8 5 1 £ 11 0851FB 8/0/2 11FB merge constant length 19 3B 13 1F 04 9 * 3 £ 4 09B3F4 9/1/1 13F4 multiply uniform radix 07 38 19 1F 10 7 H 9 £ 0789F0 7/1/0 9F0 augment (N) by (A) 15 10 10 10 10 5 050000 5/0/0 0 subtract (N) from (A) 10 38 19 1F 08 H 9 £ 8 0089F8 0/1/0 9F8 copy registers 08 38 19 0D 1A 8 H 9 : 10 0889DA 8/1/0 9DA merge variable length 0D 16 01 1F 0B : 6 1 £ 11 0D61FB 13/0/3 1FB divide uniform radix 02 3B 13 0E 0D 2 * 3 . : 02B3ED 2/1/1 13ED transfer (A) to N 07 16 01 1F 1A 7 6 1 £ 10 0761FA 7/0/3 1FA augment (N) by (A) 1F 32 10 10 10 £ B 0F2000 15/0/1 0 collate and add 04 6E 00 00 00 4 be 04E000 4/1/3 0 add (N) to (A) 08 1C 01 1A 10 8 + 1 10 08C1A0 8/1/2 1A0 merge variable length 10 1A 02 01 1F 10 2 1 £ 00A21F 0/1/1 21F replace registers 0B 1A 16 01 1F 11 10 6 1 £ 0BA61F 11/1/1 61F multiply and subtract 1A 07 02 10 10 10 7 2 0A7200 10/0/3 1200 multiply and add 10 19 16 19 1F 9 6 9 £ 00969F 0/1/0 169F copy registers 1A 1A 13 08 10 10 10 3 8 0AA380 10/1/1 380 multiply and add 10 1A 02 10 10 10 2 00A200 0/1/1 200 replace registers 10 1A 38 08 10 10 H 8 00A880 0/1/1 880 replace registers 10 19 10 10 10 9 009000 0/1/0 1000 copy registers 02 10 10 10 10 2 020000 2/0/0 0 transfer (A) to N 10 1F 10 10 10 £ 00F000 0/1/3 1000 Invalid 10 04 10 01 1C 4 1 + 00401C 0/0/2 1C replace (B) by (N) 04 16 10 01 1F 4 6 1 £ 04601F 4/0/3 1F add (N) to (A) 1C 10 10 04 10 + 4 0C0040 12/0/0 40 convert 10 10 6E 00 00 be 000E00 0/0/0 E00 Halt 1F 19 1A 10 10 £ 9 10 0F9A00 15/1/0 1A00 collate and add 10 1A 10 10 04 10 4 00A004 0/1/1 4 replace registers 10 10 10 1F 01 £ 1 0000F1 0/0/0 F1 Halt 1F 1C 10 1F 01 £ + £ 1 0FC0F1 15/1/2 F1 collate and add 1F 0E 10 19 16 £ . 9 6 0FE096 15/1/3 96 collate and add 19 16 19 16 19 9 6 9 6 9 096969 9/0/3 969 multiply uniform radix 16 19 16 10 10 6 9 6 069600 6/1/0 1600 select (N) 10 01 04 10 10 1 4 001400 0/0/0 1400 Halt 10 10 02 10 10 2 000200 0/0/0 200 Halt 10 10 01 10 10 1 000100 0/0/0 100 Halt 10 01 1C 10 10 1 + 001C00 0/0/0 1C00 Halt 10 10 10 07 0E 7 . 00007E 0/0/0 7E Halt 10 10 10 10 07 7 000007 0/0/0 7 Halt 1F 1F 1F 2A 07 £ £ £ = 7 0FFFA7 15/1/3 1FA7 collate and add 1F 0B 1A 6E 00 £ 11 10 be 0FBAE0 15/1/1 1AE0 collate and add 01 1F 1A 08 10 1 £ 10 8 01FA80 1/1/3 1A80 select literal address 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 1A 10 29 10 I 000A09 0/0/0 A09 Halt 0B 1F 1F 1F 2A 11 £ £ £ = 0BFFFA 11/1/3 1FFA multiply and subtract 13 1F 1A 0E 10 3 £ 10 . 03FAE0 3/1/3 1AE0 copy (A) to N 01 1C 0E 08 10 1 + . 8 01CE80 1/1/2 E80 subtract literal address 01 1C 0E 08 10 1 + . 8 01CE80 1/1/2 E80 subtract literal address 01 0B 07 1A 10 1 11 7 10 01B7A0 1/1/1 17A0 add literal address 10 10 10 1F 10 £ 0000F0 0/0/0 F0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 01 10 1 000010 0/0/0 10 Halt 10 10 10 10 6E be 00000E 0/0/0 E Halt 10 01 1F 0B 16 1 £ 11 6 001FB6 0/0/0 1FB6 Halt 10 10 10 01 19 1 9 000019 0/0/0 19 Halt 10 10 10 02 10 2 000020 0/0/0 20 Halt 10 01 1F 1C 1C 1 £ + + 001FCC 0/0/0 1FCC Halt 10 01 1F 0D 1C 1 £ : + 001FDC 0/0/0 1FDC Halt 1F 10 10 10 10 £ 0F0000 15/0/0 0 collate and add 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 13 0E 08 3 . 8 0003E8 0/0/0 3E8 Halt 10 10 07 0D 02 7 : 2 0007D2 0/0/0 7D2 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 1C 04 0E 04 02 + 4 . 4 2 0C4E42 12/0/2 E42 convert 10 10 04 01 04 4 1 4 000414 0/0/0 414 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 6E 00 00 00 00 be 04 10 10 10 10 4 040000 4/0/0 0 add (N) to (A) 10 10 10 10 10 000000 0/0/0 0 Halt 10 38 1C 10 08 H + 8 008C08 0/1/0 C08 copy registers 10 01 16 1F 1C 1 6 £ + 0016FC 0/0/0 16FC Halt 10 29 0E 08 10 I . 8 009E80 0/1/0 1E80 copy registers 10 38 1C 10 08 H + 8 008C08 0/1/0 C08 copy registers 10 23 02 10 10 C 2 003200 0/0/1 1200 Invalid 10 02 01 1F 0D 2 1 £ : 0021FD 0/0/1 1FD Invalid 10 15 01 1F 1C 5 1 £ + 0051FC 0/0/2 11FC replace (B) by (N) 1F 07 10 10 08 £ 7 8 0F7008 15/0/3 1008 collate and add 10 38 19 1F 0D H 9 £ : 0089FD 0/1/0 9FD copy registers 01 10 10 10 04 1 4 010004 1/0/0 4 table look up 10 10 10 10 01 1 000001 0/0/0 1 Halt 1C 38 19 0E 0B + H 9 . 11 0C89EB 12/1/0 9EB convert 16 6E 00 00 00 6 be 06E000 6/1/3 0 select (N) 01 10 10 10 10 1 010000 1/0/0 0 table look up 01 10 10 10 10 1 010000 1/0/0 0 table look up 1F 15 08 10 10 £ 5 8 0F5800 15/0/2 1800 collate and add 01 10 10 10 10 1 010000 1/0/0 0 table look up 1F 15 08 10 10 £ 5 8 0F5800 15/0/2 1800 collate and add 02 01 0B 10 10 2 1 11 021B00 2/0/0 1B00 transfer (A) to N 10 10 1F 10 10 £ 000F00 0/0/0 F00 Halt 10 19 08 10 10 9 8 009800 0/1/0 1800 copy registers 10 10 01 10 10 1 000100 0/0/0 100 Halt 10 10 02 10 08 2 8 000208 0/0/0 208 Halt 04 16 04 10 01 4 6 4 1 046401 4/0/3 401 add (N) to (A) 1F 1F 1F 16 10 £ £ £ 6 0FFF60 15/1/3 1F60 collate and add 01 01 01 02 10 1 1 1 2 011120 1/0/0 1120 table look up 10 04 10 2A 10 4 = 0040A0 0/0/2 A0 replace (B) by (N) 01 01 02 6E 00 1 1 2 be 0112E0 1/0/0 12E0 table look up 10 01 10 04 23 1 4 C 001043 0/0/0 1043 Halt 10 10 10 10 2A = 00000A 0/0/0 A Halt 10 01 04 13 38 1 4 3 H 001438 0/0/0 1438 Halt 08 01 01 0E 10 8 1 1 . 0811E0 8/0/0 11E0 merge constant length 10 10 10 02 29 2 I 000029 0/0/0 29 Halt 1C 10 10 01 3B + 1 * 0C001B 12/0/0 1B convert 10 01 10 0E 2A 1 . = 0010EA 0/0/0 10EA Halt 10 01 01 02 23 1 1 2 C 001123 0/0/0 1123 Halt 1A 10 10 10 2A 10 = 0A000A 10/0/0 A multiply and add 10 01 01 02 38 1 1 2 H 001128 0/0/0 1128 Halt 08 01 10 01 2A 8 1 1 = 08101A 8/0/0 101A merge constant length 10 01 01 02 23 1 1 2 C 001123 0/0/0 1123 Halt 1C 10 10 10 38 + H 0C0008 12/0/0 8 convert 08 01 10 10 0E 8 1 . 08100E 8/0/0 100E merge constant length 10 0B 0B 08 6E 11 11 8 be 00BB8E 0/1/1 1B8E replace registers 10 10 01 01 02 1 1 2 000112 0/0/0 112 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 2A 08 10 10 10 = 8 1A8000 26/1/0 0 test route N1 10 10 10 10 13 3 000003 0/0/0 3 Halt 38 08 01 01 13 H 8 1 1 3 188113 24/1/0 113 unconditional jump 38 08 01 01 08 H 8 1 1 8 188118 24/1/0 118 unconditional jump 38 08 01 01 08 H 8 1 1 8 188118 24/1/0 118 unconditional jump 2A 02 01 01 02 = 2 1 1 2 1A2112 26/0/1 112 leave subroutine 10 10 10 10 10 000000 0/0/0 0 Halt 01 1F 13 08 08 1 £ 3 8 8 01F388 1/1/3 1388 select literal address 01 1C 10 10 01 1 + 1 01C001 1/1/2 1 subtract literal address 3B 02 01 01 0B * 2 1 1 11 1B211B 27/0/1 11B jump A != Z 2A 02 01 01 19 = 2 1 1 9 1A2119 26/0/1 119 leave subroutine 16 10 01 13 15 6 1 3 5 060135 6/0/0 135 select (N) 02 10 10 04 10 2 4 020040 2/0/0 40 transfer (A) to N 6E 00 00 00 00 be 10 2A 10 01 01 = 1 1 00A011 0/1/1 11 replace registers 02 23 10 10 10 2 C 023000 2/0/1 1000 transfer (A) to N 10 2A 10 01 04 = 1 4 00A014 0/1/1 14 replace registers 13 38 08 01 13 3 H 8 1 3 038813 3/1/0 813 copy (A) to N 16 10 10 10 10 6 060000 6/0/0 0 select (N) 04 2A 10 01 01 4 = 1 1 04A011 4/1/1 11 add (N) to (A) 02 23 1A 10 10 2 C 10 023A00 2/0/1 1A00 transfer (A) to N 10 2A 10 01 01 = 1 1 00A011 0/1/1 11 replace registers 02 2A 10 01 01 2 = 1 1 02A011 2/1/1 11 transfer (A) to N 19 2A 10 01 01 9 = 1 1 09A011 9/1/1 11 multiply uniform radix 02 23 0E 10 10 2 C . 023E00 2/0/1 1E00 transfer (A) to N 10 2A 10 01 01 = 1 1 00A011 0/1/1 11 replace registers 02 16 08 01 1A 2 6 8 1 10 02681A 2/0/3 81A transfer (A) to N 1A 02 08 1C 08 10 2 8 + 8 0A28C8 10/0/1 8C8 multiply and add 10 6E 00 00 00 be 00E000 0/1/3 0 Invalid 02 0E 2A 10 01 2 . = 1 02EA01 2/1/3 A01 transfer (A) to N 01 02 23 10 10 1 2 C 012300 1/0/1 300 prepare for digit collation 10 10 2A 10 01 = 1 000A01 0/0/0 A01 Halt 04 13 38 08 01 4 3 H 8 1 043881 4/0/1 1881 add (N) to (A) 13 13 38 08 01 3 3 H 8 1 033881 3/0/1 1881 copy (A) to N 02 0E 02 08 1C 2 . 2 8 + 02E28C 2/1/3 28C transfer (A) to N 08 10 38 08 01 8 H 8 1 080881 8/0/0 881 merge constant length 02 10 0E 10 1C 2 . + 020E0C 2/0/0 E0C transfer (A) to N 08 10 2A 10 01 8 = 1 080A01 8/0/0 A01 merge constant length 13 1C 2A 10 01 3 + = 1 03CA01 3/1/2 A01 copy (A) to N 04 0E 2A 10 01 4 . = 1 04EA01 4/1/3 A01 add (N) to (A) 13 1C 10 10 10 3 + 03C000 3/1/2 0 copy (A) to N 10 15 38 08 01 5 H 8 1 005881 0/0/2 1881 replace (B) by (N) 15 0D 0E 10 1F 5 : . £ 05DE0F 5/1/2 1E0F subtract (N) from (A) 13 1C 6E 00 00 3 + be 03CE00 3/1/2 E00 copy (A) to N 01 13 1C 10 10 1 3 + 013C00 1/0/1 1C00 prepare for digit collation 10 10 10 16 10 6 000060 0/0/0 60 Halt 01 13 0B 02 10 1 3 11 2 013B20 1/0/1 1B20 prepare for digit collation 10 04 10 2A 10 4 = 0040A0 0/0/2 A0 replace (B) by (N) 01 01 02 23 10 1 1 2 C 011230 1/0/0 1230 table look up 10 10 10 2A 10 = 0000A0 0/0/0 A0 Halt 01 01 02 2A 02 1 1 2 = 2 0112A2 1/0/0 12A2 table look up 01 13 1C 10 10 1 3 + 013C00 1/0/1 1C00 prepare for digit collation 10 10 10 2A 08 = 8 0000A8 0/0/0 A8 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 13 38 08 3 H 8 000388 0/0/0 388 Halt 01 04 04 38 08 1 4 4 H 8 014488 1/0/2 488 round off 01 04 1A 38 08 1 4 10 H 8 014A88 1/0/2 A88 round off 01 04 19 2A 02 1 4 9 = 2 0149A2 1/0/2 9A2 round off 01 04 13 6E 00 1 4 3 be 0143E0 1/0/2 3E0 round off 10 01 04 1A 01 1 4 10 1 0014A1 0/0/0 14A1 Halt 0E 10 10 01 04 . 1 4 0E0014 14/0/0 14 replace selected bits 10 01 04 13 02 1 4 3 2 001432 0/0/0 1432 Halt 10 01 04 13 2A 1 4 3 = 00143A 0/0/0 143A Halt 02 01 04 13 10 2 1 4 3 021430 2/0/0 1430 transfer (A) to N 10 10 10 10 16 6 000006 0/0/0 6 Halt 08 01 1A 1C 02 8 1 10 + 2 081AC2 8/0/0 1AC2 merge constant length 08 1F 15 04 2A 8 £ 5 4 = 08F54A 8/1/3 154A merge variable length 10 01 01 02 23 1 1 2 C 001123 0/0/0 1123 Halt 10 10 10 10 2A = 00000A 0/0/0 A Halt 10 01 04 13 38 1 4 3 H 001438 0/0/0 1438 Halt 08 01 15 0B 02 8 1 5 11 2 0815B2 8/0/0 15B2 merge constant length 08 1F 15 04 2A 8 £ 5 4 = 08F54A 8/1/3 154A merge variable length 10 01 01 02 23 1 1 2 C 001123 0/0/0 1123 Halt 10 10 10 10 6E be 00000E 0/0/0 E Halt 10 10 01 15 08 1 5 8 000158 0/0/0 158 Halt 2A 10 01 04 13 = 1 4 3 1A0143 26/0/0 143 enter subroutine 38 08 01 04 1F H 8 1 4 £ 18814F 24/1/0 14F unconditional jump 38 08 01 15 16 H 8 1 5 6 188156 24/1/0 156 unconditional jump 02 08 1F 15 04 2 8 £ 5 4 028F54 2/1/0 F54 transfer (A) to N 2A 02 01 04 0E = 2 1 4 . 1A214E 26/0/1 14E leave subroutine 29 1C 10 10 07 I + 7 19C007 25/1/2 7 interrogate indicators 3B 10 01 13 19 * 1 3 9 1B0139 27/0/0 139 jump A = Z 01 1C 10 10 15 1 + 5 01C005 1/1/2 5 subtract literal address 3B 04 01 13 19 * 4 1 3 9 1B4139 27/0/2 139 jump A >= Z 01 1A 10 10 01 1 10 1 01A001 1/1/1 1 add literal address 3B 10 01 07 04 * 1 7 4 1B0174 27/0/0 174 jump A = Z 38 08 01 07 08 H 8 1 7 8 188178 24/1/0 178 unconditional jump 16 10 01 0B 01 6 1 11 1 0601B1 6/0/0 1B1 select (N) 02 10 10 04 10 2 4 020040 2/0/0 40 transfer (A) to N 6E 00 00 00 00 be 16 2A 10 01 01 6 = 1 1 06A011 6/1/1 11 select (N) 02 23 10 10 10 2 C 023000 2/0/1 1000 transfer (A) to N 10 2A 10 01 04 = 1 4 00A014 0/1/1 14 replace registers 13 38 08 01 16 3 H 8 1 6 038816 3/1/0 816 copy (A) to N 0D 38 08 02 02 : H 8 2 2 0D8822 13/1/0 822 divide uniform radix 16 02 08 01 1F 6 2 8 1 £ 06281F 6/0/1 81F select (N) 10 38 08 01 16 H 8 1 6 008816 0/1/0 816 copy registers 16 15 08 01 1F 6 5 8 1 £ 06581F 6/0/2 181F select (N) 10 3B 10 01 07 * 1 7 00B017 0/1/1 1017 replace registers 13 07 08 01 1F 3 7 8 1 £ 03781F 3/0/3 181F copy (A) to N 10 38 08 01 16 H 8 1 6 008816 0/1/0 816 copy registers 16 10 10 10 10 6 060000 6/0/0 0 select (N) 10 38 08 01 16 H 8 1 6 008816 0/1/0 816 copy registers 04 2A 02 01 07 4 = 2 1 7 04A217 4/1/1 217 add (N) to (A) 01 6E 00 00 00 1 be 01E000 1/1/3 0 select literal address 07 04 2A 10 01 7 4 = 1 074A01 7/0/2 A01 augment (N) by (A) 07 01 2A 10 01 7 1 = 1 071A01 7/0/0 1A01 augment (N) by (A) 07 01 10 10 1F 7 1 £ 07100F 7/0/0 100F augment (N) by (A) 1F 1F 38 08 01 £ £ H 8 1 0FF881 15/1/3 1881 collate and add 10 10 01 0E 10 1 . 0001E0 0/0/0 1E0 Halt 10 01 02 10 01 1 2 1 001201 0/0/0 1201 Halt 19 0D 2A 1A 01 9 : = 10 1 09DAA1 9/1/2 1AA1 multiply uniform radix 19 0E 2A 1C 01 9 . = + 1 09EAC1 9/1/3 AC1 multiply uniform radix 1A 10 16 1C 10 10 6 + 0A06C0 10/0/0 6C0 multiply and add 10 10 02 08 01 2 8 1 000281 0/0/0 281 Halt 1A 04 2A 10 01 10 4 = 1 0A4A01 10/0/2 A01 multiply and add 0B 04 16 1C 10 11 4 6 + 0B46C0 11/0/2 6C0 multiply and subtract 10 10 15 08 01 5 8 1 000581 0/0/0 581 Halt 1A 16 3B 10 01 10 6 * 1 0A6B01 10/0/3 B01 multiply and add 19 08 6E 00 00 9 8 be 098E00 9/1/0 E00 multiply uniform radix 01 08 02 16 08 1 8 2 6 8 018268 1/1/0 268 table look up 01 1A 04 02 1C 1 10 4 2 + 01A42C 1/1/1 42C add literal address 10 10 10 29 04 I 4 000094 0/0/0 94 Halt 10 01 1C 38 08 1 + H 8 001C88 0/0/0 1C88 Halt 01 07 1C 16 08 1 7 + 6 8 017C68 1/0/3 1C68 interchange area addresses 01 1A 08 02 1C 1 10 8 2 + 01A82C 1/1/1 82C add literal address 10 10 02 16 10 2 6 000260 0/0/0 260 Halt 10 10 02 02 08 2 2 8 000228 0/0/0 228 Halt 13 0E 1A 02 08 3 . 10 2 8 03EA28 3/1/3 A28 copy (A) to N 13 0E 08 29 1C 3 . 8 I + 03E89C 3/1/3 89C copy (A) to N 10 10 01 3B 02 1 * 2 0001B2 0/0/0 1B2 Halt 01 08 0E 02 08 1 8 . 2 8 018E28 1/1/0 E28 table look up 13 1F 0E 2A 10 3 £ . = 03FEA0 3/1/3 1EA0 copy (A) to N 01 0D 02 29 02 1 : 2 I 2 01D292 1/1/2 1292 subtract literal address 10 10 01 6E 00 1 be 0001E0 0/0/0 1E0 Halt 10 01 19 10 38 1 9 H 001908 0/0/0 1908 Halt 08 01 19 02 38 8 1 9 2 H 081928 8/0/0 1928 merge constant length 08 01 0B 02 38 8 1 11 2 H 081B28 8/0/0 1B28 merge constant length 1C 01 19 0D 38 + 1 9 : H 0C19D8 12/0/0 19D8 convert 08 01 19 13 38 8 1 9 3 H 081938 8/0/0 1938 merge constant length 08 01 19 16 38 8 1 9 6 H 081968 8/0/0 1968 merge constant length 08 01 13 16 2A 8 1 3 6 = 08136A 8/0/0 136A merge constant length 1C 01 1A 02 38 + 1 10 2 H 0C1A28 12/0/0 1A28 convert 08 01 07 1C 16 8 1 7 + 6 0817C6 8/0/0 17C6 merge constant length 08 01 1A 04 02 8 1 10 4 2 081A42 8/0/0 1A42 merge constant length 1C 10 10 10 01 + 1 0C0001 12/0/0 1 convert 0E 10 10 02 02 . 2 2 0E0022 14/0/0 22 replace selected bits 10 01 19 0D 38 1 9 : H 0019D8 0/0/0 19D8 Halt 08 01 08 16 10 8 1 8 6 081860 8/0/0 1860 merge constant length 10 10 10 01 6E 1 be 00001E 0/0/0 1E Halt 10 10 01 19 0E 1 9 . 00019E 0/0/0 19E Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 01 15 1 5 000015 0/0/0 15 Halt 10 10 13 0E 1A 3 . 10 0003EA 0/0/0 3EA Halt 10 10 0B 19 02 11 9 2 000B92 0/0/0 B92 Halt 10 10 04 10 16 4 6 000406 0/0/0 406 Halt 10 10 0B 19 02 11 9 2 000B92 0/0/0 B92 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 07 0E 10 10 10 7 . 07E000 7/1/3 0 augment (N) by (A) 10 10 10 13 0E 3 . 00003E 0/0/0 3E Halt 07 0E 10 10 10 7 . 07E000 7/1/3 0 augment (N) by (A) 1F 15 1F 15 1F £ 5 £ 5 £ 0F5F5F 15/0/2 1F5F collate and add 15 1F 15 1F 15 5 £ 5 £ 5 05F5F5 5/1/3 15F5 subtract (N) from (A) 6E 00 00 00 00 be 1C 1F 02 1F 02 + £ 2 £ 2 0CF2F2 12/1/3 12F2 convert 1F 02 1F 02 1F £ 2 £ 2 £ 0F2F2F 15/0/1 F2F collate and add 02 10 10 13 0E 2 3 . 02003E 2/0/0 3E transfer (A) to N 08 10 10 10 10 8 080000 8/0/0 0 merge constant length 10 10 10 10 10 000000 0/0/0 0 Halt 10 0E 10 01 1F . 1 £ 00E01F 0/1/3 1F Invalid 10 10 10 10 10 000000 0/0/0 0 Halt 19 38 08 02 10 9 H 8 2 098820 9/1/0 820 multiply uniform radix 08 10 10 01 1C 8 1 + 08001C 8/0/0 1C merge constant length 1F 16 10 10 10 £ 6 0F6000 15/0/3 0 collate and add 04 02 10 10 15 4 2 5 042005 4/0/1 5 add (N) to (A) 19 2A 08 10 01 9 = 8 1 09A801 9/1/1 801 multiply uniform radix 19 10 10 10 10 9 090000 9/0/0 0 multiply uniform radix 07 38 08 01 0B 7 H 8 1 11 07881B 7/1/0 81B augment (N) by (A) 07 6E 00 00 00 7 be 07E000 7/1/3 0 augment (N) by (A) 0B 1A 38 08 01 11 10 H 8 1 0BA881 11/1/1 881 multiply and subtract 0B 1C 38 08 01 11 + H 8 1 0BC881 11/1/2 881 multiply and subtract 0B 1C 23 02 10 11 + C 2 0BC320 11/1/2 320 multiply and subtract 01 19 2A 08 10 1 9 = 8 019A80 1/1/0 1A80 table look up 01 19 10 10 10 1 9 019000 1/1/0 1000 table look up 10 07 38 08 01 7 H 8 1 007881 0/0/3 1881 set radix 0B 0D 38 08 01 11 : H 8 1 0BD881 11/1/2 1881 multiply and subtract 1C 13 38 08 01 + 3 H 8 1 0C3881 12/0/1 1881 convert 1C 02 38 08 02 + 2 H 8 2 0C2882 12/0/1 882 convert 01 02 10 10 10 1 2 012000 1/0/1 0 prepare for digit collation 10 08 38 08 01 8 H 8 1 008881 0/1/0 881 copy registers 0B 07 10 10 10 11 7 0B7000 11/0/3 1000 multiply and subtract 1F 1F 01 0E 0B £ £ 1 . 11 0FF1EB 15/1/3 11EB collate and add 0B 08 02 10 10 11 8 2 0B8200 11/1/0 200 multiply and subtract 10 04 6E 00 00 4 be 004E00 0/0/2 E00 replace (B) by (N) 01 1C 08 2A 10 1 + 8 = 01C8A0 1/1/2 8A0 subtract literal address 01 0B 04 01 0E 1 11 4 1 . 01B41E 1/1/1 141E add literal address 1C 08 10 02 10 + 8 2 0C8020 12/1/0 20 convert 10 10 04 2A 10 4 = 0004A0 0/0/0 4A0 Halt 01 0B 04 01 0E 1 11 4 1 . 01B41E 1/1/1 141E add literal address 1F 13 1C 02 10 £ 3 + 2 0F3C20 15/0/1 1C20 collate and add 10 10 04 2A 10 4 = 0004A0 0/0/0 4A0 Halt 01 0B 04 16 08 1 11 4 6 8 01B468 1/1/1 1468 add literal address 01 1A 08 13 08 1 10 8 3 8 01A838 1/1/1 838 add literal address 1F 01 16 38 08 £ 1 6 H 8 0F1688 15/0/0 1688 collate and add 01 0E 1C 10 10 1 . + 01EC00 1/1/3 C00 select literal address 10 10 10 16 10 6 000060 0/0/0 60 Halt 01 1A 0E 02 10 1 10 . 2 01AE20 1/1/1 E20 add literal address 10 04 10 2A 10 4 = 0040A0 0/0/2 A0 replace (B) by (N) 01 01 02 6E 00 1 1 2 be 0112E0 1/0/0 12E0 table look up 10 01 0D 16 23 1 : 6 C 001D63 0/0/0 1D63 Halt 10 10 10 10 2A = 00000A 0/0/0 A Halt 10 01 04 13 2A 1 4 3 = 00143A 0/0/0 143A Halt 02 01 0D 02 2A 2 1 : 2 = 021D2A 2/0/0 1D2A transfer (A) to N 10 01 01 19 2A 1 1 9 = 00119A 0/0/0 119A Halt 10 01 01 02 23 1 1 2 C 001123 0/0/0 1123 Halt 08 10 10 10 2A 8 = 08000A 8/0/0 A merge constant length 10 01 01 02 23 1 1 2 C 001123 0/0/0 1123 Halt 08 10 10 10 2A 8 = 08000A 8/0/0 A merge constant length 10 01 01 02 2A 1 1 2 = 00112A 0/0/0 112A Halt 10 01 01 19 2A 1 1 9 = 00119A 0/0/0 119A Halt 10 01 01 02 23 1 1 2 C 001123 0/0/0 1123 Halt 0E 10 10 10 2A . = 0E000A 14/0/0 A replace selected bits 10 01 01 02 16 1 1 2 6 001126 0/0/0 1126 Halt 08 01 1A 1A 6E 8 1 10 10 be 081AAE 8/0/0 1AAE merge constant length 10 10 01 0E 04 1 . 4 0001E4 0/0/0 1E4 Halt 02 08 13 0E 08 2 8 3 . 8 0283E8 2/1/0 3E8 transfer (A) to N 2A 10 01 01 02 = 1 1 2 1A0112 26/0/0 112 enter subroutine 23 10 10 10 10 C 130000 19/0/0 0 output 2A 10 01 04 13 = 1 4 3 1A0143 26/0/0 143 enter subroutine 38 08 01 0E 1A H 8 1 . 10 1881EA 24/1/0 1EA unconditional jump 38 08 01 0E 15 H 8 1 . 5 1881E5 24/1/0 1E5 unconditional jump 02 08 13 0E 08 2 8 3 . 8 0283E8 2/1/0 3E8 transfer (A) to N 38 08 01 0D 15 H 8 1 : 5 1881D5 24/1/0 1D5 unconditional jump 13 08 1C 02 10 3 8 + 2 038C20 3/1/0 C20 copy (A) to N 02 08 1F 15 16 2 8 £ 5 6 028F56 2/1/0 F56 transfer (A) to N 02 08 1F 15 04 2 8 £ 5 4 028F54 2/1/0 F54 transfer (A) to N 38 08 02 01 0B H 8 2 1 11 18821B 24/1/0 21B unconditional jump 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 6E 00 00 00 00 be 02 10 10 10 10 2 020000 2/0/0 0 transfer (A) to N 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 6E 00 00 00 be 00E000 0/1/3 0 Invalid 10 10 15 15 04 5 5 4 000554 0/0/0 554 Halt 07 0B 07 1A 15 7 11 7 10 5 07B7A5 7/1/1 17A5 augment (N) by (A) 15 16 10 10 10 5 6 056000 5/0/3 0 subtract (N) from (A) 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 13 0E 07 0E 10 3 . 7 . 03E7E0 3/1/3 7E0 copy (A) to N 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 2A 10 01 = 1 000A01 0/0/0 A01 Halt 01 02 23 04 10 1 2 C 4 012340 1/0/1 340 prepare for digit collation 10 10 2A 10 01 = 1 000A01 0/0/0 A01 Halt 01 02 2A 10 01 1 2 = 1 012A01 1/0/1 A01 prepare for digit collation 01 19 2A 10 01 1 9 = 1 019A01 1/1/0 1A01 table look up 01 02 23 0E 10 1 2 C . 0123E0 1/0/1 3E0 prepare for digit collation 10 10 6E 00 00 be 000E00 0/0/0 E00 Halt 02 10 0E 2A 10 2 . = 020EA0 2/0/0 EA0 transfer (A) to N 01 01 02 23 0E 1 1 2 C . 01123E 1/0/0 123E table look up 10 10 10 2A 10 = 0000A0 0/0/0 A0 Halt 01 01 02 38 08 1 1 2 H 8 011288 1/0/0 1288 table look up 01 13 19 16 1C 1 3 9 6 + 01396C 1/0/1 196C prepare for digit collation 10 01 0E 15 08 1 . 5 8 001E58 0/0/0 1E58 Halt 01 1A 16 3B 02 1 10 6 * 2 01A6B2 1/1/1 6B2 add literal address 02 01 16 2A 02 2 1 6 = 2 0216A2 2/0/0 16A2 transfer (A) to N 01 0B 04 16 1C 1 11 4 6 + 01B46C 1/1/1 146C add literal address 10 10 10 15 08 5 8 000058 0/0/0 58 Halt 01 1A 16 3B 10 1 10 6 * 01A6B0 1/1/1 6B0 add literal address 02 01 15 10 10 2 1 5 021500 2/0/0 1500 transfer (A) to N 10 10 16 38 08 6 H 8 000688 0/0/0 688 Halt 01 0B 07 16 10 1 11 7 6 01B760 1/1/1 1760 add literal address 02 01 0E 6E 00 2 1 . be 021EE0 2/0/0 1EE0 transfer (A) to N 10 02 01 1C 02 2 1 + 2 0021C2 0/0/1 1C2 Invalid 10 10 10 10 38 H 000008 0/0/0 8 Halt 08 01 10 10 38 8 1 H 081008 8/0/0 1008 merge constant length 08 02 10 08 10 8 2 8 082080 8/0/1 80 merge constant length 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 2A = 00000A 0/0/0 A Halt 10 01 01 19 2A 1 1 9 = 00119A 0/0/0 119A Halt 10 01 01 02 23 1 1 2 C 001123 0/0/0 1123 Halt 08 10 10 10 2A 8 = 08000A 8/0/0 A merge constant length 10 01 01 02 6E 1 1 2 be 00112E 0/0/0 112E Halt 10 10 02 02 1A 2 2 10 00022A 0/0/0 22A Halt 23 08 10 10 10 C 8 138000 19/1/0 0 step back 2A 10 01 01 02 = 1 1 2 1A0112 26/0/0 112 enter subroutine 2A 10 01 01 19 = 1 1 9 1A0119 26/0/0 119 enter subroutine 2A 10 01 01 02 = 1 1 2 1A0112 26/0/0 112 enter subroutine 23 0E 10 10 10 C . 13E000 19/1/3 0 step on/set manual 2A 10 01 01 02 = 1 1 2 1A0112 26/0/0 112 enter subroutine 16 08 01 1A 1A 6 8 1 10 10 0681AA 6/1/0 1AA select (N) 02 08 01 1F 10 2 8 1 £ 0281F0 2/1/0 1F0 transfer (A) to N 23 10 10 10 10 C 130000 19/0/0 0 output 2A 10 01 04 13 = 1 4 3 1A0143 26/0/0 143 enter subroutine 38 08 02 13 16 H 8 2 3 6 188236 24/1/0 236 unconditional jump 38 08 02 02 1F H 8 2 2 £ 18822F 24/1/0 22F unconditional jump 02 08 01 1F 10 2 8 1 £ 0281F0 2/1/0 1F0 transfer (A) to N 38 08 01 16 16 H 8 1 6 6 188166 24/1/0 166 unconditional jump 6E 00 00 00 00 be 08 10 10 10 10 8 080000 8/0/0 0 merge constant length 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 6E 00 00 00 be 00E000 0/1/3 0 Invalid 04 16 10 10 10 4 6 046000 4/0/3 0 add (N) to (A) 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 6E 00 00 be 000E00 0/0/0 E00 Halt 02 15 04 10 10 2 5 4 025400 2/0/2 1400 transfer (A) to N 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 02 16 02 10 2 6 2 002620 0/0/1 620 Invalid 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 6E be 00000E 0/0/0 E Halt 10 10 02 07 10 2 7 000270 0/0/0 270 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 6E 00 00 00 00 be 0E 10 10 10 10 . 0E0000 14/0/0 0 replace selected bits 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 6E 00 00 00 be 00E000 0/1/3 0 Invalid 08 1C 10 10 10 8 + 08C000 8/1/2 0 merge variable length 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 6E 00 00 be 000E00 0/0/0 E00 Halt 02 19 1A 10 10 2 9 10 029A00 2/1/0 1A00 transfer (A) to N 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 02 1A 08 10 2 10 8 002A80 0/0/1 A80 Invalid 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 6E be 00000E 0/0/0 E Halt 10 10 02 0B 16 2 11 6 0002B6 0/0/0 2B6 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 6E 00 00 00 00 be 04 10 10 10 10 4 040000 4/0/0 0 add (N) to (A) 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 6E 00 00 00 be 00E000 0/1/3 0 Invalid 0D 02 10 10 10 : 2 0D2000 13/0/1 0 divide uniform radix 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 6E 00 00 be 000E00 0/0/0 E00 Halt 02 0E 10 10 10 2 . 02E000 2/1/3 0 transfer (A) to N 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 02 0E 0E 10 2 . . 002EE0 0/0/1 EE0 Invalid 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 6E be 00000E 0/0/0 E Halt 10 10 02 1F 1C 2 £ + 0002FC 0/0/0 2FC Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 6E 00 00 00 00 be 1A 10 10 10 10 10 0A0000 10/0/0 0 multiply and add 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 6E 00 00 00 be 00E000 0/1/3 0 Invalid 01 08 10 10 10 1 8 018000 1/1/0 0 table look up 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 6E 00 00 be 000E00 0/0/0 E00 Halt 13 02 16 10 10 3 2 6 032600 3/0/1 600 copy (A) to N 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 13 13 04 10 3 3 4 003340 0/0/1 1340 Invalid 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 6E be 00000E 0/0/0 E Halt 10 10 13 04 02 3 4 2 000342 0/0/0 342 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 6E 00 00 00 00 be 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 6E 00 00 00 be 00E000 0/1/3 0 Invalid 15 0E 10 10 10 5 . 05E000 5/1/3 0 subtract (N) from (A) 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 6E 00 00 be 000E00 0/0/0 E00 Halt 13 16 1C 10 10 3 6 + 036C00 3/0/3 C00 copy (A) to N 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 13 07 1A 10 3 7 10 0037A0 0/0/1 17A0 Invalid 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 6E be 00000E 0/0/0 E Halt 10 10 13 08 08 3 8 8 000388 0/0/0 388 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 6E 00 00 00 00 be 16 10 10 10 10 6 060000 6/0/0 0 select (N) 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 6E 00 00 00 be 00E000 0/1/3 0 Invalid 1A 04 10 10 10 10 4 0A4000 10/0/2 0 multiply and add 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 6E 00 00 be 000E00 0/0/0 E00 Halt 13 0B 02 10 10 3 11 2 03B200 3/1/1 1200 copy (A) to N 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 13 1C 10 10 3 + 003C00 0/0/1 1C00 Invalid 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 6E be 00000E 0/0/0 E Halt 10 10 13 1C 0E 3 + . 0003CE 0/0/0 3CE Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 6E 00 00 00 00 be 1C 10 10 10 10 + 0C0000 12/0/0 0 convert 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 6E 00 00 00 be 00E000 0/1/3 0 Invalid 0E 1A 10 10 10 . 10 0EA000 14/1/1 0 replace selected bits 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 6E 00 00 be 000E00 0/0/0 E00 Halt 13 1F 08 10 10 3 £ 8 03F800 3/1/3 1800 copy (A) to N 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 04 10 16 10 4 6 004060 0/0/2 60 replace (B) by (N) 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 6E be 00000E 0/0/0 E Halt 10 10 04 01 04 4 1 4 000414 0/0/0 414 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 6E 00 00 00 00 be 02 10 10 10 10 2 020000 2/0/0 0 transfer (A) to N 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 6E 00 00 00 be 00E000 0/1/3 0 Invalid 13 10 10 10 10 3 030000 3/0/0 0 copy (A) to N 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 6E 00 00 be 000E00 0/0/0 E00 Halt 04 13 0E 10 10 4 3 . 043E00 4/0/1 1E00 add (N) to (A) 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 04 04 1C 10 4 4 + 0044C0 0/0/2 4C0 replace (B) by (N) 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 6E be 00000E 0/0/0 E Halt 10 10 04 15 1A 4 5 10 00045A 0/0/0 45A Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 6E 00 00 00 00 be 08 10 10 10 10 8 080000 8/0/0 0 merge constant length 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 6E 00 00 00 be 00E000 0/1/3 0 Invalid 07 16 10 10 10 7 6 076000 7/0/3 0 augment (N) by (A) 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 6E 00 00 be 000E00 0/0/0 E00 Halt 04 08 04 10 10 4 8 4 048400 4/1/0 400 add (N) to (A) 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 04 19 02 10 4 9 2 004920 0/0/2 920 replace (B) by (N) 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 6E be 00000E 0/0/0 E Halt 10 10 04 1A 10 4 10 0004A0 0/0/0 4A0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 6E 00 00 00 00 be 0E 10 10 10 10 . 0E0000 14/0/0 0 replace selected bits 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 6E 00 00 00 be 00E000 0/1/3 0 Invalid 0B 1C 10 10 10 11 + 0BC000 11/1/2 0 multiply and subtract 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 6E 00 00 be 000E00 0/0/0 E00 Halt 04 1C 1A 10 10 4 + 10 04CA00 4/1/2 A00 add (N) to (A) 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 04 0D 08 10 4 : 8 004D80 0/0/2 D80 replace (B) by (N) 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 6E be 00000E 0/0/0 E Halt 10 10 04 0E 16 4 . 6 0004E6 0/0/0 4E6 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 6E 00 00 00 00 be 04 10 10 10 10 4 040000 4/0/0 0 add (N) to (A) 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 6E 00 00 00 be 00E000 0/1/3 0 Invalid 10 02 10 10 10 2 002000 0/0/1 0 Invalid 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 6E 00 00 be 000E00 0/0/0 E00 Halt 15 01 10 10 10 5 1 051000 5/0/0 1000 subtract (N) from (A) 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 15 01 0E 10 5 1 . 0051E0 0/0/2 11E0 replace (B) by (N) 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 6E be 00000E 0/0/0 E Halt 10 10 15 02 1C 5 2 + 00052C 0/0/0 52C Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 6E 00 00 00 00 be 1A 10 10 10 10 10 0A0000 10/0/0 0 multiply and add 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 6E 00 00 00 be 00E000 0/1/3 0 Invalid 04 08 10 10 10 4 8 048000 4/1/0 0 add (N) to (A) 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 6E 00 00 be 000E00 0/0/0 E00 Halt 15 15 16 10 10 5 5 6 055600 5/0/2 1600 subtract (N) from (A) 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 15 16 04 10 5 6 4 005640 0/0/2 1640 replace (B) by (N) 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 6E be 00000E 0/0/0 E Halt 10 10 15 07 02 5 7 2 000572 0/0/0 572 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 6E 00 00 00 00 be 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 6E 00 00 00 be 00E000 0/1/3 0 Invalid 08 0E 10 10 10 8 . 08E000 8/1/3 0 merge variable length 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 6E 00 00 be 000E00 0/0/0 E00 Halt 15 19 1C 10 10 5 9 + 059C00 5/1/0 1C00 subtract (N) from (A) 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 15 1A 1A 10 5 10 10 005AA0 0/0/2 1AA0 replace (B) by (N) 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 6E be 00000E 0/0/0 E Halt 10 10 15 0B 08 5 11 8 0005B8 0/0/0 5B8 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 6E 00 00 00 00 be 16 10 10 10 10 6 060000 6/0/0 0 select (N) 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 6E 00 00 00 be 00E000 0/1/3 0 Invalid 0D 04 10 10 10 : 4 0D4000 13/0/2 0 divide uniform radix 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 6E 00 00 be 000E00 0/0/0 E00 Halt 15 0E 02 10 10 5 . 2 05E200 5/1/3 200 subtract (N) from (A) 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 15 1F 10 10 5 £ 005F00 0/0/2 1F00 replace (B) by (N) 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 6E be 00000E 0/0/0 E Halt 10 10 15 1F 0E 5 £ . 0005FE 0/0/0 5FE Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 6E 00 00 00 00 be 1C 10 10 10 10 + 0C0000 12/0/0 0 convert 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 6E 00 00 00 be 00E000 0/1/3 0 Invalid 01 1A 10 10 10 1 10 01A000 1/1/1 0 add literal address 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 6E 00 00 be 000E00 0/0/0 E00 Halt 16 02 08 10 10 6 2 8 062800 6/0/1 800 select (N) 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 16 13 16 10 6 3 6 006360 0/0/3 360 set radix 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 6E be 00000E 0/0/0 E Halt 10 10 16 04 04 6 4 4 000644 0/0/0 644 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 6E 00 00 00 00 be 02 10 10 10 10 2 020000 2/0/0 0 transfer (A) to N 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 6E 00 00 00 be 00E000 0/1/3 0 Invalid 16 10 10 10 10 6 060000 6/0/0 0 select (N) 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 6E 00 00 be 000E00 0/0/0 E00 Halt 16 16 0E 10 10 6 6 . 066E00 6/0/3 E00 select (N) 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 16 07 1C 10 6 7 + 0067C0 0/0/3 7C0 set radix 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 6E be 00000E 0/0/0 E Halt 10 10 16 08 1A 6 8 10 00068A 0/0/0 68A Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 6E 00 00 00 00 be 08 10 10 10 10 8 080000 8/0/0 0 merge constant length 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 6E 00 00 00 be 00E000 0/1/3 0 Invalid 1A 16 10 10 10 10 6 0A6000 10/0/3 0 multiply and add 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 6E 00 00 be 000E00 0/0/0 E00 Halt 16 0B 04 10 10 6 11 4 06B400 6/1/1 1400 select (N) 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 16 1C 02 10 6 + 2 006C20 0/0/3 C20 set radix 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 6E be 00000E 0/0/0 E Halt 10 10 16 0D 10 6 : 0006D0 0/0/0 6D0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 6E 00 00 00 00 be 0E 10 10 10 10 . 0E0000 14/0/0 0 replace selected bits 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 6E 00 00 00 be 00E000 0/1/3 0 Invalid 0E 1C 10 10 10 . + 0EC000 14/1/2 0 replace selected bits 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 6E 00 00 be 000E00 0/0/0 E00 Halt 16 1F 1A 10 10 6 £ 10 06FA00 6/1/3 1A00 select (N) 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 07 10 08 10 7 8 007080 0/0/3 1080 set radix 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 6E be 00000E 0/0/0 E Halt 10 10 07 01 16 7 1 6 000716 0/0/0 716 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 6E 00 00 00 00 be 04 10 10 10 10 4 040000 4/0/0 0 add (N) to (A) 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 6E 00 00 00 be 00E000 0/1/3 0 Invalid 13 02 10 10 10 3 2 032000 3/0/1 0 copy (A) to N 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 6E 00 00 be 000E00 0/0/0 E00 Halt 07 04 10 10 10 7 4 074000 7/0/2 0 augment (N) by (A) 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 07 04 0E 10 7 4 . 0074E0 0/0/3 14E0 set radix 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 6E be 00000E 0/0/0 E Halt 10 10 07 15 1C 7 5 + 00075C 0/0/0 75C Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 6E 00 00 00 00 be 1A 10 10 10 10 10 0A0000 10/0/0 0 multiply and add 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 6E 00 00 00 be 00E000 0/1/3 0 Invalid 07 08 10 10 10 7 8 078000 7/1/0 0 augment (N) by (A) 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 6E 00 00 be 000E00 0/0/0 E00 Halt 07 08 16 10 10 7 8 6 078600 7/1/0 600 augment (N) by (A) 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 07 19 04 10 7 9 4 007940 0/0/3 1940 set radix 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 6E be 00000E 0/0/0 E Halt 10 10 07 1A 02 7 10 2 0007A2 0/0/0 7A2 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 6E 00 00 00 00 be 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 6E 00 00 00 be 00E000 0/1/3 0 Invalid 0B 0E 10 10 10 11 . 0BE000 11/1/3 0 multiply and subtract 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 6E 00 00 be 000E00 0/0/0 E00 Halt 07 1C 1C 10 10 7 + + 07CC00 7/1/2 C00 augment (N) by (A) 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 07 0D 1A 10 7 : 10 007DA0 0/0/3 1DA0 set radix 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 6E be 00000E 0/0/0 E Halt 10 10 07 0E 08 7 . 8 0007E8 0/0/0 7E8 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 6E 00 00 00 00 be 16 10 10 10 10 6 060000 6/0/0 0 select (N) 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 6E 00 00 00 be 00E000 0/1/3 0 Invalid 10 04 10 10 10 4 004000 0/0/2 0 replace (B) by (N) 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 6E 00 00 be 000E00 0/0/0 E00 Halt 08 01 02 10 10 8 1 2 081200 8/0/0 1200 merge constant length 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 08 02 10 10 8 2 008200 0/1/0 200 copy registers 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 6E be 00000E 0/0/0 E Halt 10 10 08 02 0E 8 2 . 00082E 0/0/0 82E Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 6E 00 00 00 00 be 1C 10 10 10 10 + 0C0000 12/0/0 0 convert 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 6E 00 00 00 be 00E000 0/1/3 0 Invalid 04 1A 10 10 10 4 10 04A000 4/1/1 0 add (N) to (A) 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 6E 00 00 be 000E00 0/0/0 E00 Halt 08 15 08 10 10 8 5 8 085800 8/0/2 1800 merge constant length 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 08 16 16 10 8 6 6 008660 0/1/0 660 copy registers 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 6E be 00000E 0/0/0 E Halt 10 10 08 07 04 8 7 4 000874 0/0/0 874 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 6E 00 00 00 00 be 02 10 10 10 10 2 020000 2/0/0 0 transfer (A) to N 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 6E 00 00 00 be 00E000 0/1/3 0 Invalid 19 10 10 10 10 9 090000 9/0/0 0 multiply uniform radix 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 6E 00 00 be 000E00 0/0/0 E00 Halt 08 19 0E 10 10 8 9 . 089E00 8/1/0 1E00 merge variable length 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 08 1A 1C 10 8 10 + 008AC0 0/1/0 AC0 copy registers 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 6E be 00000E 0/0/0 E Halt 10 10 08 0B 1A 8 11 10 0008BA 0/0/0 8BA Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 6E 00 00 00 00 be 08 10 10 10 10 8 080000 8/0/0 0 merge constant length 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 6E 00 00 00 be 00E000 0/1/3 0 Invalid 0D 16 10 10 10 : 6 0D6000 13/0/3 0 divide uniform radix 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 6E 00 00 be 000E00 0/0/0 E00 Halt 08 0E 04 10 10 8 . 4 08E400 8/1/3 400 merge variable length 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 08 1F 02 10 8 £ 2 008F20 0/1/0 F20 copy registers 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 6E be 00000E 0/0/0 E Halt 10 10 19 10 10 9 000900 0/0/0 900 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 6E 00 00 00 00 be 0E 10 10 10 10 . 0E0000 14/0/0 0 replace selected bits 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 6E 00 00 00 be 00E000 0/1/3 0 Invalid 01 1C 10 10 10 1 + 01C000 1/1/2 0 subtract literal address 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 6E 00 00 be 000E00 0/0/0 E00 Halt 19 02 1A 10 10 9 2 10 092A00 9/0/1 A00 multiply uniform radix 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 19 13 08 10 9 3 8 009380 0/1/0 1380 copy registers 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 6E be 00000E 0/0/0 E Halt 10 10 19 04 16 9 4 6 000946 0/0/0 946 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 6E 00 00 00 00 be 04 10 10 10 10 4 040000 4/0/0 0 add (N) to (A) 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 6E 00 00 00 be 00E000 0/1/3 0 Invalid 16 02 10 10 10 6 2 062000 6/0/1 0 select (N) 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 6E 00 00 be 000E00 0/0/0 E00 Halt 19 07 10 10 10 9 7 097000 9/0/3 1000 multiply uniform radix 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 19 07 0E 10 9 7 . 0097E0 0/1/0 17E0 copy registers 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 6E be 00000E 0/0/0 E Halt 10 10 19 08 1C 9 8 + 00098C 0/0/0 98C Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 6E 00 00 00 00 be 1A 10 10 10 10 10 0A0000 10/0/0 0 multiply and add 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 6E 00 00 00 be 00E000 0/1/3 0 Invalid 1A 08 10 10 10 10 8 0A8000 10/1/0 0 multiply and add 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 6E 00 00 be 000E00 0/0/0 E00 Halt 19 0B 16 10 10 9 11 6 09B600 9/1/1 1600 multiply uniform radix 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 19 1C 04 10 9 + 4 009C40 0/1/0 1C40 copy registers 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 6E be 00000E 0/0/0 E Halt 10 10 19 0D 02 9 : 2 0009D2 0/0/0 9D2 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 6E 00 00 00 00 be 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 6E 00 00 00 be 00E000 0/1/3 0 Invalid 0E 0E 10 10 10 . . 0EE000 14/1/3 0 replace selected bits 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 6E 00 00 be 000E00 0/0/0 E00 Halt 19 1F 1C 10 10 9 £ + 09FC00 9/1/3 1C00 multiply uniform radix 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 1A 10 1A 10 10 10 00A0A0 0/1/1 A0 replace registers 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 6E be 00000E 0/0/0 E Halt 10 10 1A 01 08 10 1 8 000A18 0/0/0 A18 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 6E 00 00 00 00 be 16 10 10 10 10 6 060000 6/0/0 0 select (N) 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 6E 00 00 00 be 00E000 0/1/3 0 Invalid 13 04 10 10 10 3 4 034000 3/0/2 0 copy (A) to N 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 6E 00 00 be 000E00 0/0/0 E00 Halt 1A 04 02 10 10 10 4 2 0A4200 10/0/2 200 multiply and add 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 1A 15 10 10 10 5 00A500 0/1/1 500 replace registers 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 6E be 00000E 0/0/0 E Halt 10 10 1A 15 0E 10 5 . 000A5E 0/0/0 A5E Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 6E 00 00 00 00 be 1C 10 10 10 10 + 0C0000 12/0/0 0 convert 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 6E 00 00 00 be 00E000 0/1/3 0 Invalid 07 1A 10 10 10 7 10 07A000 7/1/1 0 augment (N) by (A) 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 6E 00 00 be 000E00 0/0/0 E00 Halt 1A 08 08 10 10 10 8 8 0A8800 10/1/0 800 multiply and add 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 1A 19 16 10 10 9 6 00A960 0/1/1 960 replace registers 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 6E be 00000E 0/0/0 E Halt 10 10 1A 1A 04 10 10 4 000AA4 0/0/0 AA4 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 6E 00 00 00 00 be 02 10 10 10 10 2 020000 2/0/0 0 transfer (A) to N 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 6E 00 00 00 be 00E000 0/1/3 0 Invalid 1C 10 10 10 10 + 0C0000 12/0/0 0 convert 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 6E 00 00 be 000E00 0/0/0 E00 Halt 1A 1C 0E 10 10 10 + . 0ACE00 10/1/2 E00 multiply and add 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 1A 0D 1C 10 10 : + 00ADC0 0/1/1 DC0 replace registers 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 6E be 00000E 0/0/0 E Halt 10 10 1A 0E 1A 10 . 10 000AEA 0/0/0 AEA Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 6E 00 00 00 00 be 08 10 10 10 10 8 080000 8/0/0 0 merge constant length 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 6E 00 00 00 be 00E000 0/1/3 0 Invalid 10 16 10 10 10 6 006000 0/0/3 0 set radix 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 6E 00 00 be 000E00 0/0/0 E00 Halt 0B 01 04 10 10 11 1 4 0B1400 11/0/0 1400 multiply and subtract 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 0B 02 02 10 11 2 2 00B220 0/1/1 1220 replace registers 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 6E be 00000E 0/0/0 E Halt 10 10 0B 13 10 11 3 000B30 0/0/0 B30 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 6E 00 00 00 00 be 0E 10 10 10 10 . 0E0000 14/0/0 0 replace selected bits 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 6E 00 00 00 be 00E000 0/1/3 0 Invalid 04 1C 10 10 10 4 + 04C000 4/1/2 0 add (N) to (A) 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 6E 00 00 be 000E00 0/0/0 E00 Halt 0B 15 1A 10 10 11 5 10 0B5A00 11/0/2 1A00 multiply and subtract 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 0B 16 08 10 11 6 8 00B680 0/1/1 1680 replace registers 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 6E be 00000E 0/0/0 E Halt 10 10 0B 07 16 11 7 6 000B76 0/0/0 B76 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 6E 00 00 00 00 be 04 10 10 10 10 4 040000 4/0/0 0 add (N) to (A) 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 6E 00 00 00 be 00E000 0/1/3 0 Invalid 19 02 10 10 10 9 2 092000 9/0/1 0 multiply uniform radix 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 6E 00 00 be 000E00 0/0/0 E00 Halt 0B 1A 10 10 10 11 10 0BA000 11/1/1 0 multiply and subtract 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 0B 1A 0E 10 11 10 . 00BAE0 0/1/1 1AE0 replace registers 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 02 2 000002 0/0/0 2 Halt 10 10 10 10 16 6 000006 0/0/0 6 Halt 08 10 10 07 13 8 7 3 080073 8/0/0 73 merge constant length 10 10 10 10 02 2 000002 0/0/0 2 Halt 10 10 10 16 6E 6 be 00006E 0/0/0 6E Halt 10 10 0B 0B 1C 11 11 + 000BBC 0/0/0 BBC Halt 15 10 10 01 10 5 1 050010 5/0/0 10 subtract (N) from (A) 04 1C 10 10 04 4 + 4 04C004 4/1/2 4 add (N) to (A) 10 10 10 04 07 4 7 000047 0/0/0 47 Halt 15 1C 04 08 10 5 + 4 8 05C480 5/1/2 480 subtract (N) from (A) 10 04 01 10 10 4 1 004100 0/0/2 100 replace (B) by (N) 15 08 04 08 10 5 8 4 8 058480 5/1/0 480 subtract (N) from (A) 13 04 08 04 08 3 4 8 4 8 034848 3/0/2 848 copy (A) to N 10 10 04 15 04 4 5 4 000454 0/0/0 454 Halt 04 04 0D 04 02 4 4 : 4 2 044D42 4/0/2 D42 add (N) to (A) 10 10 04 15 04 4 5 4 000454 0/0/0 454 Halt 10 04 01 04 19 4 1 4 9 004149 0/0/2 149 replace (B) by (N) 15 08 04 08 10 5 8 4 8 058480 5/1/0 480 subtract (N) from (A) 10 10 10 04 01 4 1 000041 0/0/0 41 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 6E 00 00 00 00 be 1A 01 10 10 10 10 1 0A1000 10/0/0 1000 multiply and add 10 04 1F 10 10 4 £ 004F00 0/0/2 F00 replace (B) by (N) 04 10 10 10 04 4 4 040004 4/0/0 4 add (N) to (A) 1A 10 10 01 10 10 1 0A0010 10/0/0 10 multiply and add 10 01 10 10 04 1 4 001004 0/0/0 1004 Halt 13 10 10 10 10 3 030000 3/0/0 0 copy (A) to N 04 02 04 19 04 4 2 4 9 4 042494 4/0/1 494 add (N) to (A) 04 10 10 10 10 4 040000 4/0/0 0 add (N) to (A) 04 10 10 10 04 4 4 040004 4/0/0 4 add (N) to (A) 1C 04 16 10 10 + 4 6 0C4600 12/0/2 600 convert 10 10 04 04 10 4 4 000440 0/0/0 440 Halt 10 04 02 10 10 4 2 004200 0/0/2 200 replace (B) by (N) 10 10 04 01 04 4 1 4 000414 0/0/0 414 Halt 04 15 08 04 08 4 5 8 4 8 045848 4/0/2 1848 add (N) to (A) 10 6E 00 00 00 be 00E000 0/1/3 0 Invalid 0D 08 10 10 10 : 8 0D8000 13/1/0 0 divide uniform radix 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 15 1A 04 5 10 4 0005A4 0/0/0 5A4 Halt 08 10 10 10 10 8 080000 8/0/0 0 merge constant length 04 13 10 10 10 4 3 043000 4/0/1 1000 add (N) to (A) 10 10 10 04 01 4 1 000041 0/0/0 41 Halt 04 04 15 08 04 4 4 5 8 4 044584 4/0/2 584 add (N) to (A) 08 10 10 10 10 8 080000 8/0/0 0 merge constant length 04 1F 10 10 10 4 £ 04F000 4/1/3 1000 add (N) to (A) 10 10 10 10 10 000000 0/0/0 0 Halt 04 0E 10 10 10 4 . 04E000 4/1/3 0 add (N) to (A) 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 15 13 04 5 3 4 000534 0/0/0 534 Halt 02 10 6E 00 00 2 be 020E00 2/0/0 E00 transfer (A) to N 0B 0E 16 10 10 11 . 6 0BE600 11/1/3 600 multiply and subtract 10 10 10 15 1A 5 10 00005A 0/0/0 5A Halt 04 08 10 10 10 4 8 048000 4/1/0 0 add (N) to (A) 10 04 13 10 10 4 3 004300 0/0/2 300 replace (B) by (N) 10 10 10 10 04 4 000004 0/0/0 4 Halt 01 04 1A 15 08 1 4 10 5 8 014A58 1/0/2 A58 round off 04 08 10 10 04 4 8 4 048004 4/1/0 4 add (N) to (A) 02 04 1C 15 08 2 4 + 5 8 024C58 2/0/2 C58 transfer (A) to N 04 08 10 10 10 4 8 048000 4/1/0 0 add (N) to (A) 10 04 0E 10 10 4 . 004E00 0/0/2 E00 replace (B) by (N) 10 10 10 10 04 4 000004 0/0/0 4 Halt 02 04 02 15 08 2 4 2 5 8 024258 2/0/2 258 transfer (A) to N 04 08 10 10 10 4 8 048000 4/1/0 0 add (N) to (A) 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 0B 1F 04 10 11 £ 4 00BF40 0/1/1 1F40 replace registers 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 04 08 15 4 8 5 000485 0/0/0 485 Halt 1A 04 1A 10 10 10 4 10 0A4A00 10/0/2 A00 multiply and add 10 10 04 1F 04 4 £ 4 0004F4 0/0/0 4F4 Halt 01 04 0E 10 10 1 4 . 014E00 1/0/2 E00 round off 10 10 10 10 15 5 000005 0/0/0 5 Halt 07 04 1A 10 10 7 4 10 074A00 7/0/2 A00 augment (N) by (A) 10 10 04 02 15 4 2 5 000425 0/0/0 425 Halt 19 04 02 10 10 9 4 2 094200 9/0/2 200 multiply uniform radix 04 02 04 04 15 4 2 4 4 5 042445 4/0/1 445 add (N) to (A) 08 04 08 10 10 8 4 8 084800 8/0/2 800 merge constant length 10 10 04 0E 04 4 . 4 0004E4 0/0/0 4E4 Halt 16 04 08 10 6E 6 4 8 be 06480E 6/0/2 80E select (N) 10 10 1C 10 02 + 2 000C02 0/0/0 C02 Halt 10 10 10 04 08 4 8 000048 0/0/0 48 Halt 15 08 04 1C 10 5 8 4 + 0584C0 5/1/0 4C0 subtract (N) from (A) 10 10 10 10 10 000000 0/0/0 0 Halt 15 1C 04 08 10 5 + 4 8 05C480 5/1/2 480 subtract (N) from (A) 10 10 10 04 08 4 8 000048 0/0/0 48 Halt 15 08 04 1C 10 5 8 4 + 0584C0 5/1/0 4C0 subtract (N) from (A) 10 10 10 10 10 000000 0/0/0 0 Halt 15 08 04 08 10 5 8 4 8 058480 5/1/0 480 subtract (N) from (A) 01 10 10 10 10 1 010000 1/0/0 0 table look up 04 16 04 08 04 4 6 4 8 4 046484 4/0/3 484 add (N) to (A) 10 04 13 04 13 4 3 4 3 004343 0/0/2 343 replace (B) by (N) 15 0B 04 02 10 5 11 4 2 05B420 5/1/1 1420 subtract (N) from (A) 10 10 10 04 0D 4 : 00004D 0/0/0 4D Halt 10 10 10 10 10 000000 0/0/0 0 Halt 6E 00 00 00 00 be 10 10 10 10 04 4 000004 0/0/0 4 Halt 01 15 19 04 1C 1 5 9 4 + 01594C 1/0/2 194C round off 10 10 04 02 04 4 2 4 000424 0/0/0 424 Halt 02 15 0B 04 02 2 5 11 4 2 025B42 2/0/2 1B42 transfer (A) to N 10 10 10 10 10 000000 0/0/0 0 Halt 10 15 13 04 1A 5 3 4 10 00534A 0/0/2 134A replace (B) by (N) 10 10 10 10 04 4 000004 0/0/0 4 Halt 1F 10 10 10 10 £ 0F0000 15/0/0 0 collate and add 10 10 10 10 04 4 000004 0/0/0 4 Halt 1A 04 16 10 10 10 4 6 0A4600 10/0/2 600 multiply and add 10 10 04 01 04 4 1 4 000414 0/0/0 414 Halt 07 04 02 10 10 7 4 2 074200 7/0/2 200 augment (N) by (A) 10 10 04 01 04 4 1 4 000414 0/0/0 414 Halt 04 15 08 04 08 4 5 8 4 8 045848 4/0/2 1848 add (N) to (A) 10 6E 00 00 00 be 00E000 0/1/3 0 Invalid 01 0E 10 10 10 1 . 01E000 1/1/3 0 select literal address 10 10 07 0E 10 7 . 0007E0 0/0/0 7E0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 13 0E 07 0E 10 3 . 7 . 03E7E0 3/1/3 7E0 copy (A) to N 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 6E 00 00 be 000E00 0/0/0 E00 Halt 1C 02 1C 10 10 + 2 + 0C2C00 12/0/1 C00 convert 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 1C 13 1A 10 + 3 10 00C3A0 0/1/2 3A0 replace (B) by (N) 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 6E be 00000E 0/0/0 E Halt 10 10 1C 04 08 + 4 8 000C48 0/0/0 C48 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 6E 00 00 00 00 be 16 10 10 10 10 6 060000 6/0/0 0 select (N) 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 6E 00 00 00 be 00E000 0/1/3 0 Invalid 16 04 10 10 10 6 4 064000 6/0/2 0 select (N) 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 6E 00 00 be 000E00 0/0/0 E00 Halt 1C 07 02 10 10 + 7 2 0C7200 12/0/3 1200 convert 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 1C 08 10 10 + 8 00C800 0/1/2 800 replace (B) by (N) 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 04 01 10 4 1 000410 0/0/0 410 Halt 10 10 10 10 13 3 000003 0/0/0 3 Halt 04 0B 04 0E 10 4 11 4 . 04B4E0 4/1/1 14E0 add (N) to (A) 10 04 0B 04 13 4 11 4 3 004B43 0/0/2 B43 replace (B) by (N) 04 0D 04 0E 15 4 : 4 . 5 04D4E5 4/1/2 14E5 add (N) to (A) 1A 04 0B 04 13 10 4 11 4 3 0A4B43 10/0/2 B43 multiply and add 04 0B 04 0D 15 4 11 4 : 5 04B4D5 4/1/1 14D5 add (N) to (A) 08 04 0D 04 10 8 4 : 4 084D40 8/0/2 D40 merge constant length 10 10 10 10 04 4 000004 0/0/0 4 Halt 02 04 08 10 13 2 4 8 3 024803 2/0/2 803 transfer (A) to N 04 0B 04 0D 15 4 11 4 : 5 04B4D5 4/1/1 14D5 add (N) to (A) 08 04 0D 04 6E 8 4 : 4 be 084D4E 8/0/2 D4E merge constant length 10 10 1C 08 0E + 8 . 000C8E 0/0/0 C8E Halt 10 10 10 10 10 000000 0/0/0 0 Halt 15 07 04 08 10 5 7 4 8 057480 5/0/3 1480 subtract (N) from (A) 10 10 10 04 02 4 2 000042 0/0/0 42 Halt 15 19 04 02 10 5 9 4 2 059420 5/1/0 1420 subtract (N) from (A) 13 04 08 04 0B 3 4 8 4 11 03484B 3/0/2 84B copy (A) to N 15 08 04 19 04 5 8 4 9 4 058494 5/1/0 494 subtract (N) from (A) 10 04 1F 04 1F 4 £ 4 £ 004F4F 0/0/2 F4F replace (B) by (N) 15 19 04 1C 10 5 9 4 + 0594C0 5/1/0 14C0 subtract (N) from (A) 13 04 0B 04 16 3 4 11 4 6 034B46 3/0/2 B46 copy (A) to N 04 13 04 01 04 4 3 4 1 4 043414 4/0/1 1414 add (N) to (A) 10 04 01 04 1F 4 1 4 £ 00414F 0/0/2 14F replace (B) by (N) 15 02 04 19 10 5 2 4 9 052490 5/0/1 490 subtract (N) from (A) 10 10 10 04 1A 4 10 00004A 0/0/0 4A Halt 04 01 04 1C 10 4 1 4 + 0414C0 4/0/0 14C0 add (N) to (A) 6E 00 00 00 00 be 1C 13 04 1A 10 + 3 4 10 0C34A0 12/0/1 14A0 convert 10 15 0B 04 15 5 11 4 5 005B45 0/0/2 1B45 replace (B) by (N) 04 10 10 10 10 4 040000 4/0/0 0 add (N) to (A) 10 04 01 04 0E 4 1 4 . 00414E 0/0/2 14E replace (B) by (N) 10 10 10 10 04 4 000004 0/0/0 4 Halt 01 15 02 04 08 1 5 2 4 8 015248 1/0/2 1248 round off 10 10 10 10 04 4 000004 0/0/0 4 Halt 1A 04 01 04 1C 10 4 1 4 + 0A414C 10/0/2 14C multiply and add 10 13 04 1A 10 3 4 10 0034A0 0/0/1 14A0 Invalid 10 15 0B 04 15 5 11 4 5 005B45 0/0/2 1B45 replace (B) by (N) 04 13 04 0B 04 4 3 4 11 4 0434B4 4/0/1 14B4 add (N) to (A) 16 04 16 04 01 6 4 6 4 1 064641 6/0/2 641 select (N) 04 13 04 1A 10 4 3 4 10 0434A0 4/0/1 14A0 add (N) to (A) 10 15 0B 04 01 5 11 4 1 005B41 0/0/2 1B41 replace (B) by (N) 04 6E 00 00 00 4 be 04E000 4/1/3 0 add (N) to (A) 1A 1A 10 04 19 10 10 4 9 0AA049 10/1/1 49 multiply and add 04 19 04 01 04 4 9 4 1 4 049414 4/1/0 1414 add (N) to (A) 1C 10 13 04 1A + 3 4 10 0C034A 12/0/0 34A convert 10 10 15 0B 04 5 11 4 0005B4 0/0/0 5B4 Halt 01 04 13 04 0B 1 4 3 4 11 01434B 1/0/2 34B round off 04 0E 10 10 04 4 . 4 04E004 4/1/3 4 add (N) to (A) 0B 04 13 04 1A 11 4 3 4 10 0B434A 11/0/2 34A multiply and subtract 04 02 15 08 04 4 2 5 8 4 042584 4/0/1 584 add (N) to (A) 19 04 10 10 10 9 4 094000 9/0/2 0 multiply uniform radix 04 02 10 10 10 4 2 042000 4/0/1 0 add (N) to (A) 10 10 13 04 19 3 4 9 000349 0/0/0 349 Halt 04 01 15 08 04 4 1 5 8 4 041584 4/0/0 1584 add (N) to (A) 19 04 13 04 1A 9 4 3 4 10 09434A 9/0/2 34A multiply uniform radix 04 13 15 08 04 4 3 5 8 4 043584 4/0/1 1584 add (N) to (A) 19 04 6E 00 00 9 4 be 094E00 9/0/2 E00 multiply uniform radix 1C 0B 08 13 10 + 11 8 3 0CB830 12/1/1 1830 convert 10 10 10 15 19 5 9 000059 0/0/0 59 Halt 04 1C 04 13 04 4 + 4 3 4 04C434 4/1/2 434 add (N) to (A) 0B 10 10 15 0B 11 5 11 0B005B 11/0/0 5B multiply and subtract 04 01 04 02 10 4 1 4 2 041420 4/0/0 1420 add (N) to (A) 10 10 10 04 01 4 1 000041 0/0/0 41 Halt 04 1C 04 13 04 4 + 4 3 4 04C434 4/1/2 434 add (N) to (A) 0B 04 01 15 0B 11 4 1 5 11 0B415B 11/0/2 15B multiply and subtract 04 13 04 13 04 4 3 4 3 4 043434 4/0/1 1434 add (N) to (A) 0B 04 13 15 08 11 4 3 5 8 0B4358 11/0/2 358 multiply and subtract 04 19 04 13 04 4 9 4 3 4 049434 4/1/0 1434 add (N) to (A) 0B 04 0D 15 08 11 4 : 5 8 0B4D58 11/0/2 D58 multiply and subtract 04 0D 04 10 10 4 : 4 04D400 4/1/2 1400 add (N) to (A) 10 10 10 04 02 4 2 000042 0/0/0 42 Halt 04 08 10 6E 00 4 8 be 0480E0 4/1/0 E0 add (N) to (A) 10 1C 1C 16 13 + + 6 3 00CC63 0/1/2 C63 replace (B) by (N) 04 0B 04 19 04 4 11 4 9 4 04B494 4/1/1 1494 add (N) to (A) 16 04 01 04 13 6 4 1 4 3 064143 6/0/2 143 select (N) 04 0B 04 0D 15 4 11 4 : 5 04B4D5 4/1/1 14D5 add (N) to (A) 08 04 0D 04 10 8 4 : 4 084D40 8/0/2 D40 merge constant length 10 10 10 10 15 5 000005 0/0/0 5 Halt 07 04 08 10 13 7 4 8 3 074803 7/0/2 803 augment (N) by (A) 04 0B 04 0E 04 4 11 4 . 4 04B4E4 4/1/1 14E4 add (N) to (A) 16 04 01 04 10 6 4 1 4 064140 6/0/2 140 select (N) 10 10 04 02 15 4 2 5 000425 0/0/0 425 Halt 19 04 02 10 13 9 4 2 3 094203 9/0/2 203 multiply uniform radix 04 1A 04 08 15 4 10 4 8 5 04A485 4/1/1 485 add (N) to (A) 08 04 19 04 13 8 4 9 4 3 084943 8/0/2 943 merge constant length 04 1C 04 04 15 4 + 4 4 5 04C445 4/1/2 445 add (N) to (A) 08 04 19 04 6E 8 4 9 4 be 08494E 8/0/2 94E merge constant length 10 10 1C 0D 04 + : 4 000CD4 0/0/0 CD4 Halt 10 10 10 04 1F 4 £ 00004F 0/0/0 4F Halt 04 01 04 0E 10 4 1 4 . 0414E0 4/0/0 14E0 add (N) to (A) 13 04 0B 04 19 3 4 11 4 9 034B49 3/0/2 B49 copy (A) to N 04 02 04 01 04 4 2 4 1 4 042414 4/0/1 414 add (N) to (A) 13 04 0B 04 1A 3 4 11 4 10 034B4A 3/0/2 B4A copy (A) to N 15 1A 04 0B 04 5 10 4 11 4 05A4B4 5/1/1 4B4 subtract (N) from (A) 13 04 1A 04 08 3 4 10 4 8 034A48 3/0/2 A48 copy (A) to N 15 08 04 19 04 5 8 4 9 4 058494 5/1/0 494 subtract (N) from (A) 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 6E 00 00 00 00 be 02 10 10 10 10 2 020000 2/0/0 0 transfer (A) to N 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 04 1A 10 4 10 0004A0 0/0/0 4A0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 13 04 08 04 3 4 8 4 003484 0/0/1 1484 Invalid 08 10 10 04 15 8 4 5 080045 8/0/0 45 merge constant length 04 07 04 07 10 4 7 4 7 047470 4/0/3 1470 add (N) to (A) 10 04 01 04 15 4 1 4 5 004145 0/0/2 145 replace (B) by (N) 04 10 10 10 04 4 4 040004 4/0/0 4 add (N) to (A) 02 01 10 10 10 2 1 021000 2/0/0 1000 transfer (A) to N 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 6E 00 00 00 be 00E000 0/1/3 0 Invalid 1F 10 10 10 10 £ 0F0000 15/0/0 0 collate and add 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 13 04 0E 3 4 . 00034E 0/0/0 34E Halt 10 10 15 1A 04 5 10 4 0005A4 0/0/0 5A4 Halt 0B 04 10 10 10 11 4 0B4000 11/0/2 0 multiply and subtract 04 01 04 01 04 4 1 4 1 4 041414 4/0/0 1414 add (N) to (A) 0E 10 6E 00 00 . be 0E0E00 14/0/0 E00 replace selected bits 1C 1F 0E 10 10 + £ . 0CFE00 12/1/3 1E00 convert 10 10 10 15 07 5 7 000057 0/0/0 57 Halt 04 1A 10 10 10 4 10 04A000 4/1/1 0 add (N) to (A) 10 04 02 15 19 4 2 5 9 004259 0/0/2 259 replace (B) by (N) 04 02 10 13 04 4 2 3 4 042034 4/0/1 34 add (N) to (A) 1C 04 16 15 08 + 4 6 5 8 0C4658 12/0/2 658 convert 04 19 04 13 04 4 9 4 3 4 049434 4/1/0 1434 add (N) to (A) 0B 04 1C 04 16 11 4 + 4 6 0B4C46 11/0/2 C46 multiply and subtract 04 01 04 13 04 4 1 4 3 4 041434 4/0/0 1434 add (N) to (A) 0B 04 0E 15 08 11 4 . 5 8 0B4E58 11/0/2 E58 multiply and subtract 04 0D 04 10 04 4 : 4 4 04D404 4/1/2 1404 add (N) to (A) 04 10 10 04 02 4 4 2 040042 4/0/0 42 add (N) to (A) 10 10 10 13 04 3 4 000034 0/0/0 34 Halt 0B 04 19 04 02 11 4 9 4 2 0B4942 11/0/2 942 multiply and subtract 04 01 04 6E 00 4 1 4 be 0414E0 4/0/0 14E0 add (N) to (A) 10 0D 10 1C 13 : + 3 00D0C3 0/1/2 10C3 replace (B) by (N) 04 0B 04 07 04 4 11 4 7 4 04B474 4/1/1 1474 add (N) to (A) 02 04 01 04 13 2 4 1 4 3 024143 2/0/2 143 transfer (A) to N 04 0B 04 08 04 4 11 4 8 4 04B484 4/1/1 1484 add (N) to (A) 02 04 01 04 04 2 4 1 4 4 024144 2/0/2 144 transfer (A) to N 04 13 04 0B 04 4 3 4 11 4 0434B4 4/0/1 14B4 add (N) to (A) 02 04 01 04 13 2 4 1 4 3 024143 2/0/2 143 transfer (A) to N 04 0E 04 02 15 4 . 4 2 5 04E425 4/1/3 425 add (N) to (A) 08 04 19 04 08 8 4 9 4 8 084948 8/0/2 948 merge constant length 10 10 10 10 15 5 000005 0/0/0 5 Halt 19 04 1C 04 04 9 4 + 4 4 094C44 9/0/2 C44 multiply uniform radix 04 1C 04 19 15 4 + 4 9 5 04C495 4/1/2 495 add (N) to (A) 0B 04 01 04 04 11 4 1 4 4 0B4144 11/0/2 144 multiply and subtract 04 1C 04 07 15 4 + 4 7 5 04C475 4/1/2 475 add (N) to (A) 0B 04 13 04 6E 11 4 3 4 be 0B434E 11/0/2 34E multiply and subtract 10 10 0D 01 1A : 1 10 000D1A 0/0/0 D1A Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 04 04 01 10 10 4 4 1 044100 4/0/2 100 add (N) to (A) 15 1A 04 01 04 5 10 4 1 4 05A414 5/1/1 414 subtract (N) from (A) 04 10 10 04 19 4 4 9 040049 4/0/0 49 add (N) to (A) 15 1A 04 01 04 5 10 4 1 4 05A414 5/1/1 414 subtract (N) from (A) 10 10 10 10 10 000000 0/0/0 0 Halt 15 13 04 04 10 5 3 4 4 053440 5/0/1 1440 subtract (N) from (A) 04 10 10 04 19 4 4 9 040049 4/0/0 49 add (N) to (A) 15 1A 04 01 04 5 10 4 1 4 05A414 5/1/1 414 subtract (N) from (A) 04 04 01 10 10 4 4 1 044100 4/0/2 100 add (N) to (A) 15 1A 04 01 04 5 10 4 1 4 05A414 5/1/1 414 subtract (N) from (A) 04 10 10 04 19 4 4 9 040049 4/0/0 49 add (N) to (A) 15 1A 04 01 04 5 10 4 1 4 05A414 5/1/1 414 subtract (N) from (A) 6E 00 00 00 00 be 08 10 10 10 10 8 080000 8/0/0 0 merge constant length 10 15 13 04 0E 5 3 4 . 00534E 0/0/2 134E replace (B) by (N) 10 04 10 10 04 4 4 004004 0/0/2 4 replace (B) by (N) 19 15 1A 04 01 9 5 10 4 1 095A41 9/0/2 1A41 multiply uniform radix 04 13 04 0D 04 4 3 4 : 4 0434D4 4/0/1 14D4 add (N) to (A) 04 15 1A 04 13 4 5 10 4 3 045A43 4/0/2 1A43 add (N) to (A) 04 10 10 10 04 4 4 040004 4/0/0 4 add (N) to (A) 04 10 10 10 10 4 040000 4/0/0 0 add (N) to (A) 10 10 04 1A 10 4 10 0004A0 0/0/0 4A0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 07 04 07 10 7 4 7 007470 0/0/3 1470 set radix 10 10 10 04 01 4 1 000041 0/0/0 41 Halt 04 1F 04 04 10 4 £ 4 4 04F440 4/1/3 1440 add (N) to (A) 10 10 10 04 01 4 1 000041 0/0/0 41 Halt 04 6E 00 00 00 4 be 04E000 4/1/3 0 add (N) to (A) 13 16 04 10 10 3 6 4 036400 3/0/3 400 copy (A) to N 04 19 15 1A 04 4 9 5 10 4 0495A4 4/1/0 15A4 add (N) to (A) 01 04 10 10 10 1 4 014000 1/0/2 0 round off 10 10 15 13 04 5 3 4 000534 0/0/0 534 Halt 16 10 04 10 10 6 4 060400 6/0/0 400 select (N) 04 19 15 1A 04 4 9 5 10 4 0495A4 4/1/0 15A4 add (N) to (A) 01 04 10 10 10 1 4 014000 1/0/2 0 round off 10 10 15 13 04 5 3 4 000534 0/0/0 534 Halt 0E 10 04 10 10 . 4 0E0400 14/0/0 400 replace selected bits 04 19 15 1A 04 4 9 5 10 4 0495A4 4/1/0 15A4 add (N) to (A) 01 04 04 04 01 1 4 4 4 1 014441 1/0/2 441 round off 04 0E 15 1A 04 4 . 5 10 4 04E5A4 4/1/3 5A4 add (N) to (A) 01 04 07 04 08 1 4 7 4 8 014748 1/0/2 748 round off 04 01 04 16 04 4 1 4 6 4 041464 4/0/0 1464 add (N) to (A) 19 04 6E 00 00 9 4 be 094E00 9/0/2 E00 multiply uniform radix 0D 04 04 04 04 : 4 4 4 4 0D4444 13/0/2 444 divide uniform radix 01 04 08 15 0B 1 4 8 5 11 01485B 1/0/2 85B round off 04 07 04 10 04 4 7 4 4 047404 4/0/3 1404 add (N) to (A) 01 04 0E 15 02 1 4 . 5 2 014E52 1/0/2 E52 round off 04 19 10 10 10 4 9 049000 4/1/0 1000 add (N) to (A) 10 10 10 04 01 4 1 000041 0/0/0 41 Halt 04 0E 10 10 10 4 . 04E000 4/1/3 0 add (N) to (A) 10 04 02 15 02 4 2 5 2 004252 0/0/2 252 replace (B) by (N) 04 08 10 04 04 4 8 4 4 048044 4/1/0 44 add (N) to (A) 01 04 16 04 15 1 4 6 4 5 014645 1/0/2 645 round off 04 19 04 13 04 4 9 4 3 4 049434 4/1/0 1434 add (N) to (A) 1F 04 08 15 0B £ 4 8 5 11 0F485B 15/0/2 85B collate and add 04 01 04 04 04 4 1 4 4 4 041444 4/0/0 1444 add (N) to (A) 01 04 16 04 04 1 4 6 4 4 014644 1/0/2 644 round off 04 19 04 6E 00 4 9 4 be 0494E0 4/1/0 14E0 add (N) to (A) 10 0D 15 02 13 : 5 2 3 00D523 0/1/2 1523 replace (B) by (N) 04 0B 04 16 04 4 11 4 6 4 04B464 4/1/1 1464 add (N) to (A) 15 04 01 04 04 5 4 1 4 4 054144 5/0/2 144 subtract (N) from (A) 04 15 04 1A 15 4 5 4 10 5 0454A5 4/0/2 14A5 add (N) to (A) 0B 04 01 04 13 11 4 1 4 3 0B4143 11/0/2 143 multiply and subtract 04 1F 04 08 15 4 £ 4 8 5 04F485 4/1/3 1485 add (N) to (A) 0B 04 15 04 10 11 4 5 4 0B4540 11/0/2 540 multiply and subtract 10 10 04 01 04 4 1 4 000414 0/0/0 414 Halt 01 04 0E 10 13 1 4 . 3 014E03 1/0/2 E03 round off 04 0B 04 08 04 4 11 4 8 4 04B484 4/1/1 1484 add (N) to (A) 02 04 01 04 13 2 4 1 4 3 024143 2/0/2 143 transfer (A) to N 04 0B 04 07 04 4 11 4 7 4 04B474 4/1/1 1474 add (N) to (A) 16 04 01 04 04 6 4 1 4 4 064144 6/0/2 144 select (N) 10 10 04 07 15 4 7 5 000475 0/0/0 475 Halt 0B 04 13 04 6E 11 4 3 4 be 0B434E 11/0/2 34E multiply and subtract 10 10 0D 16 10 : 6 000D60 0/0/0 D60 Halt 13 04 0E 04 02 3 4 . 4 2 034E42 3/0/2 E42 copy (A) to N 15 08 04 19 04 5 8 4 9 4 058494 5/1/0 494 subtract (N) from (A) 10 10 10 04 01 4 1 000041 0/0/0 41 Halt 04 01 04 0E 10 4 1 4 . 0414E0 4/0/0 14E0 add (N) to (A) 13 04 0B 04 07 3 4 11 4 7 034B47 3/0/2 B47 copy (A) to N 04 02 04 01 04 4 2 4 1 4 042414 4/0/1 414 add (N) to (A) 04 04 01 10 10 4 4 1 044100 4/0/2 100 add (N) to (A) 15 1A 04 01 04 5 10 4 1 4 05A414 5/1/1 414 subtract (N) from (A) 04 10 10 04 19 4 4 9 040049 4/0/0 49 add (N) to (A) 15 1A 04 01 04 5 10 4 1 4 05A414 5/1/1 414 subtract (N) from (A) 10 10 10 10 10 000000 0/0/0 0 Halt 15 13 04 04 10 5 3 4 4 053440 5/0/1 1440 subtract (N) from (A) 04 10 10 04 19 4 4 9 040049 4/0/0 49 add (N) to (A) 15 1A 04 01 04 5 10 4 1 4 05A414 5/1/1 414 subtract (N) from (A) 6E 00 00 00 00 be 0E 10 10 10 10 . 0E0000 14/0/0 0 replace selected bits 10 15 13 04 04 5 3 4 4 005344 0/0/2 1344 replace (B) by (N) 10 13 04 0B 04 3 4 11 4 0034B4 0/0/1 14B4 Invalid 08 04 16 04 01 8 4 6 4 1 084641 8/0/2 641 merge constant length 04 04 10 10 04 4 4 4 044004 4/0/2 4 add (N) to (A) 07 15 0B 04 13 7 5 11 4 3 075B43 7/0/2 1B43 augment (N) by (A) 04 04 10 10 04 4 4 4 044004 4/0/2 4 add (N) to (A) 19 15 1A 04 01 9 5 10 4 1 095A41 9/0/2 1A41 multiply uniform radix 04 04 04 01 10 4 4 4 1 044410 4/0/2 410 add (N) to (A) 10 15 1A 04 01 5 10 4 1 005A41 0/0/2 1A41 replace (B) by (N) 04 04 10 10 04 4 4 4 044004 4/0/2 4 add (N) to (A) 19 15 1A 04 01 9 5 10 4 1 095A41 9/0/2 1A41 multiply uniform radix 04 10 10 10 10 4 040000 4/0/0 0 add (N) to (A) 10 15 13 04 0E 5 3 4 . 00534E 0/0/2 134E replace (B) by (N) 10 6E 00 00 00 be 00E000 0/1/3 0 Invalid 07 1C 04 10 10 7 + 4 07C400 7/1/2 400 augment (N) by (A) 04 19 15 1A 04 4 9 5 10 4 0495A4 4/1/0 15A4 add (N) to (A) 01 04 13 04 0E 1 4 3 4 . 01434E 1/0/2 34E round off 04 15 15 08 04 4 5 5 8 4 045584 4/0/2 1584 add (N) to (A) 19 04 04 04 1C 9 4 4 4 + 09444C 9/0/2 44C multiply uniform radix 04 0E 15 08 04 4 . 5 8 4 04E584 4/1/3 584 add (N) to (A) 19 04 10 10 10 9 4 094000 9/0/2 0 multiply uniform radix 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 15 1A 04 5 10 4 0005A4 0/0/0 5A4 Halt 08 10 10 10 10 8 080000 8/0/0 0 merge constant length 04 13 10 10 10 4 3 043000 4/0/1 1000 add (N) to (A) 10 10 6E 00 00 be 000E00 0/0/0 E00 Halt 0D 08 1A 04 10 : 8 10 4 0D8A40 13/1/0 A40 divide uniform radix 10 04 1A 15 08 4 10 5 8 004A58 0/0/2 A58 replace (B) by (N) 04 19 04 04 10 4 9 4 4 049440 4/1/0 1440 add (N) to (A) 10 04 1F 15 08 4 £ 5 8 004F58 0/0/2 F58 replace (B) by (N) 04 19 04 04 10 4 9 4 4 049440 4/1/0 1440 add (N) to (A) 10 04 1F 15 08 4 £ 5 8 004F58 0/0/2 F58 replace (B) by (N) 04 19 04 04 10 4 9 4 4 049440 4/1/0 1440 add (N) to (A) 10 04 19 15 1A 4 9 5 10 00495A 0/0/2 95A replace (B) by (N) 04 13 04 10 10 4 3 4 043400 4/0/1 1400 add (N) to (A) 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 07 04 7 4 000074 0/0/0 74 Halt 0D 10 10 04 01 : 4 1 0D0041 13/0/0 41 divide uniform radix 04 0E 04 10 10 4 . 4 04E400 4/1/3 400 add (N) to (A) 10 04 01 04 01 4 1 4 1 004141 0/0/2 141 replace (B) by (N) 04 1C 10 6E 00 4 + be 04C0E0 4/1/2 E0 add (N) to (A) 10 0D 19 08 04 : 9 8 4 00D984 0/1/2 1984 replace (B) by (N) 04 01 04 02 15 4 1 4 2 5 041425 4/0/0 1425 add (N) to (A) 0B 04 13 04 04 11 4 3 4 4 0B4344 11/0/2 344 multiply and subtract 04 01 10 10 15 4 1 5 041005 4/0/0 1005 add (N) to (A) 1A 04 13 04 19 10 4 3 4 9 0A4349 10/0/2 349 multiply and add 04 19 04 19 04 4 9 4 9 4 049494 4/1/0 1494 add (N) to (A) 19 04 19 04 10 9 4 9 4 094940 9/0/2 940 multiply uniform radix 04 04 04 0B 10 4 4 4 11 0444B0 4/0/2 4B0 add (N) to (A) 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 04 07 10 4 7 000470 0/0/0 470 Halt 10 10 10 10 04 4 000004 0/0/0 4 Halt 04 1C 04 1C 15 4 + 4 + 5 04C4C5 4/1/2 4C5 add (N) to (A) 08 04 19 04 6E 8 4 9 4 be 08494E 8/0/2 94E merge constant length 10 10 0D 1A 16 : 10 6 000DA6 0/0/0 DA6 Halt 19 04 16 04 19 9 4 6 4 9 094649 9/0/2 649 multiply uniform radix 04 19 04 16 04 4 9 4 6 4 049464 4/1/0 1464 add (N) to (A) 16 04 19 04 16 6 4 9 4 6 064946 6/0/2 946 select (N) 04 16 04 19 04 4 6 4 9 4 046494 4/0/3 494 add (N) to (A) 1F 04 15 04 1F £ 4 5 4 £ 0F454F 15/0/2 54F collate and add 04 1F 04 15 04 4 £ 4 5 4 04F454 4/1/3 1454 add (N) to (A) 15 04 1F 04 15 5 4 £ 4 5 054F45 5/0/2 F45 subtract (N) from (A) 04 15 04 1F 04 4 5 4 £ 4 0454F4 4/0/2 14F4 add (N) to (A) 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 04 04 13 04 0B 4 4 3 4 11 04434B 4/0/2 34B add (N) to (A) 04 02 04 01 04 4 2 4 1 4 042414 4/0/1 414 add (N) to (A) 04 10 10 04 19 4 4 9 040049 4/0/0 49 add (N) to (A) 15 1A 04 01 04 5 10 4 1 4 05A414 5/1/1 414 subtract (N) from (A) 6E 00 00 00 00 be 04 10 10 10 10 4 040000 4/0/0 0 add (N) to (A) 10 15 13 04 02 5 3 4 2 005342 0/0/2 1342 replace (B) by (N) 10 10 10 10 10 000000 0/0/0 0 Halt 10 15 1A 04 08 5 10 4 8 005A48 0/0/2 1A48 replace (B) by (N) 10 10 10 10 04 4 000004 0/0/0 4 Halt 13 10 10 10 10 3 030000 3/0/0 0 copy (A) to N 10 04 04 02 04 4 4 2 4 004424 0/0/2 424 replace (B) by (N) 02 15 08 04 19 2 5 8 4 9 025849 2/0/2 1849 transfer (A) to N 04 04 04 02 04 4 4 4 2 4 044424 4/0/2 424 add (N) to (A) 0D 15 08 04 19 : 5 8 4 9 0D5849 13/0/2 1849 divide uniform radix 04 04 04 02 04 4 4 4 2 4 044424 4/0/2 424 add (N) to (A) 07 15 08 04 19 7 5 8 4 9 075849 7/0/2 1849 augment (N) by (A) 04 07 04 07 10 4 7 4 7 047470 4/0/3 1470 add (N) to (A) 10 04 16 04 19 4 6 4 9 004649 0/0/2 649 replace (B) by (N) 04 6E 00 00 00 4 be 04E000 4/1/3 0 add (N) to (A) 1C 02 04 04 02 + 2 4 4 2 0C2442 12/0/1 442 convert 04 0D 15 0B 04 4 : 5 11 4 04D5B4 4/1/2 15B4 add (N) to (A) 13 04 07 04 07 3 4 7 4 7 034747 3/0/2 747 copy (A) to N 04 13 04 16 04 4 3 4 6 4 043464 4/0/1 1464 add (N) to (A) 19 04 04 04 13 9 4 4 4 3 094443 9/0/2 443 multiply uniform radix 04 0B 04 15 04 4 11 4 5 4 04B454 4/1/1 1454 add (N) to (A) 01 04 04 04 13 1 4 4 4 3 014443 1/0/2 443 round off 04 13 15 0B 04 4 3 5 11 4 0435B4 4/0/1 15B4 add (N) to (A) 13 04 04 04 01 3 4 4 4 1 034441 3/0/2 441 copy (A) to N 04 0E 15 1A 04 4 . 5 10 4 04E5A4 4/1/3 5A4 add (N) to (A) 13 04 07 04 07 3 4 7 4 7 034747 3/0/2 747 copy (A) to N 10 10 04 16 04 4 6 4 000464 0/0/0 464 Halt 19 04 04 04 01 9 4 4 4 1 094441 9/0/2 441 multiply uniform radix 04 1C 04 15 04 4 + 4 5 4 04C454 4/1/2 454 add (N) to (A) 19 04 6E 00 00 9 4 be 094E00 9/0/2 E00 multiply uniform radix 0D 0D 10 04 04 : : 4 4 0DD044 13/1/2 1044 divide uniform radix 02 10 10 15 0B 2 5 11 02005B 2/0/0 5B transfer (A) to N 04 01 04 10 10 4 1 4 041400 4/0/0 1400 add (N) to (A) 10 04 04 10 10 4 4 004400 0/0/2 400 replace (B) by (N) 10 10 10 04 04 4 4 000044 0/0/0 44 Halt 13 04 1C 15 1A 3 4 + 5 10 034C5A 3/0/2 C5A copy (A) to N 04 01 04 04 04 4 1 4 4 4 041444 4/0/0 1444 add (N) to (A) 02 04 02 15 08 2 4 2 5 8 024258 2/0/2 258 transfer (A) to N 04 19 04 07 04 4 9 4 7 4 049474 4/1/0 1474 add (N) to (A) 07 04 13 04 16 7 4 3 4 6 074346 7/0/2 346 augment (N) by (A) 04 19 04 10 04 4 9 4 4 049404 4/1/0 1404 add (N) to (A) 01 04 1F 15 02 1 4 £ 5 2 014F52 1/0/2 F52 round off 04 19 10 10 04 4 9 4 049004 4/1/0 1004 add (N) to (A) 1F 10 10 04 01 £ 4 1 0F0041 15/0/0 41 collate and add 04 0E 10 6E 00 4 . be 04E0E0 4/1/3 E0 add (N) to (A) 10 0D 0D 0E 04 : : . 4 00DDE4 0/1/2 1DE4 replace (B) by (N) 04 13 04 0B 04 4 3 4 11 4 0434B4 4/0/1 14B4 add (N) to (A) 04 04 01 04 10 4 4 1 4 044140 4/0/2 140 add (N) to (A) 10 10 04 01 15 4 1 5 000415 0/0/0 415 Halt 02 04 08 10 04 2 4 8 4 024804 2/0/2 804 transfer (A) to N 04 13 04 19 04 4 3 4 9 4 043494 4/0/1 1494 add (N) to (A) 02 04 01 04 10 2 4 1 4 024140 2/0/2 140 transfer (A) to N 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 04 4 000004 0/0/0 4 Halt 04 13 04 01 15 4 3 4 1 5 043415 4/0/1 1415 add (N) to (A) 08 04 19 04 10 8 4 9 4 084940 8/0/2 940 merge constant length 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 6E be 00000E 0/0/0 E Halt 10 10 0D 0E 1C : . + 000DEC 0/0/0 DEC Halt 07 10 10 10 10 7 070000 7/0/0 0 augment (N) by (A) 15 19 04 1C 04 5 9 4 + 4 0594C4 5/1/0 14C4 subtract (N) from (A) 04 04 04 04 13 4 4 4 4 3 044443 4/0/2 443 add (N) to (A) 15 0B 04 13 04 5 11 4 3 4 05B434 5/1/1 1434 subtract (N) from (A) 04 10 10 04 19 4 4 9 040049 4/0/0 49 add (N) to (A) 15 1A 04 01 04 5 10 4 1 4 05A414 5/1/1 414 subtract (N) from (A) 10 10 10 10 10 000000 0/0/0 0 Halt 15 13 04 02 10 5 3 4 2 053420 5/0/1 1420 subtract (N) from (A) 07 10 10 10 10 7 070000 7/0/0 0 augment (N) by (A) 15 19 04 1A 04 5 9 4 10 4 0594A4 5/1/0 14A4 subtract (N) from (A) 04 04 13 04 1C 4 4 3 4 + 04434C 4/0/2 34C add (N) to (A) 15 1A 04 13 04 5 10 4 3 4 05A434 5/1/1 434 subtract (N) from (A) 01 10 10 10 10 1 010000 1/0/0 0 table look up 04 01 04 1C 04 4 1 4 + 4 0414C4 4/0/0 14C4 add (N) to (A) 6E 00 00 00 00 be 1A 04 04 15 04 10 4 4 5 4 0A4454 10/0/2 454 multiply and add 04 15 0B 04 01 4 5 11 4 1 045B41 4/0/2 1B41 add (N) to (A) 04 01 10 10 10 4 1 041000 4/0/0 1000 add (N) to (A) 10 04 01 04 1C 4 1 4 + 00414C 0/0/2 14C replace (B) by (N) 04 04 04 04 04 4 4 4 4 4 044444 4/0/2 444 add (N) to (A) 08 15 0B 04 01 8 5 11 4 1 085B41 8/0/2 1B41 merge constant length 04 04 04 1C 04 4 4 4 + 4 0444C4 4/0/2 4C4 add (N) to (A) 1C 15 08 04 19 + 5 8 4 9 0C5849 12/0/2 1849 convert 04 04 04 01 10 4 4 4 1 044410 4/0/2 410 add (N) to (A) 10 15 1A 04 01 5 10 4 1 005A41 0/0/2 1A41 replace (B) by (N) 04 04 10 10 04 4 4 4 044004 4/0/2 4 add (N) to (A) 19 15 1A 04 01 9 5 10 4 1 095A41 9/0/2 1A41 multiply uniform radix 04 10 10 10 10 4 040000 4/0/0 0 add (N) to (A) 10 15 13 04 08 5 3 4 8 005348 0/0/2 1348 replace (B) by (N) 10 6E 00 00 00 be 00E000 0/1/3 0 Invalid 10 08 04 10 10 8 4 008400 0/1/0 400 copy registers 04 19 15 1A 04 4 9 5 10 4 0495A4 4/1/0 15A4 add (N) to (A) 01 04 10 10 10 1 4 014000 1/0/2 0 round off 10 10 15 13 04 5 3 4 000534 0/0/0 534 Halt 08 10 04 10 10 8 4 080400 8/0/0 400 merge constant length 04 19 15 1A 04 4 9 5 10 4 0495A4 4/1/0 15A4 add (N) to (A) 01 04 10 10 10 1 4 014000 1/0/2 0 round off 10 10 15 13 04 5 3 4 000534 0/0/0 534 Halt 08 10 04 10 10 8 4 080400 8/0/0 400 merge constant length 04 19 15 1A 04 4 9 5 10 4 0495A4 4/1/0 15A4 add (N) to (A) 01 04 04 04 01 1 4 4 4 1 014441 1/0/2 441 round off 10 10 15 1A 04 5 10 4 0005A4 0/0/0 5A4 Halt 01 04 04 10 10 1 4 4 014400 1/0/2 400 round off 04 19 15 1A 04 4 9 5 10 4 0495A4 4/1/0 15A4 add (N) to (A) 01 04 6E 00 00 1 4 be 014E00 1/0/2 E00 round off 0E 01 16 10 10 . 1 6 0E1600 14/0/0 1600 replace selected bits 10 10 10 15 13 5 3 000053 0/0/0 53 Halt 04 0E 10 04 04 4 . 4 4 04E044 4/1/3 44 add (N) to (A) 13 04 1F 15 08 3 4 £ 5 8 034F58 3/0/2 F58 copy (A) to N 04 19 04 04 04 4 9 4 4 4 049444 4/1/0 1444 add (N) to (A) 01 10 10 15 1A 1 5 10 01005A 1/0/0 5A table look up 04 01 04 04 04 4 1 4 4 4 041444 4/0/0 1444 add (N) to (A) 04 04 0B 15 08 4 4 11 5 8 044B58 4/0/2 B58 add (N) to (A) 04 19 04 10 10 4 9 4 049400 4/1/0 1400 add (N) to (A) 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 0E 02 04 10 . 2 4 00E240 0/1/3 240 Invalid 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 07 7 000007 0/0/0 7 Halt 04 07 04 19 04 4 7 4 9 4 047494 4/0/3 1494 add (N) to (A) 16 04 19 04 04 6 4 9 4 4 064944 6/0/2 944 select (N) 04 1A 04 1C 04 4 10 4 + 4 04A4C4 4/1/1 4C4 add (N) to (A) 02 04 01 04 07 2 4 1 4 7 024147 2/0/2 147 transfer (A) to N 04 07 04 0B 04 4 7 4 11 4 0474B4 4/0/3 14B4 add (N) to (A) 16 04 19 04 10 6 4 9 4 064940 6/0/2 940 select (N) 10 10 04 02 04 4 2 4 000424 0/0/0 424 Halt 01 04 1A 10 04 1 4 10 4 014A04 1/0/2 A04 round off 04 1A 04 0D 04 4 10 4 : 4 04A4D4 4/1/1 4D4 add (N) to (A) 02 04 01 04 04 2 4 1 4 4 024144 2/0/2 144 transfer (A) to N 04 1A 04 1C 15 4 10 4 + 5 04A4C5 4/1/1 4C5 add (N) to (A) 1A 04 0B 04 6E 10 4 11 4 be 0A4B4E 10/0/2 B4E multiply and add 10 10 0E 13 02 . 3 2 000E32 0/0/0 E32 Halt 07 04 07 04 1F 7 4 7 4 £ 07474F 7/0/2 74F augment (N) by (A) 04 16 04 19 04 4 6 4 9 4 046494 4/0/3 494 add (N) to (A) 13 04 0B 04 0D 3 4 11 4 : 034B4D 3/0/2 B4D copy (A) to N 15 08 04 0D 04 5 8 4 : 4 0584D4 5/1/0 4D4 subtract (N) from (A) 10 10 10 10 10 000000 0/0/0 0 Halt 15 07 04 08 10 5 7 4 8 057480 5/0/3 1480 subtract (N) from (A) 10 10 10 04 02 4 2 000042 0/0/0 42 Halt 15 19 04 02 10 5 9 4 2 059420 5/1/0 1420 subtract (N) from (A) 04 04 16 04 01 4 4 6 4 1 044641 4/0/2 641 add (N) to (A) 15 08 04 19 04 5 8 4 9 4 058494 5/1/0 494 subtract (N) from (A) 07 04 07 04 15 7 4 7 4 5 074745 7/0/2 745 augment (N) by (A) 04 16 04 19 04 4 6 4 9 4 046494 4/0/3 494 add (N) to (A) 04 04 1A 04 1C 4 4 10 4 + 044A4C 4/0/2 A4C add (N) to (A) 04 02 04 01 04 4 2 4 1 4 042414 4/0/1 414 add (N) to (A) 6E 00 00 00 00 be 10 07 04 07 04 7 4 7 4 007474 0/0/3 1474 set radix 07 04 16 04 19 7 4 6 4 9 074649 7/0/2 649 augment (N) by (A) 04 10 10 10 04 4 4 040004 4/0/0 4 add (N) to (A) 01 04 01 04 1A 1 4 1 4 10 01414A 1/0/2 14A round off 10 04 04 1A 04 4 4 10 4 0044A4 0/0/2 4A4 replace (B) by (N) 0D 04 02 04 01 : 4 2 4 1 0D4241 13/0/2 241 divide uniform radix 04 04 04 1A 04 4 4 4 10 4 0444A4 4/0/2 4A4 add (N) to (A) 1C 15 1A 04 0B + 5 10 4 11 0C5A4B 12/0/2 1A4B convert 04 04 04 0B 10 4 4 4 11 0444B0 4/0/2 4B0 add (N) to (A) 10 15 1A 04 0D 5 10 4 : 005A4D 0/0/2 1A4D replace (B) by (N) 04 04 04 1A 04 4 4 4 10 4 0444A4 4/0/2 4A4 add (N) to (A) 0E 15 1A 04 1F . 5 10 4 £ 0E5A4F 14/0/2 1A4F replace selected bits 04 07 04 08 04 4 7 4 8 4 047484 4/0/3 1484 add (N) to (A) 19 04 16 04 1F 9 4 6 4 £ 09464F 9/0/2 64F multiply uniform radix 04 6E 00 00 00 4 be 04E000 4/1/3 0 add (N) to (A) 04 0E 13 04 0B 4 . 3 4 11 04E34B 4/1/3 34B add (N) to (A) 04 0D 15 08 04 4 : 5 8 4 04D584 4/1/2 1584 add (N) to (A) 0D 04 10 10 10 : 4 0D4000 13/0/2 0 divide uniform radix 10 10 04 13 10 4 3 000430 0/0/0 430 Halt 10 10 04 04 01 4 4 1 000441 0/0/0 441 Halt 04 15 04 15 04 4 5 4 5 4 045454 4/0/2 1454 add (N) to (A) 01 04 04 04 19 1 4 4 4 9 014449 1/0/2 449 round off 10 10 15 0B 04 5 11 4 0005B4 0/0/0 5B4 Halt 01 04 10 10 10 1 4 014000 1/0/2 0 round off 04 01 15 19 04 4 1 5 9 4 041594 4/0/0 1594 add (N) to (A) 02 10 04 04 07 2 4 4 7 020447 2/0/0 447 transfer (A) to N 04 15 15 08 04 4 5 5 8 4 045584 4/0/2 1584 add (N) to (A) 19 04 04 04 0B 9 4 4 4 11 09444B 9/0/2 44B multiply uniform radix 04 04 15 08 04 4 4 5 8 4 044584 4/0/2 584 add (N) to (A) 19 04 6E 00 00 9 4 be 094E00 9/0/2 E00 multiply uniform radix 0E 15 1C 10 10 . 5 + 0E5C00 14/0/2 1C00 replace selected bits 10 04 02 15 19 4 2 5 9 004259 0/0/2 259 replace (B) by (N) 04 16 10 04 04 4 6 4 4 046044 4/0/3 44 add (N) to (A) 16 04 0D 15 08 6 4 : 5 8 064D58 6/0/2 D58 select (N) 04 19 04 04 04 4 9 4 4 4 049444 4/1/0 1444 add (N) to (A) 07 04 08 15 08 7 4 8 5 8 074858 7/0/2 858 augment (N) by (A) 04 19 04 04 04 4 9 4 4 4 049444 4/1/0 1444 add (N) to (A) 0B 04 02 15 1A 11 4 2 5 10 0B425A 11/0/2 25A multiply and subtract 04 1F 04 10 10 4 £ 4 04F400 4/1/3 1400 add (N) to (A) 10 04 01 04 16 4 1 4 6 004146 0/0/2 146 replace (B) by (N) 04 0E 10 13 04 4 . 3 4 04E034 4/1/3 34 add (N) to (A) 0B 04 0D 15 08 11 4 : 5 8 0B4D58 11/0/2 D58 multiply and subtract 04 0D 04 10 10 4 : 4 04D400 4/1/2 1400 add (N) to (A) 10 10 10 04 13 4 3 000043 0/0/0 43 Halt 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 0E 16 1A 04 . 6 10 4 00E6A4 0/1/3 6A4 Invalid 04 01 04 15 04 4 1 4 5 4 041454 4/0/0 1454 add (N) to (A) 15 04 01 04 04 5 4 1 4 4 054144 5/0/2 144 subtract (N) from (A) 04 08 04 0B 15 4 8 4 11 5 0484B5 4/1/0 4B5 add (N) to (A) 0B 04 01 04 10 11 4 1 4 0B4140 11/0/2 140 multiply and subtract 10 10 04 01 15 4 1 5 000415 0/0/0 415 Halt 19 04 02 10 04 9 4 2 4 094204 9/0/2 204 multiply uniform radix 04 08 04 01 15 4 8 4 1 5 048415 4/1/0 415 add (N) to (A) 08 04 19 04 04 8 4 9 4 4 084944 8/0/2 944 merge constant length 04 0B 04 04 15 4 11 4 4 5 04B445 4/1/1 1445 add (N) to (A) 08 04 19 04 10 8 4 9 4 084940 8/0/2 940 merge constant length 10 10 04 02 15 4 2 5 000425 0/0/0 425 Halt 19 04 16 10 04 9 4 6 4 094604 9/0/2 604 multiply uniform radix 04 07 04 19 15 4 7 4 9 5 047495 4/0/3 1495 add (N) to (A) 08 04 19 04 6E 8 4 9 4 be 08494E 8/0/2 94E merge constant length 10 10 0E 07 08 . 7 8 000E78 0/0/0 E78 Halt 10 10 10 04 01 4 1 000041 0/0/0 41 Halt 15 19 04 04 10 5 9 4 4 059440 5/1/0 1440 subtract (N) from (A) 04 04 08 04 07 4 4 8 4 7 044847 4/0/2 847 add (N) to (A) 15 08 04 19 04 5 8 4 9 4 058494 5/1/0 494 subtract (N) from (A) 10 10 10 04 19 4 9 000049 0/0/0 49 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 04 04 1C 04 1C 4 4 + 4 + 044C4C 4/0/2 C4C add (N) to (A) 15 08 04 19 04 5 8 4 9 4 058494 5/1/0 494 subtract (N) from (A) 13 04 0B 04 0E 3 4 11 4 . 034B4E 3/0/2 B4E copy (A) to N 15 08 04 0D 04 5 8 4 : 4 0584D4 5/1/0 4D4 subtract (N) from (A) 10 10 10 04 04 4 4 000044 0/0/0 44 Halt 04 16 10 10 10 4 6 046000 4/0/3 0 add (N) to (A) 04 04 01 04 0E 4 4 1 4 . 04414E 4/0/2 14E add (N) to (A) 15 1A 04 01 04 5 10 4 1 4 05A414 5/1/1 414 subtract (N) from (A) 6E 00 00 00 00 be 16 04 04 07 04 6 4 4 7 4 064474 6/0/2 474 select (N) 08 15 08 04 19 8 5 8 4 9 085849 8/0/2 1849 merge constant length 04 10 10 10 10 4 040000 4/0/0 0 add (N) to (A) 10 04 16 04 0E 4 6 4 . 00464E 0/0/2 64E replace (B) by (N) 10 04 04 01 04 4 4 1 4 004414 0/0/2 414 replace (B) by (N) 1A 04 15 04 19 10 4 5 4 9 0A4549 10/0/2 549 multiply and add 04 04 04 07 04 4 4 4 7 4 044474 4/0/2 474 add (N) to (A) 0E 15 0B 04 13 . 5 11 4 3 0E5B43 14/0/2 1B43 replace selected bits 04 04 04 19 04 4 4 4 9 4 044494 4/0/2 494 add (N) to (A) 16 15 1A 04 01 6 5 10 4 1 065A41 6/0/2 1A41 select (N) 04 04 04 07 04 4 4 4 7 4 044474 4/0/2 474 add (N) to (A) 0E 15 08 04 19 . 5 8 4 9 0E5849 14/0/2 1849 replace selected bits 04 10 10 10 10 4 040000 4/0/0 0 add (N) to (A) 10 04 16 04 0E 4 6 4 . 00464E 0/0/2 64E replace (B) by (N) 10 6E 00 00 00 be 00E000 0/1/3 0 Invalid 19 04 04 04 01 9 4 4 4 1 094441 9/0/2 441 multiply uniform radix 04 1A 04 15 04 4 10 4 5 4 04A454 4/1/1 454 add (N) to (A) 19 04 04 04 07 9 4 4 4 7 094447 9/0/2 447 multiply uniform radix 04 02 15 0B 04 4 2 5 11 4 0425B4 4/0/1 5B4 add (N) to (A) 13 04 04 04 19 3 4 4 4 9 034449 3/0/2 449 copy (A) to N 04 16 15 1A 04 4 6 5 10 4 0465A4 4/0/3 5A4 add (N) to (A) 01 04 04 04 07 1 4 4 4 7 014447 1/0/2 447 round off 04 02 15 08 04 4 2 5 8 4 042584 4/0/1 584 add (N) to (A) 19 04 10 10 10 9 4 094000 9/0/2 0 multiply uniform radix 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 13 04 0B 3 4 11 00034B 0/0/0 34B Halt 04 0E 15 08 04 4 . 5 8 4 04E584 4/1/3 584 add (N) to (A) 0D 04 6E 00 00 : 4 be 0D4E00 13/0/2 E00 divide uniform radix 0E 1A 02 10 10 . 10 2 0EA200 14/1/1 200 replace selected bits 10 04 02 04 16 4 2 4 6 004246 0/0/2 246 replace (B) by (N) 10 10 10 10 10 000000 0/0/0 0 Halt 10 04 01 04 01 4 1 4 1 004141 0/0/2 141 replace (B) by (N) 04 1C 10 04 04 4 + 4 4 04C044 4/1/2 44 add (N) to (A) 19 04 15 04 02 9 4 5 4 2 094542 9/0/2 542 multiply uniform radix 04 01 04 04 04 4 1 4 4 4 041444 4/0/0 1444 add (N) to (A) 19 04 15 15 08 9 4 5 5 8 094558 9/0/2 558 multiply uniform radix 04 0D 04 10 10 4 : 4 04D400 4/1/2 1400 add (N) to (A) 10 10 10 04 16 4 6 000046 0/0/0 46 Halt 10 10 10 04 04 4 4 000044 0/0/0 44 Halt 1A 04 0B 04 02 10 4 11 4 2 0A4B42 10/0/2 B42 multiply and add 04 01 04 10 10 4 1 4 041400 4/0/0 1400 add (N) to (A) 10 04 01 04 01 4 1 4 1 004141 0/0/2 141 replace (B) by (N) 04 1C 10 6E 00 4 + be 04C0E0 4/1/2 E0 add (N) to (A) 10 0E 0B 10 04 . 11 4 00EB04 0/1/3 B04 Invalid 04 19 04 15 15 4 9 4 5 5 049455 4/1/0 1455 add (N) to (A) 08 04 0D 04 10 8 4 : 4 084D40 8/0/2 D40 merge constant length 10 10 10 10 04 4 000004 0/0/0 4 Halt 02 04 08 10 04 2 4 8 4 024804 2/0/2 804 transfer (A) to N 04 1A 04 0B 04 4 10 4 11 4 04A4B4 4/1/1 4B4 add (N) to (A) 16 04 01 04 04 6 4 1 4 4 064144 6/0/2 144 select (N) 04 19 04 15 15 4 9 4 5 5 049455 4/1/0 1455 add (N) to (A) 08 04 0D 04 10 8 4 : 4 084D40 8/0/2 D40 merge constant length 10 10 10 10 04 4 000004 0/0/0 4 Halt 02 10 10 10 04 2 4 020004 2/0/0 4 transfer (A) to N 04 19 04 16 15 4 9 4 6 5 049465 4/1/0 1465 add (N) to (A) 1A 04 13 04 10 10 4 3 4 0A4340 10/0/2 340 multiply and add 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 6E be 00000E 0/0/0 E Halt 10 10 0E 0B 0E . 11 . 000EBE 0/0/0 EBE Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 04 1C 4 + 00004C 0/0/0 4C Halt 15 1A 04 16 10 5 10 4 6 05A460 5/1/1 460 subtract (N) from (A) 10 10 10 04 0D 4 : 00004D 0/0/0 4D Halt 15 1A 04 02 10 5 10 4 2 05A420 5/1/1 420 subtract (N) from (A) 1F 04 1F 04 1F £ 4 £ 4 £ 0F4F4F 15/0/2 F4F collate and add 15 19 04 0B 04 5 9 4 11 4 0594B4 5/1/0 14B4 subtract (N) from (A) 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 6E 00 00 00 00 be 1C 10 10 10 10 + 0C0000 12/0/0 0 convert 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 04 4 000004 0/0/0 4 Halt 08 10 10 10 10 8 080000 8/0/0 0 merge constant length 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 04 01 10 4 1 000410 0/0/0 410 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 07 04 19 10 7 4 9 007490 0/0/3 1490 set radix 10 10 10 04 01 4 1 000041 0/0/0 41 Halt 04 1F 04 01 04 4 £ 4 1 4 04F414 4/1/3 1414 add (N) to (A) 1C 10 10 04 01 + 4 1 0C0041 12/0/0 41 convert 04 6E 00 00 00 4 be 04E000 4/1/3 0 add (N) to (A) 0D 1A 07 04 07 : 10 7 4 7 0DA747 13/1/1 747 divide uniform radix 04 1F 04 16 04 4 £ 4 6 4 04F464 4/1/3 1464 add (N) to (A) 19 04 10 10 10 9 4 094000 9/0/2 0 multiply uniform radix 04 04 15 02 10 4 4 5 2 044520 4/0/2 520 add (N) to (A) 10 10 10 10 10 000000 0/0/0 0 Halt 04 1A 04 01 04 4 10 4 1 4 04A414 4/1/1 414 add (N) to (A) 1A 10 13 04 0B 10 3 4 11 0A034B 10/0/0 34B multiply and add 04 0E 15 08 04 4 . 5 8 4 04E584 4/1/3 584 add (N) to (A) 0D 04 10 10 10 : 4 0D4000 13/0/2 0 divide uniform radix 04 1C 04 02 10 4 + 4 2 04C420 4/1/2 420 add (N) to (A) 10 10 04 04 1A 4 4 10 00044A 0/0/0 44A Halt 04 08 04 16 04 4 8 4 6 4 048464 4/1/0 464 add (N) to (A) 01 04 13 04 0B 1 4 3 4 11 01434B 1/0/2 34B round off 04 0E 15 08 04 4 . 5 8 4 04E584 4/1/3 584 add (N) to (A) 0D 04 6E 00 00 : 4 be 0D4E00 13/0/2 E00 divide uniform radix 0E 0E 08 10 10 . . 8 0EE800 14/1/3 800 replace selected bits 10 04 19 04 02 4 9 4 2 004942 0/0/2 942 replace (B) by (N) 10 10 10 04 04 4 4 000044 0/0/0 44 Halt 1A 04 19 04 16 10 4 9 4 6 0A4946 10/0/2 946 multiply and add 04 01 04 13 04 4 1 4 3 4 041434 4/0/0 1434 add (N) to (A) 0B 04 0E 15 08 11 4 . 5 8 0B4E58 11/0/2 E58 multiply and subtract 04 0D 04 10 10 4 : 4 04D400 4/1/2 1400 add (N) to (A) 10 04 0B 04 02 4 11 4 2 004B42 0/0/2 B42 replace (B) by (N) 10 10 10 04 04 4 4 000044 0/0/0 44 Halt 1A 04 1A 04 16 10 4 10 4 6 0A4A46 10/0/2 A46 multiply and add 04 01 04 13 04 4 1 4 3 4 041434 4/0/0 1434 add (N) to (A) 0B 04 0E 15 08 11 4 . 5 8 0B4E58 11/0/2 E58 multiply and subtract 04 0D 04 10 10 4 : 4 04D400 4/1/2 1400 add (N) to (A) 10 04 1A 04 02 4 10 4 2 004A42 0/0/2 A42 replace (B) by (N) 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 0E 1F 16 07 . £ 6 7 00EF67 0/1/3 F67 Invalid 04 07 04 0D 04 4 7 4 : 4 0474D4 4/0/3 14D4 add (N) to (A) 16 04 19 04 13 6 4 9 4 3 064943 6/0/2 943 select (N) 04 0B 04 0E 15 4 11 4 . 5 04B4E5 4/1/1 14E5 add (N) to (A) 08 04 0D 04 10 8 4 : 4 084D40 8/0/2 D40 merge constant length 10 10 04 0D 04 4 : 4 0004D4 0/0/0 4D4 Halt 02 10 10 10 07 2 7 020007 2/0/0 7 transfer (A) to N 04 08 04 16 04 4 8 4 6 4 048464 4/1/0 464 add (N) to (A) 16 04 19 04 13 6 4 9 4 3 064943 6/0/2 943 select (N) 04 0D 04 01 15 4 : 4 1 5 04D415 4/1/2 1415 add (N) to (A) 0B 04 13 04 04 11 4 3 4 4 0B4344 11/0/2 344 multiply and subtract 10 10 04 19 15 4 9 5 000495 0/0/0 495 Halt 1A 04 01 04 10 10 4 1 4 0A4140 10/0/2 140 multiply and add 10 10 10 10 15 5 000005 0/0/0 5 Halt 13 04 1A 10 6E 3 4 10 be 034A0E 3/0/2 A0E copy (A) to N 10 10 1F 10 04 £ 4 000F04 0/0/0 F04 Halt 13 04 0B 04 0E 3 4 11 4 . 034B4E 3/0/2 B4E copy (A) to N 10 10 04 0B 04 4 11 4 0004B4 0/0/0 4B4 Halt 13 04 0B 04 0E 3 4 11 4 . 034B4E 3/0/2 B4E copy (A) to N 15 08 04 0D 04 5 8 4 : 4 0584D4 5/1/0 4D4 subtract (N) from (A) 10 10 10 04 19 4 9 000049 0/0/0 49 Halt 15 08 04 08 10 5 8 4 8 058480 5/1/0 480 subtract (N) from (A) 13 04 0D 04 04 3 4 : 4 4 034D44 3/0/2 D44 copy (A) to N 15 1A 04 01 04 5 10 4 1 4 05A414 5/1/1 414 subtract (N) from (A) 13 04 08 04 08 3 4 8 4 8 034848 3/0/2 848 copy (A) to N 15 08 04 19 04 5 8 4 9 4 058494 5/1/0 494 subtract (N) from (A) 13 04 0D 04 04 3 4 : 4 4 034D44 3/0/2 D44 copy (A) to N 15 1A 04 01 04 5 10 4 1 4 05A414 5/1/1 414 subtract (N) from (A) 10 10 10 04 15 4 5 000045 0/0/0 45 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 6E 00 00 00 00 be 02 13 04 08 04 2 3 4 8 4 023484 2/0/1 1484 transfer (A) to N 08 15 08 04 19 8 5 8 4 9 085849 8/0/2 1849 merge constant length 04 10 10 10 10 4 040000 4/0/0 0 add (N) to (A) 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 13 3 000003 0/0/0 3 Halt 0E 07 0E 10 10 . 7 . 0E7E00 14/0/3 1E00 replace selected bits 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 6E 00 00 00 be 00E000 0/1/3 0 Invalid 02 10 10 10 10 2 020000 2/0/0 0 transfer (A) to N 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 07 0E 10 7 . 0007E0 0/0/0 7E0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 6E 00 00 be 000E00 0/0/0 E00 Halt 1F 02 0E 10 10 £ 2 . 0F2E00 15/0/1 E00 collate and add 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 6E 00 be 0000E0 0/0/0 E0 Halt 10 1F 13 1C 16 £ 3 + 6 00F3C6 0/1/3 13C6 Invalid 10 10 04 01 16 4 1 6 000416 0/0/0 416 Halt 08 10 10 07 13 8 7 3 080073 8/0/0 73 merge constant length 10 10 04 01 02 4 1 2 000412 0/0/0 412 Halt 10 10 10 16 15 6 5 000065 0/0/0 65 Halt 10 10 10 10 04 4 000004 0/0/0 4 Halt 0E 10 10 16 10 . 6 0E0060 14/0/0 60 replace selected bits 10 10 04 02 15 4 2 5 000425 0/0/0 425 Halt 1C 04 08 10 16 + 4 8 6 0C4806 12/0/2 806 convert 10 10 04 1C 10 4 + 0004C0 0/0/0 4C0 Halt 10 13 10 04 13 3 4 3 003043 0/0/1 1043 Invalid 04 08 04 08 10 4 8 4 8 048480 4/1/0 480 add (N) to (A) 10 04 15 04 10 4 5 4 004540 0/0/2 540 replace (B) by (N) 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 6E be 00000E 0/0/0 E Halt 10 10 1F 04 1A £ 4 10 000F4A 0/0/0 F4A Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 04 02 4 2 000042 0/0/0 42 Halt 15 08 04 1C 10 5 8 4 + 0584C0 5/1/0 4C0 subtract (N) from (A) 10 10 10 10 10 000000 0/0/0 0 Halt 15 08 04 08 10 5 8 4 8 058480 5/1/0 480 subtract (N) from (A) 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 13 0E 3 . 00003E 0/0/0 3E Halt 07 0E 10 10 10 7 . 07E000 7/1/3 0 augment (N) by (A) 6E 00 00 00 00 be 08 10 10 10 10 8 080000 8/0/0 0 merge constant length 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 10 10 10 10 000000 0/0/0 0 Halt 10 6E 00 00 00 be 00E000 0/1/3 0 Invalid