1 1 ;--------------------------------------------------------
2 2 ; File Created by SDCC : FreeWare ANSI-C Compiler
3 3 ; Version 2.1.9Ga Sun Jan 16 17:31:35 2000
5 5 ;--------------------------------------------------------
7 7 ;--------------------------------------------------------
8 8 ; publics variables in this module
9 9 ;--------------------------------------------------------
11 11 ;--------------------------------------------------------
12 12 ; special function registers
13 13 ;--------------------------------------------------------
14 14 ;--------------------------------------------------------
15 15 ; special function bits
16 16 ;--------------------------------------------------------
17 17 ;--------------------------------------------------------
18 18 ; internal ram data
19 19 ;--------------------------------------------------------
21 0000 21 ___ulong2fs_sloc0_1_0:
23 0002 23 ___ulong2fs_sloc1_1_0:
25 25 ;--------------------------------------------------------
26 26 ; overlayable items in internal ram
27 27 ;--------------------------------------------------------
28 28 .area OSEG (OVR,DATA)
29 29 ;--------------------------------------------------------
30 30 ; indirectly addressable internal ram data
31 31 ;--------------------------------------------------------
33 33 ;--------------------------------------------------------
35 35 ;--------------------------------------------------------
37 37 ;--------------------------------------------------------
38 38 ; external ram data
39 39 ;--------------------------------------------------------
41 0000 41 ___ulong2fs_a_1_1:
43 0004 43 ___ulong2fs_sign_1_1:
45 0008 45 ___ulong2fs_fl_1_1:
47 000C 47 ___ulong2fs_a1_1_1:
49 49 ;--------------------------------------------------------
50 50 ; global & static initialisations
51 51 ;--------------------------------------------------------
52 52 .area GSINIT (CODE)
53 53 ;--------------------------------------------------------
55 55 ;--------------------------------------------------------
57 0000 57 G$__ulong2fs$0$0 ==.
59 59 ; -----------------------------------------
60 60 ; function __ulong2fs
61 61 ; -----------------------------------------
72 0000 C0 E0 72 push acc
74 0004 C0 83 74 push dph
75 0006 C0 82 75 push dpl
76 0008 90s00r00 76 mov dptr,#___ulong2fs_a_1_1
78 000D F0 78 movx @dptr,a
81 0011 F0 81 movx @dptr,a
84 0015 F0 84 movx @dptr,a
87 0019 F0 87 movx @dptr,a
89 001A 90s00r04 89 mov dptr,#___ulong2fs_sign_1_1
94 0021 F0 94 movx @dptr,a
95 0022 12s00r00 95 lcall __decdptr
96 0025 F0 96 movx @dptr,a
97 0026 12s00r00 97 lcall __decdptr
98 0029 F0 98 movx @dptr,a
99 002A 12s00r00 99 lcall __decdptr
100 002D F0 100 movx @dptr,a
102 002E 90s00r00 102 mov dptr,#___ulong2fs_a_1_1
103 0031 E0 103 movx a,@dptr
106 0034 E0 106 movx a,@dptr
109 0037 E0 109 movx a,@dptr
112 003A E0 112 movx a,@dptr
114 003C 90s00r0C 114 mov dptr,#___ulong2fs_a1_1_1
116 0040 F0 116 movx @dptr,a
119 0043 F0 119 movx @dptr,a
122 0046 F0 122 movx @dptr,a
125 0049 F0 125 movx @dptr,a
131 131 ; Peephole 109 removed ljmp by inverse jump logic
132 004E 70 23 132 jnz 00102$
135 0050 90s00r08 135 mov dptr,#(___ulong2fs_fl_1_1)
136 136 ; Peephole 101 removed redundant mov
137 137 ; Peephole 180 changed mov to clr
139 0054 F0 139 movx @dptr,a
141 0056 F0 141 movx @dptr,a
143 143 ; Peephole 101 removed redundant mov
144 144 ; Peephole 180 changed mov to clr
146 0059 F0 146 movx @dptr,a
148 005B F0 148 movx @dptr,a
150 005C 90s00r08 150 mov dptr,#(___ulong2fs_fl_1_1)
151 005F E0 151 movx a,@dptr
154 0062 E0 154 movx a,@dptr
157 0065 E0 157 movx a,@dptr
160 0068 E0 160 movx a,@dptr
161 161 ; Peephole 191 removed redundant mov
163 006A 8E 82 163 mov dpl,r6
164 006C 8F 83 164 mov dph,r7
165 006E 88 F0 165 mov b,r0
166 0070 02s01r4F 166 ljmp 00108$
170 170 ; Peephole 108 removed ljmp by inverse jump logic
171 0074 50 21 171 jnc 00113$
174 0076 90s00r04 174 mov dptr,#___ulong2fs_sign_1_1
175 175 ; Peephole 101 removed redundant mov
176 176 ; Peephole 180 changed mov to clr
178 007A F0 178 movx @dptr,a
180 007C F0 180 movx @dptr,a
182 182 ; Peephole 180 changed mov to clr
184 007F F0 184 movx @dptr,a
186 0081 74 80 186 mov a,#0x80
187 0083 F0 187 movx @dptr,a
189 0084 90s00r0C 189 mov dptr,#___ulong2fs_a1_1_1
192 0089 9A 192 subb a,r2
193 008A F0 193 movx @dptr,a
195 008C 9B 195 subb a,r3
197 008E F0 197 movx @dptr,a
199 0090 9C 199 subb a,r4
201 0092 F0 201 movx @dptr,a
203 0094 9D 203 subb a,r5
205 0096 F0 205 movx @dptr,a
209 0098 F5*01 209 mov (___ulong2fs_sloc0_1_0 + 1),a
210 009A 75*00 96 210 mov ___ulong2fs_sloc0_1_0,#0x96
212 009D 90s00r0C 212 mov dptr,#___ulong2fs_a1_1_1
213 00A0 E0 213 movx a,@dptr
216 00A3 E0 216 movx a,@dptr
219 00A6 E0 219 movx a,@dptr
222 00A9 E0 222 movx a,@dptr
226 00AD 94 00 226 subb a,#0x00
228 00B0 94 00 228 subb a,#0x00
230 00B3 94 80 230 subb a,#0x80
232 00B6 94 00 232 subb a,#0x00
233 233 ; Peephole 108 removed ljmp by inverse jump logic
234 00B8 50 27 234 jnc 00107$
236 236 ; _ulong2fs.c 101
238 00BB 25 E0 238 add a,acc
249 00C7 90s00r0C 249 mov dptr,#___ulong2fs_a1_1_1
251 00CB F0 251 movx @dptr,a
254 00CE F0 254 movx @dptr,a
257 00D1 F0 257 movx @dptr,a
260 00D4 F0 260 movx @dptr,a
261 261 ; _ulong2fs.c 102
262 00D5 15*00 262 dec ___ulong2fs_sloc0_1_0
263 00D7 74 FF 263 mov a,#0xff
264 00D9 B5*00 02 264 cjne a,___ulong2fs_sloc0_1_0,00117$
265 00DC 15*01 265 dec (___ulong2fs_sloc0_1_0 + 1)
267 00DE 02s00r9D 267 ljmp 00105$
269 269 ; _ulong2fs.c 105
270 00E1 53 06 7F 270 anl ar6,#0x7f
271 271 ; _ulong2fs.c 107
272 00E4 AA*00 272 mov r2,___ulong2fs_sloc0_1_0
273 00E6 AB*01 273 mov r3,(___ulong2fs_sloc0_1_0 + 1)
274 00E8 78 00 274 mov r0,#0x00
275 00EA 79 00 275 mov r1,#0x00
276 00EC 8A*04 276 mov (___ulong2fs_sloc1_1_0 + 2),r2
278 00EF 54 01 278 anl a,#0x01
279 00F1 A2 E0 279 mov c,acc.0
280 00F3 C5*04 280 xch a,(___ulong2fs_sloc1_1_0 + 2)
282 00F6 C5*04 282 xch a,(___ulong2fs_sloc1_1_0 + 2)
284 00F9 C5*04 284 xch a,(___ulong2fs_sloc1_1_0 + 2)
285 00FB F5*05 285 mov (___ulong2fs_sloc1_1_0 + 3),a
286 00FD 75*03 00 286 mov (___ulong2fs_sloc1_1_0 + 1),#0x00
287 0100 75*02 00 287 mov ___ulong2fs_sloc1_1_0,#0x00
288 0103 90s00r04 288 mov dptr,#___ulong2fs_sign_1_1
289 0106 E0 289 movx a,@dptr
292 0109 E0 292 movx a,@dptr
295 010C E0 295 movx a,@dptr
298 010F E0 298 movx a,@dptr
300 0111 E5*02 300 mov a,___ulong2fs_sloc1_1_0
301 0113 42 02 301 orl ar2,a
302 0115 E5*03 302 mov a,(___ulong2fs_sloc1_1_0 + 1)
303 0117 42 03 303 orl ar3,a
304 0119 E5*04 304 mov a,(___ulong2fs_sloc1_1_0 + 2)
305 011B 42 00 305 orl ar0,a
306 011D E5*05 306 mov a,(___ulong2fs_sloc1_1_0 + 3)
307 011F 42 01 307 orl ar1,a
309 0122 42 04 309 orl ar4,a
311 0125 42 05 311 orl ar5,a
313 0128 42 06 313 orl ar6,a
315 012B 42 07 315 orl ar7,a
316 012D 90s00r08 316 mov dptr,#(___ulong2fs_fl_1_1)
318 0131 F0 318 movx @dptr,a
321 0134 F0 321 movx @dptr,a
324 0137 F0 324 movx @dptr,a
327 013A F0 327 movx @dptr,a
328 328 ; _ulong2fs.c 109
329 013B 90s00r08 329 mov dptr,#(___ulong2fs_fl_1_1)
330 013E E0 330 movx a,@dptr
333 0141 E0 333 movx a,@dptr
336 0144 E0 336 movx a,@dptr
339 0147 E0 339 movx a,@dptr
340 340 ; Peephole 191 removed redundant mov
342 0149 8A 82 342 mov dpl,r2
343 014B 8B 83 343 mov dph,r3
344 014D 8C F0 344 mov b,r4
346 014F 346 C$_ulong2fs.c$110$1$1 ==.
347 014F 347 XG$__ulong2fs$0$0 ==.
349 349 .area CSEG (CODE)