IM2 interrupt processing

MUZ   EQU #C000
      ORG MUZ
+     INCBIN "MUSIC"
      ORG #6000
      DI
      CALL MUZ ;инициализируем музыку
      LD HL, #FE00
      LD A, H
      LD I, A ;I=#FE
      LD DE, #FE01
      LD BC, #100
      LD (HL), #5C
      LDIR ;заполняем таблицу прерывания
      LD L, (HL)
      LD H, L ;HL=#5C5C
      LD (HL), 195 ;JP
      INC HL
      LD (HL), IMER
      INC HL
      LD (HL), 'IMER
      IM 2
      EI

    <далее программа будет работать под музыку>

      IM 1 ;выключаем IM 2
      JP MUZ ;выключаем музыку и выходим

IMER  PUSH AF
      PUSH BC
      PUSH DE
      PUSH HL
      PUSH IX
      PUSH IY
      CALL MUZ+5 ;вызываем музыку
      POP IY
      POP IX
      POP HL
      POP DE
      POP BC
      POP AF
      EI
      RET