Permalink
Find file Copy path
Fetching contributors…
Cannot retrieve contributors at this time
570 lines (569 sloc) 45.7 KB
1 1000 START EASY ASSEMBLER. 1000
1 PROC 1 6005 CRD READ INPUT CARD 1000 0 0010 44 6005
1 1600 BF6 MAKE TWO COPIES 1001 0 0000 26 1600
1 6012 CAD IS THE OP CODE 1002 0 0000 64 6012
1 CNZ OP SYMBOLIC. 1003 0 0000 04 1024
1 ADDR 6011 CAD IS THE ADDRESS 1004 0 0000 64 6011
1 CNZ SYMBL SYMBOLIC. 1005 0 0000 04 1048
1 6009 CAD IS THE ADDRESS 1006 0 0000 64 6009
1 CNZ NUMAD N+ N- NF OR NB. 1007 0 0000 04 5006
1 FLAG SRT 1008 0 0000 13 0000
1 LOCAT 6017 CAD IS THE LOCATION 1009 0 0000 64 6017
1 CNZ SLOC SYMBOLIC. 1010 0 0000 04 1056
1 6018 CAD IS THE LOCATION 1011 0 0000 64 6018
1 CNZ NLOC A PROGRAM POINT 1012 0 0000 04 1070
1 FINIS 1613 CAA 1013 0 0000 66 1613
1 4 SRT SYNTHESIZE 1014 0 0000 13 0004
1 1608 CAD INSTRUCTION. 1015 0 0000 64 1608
1 CNZ 1F CHECK HSL TAG 1016 0 0000 04 1020
1 2 1614 CAD TACK ON 1017 0 0000 64 1614
1 2 SRT OPERATION CODE. 1018 0 0000 13 0002
1 BUN HSLF 1019 0 0000 20 7010
1 1 1 SLT INSERT 1020 0 0000 14 0001
1 6008 CAD HSL TAG DIGIT 1021 0 0000 64 6008
1 1 SRT 1022 0 0000 13 0001
1 BUN 2B 1023 0 0000 20 1017
1 OP ADD SEVEN LOOK UP 1024 0 0000 74 5008
1 CUR TABLE SYMBOLIC OPCODE 1025 0 0000 21 4000
1 8421 HLT HALT IF 1026 0 0000 08 8421
1 BUN PROC UNDEFINED. 1027 0 0000 20 1000
1 1614 STA BUT IF DEFINED 1028 0 0000 12 1614
1 2 SRT CHECK FOR 1029 0 0000 13 0002
1 1614 CNZ PSUDO OPERATION 1030 0 0000 04 1614
1 BUN ADDR 1031 0 0000 20 1004
1 END CAD 3F SET UP 1032 0 0000 64 1046
1 STA PROC TO FINISH OFF. 1033 0 0000 12 1000
1 START CAD 2F CALCULATE 1034 0 0000 64 1047
1 STC FLAG ADDRESS 1035 0 0000 02 1008
1 BUN ADDR EQUIVALENT. 1036 0 0000 20 1004
1 5 CAD 1F 1037 0 0000 64 1045
1 STA FLAG 1038 0 0000 12 1008
1 1613 CAD CHANGE LOCATION 1039 0 0000 64 1613
1 6002 STA COUNTER 1040 0 0000 12 6002
1 6003 ADD AND INSERT 1041 0 0000 74 6003
1 6000 STA TRANSFER 1042 0 0000 12 6000
1 6004 CAD INSTRUCTION. 1043 0 0000 64 6004
1 BUN PUNCH 1044 0 0000 20 7017
1 1 SRT 1045 0 0000 13 0000
1 3 CUB PLOAD 1046 0 0000 30 1708
1 2 BUN 5B 1047 0 0000 20 1037
1 SYMBL CUR TABLE LOOK SYMBOL UP. 1048 0 0000 21 4000
1 1 1900 STC IF UNDEFINED. 1049 1 0000 02 1900
1 BUN LOOP7 DEFINE IT. 1050 0 0000 20 7000
1 OSD 7+ IF DEFINED AND 1051 0 0000 73 1058
1 BOF LOOP7 FORWARD GO TO 1052 0 0000 28 7000
1 EQ 6013 ADD SPECIAL ROUTINE 1053 0 0000 74 6013
1 1613 STA OTHERWISE SET 1054 0 0000 12 1613
1 BUN FLAG EQUIVALENT. 1055 0 0000 20 1008
1 SLOC CUR TABLE LOOK FOR SYMBOL 1056 0 0000 21 4000
1 1 1900 STC 1057 1 0000 02 1900
1 BUN A3 UNDEFINED LOC. 1058 0 0000 20 1064
1 OSD 7- 1059 0 0000 73 1052
1 BOF A3 DEFINED LOC. 1060 0 0000 28 1064
1 6017 CAD HALT IF SYMBL 1061 0 0000 64 6017
1 9669 HLT OCCURS TWICE 1062 0 0000 08 9669
1 BUN PROC IN LOCATION 1063 0 0000 20 1000
1 A3 STA TEMP 1064 0 0000 12 4019
1 6002 CAD IF FORWARD 1065 0 0000 64 6002
1 1 2900 STA REFERENCE WAS 1066 1 0000 12 2900
1 A2 CAD TEMP MADE, MAKE 1067 0 0000 64 4019
1 CNZ A1 NEW TABLE ENTRY 1068 0 0000 04 5011
1 BUN FINIS 1069 0 0000 20 1013
1 NLOC 6018 LDB PROGRAM POINT 1070 0 0000 72 6018
1 1 3950 CAD LOCATION. 1071 1 0000 64 3950
1 STA TEMP UNDEFINE 1072 0 0000 12 4019
1 6002 CAD FORWARD P.P. 1073 0 0000 64 6002
1 1 3900 STC DEFINE BACKWARD 1074 1 0000 02 3900
1 1 3950 STA 1075 1 0000 12 3950
1 BUN A2 1076 0 0000 20 1067
1 HALT CAD TRANS PUNCH FINAL 1077 0 0000 64 1723
1 7006 STA CARD AND 1078 0 0000 12 7006
1 21 7000 CWR STOP 1079 0 0210 54 7000
1 1111 HLT UNCONDITIONALLY 1080 0 0000 08 1111
1 BUN 1- 1081 0 0000 20 1080
1 1810 START 1810
1 6002 CAD N+ 1810 0 0000 64 6002
1 6010 ADD 1811 0 0000 74 6010
1 BUN EQ 1812 0 0000 20 1053
1 1820 START 1820
1 6002 CAD N- 1820 0 0000 64 6002
1 6010 SUB 1821 0 0000 75 6010
1 BUN EQ 1822 0 0000 20 1053
1 1842 START 1842
1 6010 LDB NB 1842 0 0000 72 6010
1 1 3900 CAD 1843 1 0000 64 3900
1 BUN EQ 1844 0 0000 20 1053
1 1846 START 1846
1 6010 CAD NF 1846 0 0000 64 6010
1 ADD FUDGE PROCESS 1847 0 0000 74 5019
1 STA TEMP LIKE 1848 0 0000 12 4019
1 LDB TEMP SYMBOL 1849 0 0000 72 4019
1 1 2900 CAD 1850 1 0000 64 2900
1 BUN LOOP7 1851 0 0000 20 7000
1 1708 START 1708
1 PLOAD 1 6002 CAD PUNCH LOADING 1708 0 0001 64 6002
1 7000 ADD ROUTINE. 1709 0 0000 74 7000
1 7000 STA FIRST CARD 1710 0 0000 12 7000
1 7002 EXT LOADS B BOX 1711 0 0000 63 7002
1 7002 STA 1712 0 0000 12 7002
1 7006 CSU 1713 0 0000 65 7006
1 7001 STA 1714 0 0000 12 7001
1 21 7000 CWR 1715 0 0210 54 7000
1 CAD 3F 7 1716 0 0000 64 7724
1 ADD PLACE 1717 0 0000 74 5014
1 4 SRT 1718 0 0000 13 0004
1 BUN 1F 1719 0 0000 20 1728
1 LDB 1720 0 0000 72 0000
1 4 0000 LDB 1721 0 4000 72 0000
1 SIGN6 11112 1111 SGN CHGED TO 6 1722 0 1111 20 1111
1 TRANS 15 BUN 1723 0 0000 20 0015
1 3 23 1724 0 0000 00 0023
1 1725 0 0000 00 0000
1 1 0000 CRD 1726 0 0010 44 0000
1 7667 0005 1727 0 7667 00 0005
1 1 CAD TOFIX 1728 0 0000 64 1776
1 4 SLT 1729 0 0000 14 0004
1 STA TOFIX 1730 0 0000 12 1776
1 1740 BT4 1731 0 0000 34 1740
1 6004 CAD 1732 0 0000 64 6004
1 BUN 4F 4 1733 0 0000 20 4756 ?? was 0000
1 1740 START 1740
1 3 10 SRT LOOP TO 1740 0 0000 13 0010
1 7007 LDB PUNCH THE 1741 0 0000 72 7007
1 CAD 1F 4 LOADING ROUTINE 1742 0 0000 64 4745
1 6004 SUB 1743 0 0000 75 6004
1 STA 1F 4 1744 0 0000 12 4745
1 1 1 1755 CAD 1745 1 0000 64 1755
1 1 7000 STA 1746 1 0000 12 7000
1 DBB 1B 4 1747 0 0000 22 4745
1 7005 CAD 1748 0 0000 64 7005
1 CNZ 2+ 4 1749 0 0000 04 4751
1 BUN HALT 1750 0 0000 20 1077
1 7006 CAD 1751 0 0000 64 7006
1 6004 ADD 1752 0 0000 74 6004
1 7006 STA 1753 0 0000 12 7006
1 21 7000 CWR 1754 0 0210 54 7000
1 10 SLT AFTER FIRST 1755 0 0000 14 0010
1 4 SUB ONE SIX CARDS, 1756 0 0000 75 5005
1 CNZ 3B 4 DUMP FORWARD 1757 0 0000 04 4740
1 CAD 8F REFERENCE TABLE 1758 0 0000 64 1760
1 STA 1B 4 1759 0 0000 12 4745
1 8 1 0000 CAD 1760 1 0000 64 0000
1 1761 START 1761
1 1 0001 CAD LOADING ROUTINE 1761 1 0000 64 0001
1 2 0030 STA CLEANS UP 1762 2 0000 12 0030
1 2 0029 EXT FORWARD 1763 2 0000 63 0029
1 2 0031 SUB REFERENCES. 1764 2 0000 75 0031
1 9 SRT 1765 0 0000 13 0009
1 2 0021 CNZ 1766 2 0000 04 0021
1 1 SRT 1767 0 0000 13 0001
1 2 0030 CAD 1768 2 0000 64 0030
1 10 SLT 1769 0 0000 14 0010
1 1 0001 STC 1770 1 0000 02 0001
1 2 0030 LDB 1771 2 0000 72 0030
1 2 0000 DBB 1772 2 0000 22 0000
1 2 0015 CAD 1773 2 0000 64 0015
1 2 0028 SUB 1774 2 0000 75 0028
1 2 0015 STA 1775 2 0000 12 0015
1 TOFIX 2 0064 1776 2 0000 00 0064
1 2 0030 STA 1777 2 0000 12 0030
1 4 SRT 1778 0 0000 13 0004
1 2 0031 STA 1779 2 0000 12 0031
1 2 0010 CNZ 1780 2 0000 04 0010
1 1221 HLT 1781 0 0000 08 1221
1 2 0032 STC 1782 2 0000 02 0032
1 6 SLT 1783 0 0000 14 0006
1 2 0027 EXT 1784 2 0000 63 0027
1 2 0032 ADD 1785 2 0000 74 0032
1 7 SRT 1786 0 0000 13 0007
1 2 0007 BUN 1787 2 0000 20 0007
1 1111111110 1788 0 1111 11 1110
1 1 1789 0 0000 00 0001
1 1111110000 1790 0 1111 11 0000
1 4000 START 4000
1 TABLE STC HOLD SYMBOL TABLE 4000 0 0000 02 5010
1 CAD 4F SEARCH ROUTINE. 4001 0 0000 64 7012
1 4 SLT 4002 0 0000 14 0004
1 STA EXIT STORE EXIT. 4003 0 0000 12 4013
1 CAD HOLD GENERATE 4004 0 0000 64 5010
1 MUL 10101 STARTING 4005 0 0000 60 4014
1 STC TEMP PLACE, AND 4006 0 0000 02 4019
1 3 SLT SEARCH FOR 4007 0 0000 14 0003
1 STA TEMP EMPTY OR 4008 0 0000 12 4019
1 LDB TEMP UNUSED PLACE 4009 0 0000 72 4019
1 1 1 1900 CAD 4010 1 0000 64 1900
1 CNZ 2F 4011 0 0000 04 5000
1 CAD HOLD NOT IN TABLE 4012 0 0000 64 5010
1 EXIT 4013 0 0000 00 0000
1 10101 1 1 1001 4014 0 1001 00 1001
1 3 CAD EXIT IF SYMBOL IN 4015 0 0000 64 4013
1 ADD TWO TABLE, ADD 2 4016 0 0000 74 5009
1 STA TEMP TO EXIT LINE 4017 0 0000 12 4019
1 1 2900 CAD AND DISPLAY 4018 1 0000 64 2900
1 TEMP EQUIVALENT 4019 0 0000 00 0000
1 5000 START 5000
1 2 SUB HOLD 5000 0 0000 75 5010
1 NOR 3B 5001 0 0000 15 4015
1 DBB 1B 5002 0 0000 22 4010
1 LDB 999 CYCLE MOD 5003 0 0000 72 6019
1 BUN 1B 1000. 5004 0 0000 20 4010
1 ONE 1 5005 0 0000 00 0001
1 NUMAD 6009 LDB 5006 0 0000 72 6009
1 1 1800 BUN 5007 1 0000 20 1800
1 SEVEN 7 5008 0 0000 00 0007
1 TWO 2 5009 0 0000 00 0002
1 HOLD 5010 0 0000 00 0000
1 A1 4 SRT PREPARE 5011 0 0000 13 0004
1 6002 CSU FORWARD 5012 0 0000 65 6002
1 4 SLT REFERENCE 5013 0 0000 14 0004
1 PLACE 9 STA TABLE 5014 0 0000 02 0009
1 CAD PLACE ENTRY 5015 0 0000 64 5014
1 ADD ONE 5016 0 0000 74 5005
1 STC PLACE 5017 0 0000 02 5014
1 BUN FINIS 5018 0 0000 20 1013
1 FUDGE 1050 5019 0 0000 00 1050
1 6003 START 6003
1 81 0000 CRD CONSTANTS FOR 6003 0 0810 44 0000
1 6 PUNCHOUT 6004 0 0000 00 0006
1 6019 START 6019
1 999 16 0999 6019 0 1600 00 0999
1 7000 START 7000
1 LOOP7 1613 STA SET UP CHAINING 7000 0 0000 12 1613
1 6002 CSU PROCEDURE 7001 0 0000 65 6002
1 1 2900 STC FOR FORWARD 7002 1 0000 02 2900
1 6015 CAD REFERENCES 7003 0 0000 64 6015
1 3 SRT 7004 0 0000 13 0003
1 6008 CAD 7005 0 0000 64 6008
1 3 SLT 7006 0 0000 14 0003
1 1615 STC 7007 0 0000 02 1615
1 1608 STA 7008 0 0000 12 1608
1 BUN LOCAT 7009 0 0000 20 1009
1 HSLF 1615 CAD TACK ON CON- 7010 0 0000 64 1615
1 6 SLT TROL DIGITS 7011 0 0000 14 0006
1 4 6020 STA 7012 0 0000 12 6020
1 6002 CAD INCREMENT 7013 0 0000 64 6002
1 ADD ONE LOCATION 7014 0 0000 74 5005
1 6002 STC COUNTER 7015 0 0000 02 6002
1 6016 CAD 7016 0 0000 64 6016
1 PUNCH 6001 STC SET SIGN 7017 0 0000 02 6001
1 1 6000 CWR PUNCH AND 7018 0 0010 54 6000
1 BUN PROC RECYCLE 7019 0 0000 20 1000
1 1400 START 1400
1 33333333333 1400 3 3333 33 3333
1 33333333333 INPUT FORMAT 1401 3 3333 33 3333
1 33333333333 BAND ONE 1402 3 3333 33 3333
1 33333333333 1403 3 3333 33 3333
1 11111113333 1404 1 1111 11 3333
1 11111110111 1405 1 1111 11 0111
1 11111110111 1406 1 1111 11 0111
1 2221330111 1407 0 2221 33 0111
1 11 0000 1408 0 0011 00 0000
1 2221 0000 1409 0 2221 00 0000
1 11111 0000 1410 1 1111 00 0000
1 11113211111 1411 1 1113 21 1111
1 13132111111 1412 1 3132 11 1111
1 31313 1413 0 0000 03 1313
1 31310 1414 0 0000 03 1310
1 31313131000 1415 3 1313 13 1000
1 2231 0000 1416 2 2310 00 0000
1 111 0000 1417 1 1100 00 0000
1 21321111111 1418 2 1321 11 1111
1 3 22222222 1419 3 0022 22 2222
1 33333333333 1420 3 3333 33 3333
1 33333333333 1421 3 3333 33 3333
1 33333333333 1422 3 3333 33 3333
1 33333333333 1423 3 3333 33 3333
1 33333333333 1424 3 3333 33 3333
1 33333333333 1425 3 3333 33 3333
1 33333333333 1426 3 3333 33 3333
1 33333333333 1427 3 3333 33 3333
1 33333333333 1428 3 3333 33 3333
1 START 7+ 1436
1 222222 0000 OUTPUT FORMAT 1436 2 2222 20 0000
1 33333232222 BAND ONE 1437 3 3333 23 2222
1 33222233333 1438 3 3222 23 3333
1 22333333333 1439 2 2333 33 3333
1 31111232222 1440 3 1111 23 2222
1 11111133333 1441 1 1111 13 3333
1 11111131111 1442 1 1111 13 1111
1 11111131111 1443 1 1111 13 1111
1 311 1 11111 1444 3 1101 01 1111
1 33113333333 1445 3 3113 33 3333
1 11 13333333 1446 1 1013 33 3333
1 11133333333 1447 1 1133 33 3333
1 11 11111111 1448 1 1011 11 1111
1 2 111111111 1449 2 0111 11 1111
1 13333333222 1450 1 3333 33 3222
1 33333333010 1451 3 3333 33 3010
1 33 1 1 1013 1452 3 3010 10 1013
1 3311 133333 1453 3 3110 13 3333
1 11111333333 1454 1 1111 33 3333
1 11 1 111111 1455 1 1010 11 1111
1 33333333311 1456 3 3333 33 3311
1 32233333 1457 0 0032 23 3333
1 20 START 0+ 1478 ?? 0+20
1 222 0000 OUTPUT FORMAT 1478 2 2200 00 0000
1 22222222222 BAND TWO 1479 2 2222 22 2222
1 22222222222 1480 2 2222 22 2222
1 22222222222 1481 2 2222 22 2222
1 22222222222 1482 2 2222 22 2222
1 22222222222 1483 2 2222 22 2222
1 22222222222 1484 2 2222 22 2222
1 33332222222 1485 3 3332 22 2222
1 32222333 1486 0 0032 22 2333
1 1967 START SYMB. OP. TABLE 1967
1 4343425907 CCBR 1967 0 4343 42 5907
1 1980 START 1980
1 4359440007 CRD 1980 0 4359 44 0007
1 1982 START 1982
1 4359460007 CRF 1982 0 4359 46 0007
1 1985 START 1985
1 4359490007 CRI 1985 0 4359 49 0007
1 2003 START 2003
1 5763664607 PTWF 2003 0 5763 66 4607
1 2010 START 2010
1 4449650007 DIV 2010 0 4449 65 0007
1 2069 START 2069
1 4364425907 CUBR 2069 0 4364 42 5907
1 2090 START 2090
1 5459440007 MRD 2090 0 5459 44 0007
1 2102 START 2102
1 5459560007 MRO 2102 0 5459 56 0007
1 2112 START 2112
1 5459660007 MRW 2112 0 5459 66 0007
1 2124 START 2124
1 4241 0007 BA 2124 0 4241 00 0007
1 2175 START 2175
1 4341410007 CAA 2175 0 4341 41 0007
1 2178 START 2178
1 4341440007 CAD 2178 0 4341 44 0007
1 2188 START 2188
1 4441440007 DAD 2188 0 4441 44 0007
1 6259630007 SRT 2189 0 6259 63 0007
1 2208 START 2208
1 4641440007 FAD 2208 0 4641 44 0007
1 2259 START 2259
1 4162430007 ASC 2259 0 4162 43 0007
1 2277 START 2277
1 4362410007 CSA 2277 0 4362 41 0007
1 2286 START 2286
1 4442420007 DBB 2286 0 4442 42 0007
1 2294 START 2294
1 4942 0007 IB 2294 0 4942 00 0007
1 2300 START 2300
1 4362640007 CSU 2300 0 4362 64 0007
1 2330 START 2330
1 4662640007 FSU 2330 0 4662 64 0007
1 2344 START 2344
1 6441 0007 UA 2344 0 6441 00 0007
1 2377 START 2377
1 4343420007 CCB 2377 0 4343 42 0007
1 2394 START 2394
1 4343590007 CCR 2394 0 4343 59 0007
1 4353590007 CLR 2395 0 4353 59 0007
1 2405 START 2405
1 4349594107 CIRA 2405 0 4349 59 4107
1 2410 START 2410
1 5662440007 OSD 2410 0 5662 44 0007
1 4263840007 BT4 2411 0 4263 84 0007
1 4263850007 BT5 2412 0 4263 85 0007
1 4263860007 BT6 2413 0 4263 86 0007
1 4263870007 BT7 2414 0 4263 87 0007
1 2449 START 2449
1 4853630007 HLT 2449 0 4853 63 0007
1 2456 START 2456
1 4144410007 ADA 2456 0 4144 41 0007
1 2459 START 2459
1 4144440007 ADD 2459 0 4144 44 0007
1 2464 START 2464
1 6263415970 START 2464 0 6263 41 5970
1 2469 START 2469
1 6262430007 SSC 2469 0 6262 43 0007
1 2479 START 2479
1 4364420007 CUB 2479 0 4364 42 0007
1 2482 START 2482
1 4264550007 BUN 2482 0 4264 55 0007
1 2496 START 2496
1 4364590007 CUR 2496 0 4364 59 0007
1 2509 START 2509
1 5463620007 MTS 2509 0 5463 62 0007
1 2529 START 2529
1 4644650007 FDV 2529 0 4644 65 0007
1 4654640007 FMU 2530 0 4654 64 0007
1 2536 START 2536
1 5763590007 PTR 2536 0 5763 59 0007
1 2543 START 2543
1 5763660007 PTW 2543 0 5763 66 0007
1 2568 START 2568
1 6263410007 STA 2568 0 6263 41 0007
1 2570 START 2570
1 6263430007 STC 2570 0 6263 43 0007
1 2577 START 2577
1 5344420007 LDB 2577 0 5344 42 0007
1 2589 START 2589
1 6253630007 SLT 2589 0 6253 63 0007
1 2599 START 2599
1 4555440007 END 2599 0 4555 44 0007
1 5464530007 MUL 2600 0 5464 53 0007
1 2605 START 2605
1 4355690007 CNZ 2605 0 4355 69 0007
1 2668 START 2668
1 6264410007 SUA 2668 0 6264 41 0007
1 6264420007 SUB 2669 0 6264 42 0007
1 2672 START 2672
1 4256460007 BOF 2672 0 4256 46 0007
1 2683 START 2683
1 4366460007 CWF 2683 0 4366 46 0007
1 2686 START 2686
1 4366490007 CWI 2686 0 4366 49 0007
1 2696 START 2696
1 4366590007 CWR 2696 0 4366 59 0007
1 2709 START 2709
1 4246840007 BF4 2709 0 4246 84 0007
1 4246850007 BF5 2710 0 4246 85 0007
1 4246860007 BF6 2711 0 4246 86 0007
1 4246870007 BF7 2712 0 4246 87 0007 ?? was 4246860007
1 2740 START 2740
1 5955440007 RND 2740 0 5955 44 0007
1 2812 START 2812
1 5456660007 MOW 2812 0 5456 66 0007
1 2815 START 2815
1 5556590007 NOR 2815 0 5556 59 0007
1 2820 START 2820
1 4567630007 EXT 2820 0 4567 63 0007
1 2967 START EQUIVALENTS. 2967
1 39 CCBR 2967 0 0000 00 0039
1 2980 START 2980
1 44 CRD 2980 0 0000 00 0044
1 2982 START 2982
1 48 CRF 2982 0 0000 00 0048
1 2985 START 2985
1 45 CRI 2985 0 0000 00 0045
1 3003 START 3003
1 7 PTWF 3003 0 0000 00 0007
1 3010 START 3010
1 61 DIV 3010 0 0000 00 0061
1 3069 START 3069
1 31 CUBR 3069 0 0000 00 0031
1 3090 START 3090
1 40 MRD 3090 0 0000 00 0040
1 3102 START 3102
1 70 MRO 3102 0 0000 00 0070
1 3112 START 3112
1 52 MRW 3112 0 0000 00 0052
1 3124 START 3124
1 11 BA 3124 0 0000 00 0011
1 3175 START 3175
1 66 CAA 3175 0 0000 00 0066
1 3178 START 3178
1 64 CAD 3178 0 0000 00 0064
1 3188 START 3188
1 10 DAD 3188 0 0000 00 0010
1 13 SRT 3189 0 0000 00 0013
1 3208 START 3208
1 80 FAD 3208 0 0000 00 0080
1 3259 START 3259
1 16 ASC 3259 0 0000 00 0016
1 3277 START 3277
1 67 CSA 3277 0 0000 00 0067
1 3286 START 3286
1 22 DBB 3286 0 0000 00 0022
1 3294 START 3294
1 32 IB 3294 0 0000 00 0032
1 3300 START 3300
1 65 CSU 3300 0 0000 00 0065
1 3330 START 3330
1 81 FSU 3330 0 0000 00 0081
1 3344 START 3344
1 6 UA 3344 0 0000 00 0006
1 3377 START 3377
1 38 CCB 3377 0 0000 00 0038
1 3394 START 3394
1 29 CCR 3394 0 0000 00 0029
1 33 CLR 3395 0 0000 00 0033
1 3405 START 3405
1 1 CIRA 3405 0 0000 00 0001
1 3410 START 3410
1 73 OSD 3410 0 0000 00 0073
1 34 BT4 3411 0 0000 00 0034
1 35 BT5 3412 0 0000 00 0035
1 36 BT6 3413 0 0000 00 0036
1 37 BT7 3414 0 0000 00 0037
1 3449 START 3449
1 8 HLT 3449 0 0000 00 0008
1 3456 START 3456
1 76 ADA 3456 0 0000 00 0076
1 3459 START 3459
1 74 ADD 3459 0 0000 00 0074
1 3464 START 3464
1 BUN START START 3464 0 0000 20 1034
1 3469 START 3469
1 17 SSC 3469 0 0000 00 0017
1 3479 START 3479
1 30 CUB 3479 0 0000 00 0030
1 3482 START 3482
1 20 BUN 3482 0 0000 00 0020
1 3496 START 3496
1 21 CUR 3496 0 0000 00 0021
1 3509 START 3509
1 42 MTS 3509 0 0000 00 0042
1 3529 START 3529
1 83 FDV 3529 0 0000 00 0083
1 82 FMU 3530 0 0000 00 0082
1 3536 START 3536
1 PTR 3536 0 0000 00 0000
1 3543 START 3543
1 3 PTW 3543 0 0000 00 0003
1 3568 START 3568
1 12 STA 3568 0 0000 00 0012
1 3570 START 3570
1 2 STC 3570 0 0000 00 0002
1 3577 START 3577
1 72 LDB 3577 0 0000 00 0072
1 3589 START 3589
1 14 SLT 3589 0 0000 00 0014
1 3599 START 3599
1 BUN END END 3599 0 0000 20 1032
1 60 MUL 3600 0 0000 00 0060
1 3605 START 3605
1 4 CNZ 3605 0 0000 00 0004
1 3668 START 3668
1 77 SUA 3668 0 0000 00 0077
1 75 SUB 3669 0 0000 00 0075
1 3672 START 3672
1 28 BOF 3672 0 0000 00 0028
1 3683 START 3683
1 58 CWF 3683 0 0000 00 0058
1 3686 START 3686
1 55 CWI 3686 0 0000 00 0055
1 3696 START 3696
1 54 CWR 3696 0 0000 00 0054
1 3709 START 3709
1 24 BF4 3709 0 0000 00 0024
1 25 BF5 3710 0 0000 00 0025
1 26 BF6 3711 0 0000 00 0026
1 27 BF7 3712 0 0000 00 0027
1 3740 START 3740
1 23 RND 3740 0 0000 00 0023
1 3812 START 3812
1 50 MOW 3812 0 0000 00 0050
1 3815 START 3815
1 15 NOR 3815 0 0000 00 0015
1 3820 START 3820
1 63 EXT 3820 0 0000 00 0063
1 1200 START 1200
1 1 1429 CWF LOAD UP EASY 1200 0 0010 58 1429
1 1 1400 CRF FROM THE DRUM 1201 0 0010 48 1400
1 21 1458 CWF 1202 0 0210 58 1458
1 1220 BF4 1203 0 0000 24 1220 ?? was BT4 34
1 1260 BF5 1204 0 0000 25 1260 ?? was BT5 35
1 1240 BF6 1205 0 0000 26 1240 ?? was BT6 36
1 1280 BF7 1206 0 0000 27 1280 ?? was BT7 37
1 CAD SIGN6 1207 0 0000 64 1722
1 10 SRT 1208 0 0000 13 0010
1 6004 CAD 1209 0 0000 64 6004
1 9 CIRA 1210 0 0000 01 0009
1 10 SLT 1211 0 0000 14 0010
1 STA SIGN6 1212 0 0000 12 1722
1 BUN PROC 1213 0 0000 20 1000
1 1500 END 1500