* SUBR TREND & TRNDIN 4- PAGE 2

0058 00064 101040 SNZ 0059 00065 0 01 00136 JMP RT2 0060 00066 101400 SMI 0061 00067 0 01 00134 JMP ONDB DX>DU 0062 00070 0 02 00222 LDA ='140000 DU>DX 0063 00071 0 04 00212 STA DB 0064 00072 0 03 00211 RT1 ANA DA 0065 00073 0 04 00176 STA T 0066 00074 100400 SPL 0067 00075 0 01 00100 JMP *+3 0068 00076 0 02 00203 LDA D+1 0069 00077 0 04 00177 STA T+1 0070 00100 0 02 00176 LDA T 0071 00101 0414 77 LGL 1 0072 00102 0 04 00176 STA T 0073 00103 100400 SPL 0074 00104 0 01 00110 JMP *+4 0075 00105 0 02 00177 LDA T+1 0076 00106 0 06 00204 ADD D+2 0077 00107 0 04 00177 STA T+1 0078 00110 0 02 00176 LDA T 0079 00111 0414 77 LGL 1 0080 00112 0 04 00176 STA T 0081 00113 100400 SPL 0082 00114 0 01 00120 JMP *+4 0083 00115 0 02 00177 LDA T+1 0084 00116 0 06 00205 ADD D+3 0085 00117 0 04 00177 STA T+1 0086 00120 0 02 00176 LDA T 0087 00121 0414 77 LGL 1 0088 00122 0 04 00176 STA T 0089 00123 100400 SPL 0090 00124 0 01 00130 JMP *+4 0091 00125 0 02 00177 LDA T+1 0092 00126 0 06 00206 ADD D+4 0093 00127 100000 SKP 0094 00130 0 02 00177 LDA T+1 0095 00131 0 01 00153 JMP OUT 0096 00132 0 02 00221 ONDA LDA ='50000 0097 00133 0 01 00061 JMP RT 0098 00134 0 02 00220 ONDB LDA ='30000 0099 00135 0 01 00072 JMP RT1 0100 00136 0 02 00203 RT2 LDA D+1 0101 00137 0 06 00204 ADD D+2 0102 00140 0 06 00205 ADD D+3 0103 00141 0 06 00206 ADD D+4 0104 00142 0405 76 ARS 2 0105 00143 0 01 00160 JMP OUT+5 0106 00144 0 000000 INVT DAC ** 0107 00145 101400 SMI 0108 00146 -0 01 00144 JMP* INVT 0109 00147 0 04 00176 STA T 0110 00150 140040 CRA 0111 00151 0 07 00176 SUB T 0112 00152 -0 01 00144 JMP* INVT 0113 00153 101000 OUT NOP 0114 00154 0 04 00176 STA T