MACRO CLRD CLRA CLRB ENDM MACRO TSTD SUBD #0 ENDM MACRO PSHD PSHB PSHA ENDM MACRO PULD PULA PULB ENDM MACRO MOVA &Src,&Dst LDAA &Src STAA &Dst ENDM MACRO MOVB &Src,&Dst LDAB &Src STAB &Dst ENDM MACRO MOVD &Src,&Dst LDD &Src STD &Dst ENDM MACRO MOVX &Src,&Dst LDX &Src STX &Dst ENDM MACRO MOVY &Src,&Dst LDY &Src STY &Dst ENDM MACRO MOVS &Src,&Dst LDS &Src STS &Dst ENDM MACRO BICA &Mask ANDA &Mask[1:1]$FF**~(&Mask[2:255]) ENDM MACRO BICB &Mask ANDB &Mask[1:1]$FF**~(&Mask[2:255]) ENDM MACRO BIT7A &Mask,&Op IF &Op<>'' THEN &Op ENDIF IF &Mask[1:1]<>'#' OR (&EVAL(&Mask[2:255])**$FF)<>$80 THEN AERROR 'Invalid mask' ENDIF ENDM MACRO BIT7B &Mask,&Op IF &Op<>'' THEN &Op ENDIF IF &Mask[1:1]<>'#' OR (&EVAL(&Mask[2:255])**$FF)<>$80 THEN AERROR 'Invalid mask' ENDIF ENDM MACRO BIT0A &Mask,&Op=LSRA &Op IF &Mask[1:1]<>'#' OR (&EVAL(&Mask[2:255])**$FF)<>$01 THEN AERROR 'Invalid mask' ENDIF ENDM MACRO BIT0B &Mask,&Op=LSRB &Op IF &Mask[1:1]<>'#' OR (&EVAL(&Mask[2:255])**$FF)<>$01 THEN AERROR 'Invalid mask' ENDIF ENDM MACRO BSETA &Mem,&Mask LDAA &Mem ORAA &Mask STAA &Mem ENDM MACRO BSETB &Mem,&Mask LDAB &Mem ORAB &Mask STAB &Mem ENDM MACRO BCLRA &Mem,&Mask LDAA &Mem BICA &Mask STAA &Mem ENDM MACRO BCLRB &Mem,&Mask LDAB &Mem BICB &Mask STAB &Mem ENDM MACRO BCHGA &Mem,&Mask LDAA &Mem EORA &Mask STAA &Mem ENDM MACRO BCHGB &Mem,&Mask LDAB &Mem EORB &Mask STAB &Mem ENDM MACRO BTSTA &Mem,&Mask LDAA &Mem BITA &Mask ENDM MACRO BTSTB &Mem,&Mask LDAB &Mem BITB &Mask ENDM MACRO BTST7A &Mem,&Mask LDAA &Mem BIT7A &Mask ENDM MACRO BTST7B &Mem,&Mask LDAB &Mem BIT7B &Mask ENDM MACRO BTST0A &Mem,&Mask,&Op LDAA &Mem BIT0A &Mask,&Op ENDM MACRO BTST0B &Mem,&Mask,&Op LDAB &Mem BIT0B &Mask,&Op ENDM MACRO SUMBA ABA BCC *+4 LDAA #255 ENDM MACRO SUMA &Mem ADDA &Mem BCC *+4 LDAA #255 ENDM MACRO SUMB &Mem ADDB &Mem BCC *+4 LDAB #255 ENDM MACRO SUMD &Mem ADDD &Mem BCC *+5 LDD #65535 ENDM MACRO DIFBA SBA BCC *+3 CLRA ENDM MACRO DIFA &Mem SUBA &Mem BCC *+3 CLRA ENDM MACRO DIFB &Mem SUBB &Mem BCC *+3 CLRB ENDM MACRO DIFD &Mem SUBD &Mem BCC *+3 CLRD ENDM MACRO JMI &Targ BPL *+5 JMP &Targ ENDM MACRO JPL &Targ BMI *+5 JMP &Targ ENDM MACRO JCS &Targ BCC *+5 JMP &Targ ENDM MACRO JCC &Targ BCS *+5 JMP &Targ ENDM MACRO JVS &Targ BVC *+5 JMP &Targ ENDM MACRO JVC &Targ BVS *+5 JMP &Targ ENDM MACRO JEQ &Targ BNE *+5 JMP &Targ ENDM MACRO JNE &Targ BEQ *+5 JMP &Targ ENDM MACRO JHI &Targ BLS *+5 JMP &Targ ENDM MACRO JLS &Targ BHI *+5 JMP &Targ ENDM MACRO JHS &Targ BLO *+5 JMP &Targ ENDM MACRO JLO &Targ BHS *+5 JMP &Targ ENDM MACRO JGT &Targ BLE *+5 JMP &Targ ENDM MACRO JLE &Targ BGT *+5 JMP &Targ ENDM MACRO JGE &Targ BLT *+5 JMP &Targ ENDM MACRO JLT &Targ BGE *+5 JMP &Targ ENDM xD000 DC.W $07C93 xD002 DC.W $0461 xD004 DC.B $42 xD005 DC.B $88 xD006 DC.B $D0 xD007 DC.B $04 xD008 DC.B $00 xD009 DC.B $00 xD00A DC.B $08 DC.B $89 xD00C DC.B $A8 xD00D DC.B $2E xD00E DC.B $80 DC.B $F0 xD010 DC.B $28 xD011 DC.B $02 xD012 DC.B $03 xD013 DC.B $00 xD014 DC.B $1C xD015 DC.B $39 xD016 DC.B $08 xD017 DC.B $04 xD018 DC.B $28 xD019 DC.B $00 DC.B $77 xD01B DC.B $FF DC.B $E4 xD01D DC.B $0A xD01E DC.B $F0 xD01F DC.B $C0 xD020 DC.B $80 xD021 DC.B $05 xD022 DC.B $80 xD023 DC.B $17 xD024 DC.B $60 xD025 DC.B $28 xD026 DC.B $09 xD027 DC.B $28 xD028 DC.B $70 xD029 DC.B $27 xD02A DC.B $02 xD02B DC.B $02 xD02C DC.B $38 xD02D DC.B $83 xD02E DC.B $40 xD02F DC.B $33 xD030 DC.B $05 xD031 DC.B $00 xD032 DC.B $00 DC.B $20 DC.B $0F DC.B $4A,$4A,$4A,$4A,$4A,$44,$3F,$36,$2E,$28,$22,$1C,$17,$14,$11 DC.B $4A,$4A,$4A,$4A,$4A,$44,$3F,$36,$2E,$28,$22,$1C,$17,$14,$11 DC.B $4D,$4D,$4D,$4D,$4A,$44,$3F,$36,$30,$28,$22,$1F,$1C,$14,$11 DC.B $52,$50,$50,$50,$4A,$44,$3F,$36,$30,$28,$22,$1F,$1C,$14,$11 DC.B $58,$55,$52,$50,$4A,$44,$3F,$36,$30,$2E,$25,$22,$1F,$1A,$17 DC.B $5E,$58,$55,$52,$47,$3C,$33,$2E,$2B,$28,$25,$25,$22,$1F,$1C DC.B $61,$5B,$55,$52,$4A,$3F,$39,$33,$30,$2E,$2B,$2B,$28,$25,$22 DC.B $64,$5E,$58,$52,$4A,$41,$3C,$36,$33,$30,$30,$30,$2E,$2B,$28 DC.B $66,$61,$5B,$55,$4D,$47,$41,$3C,$36,$33,$33,$33,$30,$2E,$2B DC.B $66,$61,$5B,$55,$50,$4D,$4A,$44,$41,$3C,$39,$36,$33,$33,$30 DC.B $69,$64,$5E,$58,$52,$50,$4D,$4A,$47,$44,$41,$3F,$3C,$3C,$39 DC.B $6C,$66,$61,$5B,$55,$52,$50,$4D,$4A,$47,$44,$41,$3F,$3F,$3C DC.B $6C,$66,$64,$5E,$58,$55,$52,$50,$50,$4D,$4A,$4A,$47,$47,$44 DC.B $6F,$69,$66,$61,$5E,$5B,$58,$55,$55,$52,$50,$50,$4D,$4D,$4A xD107 DC.B $10 DC.B $40 DC.B $05 DC.B $64,$64,$55,$55,$55 DC.B $55,$55,$55,$55,$55 DC.B $39,$39,$47,$50,$50 DC.B $33,$39,$47,$4A,$4A DC.B $33,$39,$39,$47,$47 DC.B $33,$39,$39,$47,$47 DC.B $33,$39,$39,$47,$47 DC.B $39,$39,$39,$47,$47 DC.B $39,$39,$39,$39,$39 DC.B $39,$39,$39,$39,$39 DC.B $33,$30,$30,$30,$30 DC.B $2E,$2E,$2E,$2E,$2E xD146 DC.B $00,$00,$00,$00,$06,$0B,$0B,$0B,$0B,$0B,$0B,$0B,$0B,$0B,$0B,$0B,$0B xD157 DC.B $00,$00,$00,$00,$00,$00 xD15D DC.B $90 DC.B $0E,$06,$06,$0E,$0E,$0E,$0E,$0E xD166 DC.B $D0 DC.B $00,$00,$00,$00,$00,$00 xD16D DC.B $04 DC.B $0E,$1C,$1C,$1C,$0E xD173 DC.B $04 DC.B $1E,$14,$14,$0A,$05 xD179 DC.B $04 DC.B $FB,$F8,$F3,$EC,$CD xD17F DC.B $22,$22,$22,$2E,$2E,$2E,$2E,$2E,$2E xD188 DC.B $22,$2E,$2E,$2E,$2E xD18D DC.B $06,$06,$06,$06,$07,$08,$09,$0D,$10 xD196 DC.B $11,$11,$11,$11,$14,$18,$1C,$20,$20 xD19F DC.B $C0 DC.B $00,$00,$00,$03,$07,$09,$09,$0C,$0B,$09,$0A,$0A,$09 xD1AD DC.B $04 DC.B $FF,$EC,$35,$14,$12 xD1B3 DC.B $BD DC.B $00 DC.B $00 DC.B $05 DC.B $08 DC.B $30 DC.B $38 xD1BA DC.B $FF xD1BB DC.B $10 xD1BC DC.B $E6 xD1BD DC.B $33 xD1BE DC.B $FE xD1BF DC.B $80 xD1C0 DC.B $00 DC.B $50 DC.B $20 DC.B $07 DC.B $FF,$FF,$FF,$FF,$FF,$FF,$FF DC.B $FF,$FF,$FF,$FF,$FF,$FF,$FF DC.B $FF,$FF,$FF,$FF,$FF,$FF,$FF DC.B $FF,$FF,$FF,$FF,$FF,$FF,$FF DC.B $FF,$FF,$FF,$FF,$FF,$FF,$FF DC.B $FF,$FF,$FF,$FF,$FF,$FF,$FF DC.B $FF,$FF,$FF,$FF,$FF,$FF,$FF xD1F5 DC.B $98 DC.B $80,$80,$80,$80,$80,$80,$80,$80 xD1FE DC.B $20 DC.B $60 DC.B $04 DC.B $7B,$80,$80,$80 DC.B $80,$80,$80,$80 DC.B $80,$80,$80,$80 DC.B $80,$80,$80,$80 DC.B $80,$80,$80,$80 DC.B $80,$80,$80,$80 DC.B $80,$80,$80,$80 xD21D DC.B $30 DC.B $00 DC.B $0D DC.B $00,$10,$20,$30,$40,$50,$60,$70,$80,$90,$A0,$B0,$C0 DC.B $00,$10,$20,$30,$40,$50,$60,$70,$80,$90,$A0,$B0,$C0 DC.B $00,$10,$20,$30,$40,$50,$60,$70,$80,$90,$A0,$B0,$C0 DC.B $00,$10,$20,$30,$40,$50,$60,$70,$80,$90,$A0,$B0,$C0 DC.B $00,$10,$20,$30,$40,$50,$60,$70,$80,$90,$A0,$B0,$C0 DC.B $00,$10,$20,$30,$40,$50,$60,$70,$80,$90,$A0,$B0,$C0 DC.B $00,$10,$20,$30,$40,$50,$60,$70,$80,$90,$A0,$B0,$C0 DC.B $00,$10,$20,$30,$40,$50,$60,$70,$80,$90,$A0,$B0,$C0 xD288 DC.B $60 xD289 DC.B $40 xD28A DC.B $20 xD28B DC.B $FF xD28C DC.B $02 xD28D DC.B $68 xD28E DC.B $10 xD28F DC.B $10 xD290 DC.B $50 xD291 DC.B $33 xD292 DC.B $0A xD293 DC.B $02 xD294 DC.B $01 xD295 DC.B $05 xD296 DC.B $66 xD297 DC.B $14 xD298 DC.B $5A xD299 DC.B $30 xD29A DC.B $96 xD29B DC.B $01 xD29C DC.B $FE xD29D DC.B $8C xD29E DC.B $04 xD29F DC.B $05 xD2A0 DC.B $1E xD2A1 DC.B $22 xD2A2 DC.B $50 xD2A3 DC.B $A0 xD2A4 DC.B $8E xD2A5 DC.B $06 xD2A6 DC.B $FE xD2A7 DC.B $00 xD2A8 DC.B $96 xD2A9 DC.B $94 xD2AA DC.B $93 xD2AB DC.B $0B xD2AC DC.B $1C xD2AD DC.B $48 xD2AE DC.B $68 xD2AF DC.B $1A xD2B0 DC.B $70 xD2B1 DC.B $B0 xD2B2 DC.B $03 xD2B3 DC.B $07 xD2B4 DC.B $87 xD2B5 DC.B $20 xD2B6 DC.B $0A xD2B7 DC.B $04 xD2B8 DC.B $01 xD2B9 DC.B $AC xD2BA DC.B $6C xD2BB DC.B $85 xD2BC DC.B $7B xD2BD DC.B $8A xD2BE DC.B $51 xD2BF DC.B $8A xD2C0 DC.B $51 xD2C1 DC.B $13 xD2C2 DC.B $28 xD2C3 DC.B $28 xD2C4 DC.B $9E xD2C5 DC.B $A0 xD2C6 DC.B $A6 xD2C7 DC.B $3C xD2C8 DC.B $DA xD2C9 DC.B $58 xD2CA DC.B $C0 xD2CB DC.B $1A xD2CC DC.B $70 xD2CD DC.B $B3 xD2CE DC.B $00 xD2CF DC.B $60 xD2D0 DC.B $50 xD2D1 DC.B $19 xD2D2 DC.B $08 xD2D3 DC.B $0A xD2D4 DC.B $0A xD2D5 DC.B $40 xD2D6 DC.B $00 DC.B $34 xD2D8 DC.B $00 DC.B $21 xD2DA DC.B $00 DC.B $1A xD2DC DC.B $03 DC.B $12 xD2DE DC.B $00 DC.B $21 xD2E0 DC.B $03 xD2E1 DC.B $08 xD2E2 DC.B $60 xD2E3 DC.B $38 DC.B $28 DC.B $12 DC.B $0F xD2E7 DC.B $08 xD2E8 DC.B $40 xD2E9 DC.B $FF xD2EA DC.B $FF xD2EB DC.B $01 DC.B $D0 xD2ED DC.B $A0 xD2EE DC.B $20 xD2EF DC.B $F0 xD2F0 DC.B $04 xD2F1 DC.B $60 xD2F2 DC.B $80 xD2F3 DC.B $2C xD2F4 DC.B $00 xD2F5 DC.B $8D xD2F6 DC.B $02 xD2F7 DC.B $00 xD2F8 DC.B $02 xD2F9 DC.B $05 xD2FA DC.B $00 xD2FB DC.B $D0 xD2FC DC.B $20 xD2FD DC.B $F1 xD2FE DC.B $1B xD2FF DC.B $32 xD300 DC.B $1E xD301 DC.B $32 xD302 DC.B $1E xD303 DC.B $28 xD304 DC.B $00 DC.B $0A xD306 DC.B $50 DC.B $0D,$1A,$27,$2B,$33,$66 xD30D DC.B $04 DC.B $02,$04,$07,$0A,$0C xD313 DC.B $80 DC.B $02,$05,$09,$0C,$11,$16,$1C,$24,$31 xD31D DC.B $50 DC.B $1A,$1A,$20,$26,$2D,$40 xD324 DC.B $10 DC.B $00 DC.B $11 DC.B $87,$87,$87,$87,$81,$7A,$7A,$7A,$7A,$7A,$7A,$7A,$7A,$7A,$7A,$7A,$7A DC.B $87,$87,$87,$87,$81,$7A,$7A,$7A,$7A,$7A,$7A,$7A,$7A,$7A,$7A,$7A,$7A DC.B $87,$87,$87,$87,$81,$7A,$7A,$7A,$7A,$7A,$7A,$7A,$7A,$7A,$7A,$7A,$7A DC.B $87,$87,$87,$87,$81,$7A,$7A,$7A,$7A,$7A,$7A,$7A,$7A,$7A,$7A,$7A,$7A DC.B $87,$87,$87,$87,$81,$7A,$7A,$7A,$7A,$7A,$7A,$7A,$7A,$7A,$7A,$7A,$7A xD37C DC.B $00 DC.B $10 DC.B $08 DC.B $05,$0F,$19,$23,$2D,$41,$4B,$50 DC.B $2A,$30,$44,$56,$60,$62,$62,$65 DC.B $2A,$37,$52,$68,$6B,$6B,$6D,$6E DC.B $37,$4B,$61,$6E,$76,$76,$75,$76 DC.B $4F,$5C,$69,$74,$7E,$80,$81,$82 DC.B $61,$64,$6D,$7D,$82,$84,$85,$86 DC.B $67,$6A,$71,$7A,$7E,$85,$86,$87 DC.B $6E,$73,$7A,$7D,$7F,$86,$87,$88 DC.B $78,$78,$7C,$7F,$80,$82,$82,$84 xD3C7 DC.B $40,$64,$64,$64,$64,$64,$64,$64,$64,$69,$5A,$52,$37,$2D,$19,$00,$00 xD3D8 DC.B $9B,$7A,$84,$89,$8E,$91,$95,$98,$9B,$9E,$A1,$A5,$A9,$AD,$B3,$BD,$D3 xD3E9 DC.B $80,$80,$CD,$CD,$C0,$AD,$93,$8D,$86,$80,$7E,$7A,$78,$76,$74,$72,$70 xD3FA DC.B $04 DC.B $20,$38,$40,$40,$40 xD400 DC.B $0A DC.B $FF,$FF,$FF,$FF,$FF,$FF,$FF,$FF,$F3,$E6,$DA xD40C DC.B $A0,$A0,$90,$70,$60,$60,$50,$4B,$40,$2E,$24,$20,$1C,$18,$18,$18,$18 xD41D DC.B $08 DC.B $1E,$1E,$1E,$19,$14,$14,$14,$0A,$00 xD427 DC.B $4B,$32,$2D,$28,$23,$23,$28,$28,$2D,$28,$28,$28,$23,$19,$1E,$1E,$1E xD438 DC.B $F3,$F8,$FB,$FB,$F3,$F3,$FB,$FB,$FB,$FB,$FB,$FB,$FB,$F3,$F3,$F3,$F3 xD449 DC.B $07,$16,$19,$23,$3C,$3C,$3C,$3C,$41,$4B,$55,$5F,$64,$64,$64,$64,$2D xD45A DC.B $58,$6C,$71,$76,$7D,$82,$82,$82,$82,$82,$82,$82,$82,$82,$82,$82,$82 xD46B DC.B $08 DC.B $00,$15,$2B,$40,$55,$6B,$80,$95,$AB xD475 DC.B $88,$83,$80,$80 xD479 DC.B $BB,$BB,$FF,$FF xD47D DC.B $40,$40,$9A,$9A,$9A,$9A,$9A,$66,$66 xD486 DC.B $82,$82,$89,$89,$82,$82,$7F,$77,$7A xD48F DC.B $40,$0E,$0A,$07,$05 DC.B $64,$64,$5E,$5E,$5E DC.B $68,$68,$5E,$5E,$5E DC.B $5E,$5E,$5E,$5E,$5E xD4A3 DC.B $07,$0A,$10,$16,$1A xD4A8 DC.B $30,$30,$30,$20,$20,$28,$30,$40,$48,$50,$50,$50,$50 xD4B5 DC.B $01,$02,$02,$03,$04,$05,$08,$0C,$18,$30,$60,$F0,$F0 xD4C2 DC.B $01,$01,$01,$01,$00 xD4C7 DC.B $10,$28,$30,$40,$50 xD4CC DC.B $FF,$FF,$FF,$E0,$A0,$80,$70,$60,$60,$70,$80,$A0,$C0 xD4D9 DC.B $C0 DC.B $00,$00,$00,$00,$04,$08,$08,$08,$08,$08,$08,$08,$04 xD4E7 DC.W xD002 DC.W xD002+1 DC.W $00FD DC.W $0025 DC.W $0034 DC.W $002D DC.W $001C DC.W $0048 DC.W $00A4 DC.W $003E DC.W $00E0 DC.W $00E1 DC.W $00E2 DC.W $000E DC.W $0045 DC.W $0801 DC.W $0073 DC.W $00A3 DC.W $00BA xD50D DC.B $FD xD50E DC.B $39 xD50F DC.B $F9 xD510 DC.B $32 xD511 DC.B $0A xD512 DC.B $14 xD513 DC.B $64 xD514 DC.B $78 xD515 DC.B $3C xD516 DC.B $51 xD517 DC.B $7F xD518 DC.B $0D xD519 DC.B $1E xD51A DC.B $51 xD51B DC.B $01 xD51C DC.B $10 xD51D DC.B $00 xD51E DC.B $FD xD51F DC.B $7E xD520 DC.B $80 xD521 DC.B $50 xD522 DC.B $70 xD523 DC.B $0A xD524 DC.B $30 xD525 DC.B $04 xD526 DC.B $38 xD527 DC.B $F0 xD528 DC.B $28 xD529 DC.B $5C xD52A DC.B $05 xD52B DC.B $5A xD52C DC.B $60 xD52D DC.B $D0 xD52E DC.B $11 xD52F DC.B $40 xD530 DC.B $FA xD531 DC.B $19 xD532 DC.B $03 xD533 DC.B $0A xD534 DC.B $1C xD535 DC.B $06 xD536 DC.B $1E xD537 DC.B $FF xD538 DC.B $0A xD539 DC.B $9C xD53A DC.B $32 xD53B DC.B $0A xD53C DC.B $40 xD53D DC.B $02 xD53E DC.B $36 xD53F DC.B $DA xD540 DC.B $96 xD541 DC.B $40 DC.B $70,$55,$33,$23 xD546 DC.B $04 xD547 DC.B $00 xD548 DC.B $04 xD549 DC.B $04 xD54A DC.B $00 DC.B $78 xD54C DC.B $EB xD54D DC.B $17 xD54E DC.B $03 xD54F DC.B $37 xD550 DC.B $22 xD551 DC.B $80 xD552 DC.B $C3 xD553 DC.B $22 xD554 DC.B $3F xD555 DC.B $02 xD556 DC.B $22 xD557 DC.B $14 xD558 DC.B $A1 xD559 DC.B $32 xD55A DC.B $06 xD55B DC.B $FF xD55C DC.B $1E xD55D DC.B $00 xD55E DC.B $00 xD55F DC.B $02 xD560 DC.B $C0 xD561 DC.B $00 xD562 DC.B $20 xD563 DC.B $05 xD564 DC.B $4B xD565 DC.B $03 DC.B $00 DC.B $0A DC.B $0A DC.B $05 DC.B $00 xD56B DC.B $FF xD56C DC.B $01 xD56D DC.B $05 xD56E DC.B $64 xD56F DC.B $1A DC.B $34 DC.B $18 DC.B $24 xD573 DC.B $26,$26,$26,$26,$33,$40,$4D,$5A,$66,$66,$66 DC.B $1A,$1A,$1A,$1A,$24,$31,$3B,$48,$52,$52,$52 xD589 DC.B $1A DC.B $34 DC.B $18 DC.B $24 xD58D DC.B $26,$26,$26,$26,$33,$40,$4D,$5A,$66,$66,$66 DC.B $1A,$1A,$1A,$1A,$24,$31,$3B,$48,$52,$52,$52 xD5A3 DC.B $00 xD5A4 DC.B $FF DC.B $50 DC.B $2D xD5A7 DC.B $23 DC.B $6E DC.B $37 DC.B $22 DC.B $17 DC.B $40 DC.B $40 DC.B $FE DC.B $FE DC.B $80 DC.B $80 DC.B $80 DC.B $80 DC.B $20 DC.B $0D DC.B $0A DC.B $AA xD5B8 DC.B $05 xD5B9 DC.B $19 xD5BA DC.B $80,$80,$80,$80 xD5BE DC.B $00 xD5BF DC.B $00 xD5C0 DC.B $00 xD5C1 DC.B $19 xD5C2 DC.B $91 xD5C3 DC.B $28 xD5C4 DC.B $20 xD5C5 DC.B $2A xD5C6 DC.B $03 xD5C7 DC.B $02 DC.B $01 DC.B $01 xD5CA DC.B $00 xD5CB DC.B $03 xD5CC DC.B $03 xD5CD DC.B $02 xD5CE DC.B $C8 xD5CF DC.B $16 xD5D0 DC.B $05 xD5D1 DC.B $23 xD5D2 DC.B $57 xD5D3 DC.B $28 DC.B $00 xD5D5 DC.B $3C xD5D6 DC.B $00 xD5D7 DC.B $05 xD5D8 DC.B $19 xD5D9 DC.B $00 xD5DA DC.B $00 xD5DB DC.B $50 xD5DC DC.B $05 xD5DD DC.B $03 xD5DE DC.B $91 xD5DF DC.B $FF xD5E0 DC.B $FE xD5E1 DC.B $60 xD5E2 DC.B $58 xD5E3 DC.B $00 xD5E4 DC.B $33 xD5E5 DC.B $33 xD5E6 DC.B $10 xD5E7 DC.B $02 xD5E8 DC.B $05 xD5E9 DC.B $33 xD5EA DC.B $E0 xD5EB DC.B $26 xD5EC DC.B $0C xD5ED DC.B $40 xD5EE DC.B $0A xD5EF DC.B $0A xD5F0 DC.B $20 xD5F1 DC.B $4B xD5F2 DC.B $3C xD5F3 DC.B $01 xD5F4 DC.B $10 xD5F5 DC.B $18,$18,$18,$18,$18,$18,$18,$18,$28,$32,$41,$50,$5A,$64,$6E,$78,$91 xD606 DC.B $3C,$32,$28,$28 xD60A DC.B $18,$10,$0C,$0A xD60E DC.B $30,$30,$30,$28,$28,$2A,$2E,$32,$34 xD617 LDAA #$03 LDAB #$01 ; A=#$03 JSR xFBCE ; A=#$03 B=#$01 LDAA $000F ANDA #$08 ; A=$000F TST xD007 ; A=$000F BMI @0 ; A=$000F N=xD007 LDAB $0005 ; A=$000F ANDB #$80 ; A=$000F B=$0005 ABA ; A=$000F B=$0005 @0 LDAB $0010 ; A=? ANDB #$FE ; A=? B=$0010 CBA ; A=? B=$0010 BNE @3 ; A=? LDAB $0049 ; A=? SUBB $004A ; A=? B=$0049 BCC @1 ; A=? B=? NEGB ; A=? B=? @1 CMPB xD011 ; A=? B=? BHI @3 ; A=? LDAB $001F ; A=? SUBB $0020 ; A=? B=$001F BCC @2 ; A=? B=? NEGB ; A=? B=? @2 CMPB xD012 ; A=? B=? BHI @3 ; A=? LDAB $0034 ; A=? CMPB xD013 ; A=? B=$0034 BHI @3 ; A=? LDAB $002B ; A=? BEQ @5 ; A=? B=$002B DECB ; A=? B=$002B BRA @4 ; A=? B=? @3 LDAB xD010 ; A=? @4 STAB $002B ; A=? B=? INCA ; A=? @5 STAA $0010 ; A=? JSR xFA59 LDAA $001C LDX #xD3C7 ; A=$001C JSR xFB49 ; A=$001C X=#xD3C7 STAA $00A9 ; A=? JSR xFBDB STAA $003E ; A=? LDAA #$0B LDAB #$01 ; A=#$0B JSR xFBCE ; A=#$0B B=#$01 LDAA $001C CMPA xD028 ; A=$001C BHI @6 JSR xFDCB @6 MOVA $003F,$00BD LDX $003F LDAA $003E ; X=$003F LDAB xD28B ; A=$003E X=$003F JSR xFB12 ; A=$003E B=xD28B X=$003F STD $003F ; A=? B=? ASLB ; A=? B=? ADCA #$00 ; A=? STAA $003E ; A=? PSHA ; A=? LDAB xD28C BTST7A $0002,#$80 ; B=xD28C BMI @7 ; B=xD28C N=$0002 LDAA $00BE LDX #xD4A3 ; A=$00BE JSR xFB49 ; A=$00BE X=#xD4A3 TAB ; A=? @7 PULA ; B=? LDX $0043 ; A=? B=? JSR xFB12 ; A=? B=? X=$0043 STD $0043 ; A=? B=? LDAA $0026 LSRA ; A=$0026 LDAB $001C ; A=? CMPB #$80 ; A=? B=$001C BLS @8 ; A=? B=$001C LDAB #$80 ; A=? @8 LDX #xD37C ; A=? B=#$80,$001C JSR xFB67 ; A=? B=#$80,$001C X=#xD37C SUMA $00A9 ; A=? STAA $00A9 ; A=? JSR xFBDB STAA $0048 ; A=? LDAB $0009 ANDB #$DF ; B=$0009 BTST7A $0001,#$80 ; B=$0009 BPL @9 ; B=$0009 N=$0001 BTSTA xD50D,#$04 ; B=$0009 BEQ @10 ; B=$0009 LDAA $0048 ; B=$0009 CMPA xD523 ; A=$0048 B=$0009 BCC @10 ; B=$0009 BSETA $0012,#$04 ; B=$0009 ORAB #$20 ; B=$0009 BRA @10 ; B=$0009 @9 MOVA xD289,$004F ; B=$0009 CLR $0050 ; B=$0009 @10 STAB $0009 ; B=$0009 JSR xFCD8 LDAB $0002 ; A=? ANDB #$7F ; A=? B=$0002 CMPA xD5C6 ; A=? B=$0002 BHI @11 ; B=$0002 LDAA $0034 ; B=$0002 CMPA xD2F6 ; A=$0034 B=$0002 BHI @11 ; B=$0002 ORAB #$80 ; B=$0002 @11 STAB $0002 ; B=$0002 BTST7A $0001,#$80 JPL @31 ; N=$0001 CLRB LDAA $0026 ; B=#0 SUBD $002F ; A=$0026 B=#0 BLS @14 ; A=? B=? TSTB ; A=? B=? BPL @12 ; A=? N=? INCA ; A=? @12 PSHA ; A=? STAA $0032 ; A=? LDAB xD28F LDAA $0049 ; B=xD28F CMPA xD290 ; A=$0049 B=xD28F BHI @13 ; B=xD28F ASLB ; B=xD28F BCC @13 ; B=? LDAB #$FF @13 PULA ; B=? CBA ; A=? B=? BLS @15 ; A=? LDX #xD30D ; A=? JSR xFB40 ; A=? X=#xD30D LDAB $0049 ; A=? CMPB xD291 ; A=? B=$0049 BLS @16 ; A=? ASLA ; A=? BCC @16 ; A=? LDAA #$FF BRA @16 ; A=#$FF @14 CLR $0032 @15 CLRA @16 STAA $0053 ; A=? STAA $0099 ; A=? LDAB $00DF LDAA $0049 ; B=$00DF SUBA $004B ; A=$0049 B=$00DF BLS @22 ; A=? B=$00DF TST xD006 ; A=? B=$00DF BPL @17 ; A=? B=$00DF N=xD006 TST $004C ; A=? B=$00DF BPL @17 ; A=? B=$00DF N=$004C DECA ; A=? B=$00DF BEQ @22 ; A=? B=$00DF @17 BITB #$10 ; A=? B=$00DF BNE @18 ; A=? B=$00DF CMPA xD292 ; A=? B=$00DF BLS @22 ; A=? B=$00DF @18 TST xD006 ; A=? BMI @19 ; A=? N=xD006 ASLA ; A=? BCS @20 ; A=? @19 ASLA ; A=? BCC @21 ; A=? @20 LDAA #$FF @21 LDX #xD313 ; A=? JSR xFB36 ; A=? X=#xD313 LDAB $00DF ; A=? ORAB #$10 ; A=? B=$00DF BRA @23 ; A=? B=$00DF @22 CLRA ; B=$00DF ANDB #$EF ; A=#0 B=$00DF @23 STAB $00DF ; A=? B=$00DF STAA $0052 ; A=? STAA $009A ; A=? CLRA BTSTB $00DF,#$04 ; A=#0 BEQ @24 ; A=#0 LDAA xD293 @24 ADDA $0052 ; A=xD293,#0 BCS @25 ; A=? ADDA $0053 ; A=? BCC @26 ; A=? @25 LDAA #$FF @26 BEQ @28 ; A=? LDAB $0098 ; A=? MUL ; A=? B=$0098 LSRD ; A=? B=? LSRD ; A=? B=? LSRD ; A=? B=? ADDD $0096 ; A=? B=? STD $0096 ; A=? B=? LDAA $000D BITA #$40 ; A=$000D BNE @27 ; A=$000D ORAA #$01 ; A=$000D @27 ORAA #$C0 ; A=$000D BSETB $0006,#$01 ; A=$000D BRA @29 ; A=$000D @28 LDAA $000D ANDA #$BF ; A=$000D @29 STAA $000D ; A=$000D LDAA $0049 CLRB ; A=$0049 TST xD006 ; A=$0049 B=#0 BPL @30 ; A=$0049 B=#0 N=xD006 BTSTB $0070,#$02 BEQ @33 LDAA $0021 LSRA ; A=$0021 LDX #xD31D ; A=? JSR xFB36 ; A=? X=#xD31D TAB ; A=? LDAA $0049 ; B=? LDX $004B ; A=$0049 B=? JSR xFB12 ; A=$0049 B=? X=$004B @30 STD $004B ; A=? B=? BRA @33 @31 LDAA $0049 CLRB ; A=$0049 STD $004B ; A=$0049 B=#0 STD $004D ; A=$0049 B=#0 LDAA $0026 ; B=#0 STD $002F ; A=$0026 B=#0 LDAA #$FF LDX $BC00 ; A=#$FF CPX xD00A ; A=#$FF X=$BC00 BLS @32 ; A=#$FF X=$BC00 STX $0053 ; X=$BC00 LDD xD00A JSR xFB92 ; A=xD00A B=xD00A+1 TSTB ; A=? B=? BPL @32 ; A=? N=? INCA ; A=? @32 LDX #xD400 ; A=? JSR xFB40 ; A=? X=#xD400 STAA $0058 ; A=? @33 LDAA $00A6 LDAB $00A5 ; A=$00A6 CMPB #$3F ; A=$00A6 B=$00A5 BHI xD842 ; A=$00A6 B=$00A5 CMPB #$0F ; A=$00A6 B=$00A5 BHI @34 ; A=$00A6 CLRB ; A=$00A6 STD $00AB ; A=$00A6 B=#0 LDAA $00A5 ASLA ; A=$00A5 ASLA ; A=? BRA @35 ; A=? @34 LDAB #$40 ; A=$00A6 MUL ; A=$00A6 B=#$40 STD $00AB ; A=? B=? LDAA $00A5 @35 ASLA ; A=? ASLA ; A=? BRA xD849 ; A=? xD839 LDX #$00AB ; A=? JSR xFBB9 ; A=? X=#$00AB STD $00AB ; A=? B=? RTS xD842 LDAB #$10 ; A=$00A6 MUL ; A=$00A6 B=#$10 STD $00AB ; A=? B=? LDAA $00A5 xD849 LDX #xFE33 ; A=? JSR xFB40 ; A=? X=#xFE33 BSR xD839 ; A=? LDAA $00A9 BSR xD839 ; A=$00A9 LDAA $002E BSR xD839 ; A=$002E LDAA $00AA BSR xD839 ; A=$00AA BTST7A $0001,#$80 ; X=? BMI @0 ; X=? N=$0001 LDAA $0058 BSR xD839 ; A=$0058 @0 LDAA $00A3 ; X=? BIT7A #$80 ; A=$00A3 X=? N=$00A3 BMI @1 ; A=$00A3 X=? N=$00A3 BTSTB $000D,#$20 ; A=$00A3 X=? BNE @3 ; A=$00A3 X=? @1 JSR xFBB9 ; A=$00A3 X=? ASLD ; A=? B=? BCC @2 ; A=? B=? LDD #$0FFFF @2 STD $00AB ; A=? B=? @3 LDAA $0021 CMPA xD2F2 ; A=$0021 JCS @17 BTSTA $000F,#$10 BNE @6 LDAB $0009 BITB #$24 ; B=$0009 BNE @4 ; B=$0009 LDAA $0049 ; B=$0009 CMPA xD2F0 ; A=$0049 B=$0009 BCS @4 ; B=$0009 BSETA $0003,#$10 BRA @8 @4 LDAA $0020 ; B=$0009 SUBA $001F ; A=$0020 B=$0009 BCS @5 ; A=? B=$0009 CMPA xD2E9 ; A=? B=$0009 BHI @6 ; B=$0009 @5 BITB #$48 ; B=$0009 BNE @10 LDAA $0032 CMPA xD2EA ; A=$0032 BLS @9 @6 LDAA $00A0 BEQ @8 LDD $0096 ADDD xD2EB ; A=$0096 B=$0097 BCC @7 ; A=? B=? LDD #$07FFF @7 STD $0096 ; A=? B=? BSETA $000D,#$80 @8 CLR $00A0 BRA @15 @9 LDAA $0026 LDAB $0008 ; A=$0026 CMPA xD2E7 ; A=$0026 B=$0008 BCS @10 ; A=$0026 B=$0008 BITB #$08 ; A=$0026 B=$0008 BEQ @15 ; A=$0026 CMPA xD2E8 ; A=$0026 BCC @15 @10 LDX #xD2E3 BTSTB $0008,#$08 ; X=#xD2E3 BEQ @11 ; X=#xD2E3 INX ; X=#xD2E3 @11 LDAA $001C ; X=? CMPA $00(X) ; A=$001C X=? BLS @6 ; X=? LDAA $0034 ; X=? CMPA $02(X) ; A=$0034 X=? BCS @6 LDAA $00A1 BNE @14 ; A=$00A1 LDAB xD2EF LDAA $0003 ; B=xD2EF BITA #$10 ; A=$0003 B=xD2EF BEQ @12 ; A=$0003 B=xD2EF ANDA #$EF ; A=$0003 B=xD2EF STAA $0003 ; A=$0003 B=xD2EF STAB $009F ; B=xD2EF @12 CMPB $009F ; B=xD2EF BLS @13 INC $009F BRA @17 @13 BSETB $0008,#$08 MOVA xD2EE,$00A0 BSETA $000D,#$10 LDAA $009E DIFA xD2F1 ; A=$009E STAA $009E ; A=? JSR xD839 ; A=? BRA @23 @14 DECA ; A=$00A1 BRA @16 ; A=? @15 LDAA xD2ED @16 STAA $00A1 ; A=? CLR $009F LDAA $00A0 BEQ @17 DEC $00A0 @17 BCLRA $0008,#$08 MOVA #$FF,$009E LDD $004D ASLB ; A=$004D B=$004E ADCA #$00 ; A=$004D BCC @18 ; A=? DECA ; A=? @18 SUBA $0049 ; A=? BCS @22 ; A=? CMPA xD2E0 ; A=? BLS @22 LDD $002F ASLB ; A=$002F B=$0030 ADCA #$00 ; A=$002F BCC @19 ; A=? DECA ; A=? @19 SUBA $0026 ; A=? BCS @22 ; A=? CMPA xD2E1 ; A=? BLS @22 ; A=? LDAB xD2E2 ; A=? MUL ; A=? B=xD2E2 LDAB $009D ; A=? MUL ; A=? B=$009D ASLD ; A=? B=? BCS @20 ; A=? B=? ASLD ; A=? B=? BCS @20 ; A=? B=? ASLD ; A=? B=? BCC @21 ; A=? @20 LDAA #$FF @21 NEGA ; A=? BEQ @22 ; A=? BSETB $000D,#$10 ; A=? STAA $0058 ; A=? LDX #$0096 ; A=? JSR xFBB9 ; A=? X=#$0096 STD $0096 ; A=? B=? LDAA $0058 JSR xD839 ; A=$0058 BRA @24 ; X=? @22 BCLRA $000D,#$10 @23 LDX #$00AB @24 LDAA $00B2 ; X=? JSR xFBB9 ; A=$00B2 X=? ASLD ; A=? B=? BCC @25 ; A=? B=? LDD #$0FFFF BRA @27 ; A=#$FF B=#$FF @25 STD $00AB ; A=? B=? CLRA LDAB $00B1 ; A=#0 BIT7B #$80 ; A=#0 B=$00B1 N=$00B1 BMI @26 ; A=#0 B=$00B1 N=$00B1 ADDD $00AB ; A=#0 B=$00B1 BCC @27 ; A=? B=? LDD #$0FFFF BRA @27 ; A=#$FF B=#$FF @26 NEGB ; A=#0 B=$00B1 STD $0051 ; A=#0 B=? LDD $00AB DIFD $0051 ; A=$00AB B=$00AC @27 STD $00AB ; A=? B=? LDD $00AB ASLD ; A=$00AB B=$00AC BCS @28 ; A=? B=? ASLD ; A=? B=? BCS @28 ; A=? B=? N=? BPL @29 ; A=? B=? N=? @28 LDD #$07FFF @29 STD $0053 ; A=? B=? LDAA $001C LDX #xD46B ; A=$001C JSR xFB40 ; A=$001C X=#xD46B LDX #$0053 ; A=? JSR xFBB9 ; A=? X=#$0053 STD $0057 ; A=? B=? BTSTA $0000,#$10 BEQ @30 CLRD STD $BC0E ; A=#0 B=#0 JMP @41 @30 BTST7A $0001,#$80 BPL @32 ; N=$0001 LDX $00AB CPX xD2D6 ; X=$00AB BHI @32 ; X=$00AB LDAA $000E ; X=$00AB BITA #$10 ; A=$000E X=$00AB BNE @31 ; A=$000E X=$00AB CPX xD2D8 ; A=$000E X=$00AB BHI @32 ; A=$000E ORAA #$10 ; A=$000E STAA $000E ; A=$000E @31 LDD $0057 ADDD $00AD ; A=$0057 B=$0058 STD $00AD ; A=? B=? MOVX #$0000,$BC0E BRA @35 @32 BCLRA $000E,#$10 MOVX #$0000,$00AD LDD xD2DA ADDD $00AB ; A=xD2DA B=xD2DA+1 BCS @33 ; A=? B=? N=? BPL @34 ; A=? B=? N=? @33 LDD #$07FFF @34 STD $BC0E ; A=? B=? BTST7A $000D,#$80 BPL @41 ; N=$000D @35 LDD $00AD ADDD $0096 ; A=$00AD B=$00AE PSHD ; A=? B=? PULX ; A=? B=? CPX xD2DC ; A=? B=? X=? BHI @36 ; A=? B=? X=? CPX xD2DE ; A=? B=? X=? BLS @39 ; A=? B=? ADDD xD2DA ; A=? B=? STD $BC14 ; A=? B=? CLRD STD $0096 ; A=#0 B=#0 STD $00AD ; A=#0 B=#0 BRA @38 @36 LDD xD2DC ADDD xD2DA ; A=xD2DC B=xD2DC+1 STD $BC14 ; A=? B=? LDD $00AD SUBD xD2DC ; A=$00AD B=$00AE BCC @37 ; A=? B=? ADDD $0096 ; A=? B=? STD $0096 ; A=? B=? CLRD @37 STD $00AD ; A=? B=? @38 JSR xFD39 LDD $BC3C ANDB #$7F ; B=$BC3D JSR xFD39 STD $BC3C ; A=? B=? ORAB #$80 ; B=? JSR xFD39 STD $BC3C ; A=? B=? LDAA $000D ORAA #$80 ; A=$000D BRA @40 ; A=$000D @39 LDAA $000D ANDA #$7F ; A=$000D @40 STAA $000D ; A=$000D @41 LDAA $0070 ANDA #$03 ; A=$0070 CMPA #$03 ; A=$0070 JNE xDDE1 LDAA xD2AA BTSTB $000E,#$A0 ; A=xD2AA BNE @42 ; A=xD2AA LDX #xD41D LDAA $0031 ; X=#xD41D JSR xFB40 ; A=$0031 X=#xD41D SUMA $00B5 ; A=? DIFA $00E5 ; A=? BTST7B $0002,#$80 ; A=? BPL @42 ; A=? N=$0002 CMPA xD2A9 ; A=? BLS @42 ; A=? LDAA xD2A9 @42 STAA $00A5 ; A=? LDAB $0002 BITB #$20 ; B=$0002 BNE @44 ; B=$0002 LDAA $0034 ; B=$0002 CMPA xD29E ; A=$0034 B=$0002 BHI @44 ; B=$0002 LDAA $0049 ; B=$0002 CMPA xD29F ; A=$0049 B=$0002 BHI @44 ; B=$0002 LDAA $001C ; B=$0002 CMPA xD2A1 ; A=$001C B=$0002 BHI @44 ; A=$001C B=$0002 BITB #$02 ; A=$001C B=$0002 BNE @43 ; A=$001C B=$0002 CMPA xD2A0 ; A=$001C B=$0002 BHI @44 ; B=$0002 @43 LDAA xD2A4 ; B=$0002 CMPA $00A5 ; A=xD2A4 B=$0002 BLS @51 ; A=xD2A4 B=$0002 @44 ANDB #$FD ; B=$0002 @45 STAB $0002 ; B=$0002 CLRB @46 STAB $00B4 ; B=? BTSTA xD006,#$08 BEQ @47 BSETA $0003,#$02 LDAA $00E3 CMPA xD2A7 ; A=$00E3 BHI @47 LDAA $0049 CMPA xD29F ; A=$0049 BHI @47 LDAA $0036 CMPA xD2A5 ; A=$0036 BLS @47 LDAA $001C CMPA xD2A6 ; A=$001C BHI @47 LDAA xD2A8 BTST7B $0008,#$80 ; A=xD2A8 BMI @48 ; A=xD2A8 N=$0008 @47 BCLRB $0003,#$02 LDAA $00A5 @48 BTST7B $0001,#$80 ; A=$00A5,xD2A8,xD2A4 BPL xDB81 ; A=$00A5,xD2A8,xD2A4 N=$0001 TST $000E ; A=$00A5,xD2A8,xD2A4 BMI @49 ; A=$00A5,xD2A8,xD2A4 N=$000E BSR xDB74 ; A=$00A5,xD2A8,xD2A4 @49 CMPA xD2C5 ; A=? BLS @50 ; A=? LDAA xD2C5 @50 STAA $00A5 ; A=? BRA xDBA8 @51 BITB #$02 ; A=xD2A4 B=$0002 BNE @52 ; A=xD2A4 LDAB $00B4 CMPB xD2A2 ; B=$00B4 BCS @53 ; B=$00B4 LDAB $0002 ORAB #$02 ; B=$0002 BRA @45 ; B=$0002 @52 LDAB $00B4 ; A=xD2A4 CMPB xD2A3 ; A=xD2A4 B=$00B4 BCC @48 ; A=xD2A4 B=$00B4 @53 BTSTA $0070,#$04 ; B=$00B4 BNE @54 ; B=$00B4 INCB ; B=$00B4 @54 BRA @46 ; B=? xDB74 BTSTB $00DE,#$10 ; A=? BEQ @0 ; A=? DIFA xD302 ; A=? @0 RTS xDB81 LDAA $00B6 LDAB xD2C6 ; A=$00B6 CMPB $0049 ; A=$00B6 B=xD2C6 BHI @0 ; A=$00B6 SUMA xD2C7 ; A=$00B6 BRA @2 ; A=? @0 LDAB $00E3 ; A=$00B6 CMPB xD2C8 ; A=$00B6 B=$00E3 BHI @1 ; A=$00B6 BSR xDB74 ; A=$00B6 BRA @2 ; A=? @1 CMPA $00B5 ; A=$00B6 BCS @2 ; A=$00B6 LDAA $00B5 @2 STAA $00A5 ; A=? BRA xDC1A xDBA8 JSR xFD18 LDX #xD479 ; A=? B=? JSR xFB45 ; A=? B=? X=#xD479 LDAB $0049 ; A=? MUL ; A=? B=$0049 ADCA #$00 ; A=? PSHA ; A=? LDX #xD47D JSR xFDDA ; X=#xD47D TAB ; A=? BTSTA $000D,#$20 ; B=? BEQ @0 ; B=? DIFB xD2CB ; B=? @0 PULA ; B=? SBA ; A=? B=? BCC @1 MOVA xD2CE,$00BB BRA xDC29 @1 LDAA $0021 CMPA xD2CA ; A=$0021 BHI xDBF2 ; A=$0021 CMPA xD2C9 ; A=$0021 BLS xDBF2 LDAA xD2CC CMPA $001C ; A=xD2CC BLS @2 LDAA $0049 CMPA xD2CD ; A=$0049 BCS xDC1C @2 CLRB STAB $00BB ; B=#0 xDBF2 BSETA $000D,#$20 LDX #xD486 JSR xFDDA ; X=#xD486 TAB ; A=? LDAA $0021 ; B=? CMPA xD2CF ; A=$0021 B=? BHI @0 ; B=? LDAA $001C ; B=? CMPA xD2D0 ; A=$001C B=? BCC @0 ; B=? DIFB xD2D1 ; B=? @0 LDAA $00A5 ; B=? CBA ; A=$00A5 B=? BLS xDC2F ; B=? STAB $00A5 ; B=? xDC1A BRA xDC2F xDC1C LDAB $00BB BEQ xDBF2 LDAA $0070 ANDA #$06 ; A=$0070 BEQ xDC29 DEC $00BB xDC29 BCLRA $000D,#$20 xDC2F BTSTA $0000,#$02 BEQ @0 JSR $5800 @0 BCLRA $000D,#$04 LDAB $00A2 ANDB #$03 ; B=$00A2 LDX #xD2AC ; B=$00A2 ABX ; B=$00A2 X=#xD2AC DEX ; B=$00A2 X=? TSTB ; B=$00A2 X=? BEQ @2 ; B=$00A2 X=? LDAA $00(X) ; B=$00A2 X=? SUBA xD2B2 ; A=$00(X) B=$00A2 X=? BCS @1 ; A=? B=$00A2 X=? CMPA $001C ; A=? B=$00A2 X=? BHI @7 ; B=$00A2 X=? @1 CMPB #$03 ; B=$00A2 X=? BEQ @3 ; X=? @2 LDAA $01(X) ; X=? ADDA xD2B2 ; A=$01(X) BCS @3 ; A=? CMPA $001C ; A=? BCS @7 @3 LDAB $00A2 ANDB #$0C ; B=$00A2 LSRB ; B=$00A2 LSRB ; B=? LDX #xD2AF ; B=? ABX ; B=? X=#xD2AF DEX ; B=? X=? TSTB ; B=? X=? BEQ @5 ; B=? X=? LDAA $00(X) ; B=? X=? SUBA xD2B3 ; A=$00(X) B=? X=? BCS @4 ; A=? B=? X=? CMPA $0026 ; A=? B=? X=? BHI @7 ; B=? X=? @4 CMPB #$03 ; B=? X=? BEQ @6 ; X=? @5 LDAA $01(X) ; X=? ADDA xD2B3 ; A=$01(X) BCS @6 ; A=? CMPA $0026 ; A=? BCS @7 @6 LDAB $00A2 BRA @9 ; B=$00A2 @7 BSETA $000D,#$0C BSETA $0006,#$01 CLRB LDAA $001C ; B=#0 CMPA xD2AC ; A=$001C B=#0 BCS @8 ; A=$001C B=#0 INCB ; A=$001C B=#0 CMPA xD2AD ; A=$001C B=? BCS @8 ; A=$001C B=? INCB ; A=$001C B=? CMPA xD2AE ; A=$001C B=? BCS @8 ; B=? INCB ; B=? @8 LDAA $0026 ; B=? CMPA xD2AF ; A=$0026 B=? BCS @9 ; A=$0026 B=? ADDB #$04 ; A=$0026 B=? CMPA xD2B0 ; A=$0026 B=? BCS @9 ; A=$0026 B=? ADDB #$04 ; A=$0026 B=? CMPA xD2B1 ; A=$0026 B=? BCS @9 ; B=? ADDB #$04 ; B=? @9 LDX #$00ED ; B=? ABX ; B=? X=#$00ED LDAA $00(X) ; B=? X=? CMPA xD2B9 ; A=$00(X) B=? BHI @10 ; A=$00(X) B=? CMPA xD2BA ; A=$00(X) B=? BCC @11 ; A=$00(X) B=? @10 BSETA $0008,#$40 JSR xFDBD @11 STAA $00A3 ; A=? B=? STAB $00A2 ; B=? LDAA xD2B4 LDAB xD2B6 ; A=xD2B4 TST $0006 ; A=xD2B4 B=xD2B6 BPL @13 ; A=xD2B4 B=xD2B6 N=$0006 LDAA $00BE LDAB #$C5 ; A=$00BE MUL ; A=$00BE B=#$C5 ASLD ; A=? B=? CMPA #$50 ; A=? BLS @12 ; A=? LDAA #$50 @12 LDAB $007F ; A=? LDX #xD324 ; A=? B=$007F JSR xFB67 ; A=? B=$007F X=#xD324 LDAB xD2B5 ; A=? @13 LDX $00A7 ; A=? B=xD2B5,xD2B6 JSR xFB12 ; A=? B=xD2B5,xD2B6 X=$00A7 STD $00A7 ; A=? B=? ASLB ; A=? B=? ADCA #$00 ; A=? PSHA ; A=? LDX #xD475 JSR xFD18 JSR xFB45 ; A=? B=? X=? PULB ; A=? MUL ; A=? B=? ASLD ; A=? B=? BCC @14 ; A=? LDAA #$FF @14 STAA $00A6 ; A=? BTSTA $0070,#$04 JEQ xDDDE LDAA $009B BNE @15 MOVA xD294,$009B LDAB xD295 LDX $004D ; B=xD295 LDAA $0049 ; B=xD295 X=$004D JSR xFB12 ; A=$0049 B=xD295 X=$004D STD $004D ; A=? B=? LDX #xD306 LDAA $0021 ; X=#xD306 LSRA ; A=$0021 X=#xD306 JSR xFB36 ; A=? X=#xD306 TAB ; A=? LDX $002F ; B=? LDAA $0026 ; B=? X=$002F JSR xFB12 ; A=$0026 B=? X=$002F STD $002F ; A=? B=? BRA @16 @15 DEC $009B @16 BTSTA $000E,#$02 BEQ @25 BTSTA $000D,#$08 BNE @25 LDAA $00A4 CMPA #$80 ; A=$00A4 BEQ @25 ; A=$00A4 LDAB $00B9 ; A=$00A4 INCB ; A=$00A4 B=$00B9 BMI @17 ; A=$00A4 B=? N=? STAB $00B9 ; A=$00A4 B=? ASLB ; A=$00A4 B=? CMPB $00B0 ; A=$00A4 B=? BCS @26 ; A=$00A4 @17 LDAB $00B8 ; A=$00A4 INCB ; A=$00A4 B=$00B8 BEQ @18 ; A=$00A4 B=? STAB $00B8 ; A=$00A4 B=? CMPB xD2AB ; A=$00A4 B=? BCS @26 ; A=$00A4 @18 SUBA #$80 ; A=$00A4 BCS @19 ; A=? CMPA xD2B7 ; A=? BLS @26 BTSTA $000E,#$40 BNE @26 BRA @20 @19 NEGA ; A=? CMPA xD2B7 ; A=? BLS @26 BTSTA $000E,#$40 BEQ @26 @20 LDX #$00ED LDAB $00A2 ; X=#$00ED ABX ; B=$00A2 X=#$00ED LDAA $00(X) ; X=? BTSTB $000E,#$40 ; A=$00(X) X=? BEQ @22 ; A=$00(X) X=? SUBA xD2B8 ; A=$00(X) X=? BCS @21 ; A=? X=? CMPA xD2BA ; A=? X=? BCC @24 ; A=? X=? @21 LDAA xD2BA ; X=? BRA @24 ; A=xD2BA X=? @22 ADDA xD2B8 ; A=$00(X) X=? BCS @23 ; A=? X=? CMPA xD2B9 ; A=? X=? BLS @24 ; A=? X=? @23 LDAA xD2B9 ; X=? @24 STAA $00(X) ; A=? X=? STAA $00A3 ; A=? @25 CLRB STAB $00B9 ; B=#0 STAB $00B8 ; B=#0 @26 BCLRA $000D,#$08 MOVA $001F,$0020 xDDDE JMP xE531 xDDE1 BTST7A $0001,#$80 BPL @3 ; N=$0001 BTST7A $000E,#$80 BMI @0 ; N=$000E LDAA xD2BF LDAB xD2C0 ; A=xD2BF BRA @1 ; A=xD2BF B=xD2C0 @0 LDAA xD2BD LDAB xD2BE ; A=xD2BD @1 CMPA $003E ; A=xD2BD,xD2BF B=xD2BE,xD2C0 BCS @2 ; B=xD2BE,xD2C0 CMPB $003E ; B=xD2BE,xD2C0 BLS @3 @2 CLR $009C BSETB $00DE,#$01 @3 LDAA $002E LDAB xD2F5 ; A=$002E MUL ; A=$002E B=xD2F5 LDAB $001C ; A=? ASLB ; A=? B=$001C BCC @4 ; A=? B=? LDAB #$FF ; A=? @4 MUL ; A=? B=? CMPA #$40 ; A=? BLS @5 ; A=? LDAA #$40 @5 STAA $00BE ; A=? LDX #xD4D9 LDAA $00E3 ; X=#xD4D9 COMA ; A=$00E3 X=#xD4D9 JSR xFB36 ; A=? X=#xD4D9 STAA $0055 ; A=? LDAB #$03 @6 STAB $0054 ; B=? LDAA #$05 ; B=? MUL ; A=#$05 B=? LDX #xD48F ; B=? ABX ; B=? X=#xD48F LDAA $00BE ; X=? JSR xFB49 ; A=$00BE X=? LDX #$0055 ; A=? LDAB $0054 ; A=? X=#$0055 BEQ @9 ; A=? B=$0054 X=#$0055 TST $0002 ; A=? B=$0054 X=#$0055 BPL @7 ; A=? B=$0054 X=#$0055 N=$0002 ADDA xD2F7 ; A=? B=$0054 X=#$0055 BCC @8 ; A=? B=$0054 X=#$0055 LDAA #$FF ; B=$0054 X=#$0055 BRA @8 ; A=#$FF B=$0054 X=#$0055 @7 DIFA $0055 ; A=? B=$0054 X=#$0055 @8 ABX ; A=? B=$0054 X=#$0055 STAA $00(X) ; A=? B=$0054 X=? DECB ; B=$0054 BRA @6 ; B=? @9 STAA $00B0 ; A=? LDAB $000E LDAA $0056 ; B=$000E ADDA xD2F3 ; A=$0056 B=$000E BCS @10 ; A=? B=$000E CMPA $003F ; A=? B=$000E BCS @13 ; B=$000E @10 LDAA $0056 ; B=$000E SUBA xD2F3 ; A=$0056 B=$000E BCS @11 ; A=? B=$000E CMPA $003F ; A=? B=$000E BHI @12 ; B=$000E @11 LDAA $003F ; B=$000E CMPA $00BD ; A=$003F B=$000E BHI @13 ; B=$000E @12 ANDB #$BF ; B=$000E BRA @14 ; B=$000E @13 ORAB #$40 ; B=$000E @14 CMPB $000E ; B=$000E BEQ @15 ; B=$000E INC $00BA ; B=$000E BSETA $0007,#$10 ; B=$000E CLRA ; B=$000E BRA @16 ; A=#0 B=$000E @15 LDAA $00BF ; B=$000E INCA ; A=$00BF B=$000E BEQ @17 ; A=? B=$000E @16 STAA $00BF ; A=? B=$000E @17 STAB $000E ; B=$000E BPL @25 ; N=$000E BTSTA $0008,#$08 BNE @18 BTSTB $000D,#$20 BEQ @19 @18 BSETB $0006,#$01 BRA @24 @19 BTSTB xD006,#$20 BEQ @21 LDAB $000D ASRB ; B=$000D BCC @21 ; B=? ASLB ; B=? STAB $000D ; B=? @20 BSETB $0006,#$01 BRA @25 @21 BTSTB $000D,#$10 BEQ @22 BTSTA $000E,#$40 BNE @26 BTST7A $00A4,#$80 BPL @26 ; N=$00A4 BRA @20 @22 BTSTB xD006,#$10 BEQ @23 BTSTA $000D,#$04 BNE @20 @23 BTSTB $0002,#$20 BNE @26 LDAB $0026 CMPB xD2C1 ; B=$0026 BHI @26 LDAB $001C CMPB xD2C2 ; B=$001C BLS @26 BTSTA $000E,#$40 BNE @26 BTST7A $00A4,#$80 BPL @26 ; N=$00A4 @24 BSETA $000B,#$04 @25 MOVA #$80,$00A4 MOVA #$66,$0043 CLRA STAA $00AF ; A=#0 STAA $00BC ; A=#0 JMP @43 ; A=#0 @26 LDAB $0008 LDAA $0043 ; B=$0008 CMPA $0057 ; A=$0043 B=$0008 BHI @28 ; A=$0043 B=$0008 SUBA $0058 ; A=$0043 B=$0008 BCS @27 ; A=? B=$0008 CLRA BRA @31 ; A=#0 @27 NEGA ; A=? B=$0008 ANDB #$FD ; A=? B=$0008 BRA @29 ; A=? B=$0008 @28 SUBA $0057 ; A=$0043 LDAB xD2FB ; A=? MUL ; A=? B=xD2FB LDAB $0008 ; A=? ORAB #$02 ; A=? B=$0008 @29 STAB $0008 ; A=? B=$0008 BTST7B $0002,#$80 ; A=? BPL @30 ; A=? N=$0002 LDAB xD2FC ; A=? MUL ; A=? B=xD2FC @30 CMPA #$60 ; A=? BLS @31 ; A=? LDAA #$60 @31 STAA $0457 ; A=? ASLA ; A=? STAA $0056 ; A=? LDX #xD4A8 ; A=? JSR xFB49 ; A=? X=#xD4A8 STAA $00BC ; A=? BTST7B $0002,#$80 BPL @32 ; N=$0002 LDAA xD2F8 PSHA ; A=xD2F8 LDAA xD2F9 BRA @33 ; A=xD2F9 @32 LDAA $0056 LDX #xD4B5 ; A=$0056 JSR xFB49 ; A=$0056 X=#xD4B5 PSHA ; A=? LDAA $00BE LDX #xD4C7 ; A=$00BE JSR xFB49 ; A=$00BE X=#xD4C7 @33 LDAB $00BC ; A=? MUL ; A=? B=$00BC ADCA #$00 ; A=? STAA $00BC ; A=? LDAA $00BE LDX #xD4C2 ; A=$00BE JSR xFB49 ; A=$00BE X=#xD4C2 PULB ; A=? SUMBA ; A=? B=? STAA $0058 ; A=? LDAA $0056 LDX #xD4CC ; A=$0056 JSR xFB49 ; A=$0056 X=#xD4CC LDAB $00B0 ; A=? MUL ; A=? B=$00B0 BTST7B $0002,#$80 ; A=? BPL @34 ; A=? N=$0002 SUMA xD2FA ; A=? @34 STAA $00B0 ; A=? STAA $0458 ; A=? LDAA $0008 ANDA #$02 ; A=$0008 LDAB $000E ; A=$0008 ANDB #$40 ; A=$0008 B=$000E ABA ; A=$0008 B=$000E BEQ @35 ; A=? CMPA #$42 ; A=? BEQ @35 LDAA $00BC BEQ @36 DEC $00BC BRA @36 @35 LDAA $0056 CMPA xD2F4 ; A=$0056 BHI @37 @36 CLR $00AF LDAA $00BF CMPA $0058 ; A=$00BF BLS @42 CLR $00BC BRA @42 @37 LDAA $00AF CMPA $00B0 ; A=$00AF BCS @38 ; A=$00AF CLRA BRA @39 ; A=#0 @38 INCA ; A=$00AF @39 STAA $00AF ; A=? BNE @42 LDAA $00A4 BTSTB $0008,#$02 ; A=$00A4 BNE @40 ; A=$00A4 CMPA xD2C4 ; A=$00A4 BEQ @41 ; A=$00A4 INCA ; A=$00A4 BRA @41 ; A=? @40 CMPA xD2C3 ; A=$00A4 BEQ @41 ; A=$00A4 DECA ; A=$00A4 @41 STAA $00A4 ; A=? @42 LDAA $00BC BTSTB $000E,#$40 ; A=$00BC BEQ @43 ; A=$00BC LDAA $00A4 SUBA $00BC ; A=$00A4 BCC @44 ; A=? CLRA BRA @44 ; A=#0 @43 SUMA $00A4 ; A=#0,$00BC @44 SUBA #$80 ; A=? STAA $00B1 ; A=? LDAA $0000 LDAB $0009 ; A=$0000 BITA #$10 ; A=$0000 B=$0009 BEQ @45 ; B=$0009 ANDB #$FD ; B=$0009 BRA @47 ; B=$0009 @45 BITB #$01 ; B=$0009 BNE @48 ; B=$0009 BTSTA $0881,#$20 ; B=$0009 BEQ @46 ; B=$0009 BTST7A $0001,#$80 BMI @48 ; N=$0001 LDAB $0095 INCB ; B=$0095 CMPB xD55C ; B=? BLS @49 ; B=? LDAA $0046 LDAB $0009 ; A=$0046 CMPA #$28 ; A=$0046 B=$0009 BCC @46 ; B=$0009 ORAB #$02 ; B=$0009 @46 ORAB #$01 ; B=$0009 @47 STAB $0009 ; B=$0009 @48 CLRB @49 STAB $0095 ; B=? JMP xDDDE xE049 LDAA $0801 LDAB $000F ; A=$0801 ANDB #$E7 ; A=$0801 B=$000F BITA #$10 ; A=$0801 B=$000F BEQ @0 ; A=$0801 B=$000F ORAB #$10 ; A=$0801 B=$000F @0 BIT7A #$80,TSTA ; A=$0801 B=$000F BMI @1 ; B=$000F N=$0801 ORAB #$08 ; B=$000F @1 STAB $000F ; B=$000F LDAB $0002 LDAA $000F ; B=$0002 BITB #$20 ; A=$000F B=$0002 BEQ @2 ; A=$000F LDAB $001C ; A=$000F CMPB xD5D5 ; A=$000F B=$001C BLS @2 ; A=$000F LDAB $00DF ; A=$000F BITB #$08 ; A=$000F B=$00DF BNE @2 ; A=$000F B=$00DF ORAB #$08 ; A=$000F B=$00DF STAB $00DF ; A=$000F B=$00DF ANDA #$FE ; A=$000F BRA @3 ; A=$000F @2 BITA #$01 ; A=$000F BNE @6 ; A=$000F BITA #$02 ; A=$000F BNE @4 ; A=$000F BTSTB $0000,#$20 ; A=$000F BEQ @6 ; A=$000F @3 ORAA #$02 ; A=$000F STAA $000F ; A=$000F MOVB xD5CE,$00FD ; A=$000F CLRB ; A=$000F STAB $00CB ; A=$000F B=#0 @4 LDAB $00FD ; A=$000F BEQ @5 ; A=$000F RTS @5 ORAA #$01 ; A=$000F STAA $000F ; A=$000F @6 BTSTB $0000,#$10 BNE @7 BTST7B $0001,#$80 BMI @10 ; N=$0001 @7 LDAA xD5C3 @8 STAA $00D1 ; A=? LDAB xD5C2 BTSTA $0014,#$10 ; B=xD5C2 BNE @9 ; B=xD5C2 STAB $00CB ; B=xD5C2 @9 JMP @39 @10 LDAA $00D1 BEQ @11 ; A=$00D1 DECA ; A=$00D1 BRA @8 ; A=? @11 LDAB $0005 LDAA xD008 ; B=$0005 BEQ @13 ; B=$0005 LDAA $00E3 ; B=$0005 CMPA xD5BE ; A=$00E3 B=$0005 BLS @12 ; A=$00E3 B=$0005 ORAB #$04 ; B=$0005 BRA @14 ; B=$0005 @12 CMPA xD5BF ; A=$00E3 B=$0005 BCC @14 ; B=$0005 LDAA $0049 ; B=$0005 CMPA xD5C0 ; A=$0049 B=$0005 BLS @14 ; B=$0005 @13 ANDB #$FB ; B=$0005 @14 STAB $0005 ; B=$0005 LDAB $000F BITB #$04 ; B=$000F BNE @15 ; B=$000F ORAB #$04 ; B=$000F STAB $000F ; B=$000F JSR xFD18 LDX #xD606 ; A=? B=? JSR xFB45 ; A=? B=? X=#xD606 STAA $00E4 ; A=? SUMA xD5C1 ; A=? STAA $00C1 ; A=? @15 LDAA $000F LDAB $0008 ; A=$000F BITB #$08 ; A=$000F B=$0008 BEQ @17 ; A=$000F B=$0008 LDX xD5D3 ; A=$000F B=$0008 CPX $00C2 ; A=$000F B=$0008 X=xD5D3 BCS @16 ; A=$000F B=$0008 X=xD5D3 STX $00C2 ; A=$000F B=$0008 X=xD5D3 ORAB #$20 ; A=$000F B=$0008 STAB $0008 ; A=$000F B=$0008 @16 ORAA #$40 ; A=$000F STAA $000F ; A=$000F @17 LDAB xD5C5 ; A=$000F BIT7A #$80,TSTA ; A=$000F B=xD5C5 BMI @18 ; A=$000F B=xD5C5 N=$000F LDAB xD5C4 ; A=$000F @18 CMPB $001F ; A=$000F B=xD5C4,xD5C5 BCC @19 ; A=$000F BIT7A #$80,TSTA ; A=$000F BPL @20 ; A=$000F N=$000F ANDA #$7F ; A=$000F ORAA #$40 ; A=$000F STAA $000F ; A=$000F BRA @20 @19 ORAA #$80 ; A=$000F ANDA #$BF ; A=$000F STAA $000F ; A=$000F JSR xFD18 LDX #xD60A ; A=? B=? JSR xFB45 ; A=? B=? X=#xD60A LDAB $00C4 ; A=? CBA ; A=? B=$00C4 BCS @20 ; A=? CLRB ; A=? STD $00C4 ; A=? B=#0 @20 LDAB xD5F1 BTSTA $000F,#$10 ; B=xD5F1 BEQ @21 ; B=xD5F1 LDAB xD5F0 @21 LDAA $0049 ; B=xD5F0,xD5F1 DIFA xD5EF ; A=$0049 B=xD5F0,xD5F1 MUL ; A=? B=xD5F0,xD5F1 ASLD ; A=? B=? BCS @22 ; A=? B=? ASLD ; A=? B=? BCS @22 ; A=? B=? ASLD ; A=? B=? BCS @22 ; A=? STAA $00C8 ; A=? CMPA $00C6 ; A=? BLS @24 ; A=? CMPA xD5F2 ; A=? BCS @23 ; A=? @22 LDAA xD5F2 @23 CLRB ; A=? STD $00C6 ; A=? B=#0 BSETA $000F,#$40 @24 LDX #xD5F5 LDAA $00E3 ; X=#xD5F5 JSR xFB49 ; A=$00E3 X=#xD5F5 BTSTB $00DE,#$20 ; A=? BNE @27 ; A=? LDAB $005F ; A=? CMPB xD5D7 ; A=? B=$005F BLS @28 ; A=? LDAB xD5D8 ; A=? CMPB $00C2 ; A=? B=xD5D8 BCS @25 ; A=? B=xD5D8 STAB $00C2 ; A=? B=xD5D8 CLR $00C3 ; A=? @25 LDAB $00DE ; A=? ORAB #$20 ; A=? B=$00DE STAB $00DE ; A=? B=$00DE BITB #$10 ; A=? B=$00DE BEQ @26 ; A=? LDAB xD303 ; A=? SUMB $00C2 ; A=? B=xD303 STAB $00C2 ; A=? B=? @26 BSETB $000F,#$40 ; A=? @27 DIFA xD5D8 ; A=? @28 TAB ; A=? SUBA $00CC ; A=? B=? BCC @29 ; A=? B=? STAB $00CC ; B=? CLRA @29 STAA $00CE ; A=? BTSTB $00DE,#$10 BEQ @30 LDAA xD303 CLRB ; A=xD303 CMPA $00C2 ; A=xD303 B=#0 BLS @30 ; A=xD303 B=#0 STD $00C2 ; A=xD303 B=#0 @30 LDAA $00CF LDAB $000F ; A=$00CF BIT7B #$80 ; A=$00CF B=$000F N=$000F BPL @31 ; A=$00CF B=$000F N=$000F LDAA xD5C5 ; B=$000F SUMA xD5CD ; A=xD5C5 B=$000F @31 CMPA $001F ; A=? B=$000F BHI @32 ; B=$000F ANDB #$DF ; B=$000F BRA @33 ; B=$000F @32 ORAB #$20 ; B=$000F @33 LDAA $00E4 ; B=$000F STAB $000F ; A=$00E4 B=$000F BITB #$08 ; A=$00E4 B=$000F BEQ @35 ; A=$00E4 CMPA $00C1 ; A=$00E4 BLS @34 ; A=$00E4 STAA $00C1 ; A=$00E4 @34 LDAA $00C1 @35 BTSTB $0005,#$04 ; A=$00C1,$00E4 BNE @38 ; A=$00C1,$00E4 LDAB $000F ; A=$00C1,$00E4 ADDA $00CE ; A=$00C1,$00E4 B=$000F BCS @36 ; A=? B=$000F ADDA $00C2 ; A=? B=$000F BCS @36 ; A=? B=$000F ADDA $00C4 ; A=? B=$000F BCS @36 ; A=? B=$000F ADDA $00C6 ; A=? B=$000F BCS @36 ; A=? B=$000F ADDA $00CD ; A=? B=$000F BCS @36 ; A=? B=$000F BITB #$08 ; A=? B=$000F BEQ @37 ; A=? B=$000F ADDA xD5D6 ; A=? B=$000F BCC @37 ; A=? B=$000F @36 LDAA #$FF ; B=$000F @37 BITB #$10 ; A=? B=$000F BEQ @38 ; A=? DIFA xD5D9 ; A=? @38 STAA $00CB ; A=? STAA $00CB ; A=? @39 BTSTA $0000,#$02 BEQ @40 JSR $5803 @40 RTS xE243 LDS #$00DC JSR xFD39 MOVX #$0000A,$BC3C LDX #$BC00 CLRD ; X=#$BC00 @0 STD $00(X) ; A=#0 B=#0 X=? INX ; A=#0 B=#0 X=? INX ; A=#0 B=#0 X=? CPX #$BC38 ; A=#0 B=#0 X=? BNE @0 ; A=#0 B=#0 X=? MOVX #$0199,$BC0C LDX #$00D2 @1 CLR $00(X) ; X=? DEX ; X=? CPX #$0FFFF ; X=? BNE @1 ; X=? BTSTA xD006,#$40 BEQ @2 BSETA $000F,#$01 @2 LDAB $0880 STAB $0880 ; B=$0880 BMI @3 ; N=$0880 JSR xFD2C CMPA $00EA ; A=? BEQ @5 @3 LDX #$00FF @4 CLR $00(X) ; X=? DEX ; X=? CPX #$00DC ; X=? BNE @4 ; X=? MOVA xD5CF,$00E4 MOVA xD5C2,$00FD BCLRA $000F,#$01 JSR xFDBD BSETA $0008,#$40 @5 LDAA $00E4 SUMA xD5C1 ; A=$00E4 STAA $00C1 ; A=? BCLRA $00DF,#$3F LDX $5800 CPX #$07E58 ; X=$5800 BNE @6 JSR $5815 @6 MOVX #$0E000,$0055 LDX #$0D004 JSR xE403 ; X=#$D004 SUBD xD000 ; A=? B=? BNE @7 LDAA xD004 CMPA #$42 ; A=xD004 BEQ @9 @7 LDAA xD004 CMPA #$AA ; A=xD004 BEQ @9 JSR xFBF4 BSETA $0014,#$10 BSETA $00E2,#$10 JSR xFD2C STAA $00EA ; A=? LDAA #$0C JSR xFEFE ; A=#$0C @8 CMPA #$99 ; A=? BCC @8 ; A=? @9 MOVX #$0B92A,$BC3C LDAA #$05 JSR xFEFE ; A=#$05 STAA $002C ; A=? STAA $0029 ; A=? SUBA #$1A ; A=? LDAB #$97 ; A=? JSR xFC20 ; A=? B=#$97 STAA $0026 ; A=? STAA $002F ; A=? JSR xFC7F LDAA $00E3 PSHA ; A=$00E3 JSR xFD3A STAA $0024 ; A=? PULB ; A=? CMPB xD300 ; A=? B=? BCC @10 ; A=? CMPA xD301 ; A=? BCC @10 BSETB $00DE,#$10 @10 JSR xFC8A STAA $0021 ; A=? STAA $0022 ; A=? LDAA xD28D STAA $003F ; A=xD28D STAA $003E ; A=xD28D STAA $0041 ; A=xD28D STAA $0043 ; A=xD28D LDAA #$0B JSR xFEFE ; A=#$0B STAA $0048 ; A=? MOVA xD289,$004F JSR xFCD8 STAA $004B ; A=? STAA $004A ; A=? STAA $004D ; A=? JSR xFEFC STAA $0045 ; A=? MOVD $BC06,$0092 MOVA $00FD,$00CB LDAA $00DE BITA #$04 ; A=$00DE BNE @11 ; A=$00DE BSETB $0009,#$01 ; A=$00DE @11 ANDA #$FB ; A=$00DE STAA $00DE ; A=$00DE LDAA xD2AA STAA $00A5 ; A=xD2AA STAA $00B6 ; A=xD2AA MOVA #$0E,$0070 LDAA #$80 STAA $0071 ; A=#$80 STAA $00A3 ; A=#$80 MOVA #$14,$007B MOVA #$A0,$0037 LDX #$00ED LDAA xD2BB ; X=#$00ED LDAB xD2BC ; A=xD2BB X=#$00ED @12 CMPA $00(X) ; A=xD2BB B=xD2BC X=? BCC @13 ; A=xD2BB B=xD2BC X=? STAA $00(X) ; A=xD2BB B=xD2BC X=? @13 CMPB $00(X) ; A=xD2BB B=xD2BC X=? BLS @14 ; A=xD2BB B=xD2BC X=? STAB $00(X) ; A=xD2BB B=xD2BC X=? @14 INX ; A=xD2BB B=xD2BC X=? CPX #$00FC ; A=xD2BB B=xD2BC X=? BLS @12 ; A=xD2BB B=xD2BC X=? JSR xFF03 BCC @16 CLRA JSR xFEFE ; A=#0 CMPA #$A0 ; A=? BLS @16 JSR xFEFC CMPA #$64 ; A=? BCC @16 BSETA $0007,#$01 LDAA #$CC STAA $0021 ; A=#$CC STAA $0023 ; A=#$CC LDX #$00DC TXS ; X=#$00DC LDAA #$AA ; X=#$00DC @15 INX ; A=#$AA X=? STAA $00(X) ; A=#$AA X=? CPX #$00FF ; A=#$AA X=? BCS @15 ; A=#$AA X=? MOVX #$0E000,$0055 LDX #$0D000 BSR xE403 ; X=#$D000 STD $0016 ; A=? B=? X=? MOVA #$F0,$0055 ; X=? BSR xE403 ; X=? STD $0012 ; A=? B=? X=? CLR $0055 ; X=? BSR xE403 ; X=? STD $0014 ; A=? B=? @16 LDX $BC38 JMP xE55B xE403 CLRD ; X=? STX $0051 ; A=#0 B=#0 X=? @0 INC $0052 ; A=? B=? X=? BPL @1 ; A=? B=? X=? N=$0052 CLR $0052 ; A=? B=? PSHA ; A=? B=? PSHB ; B=? LDD $BC3C EORB #$04 ; B=$BC3D BSR xE426 STD $BC3C ; A=? B=? X=? PULB ; X=? PULA ; B=? X=? @1 ADDB $00(X) ; A=? B=? X=? ADCA #$00 ; A=? B=? X=? INX ; A=? B=? X=? CPX $0055 ; A=? B=? X=? BNE @0 ; A=? B=? X=? xE426 RTS xE427 RTI xE428 LDD $BC38 BITA #$10 ; A=$BC38 BNE @0 ; A=$BC38 RTI @0 TSX ; A=$BC38 CPX #$00D6 ; A=$BC38 X=? BEQ @1 ; A=$BC38 BSETB $0000,#$01 ; A=$BC38 @1 LDS #$00DC ; A=$BC38 LDAB $0002 ; A=$BC38 BITA #$08 ; A=$BC38 B=$0002 BEQ @2 ; A=$BC38 B=$0002 ORAB #$04 ; A=$BC38 B=$0002 @2 BITA #$20 ; A=$BC38 B=$0002 BEQ @3 ; B=$0002 ORAB #$01 ; B=$0002 @3 STAB $0002 ; B=$0002 BTSTA $0000,#$10 ; B=$0002 BEQ @4 ; B=$0002 ANDB #$FB ; B=$0002 STAB $0002 ; B=$0002 @4 LDAA $0007 ASRA ; A=$0007 BCS @5 BTSTA $0014,#$10 BNE @6 @5 LDAA #$BF JSR xFBF6 ; A=#$BF LDAA #$40 JSR xFC01 ; A=#$40 @6 LDX $00EB LDAA $0070 ; X=$00EB INCA ; A=$0070 X=$00EB CMPA #$A0 ; A=? X=$00EB BNE @9 ; A=? X=$00EB BCHGB $0007,#$20 ; X=$00EB LDAA $00DE ; X=$00EB BTST7B $0001,#$80 ; A=$00DE X=$00EB BMI @7 ; A=$00DE X=$00EB N=$0001 CLR $005F ; A=$00DE ANDA #$DF ; A=$00DE BRA @8 ; A=$00DE @7 INC $005F ; A=$00DE X=$00EB INX ; A=$00DE X=$00EB STX $00EB ; A=$00DE X=? CPX xD304 ; A=$00DE X=? BCS @8 ; A=$00DE ANDA #$EF ; A=$00DE @8 STAA $00DE ; A=$00DE CLRA @9 STAA $0070 ; A=? ANDA #$1F ; A=? BNE @10 BTSTB $0000,#$02 BEQ @10 JSR $580F @10 LDAA $0007 ASRA ; A=$0007 JCS xFE69 LDD #$0501 JSR xFBCE ; A=#$05 B=#$01 JSR xEC56 LDAA $0002 ASRA ; A=$0002 BCC @11 ; A=? ASLA ; A=? STAA $0002 ; A=? BRA @13 @11 LDAB $0037 INCB ; B=$0037 CMPB #$9F ; B=? BLS @12 ; B=? BCLRB $0001,#$10 LDAB #$9F @12 STAB $0037 ; B=? BRA @15 @13 LDAB $0001 BITB #$10 ; B=$0001 BNE @14 ; B=$0001 ORAB #$10 ; B=$0001 STAB $0001 ; B=$0001 LDX $BC02 INX ; X=$BC02 STX $003C ; X=? INX ; X=? STX $003A ; X=? @14 CLR $0037 MOVX $003A,$0038 MOVX $003C,$003A MOVX $BC02,$003C @15 BTSTA $0000,#$02 BEQ @16 JSR $581B @16 JSR xFBDB STAA $002D ; A=? BTSTB $0014,#$10 BEQ @17 LDAA $0070 ASRA ; A=$0070 BCS xE531 JMP xEA7B @17 LDAA $0070 ASRA ; A=$0070 BCS @18 JSR xE049 BRA xE57F @18 LDAA $0881 BTSTB $0002,#$08 ; A=$0881 BNE @19 ; A=$0881 EORA #$08 ; A=$0881 @19 STAA $0881 ; A=$0881 JMP xD617 xE531 LDAA $0070 ASRA ; A=$0070 BCC @0 LDAA #$FB JSR xFBF6 ; A=#$FB @0 LDAB $0070 ANDB #$0F ; B=$0070 LDX #xE55E ; B=$0070 ASLB ; B=$0070 X=#xE55E ABX ; B=? X=#xE55E LDX $00(X) ; X=? JSR $00(X) ; X=$00(X) xE548 LDAA $0001 BITA #$04 ; A=$0001 BNE xE55B ; A=$0001 ORAA #$04 ; A=$0001 STAA $0001 ; A=$0001 MOVB $0070,$00DD ; A=$0001 CLI ; A=$0001 ANDA #$FB ; A=$0001 STAA $0001 ; A=$0001 xE55B CLI BRA xE55B xE55E DC.W xEA9C DC.W xEB30 DC.W xEB36 DC.W xEB59 DC.W xECF8 DC.W xEF07 DC.W xFDEA DC.W xF223 DC.W xF497 DC.W xFDF4 DC.W xFE09 DC.W xF025 DC.W xFE13 DC.W xF4DE DC.W xFE0E DC.W xED13 @0 RTS ; !A= !B= !X= !Y= !N= xE57F JSR xFA59 LDAB #$97 LDAA $00FE ; B=#$97 SUBA $002C ; A=$00FE B=#$97 BHI @0 ; A=? B=#$97 LDAA #$01 ; B=#$97 CLC ; A=#$01 B=#$97 @0 JSR xFC1C ; A=? B=#$97 NEGA ; A=? STAA $0031 ; A=? LDAB #$97 LDAA $002C ; B=#$97 SUBA #$1A ; A=$002C B=#$97 JSR xFC1C ; A=? B=#$97 STAA $0026 ; A=? LDAB $0009 ANDB #$F7 ; B=$0009 BITB #$04 ; B=$0009 BNE @2 ; B=$0009 LDAA $002D ; B=$0009 CMPA xD53B ; A=$002D B=$0009 BCC @2 ; B=$0009 LDAA $008E ; B=$0009 CMPA xD53D ; A=$008E B=$0009 BHI @3 ; B=$0009 LDAA $001A ; B=$0009 CMPA xD53C ; A=$001A B=$0009 BCS @1 ; B=$0009 LDAA $0049 ; B=$0009 CMPA xD53E ; A=$0049 B=$0009 BLS @2 ; B=$0009 @1 INC $008E ; B=$0009 BRA @4 ; B=$0009 @2 CLR $008E ; B=$0009 BRA @4 ; B=$0009 @3 BSETA $0013,#$08 ; B=$0009 ORAB #$08 ; B=$0009 @4 STAB $0009 ; B=$0009 BTSTA $0002,#$04 BEQ @12 LDD $0062 LSRD ; A=$0062 B=$0063 LSRD ; A=? B=? LSRD ; A=? B=? COMA ; A=? B=? COMB ; A=? B=? ADDD $0062 ; A=? B=? BPL @5 ; A=? B=? N=? CLRD @5 STD $0062 ; A=? B=? CLR $0072 LDAA $0001 BIT7A #$80 ; A=$0001 N=$0001 BPL @6 ; A=$0001 N=$0001 BITA #$40 ; A=$0001 BEQ @16 LDX $0068 CPX #$0FEF0 ; X=$0068 BHI @16 ; X=$0068 LDAB xD01D ; X=$0068 LDAA #$FF ; B=xD01D X=$0068 JSR xFB12 ; A=#$FF B=xD01D X=$0068 BRA @11 ; A=? B=? @6 LDAB $0000 BITB #$08 ; B=$0000 BEQ @13 ; B=$0000 LDD xD00A SUBD $BC00 ; A=xD00A B=xD00A+1 BLS @7 LDAA $005B CMPA xD017 ; A=$005B BCC @9 ; A=$005B INCA ; A=$005B BRA @8 ; A=? @7 CLRA @8 STAA $005B ; A=? BRA @14 @9 BSETA $0001,#$80 CLR $005B LDAA xD2C6 CMPA $0049 ; A=xD2C6 BHI @10 BSETA $000E,#$01 @10 BSETA $00DE,#$08 CLRD @11 STD $0068 ; A=? B=? BRA @16 @12 LDAA $0072 LDAB $0001 ; A=$0072 CMPA #$17 ; A=$0072 B=$0001 BCS @15 ; A=$0072 B=$0001 ANDB #$7F ; B=$0001 STAB $0001 ; B=$0001 JMP xEA8E @13 ORAB #$08 ; B=$0000 STAB $0000 ; B=$0000 @14 JMP xEA7B @15 BIT7B #$80,TSTB ; A=$0072 B=$0001 BPL @14 ; A=$0072 N=$0001 INCA ; A=$0072 STAA $0072 ; A=? @16 LDAA #$04 JSR xFC01 ; A=#$04 JSR xFD39 MOVD $BC00,$0018 LDX #$0018 LDAA xD016 ; X=#$0018 LDAB #$20 ; A=xD016 X=#$0018 MUL ; A=xD016 B=#$20 X=#$0018 TBA ; B=? X=#$0018 BEQ @17 ; A=? X=#$0018 JSR xFBB9 ; A=? X=#$0018 STD $0018 ; A=? B=? @17 LDD $0018 ASLD ; A=$0018 B=$0019 STD $0053 ; A=? B=? LDD #$0133 JSR xFB92 ; A=#$01 B=#$33 STD $0051 ; A=? B=? CMPA #$60 ; A=? B=? BLS @23 ; A=? B=? TSTB ; A=? B=? BPL @18 ; A=? N=? INCA ; A=? BEQ @20 ; A=? @18 CMPA #$90 ; A=? BHI @19 ; A=? ADDA #$40 ; A=? BRA @24 ; A=? @19 CMPA #$BF ; A=? BLS @21 ; A=? @20 LDAA #$FF BRA @22 ; A=#$FF @21 ADDA #$40 ; A=? @22 STAA $001A ; A=? LDAA #$D0 BRA @25 ; A=#$D0 @23 ASLD ; A=? B=? ADDD #$0080 ; A=? B=? DIFA #$20 ; A=? @24 STAA $001A ; A=? @25 STAA $001B ; A=? LDD $0051 ADDD #$0080 ; A=$0051 B=$0052 BCC @26 ; A=? LDAA #$FF @26 STAA $001C ; A=? LDD $0051 ASLD ; A=$0051 B=$0052 BCS @27 ; A=? B=? ADDD #$0080 ; A=? B=? BCC @28 ; A=? @27 LDAA #$FF @28 LDX $001D ; A=? BNE @29 ; A=? X=$001D CLRB ; A=? BRA @30 ; A=? B=#0 @29 LDAB xD01E ; A=? X=$001D JSR xFB12 ; A=? B=xD01E X=$001D @30 STD $001D ; A=? B=? ASLB ; A=? B=? ADCA #$00 ; A=? STAA $001F ; A=? MOVX $BC00,$0051 LDAA #$FF LDAB $0026 ; A=#$FF SUBB $0028 ; A=#$FF B=$0026 BCS @31 ; A=#$FF B=? CMPB #$20 ; A=#$FF B=? BCC @32 ; A=#$FF B=? @31 LDD $0060 SUBD $0051 ; A=$0060 B=$0061 ASLD ; A=? B=? SUBD $0062 ; A=? B=? BMI @33 ; A=? B=? N=? ADDD $0062 ; A=? B=? @32 STD $0062 ; A=? B=? @33 LDD $0051 LSRD ; A=$0051 B=$0052 LSRD ; A=? B=? LSRD ; A=? B=? SUBD $0062 ; A=? B=? BCC @34 ; A=? B=? ADDD $0062 ; A=? B=? STD $0062 ; A=? B=? @34 LDD $0051 STD $0060 ; A=$0051 B=$0052 LSRD ; A=$0051 B=$0052 SUBD #$00E5 ; A=? B=? BCC @35 ; A=? B=? ADDD #$0134 ; A=? B=? BRA @37 ; A=? B=? @35 LSRD ; A=? B=? SUBD #$0127 ; A=? B=? BCS @36 ; A=? B=? ADDD #$017E ; A=? B=? BRA @37 ; A=? B=? @36 ADDD #$05F7 ; A=? B=? LSRD ; A=? B=? LSRD ; A=? B=? @37 STD $0051 ; A=? B=? LDAA #$78 DIFA $0045 ; A=#$78 LDAB #$04 ; A=? MUL ; A=? B=#$04 ADDD $0051 ; A=? B=? ADDD $0062 ; A=? B=? STD $0064 ; A=? B=? LDD $BC00 SUBD #$0027 ; A=$BC00 B=$BC01 SUBD $0064 ; A=? B=? BCC @38 ; A=? B=? ADDD $0064 ; A=? B=? STD $0064 ; A=? B=? @38 MOVB $0027,$0028 MOVB $0026,$0027 LDX #xD032 LDAB $0026 ; X=#xD032 LDAA $001B ; B=$0026 X=#xD032 JSR xFB67 ; A=$001B B=$0026 X=#xD032 LDAB $001C ; A=? CMPB #$90 ; A=? B=$001C BLS @40 ; A=? B=$001C CMPB xD00C ; B=$001C BLS @39 ; B=$001C LDAB xD00C @39 SUBB #$90 ; B=xD00C,$001C ASLB ; B=? LDAA xD00D ; B=? MUL ; A=xD00D B=? SUMA $0051 ; A=? @40 TAB ; A=? CLRA ; B=? STD $0057 ; A=#0 B=? LDAA $0021 CMPA #$A0 ; A=$0021 BLS @41 ; A=$0021 LSRA ; A=$0021 ADCA #$00 ; A=? ADDA #$50 ; A=? @41 LDX #xD107 ; A=? LDAB $0031 ; A=? X=#xD107 LSRB ; A=? B=$0031 X=#xD107 JSR xFB67 ; A=? B=? X=#xD107 PSHA ; A=? CLRA LDAB xD1BA ; A=#0 TST $0006 ; A=#0 B=xD1BA BPL @42 ; A=#0 B=xD1BA N=$0006 LDAA $007F LDX #xD146 ; A=$007F JSR xFB49 ; A=$007F X=#xD146 LDAB xD1BB ; A=? @42 LDX $006A ; A=? B=xD1BB,xD1BA JSR xFB12 ; A=? B=xD1BB,xD1BA X=$006A STD $006A ; A=? B=? ASLB ; A=? B=? ADCA #$00 ; A=? PSHA ; A=? LDAB $000A BIT7B #$80 ; B=$000A N=$000A BPL @44 ; B=$000A N=$000A BITB #$60 ; B=$000A BNE @44 BTSTB $000D,#$20 BNE @43 JSR xFDCB BRA @44 @43 LDX #xD15D LDAA $001C ; X=#xD15D LDAB #$20 ; A=$001C X=#xD15D JSR xFB37 ; A=$001C B=#$20 X=#xD15D SUBA $006E ; A=? BHI @45 ; A=? @44 CLRA @45 PSHA ; A=? CLRB BTSTA $0002,#$20 ; B=#0 BEQ @46 ; B=#0 LDAB xD023 @46 LDX $0057 ; B=xD023,#0 ABX ; B=xD023,#0 X=$0057 PULB ; X=? ABX ; B=? X=? PULB ; X=? ABX ; B=? X=? PULB ; X=? ABX ; B=? X=? LDAB $00E7 ; X=? ABX ; B=$00E7 X=? STX $0057 ; X=? CLRB LDAA $0036 ; B=#0 CMPA xD024 ; A=$0036 B=#0 BLS @47 ; B=#0 BTST7A $000A,#$80 ; B=#0 BPL @47 ; B=#0 N=$000A LDAB $0078 CMPB xD025 ; B=$0078 BCC @48 ; B=$0078 LDAA $0070 ; B=$0078 CMPA #$08 ; A=$0070 B=$0078 BNE @47 ; B=$0078 INCB ; B=$0078 @47 STAB $0078 ; B=? CLRA BRA @49 ; A=#0 @48 LDAA $0031 LSRA ; A=$0031 LDAB #$30 ; A=? LDX #xD157 ; A=? B=#$30 JSR xFB45 ; A=? B=#$30 X=#xD157 @49 TAB ; A=? CLRA ; B=? ADDD $0057 ; A=#0 B=? SUBB xD014 ; A=? B=? SBCA #$00 ; A=? B=? SUBB xD015 ; A=? B=? SBCA #$00 ; A=? B=? STD $0051 ; A=? B=? BTSTA $0000,#$02 BEQ @50 JSR $580C @50 LDD $0051 SUBB xD009 ; A=$0051 B=$0052 SBCA #$00 ; A=$0051 B=? STD $0066 ; A=? B=? LDD xD019 SUBD $0066 ; A=xD019 B=xD019+1 BGT @51 ; A=? B=? ADDD $0066 ; A=? B=? STD $0066 ; A=? B=? @51 BTSTA xD006,#$01 BEQ @55 BTSTA $0002,#$30 BNE @55 LDAA $00E3 CMPA xD02D ; A=$00E3 BHI @55 LDAB $0006 BITB #$02 ; B=$0006 BEQ @53 ; B=$0006 DEC $0079 ; B=$0006 BNE @52 ; B=$0006 ANDB #$FD ; B=$0006 STAB $0006 ; B=$0006 @52 LDAA $0021 LDAB #$80 ; A=$0021 LDX #xD166 ; A=$0021 B=#$80 JSR xFB37 ; A=$0021 B=#$80 X=#xD166 LDD $0066 SUBB $0051 ; A=$0066 B=$0067 SBCA #$00 ; A=$0066 B=? STD $0066 ; A=? B=? BRA @54 @53 LDAA $0026 CMPA xD02E ; A=$0026 BCC @55 LDAB $0049 CMPB xD02F ; B=$0049 BCC @55 ; B=$0049 SUBB $004A ; B=$0049 BCS @55 ; B=? CMPB xD030 ; B=? BCS @55 BSETB $0006,#$02 MOVA xD031,$0079 @54 CLR $008F @55 LDD $BC0A STD $0052 ; A=$BC0A B=$BC0B SUBD $0073 ; A=$BC0A B=$BC0B TSTA ; A=? B=? BEQ @56 ; B=? LDAB #$FF @56 LDX $00EB ; B=? CPX xD54A ; B=? X=$00EB BLS @57 ; B=? CMPB xD555 ; B=? BLS @58 ; B=? BSETA $000A,#$80 ; B=? @57 CLR $008F ; B=? @58 MOVX $0052,$0073 ; B=? BTSTA $0006,#$02 ; B=? BNE @59 ; B=? LDAA $00E3 ; B=? CMPA xD02D ; A=$00E3 B=? BCS @60 ; B=? @59 CLRA BRA @69 ; A=#0 @60 LDAA $0034 ; B=? CMPA xD02B ; A=$0034 B=? BCC @61 ; B=? LDAA $001D ; B=? CMPA xD02C ; A=$001D B=? BCS @70 ; B=? @61 LDAA $0045 ; B=? CMPA #$5A ; A=$0045 B=? BCS @62 ; B=? BTSTA $000A,#$60 ; B=? BEQ @63 ; B=? @62 LDAA xD54D BRA @69 ; A=xD54D @63 PSHB ; B=? LDX #xD18D JSR xFDDA ; X=#xD18D PULB ; A=? MUL ; A=? B=? ASLD ; A=? B=? BCS @64 ; A=? ADDA $0077 ; A=? BCC @65 ; A=? @64 LDAA #$FF @65 PSHA ; A=? BTSTB $000D,#$20 BEQ @66 LDX #xD17F JSR xFDDA ; X=#xD17F BRA @68 ; A=? @66 LDAA #$FF BTSTB $0009,#$48 ; A=#$FF BNE @67 ; A=#$FF LDAA $0031 @67 LSRA ; A=$0031,#$FF LDAB #$40 ; A=? LDX #xD188 ; A=? B=#$40 JSR xFB45 ; A=? B=#$40 X=#xD188 @68 PULB ; A=? CBA ; A=? B=? BLS @69 ; A=? B=? TBA ; B=? @69 STAA $0077 ; A=? LSRA ; A=? STAA $0051 ; A=? LDD $0066 SUBB $0051 ; A=$0066 B=$0067 SBCA #$00 ; A=$0066 B=? STD $0066 ; A=? B=? @70 LDD xD01B SUBD $0066 ; A=xD01B B=xD01B+1 BLT @71 ; A=? B=? ADDD $0066 ; A=? B=? STD $0066 ; A=? B=? @71 LDAA $008F BEQ @74 LDX $0066 LDAB xD553 ; X=$0066 BTSTA $000A,#$02 ; B=xD553 X=$0066 BEQ @72 ; B=xD553 X=$0066 LDAB xD554 ; X=$0066 @72 ABX ; B=xD554,xD553 X=$0066 CPX xD019 ; X=? BLS @73 ; X=? CLR $008F LDX $0066 @73 STX $0066 ; X=? @74 LDD $0066 BMI @75 ; B=$0067 N=$0066 BCLRA $0001,#$01 ; B=$0067 BRA @76 ; B=$0067 @75 BSETA $0001,#$01 ; B=$0067 NEGB ; B=$0067 @76 LDAA $0068 ; B=? TST $0069 ; A=$0068 B=? BPL @77 ; A=$0068 B=? N=$0069 INCA ; A=$0068 B=? @77 MUL ; A=? B=? INCA ; A=? BTSTB $0000,#$02 ; A=? BEQ @78 ; A=? JSR $5812 @78 LDX #$0018 ; A=? JSR xFBB9 ; A=? X=#$0018 STD $0056 ; A=? B=? LDAA $001C LDX #xD19F ; A=$001C JSR xFB36 ; A=$001C X=#xD19F STAA $0054 ; A=? BTSTB $0001,#$01 BNE @79 CLRD SUBD $0056 ; A=#0 B=#0 BRA @80 ; A=? B=? @79 LDD $0056 @80 SUBB $0054 ; A=? B=? SBCA #$00 ; A=? B=? STD $0051 ; A=? B=? CLRD SUBD $BC00 ; A=#0 B=#0 LSRD ; A=? B=? LSRD ; A=? B=? LSRD ; A=? B=? LSRD ; A=? B=? ORAA #$F0 ; A=? B=? ADDD $BC20 ; A=? B=? SUBD $0051 ; A=? B=? BMI @81 ; A=? B=? N=? ADDD $0051 ; A=? B=? STD $0051 ; A=? B=? @81 LDD $0051 SUBD $BC20 ; A=$0051 B=$0052 JSR xFD39 STD $BC28 ; A=? B=? JSR xFD39 ADDD $BC1C ; A=? B=? SUBD $0064 ; A=? B=? NOP ; A=? B=? LDX $0064 ; A=? B=? STD $BC26 ; A=? B=? JSR xFD39 STX $BC1C ; X=? JSR xFD39 MOVD $0051,$BC36 LDAA $0000 BITA #$08 ; A=$0000 BEQ @89 ; A=$0000 BTSTB $0002,#$04 ; A=$0000 BEQ @86 ; A=$0000 LDX $BC06 ; A=$0000 STX $0051 ; A=$0000 X=$BC06 BTSTB xD50E,#$01 ; A=$0000 X=$BC06 BEQ @87 ; A=$0000 X=$BC06 BTSTB $0001,#$40 ; A=$0000 X=$BC06 BNE @88 ; A=$0000 X=$BC06 LDAA $0000 ; X=$BC06 BIT7A #$80 ; A=$0000 X=$BC06 N=$0000 BMI @84 ; A=$0000 X=$BC06 N=$0000 PSHA ; A=$0000 X=$BC06 LDD $0051 ; X=$BC06 SUBD $0092 ; A=$0051 B=$0052 X=$BC06 TSTA ; A=? B=? X=$BC06 PULA ; B=? X=$BC06 BNE @82 ; A=? B=? X=$BC06 CMPB xD547 ; A=? B=? X=$BC06 BHI @82 ; A=? X=$BC06 BITA #$40 ; A=? X=$BC06 BNE @87 ; A=? X=$BC06 ORAA #$40 ; A=? X=$BC06 BRA @83 ; A=? X=$BC06 @82 LDAB $0094 ; A=? X=$BC06 CMPB xD548 ; A=? B=$0094 X=$BC06 BHI @84 ; A=? X=$BC06 INC $0094 ; A=? X=$BC06 ANDA #$BF ; A=? X=$BC06 @83 STX $0092 ; A=? X=$BC06 BRA @85 ; A=? @84 ORAA #$80 ; A=? BSETB $0013,#$01 ; A=? @85 STAA $0000 ; A=? @86 BRA xEA93 @87 BSETB $0001,#$40 ; A=? X=$BC06 CLR $0094 ; A=? X=$BC06 STX $0092 ; A=? X=$BC06 @88 ANDA #$F7 ; A=? STAA $0000 ; A=? LDD $BC2C JSR xFD39 STD $BC24 ; A=? B=? @89 LDAA $0013 ORAA #$01 ; A=$0013 BTST7B $00DE,#$80 ; A=$0013 BPL @90 ; A=$0013 N=$00DE STAA $0013 ; A=$0013 LDD $BC3C ANDB #$EF ; B=$BC3D BRA @91 @90 LDD $BC3C ORAB #$10 ; B=$BC3D @91 JSR xFD39 STD $BC3C ; A=? B=? BRA xEA93 xEA7B LDAA #$04 JSR xFC01 ; A=#$04 LDX #$0FFFF STX $0018 ; X=#$FFFF BTSTA $00DE,#$08 ; X=#$FFFF BNE xEA8E ; X=#$FFFF INX ; X=#$FFFF STX $00EB ; X=? xEA8E LDAA #$EF JSR xFBF6 ; A=#$EF xEA93 BCLRA $0002,#$04 JMP xE531 xEA9C LDAA #$02 JSR xFEFE ; A=#$02 PSHA ; A=? LDAB $0000 ; A=? CMPA #$5A ; A=? B=$0000 BCC @2 ; A=? B=$0000 CMPA #$28 ; A=? B=$0000 BCC @5 ; B=$0000 LDAA $0045 ; B=$0000 CMPA #$28 ; A=$0045 B=$0000 BCC @5 ; B=$0000 CLRA ; B=$0000 STAA $00EB ; A=#0 B=$0000 STAA $00EC ; A=#0 B=$0000 ORAA #$04 ; A=#0 B=$0000 STAA $00DE ; A=#0 B=$0000 BCLRA $0001,#$80 ; B=$0000 LDAA $00DF ; B=$0000 ANDB #$DF ; A=$00DF B=$0000 BITB #$10 ; A=$00DF B=$0000 BNE @1 ; A=$00DF B=$0000 BITA #$02 ; A=$00DF B=$0000 BEQ @0 ; A=$00DF B=$0000 PSHA ; A=$00DF B=$0000 BCLRA $000F,#$03 ; B=$0000 PULA ; B=$0000 ORAB #$20 ; A=? B=$0000 @0 ORAB #$10 ; A=? B=$0000 @1 ANDA #$FD ; A=? B=$0000 STAA $00DF ; A=? B=$0000 BRA @4 ; B=$0000 @2 BITB #$10 ; B=$0000 BEQ @3 ; B=$0000 MOVX $BC06,$0092 ; B=$0000 @3 BCLRA $00DE,#$04 ; B=$0000 ANDB #$EF ; B=$0000 ANDB #$DF ; B=$0000 @4 STAB $0000 ; B=$0000 @5 PULA STAA $0045 ; A=? LDAA #$00 JSR xFEFE ; A=#$00 LDAA $0046 ; B=? STAB $0046 ; A=$0046 B=? SBA ; A=$0046 B=? BHI @6 ; A=? CLRA @6 STAA $0047 ; A=? LDAB $0001 BIT7B #$80 ; B=$0001 N=$0001 BPL @8 ; B=$0001 N=$0001 ORAB #$08 ; B=$0001 BSETA $00DF,#$02 ; B=$0001 BRA @11 ; B=$0001 @7 BCLRA $00DE,#$04 ; B=$0001 @8 CLRA ; B=$0001 BITB #$08 ; A=#0 B=$0001 BNE @9 ; A=#0 B=$0001 LDAA $005C ; B=$0001 BEQ @10 ; A=$005C B=$0001 CMPA xD018 ; A=$005C B=$0001 BHI @7 ; A=$005C B=$0001 @9 INCA ; A=$005C,#0 B=$0001 STAA $005C ; A=? B=$0001 @10 ANDB #$F7 ; B=$0001 @11 STAB $0001 ; B=$0001 RTS xEB30 JSR xFD3A JMP xFC2D xEB36 LDAA #$0C CLRB ; A=#$0C JSR xFBCE ; A=#$0C B=#0 LDAB $0002 ; A=? ANDB #$C7 ; A=? B=$0002 CMPA #$28 ; A=? B=$0002 BCS @0 ; A=? B=$0002 CMPA #$64 ; A=? B=$0002 BCS @1 ; A=? B=$0002 CMPA #$99 ; A=? B=$0002 BCC @2 ; B=$0002 ORAB #$20 ; B=$0002 BRA @2 ; B=$0002 @0 ORAB #$10 ; B=$0002 BRA @2 ; B=$0002 @1 ORAB #$08 ; B=$0002 @2 STAB $0002 ; B=$0002 RTS xEB59 PULX LDX #xD1B3 LDAB $0006 ; X=#xD1B3 LDAA $00(X) ; B=$0006 X=#xD1B3 CMPA $00E3 ; A=$00(X) B=$0006 X=#xD1B3 BLS @7 ; B=$0006 X=#xD1B3 LDAA $06(X) ; B=$0006 X=#xD1B3 BITB #$10 ; A=$06(X) B=$0006 X=#xD1B3 BEQ @0 ; A=$06(X) B=$0006 X=#xD1B3 LDAA $05(X) ; B=$0006 X=#xD1B3 @0 CMPA $0031 ; A=$05(X),$06(X) B=$0006 X=#xD1B3 BLS @1 ; B=$0006 X=#xD1B3 ANDB #$EF ; B=$0006 BRA @6 ; B=$0006 @1 ORAB #$10 ; B=$0006 X=#xD1B3 BTSTA $0009,#$24 ; B=$0006 X=#xD1B3 BNE @4 ; B=$0006 X=#xD1B3 LDAA $04(X) ; B=$0006 X=#xD1B3 BITB #$20 ; A=$04(X) B=$0006 X=#xD1B3 BEQ @2 ; A=$04(X) B=$0006 X=#xD1B3 LDAA $03(X) ; B=$0006 X=#xD1B3 @2 CMPA $0049 ; A=$03(X),$04(X) B=$0006 X=#xD1B3 BCS @3 ; B=$0006 X=#xD1B3 ANDB #$DF ; B=$0006 BRA @6 ; B=$0006 @3 ORAB #$20 ; B=$0006 X=#xD1B3 @4 BTSTA $00DE,#$40 ; B=$0006 X=#xD1B3 BNE @9 ; B=$0006 X=#xD1B3 LDAA $02(X) ; B=$0006 X=#xD1B3 BITB #$40 ; A=$02(X) B=$0006 X=#xD1B3 BEQ @5 ; A=$02(X) B=$0006 X=#xD1B3 LDAA $01(X) ; B=$0006 X=#xD1B3 @5 CMPA $0034 ; A=$01(X),$02(X) B=$0006 BLS @8 ; B=$0006 ANDB #$BF ; B=$0006 @6 STAB $0006 ; B=$0006 @7 CLRA JMP @11 ; A=#0 @8 ORAB #$40 ; B=$0006 @9 STAB $0006 ; B=$0006 LDX #xD1C0 JSR xFA4D ; X=#xD1C0 LSRA ; A=? X=? TAB ; A=? X=? LDAA $001F ; B=? X=? CMPA #$90 ; A=$001F B=? X=? BLS @10 ; A=$001F B=? X=? LSRA ; A=$001F B=? X=? ADDA #$48 ; A=? B=? X=? CMPA #$A0 ; A=? B=? X=? BLS @10 ; A=? B=? X=? LSRA ; A=? B=? X=? ADCA #$50 ; A=? B=? X=? CMPA #$B0 ; A=? B=? X=? BLS @10 ; A=? B=? X=? LDAA #$B0 ; B=? X=? @10 JSR xFB67 ; A=? B=? X=? STAA $0058 ; A=? LDX #xD1F5 LDAA $0021 ; X=#xD1F5 LDAB #$28 ; A=$0021 X=#xD1F5 JSR xFB37 ; A=$0021 B=#$28 X=#xD1F5 BSR xEC22 ; A=? LDAA xD1BF CMPA $0049 ; A=xD1BF BCS @7 JSR xFD18 TAB ; A=? LDX #xD1FE ; B=? LDAA $0026 ; B=? X=#xD1FE LSRA ; A=$0026 B=? X=#xD1FE JSR xFB67 ; A=? B=? X=#xD1FE BSR xEC22 ; A=? LDAA $0080 CLRB ; A=$0080 PSHD ; A=$0080 B=#0 PULX LDAA $0058 ; X=? LDAB xD1BC ; A=$0058 X=? JSR xFB12 ; A=$0058 B=xD1BC X=? @11 STAA $0080 ; A=? BTSTB $0000,#$02 ; A=? BEQ @12 ; A=? JSR $5806 @12 LDAB #$A0 ; A=? MUL ; A=? B=#$A0 ADCA #$00 ; A=? LDAB $0031 ; A=? CMPB #$C0 ; A=? B=$0031 BCC xEC2D ; A=? B=$0031 CMPB #$40 ; A=? B=$0031 BHI @13 ; A=? B=$0031 LDAB #$40 ; A=? @13 NEGB ; A=? B=#$40,$0031 LSRB ; A=? B=? ADDB #$60 ; A=? B=? BRA xEC2F ; A=? B=? xEC22 LDAB $0058 ; A=? MUL ; A=? B=$0058 ASLD ; A=? B=? BCC @0 ; A=? LDAA #$FF @0 STAA $0058 ; A=? RTS xEC2D NEGB ; A=? B=$0031 ASLB ; A=? B=? xEC2F LDX #xD21D ; A=? B=? JSR xFB67 ; A=? B=? X=#xD21D STAA $007F ; A=? LDAB $0006 ANDB #$7F ; B=$0006 LDAA $0080 ; B=$0006 CMPA xD1BD ; A=$0080 B=$0006 BLS @0 ; B=$0006 LDAA $0031 ; B=$0006 CMPA xD1BE ; A=$0031 B=$0006 BHI @0 ; B=$0006 BTSTA $000A,#$01 ; B=$0006 BNE @0 ; B=$0006 ORAB #$80 ; B=$0006 @0 STAB $0006 ; B=$0006 JMP xE548 xEC56 LDAB $00DF LDAA $0045 ; B=$00DF CMPA #$AB ; A=$0045 B=$00DF JHI @11 ; B=$00DF BTSTA $0014,#$10 ; B=$00DF BNE @0 ; B=$00DF BTSTA $0000,#$10 ; B=$00DF BNE @3 ; B=$00DF BTST7A $0001,#$80 ; B=$00DF BPL @2 ; B=$00DF N=$0001 LDAA $0045 ; B=$00DF CMPA xD5D2 ; A=$0045 B=$00DF BHI @1 ; B=$00DF BSETA $000E,#$04 ; B=$00DF @0 BRA @10 ; B=$00DF @1 BCLRA $000E,#$04 ; B=$00DF @2 BTST7A $0001,#$80 ; B=$00DF BMI @3 ; B=$00DF N=$0001 LDAA $0002 ; B=$00DF SEC ; A=$0002 B=$00DF BITA #$10 ; A=$0002 B=$00DF BNE @4 ; B=$00DF @3 LDAA $00CB ; B=$00DF SUBA $00FD ; A=$00CB B=$00DF BEQ @10 ; B=$00DF @4 BITB #$20 ; B=$00DF BEQ @10 ; B=$00DF BCC @5 ; B=$00DF ANDB #$FA ; B=$00DF LDAA $00FD ; B=$00DF BEQ @6 ; A=$00FD B=$00DF DECA ; A=$00FD B=$00DF STAA $00FD ; A=? B=$00DF BRA @6 ; B=$00DF @5 ORAB #$01 ; B=$00DF LDAA $00FD ; B=$00DF CMPA xD5DE ; A=$00FD B=$00DF BCC @10 ; B=$00DF INC $00FD ; B=$00DF BTSTA $000F,#$40 ; B=$00DF BNE @6 ; B=$00DF ORAB #$04 ; B=$00DF @6 TBA ; B=$00DF ANDA #$C0 ; A=$00DF B=$00DF BEQ @7 ; A=$00DF B=$00DF CMPA #$C0 ; A=$00DF B=$00DF BEQ @7 ; B=$00DF BITB #$01 ; B=$00DF BNE @8 ; B=$00DF BRA @9 ; B=$00DF @7 BITB #$01 ; B=$00DF BNE @9 ; B=$00DF @8 EORB #$40 ; B=$00DF BRA @13 ; B=$00DF @9 EORB #$80 ; B=$00DF BRA @13 ; B=$00DF @10 ORAB #$20 ; B=$00DF BRA @12 ; B=$00DF @11 ANDB #$DF ; B=$00DF @12 ANDB #$FB ; B=$00DF @13 STAB $00DF ; B=$00DF LDAA $0881 ; B=$00DF ANDA #$F8 ; A=$0881 B=$00DF ASLB ; A=$0881 B=$00DF BPL @14 ; A=$0881 B=? N=? ORAA #$02 ; A=$0881 B=? @14 BCC @15 ; A=$0881 B=? ORAA #$01 ; A=$0881 B=? @15 ASLB ; A=$0881 B=? BPL @16 ; A=$0881 N=? ORAA #$04 ; A=$0881 @16 STAA $0881 ; A=$0881 RTS xECF8 JSR xFC8A JSR xFCB9 ; A=? BTST7B $0001,#$80 BMI @0 ; N=$0001 MOVA $00E3,$0024 CLRB LDAA xD28D ; B=#0 STD $003F ; A=xD28D B=#0 STD $0041 ; A=xD28D B=#0 STAA $003E ; A=xD28D @0 JMP xFDEA xED13 BTSTA $0070,#$10 BEQ @0 RTS @0 LDAA $0046 LDX #xD3E9 ; A=$0046 JSR xFB49 ; A=$0046 X=#xD3E9 STAA $00B2 ; A=? LDAA $00E3 COMA ; A=$00E3 STAA $0058 ; A=? LDX #xD3FA ; A=? JSR xFB40 ; A=? X=#xD3FA STAA $009D ; A=? LDAA $0058 LDX #xD40C ; A=$0058 JSR xFB49 ; A=$0058 X=#xD40C STAA $0098 ; A=? LDAA $00E3 LDX #xD3D8 ; A=$00E3 JSR xFB49 ; A=$00E3 X=#xD3D8 STAA $00AA ; A=? LDAB $000D BITB #$20 ; B=$000D BEQ @1 ; B=$000D LDAA $00E3 ; B=$000D CMPA xD029 ; A=$00E3 B=$000D BCC @1 ; B=$000D LDAA $001C ; B=$000D CMPA xD028 ; A=$001C B=$000D BHI @2 ; B=$000D @1 JSR xFDCB BRA @6 @2 LDAA $006F ; B=$000D BEQ @4 ; A=$006F B=$000D BITB #$02 ; A=$006F B=$000D BNE @3 ; A=$006F LDAB $0070 ; A=$006F ANDB #$F0 ; A=$006F B=$0070 BNE @5 ; A=$006F @3 DECA ; A=$006F BRA @5 ; A=? @4 ORAB #$02 ; B=$000D STAB $000D ; B=$000D LDAB $006E SUMB xD02A ; B=$006E STAB $006E ; B=? LDAA xD026 @5 STAA $006F ; A=? @6 LDAA $0058 BTST7B $0001,#$80 ; A=$0058 BMI @9 ; A=$0058 N=$0001 BTSTB $00DE,#$08 ; A=$0058 BNE @8 ; A=$0058 LDX #xD427 ; A=$0058 JSR xFB49 ; A=$0058 X=#xD427 STAA $00E5 ; A=? LDX #xD16D LDAA $0058 ; X=#xD16D JSR xFB40 ; A=$0058 X=#xD16D STAA $00E7 ; A=? LDX #xD173 LDAA $0058 ; X=#xD173 JSR xFB40 ; A=$0058 X=#xD173 STAA $00E8 ; A=? LDAB xD2D3 LDAA $00E3 ; B=xD2D3 CMPA xD2D5 ; A=$00E3 B=xD2D3 BHI @7 ; B=xD2D3 LDAB xD2D4 @7 STAB $00E6 ; B=xD2D4,xD2D3 @8 LDX #xD438 LDAA $0058 ; X=#xD438 JSR xFB49 ; A=$0058 X=#xD438 STAA $00B7 ; A=? LDX #xD449 LDAA $0058 ; X=#xD449 JSR xFB49 ; A=$0058 X=#xD449 STAA $00B6 ; A=? LDX #xD179 LDAA $0058 ; X=#xD179 JSR xFB40 ; A=$0058 X=#xD179 STAA $006C ; A=? BRA @18 @9 LDAA $00E6 BNE @13 LDAA $00C0 BEQ @11 ; A=$00C0 CMPA xD2FF ; A=$00C0 BNE @10 ; A=$00C0 LDAB $00E3 ; A=$00C0 CMPB xD2FD ; A=$00C0 B=$00E3 BLS @10 ; A=$00C0 BTSTB $0801,#$10 ; A=$00C0 BNE @15 ; A=$00C0 @10 DECA ; A=$00C0 STAA $00C0 ; A=? BNE @15 BSETB $000E,#$08 @11 LDAA $00B3 BNE @14 MOVA xD2D2,$00B3 LDAA $00E5 LDAB $00B7 ; A=$00E5 MUL ; A=$00E5 B=$00B7 BTSTB $000E,#$08 ; A=? BNE @12 ; A=? CMPA xD2FE ; A=? BHI @12 ; A=? LDAB $00E3 ; A=? CMPB xD2FD ; A=? B=$00E3 BLS @12 ; A=? MOVB xD2FF,$00C0 ; A=? @12 STAA $00E5 ; A=? BRA @15 @13 DEC $00E6 BRA @15 @14 DEC $00B3 @15 LDAA $00E8 BEQ @16 LDAA $0070 ANDA #$F0 ; A=$0070 BNE @18 DEC $00E8 BRA @18 @16 LDAA $006D BEQ @17 DEC $006D BRA @18 @17 MOVA xD026,$006D LDAA $00E7 LDAB $006C ; A=$00E7 MUL ; A=$00E7 B=$006C STAA $00E7 ; A=? @18 LDX #xD45A LDAA $0058 ; X=#xD45A JSR xFB49 ; A=$0058 X=#xD45A STAA $00B5 ; A=? BTST7A $0001,#$80 BPL @26 ; N=$0001 BTSTA $000B,#$02 BEQ @19 CLR $009C BRA @26 @19 LDAB $00DE LDAA $009C ; B=$00DE CMPA xD29A ; A=$009C B=$00DE BCC @20 ; A=$009C B=$00DE INCA ; A=$009C B=$00DE STAA $009C ; A=? B=$00DE BRA @21 ; B=$00DE @20 ANDB #$FE ; B=$00DE STAB $00DE ; B=$00DE @21 BITB #$01 ; B=$00DE BEQ @26 LDAA $0002 ANDA #$30 ; A=$0002 BNE @24 BTSTB $00DE,#$02 BNE @24 LDD $00EB LSRD ; A=$00EB B=$00EC LDAA $0024 ; B=? CMPA xD296 ; A=$0024 B=? BLS @22 ; B=? CMPB xD298 ; B=? BCC @23 BRA @26 @22 CMPB xD297 ; B=? BCS @26 @23 BSETA $00DE,#$02 @24 LDAA $0021 CMPA xD299 ; A=$0021 BLS @26 LDAB $000E BTSTA $0000,#$02 ; B=$000E BEQ @25 ; B=$000E LDAA $040D ; B=$000E ANDA #$03 ; A=$040D B=$000E BNE @26 ; B=$000E @25 BSETA $0008,#$80 ; B=$000E ORAB #$A0 ; B=$000E LDAA $0002 ; B=$000E ORAA $0003 ; A=$0002 B=$000E BITA #$02 ; A=$0003 B=$000E BEQ @27 ; B=$000E ANDB #$7F ; B=$000E BRA @27 ; B=$000E @26 LDAB $000E ANDB #$5F ; B=$000E @27 STAB $000E ; B=$000E BPL @28 ; B=$000E N=$000E LDAA $0009 ; B=$000E ANDA #$48 ; A=$0009 B=$000E BNE @28 ; B=$000E LDAA $00A5 ; B=$000E CMPA xD2AA ; A=$00A5 B=$000E BNE @28 ; B=$000E LDAA $0026 ; B=$000E CMPA xD29C ; A=$0026 B=$000E BHI @28 ; A=$0026 B=$000E CMPA xD29B ; A=$0026 B=$000E BCS @28 ; B=$000E LDAA $001C ; B=$000E CMPA xD29D ; A=$001C B=$000E BCC @28 ; B=$000E ORAB #$02 ; B=$000E BRA @29 ; B=$000E @28 ANDB #$FD ; B=$000E @29 STAB $000E ; B=$000E RTS xEF07 LDX $0041 LDAB xD55F ; X=$0041 LDAA $003E ; B=xD55F X=$0041 JSR xFB12 ; A=$003E B=xD55F X=$0041 STD $0041 ; A=? B=? LDAA $0021 CMPA xD562 ; A=$0021 BCS @5 LDAA $000B ASRA ; A=$000B BCS @5 LDAA $0002 ORAA $0003 ; A=$0002 BITA #$02 ; A=$0003 BNE @0 BTSTA $000D,#$20 BEQ @1 LDAB $007E CMPB xD563 ; B=$007E BCC @5 LDAB $0070 ANDB #$F0 ; B=$0070 BNE @0 INC $007E @0 LDAB $0008 ANDB #$FE ; B=$0008 ORAB #$04 ; B=$0008 BRA @6 ; B=$0008 @1 CLRB STAB $007E ; B=#0 BTSTA $00DE,#$02 BNE @5 LDAA $001A CMPA xD560 ; A=$001A BHI @5 LDAA $002C CMPA xD561 ; A=$002C BCS @5 BTST7A $0008,#$80 BPL @0 ; N=$0008 LDAB $007D BNE @3 ; B=$007D LDAB xD55E LDAA $0033 ; B=xD55E SUBA $0026 ; A=$0033 B=xD55E BLS @2 ; A=? B=xD55E CMPA xD55D ; A=? B=xD55E BHI @4 ; B=xD55E @2 LDAB $0008 ANDB #$FA ; B=$0008 BRA @6 ; B=$0008 @3 DECB ; B=$007D @4 STAB $007D ; B=? @5 LDAB $0008 ORAB #$01 ; B=$0008 ANDB #$FB ; B=$0008 @6 STAB $0008 ; B=$0008 MOVB $0026,$0033 LDAA $0002 LDAB $0045 ; A=$0002 CMPB #$AB ; A=$0002 B=$0045 BCS @7 ; A=$0002 CLRB ; A=$0002 BITA #$40 ; A=$0002 B=#0 BNE @10 ; A=$0002 B=#0 ORAA #$40 ; A=$0002 BRA @8 ; A=$0002 @7 ANDA #$BF ; A=$0002 @8 STAA $0002 ; A=$0002 CLRB BTST7A $0001,#$80 ; B=#0 BMI @11 ; B=#0 N=$0001 BTST7A $000B,#$80 ; B=#0 BMI @9 ; B=#0 N=$000B CLRA ; B=#0 BRA @16 ; A=#0 B=#0 @9 LDAA #$FC ; B=#0 DECB ; A=#$FC B=#0 BRA @16 ; A=#$FC B=? @10 PSHB ; B=#0 BRA @18 ; B=#0 @11 CLRA LDAB $0005 ; A=#0 BIT7B #$80 ; A=#0 B=$0005 N=$0005 BPL @12 ; A=#0 B=$0005 N=$0005 BITB #$40 ; A=#0 B=$0005 BNE @12 ; A=#0 B=$0005 ORAA #$80 ; A=#0 B=$0005 @12 BITB #$04 ; A=#0 B=$0005 BEQ @13 ; A=#0 ORAA #$04 ; A=#0 @13 LDAB $0008 ; A=#0 BITB #$04 ; A=#0 B=$0008 BEQ @14 ; A=#0 B=$0008 ORAA #$10 ; A=#0 B=$0008 @14 BITB #$01 ; A=#0 B=$0008 BNE @15 ; A=#0 ORAA #$20 ; A=#0 @15 LDAB $0080 ; A=#0 @16 EORA xD008 ; A=#0,#$FC B=? PSHA ; A=xD008 B=? BTSTA $000A,#$04 ; B=? BEQ @17 ; B=? DIFB xD537 ; B=? @17 BTSTA xD005,#$10 ; B=? BEQ @18 ; B=? COMB ; B=? @18 LDX #$0F000 ; B=? BTSTA xD005,#$08 ; B=? X=#$F000 BEQ @19 ; B=? X=#$F000 LDX #$0D000 ; B=? ABX ; B=? X=#$D000 ABX ; B=? X=? ABX ; B=? X=? @19 ABX ; B=? X=? STX $BC16 ; X=? LDAB $0801 ANDB #$F0 ; B=$0801 PULA ; B=$0801 TSTA ; A=? B=$0801 BPL @20 ; A=? B=$0801 N=? ORAB #$08 ; A=? B=$0801 @20 BITA #$10 ; A=? B=$0801 BEQ @21 ; A=? B=$0801 ORAB #$01 ; A=? B=$0801 @21 BITA #$20 ; A=? B=$0801 BEQ @22 ; A=? B=$0801 ORAB #$02 ; A=? B=$0801 @22 STAB $0801 ; A=? B=$0801 LDX #$0D3FF ; A=? BITA #$04 ; A=? X=#$D3FF BNE @23 ; X=#$D3FF LDX #$0D000 @23 STX $BC18 ; X=#$D000,#$D3FF RTS xF025 BTSTA $0000,#$10 BNE @0 LDAA #$9F CMPA $0037 ; A=#$9F BHI @1 @0 CLRD STD $0034 ; A=#0 B=#0 BRA @4 ; A=#0 @1 LDD $003A SUBD $0038 ; A=$003A B=$003B STD $0051 ; A=? B=? LDD $003C SUBD $003A ; A=$003C B=$003D ADDD $0051 ; A=? B=? RORA ; A=? B=? RORB ; A=? B=? STD $0053 ; A=? B=? STD $0057 ; A=? B=? LDD #$01CC JSR xFB92 ; A=#$01 B=#$CC LDX $0034 ; A=? LDAB xD56B ; A=? X=$0034 JSR xFB12 ; A=? B=xD56B X=$0034 STD $0034 ; A=? B=? ASLB ; A=? B=? ADCA #$00 ; A=? LDAB #$CD ; A=? MUL ; A=? B=#$CD ASLD ; A=? B=? BCS @3 ; A=? B=? ASLD ; A=? B=? BCS @3 ; A=? B=? TSTB ; A=? B=? BPL @2 ; A=? N=? INCA ; A=? BEQ @3 ; A=? @2 CMPA #$C0 ; A=? BLS @4 ; A=? @3 LDAA #$C0 @4 STAA $0036 ; A=? LDAA xD007 BIT7A #$80 ; A=xD007 N=xD007 JMI xF16C ; A=xD007 N=xD007 EORA $0801 ; A=xD007 ANDA #$20 ; A=$0801 STAA $0058 ; A=$0801 LDAA $0021 CMPA xD564 ; A=$0021 BCC @6 @5 JMP xF155 @6 BTSTA xD007,#$04 BEQ @7 BTSTB $0008,#$08 BNE @5 @7 LDX #xD565 LDAA $0005 ; X=#xD565 LDAB $01(X) ; A=$0005 X=#xD565 BITA #$10 ; A=$0005 B=$01(X) X=#xD565 BNE @8 ; A=$0005 B=$01(X) X=#xD565 ADDB #$10 ; A=$0005 B=$01(X) X=#xD565 BCS @9 ; A=$0005 B=? X=#xD565 @8 CMPB $0036 ; A=$0005 B=? X=#xD565 BLS @10 ; A=$0005 X=#xD565 @9 ANDA #$EF ; A=$0005 X=#xD565 LDAB $02(X) ; A=$0005 X=#xD565 BRA @11 ; A=$0005 B=$02(X) X=#xD565 @10 ORAA #$10 ; A=$0005 X=#xD565 LDAB $03(X) ; A=$0005 X=#xD565 @11 STAA $0005 ; A=$0005 B=$03(X),$02(X) X=#xD565 BPL @12 ; B=$03(X),$02(X) X=#xD565 N=$0005 DIFB $04(X) ; B=$03(X),$02(X) X=#xD565 @12 PSHB ; B=? X=#xD565 JSR xFA43 ; X=#xD565 LDAB xD565 ; A=? CMPB #$03 ; A=? B=xD565 BNE @13 ; A=? BSR xF108 @13 PULB ; A=? CBA ; A=? B=? BCS @5 LDX #xD589 LDAA $0058 ; X=#xD589 BEQ @14 ; X=#xD589 LDX #xD56F @14 LDAB #$0E ; X=#xD56F,#xD589 BTST7A $0005,#$80 ; B=#$0E X=#xD56F,#xD589 BPL @15 ; B=#$0E X=#xD56F,#xD589 N=$0005 INX ; X=#xD56F,#xD589 INX ; X=? LDAB #$01 ; X=? @15 LDAA $0034 ; B=#$01,#$0E X=? CMPA $00(X) ; A=$0034 B=#$01,#$0E X=? BCS xF155 ; B=#$01,#$0E X=? INX ; B=#$01,#$0E X=? LDAA $001C ; B=#$01,#$0E X=? CMPA $00(X) ; A=$001C B=#$01,#$0E X=? BLS xF155 ; B=#$01,#$0E X=? ABX ; B=#$01,#$0E X=? BTST7A $0005,#$80 ; X=? BPL xF11C ; X=? N=$0005 BTSTA xD006,#$02 ; X=? BEQ xF11C ; X=? LDAB #$60 ; X=? LDAA $001A ; B=#$60 X=? ASLA ; A=$001A B=#$60 X=? BCC @16 ; A=? B=#$60 X=? LDAA #$FF ; B=#$60 X=? @16 BRA xF120 ; A=? B=#$60 X=? xF108 LDAA $0049 xF10A PSHA ; A=? JSR xFD18 LDX #xD5BA ; A=? B=? JSR xFB45 ; A=? B=? X=#xD5BA PULB ; A=? MUL ; A=? B=? ASLD ; A=? B=? BCC @0 LDAA #$FF @0 RTS xF11C LDAB #$20 ; X=? LDAA $0036 ; B=#$20 X=? xF120 JSR xFB45 ; A=? B=#$20,#$60 X=? BEQ xF155 ; A=? PSHA ; A=? BSR xF108 PULB ; A=? CBA ; A=? B=? BHI xF155 LDAA $0005 BITA #$40 ; A=$0005 BEQ @0 ; A=$0005 DEC $005A ; A=$0005 BNE @1 ; A=$0005 ANDA #$BF ; A=$0005 BRA @1 ; A=$0005 @0 LDAB $0058 ; A=$0005 BEQ @1 ; A=$0005 BITA #$20 ; A=$0005 BNE @1 ; A=$0005 ORAA #$40 ; A=$0005 MOVB xD56C,$005A ; A=$0005 @1 LDAB $0059 ; A=$0005 BEQ xF151 ; A=$0005 B=$0059 DECB ; A=$0005 B=$0059 BRA xF15A ; A=$0005 B=? xF151 ORAA #$80 ; A=$0005 BRA xF165 ; A=$0005 xF155 LDAA $0005 LDAB xD56D ; A=$0005 xF15A STAB $0059 ; A=$0005 B=? LDAB $0034 ; A=$0005 CMPB xD56E ; A=$0005 B=$0034 BCC xF151 ; A=$0005 ANDA #$7F ; A=$0005 xF165 ANDA #$DF ; A=$0005 ORAA $0058 ; A=$0005 xF169 STAA $0005 ; A=$0058,$0005 RTS xF16C LDX #xD5A4 LDAA $0021 ; X=#xD5A4 CMPA $10(X) ; A=$0021 X=#xD5A4 BLS @5 ; X=#xD5A4 LDAA $11(X) ; X=#xD5A4 LDAB $005A ; A=$11(X) X=#xD5A4 CMPB #$02 ; A=$11(X) B=$005A X=#xD5A4 BLS @0 ; A=$11(X) X=#xD5A4 LDAA $12(X) ; X=#xD5A4 @0 CMPA $0049 ; A=$12(X),$11(X) X=#xD5A4 BHI @5 ; X=#xD5A4 LDAA $0034 ; X=#xD5A4 CMPA #$05 ; A=$0034 X=#xD5A4 BCS @5 ; X=#xD5A4 LDAA $001C ; X=#xD5A4 CMPA $13(X) ; A=$001C X=#xD5A4 BHI @7 ; A=$001C X=#xD5A4 CMPA #$28 ; A=$001C X=#xD5A4 BCS @5 ; A=$001C X=#xD5A4 MOVB #$01,$005A ; A=$001C X=#xD5A4 PSHX ; A=$001C X=#xD5A4 LDX #$0057 ; A=$001C JSR xFBB9 ; A=$001C X=#$0057 STD $0057 ; A=? B=? X=? LDAA #$0E ; X=? JSR xFBB9 ; A=#$0E X=? STD $0055 ; A=? B=? TSTA ; A=? B=? BEQ @1 ; B=? LDAB #$FF @1 LDX $0055 ; B=? CPX xD5A3 ; B=? X=$0055 PULX ; B=? BRA @3 ; B=? X=? @2 INC $005A ; B=? X=? CMPB $00(X) ; B=? X=? @3 BHI @4 ; B=? X=? CMPB $04(X) ; B=? X=? BHI @9 ; B=? X=? @4 INX ; B=? X=? CPX #xD5A7 ; B=? X=? BLS @2 ; B=? X=? @5 LDAA xD5B8 LDAB $005A ; A=xD5B8 CMPB #$02 ; A=xD5B8 B=$005A BLS @6 ; A=xD5B8 LDAA xD5B9 @6 STAA $0059 ; A=? LDAA $0005 ANDA #$7F ; A=$0005 BRA @8 ; A=$0005 @7 LDAA $0005 ORAA #$80 ; A=$0005 @8 BRA xF169 ; A=$0005 @9 LDAA $001C ; X=? CMPA $08(X) ; A=$001C X=? BLS @5 ; X=? LDAA $0C(X) ; X=? LDAB $0049 ; A=$0C(X) MUL ; A=$0C(X) B=$0049 ASLD ; A=? B=? BCS @10 ; A=? B=? ADDD #$0080 ; A=? B=? BCC @11 ; A=? @10 LDAA #$FF @11 PSHA ; A=? LDX #xD573 LDAB $005A ; X=#xD573 CMPB #$02 ; B=$005A X=#xD573 BLS @12 ; X=#xD573 LDX #xD58D @12 LDAB #$0B ; X=#xD58D,#xD573 BTST7A $0005,#$80 ; B=#$0B X=#xD58D,#xD573 BMI @13 ; B=#$0B X=#xD58D,#xD573 N=$0005 ABX ; B=#$0B X=#xD58D,#xD573 @13 LDAB #$28 ; X=? LDAA $001C ; B=#$28 X=? CMPA #$C8 ; A=$001C B=#$28 X=? BCS @14 ; A=$001C B=#$28 X=? LDAA #$C8 ; B=#$28 X=? @14 JSR xFB45 ; A=#$C8,$001C B=#$28 X=? JSR xF10A ; A=? PULB ; A=? CBA ; A=? B=? BCS @5 LDAA $0059 BEQ @7 ; A=$0059 DECA ; A=$0059 BRA @6 ; A=? xF223 BTSTA $0070,#$10 BEQ @0 RTS @0 LDAA $0036 CMPA xD5F4 ; A=$0036 BCS @1 CLR $00CC @1 BTSTB $0002,#$20 BEQ @2 MOVB xD5DB,$00CF BRA @5 @2 LDAA $0021 LDX #xD60E ; A=$0021 LDAB #$60 ; A=$0021 X=#xD60E JSR xFB45 ; A=$0021 B=#$60 X=#xD60E LDAB $000F ; A=? BITB #$08 ; A=? B=$000F BEQ @3 ; A=? B=$000F ADDA xD5DA ; A=? B=$000F @3 STAA $00CF ; A=? B=$000F LDAA $0047 ; B=$000F CMPA xD5DD ; A=$0047 B=$000F BCS @5 ; B=$000F LDAA xD5DC ; B=$000F CMPA $00C2 ; A=xD5DC B=$000F BCS @4 ; A=xD5DC B=$000F STAA $00C2 ; A=xD5DC B=$000F CLR $00C3 ; B=$000F @4 ORAB #$40 ; B=$000F STAB $000F ; B=$000F @5 BTSTA $000F,#$40 JEQ @17 LDAA xD5E4 LDAB $0036 ; A=xD5E4 CMPB xD5EC ; A=xD5E4 B=$0036 LDX xD5E7 ; A=xD5E4 B=$0036 BCS @7 ; A=xD5E4 B=$0036 X=xD5E7 LDAA xD5E5 ; B=$0036 CMPB xD5ED ; A=xD5E5 B=$0036 BCS @6 ; A=xD5E5 LDAA xD5E6 @6 LDX xD5E8 ; A=xD5E6,xD5E5 @7 STAA $0051 ; A=xD5E6,xD5E5,xD5E4 X=xD5E8,xD5E7 STX $0055 ; X=xD5E8,xD5E7 LDAB $0005 LDAA $00C8 ; B=$0005 CMPA $00C6 ; A=$00C8 B=$0005 BLS @8 ; A=$00C8 B=$0005 CLRA ; B=$0005 ANDB #$FD ; A=#0 B=$0005 BRA @9 ; A=#0 B=$0005 @8 BITB #$02 ; A=$00C8 B=$0005 BNE @10 ; A=$00C8 B=$0005 LDAA $0055 ; B=$0005 ORAB #$02 ; A=$0055 B=$0005 @9 STAB $0005 ; A=$0055,#0 B=$0005 STAA $00C9 ; A=$0055,#0 BRA @13 @10 TST $00C9 ; A=$00C8 BEQ @11 ; A=$00C8 DEC $00C9 BRA @13 @11 LDAB $0036 ; A=$00C8 CMPB xD5EC ; A=$00C8 B=$0036 BCS @12 ; A=$00C8 CMPA xD5EE ; A=$00C8 BHI @12 ; A=$00C8 LDAA xD5EE @12 LDX $00C6 ; A=xD5EE,$00C8 LDAB $0051 ; A=xD5EE,$00C8 X=$00C6 JSR xFB12 ; A=xD5EE,$00C8 B=$0051 X=$00C6 STD $00C6 ; A=? B=? @13 LDAA $0008 LDAB $00C2 ; A=$0008 BNE @14 ; A=$0008 ANDA #$DF ; A=$0008 STAA $0008 ; A=$0008 @14 LDAB xD5E9 ; A=$0008 BITA #$20 ; A=$0008 B=xD5E9 BEQ @15 ; B=xD5E9 LDAB xD5EA @15 CLRA ; B=xD5EA,xD5E9 LDX $00C2 ; A=#0 B=xD5EA,xD5E9 JSR xFB12 ; A=#0 B=xD5EA,xD5E9 X=$00C2 STD $00C2 ; A=? B=? LDX $00C4 LDAB xD5EB ; X=$00C4 CLRA ; B=xD5EB X=$00C4 JSR xFB12 ; A=#0 B=xD5EB X=$00C4 STD $00C4 ; A=? B=? ORAA $00C6 ; A=? ORAA $00C2 ; A=$00C6 BNE @16 BCLRA $000F,#$40 @16 BTSTB $000F,#$20 BNE @18 LDAA $00CD BEQ @19 BRA @18 @17 BTSTA $0000,#$02 BEQ @18 JSR $5818 @18 BTST7A $0001,#$80 BMI @20 ; N=$0001 @19 MOVA xD5CA,$00CA RTS @20 LDAA $00CA BEQ @21 ; A=$00CA DECA ; A=$00CA STAA $00CA ; A=? RTS @21 BTST7A $000F,#$80 BPL @22 ; N=$000F LDAA xD5C5 ADDA xD5CD ; A=xD5C5 BCC @23 ; A=? LDAA #$FF BRA @23 ; A=#$FF @22 LDAA $00CF @23 STAA $00D0 ; A=? LDX #xD5C7 ; A=? SUBA $001F ; A=? X=#xD5C7 BHI @24 ; A=? X=#xD5C7 NEGA ; A=? X=#xD5C7 CMPA xD5CB ; A=? X=#xD5C7 BLS @25 ; X=#xD5C7 INX ; X=#xD5C7 BRA @25 ; X=? @24 INX ; A=? X=#xD5C7 INX ; A=? X=? CMPA xD5CC ; A=? X=? BLS @25 ; X=? INX ; X=? @25 MOVB $00(X),$00CA ; X=? LDAB $0003 ANDB #$7F ; B=$0003 LDAA $00D0 ; B=$0003 SUBA $001F ; A=$00D0 B=$0003 BCC @26 ; A=? B=$0003 ORAB #$80 ; A=? B=$0003 @26 STAB $0003 ; A=? B=$0003 BPL @27 ; A=? N=$0003 NEGA ; A=? @27 CMPA xD5CD ; A=? BLS @28 LDAA $0036 BEQ @29 BTST7A $000F,#$80 BPL @35 ; N=$000F @28 RTS @29 LDAA $0049 CMPA xD5C6 ; A=$0049 BHI @35 BTSTA $000F,#$20 BNE @39 CLRA BTSTB $0002,#$20 ; A=#0 BNE @40 ; A=#0 LDAA $00CE BEQ @30 BTSTA $00DE,#$20 BEQ @34 LDAB $0021 CMPB xD5F3 ; B=$0021 BCS @34 LDAA xD5E1 BRA @31 ; A=xD5E1 @30 BTSTA $000F,#$10 BEQ @39 LDAA xD5E2 @31 LDAB $000F ; A=xD5E2,xD5E1 BITB #$08 ; A=xD5E2,xD5E1 B=$000F BEQ @32 ; A=xD5E2,xD5E1 B=$000F SUMA xD5E3 ; A=xD5E2,xD5E1 B=$000F @32 BITB #$40 ; A=? B=$000F BNE @34 ; A=? LDAB $00CC ; A=? CMPA $001F ; A=? B=$00CC BCC @34 ; B=$00CC INCB ; B=$00CC BNE @33 ; B=? DECB ; B=? @33 STAB $00CC ; B=? @34 RTS @35 LDAA $00CD BTST7B $0003,#$80 ; A=$00CD BPL @37 ; A=$00CD N=$0003 TSTA ; A=$00CD BEQ @38 ; A=$00CD @36 DECA ; A=? BRA @38 ; A=? @37 INCA ; A=$00CD BEQ @36 ; A=? @38 STAA $00CD ; A=? RTS @39 LDAA $00CC BEQ @41 ; A=$00CC DECA ; A=$00CC @40 STAA $00CC ; A=? @41 LDAA $000F BTST7B $0003,#$80 ; A=$000F BPL @46 ; A=$000F N=$0003 LDAB $00CD ; A=$000F BEQ @42 ; A=$000F B=$00CD DECB ; B=$00CD STAB $00CD ; B=? BRA @53 @42 BITA #$08 ; A=$000F BEQ @45 LDAA $00C1 LDAB $00E4 ; A=$00C1 CBA ; A=$00C1 B=$00E4 BHI @44 ; A=$00C1 B=$00E4 TSTB ; A=$00C1 B=$00E4 BEQ @43 ; A=$00C1 B=$00E4 DECB ; A=$00C1 B=$00E4 @43 STAB $00E4 ; A=$00C1 B=? @44 TSTA ; A=$00C1 BEQ @51 ; A=$00C1 DECA ; A=$00C1 BRA @47 ; A=? @45 LDAA $00E4 BEQ @51 ; A=$00E4 DECA ; A=$00E4 BRA @49 ; A=? @46 BITA #$08 ; A=$000F BEQ @48 LDAA $00C1 CMPA xD5DF ; A=$00C1 BCC @50 ; A=$00C1 INCA ; A=$00C1 @47 STAA $00C1 ; A=? BRA @53 @48 LDAA $00E4 CMPA xD5E0 ; A=$00E4 BCC @50 ; A=$00E4 INCA ; A=$00E4 @49 STAA $00E4 ; A=? BRA @53 @50 DEC $00FD BRA @52 @51 INC $00FD @52 BCLRA $000F,#$03 @53 LDX #$00E4 LDAA $000F ; X=#$00E4 BTSTB xD50D,#$01 ; A=$000F X=#$00E4 BEQ @54 ; A=$000F X=#$00E4 BTSTB $00DE,#$40 ; A=$000F X=#$00E4 BNE @59 ; A=$000F X=#$00E4 @54 LDAB $00C1 ; A=$000F X=#$00E4 SUBB $00E4 ; A=$000F B=$00C1 X=#$00E4 BITA #$08 ; A=$000F B=? X=#$00E4 BNE @57 ; B=? X=#$00E4 LDX #$00C1 ; B=? BCS @58 ; B=? X=#$00C1 CMPB xD5D0 ; B=? X=#$00C1 BCS @58 ; B=? X=#$00C1 CMPB xD5D1 ; B=? X=#$00C1 BLS @61 ; X=#$00C1 @55 TST $00(X) ; X=#$00C1,#$00E4 BEQ @61 ; X=#$00C1,#$00E4 @56 DEC $00(X) ; X=#$00C1,#$00E4 BRA @61 @57 BCS @55 ; B=? X=#$00E4 CMPB xD5D0 ; B=? X=#$00E4 BCS @55 ; B=? X=#$00E4 CMPB xD5D1 ; B=? X=#$00E4 BLS @61 ; X=#$00E4 @58 INC $00(X) ; X=#$00E4,#$00C1 BEQ @56 ; X=#$00E4,#$00C1 BRA @61 @59 LDAB xD5CF ; A=$000F X=#$00E4 BITA #$08 ; A=$000F B=xD5CF X=#$00E4 BEQ @60 ; B=xD5CF X=#$00E4 LDX #$00C1 ; B=xD5CF SUMB xD5C1 ; B=xD5CF X=#$00C1 @60 CMPB $00(X) ; B=? X=#$00C1,#$00E4 BLS @61 ; B=? X=#$00C1,#$00E4 STAB $00(X) ; B=? X=#$00C1,#$00E4 @61 RTS xF497 BTSTB $0070,#$10 BNE @2 LDX #xD196 JSR xFDDA ; X=#xD196 LDAB $0077 ; A=? MUL ; A=? B=$0077 ADCA #$00 ; A=? NEGA ; A=? BNE @0 ; A=? LDAA #$FF @0 ADDA $0077 ; A=? BCS @1 ; A=? CLRA @1 STAA $0077 ; A=? @2 BTST7A xD50F,#$80 BPL @6 ; N=xD50F LDAA $0076 INCA ; A=$0076 CMPA #$27 ; A=? BCS @5 ; A=? LDD $BC0A STAA $0051 ; A=$BC0A LDAB $000A ; A=$BC0A SUBA $0075 ; A=$BC0A B=$000A CMPA xD54C ; A=? B=$000A BCS @3 ; B=$000A ORAB #$40 ; B=$000A BRA @4 ; B=$000A @3 ANDB #$BF ; B=$000A @4 STAB $000A ; B=$000A MOVA $0051,$0075 CLRA @5 STAA $0076 ; A=? @6 RTS xF4DE LDAB $0070 LDAA $0009 ; B=$0070 ANDA #$7F ; A=$0009 B=$0070 ANDB #$F0 ; A=$0009 B=$0070 BNE @0 ; A=$0009 ORAA #$80 ; A=$0009 @0 STAA $0009 ; A=$0009 BTSTA $0881,#$40 BNE @1 BSETA $0014,#$08 @1 LDAB $000B BTSTA $0002,#$10 ; B=$000B BNE @2 ; B=$000B ANDB #$7F ; B=$000B STAB $000B ; B=$000B BCLRA $0007,#$1C JMP @12 @2 ORAB #$80 ; B=$000B STAB $000B ; B=$000B CLR $0091 BTST7A $0001,#$80 BMI @3 ; N=$0001 BCLRA $0007,#$1C JMP @13 @3 BTST7B $000E,#$80 BMI @5 ; N=$000E @4 LDAA $0007 ANDA #$F7 ; A=$0007 EORA #$40 ; A=$0007 STAA $0007 ; A=$0007 BITA #$40 ; A=$0007 BNE @11 BRA @8 @5 LDAA $0007 BITA #$08 ; A=$0007 BNE @7 ; A=$0007 BTST7B $0009,#$80 ; A=$0007 BPL @4 ; A=$0007 N=$0009 ORAA #$08 ; A=$0007 STAA $0007 ; A=$0007 @6 BTSTB $000E,#$40 BNE @9 BRA @10 @7 BTST7A $0009,#$80 BPL @11 ; N=$0009 LDAA $0007 BITA #$10 ; A=$0007 BEQ @6 ; A=$0007 ANDA #$EF ; A=$0007 STAA $0007 ; A=$0007 @8 LDD $BC3C BITB #$08 ; B=$BC3D BEQ @10 @9 JSR xFBF4 BRA @11 @10 JSR xFBFF @11 CLR $000C BSETA $0007,#$04 BRA @14 @12 CLR $000C LDAA $0014 ANDA #$10 ; A=$0014 JNE @87 BTST7A $0001,#$80 BMI @14 ; N=$0001 @13 CLRA STAA $0086 ; A=#0 STAA $0090 ; A=#0 STAA $008D ; A=#0 STAA $0087 ; A=#0 STAA $0088 ; A=#0 JMP @72 @14 LDAA $0007 BITA #$02 ; A=$0007 BNE @15 ; A=$0007 LDAB $00EC ; A=$0007 CMPB #$0A ; A=$0007 B=$00EC BCS @15 ; A=$0007 ORAA #$02 ; A=$0007 STAA $0007 ; A=$0007 INC $00E9 LDAA $00E9 CMPA xD510 ; A=$00E9 BLS @15 CLRA STAA $00E0 ; A=#0 STAA $00E1 ; A=#0 STAA $00E2 ; A=#0 STAA $00E9 ; A=#0 STAA $000C ; A=#0 JSR xFD2C STAA $00EA ; A=? @15 BTSTB $0009,#$24 BNE @18 BTSTA $000B,#$40 BNE @16 LDD $00EB LSRD ; A=$00EB B=$00EC CMPB xD515 ; B=? BCS @18 BSETA $000B,#$40 @16 LDAB $003E CMPB xD517 ; B=$003E BHI @18 ; B=$003E CMPB xD516 ; B=$003E BLS @18 LDAB $0089 CMPB xD519 ; B=$0089 BHI @19 LDAA $0070 ANDA #$F0 ; A=$0070 BNE @20 BTSTA $00EC,#$01 BNE @20 LDAB $00E3 CMPB xD51A ; B=$00E3 BHI @20 LDAA $0049 CMPA xD518 ; A=$0049 BHI @17 TST $0089 BEQ @20 DEC $0089 BRA @20 @17 INC $0089 BRA @20 @18 CLR $0089 BRA @20 @19 BSETA $0012,#$40 @20 LDAB $0009 ANDB #$FB ; B=$0009 LDAA $0048 ; B=$0009 CMPA xD520 ; A=$0048 B=$0009 BLS @21 ; B=$0009 LDAA $0086 ; B=$0009 CMPA xD521 ; A=$0086 B=$0009 BHI @22 ; B=$0009 LDAA $00FE ; B=$0009 CMPA xD522 ; A=$00FE B=$0009 BCC @21 ; B=$0009 INC $0086 ; B=$0009 BRA @23 ; B=$0009 @21 CLR $0086 ; B=$0009 BRA @23 ; B=$0009 @22 BSETA $0012,#$08 ; B=$0009 ORAB #$04 ; B=$0009 @23 STAB $0009 ; B=$0009 LDAA $0009 LDAB $00DE ; A=$0009 BITA #$48 ; A=$0009 B=$00DE BNE @24 ; B=$00DE LDAA $0036 ; B=$00DE CMPA xD525 ; A=$0036 B=$00DE BHI @24 ; B=$00DE LDAA $0090 ; B=$00DE CMPA xD52A ; A=$0090 B=$00DE BHI @26 ; B=$00DE LDAA $002C ; B=$00DE CMPA xD528 ; A=$002C B=$00DE BCC @24 ; B=$00DE BTSTA $000F,#$10 ; B=$00DE BNE @24 ; B=$00DE LDAA $00E3 ; B=$00DE CMPA xD529 ; A=$00E3 B=$00DE BCC @24 ; B=$00DE LDAA $001A ; B=$00DE CMPA xD526 ; A=$001A B=$00DE BLS @24 ; A=$001A B=$00DE CMPA xD527 ; A=$001A B=$00DE BLS @25 ; B=$00DE @24 CLR $0090 ; B=$00DE,$00DE ANDB #$BF ; B=$00DE BRA @27 ; B=$00DE @25 BTST7A $0009,#$80 BPL @28 ; N=$0009 INC $0090 BRA @28 @26 BSETA $0012,#$01 ; B=$00DE ORAB #$40 ; B=$00DE @27 STAB $00DE ; B=$00DE @28 LDAB $000A BTSTA xD50E,#$20 ; B=$000A BEQ @38 ; B=$000A BITB #$08 ; B=$000A BNE @38 ; B=$000A BTST7A $000E,#$80 ; B=$000A BMI @30 ; B=$000A N=$000E @29 JMP @46 ; B=$000A @30 BTSTA $0008,#$08 ; B=$000A BNE @29 ; B=$000A BITB #$10 ; B=$000A BNE @31 ; B=$000A LDAA $008A ; B=$000A BNE @33 ; B=$000A @31 LDAA $0080 ; B=$000A CMPA xD530 ; A=$0080 B=$000A BCS @33 ; B=$000A LDAA $0031 ; B=$000A CMPA xD52C ; A=$0031 B=$000A BLS @33 ; A=$0031 B=$000A CMPA xD52D ; A=$0031 B=$000A BHI @33 ; B=$000A LDAA $0049 ; B=$000A CMPA xD52E ; A=$0049 B=$000A BLS @45 ; A=$0049 B=$000A CMPA xD52F ; A=$0049 B=$000A BHI @45 ; A=$0049 B=$000A SUBA $004D ; A=$0049 B=$000A BCC @32 ; A=? B=$000A NEGA ; A=? B=$000A @32 CMPA xD533 ; A=? B=$000A BHI @45 ; B=$000A LDAA $0034 ; B=$000A CMPA xD536 ; A=$0034 B=$000A BCS @45 ; B=$000A LDAA $0006 ; B=$000A ASRA ; A=$0006 B=$000A BCC @34 ; A=? B=$000A ASLA ; A=? B=$000A STAA $0006 ; A=? B=$000A @33 BRA @45 ; B=$000A @34 LDAA $00A4 ; B=$000A BITB #$04 ; A=$00A4 B=$000A BNE @40 ; A=$00A4 B=$000A SUBA #$80 ; A=$00A4 B=$000A BCC @35 ; A=? B=$000A NEGA ; A=? B=$000A @35 CMPA xD2B7 ; A=? B=$000A BCC @45 ; B=$000A ORAB #$10 ; B=$000A LDAA $008A ; B=$000A CMPA xD531 ; A=$008A B=$000A BHI @37 ; A=$008A B=$000A @36 INCA ; A=$008A B=$000A BRA @39 ; A=? B=$000A @37 ORAB #$04 ; B=$000A MOVA $00A4,$008B ; B=$000A @38 CLRA ; B=$000A @39 STAA $008A ; A=? B=$000A BRA @49 ; B=$000A @40 SUBA $008B ; A=$00A4 B=$000A BCS @41 ; A=? B=$000A CMPA xD535 ; A=? B=$000A BCC @43 ; B=$000A @41 LDAA $008A ; B=$000A CMPA xD534 ; A=$008A B=$000A BCS @36 ; A=$008A B=$000A LDAA $008C ; B=$000A INCA ; A=$008C B=$000A CMPA xD532 ; A=? B=$000A BCS @42 ; A=? B=$000A ORAB #$01 ; A=? B=$000A DECA ; A=? B=$000A @42 STAA $008C ; A=? B=$000A BRA @45 ; B=$000A @43 LDAA $008C ; B=$000A BEQ @44 ; A=$008C B=$000A DECA ; A=$008C B=$000A @44 BNE @42 ; A=? B=$000A ANDB #$FE ; A=? B=$000A STAA $008C ; A=? B=$000A BTST7A xD005,#$80 ; B=$000A BPL @45 ; B=$000A N=xD005 ORAB #$08 ; B=$000A @45 BITB #$10 ; B=$000A,$000A BNE @46 ; B=$000A BTST7A $0009,#$80 ; B=$000A BPL @48 ; B=$000A N=$0009 LDAA $008A ; B=$000A BEQ @48 ; A=$008A B=$000A DECA ; A=$008A B=$000A BRA @47 ; A=? B=$000A @46 LDAA xD52B ; B=$000A @47 STAA $008A ; A=? B=$000A @48 ANDB #$EB ; B=$000A @49 STAB $000A ; B=$000A BITB #$01 ; B=$000A BEQ @50 BSETA $0013,#$20 @50 LDAB $0009 ANDB #$BF ; B=$0009 BITB #$24 ; B=$0009 BNE @52 ; B=$0009 LDAA xD539 ; B=$0009 CMPA $00FE ; A=xD539 B=$0009 BLS @51 ; A=xD539 B=$0009 LDAA $00FE ; B=$0009 @51 CMPA $002D ; A=$00FE,xD539 B=$0009 BCC @52 ; B=$0009 LDAA $008D ; B=$0009 CMPA xD53A ; A=$008D B=$0009 BHI @53 ; B=$0009 LDAA $0049 ; B=$0009 SUBA xD538 ; A=$0049 B=$0009 BCC @52 ; B=$0009 INC $008D ; B=$0009 BRA @54 ; B=$0009 @52 CLR $008D ; B=$0009 BRA @54 ; B=$0009 @53 BSETA $0013,#$10 ; B=$0009 ORAB #$40 ; B=$0009 @54 STAB $0009 ; B=$0009 BTSTA $0002,#$08 BNE @57 BTSTA $0070,#$10 BNE @57 BTSTA $0001,#$40 BEQ @57 CLRB LDX $BC06 ; B=#0 LDAA $001A ; B=#0 X=$BC06 CMPA xD546 ; A=$001A B=#0 X=$BC06 BLS @56 ; B=#0 X=$BC06 CPX $0092 ; B=#0 X=$BC06 BNE @56 ; B=#0 X=$BC06 LDAB $0094 ; X=$BC06 CMPB xD549 ; B=$0094 X=$BC06 BHI @55 ; B=$0094 X=$BC06 INCB ; B=$0094 X=$BC06 BRA @56 ; B=? X=$BC06 @55 BSETA $00DE,#$80 ; B=$0094 X=$BC06 @56 STAB $0094 ; B=? X=$BC06 STX $0092 ; X=$BC06 @57 BTST7A xD50F,#$80 BPL @62 ; N=xD50F LDX $00EB CPX xD54A ; X=$00EB BLS @62 LDAB $000A BIT7B #$80 ; B=$000A N=$000A BPL @58 ; B=$000A N=$000A ANDB #$DF ; B=$000A BRA @61 ; B=$000A @58 BITB #$20 ; B=$000A BNE @62 ; B=$000A BTSTA $0002,#$38 ; B=$000A BNE @62 ; B=$000A BITB #$02 ; B=$000A BEQ @59 ; B=$000A LDAA $0001 ; B=$000A BITA #$20 ; A=$0001 B=$000A BNE @59 ; A=$0001 B=$000A BTSTB $000D,#$20 ; A=$0001 BNE @62 ; A=$0001 ORAA #$20 ; A=$0001 STAA $0001 ; A=$0001 BRA @62 @59 BTSTA $000D,#$20 ; B=$000A BEQ @62 ; B=$000A BTSTA $0009,#$48 ; B=$000A BNE @62 ; B=$000A LDAA $0000 ; B=$000A ORAA $00DE ; A=$0000 B=$000A BMI @62 ; B=$000A N=$00DE BTSTA $000B,#$08 ; B=$000A BNE @62 ; B=$000A LDAA $001C ; B=$000A CMPA xD551 ; A=$001C B=$000A BHI @62 ; B=$000A LDAA $0026 ; B=$000A CMPA xD552 ; A=$0026 B=$000A BLS @62 ; B=$000A LDAA $00E3 ; B=$000A CMPA xD54F ; A=$00E3 B=$000A BCC @62 ; A=$00E3 B=$000A CMPA xD550 ; A=$00E3 B=$000A BLS @62 ; B=$000A LDAA $008F ; B=$000A INCA ; A=$008F B=$000A CMPA xD54E ; A=? B=$000A BLS @63 ; A=? B=$000A BITB #$02 ; B=$000A BEQ @60 ; B=$000A ORAB #$20 ; B=$000A @60 ORAB #$02 ; B=$000A @61 STAB $000A ; B=$000A @62 CLRA @63 STAA $008F ; A=? BTSTA $000A,#$60 BEQ @64 BSETA $0014,#$80 @64 LDAB $000B ANDB #$FD ; B=$000B LDAA xD556 ; B=$000B CMPA $0041 ; A=xD556 B=$000B BLS @65 ; B=$000B LDAA $0087 ; B=$000B CMPA xD557 ; A=$0087 B=$000B BHI @66 ; B=$000B BTST7A $000E,#$80 ; B=$000B BPL @65 ; B=$000B N=$000E BITB #$04 ; B=$000B BNE @65 ; B=$000B BTST7A $0009,#$80 ; B=$000B BPL @67 ; B=$000B N=$0009 INC $0087 ; B=$000B BRA @67 ; B=$000B @65 CLR $0087 ; B=$000B BRA @67 ; B=$000B @66 BSETA $0014,#$40 ; B=$000B ORAB #$02 ; B=$000B @67 LDAA $0041 ; B=$000B CMPA xD558 ; A=$0041 B=$000B BLS @69 ; B=$000B LDAA $0088 ; B=$000B CMPA xD559 ; A=$0088 B=$000B BHI @70 ; B=$000B BTST7A $000E,#$80 ; B=$000B BPL @69 ; B=$000B N=$000E BITB #$04 ; B=$000B BNE @69 ; B=$000B LDAA $0049 ; B=$000B CMPA xD55A ; A=$0049 B=$000B BHI @68 ; A=$0049 B=$000B CMPA xD55B ; A=$0049 B=$000B BCC @69 ; B=$000B @68 BTST7A $0009,#$80 ; B=$000B BPL @71 ; B=$000B N=$0009 INC $0088 ; B=$000B BRA @71 ; B=$000B @69 CLR $0088 ; B=$000B BRA @71 ; B=$000B @70 BSETA $0014,#$20 ; B=$000B ORAB #$02 ; B=$000B @71 ANDB #$FB ; B=$000B STAB $000B ; B=$000B LDAA $0009 ANDA #$02 ; A=$0009 ORAA $0014 ; A=$0009 STAA $0014 ; A=$0014 @72 BTSTA $0007,#$04 JNE @88 BTST7A $000B,#$80 JMI @89 ; N=$000B BTSTA $0000,#$10 JNE @88 JSR xFCC9 LDAA $0015 ORAA $0016 ; A=$0015 ORAA $0017 ; A=$0016 BNE @74 LDD $0012 ANDA $0051 ; A=$0012 B=$0013 ANDB $0052 ; A=$0051 B=$0013 STD $0015 ; A=$0051 B=$0052 LDAA $0014 ANDA $0053 ; A=$0014 STAA $0017 ; A=$0053 LDAA $0091 BEQ @73 DEC $0091 JMP @83 @73 BCLRA $000B,#$01 JMP @83 @74 LDX #$0003 CLRA ; X=#$0003 @75 LDAB $11(X) ; A=? X=? ANDB $14(X) ; A=? B=$11(X) X=? ANDB $50(X) ; A=? B=$14(X) X=? STAB $14(X) ; A=? B=$50(X) X=? BEQ @76 ; A=? X=? INCA ; A=? X=? @76 DEX ; A=? X=? BNE @75 ; A=? X=? INC $0091 ; A=? LDAB $000B ; A=? TSTA ; A=? B=$000B BNE @79 ; B=$000B LDAA $0091 ; B=$000B BITB #$01 ; A=$0091 B=$000B BNE @77 ; A=$0091 LDAB xD511 ; A=$0091 BRA @78 ; A=$0091 B=xD511 @77 LDAB xD513 ; A=$0091 @78 CBA ; A=$0091 B=xD513,xD511 BCS @83 ; B=xD513,xD511 STAB $0091 ; B=xD513,xD511 BRA @83 @79 LDAA $0091 ; B=$000B BITB #$01 ; A=$0091 B=$000B BNE @80 ; A=$0091 LDAB xD512 ; A=$0091 BRA @81 ; A=$0091 B=xD512 @80 LDAB xD514 ; A=$0091 @81 CBA ; A=$0091 B=xD514,xD512 BCS @83 MOVA xD513,$0091 BSETA $000B,#$01 CLRB LDX #$0003 ; B=#0 @82 BSETA $DF(X),$14(X) ; B=#0 X=? STAB $14(X) ; B=#0 X=? DEX ; B=#0 X=? BNE @82 ; B=#0 X=? CLR $00E9 JSR xFD2C STAA $00EA ; A=? @83 LDAA $0001 BIT7A #$80 ; A=$0001 N=$0001 BMI @84 ; A=$0001 N=$0001 BITA #$02 ; A=$0001 BNE @87 ; A=$0001 ORAA #$02 ; A=$0001 BRA @85 ; A=$0001 @84 ANDA #$FD ; A=$0001 @85 STAA $0001 ; A=$0001 BTSTA $0002,#$08 BNE @87 BTSTA $000B,#$01 BNE @87 @86 JSR xFBFF BRA @88 @87 JSR xFBF4 @88 CLRD STD $0012 ; A=#0 B=#0 BCLRA $0014,#$EF RTS @89 LDAA $000C BITA #$40 ; A=$000C BEQ @100 ; A=$000C DEC $0085 ; A=$000C LDAB $0085 ; A=$000C BEQ @90 ; A=$000C BRA @88 @90 BITA #$10 ; A=$000C BEQ @93 ; A=$000C ANDA #$EF ; A=$000C LDAB #$04 ; A=$000C @91 STAA $000C ; A=$000C,#0 B=? @92 STAB $0085 ; B=? BRA @86 @93 BITA #$20 ; A=$000C BNE @94 ; A=$000C LDAB $0081 ; A=$000C BNE @95 ; A=$000C B=$0081 LDAB #$08 ; A=$000C ORAA #$20 ; A=$000C B=#$08 BRA @91 ; A=$000C B=#$08 @94 LDAB $0082 ; A=$000C BEQ @97 ; A=$000C B=$0082 DECB ; A=$000C B=$0082 STAB $0082 ; A=$000C B=? BRA @96 ; A=$000C @95 DECB ; A=$000C B=$0081 STAB $0081 ; A=$000C B=? @96 ORAA #$10 ; A=$000C STAA $000C ; A=$000C MOVA #$04,$0085 BRA @87 @97 LDAB $0083 ; A=$000C ANDA #$03 ; A=$000C B=$0083 BEQ @98 ; B=$0083 LDAA $000C ; B=$0083 DECA ; A=$000C B=$0083 ANDA #$DF ; A=? B=$0083 BRA @106 ; A=? B=$0083 @98 LDAA $0084 ; B=$0083 @99 INCB ; A=? B=? CMPB #$1A ; A=? B=? BCS @101 ; A=? B=? CLRA ; B=? BRA @91 ; A=#0 B=? @100 LDAB #$02 ; A=$000C @101 CMPB #$02 ; A=? B=? BNE @102 ; A=? B=? LDAA $00E0 ; B=? ANDA xD50D ; A=$00E0 B=? ROLA ; A=xD50D B=? BRA @105 ; A=? B=? @102 CMPB #$0A ; A=? B=? BNE @103 ; A=? B=? LDAA $00E1 ; B=? ANDA xD50E ; A=$00E1 B=? BRA @104 ; A=xD50E B=? @103 CMPB #$12 ; A=? B=? BNE @104 ; A=? B=? LDAA xD50F ; B=? ORAA #$10 ; A=xD50F B=? ANDA $00E2 ; A=xD50F B=? @104 ROLA ; A=? B=? BCC @99 ; A=? B=? @105 STAA $0084 ; A=? B=? STAB $0083 ; B=? LDAA #$42 ; B=? @106 STAA $000C ; A=? B=? CLRA ; B=? @107 INCA ; A=? B=? SUBB #$05 ; A=? B=? BHI @107 ; A=? B=? ADDB #$05 ; A=? B=? STAA $0081 ; A=? B=? STAB $0082 ; B=? LDAB #$1C JMP @92 ; B=#$1C xFA43 LDAA $00(X) ; X=#xD565 CMPA #$03 ; A=$00(X) X=#xD565 BNE xFA4D ; X=#xD565 LDAA $0049 ; X=#xD565 BRA xFA57 ; X=#xD565 xFA4D LDAA $00(X) ; X=#xD1C0,#xD565 BNE @0 ; X=#xD1C0,#xD565 LDAA $0031 ; X=#xD1C0,#xD565 BRA xFA57 ; X=#xD1C0,#xD565 @0 LDAA $0026 ; X=#xD1C0,#xD565 xFA57 INX ; X=#xD1C0,#xD565 RTS xFA59 LDAA $002D BTSTB $0009,#$48 ; A=$002D BEQ @1 ; A=$002D BTST7B $0001,#$80 BPL @0 ; N=$0001 LDAA xD540 LDAB $0049 ; A=xD540 MUL ; A=xD540 B=$0049 ASLD ; A=? B=? BCS @0 ; A=? B=? ASLD ; A=? B=? BCS @0 ; A=? PSHA ; A=? LDAA $001C LSRA ; A=$001C LDX #xD541 ; A=? LDAB #$10 ; A=? X=#xD541 JSR xFB37 ; A=? B=#$10 X=#xD541 PULB ; A=? ABA ; A=? B=? BCS @0 ; A=? CMPA xD53F ; A=? BLS @1 ; A=? @0 LDAA xD53F @1 LDX #xD00E ; A=? LDAB $0010 ; A=? X=#xD00E ANDB #$01 ; A=? B=$0010 X=#xD00E ABX ; A=? B=$0010 X=#xD00E LDAB $00(X) ; A=? X=? LDX $0029 ; A=? B=$00(X) BSR xFB12 ; A=? B=$00(X) X=$0029 STD $0029 ; A=? B=? ASLB ; A=? B=? ADCA #$00 ; A=? STAA $002C ; A=? LDAB #$BD ; A=? MUL ; A=? B=#$BD BCC @2 ; A=? INCA ; A=? @2 ADDA #$15 ; A=? STAA $002E ; A=? xFAA8 MOVD #$011F,$BC12 LDAA $007A BNE @4 MOVA #$08,$007A LDAA $0007 ASRA ; A=$0007 BCC @2 LDX #xFE45-$0C LDAB #$0C ; X=#xFE45-$0C LDAA $001A ; B=#$0C X=#xFE45-$0C BEQ @7 ; A=$001A B=#$0C X=#xFE45-$0C @0 ABX ; A=? B=#$0C X=? SUBA #$10 ; A=? B=#$0C X=? BHI @0 ; A=? B=#$0C X=? LDAB $007B ; X=? CMPB #$0B ; B=$007B X=? BCC @3 ; B=$007B X=? LSRB ; B=$007B X=? BCC @1 ; B=? X=? LDAA $0022 BRA @6 ; A=$0022 @1 ASLB ; B=? X=? ABX ; B=? X=? LDX $00(X) ; X=? LDD $00(X) ; X=$00(X) STAB $0022 ; A=$00(X) B=$00+1(X) BRA @6 ; A=$00(X) @2 LDAA $0002 LDAB $007B ; A=$0002 BEQ @6 ; A=$0002 B=$007B LDX #xD4E7 ; B=$007B CMPB #$14 ; B=$007B X=#xD4E7 BCS @5 ; B=$007B X=#xD4E7 @3 CLRA STAA $007B ; A=#0 DECA ; A=#0 STAA $007C ; A=? BRA @8 @4 DEC $007A ASL $007C BCC @7 BRA @8 @5 DECB ; B=$007B X=#xD4E7 ASLB ; B=? X=#xD4E7 ABX ; B=? X=#xD4E7 LDX $00(X) ; X=? LDAA $00(X) ; X=$00(X) @6 STAA $007C ; A=$00(X),$0002,$0022 INC $007B @7 MOVD #$0017,$BC12 @8 RTS xFB12 STX $0053 ; A=? B=? X=? STAB $0051 ; A=? B=? BNE @0 ; A=? B=? LDD $0053 BRA @1 @0 MUL ; A=? B=? STD $0055 ; A=? B=? LDAA $0051 NEGA ; A=$0051 LDAB $0054 ; A=? MUL ; A=? B=$0054 ADCA #$00 ; A=? STAA $0052 ; A=? LDAA $0051 NEGA ; A=$0051 LDAB $0053 ; A=? MUL ; A=? B=$0053 ADDB $0052 ; A=? B=? ADCA #$00 ; A=? B=? ADDD $0055 ; A=? B=? @1 RTS xFB36 CLRB ; A=? X=? xFB37 CMPA $00(X) ; A=? B=? X=? BLS @0 ; A=? B=? X=? LDAA $00(X) ; B=? X=? @0 INX ; A=? B=? X=? BRA xFB45 ; A=? B=? X=? xFB40 LDAB $00(X) ; A=? X=? INX ; A=? B=$00(X) X=? BRA xFB4B ; A=? B=$00(X) X=? xFB45 DIFBA ; A=? B=? X=? xFB49 LDAB #$10 ; A=? X=? xFB4B MUL ; A=? B=#$10,$00(X) X=? PSHB ; A=? B=? X=? TAB ; A=? X=? ABX ; B=? X=? LDD $00(X) ; X=? xFB51 STAA $0051 ; A=$00(X),$0052 B=? SBA ; A=$00(X),$0052 B=? PULB ; A=? BCS @0 ; A=? B=? MUL ; A=? B=? NEGA ; A=? B=? ADDA $0051 ; A=? B=? ASLB ; A=? B=? SBCA #$00 ; A=? BRA @1 ; A=? @0 NEGA ; A=? B=? MUL ; A=? B=? ADCA $0051 ; A=? @1 STAA $0051 ; A=? RTS xFB67 DIFA $00(X) ; A=? B=? X=? DIFB $01(X) ; A=? B=? X=? STAB $0053 ; A=? B=? X=? LDAB #$10 ; A=? X=? MUL ; A=? B=#$10 X=? PSHB ; A=? B=? X=? LDAB $02(X) ; A=? X=? PSHB ; A=? B=$02(X) X=? MUL ; A=? B=$02(X) X=? ABX ; B=? X=? INX ; X=? INX ; X=? INX ; X=? PSHX ; X=? LDAA $0053 ; X=? BSR xFB49 ; A=$0053 X=? STAA $0052 ; A=? LDAA $0053 PULX ; A=$0053 PULB ; A=$0053 X=? ABX ; A=$0053 B=? X=? BSR xFB49 ; A=$0053 X=? TAB ; A=? LDAA $0052 ; B=? BRA xFB51 ; A=$0052 B=? xFB92 MOVX #$0FFFF,$0051 ; A=#$01,xD00A B=#$33,#$CC,xD00A+1 SUBD $0053 ; A=#$01,xD00A B=#$33,#$CC,xD00A+1 BCS @1 ; A=? B=? BRA @4 @0 SUBD $0053 ; A=? B=? BCC @2 ; A=? B=? @1 ADDD $0053 ; A=? B=? CLC ; A=? B=? BRA @3 ; A=? B=? @2 SEC ; A=? B=? @3 ROL $0052 ; A=? B=? ROL $0051 ; A=? B=? BCC @4 ; A=? B=? ASLD ; A=? B=? BCC @0 ; A=? B=? SUBD $0053 ; A=? B=? BRA @2 ; A=? B=? @4 LDD $0051 RTS xFBB9 STAA $0051 ; A=? X=? LDAB $01(X) ; A=? X=? MUL ; A=? B=$01(X) X=? ASLB ; A=? B=? X=? ADCA #$00 ; A=? X=? STAA $0052 ; A=? X=? LDAA $00(X) ; X=? LDAB $0051 ; A=$00(X) MUL ; A=$00(X) B=$0051 STAA $0051 ; A=? B=? CLRA ; B=? ADDD $0051 ; A=#0 B=? RTS xFBCE PSHB ; A=? B=#0,#$01 TAB ; A=? ORAB $0071 ; B=? LDAA #$01 ; B=$0071 STD $C002 ; A=#$01 B=$0071 PULB TSTB ; B=? BNE xFBF3 xFBDB LDX #$0019 @0 BTST7A $C000,#$80 ; X=? BMI @1 ; X=? N=$C000 DEX ; X=? BNE @0 ; X=? BSETA $0014,#$01 CLRA BRA xFBF3 @1 LDD $C000 TBA ; B=$C001 xFBF3 RTS xFBF4 LDAA #$F7 xFBF6 MOVX $BC3C,$0057 ; A=? ANDA $0058 ; A=? BRA xFC08 ; A=$0058 xFBFF LDAA #$08 xFC01 MOVX $BC3C,$0057 ; A=#$08,#$04,#$40 ORAA $0058 ; A=#$08,#$04,#$40 xFC08 ANDA #$FE ; A=$0058 ORAA #$22 ; A=$0058 STAA $0058 ; A=$0058 LDAA $0057 ANDA #$BB ; A=$0057 ORAA #$B9 ; A=$0057 STAA $0057 ; A=$0057 MOVX $0057,$BC3C RTS xFC1C BCC xFC20 ; A=? B=#$97 CLRA RTS xFC20 MUL ; A=? B=#$97 ASLD ; A=? B=? BCS @0 ; A=? B=? TSTB ; A=? B=? BPL @1 ; A=? N=? INCA ; A=? BNE @1 @0 LDAA #$FF @1 RTS xFC2D CLRA BTSTB $0000,#$10 ; A=#0 BNE @2 ; A=#0 LDAB $002C ; A=#0 CMPB $00FE ; A=#0 B=$002C BHI @2 ; A=#0 B=$002C LDAA $0009 ; B=$002C ANDA #$0C ; A=$0009 B=$002C BEQ @0 ; B=$002C CMPB xD53F ; B=$002C BCS xFC83 @0 LDAA $001A CMPA xD01F ; A=$001A BHI xFC7F LDAA $0049 CMPA xD020 ; A=$0049 BLS xFC7F ; A=$0049 SUBA $004D ; A=$0049 BCC @1 ; A=? NEGA ; A=? @1 CMPA xD021 ; A=? BHI xFC7F LDAA $0049 LDX #xD1AD ; A=$0049 JSR xFB40 ; A=$0049 X=#xD1AD LDAB $001C ; A=? DIFB #$10 ; A=? B=$001C MUL ; A=? B=? ADCA #$00 ; A=? @2 SUMA $002C ; A=? LDAB xD022 ; A=? LDX $00FE ; A=? B=xD022 JSR xFB12 ; A=? B=xD022 X=$00FE BRA xFC87 ; A=? B=? xFC7F LDAA $00FE BNE xFC89 xFC83 LDAA xD53F CLRB ; A=xD53F xFC87 STD $00FE ; A=? B=? xFC89 RTS xFC8A LDAA #$1B LDAB $00E3 ; A=#$1B CBA ; A=#$1B B=$00E3 BHI @0 ; B=$00E3 LDAA #$FC ; B=$00E3 SBA ; A=#$FC B=$00E3 BCC @1 ; A=? CLRA BRA @4 @0 LDAA #$E0 BRA @4 @1 CMPA #$DA ; A=? BLS @2 ; A=? PSHA ; A=? SUBA #$DA ; A=? LDAB #$03 ; A=? MUL ; A=? B=#$03 ADDB #$06 ; B=? PULA ; B=? ABA ; A=? B=? BRA @3 ; A=? @2 LDX #xFE24 ; A=? JSR xFB49 ; A=? X=#xFE24 @3 DIFA #$20 ; A=? @4 RTS xFCB9 LDAB xD28E ; A=? LDX $0022 ; A=? B=xD28E JSR xFB12 ; A=? B=xD28E X=$0022 STD $0022 ; A=? B=? ASLB ; A=? B=? ADCA #$00 ; A=? STAA $0021 ; A=? RTS xFCC9 LDD xD50D ORAA #$80 ; A=xD50D B=xD50D+1 STD $0051 ; A=xD50D B=xD50D+1 LDAA xD50F ORAA #$10 ; A=xD50F STAA $0053 ; A=xD50F RTS xFCD8 MOVA $0049,$004A LDAA $0048 BTSTB $0009,#$24 ; A=$0048 BEQ @0 ; A=$0048 LDAA xD524 @0 PSHA ; A=xD524,$0048 LDAB $004F ; A=xD524,$0048 CBA ; A=xD524,$0048 B=$004F BHI @1 ; A=xD524,$0048 LDX $004F ; A=xD524,$0048 LDAB xD28A ; A=xD524,$0048 X=$004F JSR xFB12 ; A=xD524,$0048 B=xD28A X=$004F STD $004F ; A=? B=? @1 LDD $004F BIT7B #$80,TSTB ; A=$004F B=$0050 BPL @2 ; A=$004F N=$0050 INCA ; A=$004F @2 TAB ; A=? PULA ; B=? DIFBA ; A=? B=? LDAB xD288 ; A=? MUL ; A=? B=xD288 ASLD ; A=? B=? BCS @3 ; A=? B=? ASLD ; A=? B=? BCS @3 ; A=? B=? TSTB ; A=? B=? BPL @4 ; A=? N=? INCA ; A=? BNE @4 ; A=? @3 LDAA #$FF @4 STAA $0049 ; A=? RTS xFD18 LDAA $00FE SUBA #$0D ; A=$00FE LDAB #$97 ; A=? MUL ; A=? B=#$97 ADCA #$00 ; A=? CMPA #$8F ; A=? BLS @0 ; A=? LDAA #$8F @0 LDAB #$60 ; A=? STAA $0051 ; A=? RTS xFD2C LDX #$0003 CLRA ; X=#$0003 @0 ADDA $DF(X) ; A=? X=? ASLA ; A=? X=? ADCA #$00 ; A=? X=? DEX ; A=? X=? BNE @0 ; A=? X=? RTS xFD39 RTS xFD3A LDAA #$04 CLRB ; A=#$04 JSR xFBCE ; A=#$04 B=#0 STAA $0025 ; A=? PSHA ; A=? LDAA $000B BITA #$20 ; A=$000B BNE @0 ; A=$000B LDD $00EB LSRD ; A=$00EB B=$00EC LDAA $000B ; B=? CMPB xD51B ; A=$000B B=? BLS @0 ; A=$000B ORAA #$20 ; A=$000B @0 ANDA #$F7 ; A=$000B STAA $000B ; A=$000B PULA CMPA xD51C ; A=? BCC @3 ; A=? BTSTB $000B,#$20 ; A=? BNE @1 ; A=? BTSTB $00E0,#$20 ; A=? BEQ @3 ; A=? BRA @2 @1 BSETB $0012,#$20 @2 BSETB $000B,#$08 LDAA xD51F @3 PSHA ; A=? BTSTA $000B,#$10 BNE @4 LDD $00EB LSRD ; A=$00EB B=$00EC CMPB xD51D ; B=? BLS @4 BSETA $000B,#$10 @4 PULA CMPA xD51E ; A=? BLS @7 ; A=? BTSTB $000B,#$10 ; A=? BNE @5 ; A=? BTSTB $00E0,#$10 ; A=? BNE @6 ; A=? BTSTB $000E,#$01 ; A=? BEQ @7 ; A=? BRA @6 @5 BSETB $0012,#$10 @6 BSETB $000B,#$08 LDAA xD51F @7 STAA $00E3 ; A=? RTS xFDBD LDX #$00ED LDAA #$80 ; X=#$00ED @0 STAA $00(X) ; A=#$80 X=? INX ; A=#$80 X=? CPX #$00FC ; A=#$80 X=? BLS @0 ; A=#$80 X=? RTS xFDCB CLR $006E MOVB xD027,$006F BCLRB $000D,#$02 RTS xFDDA LDAA $001A ; X=? CMPA #$20 ; A=$001A X=? BLS @0 ; A=$001A X=? LSRA ; A=$001A X=? ADDA #$10 ; A=? X=? BPL @0 ; A=? X=? N=? LDAA #$80 ; X=? @0 JMP xFB49 ; A=? X=? xFDEA BTSTA $0000,#$02 BEQ @0 JSR $5809 @0 RTS xFDF4 LDAA $00D2 BEQ xFDFE BSETA $0000,#$04 xFDFE MOVX #$0199,$BC0C LDX #$0000 BRA xFE16 ; X=#$0000 xFE09 LDX #$0040 BRA xFE16 ; X=#$0040 xFE0E LDX #$0080 BRA xFE16 ; X=#$0080 xFE13 LDX #$00C0 xFE16 LDAB #$20 ; X=? STS $0051 ; B=#$20 X=? TXS ; B=#$20 X=? @0 PULX ; B=? PSHX ; B=? X=? PULX ; B=? DECB ; B=? BNE @0 ; B=? LDS $0051 RTS xFE24 DC.B $00,$21,$36,$44,$51,$5C,$66,$70,$7A,$85,$90,$9D,$AB,$C0,$F3 xFE33 DC.B $10 DC.B $FF,$FF,$FF,$FF,$FF,$CD,$AB,$92,$80,$72,$66,$5D,$55,$4F,$49,$44,$40 xFE45 DC.W $0028 DC.W $002A DC.W $0030 DC.W $0032 DC.W $0034 DC.W $0026 DC.W $001C DC.W $0012 DC.W $0014 DC.W $0016 DC.W xD002 DC.W $0070 DC.W $BC00 DC.W $BC02 DC.W $BC04 DC.W $BC06 DC.W $BC0A DC.W $0020 xFE69 JSR xFF03 @0 BCC @0 MOVX $BC3C,$0018 JSR xFEFC CLRB ; A=? CMPA #$28 ; A=? B=#0 BLS @1 ; A=? B=#0 LDAB $0023 ; A=? BEQ @2 ; A=? B=$0023 CMPA #$5A ; A=? B=$0023 BCS @2 ; B=$0023 CLRB LDAA $0881 ; B=#0 ANDA #$30 ; A=$0881 B=#0 CMPA $001A ; A=$0881 B=#0 BEQ @2 ; A=$0881 B=#0 STAA $001A ; A=$0881 B=#0 STAB $007A ; B=#0 STAB $0070 ; B=#0 STAB $001B ; B=#0 DECB ; B=#0 STAB $007B ; B=? @1 INCB ; B=? @2 STAB $0023 ; B=? JSR xFAA8 LDD $0018 EORB #$04 ; A=$0018 B=$0019 STD $BC3C ; A=$0018 B=$0019 LDAA $001A BEQ @3 ; A=$001A LDAB $0881 ; A=$001A EORB #$08 ; A=$001A B=$0881 STAB $0881 ; A=$001A B=$0881 CMPA #$20 ; A=$001A B=$0881 BNE xFF11 ; B=$0881 CLRA LDAB #$C5 ; A=#0 STD $BC14 ; A=#0 B=#$C5 MOVX #$0100,$0055 LDX #$00DD JSR xE403 ; X=#$00DD STD $001C ; A=? B=? LDD $0018 ORAB #$80 ; A=$0018 B=$0019 STD $BC3C ; A=$0018 B=$0019 @3 LDD $0018 ANDA #$F7 ; A=$0018 B=$0019 ANDB #$6F ; A=$0018 B=$0019 ORAB #$08 ; A=$0018 B=$0019 CLR $0881 ; A=$0018 B=$0019 STD $BC3C ; A=$0018 B=$0019 CLR $0801 LDX #$BC0E CLRD ; X=#$BC0E STD $00(X) ; A=#0 B=#0 X=#$BC0E BSR xFF02 STD $06(X) ; A=? B=? X=? LDAA #$F0 BSR xFF02 STD $08(X) ; A=? B=? X=? BSR xFF02 STD $0A(X) ; A=? B=? X=? BSR xFF02 STD $0C(X) ; A=? B=? X=? JMP xFFC3 xFEFC LDAA #$02 xFEFE CLRB ; A=? JSR xFBCE ; A=? B=#0 xFF02 RTS xFF03 LDAA #$0C BSR xFEFE ; A=#$0C CMPA #$28 ; A=? BCS xFF0F ; A=? CMPA #$64 ; A=? BCS xFF10 xFF0F CLC xFF10 RTS xFF11 LDAA $0801 ; B=$0881 LSRB ; A=$0801 B=$0881 LSRB ; A=$0801 B=? LSRB ; A=$0801 B=? LSRB ; A=$0801 B=? ANDA #$F0 ; A=$0801 B=? ABA ; A=$0801 B=? STAA $0020 ; A=? LDAA $0070 ANDA #$0F ; A=$0070 PSHA ; A=$0070 BSR xFEFE ; A=$0070 LDX #$0026 ; A=? PULB ; A=? X=#$0026 ABX ; A=? B=? X=#$0026 STAA $00(X) ; A=? B=? X=? TSTB ; B=? BNE xFF7C LDAB #$80 LDAA $001B ; B=#$80 BNE xFF36 ; A=$001B B=#$80 LDAA #$03 ; B=#$80 xFF36 DECA ; A=#$03,$001B B=#$80 STAA $001B ; A=? B=#$80 BEQ xFF43 ; A=? B=#$80 LDAB #$1A ; A=? CMPA #$02 ; A=? B=#$1A BNE xFF43 ; B=#$1A LDAB #$E6 xFF43 LDX #$0F000 ; B=#$E6,#$1A,#$80 ABX ; B=#$E6,#$1A,#$80 X=#$F000 STX $BC16 ; X=? LDAA $0801 ; X=? ANDA #$0F ; A=$0801 X=? BNE xFF53 ; A=$0801 X=? LDAA #$10 ; X=? xFF53 LSRA ; A=#$10,$0801 X=? STX $BC18 ; A=? X=? STAA $0801 ; A=? X=? LDD $0018 ; X=? ORAB #$18 ; A=$0018 B=$0019 X=? BCC xFF62 ; A=$0018 B=$0019 X=? ANDB #$F7 ; A=$0018 B=$0019 X=? xFF62 STD $BC3C ; A=$0018 B=$0019 X=? LDAA $0021 ; X=? ASLA ; A=$0021 X=? ADCA #$00 ; A=? X=? STAA $0021 ; A=? X=? ANDA #$03 ; A=? X=? STX $BC1A ; A=? X=? LDAB $0881 ; A=? ANDB #$FC ; A=? B=$0881 ORAB #$04 ; A=? B=$0881 ABA ; A=? B=$0881 STAA $0881 ; A=? xFF7C LDX $BC00 BSR xFF02 LDD $BC00 ; X=? LSRD ; A=$BC00 B=$BC01 X=? LSRD ; A=? B=? X=? STD $001E ; A=? B=? X=? LDD #$028F ; X=? CPX #$028F ; A=#$02 B=#$8F X=? BHI xFFA1 ; A=#$02 B=#$8F X=? CPX #$0148 ; A=#$02 B=#$8F X=? BCS xFFAB ; A=#$02 B=#$8F LSRD ; A=#$02 B=#$8F STD $BC0E ; A=? B=? LDAB #$06 ; A=? STD $0053 ; A=? B=#$06 CLRD BRA xFFB8 xFFA1 STD $BC0E ; A=#$02 B=#$8F LSRD ; A=#$02 B=#$8F STD $0053 ; A=? B=? LDD $001E BRA xFFB8 xFFAB CLRA LDAB #$42 ; A=#0 STD $BC0E ; A=#0 B=#$42 LDAB #$C5 ; A=#0 STD $0053 ; A=#0 B=#$C5 CLRB ; A=#0 SUBD $001E ; A=#0 B=#0 xFFB8 MOVX $0053,$BC1C JSR xFD39 STD $BC36 ; A=? B=? xFFC3 JSR xFDFE JMP xE55B DCB.B 39,$00 xFFF0 DC.B $7E DC.B $E0 DC.B $88 xFFF3 DC.B $7E DC.B $F3 DC.B $1E xFFF6 DC.W xE427 DC.W xE428 DC.W xE427 DC.W xE243 DC.W xE243