Mercurial > hg > Members > kono > nitros9-code
annotate level1/cmds/debug.asm @ 556:28a203bbd2cc
findstr and signal finished.
| author | roug |
|---|---|
| date | Tue, 22 Oct 2002 19:09:04 +0000 |
| parents | e9ce43cc215e |
| children | 3e08691aa71f |
| rev | line source |
|---|---|
| 115 | 1 ******************************************************************** |
| 2 * debug - 6809 debugger | |
| 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:
116
diff
changeset
|
8 * 6 From Tandy OS-9 Level One VR 02.00.00 |
| 115 | 9 |
| 10 nam debug | |
| 11 ttl 6809 debugger | |
| 12 | |
| 13 * Disassembled 02/07/06 13:05:58 by Disasm v1.6 (C) 1988 by RML | |
| 14 | |
| 15 ifp1 | |
| 16 use defsfile | |
| 17 endc | |
| 18 | |
| 19 tylg set Prgrm+Objct | |
| 20 atrv set ReEnt+rev | |
| 21 rev set $01 | |
|
200
e9ce43cc215e
Made major changes to headers for consistency and identification
boisy
parents:
116
diff
changeset
|
22 edition set 6 |
| 115 | 23 |
| 24 L0000 mod eom,name,tylg,atrv,start,size | |
| 25 | |
| 26 u0000 rmb 1 | |
| 27 u0001 rmb 1 | |
| 28 u0002 rmb 1 | |
| 29 u0003 rmb 1 | |
| 30 u0004 rmb 2 | |
| 31 u0006 rmb 2 | |
| 32 u0008 rmb 1 | |
| 33 u0009 rmb 1 | |
| 34 u000A rmb 1 | |
| 35 u000B rmb 1 | |
| 36 u000C rmb 4 | |
| 37 u0010 rmb 14 | |
| 38 u001E rmb 2 | |
| 39 u0020 rmb 1 | |
| 40 u0021 rmb 19 | |
| 41 u0034 rmb 4 | |
| 42 u0038 rmb 9 | |
| 43 u0041 rmb 1 | |
| 44 u0042 rmb 1 | |
| 45 u0043 rmb 1 | |
| 46 u0044 rmb 3 | |
| 47 u0047 rmb 4 | |
| 48 u004B rmb 1 | |
| 49 u004C rmb 1 | |
| 50 u004D rmb 4 | |
| 51 u0051 rmb 2 | |
| 52 u0053 rmb 2 | |
| 53 u0055 rmb 3 | |
| 54 u0058 rmb 1 | |
| 55 u0059 rmb 6 | |
| 56 u005F rmb 39 | |
| 57 u0086 rmb 20 | |
| 58 u009A rmb 4 | |
| 59 u009E rmb 9 | |
| 60 u00A7 rmb 18 | |
| 61 u00B9 rmb 67 | |
| 62 u00FC rmb 260 | |
| 63 size equ . | |
| 64 | |
| 65 name fcs /debug/ | |
|
200
e9ce43cc215e
Made major changes to headers for consistency and identification
boisy
parents:
116
diff
changeset
|
66 fcb edition |
| 115 | 67 |
| 68 L0013 bsr L0021 | |
| 69 bra L0019 | |
| 70 L0017 bsr L0027 | |
| 71 L0019 pshs a | |
| 72 lda #$20 | |
| 73 sta ,x+ | |
| 74 puls pc,a | |
| 75 L0021 exg a,b | |
| 76 bsr L0027 | |
| 77 tfr a,b | |
| 78 L0027 pshs b | |
| 79 andb #$F0 | |
| 80 lsrb | |
| 81 lsrb | |
| 82 lsrb | |
| 83 lsrb | |
| 84 bsr L0035 | |
| 85 puls b | |
| 86 andb #$0F | |
| 87 L0035 cmpb #$09 | |
| 88 bls L003B | |
| 89 addb #$07 | |
| 90 L003B addb #$30 | |
| 91 stb ,x+ | |
| 92 rts | |
| 93 L0040 pshs u,y,b | |
| 94 leau <L0065,pcr | |
| 95 ldy #$0005 | |
| 96 L0049 clr ,s | |
| 97 L004B subd ,u | |
| 98 bcs L0053 | |
| 99 inc ,s | |
| 100 bra L004B | |
| 101 L0053 addd ,u++ | |
| 102 pshs b | |
| 103 ldb $01,s | |
| 104 addb #$30 | |
| 105 stb ,x+ | |
| 106 puls b | |
| 107 leay -$01,y | |
| 108 bne L0049 | |
| 109 puls pc,u,y,b | |
| 110 | |
| 111 L0065 fcb $27,$10,$03,$e8,$00,$64,$00,$0a,$00,$01 | |
| 112 | |
| 113 L006F lbsr L0127 | |
| 114 leax $01,x | |
| 115 cmpa #$23 | |
| 116 beq L00BA | |
| 117 cmpa #$25 | |
| 118 beq L00E0 | |
| 119 cmpa #$24 | |
| 120 beq L0082 | |
| 121 leax -$01,x | |
| 122 L0082 leas -$04,s | |
| 123 bsr L00F7 | |
| 124 L0086 bsr L00FE | |
| 125 bcc L00A0 | |
| 126 cmpb #$41 | |
| 127 lbcs L0110 | |
| 128 cmpb #$46 | |
| 129 bls L009E | |
| 130 cmpb #$61 | |
| 131 bcs L0110 | |
| 132 cmpb #$66 | |
| 133 bhi L0110 | |
| 134 subb #$20 | |
| 135 L009E subb #$37 | |
| 136 L00A0 stb ,s | |
| 137 ldd $02,s | |
| 138 bita #$F0 | |
| 139 bne L0123 | |
| 140 lslb | |
| 141 rola | |
| 142 lslb | |
| 143 rola | |
| 144 lslb | |
| 145 rola | |
| 146 lslb | |
| 147 rola | |
| 148 addb ,s | |
| 149 adca #$00 | |
| 150 std $02,s | |
| 151 inc $01,s | |
| 152 bra L0086 | |
| 153 L00BA leas -$04,s | |
| 154 bsr L00F7 | |
| 155 L00BE bsr L00FE | |
| 156 bcs L0110 | |
| 157 stb ,s | |
| 158 ldd $02,s | |
| 159 lslb | |
| 160 rola | |
| 161 std $02,s | |
| 162 lslb | |
| 163 rola | |
| 164 lslb | |
| 165 rola | |
| 166 bcs L0123 | |
| 167 addd $02,s | |
| 168 bcs L0123 | |
| 169 addb ,s | |
| 170 adca #$00 | |
| 171 bcs L0123 | |
| 172 std $02,s | |
| 173 inc $01,s | |
| 174 bra L00BE | |
| 175 L00E0 leas -$04,s | |
| 176 bsr L00F7 | |
| 177 L00E4 ldb ,x+ | |
| 178 subb #$30 | |
| 179 bcs L0110 | |
| 180 lsrb | |
| 181 bne L0110 | |
| 182 rol $03,s | |
| 183 rol $02,s | |
| 184 bcs L0123 | |
| 185 inc $01,s | |
| 186 bra L00E4 | |
| 187 L00F7 clra | |
| 188 clrb | |
| 189 std $02,s | |
| 190 std $04,s | |
| 191 rts | |
| 192 L00FE ldb ,x+ | |
| 193 cmpb #$30 | |
| 194 bcs L0108 | |
| 195 cmpb #$39 | |
| 196 bls L010B | |
| 116 | 197 L0108 orcc #Carry |
| 115 | 198 rts |
| 199 L010B subb #$30 | |
| 116 | 200 andcc #^Carry |
| 115 | 201 rts |
| 202 L0110 leax -$01,x | |
| 203 tst $01,s | |
| 204 beq L011C | |
| 205 ldd $02,s | |
| 116 | 206 andcc #^Carry |
| 115 | 207 bra L0120 |
| 116 | 208 L011C orcc #Zero |
| 209 L011E orcc #Carry | |
| 115 | 210 L0120 leas $04,s |
| 211 rts | |
| 116 | 212 L0123 andcc #^Zero |
| 115 | 213 bra L011E |
| 214 L0127 lda ,x+ | |
| 215 cmpa #$20 | |
| 216 beq L0127 | |
| 217 leax -$01,x | |
| 218 rts | |
| 219 L0130 pshs x,b,a | |
| 220 lda $03,s | |
| 221 mul | |
| 222 pshs b,a | |
| 223 lda $02,s | |
| 224 ldb $04,s | |
| 225 mul | |
| 226 pshs b,a | |
| 227 lda $04,s | |
| 228 ldb $07,s | |
| 229 bsr L0157 | |
| 230 lda $05,s | |
| 231 ldb $06,s | |
| 232 bsr L0157 | |
| 116 | 233 andcc #^Carry |
| 115 | 234 ldd $02,s |
| 235 ldx ,s | |
| 236 beq L0154 | |
| 116 | 237 orcc #Carry |
| 115 | 238 L0154 leas $08,s |
| 239 rts | |
| 240 L0157 mul | |
| 241 addd $03,s | |
| 242 std $03,s | |
| 243 bcc L0160 | |
| 244 inc $02,s | |
| 245 L0160 rts | |
| 246 L0161 pshs y,x,b,a | |
| 247 ldd ,s | |
| 248 bne L016B | |
| 116 | 249 orcc #Carry |
| 115 | 250 bra L018B |
| 251 L016B ldd #$0010 | |
| 252 stb $04,s | |
| 253 clrb | |
| 254 L0171 lsl $03,s | |
| 255 rol $02,s | |
| 256 rolb | |
| 257 rola | |
| 258 subd ,s | |
| 259 bmi L017F | |
| 260 inc $03,s | |
| 261 bra L0181 | |
| 262 L017F addd ,s | |
| 263 L0181 dec $04,s | |
| 264 bne L0171 | |
| 265 tfr d,x | |
| 266 ldd $02,s | |
| 116 | 267 andcc #^Carry |
| 115 | 268 L018B leas $06,s |
| 269 rts | |
| 270 L018E sta ,x+ | |
| 271 L0190 lda ,y+ | |
| 272 bne L018E | |
| 273 rts | |
| 274 L0195 pshs u,y | |
| 275 tfr s,u | |
| 276 bsr L01A7 | |
| 116 | 277 andcc #^Carry |
| 115 | 278 puls pc,u,y |
| 279 L019F tfr u,s | |
| 116 | 280 orcc #Carry |
| 115 | 281 puls pc,u,y |
| 282 L01A5 leax $01,x | |
| 283 L01A7 bsr L01C9 | |
| 284 pshs b,a | |
| 285 L01AB bsr L021D | |
| 286 cmpa #$2D | |
| 287 bne L01B9 | |
| 288 bsr L01C7 | |
| 289 nega | |
| 290 negb | |
| 291 sbca #$00 | |
| 292 bra L01BF | |
| 293 L01B9 cmpa #$2B | |
| 294 bne L01C5 | |
| 295 bsr L01C7 | |
| 296 L01BF addd ,s | |
| 297 std ,s | |
| 298 bra L01AB | |
| 299 L01C5 puls pc,b,a | |
| 300 L01C7 leax $01,x | |
| 301 L01C9 bsr L01FD | |
| 302 pshs b,a | |
| 303 L01CD bsr L021D | |
| 304 cmpa #$2A | |
| 305 bne L01E2 | |
| 306 bsr L01FB | |
| 307 pshs x | |
| 308 ldx $02,s | |
| 309 lbsr L0130 | |
| 310 bcc L01F5 | |
| 311 ldb #$02 | |
| 312 bra L019F | |
| 313 L01E2 cmpa #$2F | |
| 314 bne L01C5 | |
| 315 bsr L01FB | |
| 316 pshs x | |
| 317 ldx $02,s | |
| 318 lbsr L0161 | |
| 319 bcc L01F5 | |
| 320 ldb #$01 | |
| 321 bra L019F | |
| 322 L01F5 puls x | |
| 323 std ,s | |
| 324 bra L01CD | |
| 325 L01FB leax $01,x | |
| 326 L01FD bsr L0222 | |
| 327 pshs b,a | |
| 328 L0201 bsr L021D | |
| 329 cmpa #$26 | |
| 330 bne L020F | |
| 331 bsr L0220 | |
| 332 andb $01,s | |
| 333 anda ,s | |
| 334 bra L0219 | |
| 335 L020F cmpa #$21 | |
| 336 bne L01C5 | |
| 337 bsr L0220 | |
| 338 orb $01,s | |
| 339 ora ,s | |
| 340 L0219 std ,s | |
| 341 bra L0201 | |
| 342 L021D lbra L0127 | |
| 343 L0220 leax $01,x | |
| 344 L0222 bsr L021D | |
| 345 cmpa #$5E | |
| 346 bne L022E | |
| 347 bsr L0239 | |
| 348 comb | |
| 349 coma | |
| 350 bra L0238 | |
| 351 L022E cmpa #$2D | |
| 352 bne L023B | |
| 353 bsr L0239 | |
| 354 nega | |
| 355 negb | |
| 356 sbca #$00 | |
| 357 L0238 rts | |
| 358 L0239 leax $01,x | |
| 359 L023B bsr L021D | |
| 360 cmpa #$28 | |
| 361 bne L0250 | |
| 362 lbsr L01A5 | |
| 363 pshs b,a | |
| 364 bsr L021D | |
| 365 cmpa #$29 | |
| 366 beq L0282 | |
| 367 ldb <u0004 | |
| 368 bra L0265 | |
| 369 L0250 cmpa #$5B | |
| 370 bne L026A | |
| 371 lbsr L01A5 | |
| 372 tfr d,y | |
| 373 ldd ,y | |
| 374 pshs b,a | |
| 375 bsr L021D | |
| 376 cmpa #$5D | |
| 377 beq L0282 | |
| 378 ldb #$05 | |
| 379 L0265 leas $02,s | |
| 380 L0267 lbra L019F | |
| 381 L026A cmpa #$3C | |
| 382 bne L0286 | |
| 383 lbsr L01A5 | |
| 384 tfr d,y | |
| 385 clra | |
| 386 ldb ,y | |
| 387 pshs b,a | |
| 388 bsr L021D | |
| 389 cmpa #$3E | |
| 390 beq L0282 | |
| 391 ldb #$06 | |
| 392 bra L0265 | |
| 393 L0282 leax $01,x | |
| 394 puls pc,b,a | |
| 395 L0286 cmpa #$2E | |
| 396 bne L028F | |
| 397 ldd <u0000 | |
| 398 leax $01,x | |
| 399 rts | |
| 400 L028F cmpa #$27 | |
| 401 bne L0297 | |
| 402 ldd ,x++ | |
| 403 clra | |
| 404 rts | |
| 405 L0297 cmpa #$22 | |
| 406 bne L02A0 | |
| 407 leax $01,x | |
| 408 ldd ,x++ | |
| 409 rts | |
| 410 L02A0 cmpa #$3A | |
| 411 bne L02B4 | |
| 412 leax $01,x | |
| 413 bsr L02C3 | |
| 414 bcs L0267 | |
| 415 tsta | |
| 416 bmi L02B1 | |
| 417 clra | |
| 418 ldb ,y | |
| 419 rts | |
| 420 L02B1 ldd ,y | |
| 421 L02B3 rts | |
| 422 L02B4 lbsr L006F | |
| 423 bcc L02B3 | |
| 424 beq L02BF | |
| 425 ldb #$03 | |
| 426 bra L0267 | |
| 427 L02BF ldb #$00 | |
| 428 bra L0267 | |
| 429 L02C3 ldb #$09 | |
| 430 pshs b | |
| 431 ldd ,x | |
| 432 cmpd #$7370 | |
| 433 beq L02D5 | |
| 434 cmpd #$5350 | |
| 435 bne L02E2 | |
| 436 L02D5 leax $02,x | |
| 437 ldd #$0002 | |
| 438 tfr dp,a | |
| 439 tfr d,y | |
| 440 lda #$80 | |
| 441 bra L0314 | |
| 442 L02E2 leay >L0322,pcr | |
| 443 L02E6 lda ,y | |
| 444 ldb $01,y | |
| 445 bne L02F8 | |
| 446 cmpa ,x | |
| 447 beq L0307 | |
| 448 adda #$20 | |
| 449 cmpa ,x | |
| 450 beq L0307 | |
| 451 bra L0318 | |
| 452 L02F8 cmpd ,x | |
| 453 beq L0305 | |
| 454 addd #$2020 | |
| 455 cmpd ,x | |
| 456 bne L0318 | |
| 457 L0305 leax $01,x | |
| 458 L0307 leax $01,x | |
| 459 lda $02,y | |
| 460 tfr a,b | |
| 461 andb #$0F | |
| 462 ldy <u0002 | |
| 463 leay b,y | |
| 116 | 464 L0314 andcc #^Carry |
| 115 | 465 puls pc,b |
| 466 L0318 leay $03,y | |
| 467 dec ,s | |
| 468 bne L02E6 | |
| 116 | 469 orcc #Carry |
| 115 | 470 puls pc,b |
| 471 L0322 fcc "CC" | |
| 472 fcb $00 | |
| 473 fcc "DP" | |
| 474 fcb $03 | |
| 475 fcc "PC" | |
| 476 fcb $8a | |
| 477 fcc "A" | |
| 478 fcb $00,$01 | |
| 479 fcc "B" | |
| 480 fcb $00,$02 | |
| 481 fcc "D" | |
| 482 fcb $00,$81 | |
| 483 fcc "X" | |
| 484 fcb $00,$84 | |
| 485 fcc "Y" | |
| 486 fcb $00,$86 | |
| 487 fcc "U" | |
| 488 fcb $00,$88 | |
| 489 | |
| 490 start leas >size,u | |
| 491 leas -$0C,s | |
| 492 sts <u0002 | |
| 493 sts <u0004 | |
| 494 leay >L0765,pcr | |
| 495 sty $0A,s | |
| 496 lda #$80 | |
| 497 sta ,s | |
| 498 tfr s,x | |
| 499 leax >-$0145,x | |
| 500 stx <u0006 | |
| 501 leax <-$50,x | |
| 502 stx <u0008 | |
| 503 leax <-$24,x | |
| 504 stx <u000C | |
| 505 clr <u0000 | |
| 506 clr <u0001 | |
| 507 L036A clr ,x+ | |
| 508 cmpx <u0006 | |
| 509 bcs L036A | |
| 510 leax >L0652,pcr | |
| 511 lda #$01 | |
| 512 os9 F$SSWi | |
| 513 os9 F$Icpt | |
| 514 lbsr L07E1 | |
| 515 ldx <u0006 | |
| 516 leay >L0766,pcr | |
| 517 bsr L03C2 | |
| 518 lbsr L07E3 | |
| 519 L038A leay >L077B,pcr | |
| 520 lbsr L07EF | |
| 521 lbsr L0807 | |
| 522 leay >L07AD,pcr | |
| 523 lda ,x | |
| 524 cmpa #$61 | |
| 525 bcs L03A2 | |
| 526 suba #$20 | |
| 527 sta ,x | |
| 528 L03A2 leay $03,y | |
| 529 lda ,y | |
| 530 beq L03B8 | |
| 531 cmpa ,x | |
| 532 bne L03A2 | |
| 533 leax $01,x | |
| 534 ldd $01,y | |
| 535 leau >L0000,pcr | |
| 536 jsr d,u | |
| 537 bra L038A | |
| 538 L03B8 ldb #$09 | |
| 539 bsr L03BE | |
| 540 bra L038A | |
| 541 L03BE os9 F$PErr | |
| 542 rts | |
| 543 L03C2 lbra L0190 | |
| 544 lda ,x | |
| 116 | 545 cmpa #C$PERD |
| 115 | 546 bne L03CF |
| 547 ldd <u000A | |
| 548 bra L03DC | |
| 116 | 549 L03CF cmpa #C$CR |
| 115 | 550 bne L03D7 |
| 551 L03D3 ldd <u0000 | |
| 552 bra L03DC | |
| 553 L03D7 lbsr L0195 | |
| 554 bcs L03BE | |
| 555 L03DC ldx <u0000 | |
| 556 stx <u000A | |
| 557 std <u0000 | |
| 558 pshs b,a | |
| 559 bsr L0415 | |
| 560 ldd ,s | |
| 561 lbsr L0013 | |
| 562 puls y | |
| 563 ldb ,y | |
| 564 lbsr L0027 | |
| 565 lbra L07E3 | |
| 566 ldd <u0000 | |
| 567 subd #$0001 | |
| 568 bra L03DC | |
| 569 bsr L043F | |
| 570 bcs L03BE | |
| 571 ldx <u0000 | |
| 572 stb ,x | |
| 573 cmpb ,x | |
| 574 beq L040E | |
| 575 ldb #$0A | |
| 576 bsr L03BE | |
| 577 bra L03D3 | |
| 578 L040E ldd <u0000 | |
| 579 addd #$0001 | |
| 580 bra L03DC | |
| 581 L0415 ldx <u0006 | |
| 582 pshs b,a | |
| 583 leay >L0780,pcr | |
| 584 bsr L03C2 | |
| 585 puls pc,b,a | |
| 586 lbsr L0195 | |
| 587 bcs L03BE | |
| 588 bsr L0415 | |
| 589 pshs b,a | |
| 116 | 590 lda #'$ |
| 115 | 591 sta ,x+ |
| 592 lda ,s | |
| 593 lbsr L0013 | |
| 116 | 594 lda #'# |
| 115 | 595 sta ,x+ |
| 596 puls b,a | |
| 597 lbsr L0040 | |
| 598 lbra L07E3 | |
| 599 L043F lbsr L0195 | |
| 600 bcs L044B | |
| 601 tsta | |
| 602 beq L044B | |
| 603 ldb #$08 | |
| 116 | 604 orcc #Carry |
| 115 | 605 L044B rts |
| 606 lbsr L0512 | |
| 607 beq L04AF | |
| 608 lbsr L02C3 | |
| 609 lbcs L03BE | |
| 610 pshs y,a | |
| 611 lbsr L0512 | |
| 612 bne L0475 | |
| 613 bsr L0415 | |
| 614 puls y,a | |
| 615 tsta | |
| 616 bpl L046D | |
| 617 ldd ,y | |
| 618 lbsr L0021 | |
| 619 bra L0472 | |
| 620 L046D ldb ,y | |
| 621 lbsr L0027 | |
| 622 L0472 lbra L07E3 | |
| 623 L0475 lda ,s+ | |
| 624 bpl L0485 | |
| 625 lbsr L0195 | |
| 626 puls y | |
| 627 lbcs L054E | |
| 628 std ,y | |
| 629 rts | |
| 630 L0485 bsr L043F | |
| 631 puls y | |
| 632 lbcs L054E | |
| 633 stb ,y | |
| 634 rts | |
| 635 L0490 fcc "PC=" | |
| 636 fcb $00 | |
| 637 fcc "A=" | |
| 638 fcb $00 | |
| 639 fcc "B=" | |
| 640 fcb $00 | |
| 641 fcc "CC=" | |
| 642 fcb $00 | |
| 643 fcc "DP=" | |
| 644 fcb $00 | |
| 645 fcc "SP=" | |
| 646 fcb $00 | |
| 647 fcc "X=" | |
| 648 fcb $00 | |
| 649 fcc "Y=" | |
| 650 fcb $00 | |
| 651 fcc "U=" | |
| 652 fcb $00 | |
| 653 | |
| 116 | 654 L04AF pshs u |
| 655 ldx <u0006 | |
| 115 | 656 leay <L0490,pcr |
| 657 ldu <u0002 | |
| 658 lbsr L03C2 | |
| 659 ldd u000A,u | |
| 660 bsr L0505 | |
| 661 lbsr L03C2 | |
| 662 ldb u0001,u | |
| 663 bsr L050F | |
| 664 lbsr L03C2 | |
| 665 ldb u0002,u | |
| 666 bsr L050F | |
| 667 lbsr L03C2 | |
| 668 ldb ,u | |
| 669 bsr L050F | |
| 670 lbsr L03C2 | |
| 671 ldb u0003,u | |
| 672 bsr L050F | |
| 673 pshs y | |
| 674 lbsr L07E3 | |
| 675 puls y | |
| 676 lbsr L03C2 | |
| 677 tfr u,d | |
| 678 bsr L0505 | |
| 679 lbsr L03C2 | |
| 680 ldd u0004,u | |
| 681 bsr L0505 | |
| 682 lbsr L03C2 | |
| 683 ldd u0006,u | |
| 684 bsr L0505 | |
| 685 lbsr L03C2 | |
| 686 ldd u0008,u | |
| 687 bsr L0505 | |
| 688 lbsr L07E3 | |
| 689 puls pc,u | |
| 690 ldd ,y++ | |
| 691 L0505 lbra L0013 | |
| 692 L0508 ldd ,y++ | |
| 693 lbra L0021 | |
| 694 ldb ,y+ | |
| 695 L050F lbra L0017 | |
| 696 L0512 lbsr L0127 | |
| 697 cmpa #$0D | |
| 698 rts | |
| 699 bsr L0512 | |
| 700 bne L0538 | |
| 701 lbsr L0415 | |
| 702 ldy <u000C | |
| 703 ldb #$0C | |
| 704 pshs b | |
| 705 L0526 ldd ,y | |
| 706 beq L052D | |
| 707 lbsr L0013 | |
| 708 L052D leay $03,y | |
| 709 dec ,s | |
| 710 bne L0526 | |
| 711 leas $01,s | |
| 712 lbra L07E3 | |
| 713 L0538 lbsr L0195 | |
| 714 bcs L054E | |
| 715 pshs b,a | |
| 716 bsr L0556 | |
| 717 beq L0551 | |
| 718 ldd #$0000 | |
| 719 bsr L0556 | |
| 720 beq L0551 | |
| 721 ldb #$0B | |
| 722 leas $02,s | |
| 723 L054E lbra L03BE | |
| 724 L0551 puls b,a | |
| 725 std ,y | |
| 726 rts | |
| 727 L0556 pshs u | |
| 728 tfr d,u | |
| 729 ldb #$0C | |
| 730 ldy <u000C | |
| 731 L055F cmpu ,y | |
| 732 beq L056D | |
| 733 leay $03,y | |
| 734 decb | |
| 735 bne L055F | |
| 736 ldb <u000C | |
| 116 | 737 andcc #^Zero |
| 115 | 738 L056D puls pc,u |
| 739 bsr L0512 | |
| 740 beq L0581 | |
| 741 lbsr L0195 | |
| 742 bcs L054E | |
| 743 bsr L0556 | |
| 744 bne L054E | |
| 745 clra | |
| 746 clrb | |
| 747 std ,y | |
| 748 rts | |
| 749 L0581 ldy <u000C | |
| 750 ldb #$24 | |
| 751 L0586 clr ,y+ | |
| 752 decb | |
| 753 bne L0586 | |
| 754 rts | |
| 755 bsr L0512 | |
| 756 beq L059A | |
| 757 lbsr L0195 | |
| 758 bcs L054E | |
| 759 ldy <u0002 | |
| 760 std $0A,y | |
| 761 L059A ldy <u000C | |
| 762 ldb #$0C | |
| 763 ldx <u0002 | |
| 764 ldx $0A,x | |
| 765 L05A3 ldu ,y | |
| 766 beq L05B3 | |
| 767 lda ,u | |
| 768 sta $02,y | |
| 769 cmpx ,y | |
| 770 beq L05B3 | |
| 771 lda #$3F | |
| 772 sta ,u | |
| 773 L05B3 leay $03,y | |
| 774 decb | |
| 775 bne L05A3 | |
| 776 lds <u0002 | |
| 777 rti | |
| 778 bsr L0613 | |
| 779 bcs L054E | |
| 780 orb #$07 | |
| 781 exg d,u | |
| 782 andb #$F8 | |
| 783 pshs u,b,a | |
| 784 cmpd $02,s | |
| 785 bcc L05D9 | |
| 786 L05CD ldy ,s | |
| 787 leay -$01,y | |
| 788 cmpy $02,s | |
| 789 leay $01,y | |
| 790 bcs L05DB | |
| 791 L05D9 puls pc,u,b,a | |
| 792 L05DB ldx <u0006 | |
| 793 tfr y,d | |
| 794 lbsr L0013 | |
| 795 ldb #$04 | |
| 796 pshs b | |
| 797 L05E6 lbsr L0508 | |
| 798 dec ,s | |
| 799 bne L05E6 | |
| 800 lbsr L0019 | |
| 801 ldb #$08 | |
| 802 stb ,s | |
| 803 ldy $01,s | |
| 804 L05F7 lda ,y+ | |
| 805 cmpa #$7E | |
| 806 bhi L0601 | |
| 807 cmpa #$20 | |
| 808 bcc L0603 | |
| 809 L0601 lda #$2E | |
| 810 L0603 sta ,x+ | |
| 811 dec ,s | |
| 812 bne L05F7 | |
| 813 leas $01,s | |
| 814 sty ,s | |
| 815 lbsr L07E3 | |
| 816 bra L05CD | |
| 817 L0613 lbsr L0195 | |
| 818 bcs L061D | |
| 819 tfr d,u | |
| 820 lbsr L0195 | |
| 821 L061D rts | |
| 822 bsr L0613 | |
| 823 lbcs L03BE | |
| 824 pshs b,a | |
| 825 L0626 cmpu ,s | |
| 826 bls L062D | |
| 827 puls pc,b,a | |
| 828 L062D ldd #$8008 | |
| 829 sta ,u | |
| 830 L0632 cmpa ,u | |
| 831 bne L063E | |
| 832 lsra | |
| 833 lsr ,u | |
| 834 decb | |
| 835 bne L0632 | |
| 836 bra L064E | |
| 837 L063E lbsr L0415 | |
| 838 ldd #$2D20 | |
| 839 std ,x++ | |
| 840 tfr u,d | |
| 841 lbsr L0021 | |
| 842 lbsr L07E3 | |
| 843 L064E leau u0001,u | |
| 844 bra L0626 | |
| 845 L0652 clra | |
| 846 tfr a,dp | |
| 847 ldx <u004B | |
| 848 lda $07,x | |
| 849 tfr a,dp | |
| 850 sts <u0002 | |
| 851 ldd $0A,s | |
| 852 subd #$0001 | |
| 853 std $0A,s | |
| 854 lds <u0004 | |
| 855 lbsr L0556 | |
| 856 beq L0672 | |
| 857 ldb #$0D | |
| 858 lbsr L03BE | |
| 859 L0672 ldy <u000C | |
| 860 ldb #$0C | |
| 861 L0677 ldx ,y | |
| 862 beq L067F | |
| 863 lda $02,y | |
| 864 sta ,x | |
| 865 L067F leay $03,y | |
| 866 decb | |
| 867 bne L0677 | |
| 868 lbsr L07E1 | |
| 869 lbsr L0415 | |
| 870 leay >L07A9,pcr | |
| 871 lbsr L03C2 | |
| 872 lbsr L07E3 | |
| 873 lbsr L04AF | |
| 874 lbra L038A | |
| 875 bsr L06B0 | |
| 876 lbcs L03BE | |
| 877 ldx <u0006 | |
| 878 tfr u,d | |
| 879 pshs u | |
| 880 lbsr L03DC | |
| 881 lbsr L07E3 | |
| 882 puls u | |
| 883 bra L06CC | |
| 884 L06B0 lbsr L0127 | |
| 885 lda #$00 | |
| 886 os9 F$Link | |
| 887 rts | |
| 888 bsr L06B0 | |
| 889 lbcs L03BE | |
| 890 ldd u000B,u | |
| 891 addd #$0200 | |
| 892 os9 F$Mem | |
| 893 bcc L06D0 | |
| 894 lbsr L03BE | |
| 895 L06CC os9 F$UnLink | |
| 896 rts | |
| 897 L06D0 os9 F$UnLink | |
| 898 pshs u,y,x | |
| 899 L06D5 lda ,x+ | |
| 900 cmpa #$0D | |
| 901 bne L06D5 | |
| 902 clrb | |
| 903 L06DC lda ,-x | |
| 904 sta ,-y | |
| 905 incb | |
| 906 cmpx ,s | |
| 907 bhi L06DC | |
| 908 sty -$08,y | |
| 909 leay -$0C,y | |
| 910 sty <u0002 | |
| 911 clra | |
| 912 std $01,y | |
| 913 puls u,x,b,a | |
| 914 stx $06,y | |
| 915 ldd u0009,u | |
| 916 leax d,u | |
| 917 stx $0A,y | |
| 918 tfr cc,a | |
| 919 ora #$80 | |
| 920 sta ,y | |
| 921 tfr dp,a | |
| 922 adda #$02 | |
| 923 clrb | |
| 924 std $08,y | |
| 925 sta $03,y | |
| 926 lbra L04AF | |
| 927 lbsr L0127 | |
| 928 clra | |
| 929 clrb | |
| 930 tfr x,u | |
| 931 tfr d,y | |
| 932 L0715 leay $01,y | |
| 933 lda ,x+ | |
| 934 cmpa #$0D | |
| 935 bne L0715 | |
| 936 clra | |
| 937 leax <L072E,pcr | |
| 938 os9 F$Fork | |
| 939 bcs L0729 | |
| 940 os9 F$Wait | |
| 941 L0729 lbcs L03BE | |
| 942 rts | |
| 943 L072E com >$6865 | |
| 944 inc $0C,s | |
| 945 neg <u005F | |
| 946 os9 F$Exit | |
| 947 lbsr L0613 | |
| 948 lbcs L03BE | |
| 949 pshs u | |
| 950 ldx <u0000 | |
| 951 tsta | |
| 952 bne L0750 | |
| 953 L0746 cmpb ,x+ | |
| 954 beq L075C | |
| 955 cmpx ,s | |
| 956 bne L0746 | |
| 957 puls pc,u | |
| 958 L0750 cmpd ,x+ | |
| 959 beq L075C | |
| 960 cmps ,s | |
| 961 bne L0750 | |
| 962 puls pc,u | |
| 963 L075C leax -$01,x | |
| 964 tfr x,d | |
| 965 leas $02,s | |
| 966 lbra L03DC | |
| 967 L0765 fcc "?" | |
| 968 L0766 fcc "Interactive Debugger" | |
| 969 fcb $00 | |
| 970 L077B fcc "DB: " | |
| 971 fcb $00 | |
| 972 L0780 fcc " " | |
| 973 fcb $00 | |
| 974 fcc " SP CC A B DP X Y U PC" | |
| 975 fcb $00 | |
| 976 L07A9 fcc "BKPT" | |
| 977 L07AD fcc ": " | |
| 978 fcb $00 | |
| 979 fdb $2e03,$c53d,$03fc,$0d04,$0e20 | |
| 980 fcb $04 | |
| 981 fcb $21 | |
| 982 fdb $2d03,$f53a | |
| 983 fdb $044c,$4b05,$6f4d,$05bc,$4306,$1e42,$0518,$4705 | |
| 984 fdb $8c4c,$069a,$4506,$b924,$070c,$5107,$3453,$0738 | |
| 985 fcb $00 | |
| 986 L07E1 fcb $9e,$06 | |
| 987 L07E3 fcb $86 | |
| 988 fdb $0da7,$809e,$0610,$8e00,$5120 | |
| 989 fcb $10 | |
| 990 | |
| 991 L07EF tfr y,x | |
| 992 tfr y,u | |
| 993 ldy #$0000 | |
| 994 L07F7 ldb ,u+ | |
| 995 beq L07FF | |
| 996 leay $01,y | |
| 997 bra L07F7 | |
| 998 L07FF lda #$01 | |
| 999 os9 I$WritLn | |
| 1000 ldx <u0006 | |
| 1001 rts | |
| 1002 L0807 ldx <u0006 | |
| 1003 ldy #$0050 | |
| 1004 clra | |
| 1005 os9 I$ReadLn | |
| 1006 ldx <u0006 | |
| 1007 rts | |
| 1008 | |
| 1009 emod | |
| 1010 eom equ * | |
| 1011 end |