Subroutine e93c

e93c d6 67       ldab (0x0067)
e93e 96 66       ldaa (0x0066)
e940 26 03       bne [0xE945]
e942 7e e9 b5    jmp (0xE9B5)
e945 81 01       cmpa 0x01		Branch Target from e940
e947 26 15       bne [0xE95E]
e949 cc 2a f8    ldd 0x2AF8                 55%
e94c 1a 93 6c    cpd (0x006C) ; SolB Duty Cycle
e94f 22 64       bhi [0xE9B5]
e951 dd 70       std (0x0070)
e953 dd 6c       std (0x006C) ; SolB Duty Cycle
e955 4f          clra
e956 5f          clrb
e957 dd 6e       std (0x006E) ; SolB Target Duty
e959 dd 72       std (0x0072)
e95b 7e e9 f7    jmp (0xE9F7)
e95e dc 3b       ldd (0x003B)		Branch Target from e947 ; RPM
e960 1a 83 07 d0 cpd 0x07D0
e964 2c 14       bge [0xE97A]
e966 dc 68       ldd (0x0068)
e968 b3 c0 35    subd (0xC035)
e96b 2f 29       ble [0xE996]
e96d b3 c0 37    subd (0xC037)
e970 2f 04       ble [0xE976]
e972 86 12       ldaa 0x12
e974 20 15       bra [0xE98B]
e976 86 0c       ldaa 0x0C		Branch Target from e970
e978 20 11       bra [0xE98B]
e97a dc 68       ldd (0x0068)		Branch Target from e964
e97c b3 c0 35    subd (0xC035)
e97f 2f 15       ble [0xE996]
e981 b3 c0 37    subd (0xC037)
e984 2f 04       ble [0xE98A]
e986 86 06       ldaa 0x06
e988 20 01       bra [0xE98B]
e98a 4f          clra		Branch Target from e984
e98b 97 75       staa (0x0075)		Branch Target from e974, e978, e988
e98d 4f          clra
e98e 5f          clrb
e98f dd 6e       std (0x006E) ; SolB Target Duty
e991 bd ea 01    jsr (0xEA01)
e994 20 61       bra [0xE9F7]
e996 cc 00 00    ldd 0x0000		Branch Target from e96b, e97f
e999 dd 72       std (0x0072)
e99b d6 4c       ldab (0x004C) ; Throttle_Opening
e99d f3 c0 40    addd (0xC040)
e9a0 dd 6e       std (0x006E) ; SolB Target Duty
e9a2 dc 6c       ldd (0x006C) ; SolB Duty Cycle
e9a4 b3 c0 2f    subd (0xC02F) ; 32.5%
e9a7 22 03       bhi [0xE9AC]
e9a9 cc 00 00    ldd 0x0000
e9ac f3 c0 2f    addd (0xC02F)		Branch Target from e9a7 ; 32.5%
e9af dd 70       std (0x0070)
e9b1 dd 6c       std (0x006C) ; SolB Duty Cycle
e9b3 20 42       bra [0xE9F7]
e9b5 cc 00 00    ldd 0x0000		Branch Target from e942, e94f
e9b8 dd 72       std (0x0072)
e9ba 97 66       staa (0x0066)
e9bc dc 6c       ldd (0x006C) ; SolB Duty Cycle
e9be dd 70       std (0x0070)
e9c0 b3 c0 31    subd (0xC031) ; 50%
e9c3 25 02       bcs [0xE9C7]
e9c5 4f          clra
e9c6 5f          clrb
e9c7 f3 c0 31    addd (0xC031)		Branch Target from e9c3 ; 50%
e9ca dd 6c       std (0x006C) ; SolB Duty Cycle
e9cc b3 c0 3e    subd (0xC03E) ; 20%
e9cf 23 15       bls [0xE9E6]
e9d1 12 57 02 11 brset (0x0057), 0x02, [0xE9E6]
e9d5 12 57 01 0d brset (0x0057), 0x01, [0xE9E6] ; No_Throttle
e9d9 d6 4c       ldab (0x004C) ; Throttle_Opening
e9db c1 06       cmpb 0x06
e9dd 23 07       bls [0xE9E6]
e9df dc 68       ldd (0x0068)
e9e1 b3 c0 3c    subd (0xC03C)
e9e4 25 0c       bcs [0xE9F2]
e9e6 cc 03 e8    ldd 0x03E8		Branch Target from e9cf, e9d1, e9d5, e9dd                 5%
e9e9 dd 6c       std (0x006C) ; SolB Duty Cycle
e9eb fc c0 2f    ldd (0xC02F) ; 32.5%
e9ee dd 70       std (0x0070)
e9f0 20 05       bra [0xE9F7]
e9f2 fc c0 42    ldd (0xC042)		Branch Target from e9e4
e9f5 dd 6e       std (0x006E) ; SolB Target Duty
e9f7 dc 6c       ldd (0x006C)		Branch Target from e95b, e994, e9b3, e9f0 ; SolB Duty Cycle
e9f9 ce 00 64    ldx 0x0064
e9fc 02          idiv
e9fd 8f          xgdx
e9fe d7 b4       stab (0x00B4) ; SelMon SolB Duty Cycle
ea00 39          rts