Subroutine da1a

da1a 12 76 08 19 brset (0x0076), 0x08, [0xDA37]
da1e dc 79       ldd (0x0079) ; SolC Duty Cycle
da20 c3 00 19    addd 0x0019                 add 0.0125%
da23 1a 83 27 10 cpd 0x2710                 compare to 50%
da27 22 03       bhi [0xDA2C]
da29 c3 00 4b    addd 0x004B                 add 0.0375%
da2c 93 7b       subd (0x007B)		Branch Target from da27 ; SolC Target Duty
da2e 23 02       bls [0xDA32]
da30 4f          clra
da31 5f          clrb
da32 d3 7b       addd (0x007B)		Branch Target from da2e ; SolC Target Duty
da34 dd 79       std (0x0079) ; SolC Duty Cycle
da36 39          rts

da37 d6 1a       ldab (0x001A)		Branch Target from da1a ; VSS2
da39 c1 1e       cmpb 0x1E
da3b 22 12       bhi [0xDA4F]
da3d 86 0a       ldaa 0x0A
da3f d6 4c       ldab (0x004C) ; Throttle_Opening
da41 cb 06       addb 0x06
da43 3d          mul
da44 dd c9       std (0x00C9)
da46 dc 79       ldd (0x0079) ; SolC Duty Cycle
da48 93 c9       subd (0x00C9)
da4a 83 07 d0    subd 0x07D0                 subtract 10%
da4d 24 05       bcc [0xDA54]
da4f 4f          clra		Branch Target from da3b
da50 5f          clrb
da51 15 76 08    bclr (0x0076), 0x08
da54 c3 03 e8    addd 0x03E8		Branch Target from da4d                 add 5%
da57 13 76 04 12 brclr (0x0076), 0x04, [0xDA6D]
da5b 15 76 04    bclr (0x0076), 0x04
da5e 83 27 10    subd 0x2710                 subtract 50%
da61 25 07       bcs [0xDA6A]
da63 83 0b b8    subd 0x0BB8                 subtract 15%
da66 24 02       bcc [0xDA6A]
da68 4f          clra
da69 5f          clrb
da6a c3 27 10    addd 0x2710		Branch Target from da61, da66                 add 50%
da6d dd 79       std (0x0079)		Branch Target from da57 ; SolC Duty Cycle
da6f 39          rts