Mercurial > hg > Members > kono > nitros9-code

annotate 3rdparty/customboots/boisy/testmul.a @ 2426:5ade5dd9c3cb

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Updated
author boisy
date Thu, 04 Feb 2010 15:17:15 +0000
parents
children 6bc8200fd0ba
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
rev   line source
2426
5ade5dd9c3cb Updated
boisy
parents:
diff changeset
1 tylg set $01 Prgrm+Objct
5ade5dd9c3cb Updated
boisy
parents:
diff changeset
2 atrv set $80+rev ReEnt+rev
5ade5dd9c3cb Updated
boisy
parents:
diff changeset
3 rev set $00
5ade5dd9c3cb Updated
boisy
parents:
diff changeset
4 edition set 5
5ade5dd9c3cb Updated
boisy
parents:
diff changeset
5
5ade5dd9c3cb Updated
boisy
parents:
diff changeset
6 psect testmul_a,tylg,atrv,edition,200,start
5ade5dd9c3cb Updated
boisy
parents:
diff changeset
7
5ade5dd9c3cb Updated
boisy
parents:
diff changeset
8 vsect
5ade5dd9c3cb Updated
boisy
parents:
diff changeset
9 multiplicand rmb 1
5ade5dd9c3cb Updated
boisy
parents:
diff changeset
10 multiplier rmb 1
5ade5dd9c3cb Updated
boisy
parents:
diff changeset
11 endsect
5ade5dd9c3cb Updated
boisy
parents:
diff changeset
12
5ade5dd9c3cb Updated
boisy
parents:
diff changeset
13 * capture two parameters
5ade5dd9c3cb Updated
boisy
parents:
diff changeset
14 start clr multiplicand,u
5ade5dd9c3cb Updated
boisy
parents:
diff changeset
15 clr multiplier,u
5ade5dd9c3cb Updated
boisy
parents:
diff changeset
16
5ade5dd9c3cb Updated
boisy
parents:
diff changeset
17 * if no params, just go straight to multiplication
5ade5dd9c3cb Updated
boisy
parents:
diff changeset
18 lda ,x
5ade5dd9c3cb Updated
boisy
parents:
diff changeset
19 cmpa #C$CR
5ade5dd9c3cb Updated
boisy
parents:
diff changeset
20 beq go
5ade5dd9c3cb Updated
boisy
parents:
diff changeset
21
5ade5dd9c3cb Updated
boisy
parents:
diff changeset
22 * get first number
5ade5dd9c3cb Updated
boisy
parents:
diff changeset
23 lbsr DEC_BIN
5ade5dd9c3cb Updated
boisy
parents:
diff changeset
24 stb multiplicand,u
5ade5dd9c3cb Updated
boisy
parents:
diff changeset
25 leax ,y
5ade5dd9c3cb Updated
boisy
parents:
diff changeset
26 lbsr TO_NON_SP
5ade5dd9c3cb Updated
boisy
parents:
diff changeset
27
5ade5dd9c3cb Updated
boisy
parents:
diff changeset
28 * if no second number, go straight to multiplication
5ade5dd9c3cb Updated
boisy
parents:
diff changeset
29 cmpb #C$CR
5ade5dd9c3cb Updated
boisy
parents:
diff changeset
30 beq go
5ade5dd9c3cb Updated
boisy
parents:
diff changeset
31 lbsr DEC_BIN
5ade5dd9c3cb Updated
boisy
parents:
diff changeset
32 stb multiplier,u
5ade5dd9c3cb Updated
boisy
parents:
diff changeset
33
5ade5dd9c3cb Updated
boisy
parents:
diff changeset
34 go
5ade5dd9c3cb Updated
boisy
parents:
diff changeset
35 orcc #IntMasks
5ade5dd9c3cb Updated
boisy
parents:
diff changeset
36 top
5ade5dd9c3cb Updated
boisy
parents:
diff changeset
37 ldd multiplicand,u
5ade5dd9c3cb Updated
boisy
parents:
diff changeset
38 mul
5ade5dd9c3cb Updated
boisy
parents:
diff changeset
39 ldd multiplicand,u
5ade5dd9c3cb Updated
boisy
parents:
diff changeset
40 mul
5ade5dd9c3cb Updated
boisy
parents:
diff changeset
41 ldd multiplicand,u
5ade5dd9c3cb Updated
boisy
parents:
diff changeset
42 mul
5ade5dd9c3cb Updated
boisy
parents:
diff changeset
43 ldd multiplicand,u
5ade5dd9c3cb Updated
boisy
parents:
diff changeset
44 mul
5ade5dd9c3cb Updated
boisy
parents:
diff changeset
45 ldd multiplicand,u
5ade5dd9c3cb Updated
boisy
parents:
diff changeset
46 mul
5ade5dd9c3cb Updated
boisy
parents:
diff changeset
47 ldd multiplicand,u
5ade5dd9c3cb Updated
boisy
parents:
diff changeset
48 mul
5ade5dd9c3cb Updated
boisy
parents:
diff changeset
49 ldd multiplicand,u
5ade5dd9c3cb Updated
boisy
parents:
diff changeset
50 mul
5ade5dd9c3cb Updated
boisy
parents:
diff changeset
51 ldd multiplicand,u
5ade5dd9c3cb Updated
boisy
parents:
diff changeset
52 mul
5ade5dd9c3cb Updated
boisy
parents:
diff changeset
53 ldd multiplicand,u
5ade5dd9c3cb Updated
boisy
parents:
diff changeset
54 mul
5ade5dd9c3cb Updated
boisy
parents:
diff changeset
55 ldd multiplicand,u
5ade5dd9c3cb Updated
boisy
parents:
diff changeset
56 mul
5ade5dd9c3cb Updated
boisy
parents:
diff changeset
57 ldd multiplicand,u
5ade5dd9c3cb Updated
boisy
parents:
diff changeset
58 mul
5ade5dd9c3cb Updated
boisy
parents:
diff changeset
59 ldd multiplicand,u
5ade5dd9c3cb Updated
boisy
parents:
diff changeset
60 mul
5ade5dd9c3cb Updated
boisy
parents:
diff changeset
61 ldd multiplicand,u
5ade5dd9c3cb Updated
boisy
parents:
diff changeset
62 mul
5ade5dd9c3cb Updated
boisy
parents:
diff changeset
63 ldd multiplicand,u
5ade5dd9c3cb Updated
boisy
parents:
diff changeset
64 mul
5ade5dd9c3cb Updated
boisy
parents:
diff changeset
65 ldd multiplicand,u
5ade5dd9c3cb Updated
boisy
parents:
diff changeset
66 mul
5ade5dd9c3cb Updated
boisy
parents:
diff changeset
67 ldd multiplicand,u
5ade5dd9c3cb Updated
boisy
parents:
diff changeset
68 mul
5ade5dd9c3cb Updated
boisy
parents:
diff changeset
69 ldd multiplicand,u
5ade5dd9c3cb Updated
boisy
parents:
diff changeset
70 mul
5ade5dd9c3cb Updated
boisy
parents:
diff changeset
71 ldd multiplicand,u
5ade5dd9c3cb Updated
boisy
parents:
diff changeset
72 mul
5ade5dd9c3cb Updated
boisy
parents:
diff changeset
73 ldd multiplicand,u
5ade5dd9c3cb Updated
boisy
parents:
diff changeset
74 mul
5ade5dd9c3cb Updated
boisy
parents:
diff changeset
75 ldd multiplicand,u
5ade5dd9c3cb Updated
boisy
parents:
diff changeset
76 mul
5ade5dd9c3cb Updated
boisy
parents:
diff changeset
77 ldd multiplicand,u
5ade5dd9c3cb Updated
boisy
parents:
diff changeset
78 mul
5ade5dd9c3cb Updated
boisy
parents:
diff changeset
79 ldd multiplicand,u
5ade5dd9c3cb Updated
boisy
parents:
diff changeset
80 mul
5ade5dd9c3cb Updated
boisy
parents:
diff changeset
81 ldd multiplicand,u
5ade5dd9c3cb Updated
boisy
parents:
diff changeset
82 mul
5ade5dd9c3cb Updated
boisy
parents:
diff changeset
83 ldd multiplicand,u
5ade5dd9c3cb Updated
boisy
parents:
diff changeset
84 mul
5ade5dd9c3cb Updated
boisy
parents:
diff changeset
85 ldd multiplicand,u
5ade5dd9c3cb Updated
boisy
parents:
diff changeset
86 mul
5ade5dd9c3cb Updated
boisy
parents:
diff changeset
87 ldd multiplicand,u
5ade5dd9c3cb Updated
boisy
parents:
diff changeset
88 mul
5ade5dd9c3cb Updated
boisy
parents:
diff changeset
89 ldd multiplicand,u
5ade5dd9c3cb Updated
boisy
parents:
diff changeset
90 mul
5ade5dd9c3cb Updated
boisy
parents:
diff changeset
91 ldd multiplicand,u
5ade5dd9c3cb Updated
boisy
parents:
diff changeset
92 mul
5ade5dd9c3cb Updated
boisy
parents:
diff changeset
93 ldd multiplicand,u
5ade5dd9c3cb Updated
boisy
parents:
diff changeset
94 mul
5ade5dd9c3cb Updated
boisy
parents:
diff changeset
95 ldd multiplicand,u
5ade5dd9c3cb Updated
boisy
parents:
diff changeset
96 mul
5ade5dd9c3cb Updated
boisy
parents:
diff changeset
97 ldd multiplicand,u
5ade5dd9c3cb Updated
boisy
parents:
diff changeset
98 mul
5ade5dd9c3cb Updated
boisy
parents:
diff changeset
99 ldd multiplicand,u
5ade5dd9c3cb Updated
boisy
parents:
diff changeset
100 mul
5ade5dd9c3cb Updated
boisy
parents:
diff changeset
101 ldd multiplicand,u
5ade5dd9c3cb Updated
boisy
parents:
diff changeset
102 mul
5ade5dd9c3cb Updated
boisy
parents:
diff changeset
103 ldd multiplicand,u
5ade5dd9c3cb Updated
boisy
parents:
diff changeset
104 mul
5ade5dd9c3cb Updated
boisy
parents:
diff changeset
105 ldd multiplicand,u
5ade5dd9c3cb Updated
boisy
parents:
diff changeset
106 mul
5ade5dd9c3cb Updated
boisy
parents:
diff changeset
107 ldd multiplicand,u
5ade5dd9c3cb Updated
boisy
parents:
diff changeset
108 mul
5ade5dd9c3cb Updated
boisy
parents:
diff changeset
109 ldd multiplicand,u
5ade5dd9c3cb Updated
boisy
parents:
diff changeset
110 mul
5ade5dd9c3cb Updated
boisy
parents:
diff changeset
111 ldd multiplicand,u
5ade5dd9c3cb Updated
boisy
parents:
diff changeset
112 mul
5ade5dd9c3cb Updated
boisy
parents:
diff changeset
113 ldd multiplicand,u
5ade5dd9c3cb Updated
boisy
parents:
diff changeset
114 mul
5ade5dd9c3cb Updated
boisy
parents:
diff changeset
115 ldd multiplicand,u
5ade5dd9c3cb Updated
boisy
parents:
diff changeset
116 mul
5ade5dd9c3cb Updated
boisy
parents:
diff changeset
117 ldd multiplicand,u
5ade5dd9c3cb Updated
boisy
parents:
diff changeset
118 mul
5ade5dd9c3cb Updated
boisy
parents:
diff changeset
119 ldd multiplicand,u
5ade5dd9c3cb Updated
boisy
parents:
diff changeset
120 mul
5ade5dd9c3cb Updated
boisy
parents:
diff changeset
121 ldd multiplicand,u
5ade5dd9c3cb Updated
boisy
parents:
diff changeset
122 mul
5ade5dd9c3cb Updated
boisy
parents:
diff changeset
123 ldd multiplicand,u
5ade5dd9c3cb Updated
boisy
parents:
diff changeset
124 mul
5ade5dd9c3cb Updated
boisy
parents:
diff changeset
125 ldd multiplicand,u
5ade5dd9c3cb Updated
boisy
parents:
diff changeset
126 mul
5ade5dd9c3cb Updated
boisy
parents:
diff changeset
127 ldd multiplicand,u
5ade5dd9c3cb Updated
boisy
parents:
diff changeset
128 mul
5ade5dd9c3cb Updated
boisy
parents:
diff changeset
129 ldd multiplicand,u
5ade5dd9c3cb Updated
boisy
parents:
diff changeset
130 mul
5ade5dd9c3cb Updated
boisy
parents:
diff changeset
131 ldd multiplicand,u
5ade5dd9c3cb Updated
boisy
parents:
diff changeset
132 mul
5ade5dd9c3cb Updated
boisy
parents:
diff changeset
133 ldd multiplicand,u
5ade5dd9c3cb Updated
boisy
parents:
diff changeset
134 mul
5ade5dd9c3cb Updated
boisy
parents:
diff changeset
135 ldd multiplicand,u
5ade5dd9c3cb Updated
boisy
parents:
diff changeset
136 mul
5ade5dd9c3cb Updated
boisy
parents:
diff changeset
137 ldd multiplicand,u
5ade5dd9c3cb Updated
boisy
parents:
diff changeset
138 mul
5ade5dd9c3cb Updated
boisy
parents:
diff changeset
139 ldd multiplicand,u
5ade5dd9c3cb Updated
boisy
parents:
diff changeset
140 mul
5ade5dd9c3cb Updated
boisy
parents:
diff changeset
141 ldd multiplicand,u
5ade5dd9c3cb Updated
boisy
parents:
diff changeset
142 mul
5ade5dd9c3cb Updated
boisy
parents:
diff changeset
143 ldd multiplicand,u
5ade5dd9c3cb Updated
boisy
parents:
diff changeset
144 mul
5ade5dd9c3cb Updated
boisy
parents:
diff changeset
145 ldd multiplicand,u
5ade5dd9c3cb Updated
boisy
parents:
diff changeset
146 mul
5ade5dd9c3cb Updated
boisy
parents:
diff changeset
147 ldd multiplicand,u
5ade5dd9c3cb Updated
boisy
parents:
diff changeset
148 mul
5ade5dd9c3cb Updated
boisy
parents:
diff changeset
149 ldd multiplicand,u
5ade5dd9c3cb Updated
boisy
parents:
diff changeset
150 mul
5ade5dd9c3cb Updated
boisy
parents:
diff changeset
151 ldd multiplicand,u
5ade5dd9c3cb Updated
boisy
parents:
diff changeset
152 mul
5ade5dd9c3cb Updated
boisy
parents:
diff changeset
153 ldd multiplicand,u
5ade5dd9c3cb Updated
boisy
parents:
diff changeset
154 mul
5ade5dd9c3cb Updated
boisy
parents:
diff changeset
155 ldd multiplicand,u
5ade5dd9c3cb Updated
boisy
parents:
diff changeset
156 mul
5ade5dd9c3cb Updated
boisy
parents:
diff changeset
157 ldd multiplicand,u
5ade5dd9c3cb Updated
boisy
parents:
diff changeset
158 mul
5ade5dd9c3cb Updated
boisy
parents:
diff changeset
159 ldd multiplicand,u
5ade5dd9c3cb Updated
boisy
parents:
diff changeset
160 mul
5ade5dd9c3cb Updated
boisy
parents:
diff changeset
161 ldd multiplicand,u
5ade5dd9c3cb Updated
boisy
parents:
diff changeset
162 mul
5ade5dd9c3cb Updated
boisy
parents:
diff changeset
163 ldd multiplicand,u
5ade5dd9c3cb Updated
boisy
parents:
diff changeset
164 mul
5ade5dd9c3cb Updated
boisy
parents:
diff changeset
165 ldd multiplicand,u
5ade5dd9c3cb Updated
boisy
parents:
diff changeset
166 mul
5ade5dd9c3cb Updated
boisy
parents:
diff changeset
167 ldd multiplicand,u
5ade5dd9c3cb Updated
boisy
parents:
diff changeset
168 mul
5ade5dd9c3cb Updated
boisy
parents:
diff changeset
169 ldd multiplicand,u
5ade5dd9c3cb Updated
boisy
parents:
diff changeset
170 mul
5ade5dd9c3cb Updated
boisy
parents:
diff changeset
171 ldd multiplicand,u
5ade5dd9c3cb Updated
boisy
parents:
diff changeset
172 mul
5ade5dd9c3cb Updated
boisy
parents:
diff changeset
173 ldd multiplicand,u
5ade5dd9c3cb Updated
boisy
parents:
diff changeset
174 mul
5ade5dd9c3cb Updated
boisy
parents:
diff changeset
175 ldd multiplicand,u
5ade5dd9c3cb Updated
boisy
parents:
diff changeset
176 mul
5ade5dd9c3cb Updated
boisy
parents:
diff changeset
177 ldd multiplicand,u
5ade5dd9c3cb Updated
boisy
parents:
diff changeset
178 mul
5ade5dd9c3cb Updated
boisy
parents:
diff changeset
179 ldd multiplicand,u
5ade5dd9c3cb Updated
boisy
parents:
diff changeset
180 mul
5ade5dd9c3cb Updated
boisy
parents:
diff changeset
181 ldd multiplicand,u
5ade5dd9c3cb Updated
boisy
parents:
diff changeset
182 mul
5ade5dd9c3cb Updated
boisy
parents:
diff changeset
183 ldd multiplicand,u
5ade5dd9c3cb Updated
boisy
parents:
diff changeset
184 mul
5ade5dd9c3cb Updated
boisy
parents:
diff changeset
185 ldd multiplicand,u
5ade5dd9c3cb Updated
boisy
parents:
diff changeset
186 mul
5ade5dd9c3cb Updated
boisy
parents:
diff changeset
187 ldd multiplicand,u
5ade5dd9c3cb Updated
boisy
parents:
diff changeset
188 mul
5ade5dd9c3cb Updated
boisy
parents:
diff changeset
189 ldd multiplicand,u
5ade5dd9c3cb Updated
boisy
parents:
diff changeset
190 mul
5ade5dd9c3cb Updated
boisy
parents:
diff changeset
191 ldd multiplicand,u
5ade5dd9c3cb Updated
boisy
parents:
diff changeset
192 mul
5ade5dd9c3cb Updated
boisy
parents:
diff changeset
193 ldd multiplicand,u
5ade5dd9c3cb Updated
boisy
parents:
diff changeset
194 mul
5ade5dd9c3cb Updated
boisy
parents:
diff changeset
195 ldd multiplicand,u
5ade5dd9c3cb Updated
boisy
parents:
diff changeset
196 mul
5ade5dd9c3cb Updated
boisy
parents:
diff changeset
197 ldd multiplicand,u
5ade5dd9c3cb Updated
boisy
parents:
diff changeset
198 mul
5ade5dd9c3cb Updated
boisy
parents:
diff changeset
199 ldd multiplicand,u
5ade5dd9c3cb Updated
boisy
parents:
diff changeset
200 mul
5ade5dd9c3cb Updated
boisy
parents:
diff changeset
201 ldd multiplicand,u
5ade5dd9c3cb Updated
boisy
parents:
diff changeset
202 mul
5ade5dd9c3cb Updated
boisy
parents:
diff changeset
203 ldd multiplicand,u
5ade5dd9c3cb Updated
boisy
parents:
diff changeset
204 mul
5ade5dd9c3cb Updated
boisy
parents:
diff changeset
205 ldd multiplicand,u
5ade5dd9c3cb Updated
boisy
parents:
diff changeset
206 mul
5ade5dd9c3cb Updated
boisy
parents:
diff changeset
207 ldd multiplicand,u
5ade5dd9c3cb Updated
boisy
parents:
diff changeset
208 mul
5ade5dd9c3cb Updated
boisy
parents:
diff changeset
209 ldd multiplicand,u
5ade5dd9c3cb Updated
boisy
parents:
diff changeset
210 mul
5ade5dd9c3cb Updated
boisy
parents:
diff changeset
211 ldd multiplicand,u
5ade5dd9c3cb Updated
boisy
parents:
diff changeset
212 mul
5ade5dd9c3cb Updated
boisy
parents:
diff changeset
213 ldd multiplicand,u
5ade5dd9c3cb Updated
boisy
parents:
diff changeset
214 mul
5ade5dd9c3cb Updated
boisy
parents:
diff changeset
215 ldd multiplicand,u
5ade5dd9c3cb Updated
boisy
parents:
diff changeset
216 mul
5ade5dd9c3cb Updated
boisy
parents:
diff changeset
217 ldd multiplicand,u
5ade5dd9c3cb Updated
boisy
parents:
diff changeset
218 mul
5ade5dd9c3cb Updated
boisy
parents:
diff changeset
219 ldd multiplicand,u
5ade5dd9c3cb Updated
boisy
parents:
diff changeset
220 mul
5ade5dd9c3cb Updated
boisy
parents:
diff changeset
221 ldd multiplicand,u
5ade5dd9c3cb Updated
boisy
parents:
diff changeset
222 mul
5ade5dd9c3cb Updated
boisy
parents:
diff changeset
223 ldd multiplicand,u
5ade5dd9c3cb Updated
boisy
parents:
diff changeset
224 mul
5ade5dd9c3cb Updated
boisy
parents:
diff changeset
225 ldd multiplicand,u
5ade5dd9c3cb Updated
boisy
parents:
diff changeset
226 mul
5ade5dd9c3cb Updated
boisy
parents:
diff changeset
227 ldd multiplicand,u
5ade5dd9c3cb Updated
boisy
parents:
diff changeset
228 mul
5ade5dd9c3cb Updated
boisy
parents:
diff changeset
229 ldd multiplicand,u
5ade5dd9c3cb Updated
boisy
parents:
diff changeset
230 mul
5ade5dd9c3cb Updated
boisy
parents:
diff changeset
231 ldd multiplicand,u
5ade5dd9c3cb Updated
boisy
parents:
diff changeset
232 mul
5ade5dd9c3cb Updated
boisy
parents:
diff changeset
233 ldd multiplicand,u
5ade5dd9c3cb Updated
boisy
parents:
diff changeset
234 mul
5ade5dd9c3cb Updated
boisy
parents:
diff changeset
235 ldd multiplicand,u
5ade5dd9c3cb Updated
boisy
parents:
diff changeset
236 mul
5ade5dd9c3cb Updated
boisy
parents:
diff changeset
237 lbra top
5ade5dd9c3cb Updated
boisy
parents:
diff changeset
238
5ade5dd9c3cb Updated
boisy
parents:
diff changeset
239
5ade5dd9c3cb Updated
boisy
parents:
diff changeset
240
5ade5dd9c3cb Updated
boisy
parents:
diff changeset
241 endsect