1 1 ;--------------------------------------------------------
2 2 ; File Created by SDCC : FreeWare ANSI-C Compiler
3 3 ; Version 2.1.9Ga Sun Jan 16 17:31:22 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 ___char2fs_sloc0_1_0:
23 0002 23 ___char2fs_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 ___char2fs_a_1_1:
43 0001 43 ___char2fs_sign_1_1:
45 0005 45 ___char2fs_fl_1_1:
47 0009 47 ___char2fs_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$__char2fs$0$0 ==.
59 59 ; -----------------------------------------
60 60 ; function __char2fs
61 61 ; -----------------------------------------
72 0000 C0 82 72 push dpl
73 0002 90s00r00 73 mov dptr,#___char2fs_a_1_1
75 0007 F0 75 movx @dptr,a
77 0008 90s00r01 77 mov dptr,#___char2fs_sign_1_1
82 000F F0 82 movx @dptr,a
83 0010 12s00r00 83 lcall __decdptr
84 0013 F0 84 movx @dptr,a
85 0014 12s00r00 85 lcall __decdptr
86 0017 F0 86 movx @dptr,a
87 0018 12s00r00 87 lcall __decdptr
88 001B F0 88 movx @dptr,a
90 001C 90s00r00 90 mov dptr,#___char2fs_a_1_1
91 001F E0 91 movx a,@dptr
92 92 ; Peephole 105 removed redundant mov
95 0022 95 E0 95 subb a,acc
99 0027 90s00r09 99 mov dptr,#___char2fs_a1_1_1
101 002B F0 101 movx @dptr,a
104 002E F0 104 movx @dptr,a
107 0031 F0 107 movx @dptr,a
110 0034 F0 110 movx @dptr,a
116 116 ; Peephole 109 removed ljmp by inverse jump logic
117 0039 70 23 117 jnz 00102$
120 003B 90s00r05 120 mov dptr,#(___char2fs_fl_1_1)
121 121 ; Peephole 101 removed redundant mov
122 122 ; Peephole 180 changed mov to clr
124 003F F0 124 movx @dptr,a
126 0041 F0 126 movx @dptr,a
128 128 ; Peephole 101 removed redundant mov
129 129 ; Peephole 180 changed mov to clr
131 0044 F0 131 movx @dptr,a
133 0046 F0 133 movx @dptr,a
135 0047 90s00r05 135 mov dptr,#(___char2fs_fl_1_1)
136 004A E0 136 movx a,@dptr
139 004D E0 139 movx a,@dptr
142 0050 E0 142 movx a,@dptr
145 0053 E0 145 movx a,@dptr
146 146 ; Peephole 191 removed redundant mov
148 0055 8E 82 148 mov dpl,r6
149 0057 8F 83 149 mov dph,r7
150 0059 88 F0 150 mov b,r0
151 005B 02s01r3B 151 ljmp 00108$
155 155 ; Peephole 111 removed ljmp by inverse jump logic
156 005F 30 E7 21 156 jnb acc.7,00113$
159 0062 90s00r01 159 mov dptr,#___char2fs_sign_1_1
160 160 ; Peephole 101 removed redundant mov
161 161 ; Peephole 180 changed mov to clr
163 0066 F0 163 movx @dptr,a
165 0068 F0 165 movx @dptr,a
167 167 ; Peephole 180 changed mov to clr
169 006B F0 169 movx @dptr,a
171 006D 74 80 171 mov a,#0x80
172 006F F0 172 movx @dptr,a
174 0070 90s00r09 174 mov dptr,#___char2fs_a1_1_1
177 0075 9A 177 subb a,r2
178 0076 F0 178 movx @dptr,a
180 0078 9B 180 subb a,r3
182 007A F0 182 movx @dptr,a
184 007C 9C 184 subb a,r4
186 007E F0 186 movx @dptr,a
188 0080 9D 188 subb a,r5
190 0082 F0 190 movx @dptr,a
194 0084 F5*01 194 mov (___char2fs_sloc0_1_0 + 1),a
195 0086 75*00 96 195 mov ___char2fs_sloc0_1_0,#0x96
197 0089 90s00r09 197 mov dptr,#___char2fs_a1_1_1
198 008C E0 198 movx a,@dptr
201 008F E0 201 movx a,@dptr
204 0092 E0 204 movx a,@dptr
207 0095 E0 207 movx a,@dptr
211 0099 94 00 211 subb a,#0x00
213 009C 94 00 213 subb a,#0x00
215 009F 94 80 215 subb a,#0x80
217 00A2 94 00 217 subb a,#0x00
218 218 ; Peephole 108 removed ljmp by inverse jump logic
219 00A4 50 27 219 jnc 00107$
223 00A7 25 E0 223 add a,acc
234 00B3 90s00r09 234 mov dptr,#___char2fs_a1_1_1
236 00B7 F0 236 movx @dptr,a
239 00BA F0 239 movx @dptr,a
242 00BD F0 242 movx @dptr,a
245 00C0 F0 245 movx @dptr,a
247 00C1 15*00 247 dec ___char2fs_sloc0_1_0
248 00C3 74 FF 248 mov a,#0xff
249 00C5 B5*00 02 249 cjne a,___char2fs_sloc0_1_0,00117$
250 00C8 15*01 250 dec (___char2fs_sloc0_1_0 + 1)
252 00CA 02s00r89 252 ljmp 00105$
255 00CD 53 06 7F 255 anl ar6,#0x7f
257 00D0 AA*00 257 mov r2,___char2fs_sloc0_1_0
258 00D2 AB*01 258 mov r3,(___char2fs_sloc0_1_0 + 1)
259 00D4 78 00 259 mov r0,#0x00
260 00D6 79 00 260 mov r1,#0x00
261 00D8 8A*04 261 mov (___char2fs_sloc1_1_0 + 2),r2
263 00DB 54 01 263 anl a,#0x01
264 00DD A2 E0 264 mov c,acc.0
265 00DF C5*04 265 xch a,(___char2fs_sloc1_1_0 + 2)
267 00E2 C5*04 267 xch a,(___char2fs_sloc1_1_0 + 2)
269 00E5 C5*04 269 xch a,(___char2fs_sloc1_1_0 + 2)
270 00E7 F5*05 270 mov (___char2fs_sloc1_1_0 + 3),a
271 00E9 75*03 00 271 mov (___char2fs_sloc1_1_0 + 1),#0x00
272 00EC 75*02 00 272 mov ___char2fs_sloc1_1_0,#0x00
273 00EF 90s00r01 273 mov dptr,#___char2fs_sign_1_1
274 00F2 E0 274 movx a,@dptr
277 00F5 E0 277 movx a,@dptr
280 00F8 E0 280 movx a,@dptr
283 00FB E0 283 movx a,@dptr
285 00FD E5*02 285 mov a,___char2fs_sloc1_1_0
286 00FF 42 02 286 orl ar2,a
287 0101 E5*03 287 mov a,(___char2fs_sloc1_1_0 + 1)
288 0103 42 03 288 orl ar3,a
289 0105 E5*04 289 mov a,(___char2fs_sloc1_1_0 + 2)
290 0107 42 00 290 orl ar0,a
291 0109 E5*05 291 mov a,(___char2fs_sloc1_1_0 + 3)
292 010B 42 01 292 orl ar1,a
294 010E 42 04 294 orl ar4,a
296 0111 42 05 296 orl ar5,a
298 0114 42 06 298 orl ar6,a
300 0117 42 07 300 orl ar7,a
301 0119 90s00r05 301 mov dptr,#(___char2fs_fl_1_1)
303 011D F0 303 movx @dptr,a
306 0120 F0 306 movx @dptr,a
309 0123 F0 309 movx @dptr,a
312 0126 F0 312 movx @dptr,a
314 0127 90s00r05 314 mov dptr,#(___char2fs_fl_1_1)
315 012A E0 315 movx a,@dptr
318 012D E0 318 movx a,@dptr
321 0130 E0 321 movx a,@dptr
324 0133 E0 324 movx a,@dptr
325 325 ; Peephole 191 removed redundant mov
327 0135 8A 82 327 mov dpl,r2
328 0137 8B 83 328 mov dph,r3
329 0139 8C F0 329 mov b,r4
331 013B 331 C$_char2fs.c$110$1$1 ==.
332 013B 332 XG$__char2fs$0$0 ==.
334 334 .area CSEG (CODE)