ORG $0000 L001F: LDX #$C880 ; 001F: 8E C8 80 LDD #$0280 ; 0022: CC 02 80 JSR Clear_x_d ; 0025: BD F5 48 LDD #$0203 ; 0028: CC 02 03 JSR Select_Game ; 002B: BD F7 A9 JSR DP_to_C8 ; 002E: BD F1 AF LDA #$FF ; 0031: 86 FF STA >$29 ; 0033: 97 29 LDB #$BB ; 0035: C6 BB LDA >$7A ; 0037: 96 7A CMPA #$01 ; 0039: 81 01 BEQ $45 ; 003B: 27 08 LDB #$88 ; 003D: C6 88 CMPA #$02 ; 003F: 81 02 BEQ $45 ; 0041: 27 02 INC >$29 ; 0043: 0C 29 L0045: STB >$F0 ; 0045: D7 F0 CLR >$20 ; 0047: 0F 20 CLR >$22 ; 0049: 0F 22 LDD #$7F7F ; 004B: CC 7F 7F STD >$C9 ; 004E: DD C9 L0050: LDA >$79 ; 0050: 96 79 STA >$C8 ; 0052: 97 C8 CLR >$87 ; 0054: 0F 87 LDA #$10 ; 0056: 86 10 STA >$1A ; 0058: 97 1A LDD #$FA38 ; 005A: CC FA 38 STD >$2A ; 005D: DD 2A LDX #$C8DE ; 005F: 8E C8 DE LDU #$0D3F ; 0062: CE 0D 3F LDA #$07 ; 0065: 86 07 JSR $0CF6 ; 0067: BD 0C F6 LDX #$CA88 ; 006A: 8E CA 88 LDD #$7888 ; 006D: CC 78 88 STD ,X++ ; 0070: ED 81 JSR Clear_Score ; 0072: BD F8 4F LEAX $07,X ; 0075: 30 07 LDD #$7838 ; 0077: CC 78 38 STD ,X++ ; 007A: ED 81 JSR Clear_Score ; 007C: BD F8 4F JSR Init_Music_Buf ; 007F: BD F5 33 LDA #$FF ; 0082: 86 FF STA >$71 ; 0084: 97 71 STA >$8A ; 0086: 97 8A STA >$E9 ; 0088: 97 E9 STA >$ED ; 008A: 97 ED STA >$91 ; 008C: 97 91 LDX #$0FEE ; 008E: 8E 0F EE LDU #$CA9A ; 0091: CE CA 9A LDB #$02 ; 0094: C6 02 JSR $0CAC ; 0096: BD 0C AC L0099: LDA >$E1 ; 0099: 96 E1 STA >$2E ; 009B: 97 2E LDA >$E0 ; 009D: 96 E0 STA >$2F ; 009F: 97 2F LDA >$DE ; 00A1: 96 DE STA >$30 ; 00A3: 97 30 JSR $084B ; 00A5: BD 08 4B L00A8: JSR $0CD4 ; 00A8: BD 0C D4 CLR >$94 ; 00AB: 0F 94 LDX #$C9C0 ; 00AD: 8E C9 C0 LDD #$0807 ; 00B0: CC 08 07 JSR $0CDA ; 00B3: BD 0C DA CLR >$67 ; 00B6: 0F 67 LDA >$E2 ; 00B8: 96 E2 BNE $DD ; 00BA: 26 21 LDX #$CA8A ; 00BC: 8E CA 8A LEAU $09,X ; 00BF: 33 09 JSR Compare_Score ; 00C1: BD F8 C7 CMPA #$02 ; 00C4: 81 02 BNE $CA ; 00C6: 26 02 LEAX ,U ; 00C8: 30 C4 L00CA: LDU #Vec_High_Score ; 00CA: CE CB EB JSR New_High_Score ; 00CD: BD F8 D8 CLR >$ED ; 00D0: 0F ED LDD #$0BFF ; 00D2: CC 0B FF STD >$32 ; 00D5: DD 32 LDA >$C8 ; 00D7: 96 C8 STA >$E9 ; 00D9: 97 E9 BRA $011B ; 00DB: 20 3E L00DD: LDA >$C7 ; 00DD: 96 C7 BNE $EF ; 00DF: 26 0E LDA >$2E ; 00E1: 96 2E BEQ $99 ; 00E3: 27 B4 LDA >$C8 ; 00E5: 96 C8 STA >$E9 ; 00E7: 97 E9 DEC >$2E ; 00E9: 0A 2E BNE $011B ; 00EB: 26 2E COM >$E9 ; 00ED: 03 E9 L00EF: LDB >$C7 ; 00EF: D6 C7 BEQ $A8 ; 00F1: 27 B5 LDA >$8A ; 00F3: 96 8A BPL $010F ; 00F5: 2A 18 NEGA ; 00F7: 40 STA >$8A ; 00F8: 97 8A ANDA #$03 ; 00FA: 84 03 CMPA #$01 ; 00FC: 81 01 BNE $010F ; 00FE: 26 0F LDB >$87 ; 0100: D6 87 LDU #$0CFF ; 0102: CE 0C FF LEAU B,U ; 0105: 33 C5 LDX #$C880 ; 0107: 8E C8 80 LDA #$08 ; 010A: 86 08 JSR $0CF6 ; 010C: BD 0C F6 L010F: JSR $0A59 ; 010F: BD 0A 59 JSR $08BA ; 0112: BD 08 BA JSR $039D ; 0115: BD 03 9D JSR $06C6 ; 0118: BD 06 C6 L011B: INC >$EE ; 011B: 0C EE JSR $0BD3 ; 011D: BD 0B D3 JSR $0185 ; 0120: BD 01 85 LDA >$ED ; 0123: 96 ED BMI $EF ; 0125: 2B C8 LDB >$0F ; 0127: D6 0F LBNE $50 ; 0129: 10 26 FF 23 DEC >$33 ; 012D: 0A 33 BNE $011B ; 012F: 26 EA DEC >$32 ; 0131: 0A 32 BNE $011B ; 0133: 26 E6 LDD #$06FF ; 0135: CC 06 FF STD >$32 ; 0138: DD 32 L013A: JSR Wait_Recal ; 013A: BD F1 92 JSR Read_Btns ; 013D: BD F1 BA JSR DP_to_C8 ; 0140: BD F1 AF LDX >$32 ; 0143: 9E 32 LEAX $FFFF,X ; 0145: 30 1F STX >$32 ; 0147: 9F 32 BEQ $0150 ; 0149: 27 05 LDA Vec_Btn_State ; 014B: B6 C8 0F BEQ $013A ; 014E: 27 EA L0150: JMP Cold_Start ; 0150: 7E F0 00 L0153: STA >$04 ; 0153: 97 04 LDD ,U++ ; 0155: EC C1 JSR Moveto_d ; 0157: BD F3 12 LDA #$3F ; 015A: 86 3F STA >$04 ; 015C: 97 04 LDA $03,S ; 015E: A6 63 STA Vec_Misc_Count ; 0160: B7 C8 23 JSR Draw_Pat_VL ; 0163: BD F4 37 DEC $02,S ; 0166: 6A 62 RTS ; 0168: 39 L0169: LDD ,U++ ; 0169: EC C1 PSHS X,B,A ; 016B: 34 16 L016D: LDX $02,S ; 016D: AE 62 LDA $C8CA ; 016F: B6 C8 CA BSR $0153 ; 0172: 8D DF BNE $016D ; 0174: 26 F7 PULS A,B,X,PC ; 0176: 35 96 ;(PUL? PC=RTS) L0178: LDD ,U++ ; 0178: EC C1 PSHS B,A ; 017A: 34 06 L017C: LDA $C8C9 ; 017C: B6 C8 C9 BSR $0153 ; 017F: 8D D2 BNE $017C ; 0181: 26 F9 PULS A,B,PC ; 0183: 35 86 ;(PUL? PC=RTS) L0185: INC >$24 ; 0185: 0C 24 JSR Wait_Recal ; 0187: BD F1 92 JSR Do_Sound ; 018A: BD F2 89 JSR Intensity_5F ; 018D: BD F2 A5 LDX #$0E18 ; 0190: 8E 0E 18 LDU #$0EA4 ; 0193: CE 0E A4 BSR $0178 ; 0196: 8D E0 LDX #$0E60 ; 0198: 8E 0E 60 BSR $0169 ; 019B: 8D CC LEAX $0C,X ; 019D: 30 0C BSR $0169 ; 019F: 8D C8 LEAX $08,X ; 01A1: 30 08 BSR $0178 ; 01A3: 8D D3 CLR Vec_0Ref_Enable ; 01A5: 7F C8 24 LEAS $FFF6,S ; 01A8: 32 76 LDU #$C900 ; 01AA: CE C9 00 LDD #$038F ; 01AD: CC 03 8F STD ,S ; 01B0: ED E4 LDD #$0275 ; 01B2: CC 02 75 STD $02,S ; 01B5: ED 62 LDA $C881 ; 01B7: B6 C8 81 LDB #$40 ; 01BA: C6 40 JSR $0381 ; 01BC: BD 03 81 LDU #$CA00 ; 01BF: CE CA 00 LDD #$02E6 ; 01C2: CC 02 E6 STD $02,S ; 01C5: ED 62 LDA $C8C8 ; 01C7: B6 C8 C8 LDB #$27 ; 01CA: C6 27 JSR $0381 ; 01CC: BD 03 81 LDU #$C9C0 ; 01CF: CE C9 C0 LDD #$02B2 ; 01D2: CC 02 B2 STD $02,S ; 01D5: ED 62 LDY #$CA56 ; 01D7: 10 8E CA 56 LDD #$0807 ; 01DB: CC 08 07 JSR $0381 ; 01DE: BD 03 81 LDU #$C894 ; 01E1: CE C8 94 LDD #$0308 ; 01E4: CC 03 08 STD $02,S ; 01E7: ED 62 LDA #$01 ; 01E9: 86 01 JSR $0381 ; 01EB: BD 03 81 LDD #$0CA3 ; 01EE: CC 0C A3 STD ,S ; 01F1: ED E4 LDX #$CA8A ; 01F3: 8E CA 8A LDU #$C8E5 ; 01F6: CE C8 E5 LDA $C8C8 ; 01F9: B6 C8 C8 JSR $0381 ; 01FC: BD 03 81 LDD #$7E7F ; 01FF: CC 7E 7F STB >$04 ; 0202: D7 04 JSR Intensity_a ; 0204: BD F2 AB LDA $C8E9 ; 0207: B6 C8 E9 BMI $021A ; 020A: 2B 0E LDA $C8C8 ; 020C: B6 C8 C8 LDX #Print_Str_yx ; 020F: 8E F3 78 STX ,S ; 0212: AF E4 LDU #$CA88 ; 0214: CE CA 88 JSR $0381 ; 0217: BD 03 81 L021A: LEAS $0A,S ; 021A: 32 6A LDA $C8E9 ; 021C: B6 C8 E9 BMI $0237 ; 021F: 2B 16 LDX #$78EF ; 0221: 8E 78 EF LDB $C8E2 ; 0224: F6 C8 E2 LDA #$60 ; 0227: 86 60 JSR Print_Ships ; 0229: BD F3 93 LDA $C8ED ; 022C: B6 C8 ED BNE $0237 ; 022F: 26 06 LDU #$0FF4 ; 0231: CE 0F F4 JSR Print_Str_yx ; 0234: BD F3 78 L0237: LDA $C8F0 ; 0237: B6 C8 F0 JSR $106A ; 023A: BD 10 6A JSR $1000 ; 023D: BD 10 00 LDA $C8C8 ; 0240: B6 C8 C8 BEQ $026F ; 0243: 27 2A LDX #$CA4E ; 0245: 8E CA 4E LDU #Vec_Button_1_1 ; 0248: CE C8 12 LDY #Vec_Joy_1_X ; 024B: 10 8E C8 1B L024F: PSHS X,A ; 024F: 34 12 LDD ,U++ ; 0251: EC C1 STD ,X+ ; 0253: ED 80 LDD ,U++ ; 0255: EC C1 STD $01,X ; 0257: ED 01 CLRB ; 0259: 5F LDA ,Y++ ; 025A: A6 A1 BEQ $0268 ; 025C: 27 0A ROLA ; 025E: 49 ROLB ; 025F: 59 BEQ $0264 ; 0260: 27 02 COMA ; 0262: 43 NEGB ; 0263: 50 L0264: ORA B,X ; 0264: AA 85 STA B,X ; 0266: A7 85 L0268: PULS A,X ; 0268: 35 12 LEAX $04,X ; 026A: 30 04 DECA ; 026C: 4A BNE $024F ; 026D: 26 E0 L026F: JSR Reset0Ref ; 026F: BD F3 54 JMP DP_to_C8 ; 0272: 7E F1 AF L0381: PSHS B,A ; 0381: 34 06 TSTA ; 0383: 4D BEQ $038D ; 0384: 27 07 L0386: JSR [$04,S] ; 0386: AD F8 04 DEC ,S ; 0389: 6A E4 BNE $0386 ; 038B: 26 F9 L038D: PULS A,B,PC ; 038D: 35 86 ;(PUL? PC=RTS) L039D: LDA #$FC ; 039D: 86 FC ANDA >$67 ; 039F: 94 67 STA >$67 ; 03A1: 97 67 LDA >$2F ; 03A3: 96 2F LBEQ $0448 ; 03A5: 10 27 00 9F DEC >$2F ; 03A9: 0A 2F BNE $03E9 ; 03AB: 26 3C COM >$8A ; 03AD: 03 8A LDX #$CB00 ; 03AF: 8E CB 00 LDU #$0E6C ; 03B2: CE 0E 6C LDA #$04 ; 03B5: 86 04 PSHS A ; 03B7: 34 02 L03B9: LDD #$0408 ; 03B9: CC 04 08 JSR $0CE1 ; 03BC: BD 0C E1 DEC ,S ; 03BF: 6A E4 BNE $03B9 ; 03C1: 26 F6 PULS A ; 03C3: 35 02 LDA >$80 ; 03C5: 96 80 STA >$88 ; 03C7: 97 88 CMPA #$01 ; 03C9: 81 01 BNE $03D2 ; 03CB: 26 05 LDD #$01FD ; 03CD: CC 01 FD BRA $03D5 ; 03D0: 20 03 L03D2: LDD #$02FE ; 03D2: CC 02 FE L03D5: STD >$EB ; 03D5: DD EB JSR $0CD4 ; 03D7: BD 0C D4 LDA >$82 ; 03DA: 96 82 STA >$89 ; 03DC: 97 89 LDX #$C900 ; 03DE: 8E C9 00 LDB >$81 ; 03E1: D6 81 STB >$8B ; 03E3: D7 8B L03E5: STB >$CD ; 03E5: D7 CD BNE $03EA ; 03E7: 26 01 L03E9: RTS ; 03E9: 39 L03EA: LDA #$09 ; 03EA: 86 09 MUL ; 03EC: 3D LDU #$0D7C ; 03ED: CE 0D 7C LEAU B,U ; 03F0: 33 C5 INCA ; 03F2: 4C STA ,X+ ; 03F3: A7 80 LDA #$08 ; 03F5: 86 08 L03F7: CLR ,X+ ; 03F7: 6F 80 DECA ; 03F9: 4A BNE $03F7 ; 03FA: 26 FB JSR Random_3 ; 03FC: BD F5 11 ANDA #$03 ; 03FF: 84 03 STA ,X+ ; 0401: A7 80 LDA #$09 ; 0403: 86 09 JSR $0CF6 ; 0405: BD 0C F6 LEAU $FFFE,X ; 0408: 33 1E LDA ,U ; 040A: A6 C4 BNE $0410 ; 040C: 26 02 LDA ,-U ; 040E: A6 C2 L0410: LDB >$88 ; 0410: D6 88 MUL ; 0412: 3D NEGB ; 0413: 50 STB ,U ; 0414: E7 C4 LDB $FFF6,X ; 0416: E6 16 BEQ $0427 ; 0418: 27 0D LEAU $FFFB,X ; 041A: 33 1B COMA ; 041C: 43 L041D: NEGA ; 041D: 40 LEAU A,U ; 041E: 33 C6 NEG ,U ; 0420: 60 C4 NEG $02,U ; 0422: 60 42 DECB ; 0424: 5A BNE $041D ; 0425: 26 F6 L0427: CLRA ; 0427: 4F TFR D,Y ; 0428: 1F 02 LDD $FFFB,X ; 042A: EC 1B JSR $0C80 ; 042C: BD 0C 80 STA $FFF3,X ; 042F: A7 13 LDA $FFFF,X ; 0431: A6 1F LEAU ,X ; 0433: 33 84 LDX #$0EC8 ; 0435: 8E 0E C8 JSR Rot_VL_Mode_a ; 0438: BD F6 1F LDA -$20,U ; 043B: A6 C8 E0 JSR Rot_VL_Mode_a ; 043E: BD F6 1F LEAX $01,U ; 0441: 30 41 LDB >$CD ; 0443: D6 CD DECB ; 0445: 5A BRA $03E5 ; 0446: 20 9D L0448: LDA >$8B ; 0448: 96 8B BNE $0451 ; 044A: 26 05 LDA >$E0 ; 044C: 96 E0 STA >$2F ; 044E: 97 2F RTS ; 0450: 39 L0451: LDB $C900 ; 0451: F6 C9 00 BGT $0464 ; 0454: 2E 0E LDB $C940 ; 0456: F6 C9 40 BGT $0464 ; 0459: 2E 09 LDB $C980 ; 045B: F6 C9 80 BGT $0464 ; 045E: 2E 04 LDA #$FC ; 0460: 86 FC STA >$EC ; 0462: 97 EC L0464: LDA >$67 ; 0464: 96 67 ORA >$EB ; 0466: 9A EB ANDA >$EC ; 0468: 94 EC STA >$67 ; 046A: 97 67 LDX #$C8C8 ; 046C: 8E C8 C8 LDB >$8E ; 046F: D6 8E L0471: INCB ; 0471: 5C ANDB #$03 ; 0472: C4 03 STB >$8E ; 0474: D7 8E BEQ $0471 ; 0476: 27 F9 LDA #$40 ; 0478: 86 40 MUL ; 047A: 3D ABX ; 047B: 3A LDA $FFF8,X ; 047C: A6 18 BEQ $048B ; 047E: 27 0B BMI $04A5 ; 0480: 2B 23 LDB $FFF9,X ; 0482: E6 19 BNE $048C ; 0484: 26 06 TSTA ; 0486: 4D LBNE $0552 ; 0487: 10 26 00 C7 L048B: RTS ; 048B: 39 L048C: LDA #$80 ; 048C: 86 80 STA $FFF8,X ; 048E: A7 18 LDU #$CB00 ; 0490: CE CB 00 STU $02,X ; 0493: EF 02 LDB #$10 ; 0495: C6 10 LDA $0A,X ; 0497: A6 0A STB $04,X ; 0499: E7 04 CLR $05,X ; 049B: 6F 05 LEAU $0B,X ; 049D: 33 0B LDX #$0EF4 ; 049F: 8E 0E F4 JMP Rot_VL_Mode_a ; 04A2: 7E F6 1F L04A5: INC $FFF8,X ; 04A5: 6C 18 BNE $04B2 ; 04A7: 26 09 CLR $FFF9,X ; 04A9: 6F 19 DEC >$8B ; 04AB: 0A 8B BNE $04B1 ; 04AD: 26 02 CLR >$EB ; 04AF: 0F EB L04B1: RTS ; 04B1: 39 L04B2: CMPA #$F8 ; 04B2: 81 F8 BLT $04BC ; 04B4: 2D 06 LDA #$02 ; 04B6: 86 02 ADDA $04,X ; 04B8: AB 04 STA $04,X ; 04BA: A7 04 L04BC: JSR $0709 ; 04BC: BD 07 09 LDB $FFF9,X ; 04BF: E6 19 DECB ; 04C1: 5A BEQ $04CF ; 04C2: 27 0B LDU #$0F07 ; 04C4: CE 0F 07 LEAX $1E,X ; 04C7: 30 88 1E LDA #$19 ; 04CA: 86 19 JMP $0CF6 ; 04CC: 7E 0C F6 L04CF: DEC $FFFA,X ; 04CF: 6A 1A BGT $0501 ; 04D1: 2E 2E LDU #$C9DC ; 04D3: CE C9 DC LDB >$8E ; 04D6: D6 8E LDA #$07 ; 04D8: 86 07 MUL ; 04DA: 3D LEAU B,U ; 04DB: 33 C5 LDB ,U ; 04DD: E6 C4 BNE $0501 ; 04DF: 26 20 LDD $06,X ; 04E1: EC 06 STD $01,U ; 04E3: ED 41 LDB $FFFE,X ; 04E5: E6 1E LDA >$86 ; 04E7: 96 86 STA $FFFA,X ; 04E9: A7 1A L04EB: LDA #$07 ; 04EB: 86 07 JSR Rise_Run_X ; 04ED: BD F5 FF STD $03,U ; 04F0: ED 43 ASRA ; 04F2: 47 ASRB ; 04F3: 57 STD $05,U ; 04F4: ED 45 LDD $03,U ; 04F6: EC 43 SUBA $05,U ; 04F8: A0 45 SUBB $06,U ; 04FA: E0 46 STD $03,U ; 04FC: ED 43 DEC ,U ; 04FE: 6A C4 L0500: RTS ; 0500: 39 L0501: LDA #$7F ; 0501: 86 7F STA >$D0 ; 0503: 97 D0 LDU #$CA06 ; 0505: CE CA 06 LDA $FFFA,U ; 0508: A6 5A BLE $0517 ; 050A: 2F 0B LDD $06,X ; 050C: EC 06 JSR $0C76 ; 050E: BD 0C 76 CMPB #$04 ; 0511: C1 04 BLT $0549 ; 0513: 2D 34 STD >$CF ; 0515: DD CF L0517: LDA >$C8 ; 0517: 96 C8 DECA ; 0519: 4A BEQ $0530 ; 051A: 27 14 LEAU $27,U ; 051C: 33 C8 27 LDA $FFFA,U ; 051F: A6 5A BLT $0530 ; 0521: 2D 0D LDD $06,X ; 0523: EC 06 JSR $0C76 ; 0525: BD 0C 76 CMPB #$04 ; 0528: C1 04 BLT $0549 ; 052A: 2D 1D CMPB >$D0 ; 052C: D1 D0 BLT $0532 ; 052E: 2D 02 L0530: LDA >$CF ; 0530: 96 CF L0532: ANDA >$84 ; 0532: 94 84 CMPA $FFFE,X ; 0534: A1 1E BEQ $0500 ; 0536: 27 C8 LDB >$EE ; 0538: D6 EE BITB #$01 ; 053A: C5 01 BEQ $0500 ; 053C: 27 C2 STA $FFFE,X ; 053E: A7 1E LEAU $1E,X ; 0540: 33 88 1E LDX #$0EDB ; 0543: 8E 0E DB JMP Rot_VL_Mode_a ; 0546: 7E F6 1F L0549: LDA #$02 ; 0549: 86 02 STA $FFF9,X ; 054B: A7 19 LDA #$80 ; 054D: 86 80 STA $FFFA,U ; 054F: A7 5A RTS ; 0551: 39 L0552: LDA ,X ; 0552: A6 84 BEQ $0568 ; 0554: 27 12 SUBA >$89 ; 0556: 90 89 STA ,X ; 0558: A7 84 LDA $0A,X ; 055A: A6 0A ADDA $FFFD,X ; 055C: AB 1D STA $0A,X ; 055E: A7 0A LEAU $0B,X ; 0560: 33 0B LDX #$0EC8 ; 0562: 8E 0E C8 JMP Rot_VL_Mode_a ; 0565: 7E F6 1F L0568: LDY #$0DA0 ; 0568: 10 8E 0D A0 LDA $05,X ; 056C: A6 05 LBEQ $0600 ; 056E: 10 27 00 8E LEAU $40,X ; 0572: 33 88 40 CMPU #$C9C8 ; 0575: 11 83 C9 C8 BNE $057E ; 0579: 26 03 LDU #$C908 ; 057B: CE C9 08 L057E: LDA $FFF8,U ; 057E: A6 58 BLE $05DD ; 0580: 2F 5B LDD $06,U ; 0582: EC 46 SUBA $06,X ; 0584: A0 06 BVS $05DD ; 0586: 29 55 SUBB $07,X ; 0588: E0 07 BVS $05DD ; 058A: 29 51 JSR Abs_a_b ; 058C: BD F5 84 STD >$CB ; 058F: DD CB TSTA ; 0591: 4D BEQ $0597 ; 0592: 27 03 TSTB ; 0594: 5D BNE $05DD ; 0595: 26 46 L0597: ADDA >$CC ; 0597: 9B CC CMPA #$0C ; 0599: 81 0C BGT $05DD ; 059B: 2E 40 LDA $03,X ; 059D: A6 03 CMPA $02,X ; 059F: A1 02 BEQ $05DD ; 05A1: 27 3A DECA ; 05A3: 4A LDB #$08 ; 05A4: C6 08 MUL ; 05A6: 3D LEAY $04,Y ; 05A7: 31 24 LEAY D,Y ; 05A9: 31 AB LDB $04,X ; 05AB: E6 04 LDA B,Y ; 05AD: A6 A5 SUBA $05,X ; 05AF: A0 05 BEQ $05DD ; 05B1: 27 2A STA $05,X ; 05B3: A7 05 ADDB #$02 ; 05B5: CB 02 ANDB #$03 ; 05B7: C4 03 STB $04,X ; 05B9: E7 04 LEAY $FFFC,Y ; 05BB: 31 3C INCB ; 05BD: 5C ANDB #$03 ; 05BE: C4 03 LDA B,Y ; 05C0: A6 A5 BNE $05CF ; 05C2: 26 0B INCB ; 05C4: 5C INCB ; 05C5: 5C ANDB #$03 ; 05C6: C4 03 LDA B,Y ; 05C8: A6 A5 BNE $05CF ; 05CA: 26 03 INCB ; 05CC: 5C ANDB #$03 ; 05CD: C4 03 L05CF: STB $FFFC,X ; 05CF: E7 1C NEG $08,X ; 05D1: 60 08 NEG $09,X ; 05D3: 60 09 CLR $FFFF,X ; 05D5: 6F 1F LDD $02,X ; 05D7: EC 02 STA $03,X ; 05D9: A7 03 STB $02,X ; 05DB: E7 02 L05DD: LDA $05,X ; 05DD: A6 05 SUBA >$88 ; 05DF: 90 88 BPL $05F3 ; 05E1: 2A 10 LEAY $09,X ; 05E3: 31 09 LDB ,Y ; 05E5: E6 A4 BNE $05EB ; 05E7: 26 02 LDB ,-Y ; 05E9: E6 A2 L05EB: BPL $05EE ; 05EB: 2A 01 NEGA ; 05ED: 40 L05EE: ADDA ,--Y ; 05EE: AB A3 STA ,Y ; 05F0: A7 A4 CLRA ; 05F2: 4F L05F3: STA $05,X ; 05F3: A7 05 LDD $06,X ; 05F5: EC 06 ADDA $08,X ; 05F7: AB 08 ADDB $09,X ; 05F9: EB 09 STD $06,X ; 05FB: ED 06 JMP $04CF ; 05FD: 7E 04 CF L0600: LDA $FFFB,X ; 0600: A6 1B BEQ $0618 ; 0602: 27 14 LDB #$08 ; 0604: C6 08 STB $05,X ; 0606: E7 05 SUBA $01,X ; 0608: A0 01 ANDA #$03 ; 060A: 84 03 STA $01,X ; 060C: A7 01 LDA $FFFB,X ; 060E: A6 1B ANDA #$02 ; 0610: 84 02 ASRA ; 0612: 47 STA $04,X ; 0613: A7 04 CLR $FFFB,X ; 0615: 6F 1B RTS ; 0617: 39 L0618: LDA $02,X ; 0618: A6 02 DECA ; 061A: 4A LDB #$08 ; 061B: C6 08 MUL ; 061D: 3D LEAY D,Y ; 061E: 31 AB LDB $FFFC,X ; 0620: E6 1C BMI $0628 ; 0622: 2B 04 COM $FFFC,X ; 0624: 63 1C BSR $065F ; 0626: 8D 37 L0628: LDB $FFFE,X ; 0628: E6 1E LSRB ; 062A: 54 LSRB ; 062B: 54 LSRB ; 062C: 54 LSRB ; 062D: 54 CMPB $01,X ; 062E: E1 01 BNE $0633 ; 0630: 26 01 NEGB ; 0632: 50 L0633: ADDB $01,X ; 0633: EB 01 CMPB #$04 ; 0635: C1 04 BNE $063B ; 0637: 26 02 LDB #$02 ; 0639: C6 02 L063B: ANDB #$03 ; 063B: C4 03 TFR B,A ; 063D: 1F 98 INCA ; 063F: 4C PSHS B,A ; 0640: 34 06 JSR Random ; 0642: BD F5 17 PULS A,B ; 0645: 35 06 BCC $064B ; 0647: 24 02 EXG A,B ; 0649: 1E 89 L064B: STA >$CB ; 064B: 97 CB BSR $065F ; 064D: 8D 10 LDB >$CB ; 064F: D6 CB BSR $065F ; 0651: 8D 0C LDB $04,X ; 0653: E6 04 BSR $065F ; 0655: 8D 08 LDB #$03 ; 0657: C6 03 L0659: BSR $065F ; 0659: 8D 04 DECB ; 065B: 5A BPL $0659 ; 065C: 2A FB RTS ; 065E: 39 L065F: ANDB #$03 ; 065F: C4 03 LDA B,Y ; 0661: A6 A5 BEQ $066D ; 0663: 27 08 CMPA $03,X ; 0665: A1 03 BNE $066E ; 0667: 26 05 TST $FFFF,X ; 0669: 6D 1F BEQ $0672 ; 066B: 27 05 L066D: RTS ; 066D: 39 L066E: CLR $FFFF,X ; 066E: 6F 1F BRA $0674 ; 0670: 20 02 L0672: INC $FFFF,X ; 0672: 6C 1F L0674: STD ,S++ ; 0674: ED E1 CMPA $02,X ; 0676: A1 02 BNE $0683 ; 0678: 26 09 RORB ; 067A: 56 BCS $067F ; 067B: 25 02 ADDB #$02 ; 067D: CB 02 L067F: ADDB #$02 ; 067F: CB 02 STB $FFFB,X ; 0681: E7 1B L0683: LDA $02,X ; 0683: A6 02 STA $03,X ; 0685: A7 03 LDD $FFFE,S ; 0687: EC 7E STA $02,X ; 0689: A7 02 LEAY B,Y ; 068B: 31 A5 LDA $04,Y ; 068D: A6 24 STA $05,X ; 068F: A7 05 TFR B,A ; 0691: 1F 98 SUBB $04,X ; 0693: E0 04 ANDB #$03 ; 0695: C4 03 BEQ $06A5 ; 0697: 27 0C STA $04,X ; 0699: A7 04 CMPB #$02 ; 069B: C1 02 BNE $06A6 ; 069D: 26 07 LDD $08,X ; 069F: EC 08 NEGA ; 06A1: 40 L06A2: NEGB ; 06A2: 50 L06A3: STD $08,X ; 06A3: ED 08 L06A5: RTS ; 06A5: 39 L06A6: LDA #$10 ; 06A6: 86 10 STA ,X ; 06A8: A7 84 LDA $01,X ; 06AA: A6 01 RORA ; 06AC: 46 BCC $06B3 ; 06AD: 24 04 ADDB #$02 ; 06AF: CB 02 ANDB #$03 ; 06B1: C4 03 L06B3: LDA >$89 ; 06B3: 96 89 STA $FFFD,X ; 06B5: A7 1D LDA $09,X ; 06B7: A6 09 PSHS B ; 06B9: 34 04 LDB $08,X ; 06BB: E6 08 DEC ,S+ ; 06BD: 6A E0 BEQ $06A2 ; 06BF: 27 E1 NEGA ; 06C1: 40 NEG $FFFD,X ; 06C2: 60 1D BRA $06A3 ; 06C4: 20 DD L06C6: LDX #$CA00 ; 06C6: 8E CA 00 CLRA ; 06C9: 4F STA >$DA ; 06CA: 97 DA LDY #$CA4E ; 06CC: 10 8E CA 4E L06D0: BSR $0711 ; 06D0: 8D 3F LDA #$02 ; 06D2: 86 02 STA >$DA ; 06D4: 97 DA LEAY $04,Y ; 06D6: 31 24 LEAX $27,X ; 06D8: 30 88 27 CMPX #$CA4E ; 06DB: 8C CA 4E BNE $06D0 ; 06DE: 26 F0 RTS ; 06E0: 39 L06E1: LDB $03,X ; 06E1: E6 03 CMPA #$80 ; 06E3: 81 80 BNE $06EF ; 06E5: 26 08 LDB #$02 ; 06E7: C6 02 STB $04,X ; 06E9: E7 04 LDB #$01 ; 06EB: C6 01 STB $03,X ; 06ED: E7 03 L06EF: INCA ; 06EF: 4C STA ,X ; 06F0: A7 84 BNE $06FB ; 06F2: 26 07 DEC >$C7 ; 06F4: 0A C7 BNE $06FA ; 06F6: 26 02 DEC >$E2 ; 06F8: 0A E2 L06FA: RTS ; 06FA: 39 L06FB: CMPA #$C2 ; 06FB: 81 C2 BNE $0701 ; 06FD: 26 02 NEG $04,X ; 06FF: 60 04 L0701: ASRA ; 0701: 47 BCS $06FA ; 0702: 25 F6 ADDB $04,X ; 0704: EB 04 STB $03,X ; 0706: E7 03 RTS ; 0708: 39 L0709: LDA $05,X ; 0709: A6 05 INCA ; 070B: 4C ANDA #$03 ; 070C: 84 03 STA $05,X ; 070E: A7 05 L0710: RTS ; 0710: 39 L0711: LDA ,X ; 0711: A6 84 BMI $06E1 ; 0713: 2B CC BEQ $0710 ; 0715: 27 F9 PSHS X ; 0717: 34 10 LDA $03,X ; 0719: A6 03 BEQ $0721 ; 071B: 27 04 DEC $03,X ; 071D: 6A 03 BNE $0771 ; 071F: 26 50 L0721: LDA $03,Y ; 0721: A6 23 BEQ $0771 ; 0723: 27 4C LDB >$DA ; 0725: D6 DA LDU $01,X ; 0727: EE 01 LDA ,U ; 0729: A6 C4 BEQ $0734 ; 072B: 27 07 INCB ; 072D: 5C LEAU $07,U ; 072E: 33 47 LDA ,U ; 0730: A6 C4 BNE $0771 ; 0732: 26 3D L0734: STB >$CB ; 0734: D7 CB DEC ,U ; 0736: 6A C4 LDA #$10 ; 0738: 86 10 ORA >$67 ; 073A: 9A 67 STA >$67 ; 073C: 97 67 LDA $06,X ; 073E: A6 06 LDB $08,X ; 0740: E6 08 STD $01,U ; 0742: ED 41 LDB $0A,X ; 0744: E6 0A JSR $04EB ; 0746: BD 04 EB LDA #$08 ; 0749: 86 08 STA $03,X ; 074B: A7 03 LDB #$0A ; 074D: C6 0A LDA >$CB ; 074F: 96 CB MUL ; 0751: 3D LDU #$CA56 ; 0752: CE CA 56 LEAU B,U ; 0755: 33 C5 LDA $0A,X ; 0757: A6 0A LDX #$0D7B ; 0759: 8E 0D 7B LDB #$04 ; 075C: C6 04 JSR Rot_VL_ab ; 075E: BD F6 10 LDA >$EF ; 0761: 96 EF BMI $076F ; 0763: 2B 0A LDA #$80 ; 0765: 86 80 ORA >$67 ; 0767: 9A 67 STA >$67 ; 0769: 97 67 LDA #$20 ; 076B: 86 20 STA >$EF ; 076D: 97 EF L076F: PULS X,PC ; 076F: 35 90 ;(PUL? PC=RTS) L0771: LDA $02,Y ; 0771: A6 22 BEQ $07CD ; 0773: 27 58 LDB $04,X ; 0775: E6 04 SEX ; 0777: 1D ASLB ; 0778: 58 ROLA ; 0779: 49 ASLB ; 077A: 58 ROLA ; 077B: 49 ASLB ; 077C: 58 ROLA ; 077D: 49 STD >$CB ; 077E: DD CB ADDD $06,X ; 0780: E3 06 STD $06,X ; 0782: ED 06 LDB $05,X ; 0784: E6 05 SEX ; 0786: 1D ASLB ; 0787: 58 ROLA ; 0788: 49 ASLB ; 0789: 58 ROLA ; 078A: 49 ASLB ; 078B: 58 ROLA ; 078C: 49 STD >$CD ; 078D: DD CD ADDD $08,X ; 078F: E3 08 STD $08,X ; 0791: ED 08 CLRB ; 0793: 5F LDA $06,X ; 0794: A6 06 BPL $079A ; 0796: 2A 02 NEGA ; 0798: 40 INCB ; 0799: 5C L079A: STA >$DB ; 079A: 97 DB LDA $08,X ; 079C: A6 08 BPL $07A3 ; 079E: 2A 03 NEGA ; 07A0: 40 ORB #$02 ; 07A1: CA 02 L07A3: STA >$DC ; 07A3: 97 DC PSHS B ; 07A5: 34 04 LDB >$DB ; 07A7: D6 DB LDU #$0F6A ; 07A9: CE 0F 6A BSR $081C ; 07AC: 8D 6E BVC $07B2 ; 07AE: 28 02 STB >$DB ; 07B0: D7 DB L07B2: LDB >$DC ; 07B2: D6 DC LDU #$0F20 ; 07B4: CE 0F 20 BSR $081C ; 07B7: 8D 63 BVC $07BD ; 07B9: 28 02 STB >$DC ; 07BB: D7 DC L07BD: LDD >$DB ; 07BD: DC DB ROR ,S ; 07BF: 66 E4 BCC $07C4 ; 07C1: 24 01 NEGA ; 07C3: 40 L07C4: STA $06,X ; 07C4: A7 06 ROR ,S+ ; 07C6: 66 E0 BCC $07CB ; 07C8: 24 01 NEGB ; 07CA: 50 L07CB: STB $08,X ; 07CB: E7 08 L07CD: CLRA ; 07CD: 4F LDB ,Y ; 07CE: E6 A4 BEQ $07D3 ; 07D0: 27 01 INCA ; 07D2: 4C L07D3: LDB $01,Y ; 07D3: E6 21 BEQ $07D8 ; 07D5: 27 01 DECA ; 07D7: 4A L07D8: TSTA ; 07D8: 4D BEQ $07FA ; 07D9: 27 1F ADDA $0A,X ; 07DB: AB 0A ANDA #$3F ; 07DD: 84 3F STA $0A,X ; 07DF: A7 0A TFR A,B ; 07E1: 1F 89 LDA #$20 ; 07E3: 86 20 JSR Rise_Run_X ; 07E5: BD F5 FF STD $04,X ; 07E8: ED 04 LDA >$DA ; 07EA: 96 DA LDB #$0E ; 07EC: C6 0E MUL ; 07EE: 3D LDA $0A,X ; 07EF: A6 0A LEAU $0B,X ; 07F1: 33 0B LDX #$0D46 ; 07F3: 8E 0D 46 ABX ; 07F6: 3A JSR Rot_VL_Mode_a ; 07F7: BD F6 1F L07FA: PULS X,PC ; 07FA: 35 90 ;(PUL? PC=RTS) L081C: SUBB #$0A ; 081C: C0 0A BMI $084A ; 081E: 2B 2A ANDB #$70 ; 0820: C4 70 ASRB ; 0822: 57 ASRB ; 0823: 57 ASRB ; 0824: 57 LDD B,U ; 0825: EC C5 LEAU A,U ; 0827: 33 C6 STB >$DD ; 0829: D7 DD L082B: LDD >$DB ; 082B: DC DB SUBA ,U ; 082D: A0 C4 BMI $0842 ; 082F: 2B 11 CMPA $01,U ; 0831: A1 41 BGT $0842 ; 0833: 2E 0D SUBB $02,U ; 0835: E0 42 BMI $0842 ; 0837: 2B 09 CMPB $03,U ; 0839: E1 43 BGT $0842 ; 083B: 2E 05 LDB $04,U ; 083D: E6 44 ORCC #$02 ; 083F: 1A 02 RTS ; 0841: 39 L0842: LEAU $05,U ; 0842: 33 45 DEC >$DD ; 0844: 0A DD BNE $082B ; 0846: 26 E3 ANDCC #$FD ; 0848: 1C FD L084A: RTS ; 084A: 39 L084B: LDU #$CA00 ; 084B: CE CA 00 LDY #$C9C0 ; 084E: 10 8E C9 C0 LDX #$0D46 ; 0852: 8E 0D 46 LDA >$C8 ; 0855: 96 C8 STA >$C7 ; 0857: 97 C7 LDB #$20 ; 0859: C6 20 L085B: PSHS B,A ; 085B: 34 06 STA ,U+ ; 085D: A7 C0 STY ,U++ ; 085F: 10 AF C1 LDB #$08 ; 0862: C6 08 L0864: CLR ,U+ ; 0864: 6F C0 DECB ; 0866: 5A BNE $0864 ; 0867: 26 FB LDD ,S ; 0869: EC E4 STD $FFFA,U ; 086B: ED 5A JSR Rot_VL_Mode_a ; 086D: BD F6 1F LEAY $0E,Y ; 0870: 31 2E PULS A,B ; 0872: 35 06 NEGB ; 0874: 50 DECA ; 0875: 4A BNE $085B ; 0876: 26 E3 RTS ; 0878: 39 L0879: NEGA ; 0879: 40 BVC $088D ; 087A: 28 11 DECA ; 087C: 4A CLRB ; 087D: 5F STD >$92 ; 087E: DD 92 ASR >$A3 ; 0880: 07 A3 ASR >$A4 ; 0882: 07 A4 DECB ; 0884: 5A STB >$EF ; 0885: D7 EF LDA #$80 ; 0887: 86 80 ORA >$67 ; 0889: 9A 67 STA >$67 ; 088B: 97 67 L088D: INC >$94 ; 088D: 0C 94 BNE $089A ; 088F: 26 09 CLR >$EF ; 0891: 0F EF LDA #$F7 ; 0893: 86 F7 ANDA >$67 ; 0895: 94 67 STA >$67 ; 0897: 97 67 RTS ; 0899: 39 L089A: RORA ; 089A: 46 BCC $08B7 ; 089B: 24 1A INC >$A5 ; 089D: 0C A5 DEC >$A6 ; 089F: 0A A6 RORA ; 08A1: 46 BCC $08A8 ; 08A2: 24 04 DEC >$92 ; 08A4: 0A 92 INC >$93 ; 08A6: 0C 93 L08A8: LDA >$A6 ; 08A8: 96 A6 LEAU $0A,X ; 08AA: 33 0A LDX #$0FCE ; 08AC: 8E 0F CE JSR Rot_VL_Mode_a ; 08AF: BD F6 1F LDA >$A6 ; 08B2: 96 A6 JSR Rot_VL_Mode_a ; 08B4: BD F6 1F L08B7: JMP $0965 ; 08B7: 7E 09 65 L08BA: LDX >$30 ; 08BA: 9E 30 BEQ $0911 ; 08BC: 27 53 LEAX $FFFF,X ; 08BE: 30 1F STX >$30 ; 08C0: 9F 30 BNE $0910 ; 08C2: 26 4C LDA #$F7 ; 08C4: 86 F7 ANDA >$67 ; 08C6: 94 67 STA >$67 ; 08C8: 97 67 COM >$8A ; 08CA: 03 8A LDX #$C894 ; 08CC: 8E C8 94 LDB #$19 ; 08CF: C6 19 JSR Clear_x_b ; 08D1: BD F5 3F LDA #$00 ; 08D4: 86 00 STA >$71 ; 08D6: 97 71 LDA #$02 ; 08D8: 86 02 STA >$94 ; 08DA: 97 94 DECA ; 08DC: 4A STA >$95 ; 08DD: 97 95 LDD #$CA00 ; 08DF: CC CA 00 STD >$9B ; 08E2: DD 9B LDA >$83 ; 08E4: 96 83 STA >$96 ; 08E6: 97 96 LDA >$86 ; 08E8: 96 86 STA >$9A ; 08EA: 97 9A LEAX $09,X ; 08EC: 30 09 JSR Random ; 08EE: BD F5 17 CLRB ; 08F1: 5F ROLA ; 08F2: 49 ROLB ; 08F3: 59 LEAX B,X ; 08F4: 30 85 STB >$CB ; 08F6: D7 CB LDB #$7F ; 08F8: C6 7F ROLA ; 08FA: 49 BCC $08FE ; 08FB: 24 01 NEGB ; 08FD: 50 L08FE: STB ,X ; 08FE: E7 84 ASRB ; 0900: 57 ASRB ; 0901: 57 STB $02,X ; 0902: E7 02 LDA #$07 ; 0904: 86 07 SUBA >$CB ; 0906: 90 CB SUBA >$CB ; 0908: 90 CB LEAX A,X ; 090A: 30 86 INC ,X ; 090C: 6C 84 COM >$98 ; 090E: 03 98 L0910: RTS ; 0910: 39 L0911: LDX #$C894 ; 0911: 8E C8 94 JSR $0709 ; 0914: BD 07 09 LEAX $09,X ; 0917: 30 09 LDA >$94 ; 0919: 96 94 LBMI $0879 ; 091B: 10 2B FF 5A BNE $0928 ; 091F: 26 07 STD >$8C ; 0921: DD 8C LDD >$DE ; 0923: DC DE STD >$30 ; 0925: DD 30 RTS ; 0927: 39 L0928: LDA #$08 ; 0928: 86 08 ORA >$67 ; 092A: 9A 67 STA >$67 ; 092C: 97 67 LDB >$98 ; 092E: D6 98 BPL $0940 ; 0930: 2A 0E LEAU $0A,X ; 0932: 33 0A LDX #$0FAF ; 0934: 8E 0F AF LDA >$A6 ; 0937: 96 A6 JSR Rot_VL_Mode_a ; 0939: BD F6 1F CLR >$98 ; 093C: 0F 98 BRA $0965 ; 093E: 20 25 L0940: LDD >$8C ; 0940: DC 8C TFR D,Y ; 0942: 1F 02 JSR $0C66 ; 0944: BD 0C 66 ANDA >$84 ; 0947: 94 84 STD >$CD ; 0949: DD CD LEAX $09,X ; 094B: 30 09 CMPB #$08 ; 094D: C1 08 BLS $0959 ; 094F: 23 08 SUBA >$A6 ; 0951: 90 A6 BEQ $0959 ; 0953: 27 04 BSR $0989 ; 0955: 8D 32 DEC >$98 ; 0957: 0A 98 L0959: LEAX $FFFF,X ; 0959: 30 1F LDA >$95 ; 095B: 96 95 ANDA #$01 ; 095D: 84 01 ASLA ; 095F: 48 LDU #$0A55 ; 0960: CE 0A 55 JSR [A,U] ; 0963: AD D6 L0965: LDD #$78FF ; 0965: CC 78 FF LEAX $FFFA,X ; 0968: 30 1A CMPA ,X+ ; 096A: A1 80 BLT $097E ; 096C: 2D 10 CMPA ,X+ ; 096E: A1 80 BLT $097E ; 0970: 2D 0C NEGA ; 0972: 40 NEGB ; 0973: 50 LEAX $FFFE,X ; 0974: 30 1E CMPA ,X+ ; 0976: A1 80 BGT $097E ; 0978: 2E 04 CMPA ,X+ ; 097A: A1 80 BLT $0980 ; 097C: 2D 02 L097E: STB $03,X ; 097E: E7 03 L0980: LDD >$9F ; 0980: DC 9F ADDA >$A3 ; 0982: 9B A3 ADDB >$A4 ; 0984: DB A4 STD >$9F ; 0986: DD 9F RTS ; 0988: 39 L0989: ANDA #$3F ; 0989: 84 3F LDB #$01 ; 098B: C6 01 CMPA #$20 ; 098D: 81 20 BLE $0992 ; 098F: 2F 01 NEGB ; 0991: 50 L0992: STB >$CF ; 0992: D7 CF ADDB ,X ; 0994: EB 84 ANDB #$3F ; 0996: C4 3F CMPB >$CD ; 0998: D1 CD BEQ $09A0 ; 099A: 27 04 ADDB >$CF ; 099C: DB CF ANDB #$3F ; 099E: C4 3F L09A0: STB ,X ; 09A0: E7 84 RTS ; 09A2: 39 L0A59: NEG >$91 ; 0A59: 00 91 LDY #$C8E3 ; 0A5B: 10 8E C8 E3 CLR $02,Y ; 0A5F: 6F 22 CLR $03,Y ; 0A61: 6F 23 LDA #$02 ; 0A63: 86 02 STA >$DA ; 0A65: 97 DA LDX #$C9C0 ; 0A67: 8E C9 C0 LDD #$0B6E ; 0A6A: CC 0B 6E STD >$CC ; 0A6D: DD CC LDB #$08 ; 0A6F: C6 08 L0A71: STB >$D2 ; 0A71: D7 D2 LDA ,X ; 0A73: A6 84 BMI $0AAD ; 0A75: 2B 36 BEQ $0A92 ; 0A77: 27 19 LDU #$CB00 ; 0A79: CE CB 00 DECA ; 0A7C: 4A STA ,X ; 0A7D: A7 84 ANDA #$03 ; 0A7F: 84 03 BNE $0A8B ; 0A81: 26 08 LDB $04,X ; 0A83: E6 04 ADDB $04,X ; 0A85: EB 04 STB $04,X ; 0A87: E7 04 DEC $03,X ; 0A89: 6A 03 L0A8B: LDB #$08 ; 0A8B: C6 08 MUL ; 0A8D: 3D LEAU B,U ; 0A8E: 33 C5 STU $05,X ; 0A90: EF 05 L0A92: LEAX $07,X ; 0A92: 30 07 LDB >$D2 ; 0A94: D6 D2 DECB ; 0A96: 5A BEQ $0AAC ; 0A97: 27 13 CMPB #$06 ; 0A99: C1 06 BNE $0A9F ; 0A9B: 26 02 INC >$DA ; 0A9D: 0C DA L0A9F: CMPB #$04 ; 0A9F: C1 04 BNE $0A71 ; 0AA1: 26 CE LDU #$0B2C ; 0AA3: CE 0B 2C STU >$CC ; 0AA6: DF CC INC >$DA ; 0AA8: 0C DA BRA $0A71 ; 0AAA: 20 C5 L0AAC: RTS ; 0AAC: 39 L0AAD: LDA >$91 ; 0AAD: 96 91 ADDA #$04 ; 0AAF: 8B 04 LEAU A,X ; 0AB1: 33 86 LDD $01,X ; 0AB3: EC 01 ADDA ,U ; 0AB5: AB C4 ADDB $01,U ; 0AB7: EB 41 STD $01,X ; 0AB9: ED 01 JSR Abs_a_b ; 0ABB: BD F5 84 STD >$DB ; 0ABE: DD DB CMPA #$78 ; 0AC0: 81 78 BCC $0B1B ; 0AC2: 24 57 CMPB #$78 ; 0AC4: C1 78 BCC $0B1B ; 0AC6: 24 53 LDU #$0F20 ; 0AC8: CE 0F 20 JSR $081C ; 0ACB: BD 08 1C BVS $0B1B ; 0ACE: 29 4B LDB >$DB ; 0AD0: D6 DB LDU #$0F6A ; 0AD2: CE 0F 6A JSR $081C ; 0AD5: BD 08 1C BVS $0B1B ; 0AD8: 29 41 LDU #$C900 ; 0ADA: CE C9 00 LDB >$81 ; 0ADD: D6 81 L0ADF: STB >$CB ; 0ADF: D7 CB SUBB >$D2 ; 0AE1: D0 D2 ADDB #$03 ; 0AE3: CB 03 SUBB >$81 ; 0AE5: D0 81 BEQ $0B0B ; 0AE7: 27 22 LDD ,U ; 0AE9: EC C4 TSTA ; 0AEB: 4D BEQ $0B0B ; 0AEC: 27 1D CMPB #$02 ; 0AEE: C1 02 BGE $0B0B ; 0AF0: 2C 19 LDA #$05 ; 0AF2: 86 05 STA >$E8 ; 0AF4: 97 E8 LDD $0E,U ; 0AF6: EC 4E BSR $0B52 ; 0AF8: 8D 58 BVC $0B0B ; 0AFA: 28 0F LDB $01,U ; 0AFC: E6 41 LDA B,Y ; 0AFE: A6 A5 LDB >$DA ; 0B00: D6 DA ADDA B,Y ; 0B02: AB A5 DAA ; 0B04: 19 STA B,Y ; 0B05: A7 A5 INC $01,U ; 0B07: 6C 41 BRA $0B1B ; 0B09: 20 10 L0B0B: LEAU $40,U ; 0B0B: 33 C8 40 LDB >$CB ; 0B0E: D6 CB DECB ; 0B10: 5A BNE $0ADF ; 0B11: 26 CC JSR [$C8CC] ; 0B13: AD 9F C8 CC LBVC $0A92 ; 0B17: 10 28 FF 77 L0B1B: LDA #$08 ; 0B1B: 86 08 STA ,X ; 0B1D: A7 84 LDD #$090A ; 0B1F: CC 09 0A STD $03,X ; 0B22: ED 03 LDD #$CB00 ; 0B24: CC CB 00 STD $05,X ; 0B27: ED 05 JMP $0A92 ; 0B29: 7E 0A 92 L0B52: SUBA $01,X ; 0B52: A0 01 BVS $0B6B ; 0B54: 29 15 BPL $0B59 ; 0B56: 2A 01 NEGA ; 0B58: 40 L0B59: SUBB $02,X ; 0B59: E0 02 BVS $0B6B ; 0B5B: 29 0E BPL $0B60 ; 0B5D: 2A 01 NEGB ; 0B5F: 50 L0B60: CMPA >$E8 ; 0B60: 91 E8 BGT $0B6B ; 0B62: 2E 07 CMPB >$E8 ; 0B64: D1 E8 BGT $0B6B ; 0B66: 2E 03 ORCC #$02 ; 0B68: 1A 02 RTS ; 0B6A: 39 L0B6B: ANDCC #$FD ; 0B6B: 1C FD RTS ; 0B6D: 39 L0BD0: JMP Explosion_Snd ; 0BD0: 7E F9 2E L0BD3: LDU #$0C5E ; 0BD3: CE 0C 5E LDA >$EF ; 0BD6: 96 EF BEQ $0BE5 ; 0BD8: 27 0B BMI $0BD0 ; 0BDA: 2B F4 DEC >$EF ; 0BDC: 0A EF LEAU $04,U ; 0BDE: 33 44 JSR Explosion_Snd ; 0BE0: BD F9 2E BRA $0C33 ; 0BE3: 20 4E L0BE5: LDA #$0F ; 0BE5: 86 0F STA >$44 ; 0BE7: 97 44 STA >$43 ; 0BE9: 97 43 STA >$42 ; 0BEB: 97 42 LDB >$45 ; 0BED: D6 45 LDA >$67 ; 0BEF: 96 67 ANDA #$03 ; 0BF1: 84 03 BEQ $0C2F ; 0BF3: 27 3A ANDB #$F9 ; 0BF5: C4 F9 ORB #$30 ; 0BF7: CA 30 STB >$45 ; 0BF9: D7 45 ADDA >$76 ; 0BFB: 9B 76 STA >$76 ; 0BFD: 97 76 BITA #$08 ; 0BFF: 85 08 BNE $0C07 ; 0C01: 26 04 ORB #$04 ; 0C03: CA 04 STB >$45 ; 0C05: D7 45 L0C07: BITA #$10 ; 0C07: 85 10 BNE $0C0D ; 0C09: 26 02 EORA #$07 ; 0C0B: 88 07 L0C0D: ANDA #$07 ; 0C0D: 84 07 ADDA #$10 ; 0C0F: 8B 10 STA >$48 ; 0C11: 97 48 CLR >$47 ; 0C13: 0F 47 LDA #$08 ; 0C15: 86 08 STA >$42 ; 0C17: 97 42 LDA >$67 ; 0C19: 96 67 BITA #$01 ; 0C1B: 85 01 BEQ $0C24 ; 0C1D: 27 05 LDD #$0FFF ; 0C1F: CC 0F FF BRA $0C27 ; 0C22: 20 03 L0C24: LDD #$0BFF ; 0C24: CC 0B FF L0C27: STD >$49 ; 0C27: DD 49 LDA #$0E ; 0C29: 86 0E STD >$43 ; 0C2B: DD 43 BRA $0C33 ; 0C2D: 20 04 L0C2F: ORB #$36 ; 0C2F: CA 36 STB >$45 ; 0C31: D7 45 L0C33: LDB >$45 ; 0C33: D6 45 LDA >$67 ; 0C35: 96 67 BITA #$08 ; 0C37: 85 08 BEQ $0C59 ; 0C39: 27 1E INC >$6A ; 0C3B: 0C 6A LDA >$6A ; 0C3D: 96 6A BITA #$02 ; 0C3F: 85 02 BEQ $0C59 ; 0C41: 27 16 ANDB #$F7 ; 0C43: C4 F7 STB >$45 ; 0C45: D7 45 RORA ; 0C47: 46 LDB #$20 ; 0C48: C6 20 BCS $0C4D ; 0C4A: 25 01 LSRB ; 0C4C: 54 L0C4D: CLRA ; 0C4D: 4F STD >$4B ; 0C4E: DD 4B LDB #$03 ; 0C50: C6 03 STB >$46 ; 0C52: D7 46 LDA #$0D ; 0C54: 86 0D STA >$44 ; 0C56: 97 44 RTS ; 0C58: 39 L0C59: ORB #$09 ; 0C59: CA 09 STB >$45 ; 0C5B: D7 45 RTS ; 0C5D: 39 L0C66: LDD ,X ; 0C66: EC 84 ASRA ; 0C68: 47 ASRB ; 0C69: 57 STD $FFFE,S ; 0C6A: ED 7E LDD $02,X ; 0C6C: EC 02 ASRA ; 0C6E: 47 ASRB ; 0C6F: 57 ADDA $FFFE,S ; 0C70: AB 7E ADDB $FFFF,S ; 0C72: EB 7F BRA $0C82 ; 0C74: 20 0C L0C76: PSHS B,A ; 0C76: 34 06 LDA ,U ; 0C78: A6 C4 LDB $02,U ; 0C7A: E6 42 TFR D,Y ; 0C7C: 1F 02 PULS A,B ; 0C7E: 35 06 L0C80: ASRA ; 0C80: 47 ASRB ; 0C81: 57 L0C82: PSHS B,A ; 0C82: 34 06 TFR Y,D ; 0C84: 1F 20 ASRA ; 0C86: 47 ASRB ; 0C87: 57 SUBA ,S+ ; 0C88: A0 E0 SUBB ,S+ ; 0C8A: E0 E0 PSHS B,A ; 0C8C: 34 06 JSR Rise_Run_Angle ; 0C8E: BD F5 93 PULS A,B ; 0C91: 35 06 JSR Abs_a_b ; 0C93: BD F5 84 PSHS A ; 0C96: 34 02 ORB ,S+ ; 0C98: EA E0 LDA >$36 ; 0C9A: 96 36 RTS ; 0C9C: 39 L0CAC: LEAY ,X ; 0CAC: 31 84 LDA #$04 ; 0CAE: 86 04 PSHS B,A ; 0CB0: 34 06 LDB #$04 ; 0CB2: C6 04 PSHS B,A ; 0CB4: 34 06 L0CB6: LDA $01,S ; 0CB6: A6 61 L0CB8: ADDA #$10 ; 0CB8: 8B 10 STA $01,S ; 0CBA: A7 61 LDB $03,S ; 0CBC: E6 63 JSR Rot_VL_ab ; 0CBE: BD F6 10 LEAX ,Y ; 0CC1: 30 A4 DEC ,S ; 0CC3: 6A E4 BNE $0CB6 ; 0CC5: 26 EF LDA #$04 ; 0CC7: 86 04 STA ,S ; 0CC9: A7 E4 ADDA $01,S ; 0CCB: AB 61 DEC $02,S ; 0CCD: 6A 62 BNE $0CB8 ; 0CCF: 26 E7 LEAS $04,S ; 0CD1: 32 64 RTS ; 0CD3: 39 L0CD4: LDX #$C900 ; 0CD4: 8E C9 00 LDD #$0340 ; 0CD7: CC 03 40 L0CDA: CLR ,X ; 0CDA: 6F 84 ABX ; 0CDC: 3A DECA ; 0CDD: 4A BNE $0CDA ; 0CDE: 26 FA RTS ; 0CE0: 39 L0CE1: PSHS B,A ; 0CE1: 34 06 JSR Random ; 0CE3: BD F5 17 ANDA ,S+ ; 0CE6: A4 E0 LEAU A,U ; 0CE8: 33 C6 PULS A ; 0CEA: 35 02 L0CEC: LDB ,U+ ; 0CEC: E6 C0 ASRB ; 0CEE: 57 ASRB ; 0CEF: 57 STB ,X+ ; 0CF0: E7 80 DECA ; 0CF2: 4A BNE $0CEC ; 0CF3: 26 F7 RTS ; 0CF5: 39 L0CF6: LDB ,U+ ; 0CF6: E6 C0 STB ,X+ ; 0CF8: E7 80 DECA ; 0CFA: 4A BNE $0CF6 ; 0CFB: 26 F9 RTS ; 0CFD: 39 L1000: LDA #$00 ; 1000: 86 00 LDB Vec_Button_2_1 ; 1002: F6 C8 16 BEQ $1009 ; 1005: 27 02 LDA #$02 ; 1007: 86 02 L1009: LDB Vec_Button_2_2 ; 1009: F6 C8 17 BEQ $100F ; 100C: 27 01 INCA ; 100E: 4C L100F: CMPA $C878 ; 100F: B1 C8 78 BEQ $105A ; 1012: 27 46 LDB $C878 ; 1014: F6 C8 78 STA $C878 ; 1017: B7 C8 78 CMPA #$00 ; 101A: 81 00 BNE $1022 ; 101C: 26 04 CMPB #$01 ; 101E: C1 01 BEQ $105E ; 1020: 27 3C L1022: CMPA #$01 ; 1022: 81 01 BNE $102A ; 1024: 26 04 CMPB #$03 ; 1026: C1 03 BEQ $105E ; 1028: 27 34 L102A: CMPA #$03 ; 102A: 81 03 BNE $1032 ; 102C: 26 04 CMPB #$02 ; 102E: C1 02 BEQ $105E ; 1030: 27 2C L1032: CMPA #$02 ; 1032: 81 02 BNE $103A ; 1034: 26 04 CMPB #$00 ; 1036: C1 00 BEQ $105E ; 1038: 27 24 L103A: CMPA #$00 ; 103A: 81 00 BNE $1042 ; 103C: 26 04 CMPB #$02 ; 103E: C1 02 BEQ $1064 ; 1040: 27 22 L1042: CMPA #$02 ; 1042: 81 02 BNE $104A ; 1044: 26 04 CMPB #$03 ; 1046: C1 03 BEQ $1064 ; 1048: 27 1A L104A: CMPA #$03 ; 104A: 81 03 BNE $1052 ; 104C: 26 04 CMPB #$01 ; 104E: C1 01 BEQ $1064 ; 1050: 27 12 L1052: CMPA #$01 ; 1052: 81 01 BNE $105A ; 1054: 26 04 CMPB #$00 ; 1056: C1 00 BEQ $1064 ; 1058: 27 0A L105A: CLR Vec_Joy_1_X ; 105A: 7F C8 1B RTS ; 105D: 39 L105E: LDA #$FF ; 105E: 86 FF STA Vec_Joy_1_X ; 1060: B7 C8 1B RTS ; 1063: 39 L1064: LDA #$01 ; 1064: 86 01 STA Vec_Joy_1_X ; 1066: B7 C8 1B RTS ; 1069: 39 L106A: LDA #$08 ; 106A: 86 08 ANDA Vec_Btn_State ; 106C: B4 C8 0F STA Vec_Btn_State ; 106F: B7 C8 0F LDX #Vec_Button_1_1 ; 1072: 8E C8 12 LDA $FFFD,X ; 1075: A6 1D STA $FFFE,X ; 1077: A7 1E LDA #$0E ; 1079: 86 0E STA >$01 ; 107B: 97 01 LDD #$1901 ; 107D: CC 19 01 STA >$00 ; 1080: 97 00 NOP ; 1082: 12 STB >$00 ; 1083: D7 00 CLR >$03 ; 1085: 0F 03 LDD #$0901 ; 1087: CC 09 01 STA >$00 ; 108A: 97 00 NOP ; 108C: 12 LDA >$01 ; 108D: 96 01 COMA ; 108F: 43 STA $FFFD,X ; 1090: A7 1D STB >$00 ; 1092: D7 00 LDB #$FF ; 1094: C6 FF STB >$03 ; 1096: D7 03 COMA ; 1098: 43 ORA $FFFE,X ; 1099: AA 1E COMA ; 109B: 43 STA $FFFF,X ; 109C: A7 1F PSHS A ; 109E: 34 02 LDB #$01 ; 10A0: C6 01 L10A2: TFR B,A ; 10A2: 1F 98 ANDA ,S ; 10A4: A4 E4 STA ,X+ ; 10A6: A7 80 ASLB ; 10A8: 58 BNE $10A2 ; 10A9: 26 F7 PULS A,PC ; 10AB: 35 82 ;(PUL? PC=RTS)