Subroutine da70

da70 96 59       ldaa (0x0059)
da72 84 80       anda 0x80
da74 27 0b       beq [0xDA81]
da76 bd de a4    jsr (0xDEA4)
da79 96 5e       ldaa (0x005E)
da7b 84 ba       anda 0xBA
da7d 88 ba       eora 0xBA
da7f 26 1b       bne [0xDA9C]
da81 15 59 c2    bclr (0x0059), 0xC2		Branch Target from da74
da84 cc 00 b2    ldd 0x00B2
da87 97 5d       staa (0x005D)
da89 d7 5e       stab (0x005E)
da8b de 55       ldx (0x0055)
da8d df 53       stx (0x0053)
da8f a6 29       ldaa (X+0x29)
da91 97 5f       staa (0x005F)
da93 97 60       staa (0x0060)
da95 bd da c3    jsr (0xDAC3)-Calc-Current-Gear
da98 d7 4e       stab (0x004E) ; Current_Gear
da9a 20 3a       bra [0xDAD6]
da9c de 55       ldx (0x0055)		Branch Target from da7f
da9e 96 5e       ldaa (0x005E)
daa0 a4 29       anda (X+0x29)
daa2 97 60       staa (0x0060)
daa4 96 5e       ldaa (0x005E)
daa6 43          coma
daa7 d6 5f       ldab (0x005F)
daa9 53          comb
daaa d7 c9       stab (0x00C9)
daac 94 c9       anda (0x00C9)
daae 9a 60       oraa (0x0060)
dab0 94 5d       anda (0x005D)
dab2 97 60       staa (0x0060)
dab4 96 5d       ldaa (0x005D)
dab6 9a 5e       oraa (0x005E)
dab8 43          coma
dab9 94 5f       anda (0x005F)
dabb 9a 60       oraa (0x0060)
dabd 84 b2       anda 0xB2
dabf 97 60       staa (0x0060)
dac1 20 13       bra [0xDAD6]


dad6 d6 60       ldab (0x0060)		Branch Target from da9a, dac1
dad8 c8 80       eorb 0x80
dada 17          tba
dadb 84 30       anda 0x30
dadd 81 10       cmpa 0x10
dadf 27 0a       beq [0xDAEB]
dae1 12 59 80 06 brset (0x0059), 0x80, [0xDAEB]
dae5 12 58 10 02 brset (0x0058), 0x10, [0xDAEB]
dae9 c4 7f       andb 0x7F
daeb d7 60       stab (0x0060)		Branch Target from dadf, dae1, dae5
daed 96 57       ldaa (0x0057)
daef 84 fd       anda 0xFD
daf1 c4 02       andb 0x02
daf3 1b          aba
daf4 97 57       staa (0x0057)
daf6 39          rts