mirror of
https://github.com/simh/simh.git
synced 2026-04-26 03:57:11 +00:00
08027162ca
- Integration with updated sim_card API - Addition of MT (Mag Tape) device - Addition of DSK (Disk) device - Build time simulator test
501 lines
42 KiB
Plaintext
501 lines
42 KiB
Plaintext
5 PACKAGE 4 IS
|
|
5 PACKAGE 2
|
|
5 PLUS
|
|
5 LOG AND EXPONENTIAL
|
|
5 SUBROUTINES
|
|
6 E00AI STD ARTHX AI1 ADD 1833 24 1786 1789
|
|
7 AI1 STL ARTHG 1789 20 1794 1799
|
|
8 LDD ARTHB 1799 69 1802 1805
|
|
9 RAM 8002 STORE ACC 1802 67 8002 1767
|
|
10 STL ARTHF POWER 1767 20 1772 1894
|
|
11 SML ARTHE 1894 18 1902 1759
|
|
12 SLT 0001 1759 35 0001 1766
|
|
13 NZU AI12 FIND MAX 1766 44 1773 1771
|
|
14 LDD AI3A 1771 69 1774 1777
|
|
15 SRT 0005 POWER 1777 30 0005 1790
|
|
16 SDA AI3 SET EXPNNTS 1790 22 1793 1796
|
|
17 BMI AI2 AND THEN 1796 46 1899 1754
|
|
18 RAM ARTHE PERFORM 1899 67 1902 1817
|
|
19 STL ARTHF ADDITION 1817 20 1772 1776
|
|
20 RAL ARTHH 1776 65 1788 1943
|
|
21 LDD ARTHM AI3 1943 69 1824 1793
|
|
22 AI3 SRT 0000 AI3B 1793 30 0000 1811
|
|
23 AI3A SRT 0000 AI3B 1774 30 0000 1811
|
|
24 AI3B ALO 8001 AI5 1811 15 8001 1770
|
|
25 AI2 RAL ARTHM 1754 65 1824 1779
|
|
26 LDD ARTHH AI3 1779 69 1788 1793
|
|
27 AI5 RAU 8002 CLEAR ARTHE 1770 60 8002 1780
|
|
28 STL ARTHE ARTHS TO SCALE 1780 20 1902 1762
|
|
29 AI12 BMI AI13 1773 46 1778 1828
|
|
30 RAL ARTHG AI10 1778 65 1794 1904
|
|
31 AI13 RAL ACC ARTHX 1828 65 0000 1786
|
|
32 ARTHB STD ARTHY BREAK UP EXP 1805 24 1808 1826
|
|
33 SLT 0008 AND MANTISSA 1826 35 0008 1996
|
|
34 STL ARTHE STORE POWER 1996 20 1902 1755
|
|
35 RAU 8003 AND MANTISSA 1755 60 8003 1763
|
|
36 SLT 0001 OF LOWER 1763 35 0001 1769
|
|
37 STU ARTHM 1769 21 1824 1997
|
|
38 RAU ACC 1997 60 0000 1855
|
|
39 SRT 0002 STORE POWER 1855 30 0002 1761
|
|
40 SLO 8002 AND MANTISSA 1761 16 8002 1819
|
|
41 SLT 0001 OF ACC 1819 35 0001 1775
|
|
42 ALO 8001 1775 15 8001 1783
|
|
43 STU ARTHH ARTHY 1783 21 1788 1808
|
|
44 ARTHS SCT 0000 NORMALIZE 1762 36 0000 1782
|
|
45 BOV AI6 BRNCH IF ZRO 1782 47 1942 1787
|
|
46 STL ARTHG SHIFT COUNT 1787 20 1794 1797
|
|
47 RAL 8003 ROUND ON 1797 65 8003 1905
|
|
48 SRD 0002 NINTH DIGIT 1905 31 0002 1813
|
|
49 SLT 0002 CHECK FOR 1813 35 0002 1869
|
|
50 STL ARTHM ROUNDOFF 1869 20 1824 1877
|
|
51 NZU AI7 AI8 OVERFLOW 1877 44 1831 1834
|
|
52 AI8 RAM 8003 AND 1834 67 8003 1841
|
|
53 SML ARTHG CORRECT IF 1841 18 1794 1800
|
|
54 ALO AJ2 NECESSARY 1800 15 1903 1822
|
|
55 SLT 0008 1822 35 0008 1791
|
|
56 RAL 8002 1791 65 8002 1849
|
|
57 AML ARTHE 1849 17 1902 1757
|
|
58 ALO ARTHF 1757 15 1772 1827
|
|
59 BMI AI11A PWR TOO SMAL 1827 46 1752 1781
|
|
60 NZU AI11 PWR TOO LRGE 1781 44 1785 1836
|
|
61 SLT 0002 1836 35 0002 1893
|
|
62 STU ACC1 1893 21 1998 1901
|
|
63 RAL ARTHM 1901 65 1824 1829
|
|
64 BMI AI9 COMBINE 1829 46 1944 1995
|
|
65 SLO ACC1 AI10 1944 16 1998 1904
|
|
66 AI10 STL ACC ARTHX AND 1904 20 0000 1786
|
|
67 AI9 ALO ACC1 AI10 1995 15 1998 1904
|
|
68 AI7 SRT 0001 ADJUST 1831 30 0001 1792
|
|
69 STL ARTHM 1792 20 1824 1927
|
|
70 SLT 0001 AI8 1927 35 0001 1834
|
|
71 AI6 RAL 8003 AI10 1942 65 8003 1904
|
|
72 E00AJ STD ARTHX MULTIPLY 1832 24 1786 1839
|
|
73 LDD ARTHB 1839 69 1852 1805
|
|
74 RAM 8002 ACC POWER 1852 67 8002 1867
|
|
75 SLO AJ1 MINUS 48 1867 16 1820 1825
|
|
76 STL ARTHF 1825 20 1772 1875
|
|
77 RAU ARTHH 1875 60 1788 1756
|
|
78 MPY ARTHM ARTHS 1756 19 1824 1762
|
|
79 E00AG STD ARTHX AG1 DIVIDE 1830 24 1786 1889
|
|
80 AG1 LDD ARTHB IS DIVISOR 1889 69 1842 1805
|
|
81 NZU AG3 ZER0 1842 44 1812 1846
|
|
82 RSM 8002 DIVISOR 1812 68 8002 1821
|
|
83 ALO AG2 POWER MINUS 1821 15 1876 1895
|
|
84 STL ARTHF 49 1895 20 1772 1768
|
|
85 RAU ARTHM SH1FT 1768 60 1824 1879
|
|
86 SRT 0001 DIVIDEND 1879 30 0001 1885
|
|
87 DVR ARTHH DO DIVIDE 1885 64 1788 1803
|
|
88 RAU 8002 ARTHS 1803 60 8002 1762
|
|
89 E00AO STD ARTHX DIV REVERSE 1882 24 1786 1989
|
|
90 STL ACC2 1989 20 1843 1896
|
|
91 RAL ACC 1896 65 0000 1810
|
|
92 LDD ACC2 1810 69 1843 1897
|
|
93 STD ACC AG1 1897 24 0000 1889
|
|
94 E00AF STD ACC6 FL0AT TO LWR 1947 24 1858 1911
|
|
95 LDD AE4 E00AE AND ACC 1911 69 1925 1928
|
|
96 AE4 STL ACC ACC6 1925 20 0000 1858
|
|
97 E00AE STD ARTHX FLOAT TO LWR 1928 24 1786 1840
|
|
98 RAU 8002 ONLY 1840 60 8002 1753
|
|
99 SCT 0000 NORMALIZE 1753 36 0000 1975
|
|
100 STL ACC3 1975 20 1881 1784
|
|
101 BOV AD1 ZER0 CHECK 1784 47 1851 1890
|
|
102 RAL 8003 1890 65 8003 1798
|
|
103 SRD 0002 ROUND FOR 1798 31 0002 1807
|
|
104 SLT 0002 PLACING EXP 1807 35 0002 1764
|
|
105 NZU AE6 CHECK ROUND 1764 44 1818 1891
|
|
106 LDD 8003 OVERFLOW 1818 69 8003 1874
|
|
107 SRT 0001 1874 30 0001 1884
|
|
108 ALO 8001 AE6 1884 15 8001 1891
|
|
109 AE6 BMI AE2 INSERT 1891 46 1844 1845
|
|
110 ALO AJ3 AE5 EXP0NENT 1845 15 1848 1804
|
|
111 AE2 SLO AJ3 AE5 1844 16 1848 1804
|
|
112 AE5 SLO ACC3 ARTHX 1804 16 1881 1786
|
|
113 E00TH STD ARTHX FIX L0WER 1932 24 1786 1990
|
|
114 SLT 0008 TO LOWER 1990 35 0008 1859
|
|
115 STU ARTHM 1859 21 1824 1878
|
|
116 RAM 8002 TEST EXP 1878 67 8002 1887
|
|
117 SLO AJ5 STORE ZER0 1887 16 1940 1945
|
|
118 BMI AD1 IF LESS THAN 1945 46 1851 1850
|
|
119 SLO AJ4 50 ALARM 1850 16 1853 1758
|
|
120 BMI AD3 1F GRTR THAN 1758 46 1861 1862
|
|
121 SRT 0004 59 1861 30 0004 1921
|
|
122 ALO AR7 1921 15 1924 1929
|
|
123 LDD AD2A MODIFY 1929 69 1835 1838
|
|
124 SDA AD2 SHIFT 1838 22 1991 1971
|
|
125 RAL ARTHM 1971 65 1824 1930
|
|
126 SLT 0002 AD2 1930 35 0002 1991
|
|
127 AD1 RAL 8003 ARTHX STORE ZERO 1851 65 8003 1786
|
|
128 AD2 SRT 0000 ARTHX SHIFT C0NST 1991 30 0000 1786
|
|
129 AD2A SRT 0000 ARTHX 1835 30 0000 1786
|
|
130 AD3 LDD ARTHX 3031 FIX ALARM 1862 69 1786 3031
|
|
131 AG3 LDD ARTHX 3061 DIVIDE ALARM 1846 69 1786 3061
|
|
132 AI11 LDD ARTHX 3081 SCALE ALARM 1785 69 1786 3081
|
|
133 AI11A HLT 1081 AI6 1752 01 1081 1942
|
|
134 AG2 49 0000 0000 1876 49 0000 0000
|
|
135 AJ1 48 0000 0000 1820 48 0000 0000
|
|
136 AJ2 00 0000 0001 1903 00 0000 0001
|
|
137 AJ3 00 0000 0059 1848 00 0000 0059
|
|
138 AJ4 10 0000 0000 1853 10 0000 0000
|
|
139 AJ5 50 0000 0000 1940 50 0000 0000
|
|
140 E00AQ STD J0001 AQ1 READ 1974 24 1977 1880
|
|
141 AQ1 RD1 1976 AQ3 1880 70 1976 1898
|
|
142 AQ3 RAM P0001 AQ3A 1898 67 1951 1806
|
|
143 AQ3B RAM P0001 AQ3A CHECK FOR 1892 67 1951 1806
|
|
144 AQ3A NZE AQ8 LAST WORD 1806 45 1860 1837
|
|
145 LDD AQ5 AQ4 ON CARD 1860 69 1863 1816
|
|
146 AQ4 STD ACC4 1816 24 1870 1873
|
|
147 AUP 8003 READ IN 1873 10 8003 1931
|
|
148 SRT 0004 LABEL FOR 1931 30 0004 1941
|
|
149 SIA ACC5 PRESENT 1941 23 1795 1948
|
|
150 SLO 8001 VARIABLE 1948 16 8001 1856
|
|
151 ALO 8002 GET I Y 0R C 1856 15 1809 8002
|
|
152 RAU 0000 ADDRESS FROM 1809 60 0000 1987 was RAU A000 - 00 0000 0000
|
|
153 AUP ACC5 ABCON DICT 1987 10 1795 1949
|
|
154 SLT 0004 ACC4 GENERATE 1949 35 0004 1870
|
|
155 AQ5 AUP AQ7 1NSTRUCTION 1863 10 1866 1857
|
|
156 ALO P0010 1857 15 1960 1965
|
|
157 ALO 8002 GET AND 1965 15 1968 8002
|
|
158 LDD P0002 8003 STORE WORD 1968 69 1952 8003
|
|
159 AQ7 STD 0000 1866 24 0000 1907
|
|
160 RAL P0010 INCREMENT 1907 65 1960 1915
|
|
161 ALO AQ9 WORD COUNT 1915 15 1918 1854
|
|
162 STL P0010 1854 20 1960 1963
|
|
163 ALO AQ3B 8002 1963 15 1892 8002
|
|
164 AQ8 RAL P0001 CHECK FOR 1837 65 1951 1765
|
|
165 BMI J0001 AQ1 LAST CARD 1765 46 1977 1880
|
|
166 E00AR STD P0005 PUNCH 0UT 1801 24 1955 1908
|
|
167 STU J0003 1908 21 1979 1935
|
|
168 SIA P0008 STORE STMNT 1935 23 1958 1912
|
|
169 STU J0004 NUMBER 1912 21 1980 1886
|
|
170 SDA P0004 STORE WORD 1886 22 1954 1909
|
|
171 SLO 8001 COUNT 1909 16 8001 1917
|
|
172 NZE AR10 AR9 TEST ZERO 1917 45 1920 1872
|
|
173 AR10 STU J0005 STMT NUMBER 1920 21 1981 1814
|
|
174 STD J0006 SET PUNCH 1814 24 1982 1972
|
|
175 STD J0007 BAND TO 1972 24 1983 1864
|
|
176 STD J0008 ZEROES 1864 24 1984 1888
|
|
177 STD P0010 AR3 SET COUNTER 1888 24 1960 1913
|
|
178 AR3 RAL P0004 1913 65 1954 1910
|
|
179 SLO AR7 1910 16 1924 1936
|
|
180 BMI AR8 TEST WORD 1936 46 1994 1992
|
|
181 STL P0004 AR4 COUNT 1992 20 1954 1865
|
|
182 AR4 ALO 8002 GET WORD 1865 15 1868 8002
|
|
183 RAL P0000 LABEL FROM 1868 65 1950 1914
|
|
184 AUP 8003 PUNCH CONSTS 1914 10 8003 1922
|
|
185 SLT 0001 1922 35 0001 1938
|
|
186 SDA P0007 MODIFY LABEL 1938 22 1957 1961
|
|
187 SLO 8001 1961 16 8001 1919
|
|
188 SRT 0001 1919 30 0001 1926
|
|
189 ALO P0007 1926 15 1957 1962
|
|
190 SLT 0004 INSERT STMNT 1962 35 0004 1923
|
|
191 ALO P0008 NUMBER 1923 15 1958 1964
|
|
192 AUP P0010 1964 10 1960 1916
|
|
193 AUP 8003 1916 10 1969 8003
|
|
194 STL J0001 STORE LABEL 1969 20 1977 1988
|
|
195 RAL 8002 FOR PUNCHING 1988 65 8002 1900
|
|
196 LDD AQ4 MODIFY LABEL 1900 69 1906 1816
|
|
197 AUP AR6 INTO DRUM 1906 10 1966 1934
|
|
198 ALO P0010 LOC IN READ 1934 15 1960 1967
|
|
199 ALO 8003 GET WORD 1967 15 1970 8003
|
|
200 STD J0002 STORE IN 1970 24 1978 1993
|
|
201 RAL P0010 PUNCH BAND 1993 65 1960 1815
|
|
202 ALO AQ9 1815 15 1918 1973
|
|
203 STL P0010 AR3 1973 20 1960 1913
|
|
204 AR6 LDD 0000 8002 1966 69 0000 8002
|
|
205 AR7 00 0001 0000 1924 00 0001 0000
|
|
206 AR8 PCH J0001 P0005 PUNCH 1994 71 1977 1955
|
|
207 AR9 RAL 8000 IF STMT NMBR 1872 65 8000 1937
|
|
208 BMI AR10 P0005 ZRO PCH ONLY 1937 46 1920 1955
|
|
209 AQ9 00 0002 0000 IF 8000 NEG 1918 00 0002 0000
|
|
210 J0010 80 0000 8800 CONTROL CNST 1986 80 0000 8800
|
|
211 E00AL STD ARTHY 1654 24 1808 1732
|
|
212 STL ARTHH 1732 20 1788 1694
|
|
213 RAL ACC AL17A IS POWER 1694 65 0000 1709
|
|
214 AL17A STD ACC4 TWO 1709 24 1870 1723
|
|
215 STD ARTHX IF SO 1723 24 1786 1739
|
|
216 SLO AL16 MULTIPLY 1739 16 1686 1692
|
|
217 NZE AL18 1692 45 1731 1751
|
|
218 RAL ARTHH 1751 65 1788 1645
|
|
219 STD ACC 1645 24 0000 1655
|
|
220 LDD ARTHY E00AJ 1655 69 1808 1832
|
|
221 AL18 RAL ARTHH AL17 1731 65 1788 1693
|
|
222 AL17 SLT 0008 1693 35 0008 1661
|
|
223 SLO 8002 1661 16 8002 1720
|
|
224 SLT 0002 Q EQUALS 1720 35 0002 1677
|
|
225 ALO 8001 MANTISSA 1677 15 8001 1690
|
|
226 STU ARTHF OF ARGUMENT 1690 21 1772 1675
|
|
227 RAM 8002 1675 67 8002 1683
|
|
228 SLO AL1 STORE EXPNNT 1683 16 1736 1691
|
|
229 SLT 0002 OF ARGMNT 1691 35 0002 1698
|
|
230 STU ARTHE 1698 21 1902 1706
|
|
231 RAL AL2 MANTISSA OF 1706 65 1660 1666
|
|
232 STL ARTHM Z IS ONE 1666 20 1824 1678
|
|
233 RAL AL1 1678 65 1736 1695
|
|
234 SLT 0002 EXP OF Z IS 1695 35 0002 1702
|
|
235 STU ARTHG AL3 50 1702 21 1794 1747
|
|
236 AL3 RAU ACC K IS GRTST 1747 60 0000 1708
|
|
237 MPY AL1 INTEGER IN 1708 19 1736 1738
|
|
238 STU ACC K OVER TWO 1738 21 0000 1658
|
|
239 RAL 8002 IS REMAINDER 1658 65 8002 1667
|
|
240 NZE AL4 ZER0 1667 45 1670 1646
|
|
241 RAU ARTHM IF NOT SET Z 1670 60 1824 1729
|
|
242 LDD AL5 EQUALS TO 1729 69 1682 1737
|
|
243 ALO ARTHG Z TIMES Q 1682 15 1794 1715
|
|
244 STL ARTHG VIA 1715 20 1794 1699
|
|
245 RAL ARTHD SUBROUTINE 1699 65 1665 1669
|
|
246 STL ARTHM 1669 20 1824 1638
|
|
247 NZE AL4 AL20 1638 45 1646 1741
|
|
248 AL4 RAU ACC IF K NONZERO 1646 60 0000 1712
|
|
249 NZU AL7 Q EQUALS 1712 44 1668 1721
|
|
250 RAU ARTHF 1668 60 1772 1679
|
|
251 LDD AL5 VIA SUBRTNE 1679 69 1684 1737
|
|
252 ALO ARTHE 1684 15 1902 1714
|
|
253 STL ARTHE 1714 20 1902 1662
|
|
254 RAL ARTHD 1662 65 1665 1719
|
|
255 STL ARTHF AL3 1719 20 1772 1747
|
|
256 AL7 RAU ARTHG SET EXPONNTS 1721 60 1794 1700
|
|
257 SRT 0002 ARTHS 1700 30 0002 1663
|
|
258 NZU AI11 EXP OVERSCAL 1663 44 1785 1722
|
|
259 STL ARTHE 1722 20 1902 1664
|
|
260 STU ARTHF 1664 21 1772 1671
|
|
261 RAU ARTHM 1671 60 1824 1680
|
|
262 SRT 0001 AL20 1680 30 0001 1741
|
|
263 AL20 LDD AL8 1741 69 1716 1724
|
|
264 STD ARTHX ARTHS 1724 24 1786 1762
|
|
265 AL8 RAL ACC4 1716 65 1870 1648
|
|
266 BMI AL10 1648 46 1701 1743
|
|
267 RAL ACC ARTHY 1743 65 0000 1808
|
|
268 AL10 RAL ACC Z EQUALS ONE 1701 65 0000 1672
|
|
269 NZE AL12 OVER Z IF 1672 45 1676 1681
|
|
270 RAL AL11 K NEG AND Z 1676 65 1685 1649
|
|
271 LDD ARTHY E00AG NON ZERO 1649 69 1808 1830
|
|
272 AL12 LDD ARTHY 3111 ALARM IF ZRO 1681 69 1808 3111
|
|
273 AL5 STD ARTHX 1737 24 1786 1652
|
|
274 MPY ARTHF 1652 19 1772 1673
|
|
275 SRT 0009 1673 30 0009 1644
|
|
276 NZU AL14 1644 44 1650 1639
|
|
277 STL ARTHD 1639 20 1665 1640
|
|
278 RAL 8003 AL15 1640 65 8003 1641
|
|
279 AL15 ALO ARTHE ARTHX 1641 15 1902 1786
|
|
280 AL14 SRT 0001 1650 30 0001 1643
|
|
281 STL ARTHD 1643 20 1665 1642
|
|
282 RAL AJ2 AL15 1642 65 1903 1641
|
|
283 AL1 50 0000 0000 1736 50 0000 0000
|
|
284 AL2 10 0000 0000 1660 10 0000 0000
|
|
285 AL11 10 0000 0050 1685 10 0000 0050
|
|
286 AL16 00 0000 0002 1686 00 0000 0002
|
|
287 AJ2 00 0000 0001 1903 00 0000 0001
|
|
288 E00AN STD ARTHY POWER 1651 24 1808 1687
|
|
289 LDD ACC FLOAT FIX 1687 69 0000 1674
|
|
290 STD ARTHH REVERSE 1674 24 1788 1745
|
|
291 STL ACC AL17A 1745 20 0000 1709
|
|
292 E00AK STD ARTHY POWER FIXFIX 1704 24 1808 1711
|
|
293 STL ARTHG AK1 Q IS ARGMNT 1711 20 1794 1647
|
|
294 AK1 RAM ACC K EQUALS 1647 67 0000 1705
|
|
295 STL ARTHF ABVAL POWER 1705 20 1772 1725
|
|
296 RAL AJ2 Z EQUALS 1725 65 1903 1707
|
|
297 STL ARTHH AK3 ONE 1707 20 1788 1718
|
|
298 AK3 RAU ARTHF K IS GTST 1718 60 1772 1727
|
|
299 MPY AK4 INTGR IN 1727 19 1730 1717
|
|
300 STU ARTHF K OVER TWO 1717 21 1772 1726
|
|
301 RAL 8002 IS REMAINDER 1726 65 8002 1735
|
|
302 NZE AK5 ZERO 1735 45 1734 1742
|
|
303 RAU ARTHH IF NOT Z IS 1734 60 1788 1688
|
|
304 MPY ARTHG Z TIMES Q 1688 19 1794 1733
|
|
305 STL ARTHH AK5 1733 20 1788 1742
|
|
306 AK5 RAU ARTHF 1742 60 1772 1728
|
|
307 NZU AK6 1S K ZERO 1728 44 1740 1746
|
|
308 RAU ARTHG IF NOT 1740 60 1794 1749
|
|
309 MPY 8001 Q EQUALS 1749 19 8001 1689
|
|
310 STL ARTHG AK3 Q SQUARED 1689 20 1794 1718
|
|
311 AK6 RAU ACC IS POWER NEG 1746 60 0000 1656
|
|
312 BMI AK7 IF SO IS Z 1656 46 1659 1713
|
|
313 RAM ARTHH ZERO 1659 67 1788 1744
|
|
314 NZE AK8 IF NOT IS Z 1744 45 1748 1750
|
|
315 SLO AJ2 ONE 1748 16 1903 1657
|
|
316 NZE AK10 AK7 1657 45 1710 1713
|
|
317 AK7 RAL ARTHH ARTHY EXHIBIT Z 1713 65 1788 1808
|
|
318 AK10 RAL 8003 ARTHY 1710 65 8003 1808
|
|
319 AK8 LDD ARTHY 3101 ALARM 1750 69 1808 3101
|
|
320 AK4 50 0000 0000 1730 50 0000 0000
|
|
321 AJ2 00 0000 0001 1903 00 0000 0001
|
|
322 E00AM STD ARTHY INTERCHGE 1653 24 1808 1696
|
|
323 LDD ACC ACC AND 1696 69 0000 1703
|
|
324 STD ARTHG LOWER 1703 24 1794 1697
|
|
325 STL ACC AK1 THEN E00AK 1697 20 0000 1647
|
|
326 1976 RAM 1951 1976 67 1951 1623
|
|
327 AUP 8003 1623 10 8003 1632
|
|
328 SLT 0004 1632 35 0004 1624
|
|
329 SDA P0009 1624 22 1959 1626
|
|
330 SRT 0004 1626 30 0004 1637
|
|
331 LDD AQ4 1637 69 1627 1816
|
|
332 RAL 8003 1627 65 8003 1636
|
|
333 AUP P0009 1636 10 1959 1633
|
|
334 ALO 8001 1633 15 8001 1631
|
|
335 AUP AQ9B 1631 10 1625 1628
|
|
336 ALO AQ10 AQ11 1628 15 1634 1622
|
|
337 AQ11 SUP AQ9B 1622 11 1625 1630
|
|
338 NZU AQ8 1630 44 1635 1837
|
|
339 AUP 8001 1635 10 8001 1621
|
|
340 SUP AR7 1621 11 1924 1629
|
|
341 SLO 8001 8003 1629 16 8001 8003
|
|
342 AQ9B LDD 1952 8002 1625 69 1952 8002
|
|
343 AQ10 STD 0000 AQ11 1634 24 0000 1622
|
|
344 E00AC STD ACC6 EXPONENTIAL 1605 24 1858 1611
|
|
345 NZE AC5 IS ARGUMENT 1611 45 1615 1504
|
|
346 SLT 0008 ZERO 1615 35 0008 1583
|
|
347 STU ARTHH IF NOT LET 1583 21 1788 1592
|
|
348 RSM 8002 N BE MANTSA 1592 68 8002 1601
|
|
349 ALO AC3 X BE POWER 1601 15 1604 1609
|
|
350 BMI AC4 IS X GRTR 1609 46 1513 1613
|
|
351 SLT 0001 THAN TWO 1613 35 0001 1619
|
|
352 NZU AC5 OR LESS THAN 1619 44 1504 1574
|
|
353 SRT 0005 MINUS EIGHT 1574 30 0005 1587
|
|
354 ALO AC6 IF X WITHIN 1587 15 1590 1595
|
|
355 STL ARTHD BOUNDS GEN 1595 20 1665 1618
|
|
356 RAU ARTHH INT AND 1618 60 1788 1593
|
|
357 SRT 0006 ARTHD FRACT PARTS 1593 30 0006 1665
|
|
358 AC3 51 0000 0000 OF ARGUMENT 1604 51 0000 0000
|
|
359 AC6 SRT 0000 IS ARG NEG 1590 30 0000 1584
|
|
360 BMI AC8 1F SO INT IS 1584 46 1589 1602
|
|
361 STU ARTHD AC1 INT MINUS 1 1602 21 1665 1585
|
|
362 AC8 SUP AJ2 AND FRACT IS 1589 11 1903 1607
|
|
363 STU ARTHD FRACT PLUS 1 1607 21 1665 1568
|
|
364 RAL 8002 1568 65 8002 1577
|
|
365 ALO AC2 AC1 1577 15 1580 1585
|
|
366 AC2 99 9999 9999 1580 99 9999 9999
|
|
367 AC1 STL ARTHH 1585 20 1788 1594
|
|
368 RAU 8002 1594 60 8002 1603
|
|
369 MPY AC18 GENERATE 1603 19 1606 1608
|
|
370 RAU 8003 1608 60 8003 1616
|
|
371 AUP AC17 POLYNOMIAL 1616 10 1620 1586
|
|
372 MPY ARTHH 1586 19 1788 1591
|
|
373 RAU 8003 APPROXIM 1591 60 8003 1561
|
|
374 AUP AC16 ATION 1561 10 1566 1582
|
|
375 MPY ARTHH 1582 19 1788 1596
|
|
376 RAU 8003 FOR 1596 60 8003 1612
|
|
377 AUP AC15 1612 10 1617 1578
|
|
378 MPY ARTHH EXPONENTIAL 1578 19 1788 1550
|
|
379 RAU 8003 1550 60 8003 1614
|
|
380 AUP AC14 1614 10 1567 1579
|
|
381 MPY ARTHH 1579 19 1788 1598
|
|
382 RAU 8003 1598 60 8003 1555
|
|
383 AUP AC13 1555 10 1560 1576
|
|
384 MPY ARTHH 1576 19 1788 1552
|
|
385 RAU 8003 1552 60 8003 1559
|
|
386 AUP AC12 1559 10 1564 1572
|
|
387 MPY ARTHH SQUARE 1572 19 1788 1573
|
|
388 RAU 8003 RESULT 1573 60 8003 1600
|
|
389 AUP AJ4 SCALE AND 1600 10 1853 1571
|
|
390 MPY 8003 FLOAT THEN 1571 19 8003 1557
|
|
391 SRT 0001 EXIT 1557 30 0001 1588
|
|
392 STU ACC2 1588 21 1843 1597
|
|
393 RAU AC19 1597 60 1551 1556
|
|
394 AUP ARTHD 1556 10 1665 1933
|
|
A394 BMI ACC6 1933 46 1858 1569
|
|
395 SRT 0002 1569 30 0002 1575
|
|
396 NZU AC21 1575 44 1514 1581
|
|
397 AUP ACC2 1581 10 1843 1599
|
|
398 SRT 0008 ACC6 1599 30 0008 1858
|
|
399 AC4 RAL ARTHH 1513 65 1788 1503
|
|
400 BMI AC21 1503 46 1510 1514
|
|
401 RAL 8003 ACC6 1510 65 8003 1858
|
|
402 AC5 RAL AC20 ACC6 ARGMNT ZERO 1504 65 1565 1858
|
|
403 AC21 LDD ACC6 3021 ALARM STOP 1514 69 1858 3021
|
|
404 AJ2 00 0000 0001 1903 00 0000 0001
|
|
405 AJ4 10 0000 0000 1853 10 0000 0000
|
|
406 AC12 11 5129 2776 1564 11 5129 2776
|
|
407 AC13 06 6273 0884 1560 06 6273 0884
|
|
408 AC14 02 5439 3575 1567 02 5439 3575
|
|
409 AC15 00 7295 1737 1617 00 7295 1737
|
|
410 AC16 00 1742 1120 1566 00 1742 1120
|
|
411 AC17 00 0255 4918 1620 00 0255 4918
|
|
412 AC18 00 0093 2643 1606 00 0093 2643
|
|
413 AC19 00 0000 0050 1551 00 0000 0050
|
|
414 AC20 10 0000 0050 1565 10 0000 0050
|
|
415 E00A8 NZE AB10 IS ARG ZERO 1507 45 1562 1505
|
|
416 STD ARTHD 1562 24 1665 1570
|
|
417 BMI AB10 IS ARG NEG 1570 46 1505 1524
|
|
418 SLT 0008 1524 35 0008 1543
|
|
419 STL ARTHE STORE POWER 1543 20 1902 1558
|
|
420 RAU 8003 FORM Z 1558 60 8003 1515
|
|
421 AUP AB1 EQUAL ARG 1515 10 1518 1523
|
|
422 STU ACC3 MINUS ROOT 1523 21 1881 1535
|
|
423 SUP AB2 TEN OVER ARG 1535 11 1553 1563
|
|
424 DVR ACC3 PLUS ROOT 1563 64 1881 1500
|
|
425 STL ARTHY TEN 1500 20 1808 1511
|
|
426 RAU 8002 1511 60 8002 1519
|
|
427 MPY 8001 Z SQUARE 1519 19 8001 1521
|
|
428 STU ACC3 1521 21 1881 1536
|
|
429 RAU 8003 GENERATE 1536 60 8003 1544
|
|
430 MPY AB7 1544 19 1548 1554
|
|
431 RAU 8003 POLYNOMIAL 1554 60 8003 1512
|
|
432 AUP AB6 1512 10 1516 1526
|
|
433 MPY ACC3 APPROXIMATN 1526 19 1881 1531
|
|
434 RAU 8003 1531 60 8003 1540
|
|
435 AUP AB5 1540 10 1549 1527
|
|
436 MPY ACC3 1527 19 1881 1538
|
|
437 RAU 8003 1538 60 8003 1502
|
|
438 AUP AB4 1502 10 1610 1528
|
|
439 MPY ACC3 1528 19 1881 1533
|
|
440 RAU 8003 1533 60 8003 1541
|
|
441 AUP AB3 1541 10 1545 1501
|
|
442 MPY ARTHY 1501 19 1808 1508
|
|
443 RAL 8003 1508 65 8003 1517
|
|
444 ALO AB8 1517 15 1520 1525
|
|
445 SRT 0002 1525 30 0002 1532
|
|
446 ALO ARTHE ADD POWER 1532 15 1902 1509
|
|
447 SLO AB8 1509 16 1520 1529
|
|
448 SRD 0002 ROUND 1529 31 0002 1537
|
|
449 RAU 8002 1537 60 8002 1546
|
|
450 SCT 0000 NORMALIZE 1546 36 0000 1522
|
|
451 BOV AB12 1522 47 1506 1530
|
|
452 BMI AB13 1530 46 1534 1539
|
|
453 SUP AB9 AB11 ADJUST 1534 11 1542 1547
|
|
454 AB11 SUP 8002 AB12 POWER 1547 11 8002 1506
|
|
455 AB12 RAL 8003 ARTHD 1506 65 8003 1665
|
|
456 AB13 AUP AB9 AB11 1539 10 1542 1547
|
|
457 AB10 LDD ARTHD 3011 ALARM 1505 69 1665 3011
|
|
458 AB1 00 3162 2780 1518 00 3162 2780
|
|
459 AB2 00 6324 5560 1553 00 6324 5560
|
|
460 AB3 86 8591 7180 1545 86 8591 7180
|
|
461 AB4 28 9335 5240 1610 28 9335 5240
|
|
462 AB5 17 7522 0710 1549 17 7522 0710
|
|
463 AB6 09 4376 4760 1516 09 4376 4760
|
|
464 AB7 19 1337 7140 1548 19 1337 7140
|
|
465 AB8 50 0000 0000 1520 50 0000 0000
|
|
466 AB9 00 0000 0053 1542 00 0000 0053
|
|
1 VARS
|
|
ARTHX 00 0000 0000 1786 00 0000 0000
|
|
ARTHD 00 0000 0000 1665 00 0000 0000
|
|
ARTHG 00 0000 0000 1794 00 0000 0000
|
|
ARTHF 00 0000 0000 1772 00 0000 0000
|
|
ARTHE 00 0000 0000 1902 00 0000 0000
|
|
ARTHH 00 0000 0000 1788 00 0000 0000
|
|
ARTHM 00 0000 0000 1824 00 0000 0000
|
|
ARTHY 00 0000 0000 1808 00 0000 0000
|
|
ACC 00 0000 0000 0000 00 0000 0000
|
|
ACC1 00 0000 0000 1998 00 0000 0000
|
|
ACC2 00 0000 0000 1843 00 0000 0000
|
|
ACC3 00 0000 0000 1881 00 0000 0000
|
|
ACC4 00 0000 0000 1870 00 0000 0000
|
|
ACC5 00 0000 0000 1795 00 0000 0000
|
|
ACC6 00 0000 0000 1858 00 0000 0000
|
|
J0001 00 0000 0000 1977 00 0000 0000
|
|
J0002 00 0000 0000 1978 00 0000 0000
|
|
J0003 00 0000 0000 1979 00 0000 0000
|
|
J0004 00 0000 0000 1980 00 0000 0000
|
|
J0005 00 0000 0000 1981 00 0000 0000
|
|
J0006 00 0000 0000 1982 00 0000 0000
|
|
J0007 00 0000 0000 1983 00 0000 0000
|
|
J0008 00 0000 0000 1984 00 0000 0000
|
|
P0000 00 0000 0000 1950 00 0000 0000
|
|
P0001 00 0000 0000 1951 00 0000 0000
|
|
P0002 00 0000 0000 1952 00 0000 0000
|
|
P0004 00 0000 0000 1954 00 0000 0000
|
|
P0005 00 0000 0000 1955 00 0000 0000
|
|
P0007 00 0000 0000 1957 00 0000 0000
|
|
P0008 00 0000 0000 1958 00 0000 0000
|
|
P0009 00 0000 0000 1959 00 0000 0000
|
|
P0010 00 0000 0000 1960 00 0000 0000
|