1 ;-------------------------------------------------------- 2 ; File Created by SDCC : FreeWare ANSI-C Compiler 3 ; Version 2.1.9Ga Sun Jan 16 17:31:29 2000 4 5 ;-------------------------------------------------------- 6 .module _int2fs 7 ;-------------------------------------------------------- 8 ; publics variables in this module 9 ;-------------------------------------------------------- 10 .globl ___int2fs 11 ;-------------------------------------------------------- 12 ; special function registers 13 ;-------------------------------------------------------- 14 ;-------------------------------------------------------- 15 ; special function bits 16 ;-------------------------------------------------------- 17 ;-------------------------------------------------------- 18 ; internal ram data 19 ;-------------------------------------------------------- 20 .area DSEG (DATA) 0000 21 ___int2fs_sloc0_1_0: 0000 22 .ds 0x0002 0002 23 ___int2fs_sloc1_1_0: 0002 24 .ds 0x0004 25 ;-------------------------------------------------------- 26 ; overlayable items in internal ram 27 ;-------------------------------------------------------- 28 .area OSEG (OVR,DATA) 29 ;-------------------------------------------------------- 30 ; indirectly addressable internal ram data 31 ;-------------------------------------------------------- 32 .area ISEG (DATA) 33 ;-------------------------------------------------------- 34 ; bit data 35 ;-------------------------------------------------------- 36 .area BSEG (BIT) 37 ;-------------------------------------------------------- 38 ; external ram data 39 ;-------------------------------------------------------- 40 .area XSEG (XDATA) 0000 41 ___int2fs_a_1_1: 0000 42 .ds 0x0002 0002 43 ___int2fs_sign_1_1: 0002 44 .ds 0x0004 0006 45 ___int2fs_fl_1_1: 0006 46 .ds 0x0004 000A 47 ___int2fs_a1_1_1: 000A 48 .ds 0x0004 49 ;-------------------------------------------------------- 50 ; global & static initialisations 51 ;-------------------------------------------------------- 52 .area GSINIT (CODE) 53 ;-------------------------------------------------------- 54 ; code 55 ;-------------------------------------------------------- 56 .area CSEG (CODE) 0000 57 G$__int2fs$0$0 ==. 58 ; _int2fs.c 80 59 ; ----------------------------------------- 60 ; function __int2fs 61 ; ----------------------------------------- 0000 62 ___int2fs: 0002 63 ar2 = 0x02 0003 64 ar3 = 0x03 0004 65 ar4 = 0x04 0005 66 ar5 = 0x05 0006 67 ar6 = 0x06 0007 68 ar7 = 0x07 0000 69 ar0 = 0x00 0001 70 ar1 = 0x01 71 ; _int2fs.c 110 0000 C0 83 72 push dph 0002 C0 82 73 push dpl 0004 90s00r00 74 mov dptr,#___int2fs_a_1_1 0007 D0 E0 75 pop acc 0009 F0 76 movx @dptr,a 000A D0 E0 77 pop acc 000C A3 78 inc dptr 000D F0 79 movx @dptr,a 80 ; _int2fs.c 82 000E 90s00r02 81 mov dptr,#___int2fs_sign_1_1 0011 E4 82 clr a 0012 A3 83 inc dptr 0013 A3 84 inc dptr 0014 A3 85 inc dptr 0015 F0 86 movx @dptr,a 0016 12s00r00 87 lcall __decdptr 0019 F0 88 movx @dptr,a 001A 12s00r00 89 lcall __decdptr 001D F0 90 movx @dptr,a 001E 12s00r00 91 lcall __decdptr 0021 F0 92 movx @dptr,a 93 ; _int2fs.c 85 0022 90s00r00 94 mov dptr,#___int2fs_a_1_1 0025 E0 95 movx a,@dptr 0026 FA 96 mov r2,a 0027 A3 97 inc dptr 0028 E0 98 movx a,@dptr 99 ; Peephole 105 removed redundant mov 0029 FB 100 mov r3,a 002A 33 101 rlc a 002B 95 E0 102 subb a,acc 002D FC 103 mov r4,a 002E FD 104 mov r5,a 002F 90s00r0A 105 mov dptr,#___int2fs_a1_1_1 0032 EA 106 mov a,r2 0033 F0 107 movx @dptr,a 0034 A3 108 inc dptr 0035 EB 109 mov a,r3 0036 F0 110 movx @dptr,a 0037 A3 111 inc dptr 0038 EC 112 mov a,r4 0039 F0 113 movx @dptr,a 003A A3 114 inc dptr 003B ED 115 mov a,r5 003C F0 116 movx @dptr,a 117 ; _int2fs.c 87 003D EA 118 mov a,r2 003E 4B 119 orl a,r3 003F 4C 120 orl a,r4 0040 4D 121 orl a,r5 122 ; Peephole 109 removed ljmp by inverse jump logic 0041 70 23 123 jnz 00102$ 0043 124 00114$: 125 ; _int2fs.c 89 0043 90s00r06 126 mov dptr,#(___int2fs_fl_1_1) 127 ; Peephole 101 removed redundant mov 128 ; Peephole 180 changed mov to clr 0046 E4 129 clr a 0047 F0 130 movx @dptr,a 0048 A3 131 inc dptr 0049 F0 132 movx @dptr,a 004A A3 133 inc dptr 134 ; Peephole 101 removed redundant mov 135 ; Peephole 180 changed mov to clr 004B E4 136 clr a 004C F0 137 movx @dptr,a 004D A3 138 inc dptr 004E F0 139 movx @dptr,a 140 ; _int2fs.c 90 004F 90s00r06 141 mov dptr,#(___int2fs_fl_1_1) 0052 E0 142 movx a,@dptr 0053 FE 143 mov r6,a 0054 A3 144 inc dptr 0055 E0 145 movx a,@dptr 0056 FF 146 mov r7,a 0057 A3 147 inc dptr 0058 E0 148 movx a,@dptr 0059 F8 149 mov r0,a 005A A3 150 inc dptr 005B E0 151 movx a,@dptr 152 ; Peephole 191 removed redundant mov 005C F9 153 mov r1,a 005D 8E 82 154 mov dpl,r6 005F 8F 83 155 mov dph,r7 0061 88 F0 156 mov b,r0 0063 02s01r43 157 ljmp 00108$ 0066 158 00102$: 159 ; _int2fs.c 93 0066 ED 160 mov a,r5 161 ; Peephole 111 removed ljmp by inverse jump logic 0067 30 E7 21 162 jnb acc.7,00113$ 006A 163 00115$: 164 ; _int2fs.c 95 006A 90s00r02 165 mov dptr,#___int2fs_sign_1_1 166 ; Peephole 101 removed redundant mov 167 ; Peephole 180 changed mov to clr 006D E4 168 clr a 006E F0 169 movx @dptr,a 006F A3 170 inc dptr 0070 F0 171 movx @dptr,a 0071 A3 172 inc dptr 173 ; Peephole 180 changed mov to clr 0072 E4 174 clr a 0073 F0 175 movx @dptr,a 0074 A3 176 inc dptr 0075 74 80 177 mov a,#0x80 0077 F0 178 movx @dptr,a 179 ; _int2fs.c 96 0078 90s00r0A 180 mov dptr,#___int2fs_a1_1_1 007B C3 181 clr c 007C E4 182 clr a 007D 9A 183 subb a,r2 007E F0 184 movx @dptr,a 007F E4 185 clr a 0080 9B 186 subb a,r3 0081 A3 187 inc dptr 0082 F0 188 movx @dptr,a 0083 E4 189 clr a 0084 9C 190 subb a,r4 0085 A3 191 inc dptr 0086 F0 192 movx @dptr,a 0087 E4 193 clr a 0088 9D 194 subb a,r5 0089 A3 195 inc dptr 008A F0 196 movx @dptr,a 197 ; _int2fs.c 99 008B 198 00113$: 008B E4 199 clr a 008C F5*01 200 mov (___int2fs_sloc0_1_0 + 1),a 008E 75*00 96 201 mov ___int2fs_sloc0_1_0,#0x96 0091 202 00105$: 0091 90s00r0A 203 mov dptr,#___int2fs_a1_1_1 0094 E0 204 movx a,@dptr 0095 FC 205 mov r4,a 0096 A3 206 inc dptr 0097 E0 207 movx a,@dptr 0098 FD 208 mov r5,a 0099 A3 209 inc dptr 009A E0 210 movx a,@dptr 009B FE 211 mov r6,a 009C A3 212 inc dptr 009D E0 213 movx a,@dptr 009E FF 214 mov r7,a 009F C3 215 clr c 00A0 EC 216 mov a,r4 00A1 94 00 217 subb a,#0x00 00A3 ED 218 mov a,r5 00A4 94 00 219 subb a,#0x00 00A6 EE 220 mov a,r6 00A7 94 80 221 subb a,#0x80 00A9 EF 222 mov a,r7 00AA 94 00 223 subb a,#0x00 224 ; Peephole 108 removed ljmp by inverse jump logic 00AC 50 27 225 jnc 00107$ 00AE 226 00116$: 227 ; _int2fs.c 101 00AE EC 228 mov a,r4 00AF 25 E0 229 add a,acc 00B1 F8 230 mov r0,a 00B2 ED 231 mov a,r5 00B3 33 232 rlc a 00B4 F9 233 mov r1,a 00B5 EE 234 mov a,r6 00B6 33 235 rlc a 00B7 FA 236 mov r2,a 00B8 EF 237 mov a,r7 00B9 33 238 rlc a 00BA FB 239 mov r3,a 00BB 90s00r0A 240 mov dptr,#___int2fs_a1_1_1 00BE E8 241 mov a,r0 00BF F0 242 movx @dptr,a 00C0 A3 243 inc dptr 00C1 E9 244 mov a,r1 00C2 F0 245 movx @dptr,a 00C3 A3 246 inc dptr 00C4 EA 247 mov a,r2 00C5 F0 248 movx @dptr,a 00C6 A3 249 inc dptr 00C7 EB 250 mov a,r3 00C8 F0 251 movx @dptr,a 252 ; _int2fs.c 102 00C9 15*00 253 dec ___int2fs_sloc0_1_0 00CB 74 FF 254 mov a,#0xff 00CD B5*00 02 255 cjne a,___int2fs_sloc0_1_0,00117$ 00D0 15*01 256 dec (___int2fs_sloc0_1_0 + 1) 00D2 257 00117$: 00D2 02s00r91 258 ljmp 00105$ 00D5 259 00107$: 260 ; _int2fs.c 105 00D5 53 06 7F 261 anl ar6,#0x7f 262 ; _int2fs.c 108 00D8 AA*00 263 mov r2,___int2fs_sloc0_1_0 00DA AB*01 264 mov r3,(___int2fs_sloc0_1_0 + 1) 00DC 78 00 265 mov r0,#0x00 00DE 79 00 266 mov r1,#0x00 00E0 8A*04 267 mov (___int2fs_sloc1_1_0 + 2),r2 00E2 EB 268 mov a,r3 00E3 54 01 269 anl a,#0x01 00E5 A2 E0 270 mov c,acc.0 00E7 C5*04 271 xch a,(___int2fs_sloc1_1_0 + 2) 00E9 13 272 rrc a 00EA C5*04 273 xch a,(___int2fs_sloc1_1_0 + 2) 00EC 13 274 rrc a 00ED C5*04 275 xch a,(___int2fs_sloc1_1_0 + 2) 00EF F5*05 276 mov (___int2fs_sloc1_1_0 + 3),a 00F1 75*03 00 277 mov (___int2fs_sloc1_1_0 + 1),#0x00 00F4 75*02 00 278 mov ___int2fs_sloc1_1_0,#0x00 00F7 90s00r02 279 mov dptr,#___int2fs_sign_1_1 00FA E0 280 movx a,@dptr 00FB FA 281 mov r2,a 00FC A3 282 inc dptr 00FD E0 283 movx a,@dptr 00FE FB 284 mov r3,a 00FF A3 285 inc dptr 0100 E0 286 movx a,@dptr 0101 F8 287 mov r0,a 0102 A3 288 inc dptr 0103 E0 289 movx a,@dptr 0104 F9 290 mov r1,a 0105 E5*02 291 mov a,___int2fs_sloc1_1_0 0107 42 02 292 orl ar2,a 0109 E5*03 293 mov a,(___int2fs_sloc1_1_0 + 1) 010B 42 03 294 orl ar3,a 010D E5*04 295 mov a,(___int2fs_sloc1_1_0 + 2) 010F 42 00 296 orl ar0,a 0111 E5*05 297 mov a,(___int2fs_sloc1_1_0 + 3) 0113 42 01 298 orl ar1,a 0115 EA 299 mov a,r2 0116 42 04 300 orl ar4,a 0118 EB 301 mov a,r3 0119 42 05 302 orl ar5,a 011B E8 303 mov a,r0 011C 42 06 304 orl ar6,a 011E E9 305 mov a,r1 011F 42 07 306 orl ar7,a 0121 90s00r06 307 mov dptr,#(___int2fs_fl_1_1) 0124 EC 308 mov a,r4 0125 F0 309 movx @dptr,a 0126 A3 310 inc dptr 0127 ED 311 mov a,r5 0128 F0 312 movx @dptr,a 0129 A3 313 inc dptr 012A EE 314 mov a,r6 012B F0 315 movx @dptr,a 012C A3 316 inc dptr 012D EF 317 mov a,r7 012E F0 318 movx @dptr,a 319 ; _int2fs.c 110 012F 90s00r06 320 mov dptr,#(___int2fs_fl_1_1) 0132 E0 321 movx a,@dptr 0133 FA 322 mov r2,a 0134 A3 323 inc dptr 0135 E0 324 movx a,@dptr 0136 FB 325 mov r3,a 0137 A3 326 inc dptr 0138 E0 327 movx a,@dptr 0139 FC 328 mov r4,a 013A A3 329 inc dptr 013B E0 330 movx a,@dptr 331 ; Peephole 191 removed redundant mov 013C FD 332 mov r5,a 013D 8A 82 333 mov dpl,r2 013F 8B 83 334 mov dph,r3 0141 8C F0 335 mov b,r4 0143 336 00108$: 0143 337 C$_int2fs.c$111$1$1 ==. 0143 338 XG$__int2fs$0$0 ==. 0143 22 339 ret 340 .area CSEG (CODE)