Mercurial > hg > Members > kono > nitros9-code
annotate level1/cmds/asm.asm @ 310:4df2bcadf651
Renamed compatibility byte to feature byte
| author | boisy |
|---|---|
| date | Tue, 23 Jul 2002 13:54:36 +0000 |
| parents | 7dea3d77ba0b |
| children | 765ff88d3db7 |
| rev | line source |
|---|---|
| 0 | 1 ******************************************************************** |
| 2 * Asm - 6809 Assembler | |
| 3 * | |
| 4 * $Id$ | |
| 5 * | |
| 6 * Ed. Comments Who YY/MM/DD | |
| 7 * ------------------------------------------------------------------ | |
|
200
e9ce43cc215e
Made major changes to headers for consistency and identification
boisy
parents:
0
diff
changeset
|
8 * 5 From Tandy OS-9 Level One VR 02.00.00 |
|
e9ce43cc215e
Made major changes to headers for consistency and identification
boisy
parents:
0
diff
changeset
|
9 * 6 Made compliant with 1900-2155 BGP 99/05/11 |
| 0 | 10 |
| 11 nam Asm | |
| 12 ttl 6809 Assembler | |
| 13 | |
| 14 * Disassembled 99/04/12 09:16:34 by Disasm v1.6 (C) 1988 by RML | |
| 15 | |
| 16 ifp1 | |
| 17 use defsfile | |
| 18 endc | |
| 19 | |
| 20 tylg set Prgrm+Objct | |
| 21 atrv set ReEnt+rev | |
| 22 rev set $01 | |
| 23 edition set 6 | |
| 24 | |
| 25 mod eom,name,tylg,atrv,start,size | |
| 26 | |
| 27 u0000 rmb 1 | |
| 28 u0001 rmb 1 | |
| 29 u0002 rmb 1 | |
| 30 u0003 rmb 1 | |
| 31 u0004 rmb 1 | |
| 32 u0005 rmb 1 | |
| 33 u0006 rmb 1 | |
| 34 u0007 rmb 1 | |
| 35 u0008 rmb 1 | |
| 36 u0009 rmb 1 | |
| 37 u000A rmb 1 | |
| 38 u000B rmb 1 | |
| 39 u000C rmb 1 | |
| 40 u000D rmb 1 | |
| 41 u000E rmb 1 | |
| 42 u000F rmb 1 | |
| 43 u0010 rmb 2 | |
| 44 u0012 rmb 2 | |
| 45 u0014 rmb 2 | |
| 46 u0016 rmb 1 | |
| 47 u0017 rmb 1 | |
| 48 u0018 rmb 1 | |
| 49 u0019 rmb 1 | |
| 50 u001A rmb 1 | |
| 51 u001B rmb 2 | |
| 52 u001D rmb 1 | |
| 53 u001E rmb 1 | |
| 54 u001F rmb 1 | |
| 55 u0020 rmb 1 | |
| 56 u0021 rmb 1 | |
| 57 u0022 rmb 1 | |
| 58 u0023 rmb 1 | |
| 59 u0024 rmb 1 | |
| 60 u0025 rmb 1 | |
| 61 u0026 rmb 1 | |
| 62 u0027 rmb 1 | |
| 63 u0028 rmb 1 | |
| 64 u0029 rmb 1 | |
| 65 u002A rmb 1 | |
| 66 u002B rmb 1 | |
| 67 u002C rmb 1 | |
| 68 u002D rmb 1 | |
| 69 u002E rmb 1 | |
| 70 u002F rmb 1 | |
| 71 u0030 rmb 1 | |
| 72 u0031 rmb 1 | |
| 73 u0032 rmb 1 | |
| 74 u0033 rmb 1 | |
| 75 u0034 rmb 1 | |
| 76 u0035 rmb 1 | |
| 77 u0036 rmb 1 | |
| 78 u0037 rmb 1 | |
| 79 u0038 rmb 1 | |
| 80 u0039 rmb 1 | |
| 81 u003A rmb 1 | |
| 82 u003B rmb 1 | |
| 83 u003C rmb 1 | |
| 84 u003D rmb 1 | |
| 85 u003E rmb 1 | |
| 86 u003F rmb 1 | |
| 87 u0040 rmb 1 | |
| 88 u0041 rmb 1 | |
| 89 u0042 rmb 1 | |
| 90 u0043 rmb 1 | |
| 91 u0044 rmb 1 | |
| 92 u0045 rmb 1 | |
| 93 u0046 rmb 1 | |
| 94 u0047 rmb 2 | |
| 95 u0049 rmb 1 | |
| 96 u004A rmb 1 | |
| 97 u004B rmb 1 | |
| 98 u004C rmb 1 | |
| 99 u004D rmb 1 | |
| 100 u004E rmb 1 | |
| 101 u004F rmb 1 | |
| 102 u0050 rmb 1 | |
| 103 u0051 rmb 1 | |
| 104 u0052 rmb 1 | |
| 105 u0053 rmb 1 | |
| 106 u0054 rmb 1 | |
| 107 u0055 rmb 1 | |
| 108 u0056 rmb 1 | |
| 109 u0057 rmb 1 | |
| 110 u0058 rmb 1 | |
| 111 u0059 rmb 1 | |
| 112 u005A rmb 1 | |
| 113 u005B rmb 1 | |
| 114 u005C rmb 1 | |
| 115 u005D rmb 1 | |
| 116 u005E rmb 1 | |
| 117 u005F rmb 1 | |
| 118 u0060 rmb 1 | |
| 119 u0061 rmb 1 | |
| 120 u0062 rmb 1 | |
| 121 u0063 rmb 1 | |
| 122 u0064 rmb 1 | |
| 123 u0065 rmb 4 | |
| 124 u0069 rmb 1 | |
| 125 u006A rmb 3 | |
| 126 u006D rmb 2 | |
| 127 u006F rmb 1 | |
| 128 u0070 rmb 1 | |
| 129 u0071 rmb 1 | |
| 130 u0072 rmb 1 | |
| 131 u0073 rmb 2 | |
| 132 u0075 rmb 11 | |
| 133 u0080 rmb 1 | |
| 134 u0081 rmb 2 | |
| 135 u0083 rmb 2 | |
| 136 u0085 rmb 2 | |
| 137 u0087 rmb 1 | |
| 138 u0088 rmb 2 | |
| 139 u008A rmb 2 | |
| 140 u008C rmb 1 | |
| 141 u008D rmb 1 | |
| 142 u008E rmb 1 | |
| 143 u008F rmb 8 | |
| 144 u0097 rmb 15 | |
| 145 u00A6 rmb 1 | |
| 146 u00A7 rmb 2 | |
| 147 u00A9 rmb 6 | |
| 148 u00AF rmb 7 | |
| 149 u00B6 rmb 11 | |
| 150 u00C1 rmb 1 | |
| 151 u00C2 rmb 1 | |
| 152 u00C3 rmb 3 | |
| 153 u00C6 rmb 8 | |
| 154 u00CE rmb 1 | |
| 155 u00CF rmb 8 | |
| 156 u00D7 rmb 10 | |
| 157 u00E1 rmb 7 | |
| 158 u00E8 rmb 4 | |
| 159 u00EC rmb 12 | |
| 160 u00F8 rmb 3848 | |
| 161 size equ . | |
| 162 | |
| 163 name fcs /Asm/ | |
| 164 fcb edition | |
| 165 | |
| 166 start equ * | |
| 167 tfr u,d | |
| 168 addd #$01C0 | |
| 169 std <u0014 | |
| 170 std <u0016 | |
| 171 addd #$0009 | |
| 172 std <u0000 | |
| 173 addd #$0051 | |
| 174 std <u0002 | |
| 175 addd #$0085 | |
| 176 std <u0004 | |
| 177 addd #$0092 | |
| 178 std <u0006 | |
| 179 std <u001F | |
| 180 std <u0008 | |
| 181 addd #$0050 | |
| 182 std <u000A | |
| 183 addd #$0028 | |
| 184 std <u000E | |
| 185 addd #$0100 | |
| 186 std <u0010 | |
| 187 addd #$0034 | |
| 188 std <u001D | |
| 189 leau -$01,y | |
| 190 stu <u0012 | |
| 191 lds <u0014 | |
| 192 clra | |
| 193 ldb #$01 | |
| 194 sta <u0059 | |
| 195 sta <u005B | |
| 196 sta <u005E | |
| 197 sta <u005D | |
| 198 stb <u005C | |
| 199 sta <u0058 | |
| 200 sta <u005A | |
| 201 stb <u005F | |
| 202 sta <u0060 | |
| 203 sta <u003E | |
| 204 sta <u0018 | |
| 205 sta <u0019 | |
| 206 stb <u001A | |
| 207 ldb #$FF | |
| 208 stb <u0056 | |
| 209 sta <u0057 | |
| 210 ldb #$42 | |
| 211 stb <u0036 | |
| 212 ldb #$50 | |
| 213 stb <u0037 | |
| 214 lbsr L1696 | |
| 215 lda <u0056 | |
| 216 bmi L0081 | |
| 217 inc <u0057 | |
| 218 L0081 ldx <u0008 | |
| 219 clr ,x | |
| 220 ldx <u000A | |
| 221 clr ,x | |
| 222 ldx <u0010 | |
| 223 L008B clr ,x+ | |
| 224 cmpx <u0012 | |
| 225 bls L008B | |
| 226 ldb <u005D | |
| 227 beq L0099 | |
| 228 dec <u003E | |
| 229 bra L00A0 | |
| 230 L0099 bsr L00A5 | |
| 231 lbsr L1607 | |
| 232 inc <u003E | |
| 233 L00A0 bsr L00A5 | |
| 234 lbra L159F | |
| 235 L00A5 bsr L00B1 | |
| 236 L00A7 lbsr L1537 | |
| 237 bcc L00AD | |
| 238 rts | |
| 239 L00AD bsr L00D5 | |
| 240 bra L00A7 | |
| 241 L00B1 clra | |
| 242 clrb | |
| 243 std <u0028 | |
| 244 std <u0022 | |
| 245 std <u0026 | |
| 246 std <u0024 | |
| 247 std <u0040 | |
| 248 std <u0042 | |
| 249 stb <u003F | |
| 250 stb <u0055 | |
| 251 stb <u0054 | |
| 252 incb | |
| 253 std <u003A | |
| 254 std <u0038 | |
| 255 ldd <u000E | |
| 256 std <u001B | |
| 257 lbsr L1360 | |
| 258 lbsr L141A | |
| 259 rts | |
| 260 L00D5 clra | |
| 261 clrb | |
| 262 std <u004A | |
| 263 std <u0061 | |
| 264 std <u0063 | |
| 265 sta <u0065 | |
| 266 sta <u0046 | |
| 267 sta <u002A | |
| 268 sta <u0021 | |
| 269 sta <u004C | |
| 270 sta <u002C | |
| 271 sta <u004F | |
| 272 sta <u004E | |
| 273 sta <u004D | |
| 274 lda #$35 | |
| 275 sta <u002B | |
| 276 ldd <u0040 | |
| 277 std <u0044 | |
| 278 ldx <u0000 | |
| 279 lda ,x | |
| 280 cmpa #$0D | |
| 281 beq L0136 | |
| 282 cmpa #$2A | |
| 283 beq L0136 | |
| 284 cmpa #$20 | |
| 285 beq L0125 | |
| 286 ldb <u002B | |
| 287 orb #$08 | |
| 288 stb <u002B | |
| 289 lbsr L0368 | |
| 290 bcc L0119 | |
| 291 ldb #$01 | |
| 292 lbsr L02FA | |
| 293 bra L0125 | |
| 294 L0119 tst <u0054 | |
| 295 bne L0125 | |
| 296 lbsr L0F4A | |
| 297 bcc L0125 | |
| 298 lbsr L02FA | |
| 299 L0125 lbsr L1164 | |
| 300 cmpa #$0D | |
| 301 bne L0141 | |
| 302 lda <u002B | |
| 303 bita #$08 | |
| 304 beq L0136 | |
| 305 lda #$09 | |
| 306 bra L0138 | |
| 307 L0136 lda #$80 | |
| 308 L0138 sta <u002B | |
| 309 lda <u0054 | |
| 310 bne L018E | |
| 311 lbra L01F2 | |
| 312 L0141 stx <u002F | |
| 313 L0143 lda ,x+ | |
| 314 cmpa #$0D | |
| 315 beq L0150 | |
| 316 cmpa #$20 | |
| 317 bne L0143 | |
| 318 lbsr L1164 | |
| 319 L0150 stx <u0031 | |
| 320 ldx <u002F | |
| 321 ldb #$74 | |
| 322 leay >L03B8,pcr | |
| 323 lbsr L0344 | |
| 324 bcc L0172 | |
| 325 L015F ldb #$02 | |
| 326 lbsr L02FA | |
| 327 ldb #$03 | |
| 328 stb <u0046 | |
| 329 lda <u002B | |
| 330 anda #$DF | |
| 331 sta <u002B | |
| 332 ldx <u0031 | |
| 333 bra L01C4 | |
| 334 L0172 lda <u0054 | |
| 335 beq L0195 | |
| 336 ldb $01,y | |
| 337 andb #$0F | |
| 338 cmpb #$0D | |
| 339 bne L0181 | |
| 340 inca | |
| 341 bra L018C | |
| 342 L0181 cmpb #$0E | |
| 343 bne L018E | |
| 344 deca | |
| 345 beq L0195 | |
| 346 ldb ,y | |
| 347 bne L018E | |
| 348 L018C sta <u0054 | |
| 349 L018E inc <u0039 | |
| 350 bne L0194 | |
| 351 inc <u0038 | |
| 352 L0194 rts | |
| 353 L0195 ldd ,y | |
| 354 sta <u0062 | |
| 355 stb <u0047 | |
| 356 lda #$10 | |
| 357 bitb #$10 | |
| 358 bne L01A7 | |
| 359 lda #$11 | |
| 360 bitb #$20 | |
| 361 beq L01AB | |
| 362 L01A7 sta <u0061 | |
| 363 inc <u0046 | |
| 364 L01AB leay >L0780,pcr | |
| 365 andb #$0F | |
| 366 lslb | |
| 367 ldd b,y | |
| 368 jsr d,y | |
| 369 lda <u002B | |
| 370 bita #$20 | |
| 371 beq L01C4 | |
| 372 lda ,x | |
| 373 clr ,x+ | |
| 374 cmpa #$0D | |
| 375 beq L01D3 | |
| 376 L01C4 lbsr L1164 | |
| 377 cmpa #$0D | |
| 378 beq L01D3 | |
| 379 ldb <u002B | |
| 380 beq L01D3 | |
| 381 orb #$40 | |
| 382 stb <u002B | |
| 383 L01D3 ldb <u005D | |
| 384 beq L01DB | |
| 385 ldb <u0021 | |
| 386 bne L01F2 | |
| 387 L01DB ldd <u0040 | |
| 388 addb <u0046 | |
| 389 adca #$00 | |
| 390 std <u0040 | |
| 391 bra L01F2 | |
| 392 L01E5 ldd #$2084 | |
| 393 ldx <u0004 | |
| 394 L01EA sta ,x+ | |
| 395 decb | |
| 396 bne L01EA | |
| 397 L01EF ldx <u0004 | |
| 398 rts | |
| 399 L01F2 ldb <u003E | |
| 400 beq L01EF | |
| 401 ldb <u002B | |
| 402 beq L01EF | |
| 403 bsr L01E5 | |
| 404 tst <u0060 | |
| 405 bne L0205 | |
| 406 ldd <u0038 | |
| 407 lbsr L1084 | |
| 408 L0205 ldb <u002B | |
| 409 bitb #$80 | |
| 410 beq L0213 | |
| 411 ldb #$0D | |
| 412 ldy <u0000 | |
| 413 lbra L02AB | |
| 414 L0213 bitb #$01 | |
| 415 beq L0240 | |
| 416 lda #$45 | |
| 417 ldb <u0021 | |
| 418 bne L022F | |
| 419 lda #$44 | |
| 420 ldb <u002C | |
| 421 bne L022F | |
| 422 lda #$57 | |
| 423 ldb <u004F | |
| 424 beq L0236 | |
| 425 inc <u0023 | |
| 426 bne L022F | |
| 427 inc <u0022 | |
| 428 L022F ldb #$06 | |
| 429 lbsr L02E2 | |
| 430 sta ,x | |
| 431 L0236 ldb #$08 | |
| 432 lbsr L02E2 | |
| 433 ldd <u0044 | |
| 434 lbsr L1057 | |
| 435 L0240 ldb <u002B | |
| 436 bitb #$04 | |
| 437 beq L0272 | |
| 438 ldb <u0046 | |
| 439 beq L0272 | |
| 440 ldb #$61 | |
| 441 tfr dp,a | |
| 442 tfr d,u | |
| 443 ldb ,u+ | |
| 444 bne L0256 | |
| 445 L0254 ldb ,u+ | |
| 446 L0256 pshs b | |
| 447 lbsr L106B | |
| 448 puls a | |
| 449 ldb <u005D | |
| 450 beq L0265 | |
| 451 ldb <u0021 | |
| 452 bne L026E | |
| 453 L0265 lbsr L130D | |
| 454 inc <u0025 | |
| 455 bne L026E | |
| 456 inc <u0024 | |
| 457 L026E dec <u0046 | |
| 458 bne L0254 | |
| 459 L0272 ldy <u0000 | |
| 460 ldb <u002B | |
| 461 bitb #$08 | |
| 462 beq L0281 | |
| 463 ldb #$18 | |
| 464 bsr L02E2 | |
| 465 bsr L02C9 | |
| 466 L0281 ldb <u002B | |
| 467 bitb #$10 | |
| 468 beq L028F | |
| 469 ldb #$21 | |
| 470 bsr L02E2 | |
| 471 bsr L02C9 | |
| 472 leay $01,y | |
| 473 L028F ldb <u002B | |
| 474 bitb #$20 | |
| 475 beq L02A3 | |
| 476 ldb #$27 | |
| 477 bsr L02E2 | |
| 478 ldy <u0031 | |
| 479 lbsr L11BD | |
| 480 lda #$20 | |
| 481 sta ,x+ | |
| 482 L02A3 ldb <u002B | |
| 483 bitb #$40 | |
| 484 beq L02B7 | |
| 485 ldb #$32 | |
| 486 L02AB bsr L02E2 | |
| 487 L02AD lda ,y+ | |
| 488 cmpa #$0D | |
| 489 beq L02B7 | |
| 490 sta ,x+ | |
| 491 bra L02AD | |
| 492 L02B7 ldb <u002B | |
| 493 andb #$BF | |
| 494 cmpb #$04 | |
| 495 beq L02C8 | |
| 496 lbsr L1370 | |
| 497 inc <u0039 | |
| 498 bne L02C8 | |
| 499 inc <u0038 | |
| 500 L02C8 rts | |
| 501 L02C9 lda ,y+ | |
| 502 cmpa #$20 | |
| 503 beq L02C9 | |
| 504 L02CF cmpa #$0D | |
| 505 beq L02DF | |
| 506 cmpx <u001F | |
| 507 bcc L02D9 | |
| 508 sta ,x+ | |
| 509 L02D9 lda ,y+ | |
| 510 cmpa #$20 | |
| 511 bne L02CF | |
| 512 L02DF leay -$01,y | |
| 513 rts | |
| 514 L02E2 pshs u | |
| 515 tst <u0060 | |
| 516 beq L02EC | |
| 517 leax $01,x | |
| 518 bra L02F8 | |
| 519 L02EC ldu <u0004 | |
| 520 leau b,u | |
| 521 pshs u | |
| 522 cmpx ,s++ | |
| 523 bcc L02F8 | |
| 524 tfr u,x | |
| 525 L02F8 puls pc,u | |
| 526 L02FA pshs u,y,x,b,a | |
| 527 tst <u005C | |
| 528 beq L0325 | |
| 529 leay >L061C,pcr | |
| 530 ldx <u0004 | |
| 531 lbsr L11BD | |
| 532 clra | |
| 533 decb | |
| 534 lslb | |
| 535 leay >L062A,pcr | |
| 536 ldd d,y | |
| 537 leay d,y | |
| 538 lbsr L11BD | |
| 539 ldb $01,s | |
| 540 cmpb #$18 | |
| 541 bne L0322 | |
| 542 ldy $02,s | |
| 543 bsr L033D | |
| 544 L0322 lbsr L1368 | |
| 545 L0325 inc <u0021 | |
| 546 inc <u0029 | |
| 547 bne L032D | |
| 548 inc <u0028 | |
| 549 L032D puls pc,u,y,x,b,a | |
| 550 lbsr L01E5 | |
| 551 ldb #$18 | |
| 552 bsr L02E2 | |
| 553 ldy <u0000 | |
| 554 bra L033D | |
| 555 L033B sta ,x+ | |
| 556 L033D lda ,y+ | |
| 557 cmpa #$0D | |
| 558 bne L033B | |
| 559 rts | |
| 560 L0344 pshs x,b | |
| 561 L0346 lda ,y+ | |
| 562 bmi L035E | |
| 563 eora ,x+ | |
| 564 anda #$DF | |
| 565 beq L0346 | |
| 566 L0350 lda ,y+ | |
| 567 bpl L0350 | |
| 568 L0354 leay $02,y | |
| 569 ldx $01,s | |
| 570 decb | |
| 571 bne L0346 | |
| 572 comb | |
| 573 puls pc,x,b | |
| 574 L035E eora ,x+ | |
| 575 anda #$5F | |
| 576 bne L0354 | |
| 577 leas $03,s | |
| 578 clrb | |
| 579 rts | |
| 580 L0368 lbsr L1164 | |
| 581 bsr L03A0 | |
| 582 bcs L03B7 | |
| 583 pshs u,y | |
| 584 ldu <u0016 | |
| 585 ldb #$08 | |
| 586 leax $01,x | |
| 587 bra L0393 | |
| 588 L0379 lda ,x+ | |
| 589 bsr L03A0 | |
| 590 bcc L0393 | |
| 591 cmpa #$39 | |
| 592 bhi L039A | |
| 593 cmpa #$30 | |
| 594 bcc L0393 | |
| 595 cmpa #$2E | |
| 596 beq L0393 | |
| 597 cmpa #$24 | |
| 598 beq L0393 | |
| 599 cmpa #$5F | |
| 600 bne L039A | |
| 601 L0393 sta ,u+ | |
| 602 decb | |
| 603 bne L0379 | |
| 604 bra L039C | |
| 605 L039A leax -$01,x | |
| 606 L039C clr ,u+ | |
| 607 puls pc,u,y | |
| 608 L03A0 cmpa #$41 | |
| 609 bcs L03B5 | |
| 610 cmpa #$5A | |
| 611 bhi L03AD | |
| 612 L03A8 anda #$5F | |
| 203 | 613 andcc #^Carry |
| 0 | 614 rts |
| 615 L03AD cmpa #$61 | |
| 616 bcs L03B5 | |
| 617 cmpa #$7A | |
| 618 bls L03A8 | |
| 203 | 619 L03B5 orcc #Carry |
| 0 | 620 L03B7 rts |
| 621 L03B8 fcs "ORG" | |
| 622 fdb $000C | |
| 623 fcs "ENDC" | |
| 624 fdb $000E | |
| 625 fcs "LBRA" | |
| 626 fdb $1600 | |
| 627 fcs "LBSR" | |
| 628 fdb $1700 | |
| 629 fcs "ORCC" | |
| 630 fdb $1A01 | |
| 631 fcs "ANDCC" | |
| 632 fdb $1C01 | |
| 633 fcs "CWAI" | |
| 634 fdb $3C01 | |
| 635 fcs "ADDD" | |
| 636 fdb $C302 | |
| 637 fcs "SUBD" | |
| 638 fdb $8302 | |
| 639 fcs "LDD" | |
| 640 fdb $CC02 | |
| 641 fcs "LDX" | |
| 642 fdb $8E02 | |
| 643 fcs "LDU" | |
| 644 fdb $CE02 | |
| 645 fcs "CMPX" | |
| 646 fdb $8C02 | |
| 647 fcs "JSR" | |
| 648 fdb $8D42 | |
| 649 fcs "STD" | |
| 650 fdb $CD42 | |
| 651 fcs "STX" | |
| 652 fdb $8F42 | |
| 653 fcs "STU" | |
| 654 fdb $CF42 | |
| 655 fcs "CMPU" | |
| 656 fdb $8322 | |
| 657 fcs "CMPS" | |
| 658 fdb $8C22 | |
| 659 fcs "CMPD" | |
| 660 fdb $8312 | |
| 661 fcs "CMPY" | |
| 662 fdb $8C12 | |
| 663 fcs "LDY" | |
| 664 fdb $8E12 | |
| 665 fcs "LDS" | |
| 666 fdb $CE12 | |
| 667 fcs "STY" | |
| 668 fdb $8F52 | |
| 669 fcs "STS" | |
| 670 fdb $CF52 | |
| 671 fcs "ADD" | |
| 672 fdb $8B03 | |
| 673 fcs "CMP" | |
| 674 fdb $8103 | |
| 675 fcs "SUB" | |
| 676 fdb $8003 | |
| 677 fcs "SBC" | |
| 678 fdb $8203 | |
| 679 fcs "AND" | |
| 680 fdb $8403 | |
| 681 fcs "BIT" | |
| 682 fdb $8503 | |
| 683 fcs "LD" | |
| 684 fdb $8603 | |
| 685 fcs "ST" | |
| 686 fdb $8743 | |
| 687 fcs "EOR" | |
| 688 fdb $8803 | |
| 689 fcs "ADC" | |
| 690 fdb $8903 | |
| 691 fcs "OR" | |
| 692 fdb $8A03 | |
| 693 fcs "NEG" | |
| 694 fdb $0004 | |
| 695 fcs "COM" | |
| 696 fdb $0304 | |
| 697 fcs "LSR" | |
| 698 fdb $0404 | |
| 699 fcs "ROR" | |
| 700 fdb $0604 | |
| 701 fcs "ASR" | |
| 702 fdb $0704 | |
| 703 fcs "LSL" | |
| 704 fdb $0804 | |
| 705 fcs "ASL" | |
| 706 fdb $0804 | |
| 707 fcs "ROL" | |
| 708 fdb $0904 | |
| 709 fcs "DEC" | |
| 710 fdb $0A04 | |
| 711 fcs "INC" | |
| 712 fdb $0C04 | |
| 713 fcs "TST" | |
| 714 fdb $0D04 | |
| 715 fcs "JMP" | |
| 716 fdb $0E44 | |
| 717 fcs "CLR" | |
| 718 fdb $0F04 | |
| 719 fcs "RTS" | |
| 720 fdb $3905 | |
| 721 fcs "MUL" | |
| 722 fdb $3D05 | |
| 723 fcs "NOP" | |
| 724 fdb $1205 | |
| 725 fcs "SYNC" | |
| 726 fdb $1305 | |
| 727 fcs "DAA" | |
| 728 fdb $1905 | |
| 729 fcs "SEX" | |
| 730 fdb $1D05 | |
| 731 fcs "ABX" | |
| 732 fdb $3A05 | |
| 733 fcs "RTI" | |
| 734 fdb $3B05 | |
| 735 fcs "SWI2" | |
| 736 fdb $3F15 | |
| 737 fcs "SWI3" | |
| 738 fdb $3F25 | |
| 739 fcs "SWI" | |
| 740 fdb $3F05 | |
| 741 fcs "LEAX" | |
| 742 fdb $3006 | |
| 743 fcs "LEAY" | |
| 744 fdb $3106 | |
| 745 fcs "LEAS" | |
| 746 fdb $3206 | |
| 747 fcs "LEAU" | |
| 748 fdb $3306 | |
| 749 fcs "TFR" | |
| 750 fdb $1F07 | |
| 751 fcs "EXG" | |
| 752 fdb $1E07 | |
| 753 fcs "PSHS" | |
| 754 fdb $3408 | |
| 755 fcs "PULS" | |
| 756 fdb $3508 | |
| 757 fcs "PSHU" | |
| 758 fdb $3608 | |
| 759 fcs "PULU" | |
| 760 fdb $3708 | |
| 761 fcs "LB" | |
| 762 fdb $0019 | |
| 763 L0530 fcs "BSR" | |
| 764 fdb $8D0A | |
| 765 fcs "BRA" | |
| 766 fdb $200A | |
| 767 fcs "BRN" | |
| 768 fdb $210A | |
| 769 fcs "BHI" | |
| 770 fdb $220A | |
| 771 fcs "BLS" | |
| 772 fdb $230A | |
| 773 fcs "BHS" | |
| 774 fdb $240A | |
| 775 fcs "BCC" | |
| 776 fdb $240A | |
| 777 fcs "BLO" | |
| 778 fdb $250A | |
| 779 fcs "BCS" | |
| 780 fdb $250A | |
| 781 fcs "BNE" | |
| 782 fdb $260A | |
| 783 fcs "BEQ" | |
| 784 fdb $270A | |
| 785 fcs "BVC" | |
| 786 fdb $280A | |
| 787 fcs "BVS" | |
| 788 fdb $290A | |
| 789 fcs "BPL" | |
| 790 fdb $2A0A | |
| 791 fcs "BMI" | |
| 792 fdb $2B0A | |
| 793 fcs "BGE" | |
| 794 fdb $2C0A | |
| 795 fcs "BLT" | |
| 796 fdb $2D0A | |
| 797 fcs "BGT" | |
| 798 fdb $2E0A | |
| 799 fcs "BLE" | |
| 800 fdb $2F0A | |
| 801 fcs "RMB" | |
| 802 fdb $000B | |
| 803 fcs "FCC" | |
| 804 fdb $010B | |
| 805 fcs "FDB" | |
| 806 fdb $020B | |
| 807 fcs "FCS" | |
| 808 fdb $030B | |
| 809 fcs "FCB" | |
| 810 fdb $040B | |
| 811 fcs "EQU" | |
| 812 fdb $050B | |
| 813 fcs "MOD" | |
| 814 fdb $060B | |
| 815 fcs "EMOD" | |
| 816 fdb $070B | |
| 817 fcs "SETDP" | |
| 818 fdb $070C | |
| 819 fcs "SET" | |
| 820 fdb $080B | |
| 821 fcs "OS9" | |
| 822 fdb $090B | |
| 823 fcs "END" | |
| 824 fdb $010C | |
| 825 fcs "NAM" | |
| 826 fdb $020C | |
| 827 fcs "OPT" | |
| 828 fdb $030C | |
| 829 fcs "TTL" | |
| 830 fdb $040C | |
| 831 fcs "PAG" | |
| 832 fdb $050C | |
| 833 fcs "SPC" | |
| 834 fdb $060C | |
| 835 fcs "USE" | |
| 836 fdb $080C | |
| 837 fcs "IFEQ" | |
| 838 fdb $000D | |
| 839 fcs "IFNE" | |
| 840 fdb $010D | |
| 841 fcs "IFLT" | |
| 842 fdb $020D | |
| 843 fcs "IFLE" | |
| 844 fdb $030D | |
| 845 fcs "IFGE" | |
| 846 fdb $040D | |
| 847 fcs "IFGT" | |
| 848 fdb $050D | |
| 849 fcs "IFP1" | |
| 850 fdb $060D | |
| 851 fcs "ELSE" | |
| 852 fdb $010E | |
| 853 L061C fcc "***** Error: " | |
| 854 fcb $00 | |
| 855 L062A fdb $0035 | |
| 856 fdb $003F | |
| 857 fdb $0049 | |
| 858 fdb $0053 | |
| 859 fdb $005C | |
| 860 fdb $005E | |
| 861 fdb $006A | |
| 862 fdb $0071 | |
| 863 fdb $0080 | |
| 864 fdb $008f | |
| 865 fdb $0097 | |
| 866 fdb $00A9 | |
| 867 fdb $00B6 | |
| 868 fdb $00C3 | |
| 869 fdb $00CE | |
| 870 fdb $00D7 | |
| 871 fdb $00E1 | |
| 872 fdb $00EC | |
| 873 fdb $00F8 | |
| 874 fdb $0102 | |
| 875 fdb $010C | |
| 876 fdb $0118 | |
| 877 fdb $0121 | |
| 878 fdb $012B | |
| 879 fdb $0137 | |
| 880 fdb $0149 | |
| 881 fcb $00 | |
| 882 L065F fcc "bad label" | |
| 883 fcb $00 | |
| 884 L0667 fcc "bad instr" | |
| 885 fcb $00 | |
| 886 L0673 fcc "in number" | |
| 887 fcb $00 | |
| 888 L067C fcc "div by 0" | |
| 889 fcb $00 | |
| 890 L0686 fcc " " | |
| 891 fcb $00 | |
| 892 L0688 fcc "expr syntax" | |
| 893 fcb $00 | |
| 894 L0693 fcc "parens" | |
| 895 fcb $00 | |
| 896 L069B fcc "redefined name" | |
| 897 fcb $00 | |
| 898 L06A9 fcc "undefined name" | |
| 899 fcb $00 | |
| 900 L06B8 fcc "phasing" | |
| 901 fcb $00 | |
| 902 L06C1 fcc "symbol table full" | |
| 903 fcb $00 | |
| 904 L06D2 fcc "address mode" | |
| 905 fcb $00 | |
| 906 L06E0 fcc "out of range" | |
| 907 fcb $00 | |
| 908 L06EC fcc "result>255" | |
| 909 fcb $00 | |
| 910 L06F7 fcc "reg name" | |
| 911 fcb $00 | |
| 912 L0701 fcc "reg sizes" | |
| 913 fcb $00 | |
| 914 L070A fcc "input path" | |
| 915 fcb $00 | |
| 916 L0715 fcc "object path" | |
| 917 fcb $00 | |
| 918 L0722 fcc "index reg" | |
| 919 fcb $00 | |
| 920 L072C fcc "] missing" | |
| 921 fcb $00 | |
| 922 L0736 fcc "needs label" | |
| 923 fcb $00 | |
| 924 L0742 fcc "opt list" | |
| 925 fcb $00 | |
| 926 L074B fcc "const def" | |
| 927 fcb $00 | |
| 928 L0755 fcc "can't open " | |
| 929 fcb $00 | |
| 930 L0761 fcc "label not allowed" | |
| 931 fcb $00 | |
| 932 L0773 fcc "cond nesting" | |
| 933 fcb $00 | |
| 934 | |
| 935 L0780 fdb $001E | |
| 936 fdb $0025 | |
| 937 fdb $0039 | |
| 938 fdb $004E | |
| 939 fdb $0073 | |
| 940 fdb $00A6 | |
| 941 fdb $00AF | |
| 942 fdb $00C6 | |
| 943 fdb $0104 | |
| 944 fdb $011D | |
| 945 fdb $013A | |
| 946 fdb $015C | |
| 947 fdb $0161 | |
| 948 fdb $0179 | |
| 949 | |
| 950 L079C fdb $07A9 | |
| 951 lda #$03 | |
| 952 sta <u0046 | |
| 953 lbra L0951 | |
| 954 lbsr L0932 | |
| 955 bcc L07AF | |
| 956 ldb #$0C | |
| 957 lbsr L02FA | |
| 958 L07AF lbsr L12F7 | |
| 959 stb <u0063 | |
| 960 lda #$02 | |
| 961 sta <u0046 | |
| 962 rts | |
| 963 inc <u0046 | |
| 964 lbsr L0932 | |
| 965 lbcs L09C6 | |
| 966 lbsr L12F1 | |
| 967 std <u0063 | |
| 968 inc <u0046 | |
| 969 inc <u0046 | |
| 970 lbra L0941 | |
| 971 inc <u0046 | |
| 972 lda ,x+ | |
| 973 anda #$5F | |
| 974 cmpa #$41 | |
| 975 L07D6 beq L07E7 | |
| 976 cmpa #$42 | |
| 977 beq L07E1 | |
| 978 leas $02,s | |
| 979 lbra L015F | |
| 980 L07E1 ldb #$40 | |
| 981 orb <u0062 | |
| 982 stb <u0062 | |
| 983 L07E7 lbsr L0932 | |
| 984 lbcs L09C6 | |
| 985 lbsr L0941 | |
| 986 bra L07AF | |
| 987 inc <u0046 | |
| 988 lda <u0062 | |
| 989 cmpa #$0E | |
| 990 beq L080B | |
| 991 lda ,x | |
| 992 anda #$5F | |
| 993 ldb #$40 | |
| 994 cmpa #$41 | |
| 995 beq L0819 | |
| 996 ldb #$50 | |
| 997 cmpa #$42 | |
| 998 beq L0819 | |
| 999 L080B lbsr L09C6 | |
| 1000 ldb <u0062 | |
| 1001 bitb #$F0 | |
| 1002 beq L0825 | |
| 1003 orb #$40 | |
| 1004 stb <u0062 | |
| 1005 rts | |
| 1006 L0819 orb <u0062 | |
| 1007 stb <u0062 | |
| 1008 leax $01,x | |
| 1009 ldb #$DF | |
| 1010 andb <u002B | |
| 1011 stb <u002B | |
| 1012 L0825 rts | |
| 1013 inc <u0046 | |
| 1014 ldb <u002B | |
| 1015 andb #$DF | |
| 1016 stb <u002B | |
| 1017 rts | |
| 1018 inc <u0046 | |
| 1019 lbsr L09C6 | |
| 1020 lda <u004E | |
| 1021 bne L0825 | |
| 1022 ldd #$1212 | |
| 1023 std <u0062 | |
| 1024 ldb #$02 | |
| 1025 stb <u0046 | |
| 1026 ldb #$0C | |
| 1027 lbra L02FA | |
| 1028 ldb #$02 | |
| 1029 stb <u0046 | |
| 1030 lbsr L1164 | |
| 1031 lbsr L096B | |
| 1032 bcc L0857 | |
| 1033 L0852 ldb #$0F | |
| 1034 lbra L02FA | |
| 1035 L0857 lda ,x+ | |
| 1036 cmpa #$2C | |
| 1037 bne L0852 | |
| 1038 pshs b | |
| 1039 lbsr L096B | |
| 1040 puls a | |
| 1041 bcs L0852 | |
| 1042 pshs b,a | |
| 1043 anda #$08 | |
| 1044 andb #$08 | |
| 1045 pshs b | |
| 1046 eora ,s+ | |
| 1047 beq L0879 | |
| 1048 ldb #$10 | |
| 1049 leas $02,s | |
| 1050 lbra L02FA | |
| 1051 L0879 puls a | |
| 1052 lsla | |
| 1053 lsla | |
| 1054 lsla | |
| 1055 lsla | |
| 1056 ora ,s+ | |
| 1057 sta <u0063 | |
| 1058 rts | |
| 1059 ldb #$02 | |
| 1060 stb <u0046 | |
| 1061 lbsr L1164 | |
| 1062 L088B lbsr L096B | |
| 1063 bcs L0852 | |
| 1064 ora <u0063 | |
| 1065 sta <u0063 | |
| 1066 lda ,x+ | |
| 1067 cmpa #$2C | |
| 1068 beq L088B | |
| 1069 leax -$01,x | |
| 1070 rts | |
| 1071 lda #$04 | |
| 1072 sta <u0046 | |
| 1073 leax -$01,x | |
| 1074 ldb #$13 | |
| 1075 leay >L0530,pcr | |
| 1076 lbsr L0344 | |
| 1077 bcc L08B3 | |
| 1078 leas $02,s | |
| 1079 lbra L015F | |
| 1080 L08B3 lda ,y | |
| 1081 sta <u0062 | |
| 1082 lbra L0951 | |
| 1083 lda #$02 | |
| 1084 sta <u0046 | |
| 1085 lbsr L12F1 | |
| 1086 subd <u0040 | |
| 1087 subd #$0002 | |
| 1088 cmpd #$007F | |
| 1089 bgt L08D2 | |
| 1090 cmpd #$FF80 | |
| 1091 bge L08D9 | |
| 1092 L08D2 ldb #$0D | |
| 1093 lbsr L02FA | |
| 1094 ldb #$FE | |
| 1095 L08D9 stb <u0063 | |
| 1096 rts | |
| 1097 leau <L08FE,pcr | |
| 1098 bra L08EF | |
| 1099 ldb <u002B | |
| 1100 bitb #$08 | |
| 1101 beq L08EC | |
| 1102 ldb #$19 | |
| 1103 lbsr L02FA | |
| 1104 L08EC leau <L0912,pcr | |
| 1105 L08EF lbsr L1164 | |
| 1106 ldb <u0062 | |
| 1107 lslb | |
| 1108 ldd b,u | |
| 1109 jmp d,u | |
| 1110 leau <L0924,pcr | |
| 1111 bra L08EF | |
| 1112 L08FE fdb $02A8 | |
| 1113 fdb $0349 | |
| 1114 fdb $03C1 | |
| 1115 fdb $036D | |
| 1116 fdb $03AF | |
| 1117 fdb $0329 | |
| 1118 fdb $0462 | |
| 1119 fdb $0442 | |
| 1120 fdb $032D | |
| 1121 fdb $0453 | |
| 1122 L0912 fdb $04A7 | |
| 1123 fdb $04AF | |
| 1124 fdb $04C2 | |
| 1125 fdb $051A | |
| 1126 fdb $04EB | |
| 1127 fdb $04F1 | |
| 1128 fdb $04F7 | |
| 1129 fdb $05A1 | |
| 1130 fdb $05B2 | |
| 1131 L0924 fdb $05BF | |
| 1132 fdb $05C4 | |
| 1133 fdb $05C9 | |
| 1134 fdb $05CE | |
| 1135 fdb $05D3 | |
| 1136 fdb $05D8 | |
| 1137 fdb $05DD | |
| 1138 L0932 fcb $17,$08,$2f,$81,$23,$26,$05,$30,$01 | |
| 203 | 1139 andcc #^Carry |
| 0 | 1140 rts |
| 203 | 1141 L093E orcc #Carry |
| 0 | 1142 rts |
| 1143 L0941 ldb <u0047 | |
| 1144 bitb #$40 | |
| 1145 bne L0948 | |
| 1146 rts | |
| 1147 L0948 ldb #$03 | |
| 1148 stb <u0046 | |
| 1149 ldb #$0C | |
| 1150 lbra L02FA | |
| 1151 L0951 lbsr L12F1 | |
| 1152 subd <u0040 | |
| 1153 subb <u0046 | |
| 1154 sbca #$00 | |
| 1155 std <u0063 | |
| 1156 cmpd #$007F | |
| 1157 bgt L096A | |
| 1158 cmpd #$FF80 | |
| 1159 blt L096A | |
| 1160 inc <u004F | |
| 1161 L096A rts | |
| 1162 L096B leay >L09A2,pcr | |
| 1163 pshs x | |
| 1164 ldb #$0C | |
| 1165 L0973 lda ,y | |
| 1166 beq L098F | |
| 1167 cmpa ,x+ | |
| 1168 beq L0981 | |
| 1169 adda #$20 | |
| 1170 cmpa -$01,x | |
| 1171 bne L098F | |
| 1172 L0981 lda $01,y | |
| 1173 beq L099A | |
| 1174 cmpa ,x+ | |
| 1175 beq L099A | |
| 1176 adda #$20 | |
| 1177 cmpa -$01,x | |
| 1178 beq L099A | |
| 1179 L098F ldx ,s | |
| 1180 leay $03,y | |
| 1181 decb | |
| 1182 bne L0973 | |
| 203 | 1183 orcc #Carry |
| 0 | 1184 puls pc,x |
| 1185 L099A decb | |
| 1186 leas $02,s | |
| 1187 lda $02,y | |
| 203 | 1188 andcc #^Carry |
| 0 | 1189 rts |
| 1190 L09A2 lsra | |
| 1191 negb | |
| 1192 lsl <u0043 | |
| 1193 coma | |
| 1194 oim #$42,<u0000 | |
| 1195 lsr <u0041 | |
| 1196 neg <u0002 | |
| 1197 neg <u0000 | |
| 1198 neg <u0000 | |
| 1199 neg <u0000 | |
| 1200 negb | |
| 1201 coma | |
| 1202 suba #$53 | |
| 1203 neg <u0040 | |
| 1204 fcb $55 U | |
| 1205 neg <u0040 | |
| 1206 rolb | |
| 1207 neg <u0020 | |
| 1208 lslb | |
| 1209 neg <u0010 | |
| 1210 lsra | |
| 1211 neg <u0006 | |
| 1212 L09C6 lbsr L1164 | |
| 1213 bsr L0A14 | |
| 1214 cmpa #$5B | |
| 1215 bne L09D7 | |
| 1216 inc <u004D | |
| 1217 leax $01,x | |
| 1218 lda ,x | |
| 1219 bsr L0A14 | |
| 1220 L09D7 cmpa #$2C | |
| 1221 lbeq L0A64 | |
| 1222 ldb $01,x | |
| 1223 cmpb #$2C | |
| 1224 bne L09F1 | |
| 1225 anda #$DF | |
| 1226 cmpa #$41 | |
| 1227 beq L0A27 | |
| 1228 cmpa #$42 | |
| 1229 beq L0A2B | |
| 1230 cmpa #$44 | |
| 1231 beq L0A2F | |
| 1232 L09F1 lbsr L12F1 | |
| 1233 bcc L09F8 | |
| 1234 clra | |
| 1235 clrb | |
| 1236 L09F8 std <u004A | |
| 1237 lda ,x | |
| 1238 cmpa #$2C | |
| 1239 lbeq L0B18 | |
| 1240 ldb <u004D | |
| 1241 bne L0A35 | |
| 1242 ldb <u004C | |
| 1243 bmi L0A35 | |
| 1244 bne L0A53 | |
| 1245 lda <u004A | |
| 1246 cmpa <u003F | |
| 1247 beq L0A53 | |
| 1248 bra L0A35 | |
| 1249 L0A14 ldb #$FF | |
| 1250 cmpa #$3E | |
| 1251 beq L0A20 | |
| 1252 cmpa #$3C | |
| 1253 bne L0A26 | |
| 1254 ldb #$01 | |
| 1255 L0A20 stb <u004C | |
| 1256 leax $01,x | |
| 1257 lda ,x | |
| 1258 L0A26 rts | |
| 1259 L0A27 ldb #$86 | |
| 1260 bra L0A31 | |
| 1261 L0A2B ldb #$85 | |
| 1262 bra L0A31 | |
| 1263 L0A2F ldb #$8B | |
| 1264 L0A31 leax $01,x | |
| 1265 bra L0A97 | |
| 1266 L0A35 ldd <u004A | |
| 1267 inc <u0046 | |
| 1268 inc <u0046 | |
| 1269 inc <u004F | |
| 1270 tst <u004D | |
| 1271 bne L0A4A | |
| 1272 std <u0063 | |
| 1273 ldb #$30 | |
| 1274 orb <u0062 | |
| 1275 stb <u0062 | |
| 1276 rts | |
| 1277 L0A4A std <u0064 | |
| 1278 ldb #$9F | |
| 1279 stb <u0063 | |
| 1280 lbra L0AEA | |
| 1281 L0A53 inc <u0046 | |
| 1282 ldb <u004B | |
| 1283 stb <u0063 | |
| 1284 ldb <u0062 | |
| 1285 bitb #$F0 | |
| 1286 beq L0A63 | |
| 1287 orb #$10 | |
| 1288 stb <u0062 | |
| 1289 L0A63 rts | |
| 1290 L0A64 leax $01,x | |
| 1291 clr <u004A | |
| 1292 clr <u004B | |
| 1293 ldd ,x | |
| 1294 cmpd #$2D2D | |
| 1295 beq L0A8D | |
| 1296 cmpa #$2D | |
| 1297 beq L0A93 | |
| 1298 bsr L0AC7 | |
| 1299 lbcs L0B68 | |
| 1300 stb <u0063 | |
| 1301 ldd ,x | |
| 1302 cmpd #$2B2B | |
| 1303 beq L0AAB | |
| 1304 cmpa #$2B | |
| 1305 beq L0AB1 | |
| 1306 lbra L0B22 | |
| 1307 L0A8D leax $01,x | |
| 1308 ldb #$83 | |
| 1309 bra L0A97 | |
| 1310 L0A93 bsr L0ABD | |
| 1311 ldb #$82 | |
| 1312 L0A97 stb <u0063 | |
| 1313 leax $01,x | |
| 1314 bsr L0AC7 | |
| 1315 bcc L0AA5 | |
| 1316 L0A9F ldb #$13 | |
| 1317 lbsr L02FA | |
| 1318 clrb | |
| 1319 L0AA5 orb <u0063 | |
| 1320 stb <u0063 | |
| 1321 bra L0AEA | |
| 1322 L0AAB ldb #$81 | |
| 1323 leax $01,x | |
| 1324 bra L0AB5 | |
| 1325 L0AB1 bsr L0ABD | |
| 1326 ldb #$80 | |
| 1327 L0AB5 leax $01,x | |
| 1328 orb <u0063 | |
| 1329 stb <u0063 | |
| 1330 bra L0AEA | |
| 1331 L0ABD tst <u004D | |
| 1332 beq L0AC6 | |
| 1333 ldb #$0C | |
| 1334 lbsr L02FA | |
| 1335 L0AC6 rts | |
| 1336 L0AC7 lda ,x+ | |
| 1337 anda #$5F | |
| 1338 clrb | |
| 1339 cmpa #$58 | |
| 1340 beq L0AE2 | |
| 1341 ldb #$20 | |
| 1342 cmpa #$59 | |
| 1343 beq L0AE2 | |
| 1344 ldb #$40 | |
| 1345 cmpa #$55 | |
| 1346 beq L0AE2 | |
| 1347 ldb #$60 | |
| 1348 cmpa #$53 | |
| 1349 bne L0AE5 | |
| 203 | 1350 L0AE2 andcc #^Carry |
| 0 | 1351 rts |
| 1352 L0AE5 leax -$01,x | |
| 203 | 1353 orcc #Carry |
| 0 | 1354 rts |
| 1355 L0AEA ldb #$20 | |
| 1356 orb <u0062 | |
| 1357 stb <u0062 | |
| 1358 inc <u0046 | |
| 1359 inc <u004E | |
| 1360 tst <u004D | |
| 1361 beq L0B08 | |
| 1362 ldb #$10 | |
| 1363 orb <u0063 | |
| 1364 stb <u0063 | |
| 1365 lda ,x+ | |
| 1366 cmpa #$5D | |
| 1367 beq L0B08 | |
| 1368 ldb #$14 | |
| 1369 bra L0B14 | |
| 1370 L0B08 lda ,x | |
| 1371 cmpa #$20 | |
| 1372 beq L0B17 | |
| 1373 cmpa #$0D | |
| 1374 beq L0B17 | |
| 1375 ldb #$0C | |
| 1376 L0B14 lbsr L02FA | |
| 1377 L0B17 rts | |
| 1378 L0B18 leax $01,x | |
| 1379 bsr L0AC7 | |
| 1380 bcs L0B68 | |
| 1381 orb <u0063 | |
| 1382 stb <u0063 | |
| 1383 L0B22 ldd <u004A | |
| 1384 tst <u004C | |
| 1385 bmi L0B5A | |
| 1386 bne L0B52 | |
| 1387 ldd <u004A | |
| 1388 bne L0B32 | |
| 1389 ldb #$84 | |
| 1390 bra L0B62 | |
| 1391 L0B32 tst <u004D | |
| 1392 bne L0B46 | |
| 1393 cmpd #$000F | |
| 1394 bgt L0B46 | |
| 1395 cmpd #$FFF0 | |
| 1396 blt L0B46 | |
| 1397 andb #$1F | |
| 1398 bra L0B62 | |
| 1399 L0B46 cmpd #$007F | |
| 1400 bgt L0B5A | |
| 1401 cmpd #$FF80 | |
| 1402 blt L0B5A | |
| 1403 L0B52 stb <u0064 | |
| 1404 inc <u0046 | |
| 1405 ldb #$88 | |
| 1406 bra L0B62 | |
| 1407 L0B5A std <u0064 | |
| 1408 inc <u0046 | |
| 1409 inc <u0046 | |
| 1410 ldb #$89 | |
| 1411 L0B62 orb <u0063 | |
| 1412 stb <u0063 | |
| 1413 bra L0AEA | |
| 1414 L0B68 ldd ,x | |
| 1415 anda #$5F | |
| 1416 andb #$5F | |
| 1417 cmpd #$5043 | |
| 1418 lbne L0A9F | |
| 1419 leax $02,x | |
| 1420 lda ,x | |
| 1421 anda #$5F | |
| 1422 cmpa #$52 | |
| 1423 bne L0B82 | |
| 1424 leax $01,x | |
| 1425 L0B82 inc <u0046 | |
| 1426 ldd <u004A | |
| 1427 subd <u0040 | |
| 1428 subb <u0046 | |
| 1429 sbca #$00 | |
| 1430 subd #$0001 | |
| 1431 tst <u004C | |
| 1432 bmi L0B9B | |
| 1433 beq L0B9B | |
| 1434 stb <u0064 | |
| 1435 ldb #$8C | |
| 1436 bra L0B62 | |
| 1437 L0B9B subd #$0001 | |
| 1438 inc <u0046 | |
| 1439 std <u0064 | |
| 1440 ldb #$8D | |
| 1441 bra L0B62 | |
| 1442 bsr L0BE4 | |
| 1443 pshs b,a | |
| 1444 addd <u0026 | |
| 1445 std <u0026 | |
| 1446 bsr L0BEF | |
| 1447 beq L0BB6 | |
| 1448 lda #$04 | |
| 1449 bsr L0BF7 | |
| 1450 L0BB6 bsr L0BD8 | |
| 1451 bsr L0BEF | |
| 1452 beq L0BBE | |
| 1453 bsr L0C0A | |
| 1454 L0BBE addd ,s++ | |
| 1455 L0BC0 pshs a | |
| 1456 lda <u002B | |
| 1457 anda #$08 | |
| 1458 ora #$31 | |
| 1459 sta <u002B | |
| 1460 puls a | |
| 1461 tst <u005A | |
| 1462 beq L0BD3 | |
| 1463 std <u0040 | |
| 1464 rts | |
| 1465 L0BD3 std <u0042 | |
| 1466 inc <u002C | |
| 1467 rts | |
| 1468 L0BD8 tst <u005A | |
| 1469 beq L0BDF | |
| 1470 ldd <u0040 | |
| 1471 rts | |
| 1472 L0BDF ldd <u0042 | |
| 1473 std <u0044 | |
| 1474 rts | |
| 1475 L0BE4 lbsr L11C2 | |
| 1476 bcc L0BEE | |
| 1477 lbsr L02FA | |
| 1478 clra | |
| 1479 clrb | |
| 1480 L0BEE rts | |
| 1481 L0BEF pshs a | |
| 1482 lda <u002B | |
| 1483 bita #$08 | |
| 1484 puls pc,a | |
| 1485 L0BF7 ldu <u002D | |
| 1486 ldb u0008,u | |
| 1487 bmi L0C09 | |
| 1488 cmpb #$02 | |
| 1489 bne L0C07 | |
| 1490 cmpa #$02 | |
| 1491 beq L0C07 | |
| 1492 ora #$80 | |
| 1493 L0C07 sta u0008,u | |
| 1494 L0C09 rts | |
| 1495 L0C0A tst <u003E | |
| 1496 ble L0C24 | |
| 1497 cmpd u0009,u | |
| 1498 beq L0C26 | |
| 1499 pshs b,a | |
| 1500 lda u0008,u | |
| 1501 bmi L0C22 | |
| 1502 cmpa #$02 | |
| 1503 beq L0C22 | |
| 1504 ldb #$0A | |
| 1505 lbsr L02FA | |
| 1506 L0C22 puls b,a | |
| 1507 L0C24 std u0009,u | |
| 1508 L0C26 rts | |
| 1509 lda #$03 | |
| 1510 bra L0C2D | |
| 1511 lda #$02 | |
| 1512 L0C2D bsr L0BEF | |
| 1513 bne L0C38 | |
| 1514 ldb #$15 | |
| 1515 lbsr L02FA | |
| 1516 bra L0C46 | |
| 1517 L0C38 bsr L0BF7 | |
| 1518 bsr L0BE4 | |
| 1519 ldu <u002D | |
| 1520 bsr L0C0A | |
| 1521 std <u0044 | |
| 1522 ldb #$39 | |
| 1523 stb <u002B | |
| 1524 L0C46 rts | |
| 1525 lda ,x+ | |
| 1526 pshs a | |
| 1527 cmpa #$0D | |
| 1528 beq L0C64 | |
| 1529 cmpa #$2F | |
| 1530 bhi L0C64 | |
| 1531 bsr L0C8D | |
| 1532 L0C55 lda ,x+ | |
| 1533 cmpa ,s | |
| 1534 beq L0C69 | |
| 1535 cmpa #$0D | |
| 1536 beq L0C64 | |
| 1537 lbsr L0CEC | |
| 1538 bra L0C55 | |
| 1539 L0C64 ldb #$17 | |
| 1540 lbsr L02FA | |
| 1541 L0C69 puls pc,a | |
| 1542 lda ,x+ | |
| 1543 pshs a | |
| 1544 cmpa #$0D | |
| 1545 beq L0C64 | |
| 1546 cmpa #$2F | |
| 1547 bhi L0C64 | |
| 1548 bsr L0C8D | |
| 1549 L0C79 ldd ,x+ | |
| 1550 cmpa #$0D | |
| 1551 beq L0C64 | |
| 1552 cmpa ,s | |
| 1553 beq L0C69 | |
| 1554 cmpb ,s | |
| 1555 bne L0C89 | |
| 1556 ora #$80 | |
| 1557 L0C89 bsr L0CEC | |
| 1558 bra L0C79 | |
| 1559 L0C8D pshs x,a | |
| 1560 leax -$01,x | |
| 1561 L0C91 leax $01,x | |
| 1562 lda ,x | |
| 1563 cmpa #$0D | |
| 1564 beq L0CA1 | |
| 1565 cmpa ,s | |
| 1566 bne L0C91 | |
| 1567 leax $01,x | |
| 1568 lda ,x | |
| 1569 L0CA1 clr ,x+ | |
| 1570 stx <u0033 | |
| 1571 cmpa #$0D | |
| 1572 bne L0CAB | |
| 1573 sta ,x | |
| 1574 L0CAB puls pc,x,a | |
| 1575 bsr L0CD5 | |
| 1576 L0CAF lbsr L12F7 | |
| 1577 tfr b,a | |
| 1578 bsr L0CEC | |
| 1579 lda ,x+ | |
| 1580 cmpa #$2C | |
| 1581 beq L0CAF | |
| 1582 leax -$01,x | |
| 1583 rts | |
| 1584 bsr L0CD5 | |
| 1585 L0CC1 lbsr L12F1 | |
| 1586 pshs b | |
| 1587 bsr L0CEC | |
| 1588 puls a | |
| 1589 bsr L0CEC | |
| 1590 lda ,x+ | |
| 1591 cmpa #$2C | |
| 1592 beq L0CC1 | |
| 1593 leax -$01,x | |
| 1594 rts | |
| 1595 L0CD5 pshs x | |
| 1596 L0CD7 lbsr L12F1 | |
| 1597 lda ,x+ | |
| 1598 cmpa #$2C | |
| 1599 beq L0CD7 | |
| 1600 clr -$01,x | |
| 1601 stx <u0033 | |
| 1602 cmpa #$0D | |
| 1603 bne L0CEA | |
| 1604 sta ,x | |
| 1605 L0CEA puls pc,x | |
| 1606 L0CEC ldb <u0046 | |
| 1607 cmpb #$04 | |
| 1608 bcs L0CF4 | |
| 1609 bsr L0D03 | |
| 1610 L0CF4 pshs b,a | |
| 1611 tfr dp,a | |
| 1612 ldb #$62 | |
| 1613 tfr d,u | |
| 1614 puls b,a | |
| 1615 sta b,u | |
| 1616 inc <u0046 | |
| 1617 rts | |
| 1618 L0D03 pshs x,b,a | |
| 1619 ldb <u002A | |
| 1620 bne L0D14 | |
| 1621 ldx <u0033 | |
| 1622 lbsr L01C4 | |
| 1623 tst <u005B | |
| 1624 beq L0D27 | |
| 1625 bra L0D30 | |
| 1626 L0D14 tst <u005B | |
| 1627 bne L0D2D | |
| 1628 lda <u0056 | |
| 1629 pshs a | |
| 1630 clr <u0056 | |
| 1631 com <u0056 | |
| 1632 lbsr L01D3 | |
| 1633 puls a | |
| 1634 sta <u0056 | |
| 1635 L0D27 ldb #$04 | |
| 1636 stb <u002B | |
| 1637 bra L0D34 | |
| 1638 L0D2D lbsr L01D3 | |
| 1639 L0D30 ldb #$05 | |
| 1640 stb <u002B | |
| 1641 L0D34 ldd <u0040 | |
| 1642 std <u0044 | |
| 1643 clr <u0046 | |
| 1644 inc <u002A | |
| 1645 clr $01,s | |
| 1646 puls pc,x,b,a | |
| 1647 ldd <u0051 | |
| 1648 coma | |
| 1649 comb | |
| 1650 std <u0062 | |
| 1651 ldb <u0053 | |
| 1652 comb | |
| 1653 lda <u002B | |
| 1654 anda #$DF | |
| 1655 sta <u002B | |
| 1656 bra L0D59 | |
| 1657 ldd #$103F | |
| 1658 std <u0062 | |
| 1659 lbsr L12F7 | |
| 1660 L0D59 stb <u0064 | |
| 1661 ldb #$03 | |
| 1662 stb <u0046 | |
| 1663 rts | |
| 1664 clra | |
| 1665 clrb | |
| 1666 stb <u0050 | |
| 1667 std <u0040 | |
| 1668 std <u0044 | |
| 1669 std <u0042 | |
| 1670 lbsr L1360 | |
| 1671 lbsr L0CD5 | |
| 1672 ldd #$87CD | |
| 1673 bsr L0D93 | |
| 1674 bsr L0D90 | |
| 1675 bsr L0D8E | |
| 1676 bsr L0DA9 | |
| 1677 bsr L0DA4 | |
| 1678 bsr L0DA9 | |
| 1679 bsr L0DA4 | |
| 1680 lda <u0050 | |
| 1681 coma | |
| 1682 bsr L0DA1 | |
| 1683 lda ,x | |
| 1684 cmpa #$2C | |
| 1685 bne L0DB8 | |
| 1686 bsr L0D8E | |
| 1687 L0D8E bsr L0DA9 | |
| 1688 L0D90 lbsr L12F1 | |
| 1689 L0D93 pshs b | |
| 1690 tfr a,b | |
| 1691 bsr L0D9B | |
| 1692 puls b | |
| 1693 L0D9B tfr b,a | |
| 1694 eorb <u0050 | |
| 1695 stb <u0050 | |
| 1696 L0DA1 lbra L0CEC | |
| 1697 L0DA4 lbsr L12F7 | |
| 1698 bra L0D9B | |
| 1699 L0DA9 lda ,x+ | |
| 1700 cmpa #$2C | |
| 1701 beq L0DB8 | |
| 1702 leax -$01,x | |
| 1703 ldb #$17 | |
| 1704 lbsr L02FA | |
| 1705 leas $02,s | |
| 1706 L0DB8 rts | |
| 1707 lbsr L0BE4 | |
| 1708 std <u0044 | |
| 1709 lbra L0BC0 | |
| 1710 ldb <u002B | |
| 1711 andb #$08 | |
| 1712 orb #$10 | |
| 1713 stb <u002B | |
| 1714 lbsr L01F2 | |
| 1715 lbsr L156C | |
| 1716 bcc L0DD3 | |
| 1717 leas $04,s | |
| 1718 L0DD3 rts | |
| 1719 ldb #$27 | |
| 1720 ldu <u000A | |
| 1721 L0DD8 lbsr L1164 | |
| 1722 lda <u003E | |
| 1723 bne L0DE3 | |
| 1724 lda ,u | |
| 1725 bne L0DFC | |
| 1726 L0DE3 lda ,x+ | |
| 1727 cmpa #$0D | |
| 1728 beq L0DF4 | |
| 1729 sta ,u+ | |
| 1730 decb | |
| 1731 bne L0DE3 | |
| 1732 lda #$0D | |
| 1733 L0DF0 cmpa ,x+ | |
| 1734 bne L0DF0 | |
| 1735 L0DF4 clr ,u | |
| 1736 leax -$01,x | |
| 1737 ldb #$30 | |
| 1738 stb <u002B | |
| 1739 L0DFC rts | |
| 1740 ldb #$4F | |
| 1741 ldu <u0008 | |
| 1742 bra L0DD8 | |
| 1743 lbsr L1408 | |
| 1744 L0E06 leas $02,s | |
| 1745 rts | |
| 1746 bsr L0E21 | |
| 1747 bcc L0E12 | |
| 1748 ldb #$30 | |
| 1749 stb <u002B | |
| 1750 rts | |
| 1751 L0E12 stb ,-s | |
| 1752 beq L0E1D | |
| 1753 L0E16 lbsr L149A | |
| 1754 dec ,s | |
| 1755 bne L0E16 | |
| 1756 L0E1D leas $01,s | |
| 1757 bra L0E06 | |
| 1758 L0E21 lbsr L10B4 | |
| 1759 bcc L0E2B | |
| 1760 lbsr L02FA | |
| 203 | 1761 orcc #Carry |
| 0 | 1762 L0E2B rts |
| 1763 L0E2C ldb #$30 | |
| 1764 stb <u002B | |
| 1765 lbsr L1164 | |
| 1766 L0E33 clr ,-s | |
| 1767 lda ,x+ | |
| 1768 cmpa #$2D | |
| 1769 bne L0E3F | |
| 1770 com ,s | |
| 1771 lda ,x+ | |
| 1772 L0E3F leau <L0EA3,pcr | |
| 1773 ldb #$08 | |
| 1774 cmpa #$61 | |
| 1775 bcs L0E4A | |
| 1776 suba #$20 | |
| 1777 L0E4A cmpa ,u++ | |
| 1778 beq L0E68 | |
| 1779 decb | |
| 1780 bne L0E4A | |
| 1781 puls b | |
| 1782 cmpa #$44 | |
| 1783 beq L0E88 | |
| 1784 cmpa #$57 | |
| 1785 beq L0E80 | |
| 1786 cmpa #$4C | |
| 1787 beq L0E90 | |
| 1788 cmpa #$4E | |
| 1789 beq L0E9B | |
| 1790 L0E63 ldb #$16 | |
| 1791 lbra L02FA | |
| 1792 L0E68 ldb -u0001,u | |
| 1793 tfr dp,a | |
| 1794 tfr d,u | |
| 1795 puls a | |
| 1796 coma | |
| 1797 sta ,u | |
| 1798 L0E73 lda ,x+ | |
| 1799 cmpa #$2C | |
| 1800 beq L0E33 | |
| 1801 cmpa #$20 | |
| 1802 beq L0E2C | |
| 1803 leax -$01,x | |
| 1804 rts | |
| 1805 L0E80 bsr L0E21 | |
| 1806 bcs L0E63 | |
| 1807 stb <u0037 | |
| 1808 bra L0E73 | |
| 1809 L0E88 bsr L0E21 | |
| 1810 bcs L0E63 | |
| 1811 stb <u0036 | |
| 1812 bra L0E73 | |
| 1813 L0E90 tstb | |
| 1814 beq L0E97 | |
| 1815 dec <u0056 | |
| 1816 bra L0E73 | |
| 1817 L0E97 inc <u0056 | |
| 1818 bra L0E73 | |
| 1819 L0E9B inc <u0060 | |
| 1820 lda #$1F | |
| 1821 sta <u0037 | |
| 1822 bra L0E97 | |
| 1823 L0EA3 coma | |
| 1824 clrb | |
| 1825 rora | |
| 1826 rolb | |
| 1827 tsta | |
| 1828 decb | |
| 1829 asra | |
| 1830 fcb $5B [ | |
| 1831 fcb $45 E | |
| 1832 incb | |
| 1833 comb | |
| 1834 fcb $5E ^ | |
| 1835 rola | |
| 1836 tstb | |
| 1837 clra | |
| 1838 lslb | |
| 1839 lbsr L12F7 | |
| 1840 bcs L0EBA | |
| 1841 stb <u003F | |
| 1842 L0EBA clra | |
| 1843 std <u0044 | |
| 1844 ldb #$31 | |
| 1845 stb <u002B | |
| 1846 inc <u002C | |
| 1847 rts | |
| 1848 lbsr L1164 | |
| 1849 lbsr L15FB | |
| 1850 bra L0ECE | |
| 1851 L0ECC leax -$01,x | |
| 1852 L0ECE ldb -$01,x | |
| 1853 cmpb #$20 | |
| 1854 beq L0ECC | |
| 1855 ldu <u001F | |
| 1856 ldb <u0018 | |
| 1857 pshu b | |
| 1858 stu <u001F | |
| 1859 sta <u0018 | |
| 1860 ldb #$30 | |
| 1861 stb <u002B | |
| 1862 rts | |
| 1863 bsr L0F0F | |
| 1864 bne L0F0C | |
| 1865 rts | |
| 1866 bsr L0F0F | |
| 1867 beq L0F0C | |
| 1868 rts | |
| 1869 bsr L0F0F | |
| 1870 bge L0F0C | |
| 1871 rts | |
| 1872 bsr L0F0F | |
| 1873 bgt L0F0C | |
| 1874 rts | |
| 1875 bsr L0F0F | |
| 1876 blt L0F0C | |
| 1877 rts | |
| 1878 bsr L0F0F | |
| 1879 ble L0F0C | |
| 1880 rts | |
| 1881 inc <u0055 | |
| 1882 ldb #$10 | |
| 1883 bsr L0F21 | |
| 1884 lda <u003E | |
| 1885 bne L0F0C | |
| 1886 rts | |
| 1887 L0F0C inc <u0054 | |
| 1888 rts | |
| 1889 L0F0F inc <u0055 | |
| 1890 ldb #$30 | |
| 1891 bsr L0F21 | |
| 1892 lbsr L12F1 | |
| 1893 bcc L0F1C | |
| 1894 puls pc,b,a | |
| 1895 L0F1C cmpd #$0000 | |
| 1896 rts | |
| 1897 L0F21 tst <u005F | |
| 1898 bne L0F26 | |
| 1899 clrb | |
| 1900 L0F26 stb <u002B | |
| 1901 rts | |
| 1902 ldb #$10 | |
| 1903 bsr L0F21 | |
| 1904 lda <u0055 | |
| 1905 beq L0F42 | |
| 1906 lda <u0062 | |
| 1907 bne L0F3B | |
| 1908 dec <u0055 | |
| 1909 lda <u0054 | |
| 1910 beq L0F41 | |
| 1911 L0F3B lda <u0054 | |
| 1912 beq L0F0C | |
| 1913 dec <u0054 | |
| 1914 L0F41 rts | |
| 1915 L0F42 ldb #$1A | |
| 1916 lbsr L02FA | |
| 1917 clr <u0054 | |
| 1918 rts | |
| 1919 L0F4A pshs u,y,x | |
| 1920 bsr L0FC3 | |
| 1921 stx <u002D | |
| 1922 ldb <u003E | |
| 1923 bgt L0F7D | |
| 1924 bcc L0F63 | |
| 1925 lda #$01 | |
| 1926 ldu <u0040 | |
| 1927 lbsr L100B | |
| 1928 stx <u002D | |
| 1929 bcc L0F9E | |
| 1930 bra L0F9A | |
| 1931 L0F63 cmpa #$00 | |
| 1932 bne L0F71 | |
| 1933 lda #$01 | |
| 1934 ldu <u0040 | |
| 1935 sta $08,x | |
| 1936 stu $09,x | |
| 1937 bra L0F9E | |
| 1938 L0F71 cmpa #$02 | |
| 1939 beq L0F9E | |
| 1940 ora #$80 | |
| 1941 sta $08,x | |
| 1942 L0F79 ldb #$08 | |
| 1943 bra L0F9A | |
| 1944 L0F7D bcc L0F83 | |
| 1945 L0F7F ldb #$09 | |
| 1946 bra L0F9A | |
| 1947 L0F83 cmpa #$00 | |
| 1948 beq L0F7F | |
| 1949 bita #$80 | |
| 1950 bne L0F79 | |
| 1951 cmpa #$01 | |
| 1952 bne L0F9E | |
| 1953 ldd <u0040 | |
| 1954 cmpd $09,x | |
| 1955 beq L0F9E | |
| 1956 std $09,x | |
| 1957 ldb #$0A | |
| 203 | 1958 L0F9A orcc #Carry |
| 0 | 1959 puls pc,u,y,x |
| 203 | 1960 L0F9E andcc #^Carry |
| 0 | 1961 puls pc,u,y,x |
| 1962 L0FA2 pshs u,y,x | |
| 1963 bsr L0FC3 | |
| 1964 ldb <u003E | |
| 1965 bne L0FBB | |
| 1966 bcc L0FB7 | |
| 1967 lda #$00 | |
| 1968 ldu #$0000 | |
| 1969 bsr L100B | |
| 1970 bcs L0F9A | |
| 1971 bra L0F9E | |
| 1972 L0FB7 ldd $09,x | |
| 1973 bra L0F9E | |
| 1974 L0FBB lda $08,x | |
| 1975 cmpa #$00 | |
| 1976 bne L0FB7 | |
| 1977 bra L0F7F | |
| 1978 L0FC3 bsr L0FFA | |
| 1979 ldx ,x | |
| 1980 bne L0FCD | |
| 1981 leay ,x | |
| 1982 bra L0FF7 | |
| 1983 L0FCD pshs x | |
| 1984 ldy <u0016 | |
| 1985 ldb #$08 | |
| 1986 L0FD4 lda ,y+ | |
| 1987 beq L0FE5 | |
| 1988 cmpa ,x+ | |
| 1989 bne L0FE9 | |
| 1990 decb | |
| 1991 bne L0FD4 | |
| 1992 L0FDF puls x | |
| 1993 lda $08,x | |
| 1994 clrb | |
| 1995 rts | |
| 1996 L0FE5 cmpa ,x+ | |
| 1997 beq L0FDF | |
| 1998 L0FE9 puls y | |
| 1999 bhi L0FF3 | |
| 2000 ldx $0B,y | |
| 2001 bne L0FCD | |
| 2002 bra L0FF7 | |
| 2003 L0FF3 ldx $0D,y | |
| 2004 bne L0FCD | |
| 203 | 2005 L0FF7 orcc #Carry |
| 0 | 2006 rts |
| 2007 L0FFA ldx <u0016 | |
| 2008 ldb ,x | |
| 2009 ldx <u0010 | |
| 2010 subb #$41 | |
| 2011 cmpb #$20 | |
| 2012 bcs L1008 | |
| 2013 subb #$06 | |
| 2014 L1008 lslb | |
| 2015 abx | |
| 2016 rts | |
| 2017 L100B ldx <u001D | |
| 2018 pshs x,a | |
| 2019 leax $0F,x | |
| 2020 cmpx <u0012 | |
| 2021 bcs L1023 | |
| 2022 ldb #$0B | |
| 2023 L1017 clr <u0056 | |
| 2024 lda #$01 | |
| 2025 sta <u003E | |
| 2026 lbsr L02FA | |
| 2027 lbra L15E9 | |
| 2028 L1023 stx <u001D | |
| 2029 sty ,--s | |
| 2030 bne L1032 | |
| 2031 leas $02,s | |
| 2032 bsr L0FFA | |
| 2033 leay -$0B,x | |
| 2034 bra L1040 | |
| 2035 L1032 ldx <u0016 | |
| 2036 L1034 lda ,x+ | |
| 2037 cmpa ,y+ | |
| 2038 beq L1034 | |
| 2039 puls y | |
| 2040 bcs L1040 | |
| 2041 leay $02,y | |
| 2042 L1040 ldx $01,s | |
| 2043 stx $0B,y | |
| 2044 ldy <u0016 | |
| 2045 lda ,y+ | |
| 2046 L1049 sta ,x+ | |
| 2047 lda ,y+ | |
| 2048 bne L1049 | |
| 2049 puls x,a | |
| 2050 sta $08,x | |
| 2051 stu $09,x | |
| 2052 clrb | |
| 2053 rts | |
| 2054 L1057 bsr L1065 | |
| 2055 bra L105D | |
| 2056 bsr L106B | |
| 2057 L105D pshs a | |
| 2058 lda #$20 | |
| 2059 sta ,x+ | |
| 2060 puls pc,a | |
| 2061 L1065 exg a,b | |
| 2062 bsr L106B | |
| 2063 tfr a,b | |
| 2064 L106B pshs b | |
| 2065 andb #$F0 | |
| 2066 lsrb | |
| 2067 lsrb | |
| 2068 lsrb | |
| 2069 lsrb | |
| 2070 bsr L1079 | |
| 2071 puls b | |
| 2072 andb #$0F | |
| 2073 L1079 cmpb #$09 | |
| 2074 bls L107F | |
| 2075 addb #$07 | |
| 2076 L107F addb #$30 | |
| 2077 stb ,x+ | |
| 2078 rts | |
| 2079 L1084 pshs u,y,b | |
| 2080 leau >L10AA,pcr | |
| 2081 ldy #$0005 | |
| 2082 L108E clr ,s | |
| 2083 L1090 subd ,u | |
| 2084 bcs L1098 | |
| 2085 inc ,s | |
| 2086 bra L1090 | |
| 2087 L1098 addd ,u++ | |
| 2088 pshs b | |
| 2089 ldb $01,s | |
| 2090 addb #$30 | |
| 2091 stb ,x+ | |
| 2092 puls b | |
| 2093 leay -$01,y | |
| 2094 bne L108E | |
| 2095 puls pc,u,y,b | |
| 2096 L10AA fdb $2710 | |
| 2097 fdb $03E8 | |
| 2098 fdb $0064 | |
| 2099 fdb $000A | |
| 2100 fdb $0001 | |
| 2101 L10B4 lbsr L1164 | |
| 2102 leax $01,x | |
| 2103 cmpa #$25 | |
| 2104 beq L111D | |
| 2105 cmpa #$24 | |
| 2106 beq L10C5 | |
| 2107 leax -$01,x | |
| 2108 bra L10F7 | |
| 2109 L10C5 leas -$04,s | |
| 2110 bsr L1134 | |
| 2111 L10C9 bsr L113B | |
| 2112 bcc L10DD | |
| 2113 cmpb #$61 | |
| 2114 bcs L10D3 | |
| 2115 subb #$20 | |
| 2116 L10D3 cmpb #$41 | |
| 2117 bcs L114D | |
| 2118 cmpb #$46 | |
| 2119 bhi L114D | |
| 2120 subb #$37 | |
| 2121 L10DD stb ,s | |
| 2122 ldd $02,s | |
| 2123 bita #$F0 | |
| 2124 bne L1160 | |
| 2125 lslb | |
| 2126 rola | |
| 2127 lslb | |
| 2128 rola | |
| 2129 lslb | |
| 2130 rola | |
| 2131 lslb | |
| 2132 rola | |
| 2133 addb ,s | |
| 2134 adca #$00 | |
| 2135 std $02,s | |
| 2136 inc $01,s | |
| 2137 bra L10C9 | |
| 2138 L10F7 leas -$04,s | |
| 2139 bsr L1134 | |
| 2140 L10FB bsr L113B | |
| 2141 bcs L114D | |
| 2142 stb ,s | |
| 2143 ldd $02,s | |
| 2144 lslb | |
| 2145 rola | |
| 2146 std $02,s | |
| 2147 lslb | |
| 2148 rola | |
| 2149 lslb | |
| 2150 rola | |
| 2151 bcs L1160 | |
| 2152 addd $02,s | |
| 2153 bcs L1160 | |
| 2154 addb ,s | |
| 2155 adca #$00 | |
| 2156 bcs L1160 | |
| 2157 std $02,s | |
| 2158 inc $01,s | |
| 2159 bra L10FB | |
| 2160 L111D leas -$04,s | |
| 2161 bsr L1134 | |
| 2162 L1121 ldb ,x+ | |
| 2163 subb #$30 | |
| 2164 bcs L114D | |
| 2165 lsrb | |
| 2166 bne L114D | |
| 2167 rol $03,s | |
| 2168 rol $02,s | |
| 2169 bcs L1160 | |
| 2170 inc $01,s | |
| 2171 bra L1121 | |
| 2172 L1134 clra | |
| 2173 clrb | |
| 2174 std $02,s | |
| 2175 std $04,s | |
| 2176 rts | |
| 2177 L113B ldb ,x+ | |
| 2178 cmpb #$30 | |
| 2179 bcs L1145 | |
| 2180 cmpb #$39 | |
| 2181 bls L1148 | |
| 203 | 2182 L1145 orcc #Carry |
| 0 | 2183 rts |
| 2184 L1148 subb #$30 | |
| 203 | 2185 andcc #^Carry |
| 0 | 2186 rts |
| 2187 L114D leax -$01,x | |
| 2188 tst $01,s | |
| 2189 beq L1159 | |
| 2190 ldd $02,s | |
| 203 | 2191 andcc #^Carry |
| 0 | 2192 bra L115D |
| 203 | 2193 L1159 orcc #Zero |
| 2194 L115B orcc #Carry | |
| 0 | 2195 L115D leas $04,s |
| 2196 rts | |
| 203 | 2197 L1160 andcc #^Zero |
| 0 | 2198 bra L115B |
| 2199 L1164 lda ,x+ | |
| 2200 cmpa #$20 | |
| 2201 beq L1164 | |
| 2202 leax -$01,x | |
| 2203 rts | |
| 2204 L116D pshs x,b,a | |
| 2205 lda $03,s | |
| 2206 mul | |
| 2207 pshs b,a | |
| 2208 lda $02,s | |
| 2209 ldb $05,s | |
| 2210 mul | |
| 2211 addb ,s | |
| 2212 stb ,s | |
| 2213 lda $03,s | |
| 2214 ldb $04,s | |
| 2215 mul | |
| 2216 addb ,s | |
| 2217 stb ,s | |
| 2218 ldd ,s | |
| 2219 ldx #$0000 | |
| 2220 leas $06,s | |
| 2221 rts | |
| 2222 L118E pshs y,x,b,a | |
| 2223 ldd ,s | |
| 2224 bne L1198 | |
| 203 | 2225 orcc #Carry |
| 0 | 2226 bra L11B8 |
| 2227 L1198 ldd #$0010 | |
| 2228 stb $04,s | |
| 2229 clrb | |
| 2230 L119E lsl $03,s | |
| 2231 rol $02,s | |
| 2232 rolb | |
| 2233 rola | |
| 2234 subd ,s | |
| 2235 bmi L11AC | |
| 2236 inc $03,s | |
| 2237 bra L11AE | |
| 2238 L11AC addd ,s | |
| 2239 L11AE dec $04,s | |
| 2240 bne L119E | |
| 2241 tfr d,x | |
| 2242 ldd $02,s | |
| 203 | 2243 andcc #^Carry |
| 0 | 2244 L11B8 leas $06,s |
| 2245 rts | |
| 2246 L11BB sta ,x+ | |
| 2247 L11BD lda ,y+ | |
| 2248 bne L11BB | |
| 2249 rts | |
| 2250 L11C2 pshs u,y | |
| 2251 leau ,s | |
| 2252 bsr L1164 | |
| 2253 bsr L11D0 | |
| 203 | 2254 andcc #^Carry |
| 0 | 2255 puls pc,u,y |
| 2256 L11CE leax $01,x | |
| 2257 L11D0 bsr L1211 | |
| 2258 pshs b,a | |
| 2259 L11D4 lda ,x | |
| 2260 cmpa #$2D | |
| 2261 bne L11E2 | |
| 2262 bsr L120F | |
| 2263 nega | |
| 2264 negb | |
| 2265 sbca #$00 | |
| 2266 bra L11E8 | |
| 2267 L11E2 cmpa #$2B | |
| 2268 bne L11EE | |
| 2269 bsr L120F | |
| 2270 L11E8 addd ,s | |
| 2271 std ,s | |
| 2272 bra L11D4 | |
| 2273 L11EE tsta | |
| 2274 beq L120D | |
| 2275 cmpa #$0D | |
| 2276 beq L120D | |
| 2277 cmpa #$20 | |
| 2278 beq L120D | |
| 2279 cmpa #$2C | |
| 2280 beq L120D | |
| 2281 cmpa #$29 | |
| 2282 beq L120D | |
| 2283 cmpa #$5D | |
| 2284 beq L120D | |
| 2285 L1205 ldb #$06 | |
| 2286 L1207 leas ,u | |
| 203 | 2287 orcc #Carry |
| 0 | 2288 puls pc,u,y |
| 2289 L120D puls pc,b,a | |
| 2290 L120F leax $01,x | |
| 2291 L1211 bsr L123F | |
| 2292 pshs b,a | |
| 2293 L1215 lda ,x | |
| 2294 cmpa #$2F | |
| 2295 bne L122A | |
| 2296 bsr L123D | |
| 2297 pshs x | |
| 2298 ldx $02,s | |
| 2299 lbsr L118E | |
| 2300 bcc L1237 | |
| 2301 ldb #$04 | |
| 2302 bra L1207 | |
| 2303 L122A cmpa #$2A | |
| 2304 bne L120D | |
| 2305 bsr L123D | |
| 2306 pshs x | |
| 2307 ldx $02,s | |
| 2308 lbsr L116D | |
| 2309 L1237 puls x | |
| 2310 std ,s | |
| 2311 bra L1215 | |
| 2312 L123D leax $01,x | |
| 2313 L123F bsr L126D | |
| 2314 pshs b,a | |
| 2315 L1243 lda ,x | |
| 2316 cmpa #$26 | |
| 2317 bne L1251 | |
| 2318 bsr L126B | |
| 2319 andb $01,s | |
| 2320 anda ,s | |
| 2321 bra L1267 | |
| 2322 L1251 cmpa #$21 | |
| 2323 bne L125D | |
| 2324 bsr L126B | |
| 2325 orb $01,s | |
| 2326 ora ,s | |
| 2327 bra L1267 | |
| 2328 L125D cmpa #$3F | |
| 2329 bne L120D | |
| 2330 bsr L126B | |
| 2331 eorb $01,s | |
| 2332 eora ,s | |
| 2333 L1267 std ,s | |
| 2334 bra L1243 | |
| 2335 L126B leax $01,x | |
| 2336 L126D lda ,x | |
| 2337 cmpa #$5E | |
| 2338 bne L1279 | |
| 2339 bsr L1284 | |
| 2340 comb | |
| 2341 coma | |
| 2342 bra L1283 | |
| 2343 L1279 cmpa #$2D | |
| 2344 bne L1286 | |
| 2345 bsr L1284 | |
| 2346 nega | |
| 2347 negb | |
| 2348 sbca #$00 | |
| 2349 L1283 rts | |
| 2350 L1284 leax $01,x | |
| 2351 L1286 lda ,x | |
| 2352 cmpa #$28 | |
| 2353 bne L12A2 | |
| 2354 lbsr L11CE | |
| 2355 pshs b,a | |
| 2356 lda ,x | |
| 2357 cmpa #$29 | |
| 2358 puls b,a | |
| 2359 beq L12B6 | |
| 2360 ldb <u0007 | |
| 2361 bra L129D | |
| 2362 L129D leas $02,s | |
| 2363 L129F lbra L1207 | |
| 2364 L12A2 cmpa #$2A | |
| 2365 bne L12AA | |
| 2366 ldd <u0040 | |
| 2367 bra L12B6 | |
| 2368 L12AA tst <u005A | |
| 2369 bne L12B9 | |
| 2370 cmpa #$2E | |
| 2371 bne L12B9 | |
| 2372 ldd <u0042 | |
| 2373 inc <u002C | |
| 2374 L12B6 leax $01,x | |
| 2375 rts | |
| 2376 L12B9 cmpa #$27 | |
| 2377 bne L12C5 | |
| 2378 ldd ,x++ | |
| 2379 cmpb #$0D | |
| 2380 beq L12D6 | |
| 2381 clra | |
| 2382 rts | |
| 2383 L12C5 cmpa #$22 | |
| 2384 bne L12D9 | |
| 2385 leax $01,x | |
| 2386 ldd ,x++ | |
| 2387 cmpa #$0D | |
| 2388 beq L12D6 | |
| 2389 cmpb #$0D | |
| 2390 beq L12D6 | |
| 2391 rts | |
| 2392 L12D6 lbra L1205 | |
| 2393 L12D9 lbsr L10B4 | |
| 2394 bcc L12EE | |
| 2395 beq L12E4 | |
| 2396 ldb #$03 | |
| 2397 bra L129F | |
| 2398 L12E4 lbsr L0368 | |
| 2399 bcs L12D6 | |
| 2400 lbsr L0FA2 | |
| 2401 bcs L129F | |
| 203 | 2402 L12EE andcc #^Carry |
| 0 | 2403 rts |
| 2404 L12F1 lbsr L11C2 | |
| 2405 bcs L1304 | |
| 2406 L12F6 rts | |
| 2407 L12F7 lbsr L11C2 | |
| 2408 bcs L1304 | |
| 2409 tsta | |
| 2410 beq L12F6 | |
| 2411 inca | |
| 2412 beq L12F6 | |
| 2413 ldb #$0E | |
| 2414 L1304 lbsr L02FA | |
| 2415 ldd #$FFFF | |
| 203 | 2416 orcc #Carry |
| 0 | 2417 rts |
| 2418 L130D bsr L134D | |
| 2419 pshs x,b,a | |
| 2420 ldx <u001B | |
| 2421 sta ,x+ | |
| 2422 stx <u001B | |
| 2423 cmpx <u0010 | |
| 2424 bcs L1321 | |
| 2425 bsr L1323 | |
| 2426 ldx <u000E | |
| 2427 stx <u001B | |
| 2428 L1321 puls pc,x,b,a | |
| 2429 L1323 pshs y,x,b,a | |
| 2430 lda <u0058 | |
| 2431 beq L1340 | |
| 2432 lda <u003E | |
| 2433 beq L1340 | |
| 2434 ldd <u001B | |
| 2435 subd <u000E | |
| 2436 beq L1340 | |
| 2437 tfr d,y | |
| 2438 ldx <u000E | |
| 2439 lda <u0019 | |
| 2440 beq L1340 | |
| 2441 os9 I$Write | |
| 2442 bcs L1342 | |
| 2443 L1340 puls pc,y,x,b,a | |
| 2444 L1342 os9 F$PErr | |
| 2445 ldb #$12 | |
| 2446 lbsr L02FA | |
| 2447 lbra L15A2 | |
| 2448 L134D pshs u,y,x,b,a | |
| 2449 leax ,s | |
| 2450 ldy #$0001 | |
| 2451 tfr dp,a | |
| 2452 ldb #$51 | |
| 2453 tfr d,u | |
| 2454 os9 F$CRC | |
| 2455 puls pc,u,y,x,b,a | |
| 2456 L1360 ldd #$FFFF | |
| 2457 std <u0051 | |
| 2458 stb <u0053 | |
| 2459 rts | |
| 2460 L1368 lda <u0057 | |
| 2461 beq L139A | |
| 2462 lda <u0056 | |
| 2463 bmi L139A | |
| 2464 L1370 lda <u0035 | |
| 2465 bne L137B | |
| 2466 pshs x | |
| 2467 lbsr L1408 | |
| 2468 puls x | |
| 2469 L137B bsr L138A | |
| 2470 lda <u003E | |
| 2471 beq L1387 | |
| 2472 lda <u0056 | |
| 2473 bmi L1387 | |
| 2474 dec <u0035 | |
| 2475 L1387 ldx <u0004 | |
| 2476 rts | |
| 2477 L138A lda <u0057 | |
| 2478 beq L1392 | |
| 2479 lda <u0056 | |
| 2480 bpl L139A | |
| 2481 L1392 lda <u005C | |
| 2482 beq L1387 | |
| 2483 lda <u0021 | |
| 2484 beq L1387 | |
| 2485 L139A lda <u003E | |
| 2486 beq L1387 | |
| 2487 pshs y,a | |
| 2488 bsr L13B8 | |
| 2489 clra | |
| 2490 ldb <u0037 | |
| 2491 ldx <u0004 | |
| 2492 leax d,x | |
| 2493 bsr L13B8 | |
| 2494 ldx <u0004 | |
| 2495 ldy #$0085 | |
| 2496 lda <u001A | |
| 2497 os9 I$WritLn | |
| 2498 puls pc,y,a | |
| 2499 L13B8 lda #$0D | |
| 2500 sta ,x+ | |
| 2501 rts | |
| 2502 L13BD leas -$06,s | |
| 2503 pshs x | |
| 2504 leax $02,s | |
| 2505 os9 F$Time | |
| 2506 puls x | |
| 2507 bcs L13F0 | |
| 2508 lda $01,s | |
| 2509 bsr L13F7 | |
| 2510 ldb #$2F | |
| 2511 stb ,x+ | |
| 2512 lda $02,s | |
| 2513 bsr L13F7 | |
| 2514 stb ,x+ | |
| 2515 lda ,s | |
| 2516 * 1900-2155 fix | |
| 2517 cmpa #100 | |
| 2518 blo L1900 | |
| 2519 suba #100 | |
| 2520 cmpa #100 | |
| 2521 blo L2000 | |
| 2522 L2100 suba #100 | |
| 2523 pshs a | |
| 2524 lda #21 | |
| 2525 bra PrtCty | |
| 2526 L2000 pshs a | |
| 2527 lda #20 | |
| 2528 bra PrtCty | |
| 2529 L1900 pshs a | |
| 2530 lda #19 | |
| 2531 PrtCty bsr L13F7 | |
| 2532 puls a | |
| 2533 bsr L13F7 | |
| 2534 bsr L13F2 | |
| 2535 lda $03,s | |
| 2536 bsr L13F7 | |
| 2537 ldb #$3A | |
| 2538 stb ,x+ | |
| 2539 lda $04,s minute | |
| 2540 bsr L13F7 | |
| 2541 stb ,x+ | |
| 2542 lda $05,s | |
| 2543 bsr L13F7 | |
| 2544 L13F0 leas $06,s | |
| 2545 L13F2 lda #$20 | |
| 2546 sta ,x+ | |
| 2547 rts | |
| 2548 L13F7 pshs b | |
| 2549 ldb #$2F | |
| 2550 L13FB incb | |
| 2551 suba #$0A | |
| 2552 bcc L13FB | |
| 2553 stb ,x+ | |
| 2554 adda #$3A | |
| 2555 sta ,x+ | |
| 2556 puls pc,b | |
| 2557 L1408 lda <u0056 | |
| 2558 bmi L1476 | |
| 2559 lda <u0059 | |
| 2560 beq L1414 | |
| 2561 bsr L147D | |
| 2562 bra L141A | |
| 2563 L1414 ldb <u0035 | |
| 2564 addb #$03 | |
| 2565 bsr L1471 | |
| 2566 L141A ldx <u0004 | |
| 2567 pshs x | |
| 2568 ldx <u0002 | |
| 2569 stx <u0004 | |
| 2570 ldb <u0036 | |
| 2571 subb #$04 | |
| 2572 stb <u0035 | |
| 2573 lbsr L01E5 | |
| 2574 leay <L14A5,pcr | |
| 2575 lbsr L11BD | |
| 2576 lbsr L13BD | |
| 2577 ldx <u0004 | |
| 2578 clra | |
| 2579 ldb <u0037 | |
| 2580 subb #$06 | |
| 2581 leax d,x | |
| 2582 ldd <u003A | |
| 2583 lbsr L1084 | |
| 2584 inc <u003B | |
| 2585 bne L1447 | |
| 2586 inc <u003A | |
| 2587 L1447 leax -$08,x | |
| 2588 leay <L149F,pcr | |
| 2589 lbsr L11BD | |
| 2590 leax $03,x | |
| 2591 lbsr L1370 | |
| 2592 ldy <u000A | |
| 2593 lbsr L11BD | |
| 2594 bsr L13F2 | |
| 2595 lda #$2D | |
| 2596 sta ,x+ | |
| 2597 bsr L13F2 | |
| 2598 ldy <u0008 | |
| 2599 lbsr L11BD | |
| 2600 lbsr L1370 | |
| 2601 puls x | |
| 2602 stx <u0004 | |
| 2603 ldb #$01 | |
| 2604 L1471 bsr L1479 | |
| 2605 decb | |
| 2606 bne L1471 | |
| 2607 L1476 ldx <u0004 | |
| 2608 rts | |
| 2609 L1479 lda #$0D | |
| 2610 bra L147F | |
| 2611 L147D lda #$0C | |
| 2612 L147F pshs y,x,b,a | |
| 2613 lda <u003E | |
| 2614 beq L1498 | |
| 2615 lda <u0057 | |
| 2616 beq L1498 | |
| 2617 lda <u0056 | |
| 2618 bmi L1498 | |
| 2619 lda <u001A | |
| 2620 tfr s,x | |
| 2621 ldy #$0001 | |
| 2622 os9 I$WritLn | |
| 2623 L1498 puls pc,y,x,b,a | |
| 2624 L149A ldx <u0004 | |
| 2625 lbra L1370 | |
| 2626 L149F fcc "Page " | |
| 2627 fcb $00 | |
| 2628 L14A5 fcc "Microware OS-9 Assembler RS Version 01.00.00 " | |
| 2629 fcb $00 | |
| 2630 L14D6 fcc " error(s)" | |
| 2631 fcb $00 | |
| 2632 L14E0 fcc " warning(s)" | |
| 2633 fcb $00 | |
| 2634 L14EC fcc " program bytes generated" | |
| 2635 fcb $00 | |
| 2636 L1505 fcc " data bytes allocated" | |
| 2637 fcb $00 | |
| 2638 L151B fcc " bytes used for symbols" | |
| 2639 fcb $00 | |
| 2640 L1533 fcc "ASM:" | |
| 2641 L1537 pshs u,y,x,b,a | |
| 2642 lda <u005D | |
| 2643 beq L1549 | |
| 2644 leax <L1533,pcr | |
| 2645 ldy #$0004 | |
| 2646 lda <u001A | |
| 2647 os9 I$Write | |
| 2648 L1549 ldx <u0000 | |
| 2649 ldy #$0078 | |
| 2650 lda <u0018 | |
| 2651 L1551 os9 I$ReadLn | |
| 2652 bcc L156A | |
| 2653 cmpb #$D3 | |
| 2654 bne L1560 | |
| 2655 bsr L156C | |
| 2656 bcc L1549 | |
| 2657 L155E bra L156A | |
| 2658 L1560 os9 F$PErr | |
| 2659 ldb #$11 | |
| 2660 lbsr L02FA | |
| 2661 bsr L156C | |
| 2662 L156A puls pc,u,y,x,b,a | |
| 2663 L156C ldu <u001F | |
| 2664 L156E cmpu <u0006 | |
| 2665 bne L1576 | |
| 203 | 2666 orcc #Carry |
| 0 | 2667 rts |
| 2668 L1576 lda <u0018 | |
| 2669 pulu b | |
| 2670 stu <u001F | |
| 2671 stb <u0018 | |
| 2672 os9 I$Close | |
| 2673 bcc L1586 | |
| 2674 os9 F$PErr | |
| 2675 L1586 rts | |
| 2676 L1587 pshs b,a | |
| 2677 lda #$24 | |
| 2678 sta ,x+ | |
| 2679 ldd ,s | |
| 2680 lbsr L1057 | |
| 2681 puls b,a | |
| 2682 L1594 lbsr L1084 | |
| 2683 tfr u,y | |
| 2684 lbsr L11BD | |
| 2685 lbra L1368 | |
| 2686 L159F lbsr L1323 | |
| 2687 L15A2 lbsr L149A | |
| 2688 ldd <u0028 | |
| 2689 leau >L14D6,pcr | |
| 2690 bsr L1594 | |
| 2691 ldd <u0022 | |
| 2692 leau >L14E0,pcr | |
| 2693 bsr L1594 | |
| 2694 ldd <u0024 | |
| 2695 leau >L14EC,pcr | |
| 2696 bsr L1587 | |
| 2697 ldd <u0026 | |
| 2698 leau >L1505,pcr | |
| 2699 bsr L1587 | |
| 2700 ldd <u001D | |
| 2701 subd <u0010 | |
| 2702 leau >L151B,pcr | |
| 2703 bsr L1587 | |
| 2704 lda <u005E | |
| 2705 beq L15D5 | |
| 2706 bsr L1612 | |
| 2707 L15D5 lda <u005D | |
| 2708 bne L15E9 | |
| 2709 lda <u0059 | |
| 2710 beq L15E2 | |
| 2711 lbsr L147D | |
| 2712 bra L15E9 | |
| 2713 L15E2 ldb <u0035 | |
| 2714 addb #$03 | |
| 2715 lbsr L1471 | |
| 2716 L15E9 ldu <u001F | |
| 2717 L15EB cmpu <u0006 | |
| 2718 beq L15F7 | |
| 2719 pulu a | |
| 2720 os9 I$Close | |
| 2721 bra L15EB | |
| 2722 L15F7 clrb | |
| 2723 os9 F$Exit | |
| 2724 L15FB lda #$01 | |
| 2725 os9 I$Open | |
| 2726 ldb #$18 | |
| 2727 lbcs L1017 | |
| 2728 rts | |
| 2729 L1607 lda <u0018 | |
| 2730 ldu #$0000 | |
| 2731 tfr u,x | |
| 2732 os9 I$Seek | |
| 2733 rts | |
| 2734 L1612 ldb <u0037 | |
| 2735 clra | |
| 2736 tfr d,x | |
| 2737 ldb #$10 | |
| 2738 lbsr L118E | |
| 2739 stb <u003D | |
| 2740 stb <u003C | |
| 2741 lbsr L149A | |
| 2742 ldu <u0010 | |
| 2743 ldb #$1A | |
| 2744 pshs b | |
| 2745 L1629 ldy ,u++ | |
| 2746 beq L1656 | |
| 2747 L162E pshs u,y | |
| 2748 bra L1644 | |
| 2749 L1632 leau ,y | |
| 2750 tfr d,y | |
| 2751 L1636 ldd $0B,y | |
| 2752 bne L1632 | |
| 2753 bsr L165F | |
| 2754 ldy $0D,y | |
| 2755 sty u000B,u | |
| 2756 bne L1636 | |
| 2757 L1644 ldu ,s | |
| 2758 ldy u000B,u | |
| 2759 bne L1636 | |
| 2760 leay ,u | |
| 2761 bsr L165F | |
| 2762 puls u,y | |
| 2763 ldy $0D,y | |
| 2764 bne L162E | |
| 2765 L1656 dec ,s | |
| 2766 bne L1629 | |
| 2767 leas $01,s | |
| 2768 lbra L1370 | |
| 2769 L165F pshs u,y | |
| 2770 ldd $09,y | |
| 2771 lbsr L1057 | |
| 2772 lda $08,y | |
| 2773 leau <L1691,pcr | |
| 2774 lda a,u | |
| 2775 ldb #$20 | |
| 2776 std ,x++ | |
| 2777 ldb #$08 | |
| 2778 L1673 lda ,y+ | |
| 2779 bne L1679 | |
| 2780 lda #$20 | |
| 2781 L1679 sta ,x+ | |
| 2782 decb | |
| 2783 bne L1673 | |
| 2784 dec <u003C | |
| 2785 beq L1688 | |
| 2786 lda #$20 | |
| 2787 sta ,x+ | |
| 2788 bra L168F | |
| 2789 L1688 lbsr L1370 | |
| 2790 ldb <u003D | |
| 2791 stb <u003C | |
| 2792 L168F puls pc,u,y | |
| 2793 L1691 fcb $55 U | |
| 2794 inca | |
| 2795 comb | |
| 2796 fcb $45 E | |
| 2797 lsra | |
| 2798 L1696 pshs y,x | |
| 2799 lbsr L15FB | |
| 2800 sta <u0018 | |
| 2801 L169D lbsr L1164 | |
| 2802 cmpa #$0D | |
| 2803 beq L16CF | |
| 2804 lbsr L0E33 | |
| 2805 lda <u0058 | |
| 2806 beq L16CF | |
| 2807 lda -$01,x | |
| 2808 anda #$5F | |
| 2809 cmpa #$0D | |
| 2810 beq L16C7 | |
| 2811 ldb ,x | |
| 2812 cmpd #$4F3D | |
| 2813 bne L16C7 | |
| 2814 ldb #$16 | |
| 2815 lda <u0019 | |
| 2816 bne L16D1 | |
| 2817 leax $01,x | |
| 2818 bsr L16D4 | |
| 2819 bra L169D | |
| 2820 L16C7 lda <u0019 | |
| 2821 bne L16CF | |
| 2822 ldx ,s | |
| 2823 bsr L16D4 | |
| 2824 L16CF puls pc,y,x | |
| 2825 L16D1 lbra L1017 | |
| 2826 L16D4 lda #$06 | |
| 2827 ldb #$2F | |
| 2828 os9 I$Create | |
| 2829 ldb #$18 | |
| 2830 bcs L16D1 | |
| 2831 sta <u0019 | |
| 2832 rts | |
| 2833 | |
| 2834 emod | |
| 2835 eom equ * | |
| 2836 end | |
| 2837 |