EFFF               ORG  0EFFFH
EFFF 15F0    INTVC DEFW MNGER
F001 2167F0  INITI LD   HL,TABLE
F004 1168F0        LD   DE,TABLE+1
F007 015000        LD   BC,0050H
F00A 3600          LD   (HL),0
F00C EDB0          LDIR
F00E 3EEF          LD   A,0EFH
F010 ED47          LD   I,A
F012 ED5E          IM2
F014 C9            RET
F015 F5      MNGER PUSH AF
F016 E5            PUSH HL
F017 2167F0        LD   HL,TABLE
F01A 7E            LD   A,(HL)
F01B 23            INC  HL
F01C 1F            RRA
F01D D43800        CALL NC,0038H
F020 1F            RRA
F021 303F          JR   NC,MNOFF
F023 F3            DI
F024 C5            PUSH BC
F025 D5            PUSH DE
F026 0610          LD   B,10H
F028 5E      MNLOP LD   E,(HL)
F029 23            INC  HL
F02A 56            LD   D,(HL)
F02B 23            INC  HL
F02C 4E            LD   C,(HL)
F02D 23            INC  HL
F02E CB29          SRA  C
F030 302A          JR   NC,NONOW
F032 35            DEC  (HL)
F033 2027          JR   NZ,NONOW
F035 23            INC  HL
F036 7E            LD   A,(HL)
F037 2B            DEC  HL
F038 77            LD   (HL),A
F039 C5            PUSH BC
F03A E5            PUSH HL
F03B EB            EX   DE,HL
F03C 3A0000        LD   A,(0000H)
F03F A9            X0R  C
F040 FEF0          CP   0F0H
F042 2811          JR   Z,SHFRS
F044 FEE0          CP   0E0H
F046 2805          JR   Z,SPFRS
F048 CD66F0        CALL MNCAL
F04B 180D          JR   RETIN
F04D 2251F0  SPFRS LD   (SPJP),HL
F050 D7            RST  10H
0002         SPJP  DEFS 02H
F053 1805          JR   RETIN
F055 22ED5C  SHFRS LD   (5CEDH),HL
F058 CF            RST  08H
F059 32            DEFB 32H
F05A E1      RETIN POP  HL
F05B C1            POP  BC
F05C 23      NONOW INC  HL
F05D 23            INC  HL
F05E 10C8          DJNZ MNLOP
F060 D1            POP  DE
F061 C1            POP  BC
F062 E1      MNOFF POP  HL
F063 F1            POP  AF
F064 FB            EI
F065 C9            RET
F066 E9      MNCAL JP   (HL)
0051         TABLE DEFS 81