Function C1 A9C1

• Middle of "Battle Dynamics Command 15" (?)

$C1/A9C1 51 60       EOR ($60),y
$C1/A9C3 D0 05       BNE $05    [$A9CA]      
$C1/A9C5 AC 43 62    LDY $6243  [$00:6243]   
$C1/A9C8 30 71       BMI $71    [$AA3B]      
$C1/A9CA AD DB 88    LDA $88DB  [$00:88DB]   
$C1/A9CD A8          TAY                     
$C1/A9CE B1 78       LDA ($78),y[$00:0000]   
$C1/A9D0 C9 04       CMP #$04                
$C1/A9D2 90 02       BCC $02    [$A9D6]      
$C1/A9D4 09 80       ORA #$80                
$C1/A9D6 8D 0F 61    STA $610F  [$00:610F]   
$C1/A9D9 AD DB 88    LDA $88DB  [$00:88DB]   
$C1/A9DC 29 0F       AND #$0F                
$C1/A9DE C2 20       REP #$20                
$C1/A9E0 0A          ASL A                   
$C1/A9E1 AA          TAX                     
$C1/A9E2 BF 2D CE C2 LDA $C2CE2D,x[$C2:CE31] 
$C1/A9E6 AA          TAX                     
$C1/A9E7 7B          TDC                     
$C1/A9E8 E2 20       SEP #$20                
$C1/A9EA AD DB 88    LDA $88DB  [$00:88DB]   
$C1/A9ED A8          TAY                     
$C1/A9EE AD 90 62    LDA $6290  [$00:6290]   
$C1/A9F1 D0 10       BNE $10    [$AA03]      
$C1/A9F3 B1 78       LDA ($78),y[$00:0000]   
$C1/A9F5 C9 04       CMP #$04                
$C1/A9F7 B0 0A       BCS $0A    [$AA03]      
$C1/A9F9 18          CLC                     
$C1/A9FA 69 0A       ADC #$0A                
$C1/A9FC A8          TAY                     
$C1/A9FD B1 78       LDA ($78),y[$00:0000]   
$C1/A9FF C9 03       CMP #$03                
$C1/AA01 F0 12       BEQ $12    [$AA15]      
$C1/AA03 A5 12       LDA $12    [$00:1312]   
$C1/AA05 29 01       AND #$01                
$C1/AA07 F0 24       BEQ $24    [$AA2D]      
$C1/AA09 AC 05 7B    LDY $7B05  [$00:7B05]   
$C1/AA0C 84 22       STY $22    [$00:1322]   
$C1/AA0E AC 43 62    LDY $6243  [$00:6243]   
$C1/AA11 84 24       STY $24    [$00:1324]   
$C1/AA13 80 0A       BRA $0A    [$AA1F]      
$C1/AA15 A0 01 01    LDY #$0101              
$C1/AA18 84 22       STY $22    [$00:1322]   
$C1/AA1A A0 48 00    LDY #$0048              
$C1/AA1D 84 24       STY $24    [$00:1324]   
$C1/AA1F A4 12       LDY $12    [$00:1312]   
$C1/AA21 5A          PHY                     
$C1/AA22 A9 01       LDA #$01                
$C1/AA24 8D 4E 60    STA $604E  [$00:604E]   
$C1/AA27 20 EC B1    JSR $B1EC  [$C5:B1EC]   
$C1/AA2A 7A          PLY                     
$C1/AA2B 84 12       STY $12    [$00:1312]   
$C1/AA2D 66 13       ROR $13    [$00:1313]   
$C1/AA2F 66 12       ROR $12    [$00:1312]   
$C1/AA31 EE DB 88    INC $88DB  [$00:88DB]   
$C1/AA34 AD DB 88    LDA $88DB  [$00:88DB]   
$C1/AA37 C9 0A       CMP #$0A                
$C1/AA39 D0 8F       BNE $8F    [$A9CA]      
$C1/AA3B 20 37 BC    JSR $BC37  [$C5:BC37]   
$C1/AA3E A5 10       LDA $10    [$00:1310]   
$C1/AA40 30 0A       BMI $0A    [$AA4C]      
$C1/AA42 0A          ASL A                   
$C1/AA43 0A          ASL A                   
$C1/AA44 0A          ASL A                   
$C1/AA45 0A          ASL A                   
$C1/AA46 0A          ASL A                   
$C1/AA47 A8          TAY                     
$C1/AA48 7B          TDC                     
$C1/AA49 99 8B 61    STA $618B,y[$00:618B]   
$C1/AA4C 4C 61 A8    JMP $A861  [$C5:A861]