|
|
1.1 ! root 1: * ! 2: * Captain Blood ! 3: * ! 4: * (c) Infogrames ! 5: * (s) 2017, Brutal Deluxe Software ! 6: * ! 7: ! 8: mx %00 ! 9: ! 10: rel ! 11: dsk mgalax.L ! 12: lst off ! 13: ! 14: *----------- ! 15: ! 16: use mgalax.X ! 17: ! 18: *----------- ! 19: ! 20: L1B0000 ENT ! 21: PHD ! 22: TSC ! 23: SEC ! 24: SBC #$00F9 ! 25: TCD ! 26: ADC #$00F2 ! 27: TCS ! 28: LDA $FF ! 29: SEC ! 30: SBC #$0000 ! 31: BEQ L1B001E ! 32: BVS L1B0018 ! 33: EOR #$8000 ! 34: L1B0018 BPL L1B001E ! 35: LDA $FF ! 36: BRA L1B0024 ! 37: L1B001E LDA $FF ! 38: EOR #$FFFF ! 39: INC ! 40: L1B0024 TAY ! 41: TSC ! 42: CLC ! 43: ADC #$0006 ! 44: TCS ! 45: TYA ! 46: PLD ! 47: RTL ! 48: ! 49: L1B002E PHD ! 50: TSC ! 51: SEC ! 52: SBC #$00F1 ! 53: TCD ! 54: ADC #$00E4 ! 55: TCS ! 56: LDA $F7 ! 57: LDX #$0000 ! 58: PHX ! 59: PHA ! 60: LDX $FD ! 61: LDA $FB ! 62: JSL L2D0000 ! 63: PLA ! 64: PLX ! 65: STX $E8 ! 66: STA $E6 ! 67: LDA $FF ! 68: SEC ! 69: SBC #$0001 ! 70: ASL ! 71: STA $EA ! 72: L1B0057 LDX $EA ! 73: LDAL L0434EC,X ! 74: TAY ! 75: LDX $F9 ! 76: LDA [$E6],Y ! 77: ANDL L042B79,X ! 78: ORAL L042B75,X ! 79: STA [$E6],Y ! 80: DEC $EA ! 81: DEC $EA ! 82: BPL L1B0057 ! 83: TSC ! 84: CLC ! 85: ADC #$000C ! 86: TCS ! 87: PLD ! 88: RTL ! 89: ! 90: L1B007A PHD ! 91: TSC ! 92: SEC ! 93: SBC #$00FB ! 94: TCD ! 95: ADC #$00EA ! 96: TCS ! 97: LDA L030083 ! 98: LSR ! 99: LDX #$0000 ! 100: PHX ! 101: PHA ! 102: LDX L03018D ! 103: LDA L03018B ! 104: CLC ! 105: ADC #$0B50 ! 106: PHA ! 107: TXA ! 108: ADC #$0000 ! 109: TAX ! 110: PLA ! 111: JSL L2D0000 ! 112: PLA ! 113: PLX ! 114: STX $F2 ! 115: STA $F0 ! 116: LDA #$00FE ! 117: STA $F4 ! 118: LDA L030083 ! 119: CMP #$0037 ! 120: BCC L1B00C0 ! 121: LDA L030083 ! 122: CMP #$00CA ! 123: BEQ L1B00DF ! 124: BCC L1B00DF ! 125: L1B00C0 LDAL L043512 ! 126: LDX #$0000 ! 127: PHX ! 128: PHA ! 129: LDX $F2 ! 130: LDA $F0 ! 131: JSL L2D0000 ! 132: PLA ! 133: PLX ! 134: STX $F2 ! 135: STA $F0 ! 136: LDA $F4 ! 137: SEC ! 138: SBC #$0026 ! 139: STA $F4 ! 140: L1B00DF LDX $F4 ! 141: LDAL L0434EC,X ! 142: TAY ! 143: LDA $F4 ! 144: LSR ! 145: TAX ! 146: SEP #$20 ! 147: LDAL L042CF4,X ! 148: STA [$F0],Y ! 149: REP #$20 ! 150: DEC $F4 ! 151: DEC $F4 ! 152: BPL L1B00DF ! 153: LDA L030085 ! 154: CMP #$0013 ! 155: BCS L1B0116 ! 156: LDA L030083 ! 157: CMP #$0038 ! 158: BCC L1B0114 ! 159: LDA L030083 ! 160: CMP #$00CA ! 161: BEQ L1B0116 ! 162: BCC L1B0116 ! 163: L1B0114 BRA L1B0169 ! 164: L1B0116 LDA L030085 ! 165: ASL ! 166: LDX #$0000 ! 167: PHX ! 168: PHA ! 169: LDA #L0434EC ! 170: LDX #^L0434EC ! 171: JSL L2D0000 ! 172: PLA ! 173: PLX ! 174: STA $F6 ! 175: STX $F8 ! 176: LDA [$F6] ! 177: LDX #$0000 ! 178: PHX ! 179: PHA ! 180: LDA L030083 ! 181: LSR ! 182: LDX #$0000 ! 183: PHX ! 184: PHA ! 185: LDX L03018D ! 186: LDA L03018B ! 187: CLC ! 188: ADC #$0B50 ! 189: PHA ! 190: TXA ! 191: ADC #$0000 ! 192: TAX ! 193: PLA ! 194: JSL L2D0000 ! 195: PLA ! 196: PLX ! 197: JSL L2D0000 ! 198: PLA ! 199: PLX ! 200: STX $EE ! 201: STA $EC ! 202: LDA #$0088 ! 203: SEP #$20 ! 204: STA [$EC] ! 205: REP #$20 ! 206: L1B0169 TAY ! 207: TSC ! 208: CLC ! 209: ADC #$0010 ! 210: TCS ! 211: TYA ! 212: PLD ! 213: RTL ! 214: ! 215: L1B0173 PHD ! 216: TSC ! 217: SEC ! 218: SBC #$00FB ! 219: TCD ! 220: ADC #$00E8 ! 221: TCS ! 222: LDA L030085 ! 223: ASL ! 224: LDX #$0000 ! 225: PHX ! 226: PHA ! 227: LDA #L0434EC ! 228: LDX #^L0434EC ! 229: JSL L2D0000 ! 230: PLA ! 231: PLX ! 232: STA $F6 ! 233: STX $F8 ! 234: LDA [$F6] ! 235: LDX #$0000 ! 236: PHX ! 237: PHA ! 238: LDX L03018D ! 239: LDA L03018B ! 240: CLC ! 241: ADC #$0B50 ! 242: PHA ! 243: TXA ! 244: ADC #$0000 ! 245: TAX ! 246: PLA ! 247: SEC ! 248: SBC #$0010 ! 249: PHA ! 250: TXA ! 251: SBC #$0000 ! 252: TAX ! 253: PLA ! 254: JSL L2D0000 ! 255: PLA ! 256: PLX ! 257: STX $F4 ! 258: STA $F2 ! 259: LDA #$009E ! 260: STA $EC ! 261: LDA L030085 ! 262: CMP #$0013 ! 263: BCS L1B01E9 ! 264: LDX $F4 ! 265: LDA $F2 ! 266: CLC ! 267: ADC #$002A ! 268: PHA ! 269: TXA ! 270: ADC #$0000 ! 271: TAX ! 272: PLA ! 273: STX $F4 ! 274: STA $F2 ! 275: LDA #$004A ! 276: STA $EC ! 277: L1B01E9 LDY $EC ! 278: L1B01EB TYX ! 279: LDAL L042D74,X ! 280: STA [$F2],Y ! 281: DEY ! 282: DEY ! 283: BNE L1B01EB ! 284: LDA L030085 ! 285: CMP #$0013 ! 286: BCS L1B0213 ! 287: LDA L030083 ! 288: CMP #$0038 ! 289: BCC L1B0210 ! 290: LDA L030083 ! 291: CMP #$00CA ! 292: BEQ L1B0213 ! 293: BCC L1B0213 ! 294: L1B0210 BRL L1B02B4 ! 295: L1B0213 LDA L030083 ! 296: LSR ! 297: LDX #$0000 ! 298: PHX ! 299: PHA ! 300: LDA L030085 ! 301: ASL ! 302: LDX #$0000 ! 303: PHX ! 304: PHA ! 305: LDA #L0434EC ! 306: LDX #^L0434EC ! 307: JSL L2D0000 ! 308: PLA ! 309: PLX ! 310: STA $F6 ! 311: STX $F8 ! 312: LDA [$F6] ! 313: LDX #$0000 ! 314: PHX ! 315: PHA ! 316: LDX L03018D ! 317: LDA L03018B ! 318: CLC ! 319: ADC #$0B50 ! 320: PHA ! 321: TXA ! 322: ADC #$0000 ! 323: TAX ! 324: PLA ! 325: JSL L2D0000 ! 326: PLA ! 327: PLX ! 328: JSL L2D0000 ! 329: PLA ! 330: PLX ! 331: STX $F0 ! 332: STA $EE ! 333: LDA L030083 ! 334: AND #$0001 ! 335: ASL ! 336: LDX #$0000 ! 337: PHX ! 338: PHA ! 339: LDA #L042B79 ! 340: LDX #^L042B79 ! 341: JSL L2D0000 ! 342: PLA ! 343: PLX ! 344: STA $F6 ! 345: STX $F8 ! 346: LDA [$F6] ! 347: PHA ! 348: LDA [$EE] ! 349: AND #$00FF ! 350: PLX ! 351: STX $FA ! 352: AND $FA ! 353: STA $EA ! 354: LDA L030083 ! 355: AND #$0001 ! 356: ASL ! 357: LDX #$0000 ! 358: PHX ! 359: PHA ! 360: LDA #L042B75 ! 361: LDX #^L042B75 ! 362: JSL L2D0000 ! 363: PLA ! 364: PLX ! 365: STA $F6 ! 366: STX $F8 ! 367: LDA [$F6] ! 368: PHA ! 369: LDA $EA ! 370: PLX ! 371: STX $FA ! 372: ORA $FA ! 373: SEP #$20 ! 374: STA [$EE] ! 375: REP #$20 ! 376: L1B02B4 TAY ! 377: TSC ! 378: CLC ! 379: ADC #$0012 ! 380: TCS ! 381: TYA ! 382: PLD ! 383: RTL ! 384: ! 385: L1B02BE PHD ! 386: TSC ! 387: SEC ! 388: SBC #$00F3 ! 389: TCD ! 390: ADC #$00E6 ! 391: TCS ! 392: LDA $F9 ! 393: LDX #$0000 ! 394: PHX ! 395: PHA ! 396: LDX $FD ! 397: LDA $FB ! 398: JSL L2D0000 ! 399: PLA ! 400: PLX ! 401: SEC ! 402: SBC #$0010 ! 403: PHA ! 404: TXA ! 405: SBC #$0000 ! 406: TAX ! 407: PLA ! 408: STX $EC ! 409: STA $EA ! 410: LDA $FF ! 411: LSR ! 412: LSR ! 413: ASL ! 414: SEC ! 415: SBC #$0002 ! 416: STA $E8 ! 417: LDY $E8 ! 418: LDA #$8888 ! 419: L1B02F9 STA [$EA],Y ! 420: DEY ! 421: DEY ! 422: BNE L1B02F9 ! 423: TSC ! 424: CLC ! 425: ADC #$000C ! 426: TCS ! 427: PLD ! 428: RTL ! 429: ! 430: L1B0307 ENT ! 431: PHD ! 432: TSC ! 433: SEC ! 434: SBC #$00FB ! 435: TCD ! 436: ADC #$00EC ! 437: TCS ! 438: LDA L030083 ! 439: AND #$0001 ! 440: ASL ! 441: STA $F0 ! 442: LDA L030083 ! 443: LSR ! 444: CLC ! 445: ADC #$0B50 ! 446: STA $F4 ! 447: LDA $F4 ! 448: STA $F2 ! 449: LDA #$0080 ! 450: STA $EE ! 451: LDA L030083 ! 452: CMP #$0037 ! 453: BCC L1B0340 ! 454: LDA L030083 ! 455: CMP #$00CA ! 456: BEQ L1B0351 ! 457: BCC L1B0351 ! 458: L1B0340 LDA $EE ! 459: SEC ! 460: SBC #$0013 ! 461: STA $EE ! 462: LDA $F2 ! 463: CLC ! 464: ADCL L043512 ! 465: STA $F2 ! 466: L1B0351 PEA $0002 ! 467: PEI $EE ! 468: PEA ^L042CF4 ! 469: PEA L042CF4 ! 470: LDA $F2 ! 471: LDX #$0000 ! 472: PHX ! 473: PHA ! 474: LDX L03018D ! 475: LDA L03018B ! 476: JSL L2D0000 ! 477: JSL L0D0213 ! 478: TAY ! 479: TSC ! 480: CLC ! 481: ADC #$000C ! 482: TCS ! 483: TYA ! 484: PEI $EE ! 485: LDX L03018D ! 486: LDA L03018B ! 487: PHX ! 488: PHA ! 489: PEI $F0 ! 490: PEI $F2 ! 491: JSL L1B002E ! 492: PLY ! 493: PLY ! 494: PLY ! 495: PLY ! 496: PLY ! 497: PEI $EE ! 498: PEA $00E1 ! 499: PEA $2000 ! 500: PEI $F0 ! 501: PEI $F2 ! 502: JSL L1B002E ! 503: PLY ! 504: PLY ! 505: PLY ! 506: PLY ! 507: PLY ! 508: TSC ! 509: CLC ! 510: ADC #$000E ! 511: TCS ! 512: PLD ! 513: RTL ! 514: ! 515: L1B03AD ENT ! 516: PHD ! 517: TSC ! 518: SEC ! 519: SBC #$00FB ! 520: TCD ! 521: ADC #$00E0 ! 522: TCS ! 523: LDX L03018D ! 524: LDA L03018B ! 525: STX $E4 ! 526: STA $E2 ! 527: LDA L03013B ! 528: SEC ! 529: SBC #$001B ! 530: STA $F4 ! 531: LDA $F4 ! 532: SEC ! 533: SBC #$0000 ! 534: BVS L1B03D6 ! 535: EOR #$8000 ! 536: L1B03D6 BMI L1B03DA ! 537: STZ $F4 ! 538: L1B03DA LDA $F4 ! 539: SEC ! 540: SBC #$00FF ! 541: BEQ L1B03EE ! 542: BVS L1B03E7 ! 543: EOR #$8000 ! 544: L1B03E7 BPL L1B03EE ! 545: LDA #$00FF ! 546: STA $F4 ! 547: L1B03EE LDA $F4 ! 548: AND #$0001 ! 549: ASL ! 550: STA $F0 ! 551: LDA #$0001 ! 552: PHA ! 553: LDA $F4 ! 554: SEC ! 555: JSL L2D083F ! 556: PLA ! 557: CLC ! 558: ADC #$0B50 ! 559: STA $EC ! 560: LDA $EC ! 561: STA $EA ! 562: LDA #$0080 ! 563: STA $E6 ! 564: LDA $F4 ! 565: SEC ! 566: SBC #$0037 ! 567: BVS L1B041C ! 568: EOR #$8000 ! 569: L1B041C BPL L1B042D ! 570: LDA $F4 ! 571: SEC ! 572: SBC #$00CA ! 573: BEQ L1B043E ! 574: BVS L1B042B ! 575: EOR #$8000 ! 576: L1B042B BPL L1B043E ! 577: L1B042D LDA $E6 ! 578: SEC ! 579: SBC #$0013 ! 580: STA $E6 ! 581: LDA $EA ! 582: CLC ! 583: ADCL L043512 ! 584: STA $EA ! 585: L1B043E LDA $F4 ! 586: CMP L030083 ! 587: BNE L1B0448 ! 588: BRL L1B069B ! 589: L1B0448 JSL L1B007A ! 590: PEA $0002 ! 591: PEI $E6 ! 592: PEA ^L042CF4 ! 593: PEA L042CF4 ! 594: LDA $EA ! 595: LDX #$0000 ! 596: PHX ! 597: PHA ! 598: LDX L03018D ! 599: LDA L03018B ! 600: JSL L2D0000 ! 601: JSL L0D0213 ! 602: TAY ! 603: TSC ! 604: CLC ! 605: ADC #$000C ! 606: TCS ! 607: TYA ! 608: LDA $F4 ! 609: SEC ! 610: SBC #$0036 ! 611: BNE L1B047F ! 612: BRL L1B0537 ! 613: L1B047F BVS L1B0484 ! 614: EOR #$8000 ! 615: L1B0484 BMI L1B0489 ! 616: BRL L1B0537 ! 617: L1B0489 LDA $F4 ! 618: SEC ! 619: SBC #$00CB ! 620: BVS L1B0494 ! 621: EOR #$8000 ! 622: L1B0494 BPL L1B0499 ! 623: BRL L1B0537 ! 624: L1B0499 LDA L030085 ! 625: CMP #$0013 ! 626: BCS L1B04EE ! 627: LDA #$0001 ! 628: PHA ! 629: LDA $F4 ! 630: SEC ! 631: JSL L2D083F ! 632: PLA ! 633: CLC ! 634: ADC #$0010 ! 635: SEC ! 636: SBC #$002A ! 637: LDX #$0000 ! 638: PHX ! 639: PHA ! 640: LDA #L042D74 ! 641: LDX #^L042D74 ! 642: JSL L2D0000 ! 643: PLA ! 644: PLX ! 645: STA $F6 ! 646: STX $F8 ! 647: LDA [$F6] ! 648: PHA ! 649: LDA L030085 ! 650: LDX #$0000 ! 651: PHX ! 652: PHA ! 653: LDA #L042CF4 ! 654: LDX #^L042CF4 ! 655: JSL L2D0000 ! 656: PLA ! 657: PLX ! 658: STA $F6 ! 659: STX $F8 ! 660: PLA ! 661: SEP #$20 ! 662: STA [$F6] ! 663: REP #$20 ! 664: BRA L1B0535 ! 665: L1B04EE LDA #$0001 ! 666: PHA ! 667: LDA $F4 ! 668: SEC ! 669: JSL L2D083F ! 670: PLA ! 671: CLC ! 672: ADC #$0010 ! 673: LDX #$0000 ! 674: PHX ! 675: PHA ! 676: LDA #L042D74 ! 677: LDX #^L042D74 ! 678: JSL L2D0000 ! 679: PLA ! 680: PLX ! 681: STA $F6 ! 682: STX $F8 ! 683: LDA [$F6] ! 684: PHA ! 685: LDA L030085 ! 686: LDX #$0000 ! 687: PHX ! 688: PHA ! 689: LDA #L042CF4 ! 690: LDX #^L042CF4 ! 691: JSL L2D0000 ! 692: PLA ! 693: PLX ! 694: STA $F6 ! 695: STX $F8 ! 696: PLA ! 697: SEP #$20 ! 698: STA [$F6] ! 699: REP #$20 ! 700: L1B0535 BRA L1B058C ! 701: L1B0537 LDA L030085 ! 702: CMP #$0012 ! 703: BEQ L1B058C ! 704: BCC L1B058C ! 705: LDA #$0001 ! 706: PHA ! 707: LDA $F4 ! 708: SEC ! 709: JSL L2D083F ! 710: PLA ! 711: CLC ! 712: ADC #$0010 ! 713: LDX #$0000 ! 714: PHX ! 715: PHA ! 716: LDA #L042D74 ! 717: LDX #^L042D74 ! 718: JSL L2D0000 ! 719: PLA ! 720: PLX ! 721: STA $F6 ! 722: STX $F8 ! 723: LDA [$F6] ! 724: PHA ! 725: LDA L030085 ! 726: SEC ! 727: SBC #$0013 ! 728: LDX #$0000 ! 729: PHX ! 730: PHA ! 731: LDA #L042CF4 ! 732: LDX #^L042CF4 ! 733: JSL L2D0000 ! 734: PLA ! 735: PLX ! 736: STA $F6 ! 737: STX $F8 ! 738: PLA ! 739: SEP #$20 ! 740: STA [$F6] ! 741: REP #$20 ! 742: L1B058C PEI $E6 ! 743: LDX L03018D ! 744: LDA L03018B ! 745: PHX ! 746: PHA ! 747: PEI $F0 ! 748: PEI $EA ! 749: JSL L1B002E ! 750: PLY ! 751: PLY ! 752: PLY ! 753: PLY ! 754: PLY ! 755: LDA $F4 ! 756: CMP L030083 ! 757: BCS L1B05C3 ! 758: LDA L030083 ! 759: SEC ! 760: SBC $F4 ! 761: CLC ! 762: ADC #$0003 ! 763: PHA ! 764: PEA $0080 ! 765: PEI $EC ! 766: JSL L1E0000 ! 767: PLY ! 768: PLY ! 769: PLY ! 770: BRA L1B05E1 ! 771: L1B05C3 LDA $F4 ! 772: SEC ! 773: SBC L030083 ! 774: CLC ! 775: ADC #$0003 ! 776: PHA ! 777: PEA $0080 ! 778: LDA L030083 ! 779: LSR ! 780: CLC ! 781: ADC #$0B50 ! 782: PHA ! 783: JSL L1E0000 ! 784: PLY ! 785: PLY ! 786: PLY ! 787: L1B05E1 LDA $F4 ! 788: STA L030083 ! 789: PEA $0000 ! 790: PEA $0007 ! 791: PEA $0014 ! 792: LDX L03018D ! 793: LDA L03018B ! 794: PHX ! 795: PHA ! 796: JSL L0D0151 ! 797: PLY ! 798: PLY ! 799: PLY ! 800: PLY ! 801: PLY ! 802: LDX L03018D ! 803: LDA L03018B ! 804: PHX ! 805: PHA ! 806: JSL L07008D ! 807: PLY ! 808: PLY ! 809: PEI $F4 ! 810: PEA $0003 ! 811: PEA $0007 ! 812: PEA $0000 ! 813: JSL L0704AA ! 814: PLY ! 815: PLY ! 816: PLY ! 817: PLY ! 818: PEA $0018 ! 819: PEA $0008 ! 820: LDX L03018D ! 821: LDA L03018B ! 822: CLC ! 823: ADC #$1044 ! 824: PHA ! 825: TXA ! 826: ADC #$0000 ! 827: TAX ! 828: PLA ! 829: PHX ! 830: PHA ! 831: LDX L03018D ! 832: LDA L03018B ! 833: PHX ! 834: PHA ! 835: JSL L0D025C ! 836: TAY ! 837: TSC ! 838: CLC ! 839: ADC #$000C ! 840: TCS ! 841: TYA ! 842: PEA $0018 ! 843: PEA $0008 ! 844: LDX L03018D ! 845: LDA L03018B ! 846: CLC ! 847: ADC #$10B8 ! 848: PHA ! 849: TXA ! 850: ADC #$0000 ! 851: TAX ! 852: PLA ! 853: PHX ! 854: PHA ! 855: LDX L03018D ! 856: LDA L03018B ! 857: PHX ! 858: PHA ! 859: JSL L0D025C ! 860: TAY ! 861: TSC ! 862: CLC ! 863: ADC #$000C ! 864: TCS ! 865: TYA ! 866: PEA $0018 ! 867: PEA $0008 ! 868: PEA $1044 ! 869: JSL L1E0000 ! 870: PLY ! 871: PLY ! 872: PLY ! 873: PEA $0018 ! 874: PEA $0008 ! 875: PEA $10B8 ! 876: JSL L1E0000 ! 877: PLY ! 878: PLY ! 879: PLY ! 880: L1B069B TSC ! 881: CLC ! 882: ADC #$001A ! 883: TCS ! 884: PLD ! 885: RTL ! 886: ! 887: L1B06A3 ENT ! 888: PHD ! 889: TSC ! 890: SEC ! 891: SBC #$00FB ! 892: TCD ! 893: ADC #$00F0 ! 894: TCS ! 895: LDA L030085 ! 896: ASL ! 897: LDX #$0000 ! 898: PHX ! 899: PHA ! 900: LDA #L0434EC ! 901: LDX #^L0434EC ! 902: JSL L2D0000 ! 903: PLA ! 904: PLX ! 905: STA $F6 ! 906: STX $F8 ! 907: LDA [$F6] ! 908: CLC ! 909: ADC #$0B50 ! 910: STA $F4 ! 911: LDA L030085 ! 912: CMP #$0013 ! 913: BCS L1B06E6 ! 914: LDA #$009A ! 915: STA $F2 ! 916: LDA $F4 ! 917: CLC ! 918: ADC #$002A ! 919: STA $F4 ! 920: BRA L1B06EB ! 921: L1B06E6 LDA #$0140 ! 922: STA $F2 ! 923: L1B06EB PEI $F2 ! 924: PEA $0001 ! 925: PEA ^L042D74 ! 926: PEA L042D74 ! 927: LDA $F4 ! 928: LDX #$0000 ! 929: PHX ! 930: PHA ! 931: LDX L03018D ! 932: LDA L03018B ! 933: JSL L2D0000 ! 934: PLA ! 935: PLX ! 936: SEC ! 937: SBC #$0010 ! 938: PHA ! 939: TXA ! 940: SBC #$0000 ! 941: TAX ! 942: PLA ! 943: PHX ! 944: PHA ! 945: JSL L0D0213 ! 946: TAY ! 947: TSC ! 948: CLC ! 949: ADC #$000C ! 950: TCS ! 951: TYA ! 952: LDA L030083 ! 953: CMP #$0037 ! 954: BNE L1B072D ! 955: BRL L1B07CB ! 956: L1B072D BCS L1B0732 ! 957: BRL L1B07CB ! 958: L1B0732 LDA L030083 ! 959: CMP #$00CA ! 960: BCC L1B073D ! 961: BRL L1B07CB ! 962: L1B073D LDA L030085 ! 963: CMP #$0013 ! 964: BCS L1B078A ! 965: LDA L030085 ! 966: LDX #$0000 ! 967: PHX ! 968: PHA ! 969: LDA #L042CF4 ! 970: LDX #^L042CF4 ! 971: JSL L2D0000 ! 972: PLA ! 973: PLX ! 974: STA $F6 ! 975: STX $F8 ! 976: LDA [$F6] ! 977: PHA ! 978: LDA L030083 ! 979: LSR ! 980: CLC ! 981: ADC #$0010 ! 982: SEC ! 983: SBC #$002A ! 984: LDX #$0000 ! 985: PHX ! 986: PHA ! 987: LDA #L042D74 ! 988: LDX #^L042D74 ! 989: JSL L2D0000 ! 990: PLA ! 991: PLX ! 992: STA $F6 ! 993: STX $F8 ! 994: PLA ! 995: SEP #$20 ! 996: STA [$F6] ! 997: REP #$20 ! 998: BRA L1B07C9 ! 999: L1B078A LDA L030085 ! 1000: LDX #$0000 ! 1001: PHX ! 1002: PHA ! 1003: LDA #L042CF4 ! 1004: LDX #^L042CF4 ! 1005: JSL L2D0000 ! 1006: PLA ! 1007: PLX ! 1008: STA $F6 ! 1009: STX $F8 ! 1010: LDA [$F6] ! 1011: PHA ! 1012: LDA L030083 ! 1013: LSR ! 1014: CLC ! 1015: ADC #$0010 ! 1016: LDX #$0000 ! 1017: PHX ! 1018: PHA ! 1019: LDA #L042D74 ! 1020: LDX #^L042D74 ! 1021: JSL L2D0000 ! 1022: PLA ! 1023: PLX ! 1024: STA $F6 ! 1025: STX $F8 ! 1026: PLA ! 1027: SEP #$20 ! 1028: STA [$F6] ! 1029: REP #$20 ! 1030: L1B07C9 BRA L1B0818 ! 1031: L1B07CB LDA L030085 ! 1032: CMP #$0012 ! 1033: BEQ L1B0818 ! 1034: BCC L1B0818 ! 1035: LDA L030085 ! 1036: SEC ! 1037: SBC #$0013 ! 1038: LDX #$0000 ! 1039: PHX ! 1040: PHA ! 1041: LDA #L042CF4 ! 1042: LDX #^L042CF4 ! 1043: JSL L2D0000 ! 1044: PLA ! 1045: PLX ! 1046: STA $F6 ! 1047: STX $F8 ! 1048: LDA [$F6] ! 1049: PHA ! 1050: LDA L030083 ! 1051: LSR ! 1052: CLC ! 1053: ADC #$0010 ! 1054: LDX #$0000 ! 1055: PHX ! 1056: PHA ! 1057: LDA #L042D74 ! 1058: LDX #^L042D74 ! 1059: JSL L2D0000 ! 1060: PLA ! 1061: PLX ! 1062: STA $F6 ! 1063: STX $F8 ! 1064: PLA ! 1065: SEP #$20 ! 1066: STA [$F6] ! 1067: REP #$20 ! 1068: L1B0818 PEI $F2 ! 1069: LDX L03018D ! 1070: LDA L03018B ! 1071: PHX ! 1072: PHA ! 1073: PEI $F4 ! 1074: JSL L1B02BE ! 1075: PLY ! 1076: PLY ! 1077: PLY ! 1078: PLY ! 1079: PEI $F2 ! 1080: PEA $00E1 ! 1081: PEA $2000 ! 1082: PEI $F4 ! 1083: JSL L1B02BE ! 1084: PLY ! 1085: PLY ! 1086: PLY ! 1087: PLY ! 1088: TSC ! 1089: CLC ! 1090: ADC #$000A ! 1091: TCS ! 1092: PLD ! 1093: RTL ! 1094: ! 1095: L1B0846 ENT ! 1096: PHD ! 1097: TSC ! 1098: SEC ! 1099: SBC #$00FB ! 1100: TCD ! 1101: ADC #$00E8 ! 1102: TCS ! 1103: STZ $EA ! 1104: LDA L03013D ! 1105: SEC ! 1106: SBC #$0012 ! 1107: STA $F4 ! 1108: LDA $F4 ! 1109: SEC ! 1110: SBC #$0000 ! 1111: BVS L1B0867 ! 1112: EOR #$8000 ! 1113: L1B0867 BMI L1B086B ! 1114: STZ $F4 ! 1115: L1B086B LDA $F4 ! 1116: SEC ! 1117: SBC #$007F ! 1118: BEQ L1B087F ! 1119: BVS L1B0878 ! 1120: EOR #$8000 ! 1121: L1B0878 BPL L1B087F ! 1122: LDA #$007F ! 1123: STA $F4 ! 1124: L1B087F LDA $F4 ! 1125: CMP L030085 ! 1126: BNE L1B0889 ! 1127: BRL L1B0B4F ! 1128: L1B0889 JSL L1B0173 ! 1129: LDA $F4 ! 1130: ASL ! 1131: LDX #$0000 ! 1132: PHX ! 1133: PHA ! 1134: LDA #L0434EC ! 1135: LDX #^L0434EC ! 1136: JSL L2D0000 ! 1137: PLA ! 1138: PLX ! 1139: STA $F6 ! 1140: STX $F8 ! 1141: LDA [$F6] ! 1142: CLC ! 1143: ADC #$0B50 ! 1144: STA $EE ! 1145: LDA $F4 ! 1146: SEC ! 1147: SBC #$0013 ! 1148: BVS L1B08B8 ! 1149: EOR #$8000 ! 1150: L1B08B8 BMI L1B08C9 ! 1151: LDA #$009A ! 1152: STA $EC ! 1153: LDA $EE ! 1154: CLC ! 1155: ADC #$002A ! 1156: STA $EE ! 1157: BRA L1B08CE ! 1158: L1B08C9 LDA #$0140 ! 1159: STA $EC ! 1160: L1B08CE PEI $EC ! 1161: PEA $0001 ! 1162: PEA ^L042D74 ! 1163: PEA L042D74 ! 1164: LDA $EE ! 1165: LDX #$0000 ! 1166: PHX ! 1167: PHA ! 1168: LDX L03018D ! 1169: LDA L03018B ! 1170: JSL L2D0000 ! 1171: PLA ! 1172: PLX ! 1173: SEC ! 1174: SBC #$0010 ! 1175: PHA ! 1176: TXA ! 1177: SBC #$0000 ! 1178: TAX ! 1179: PLA ! 1180: PHX ! 1181: PHA ! 1182: JSL L0D0213 ! 1183: TAY ! 1184: TSC ! 1185: CLC ! 1186: ADC #$000C ! 1187: TCS ! 1188: TYA ! 1189: LDA L030083 ! 1190: CMP #$0037 ! 1191: BNE L1B0910 ! 1192: BRL L1B09B1 ! 1193: L1B0910 BCS L1B0915 ! 1194: BRL L1B09B1 ! 1195: L1B0915 LDA L030083 ! 1196: CMP #$00CA ! 1197: BCC L1B0920 ! 1198: BRL L1B09B1 ! 1199: L1B0920 LDA $F4 ! 1200: SEC ! 1201: SBC #$0013 ! 1202: BVS L1B092B ! 1203: EOR #$8000 ! 1204: L1B092B BMI L1B0971 ! 1205: LDA $F4 ! 1206: LDX #$0000 ! 1207: PHX ! 1208: PHA ! 1209: LDA #L042CF4 ! 1210: LDX #^L042CF4 ! 1211: JSL L2D0000 ! 1212: PLA ! 1213: PLX ! 1214: STA $F6 ! 1215: STX $F8 ! 1216: LDA [$F6] ! 1217: PHA ! 1218: LDA L030083 ! 1219: LSR ! 1220: CLC ! 1221: ADC #$0010 ! 1222: SEC ! 1223: SBC #$002A ! 1224: LDX #$0000 ! 1225: PHX ! 1226: PHA ! 1227: LDA #L042D74 ! 1228: LDX #^L042D74 ! 1229: JSL L2D0000 ! 1230: PLA ! 1231: PLX ! 1232: STA $F6 ! 1233: STX $F8 ! 1234: PLA ! 1235: SEP #$20 ! 1236: STA [$F6] ! 1237: REP #$20 ! 1238: BRA L1B09AF ! 1239: L1B0971 LDA $F4 ! 1240: LDX #$0000 ! 1241: PHX ! 1242: PHA ! 1243: LDA #L042CF4 ! 1244: LDX #^L042CF4 ! 1245: JSL L2D0000 ! 1246: PLA ! 1247: PLX ! 1248: STA $F6 ! 1249: STX $F8 ! 1250: LDA [$F6] ! 1251: PHA ! 1252: LDA L030083 ! 1253: LSR ! 1254: CLC ! 1255: ADC #$0010 ! 1256: LDX #$0000 ! 1257: PHX ! 1258: PHA ! 1259: LDA #L042D74 ! 1260: LDX #^L042D74 ! 1261: JSL L2D0000 ! 1262: PLA ! 1263: PLX ! 1264: STA $F6 ! 1265: STX $F8 ! 1266: PLA ! 1267: SEP #$20 ! 1268: STA [$F6] ! 1269: REP #$20 ! 1270: L1B09AF BRA L1B0A02 ! 1271: L1B09B1 LDA $F4 ! 1272: SEC ! 1273: SBC #$0012 ! 1274: BEQ L1B0A02 ! 1275: BVS L1B09BE ! 1276: EOR #$8000 ! 1277: L1B09BE BPL L1B0A02 ! 1278: LDA $F4 ! 1279: SEC ! 1280: SBC #$0013 ! 1281: LDX #$0000 ! 1282: PHX ! 1283: PHA ! 1284: LDA #L042CF4 ! 1285: LDX #^L042CF4 ! 1286: JSL L2D0000 ! 1287: PLA ! 1288: PLX ! 1289: STA $F6 ! 1290: STX $F8 ! 1291: LDA [$F6] ! 1292: PHA ! 1293: LDA L030083 ! 1294: LSR ! 1295: CLC ! 1296: ADC #$0010 ! 1297: LDX #$0000 ! 1298: PHX ! 1299: PHA ! 1300: LDA #L042D74 ! 1301: LDX #^L042D74 ! 1302: JSL L2D0000 ! 1303: PLA ! 1304: PLX ! 1305: STA $F6 ! 1306: STX $F8 ! 1307: PLA ! 1308: SEP #$20 ! 1309: STA [$F6] ! 1310: REP #$20 ! 1311: L1B0A02 PEI $EC ! 1312: LDX L03018D ! 1313: LDA L03018B ! 1314: PHX ! 1315: PHA ! 1316: PEI $EE ! 1317: JSL L1B02BE ! 1318: PLY ! 1319: PLY ! 1320: PLY ! 1321: PLY ! 1322: LDA $F4 ! 1323: CMP L030085 ! 1324: BCS L1B0A57 ! 1325: PEA $0140 ! 1326: LDA L030085 ! 1327: SEC ! 1328: SBC $F4 ! 1329: CLC ! 1330: ADC #$0001 ! 1331: PHA ! 1332: LDA $F4 ! 1333: ASL ! 1334: LDX #$0000 ! 1335: PHX ! 1336: PHA ! 1337: LDA #L0434EC ! 1338: LDX #^L0434EC ! 1339: JSL L2D0000 ! 1340: PLA ! 1341: PLX ! 1342: STA $F6 ! 1343: STX $F8 ! 1344: LDA [$F6] ! 1345: CLC ! 1346: ADC #$0B50 ! 1347: SEC ! 1348: SBC #$0010 ! 1349: PHA ! 1350: JSL L1E0000 ! 1351: PLY ! 1352: PLY ! 1353: PLY ! 1354: BRA L1B0A90 ! 1355: L1B0A57 PEA $0140 ! 1356: LDA $F4 ! 1357: SEC ! 1358: SBC L030085 ! 1359: CLC ! 1360: ADC #$0001 ! 1361: PHA ! 1362: LDA L030085 ! 1363: ASL ! 1364: LDX #$0000 ! 1365: PHX ! 1366: PHA ! 1367: LDA #L0434EC ! 1368: LDX #^L0434EC ! 1369: JSL L2D0000 ! 1370: PLA ! 1371: PLX ! 1372: STA $F6 ! 1373: STX $F8 ! 1374: LDA [$F6] ! 1375: CLC ! 1376: ADC #$0B50 ! 1377: SEC ! 1378: SBC #$0010 ! 1379: PHA ! 1380: JSL L1E0000 ! 1381: PLY ! 1382: PLY ! 1383: PLY ! 1384: L1B0A90 LDA $F4 ! 1385: STA L030085 ! 1386: PEA $0000 ! 1387: PEA $0007 ! 1388: PEA $0014 ! 1389: LDX L03018D ! 1390: LDA L03018B ! 1391: PHX ! 1392: PHA ! 1393: JSL L0D0151 ! 1394: PLY ! 1395: PLY ! 1396: PLY ! 1397: PLY ! 1398: PLY ! 1399: LDX L03018D ! 1400: LDA L03018B ! 1401: PHX ! 1402: PHA ! 1403: JSL L07008D ! 1404: PLY ! 1405: PLY ! 1406: LDA #$007F ! 1407: SEC ! 1408: SBC $F4 ! 1409: PHA ! 1410: PEA $0003 ! 1411: PEA $0007 ! 1412: PEA $0000 ! 1413: JSL L0704AA ! 1414: PLY ! 1415: PLY ! 1416: PLY ! 1417: PLY ! 1418: PEA $0018 ! 1419: PEA $0008 ! 1420: LDX L03018D ! 1421: LDA L03018B ! 1422: CLC ! 1423: ADC #$1056 ! 1424: PHA ! 1425: TXA ! 1426: ADC #$0000 ! 1427: TAX ! 1428: PLA ! 1429: PHX ! 1430: PHA ! 1431: LDX L03018D ! 1432: LDA L03018B ! 1433: PHX ! 1434: PHA ! 1435: JSL L0D025C ! 1436: TAY ! 1437: TSC ! 1438: CLC ! 1439: ADC #$000C ! 1440: TCS ! 1441: TYA ! 1442: PEA $0018 ! 1443: PEA $0008 ! 1444: LDX L03018D ! 1445: LDA L03018B ! 1446: CLC ! 1447: ADC #$10CA ! 1448: PHA ! 1449: TXA ! 1450: ADC #$0000 ! 1451: TAX ! 1452: PLA ! 1453: PHX ! 1454: PHA ! 1455: LDX L03018D ! 1456: LDA L03018B ! 1457: PHX ! 1458: PHA ! 1459: JSL L0D025C ! 1460: TAY ! 1461: TSC ! 1462: CLC ! 1463: ADC #$000C ! 1464: TCS ! 1465: TYA ! 1466: PEA $0018 ! 1467: PEA $0008 ! 1468: PEA $1056 ! 1469: JSL L1E0000 ! 1470: PLY ! 1471: PLY ! 1472: PLY ! 1473: PEA $0018 ! 1474: PEA $0008 ! 1475: PEA $10CA ! 1476: JSL L1E0000 ! 1477: PLY ! 1478: PLY ! 1479: PLY ! 1480: L1B0B4F TSC ! 1481: CLC ! 1482: ADC #$0012 ! 1483: TCS ! 1484: PLD ! 1485: RTL ! 1486: ! 1487: L1B0B57 ENT ! 1488: PHD ! 1489: TSC ! 1490: SEC ! 1491: SBC #$00FB ! 1492: TCD ! 1493: ADC #$00F4 ! 1494: TCS ! 1495: LDAL L043986 ! 1496: AND #$00FF ! 1497: STA L030083 ! 1498: LDAL L043987 ! 1499: AND #$00FF ! 1500: PHA ! 1501: LDA #$007F ! 1502: PLX ! 1503: STX $FA ! 1504: SEC ! 1505: SBC $FA ! 1506: STA L030085 ! 1507: TSC ! 1508: CLC ! 1509: ADC #$0006 ! 1510: TCS ! 1511: PLD ! 1512: RTL ! 1513: ! 1514: L1B0B88 ENT ! 1515: PHD ! 1516: TSC ! 1517: SEC ! 1518: SBC #$00FB ! 1519: TCD ! 1520: ADC #$00F4 ! 1521: TCS ! 1522: LDX L03018D ! 1523: LDA L03018B ! 1524: PHX ! 1525: PHA ! 1526: JSL L07008D ! 1527: PLY ! 1528: PLY ! 1529: PEA $0000 ! 1530: PEA $0007 ! 1531: PEA $001A ! 1532: LDX L03018D ! 1533: LDA L03018B ! 1534: PHX ! 1535: PHA ! 1536: JSL L0D0151 ! 1537: PLY ! 1538: PLY ! 1539: PLY ! 1540: PLY ! 1541: PLY ! 1542: LDA L0301F3 ! 1543: PHA ! 1544: PEA $0004 ! 1545: PEA $0007 ! 1546: PEA $0000 ! 1547: JSL L0704AA ! 1548: PLY ! 1549: PLY ! 1550: PLY ! 1551: PLY ! 1552: PEA ^L042B7D ! 1553: PEA L042B7D ! 1554: PEA $0006 ! 1555: PEA $001D ! 1556: JSL L070592 ! 1557: PLY ! 1558: PLY ! 1559: PLY ! 1560: PLY ! 1561: LDA L0301F5 ! 1562: PHA ! 1563: PEA $0002 ! 1564: PEA $0007 ! 1565: PEA $0020 ! 1566: JSL L0704AA ! 1567: PLY ! 1568: PLY ! 1569: PLY ! 1570: PLY ! 1571: PEA $0030 ! 1572: PEA $0008 ! 1573: LDX L03018D ! 1574: LDA L03018B ! 1575: CLC ! 1576: ADC #$0EA5 ! 1577: PHA ! 1578: TXA ! 1579: ADC #$0000 ! 1580: TAX ! 1581: PLA ! 1582: PHX ! 1583: PHA ! 1584: LDX L03018D ! 1585: LDA L03018B ! 1586: PHX ! 1587: PHA ! 1588: JSL L0D025C ! 1589: TAY ! 1590: TSC ! 1591: CLC ! 1592: ADC #$000C ! 1593: TCS ! 1594: TYA ! 1595: PEA $0030 ! 1596: PEA $0008 ! 1597: PEA $00E1 ! 1598: PEA $2EA5 ! 1599: LDX L03018D ! 1600: LDA L03018B ! 1601: PHX ! 1602: PHA ! 1603: JSL L0D025C ! 1604: TAY ! 1605: TSC ! 1606: CLC ! 1607: ADC #$000C ! 1608: TCS ! 1609: TYA ! 1610: TSC ! 1611: CLC ! 1612: ADC #$0006 ! 1613: TCS ! 1614: PLD ! 1615: RTL ! 1616: ! 1617: L1B0C4E ENT ! 1618: PHD ! 1619: TSC ! 1620: SEC ! 1621: SBC #$00FB ! 1622: TCD ! 1623: ADC #$00F4 ! 1624: TCS ! 1625: LDX L03018D ! 1626: LDA L03018B ! 1627: PHX ! 1628: PHA ! 1629: JSL L07008D ! 1630: PLY ! 1631: PLY ! 1632: PEA $0000 ! 1633: PEA $0007 ! 1634: PEA $0014 ! 1635: LDX L03018D ! 1636: LDA L03018B ! 1637: PHX ! 1638: PHA ! 1639: JSL L0D0151 ! 1640: PLY ! 1641: PLY ! 1642: PLY ! 1643: PLY ! 1644: PLY ! 1645: LDA #$007F ! 1646: SEC ! 1647: SBC L030085 ! 1648: PHA ! 1649: PEA $0007 ! 1650: PEA $0000 ! 1651: JSL L07047C ! 1652: PLY ! 1653: PLY ! 1654: PLY ! 1655: PEA $0018 ! 1656: PEA $0008 ! 1657: LDX L03018D ! 1658: LDA L03018B ! 1659: CLC ! 1660: ADC #$04B4 ! 1661: PHA ! 1662: TXA ! 1663: ADC #$0000 ! 1664: TAX ! 1665: PLA ! 1666: PHX ! 1667: PHA ! 1668: LDX L03018D ! 1669: LDA L03018B ! 1670: PHX ! 1671: PHA ! 1672: JSL L0D025C ! 1673: TAY ! 1674: TSC ! 1675: CLC ! 1676: ADC #$000C ! 1677: TCS ! 1678: TYA ! 1679: PEA $0000 ! 1680: PEA $0007 ! 1681: PEA $0014 ! 1682: LDX L03018D ! 1683: LDA L03018B ! 1684: PHX ! 1685: PHA ! 1686: JSL L0D0151 ! 1687: PLY ! 1688: PLY ! 1689: PLY ! 1690: PLY ! 1691: PLY ! 1692: LDA L030083 ! 1693: PHA ! 1694: PEA $0007 ! 1695: PEA $0000 ! 1696: JSL L07047C ! 1697: PLY ! 1698: PLY ! 1699: PLY ! 1700: PEA $0018 ! 1701: PEA $0008 ! 1702: LDX L03018D ! 1703: LDA L03018B ! 1704: CLC ! 1705: ADC #$04A0 ! 1706: PHA ! 1707: TXA ! 1708: ADC #$0000 ! 1709: TAX ! 1710: PLA ! 1711: PHX ! 1712: PHA ! 1713: LDX L03018D ! 1714: LDA L03018B ! 1715: PHX ! 1716: PHA ! 1717: JSL L0D025C ! 1718: TAY ! 1719: TSC ! 1720: CLC ! 1721: ADC #$000C ! 1722: TCS ! 1723: TYA ! 1724: PEA $0040 ! 1725: PEA $0008 ! 1726: PEA $04A0 ! 1727: JSL L1E0000 ! 1728: PLY ! 1729: PLY ! 1730: PLY ! 1731: TSC ! 1732: CLC ! 1733: ADC #$0006 ! 1734: TCS ! 1735: PLD ! 1736: RTL
This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.