?login_element?

Subversion Repositories NedoOS

Rev

Rev 790 | Go to most recent revision | Blame | Compare with Previous | Last modification | View Log | Download | RSS feed

  1. ;
  2.         ;ORG    #9300
  3. ;
  4. GO
  5. L_9300  DI
  6.         LD      SP,#0000
  7.         XOR     A
  8.         OUT     (#FE),A
  9.         LD      (L_A390),A
  10.         XOR     A
  11.         LD      (L_C256),A
  12.         LD      (L_CF6F),A
  13.         LD      HL,L_C21F
  14.         LD      DE,L_C220
  15.         LD      (HL),#30
  16.         LD      BC,#0005
  17.         LDIR
  18.         LD      A,#06
  19.         LD      (L_C255),A
  20.         CALL    L_C2D9
  21.         CALL    MakeScreenYTable
  22.         CALL    Menu
  23. L_932C 
  24.         CALL    L_C257
  25.         CALL    L_CB6A
  26.         CALL    L_D3BF
  27.         CALL    L_9B30
  28.         CALL    L_C1A3
  29.         CALL    L_ACBA
  30.         CALL    L_B2AB
  31.         CALL    L_AD74
  32.         CALL    L_AF97
  33.         CALL    L_A3AC
  34.         CALL    L_B425
  35.         CALL    L_B5D2
  36.         CALL    L_B78A
  37.         CALL    L_BABE
  38.         CALL    L_C9E8
  39.         CALL    L_D1B5
  40.         CALL    L_CD02
  41.         CALL    L_AFA9
  42.         CALL    L_AD86
  43.         CALL    L_CFA2
  44.         CALL    L_CDF8
  45.         CALL    L_D0DE
  46.         CALL    L_B22E
  47.         XOR     A
  48.         LD      (L_A8C2),A
  49.         LD      (L_C899),A
  50.         LD      (L_C72B),A
  51.         LD      (L_D7BE),A
  52.         LD      A,(L_A390)
  53.         CP      #03
  54.         JR      Z,L_9392
  55.         CP      #0B
  56.         JR      Z,L_9392
  57.         CP      #10
  58.         JR      Z,L_9392
  59.         LD      HL,#2710
  60.         JR      L_93A1
  61. ;
  62. L_9392  LD      DE,#2010
  63.         CALL    L_CF70
  64.         LD      DE,#20E0
  65.         CALL    L_CF70
  66.         LD      HL,#4E20
  67. L_93A1  LD      (L_C295),HL
  68.         LD      (L_C297),HL
  69. L_93A7  XOR     A
  70.         LD      (L_95D2),A
  71.         LD      HL,L_9478
  72.         INC     (HL)
  73.         CALL    L_9738
  74.         LD      HL,L_95F6
  75.         LD      (L_95F4),HL
  76.         LD      (HL),#FF
  77.         CALL    ReadControls
  78.         CALL    L_A9BA
  79.         LD      HL,L_AB57
  80.         LD      (L_AB55),HL
  81.         LD      (HL),#FF
  82.         LD      HL,L_BFF1
  83.         LD      (L_BFEF),HL
  84.         LD      (HL),#FF
  85.         CALL    L_C33C
  86.         CALL    L_AB46
  87.         CALL    L_A3BE
  88.         CALL    L_CB9F
  89.         CALL    L_AD94
  90.         CALL    L_AFB7
  91.         CALL    L_AB0E
  92.         CALL    L_CE4F
  93.         CALL    L_C299
  94.         CALL    L_C2E7
  95.         CALL    L_CBE8
  96.         CALL    L_CF0A
  97.         CALL    L_D03F
  98.         CALL    L_D7C6
  99.         CALL    L_A7B9
  100.         CALL    L_C67A
  101.         CALL    L_C72D
  102.         CALL    L_C89B
  103.         CALL    L_ACCC
  104.         CALL    L_B32B
  105.         CALL    L_AEE7
  106.         CALL    L_B271
  107.         CALL    L_B111
  108.         CALL    L_B4D8
  109.         CALL    L_B676
  110.         CALL    L_B8AB
  111.         CALL    L_BBDF
  112.         CALL    L_CEE0
  113.         CALL    L_CA68
  114.         CALL    L_CFC0
  115.         CALL    L_D120
  116.         CALL    L_D259
  117.         CALL    L_D3EF
  118.         CALL    L_C0A6
  119.         CALL    L_B306
  120.         CALL    L_B437
  121.         CALL    L_B79C
  122.         CALL    L_BAD0
  123.         CALL    L_AEC2
  124.         CALL    L_B0EB
  125.         CALL    L_B651
  126.         CALL    L_CA43
  127.         CALL    L_D234
  128.         CALL    L_9697
  129.         CALL    L_9490
  130.         CALL    L_94AF
  131.         CALL    L_94A5
  132.         LD      A,(L_9478)
  133.         AND     #01
  134.         JP      NZ,L_93A7
  135.         LD      DE,L_FFF6
  136.         LD      HL,(L_C295)
  137.         ADD     HL,DE
  138.         LD      (L_C295),HL
  139.         CALL    L_C257
  140.         CALL    L_C1CE
  141.         JP      L_93A7
  142. ;
  143. L_9478       DB       #F1
  144. ;
  145.        DB       #CD,#9F,#F6,#21,#90,#A3,#B7,#C8       ;M.v!.#7H
  146.        DB       #FE,#39,#28,#07,#FE,#30,#C0,#34       ;~9(.~0@4
  147.        DB       #C3,#2C,#93,#35,#C3,#2C,#93       ;C,.5C,.
  148. ;
  149. L_9490  LD      A,(L_95D2)
  150.         LD      B,A
  151.         LD      A,#0A
  152.         SUB     B
  153.         RET     C
  154.         RET     Z
  155.         LD      B,A
  156. L_949A  PUSH    BC
  157.         LD      BC,#01F4
  158.         CALL    PauseBC
  159.         POP     BC
  160.         DJNZ    L_949A
  161.         RET
  162. ;
  163. L_94A5  LD      A,#FB
  164.         IN      A,(#FE)
  165.         ;AND    #1F ;qwert
  166.         and 0x15 ;q+e+t
  167.         JP      Z,L_9300
  168.         RET
  169. ;
  170. L_94AF  LD      A,#FE
  171.         IN      A,(#FE)
  172.         AND     #01
  173.         RET     NZ
  174.         LD      A,#7F
  175.         IN      A,(#FE)
  176.         AND     #02
  177.         RET     NZ
  178.         LD      BC,#01F4
  179.         CALL    PauseBC
  180.         CALL    WaitNoKey
  181. L_94C6  CALL    L_F69F
  182.         OR      A
  183.         JR      Z,L_94C6
  184.         RET
  185. ;
  186. L_94CD  PUSH    AF
  187.         PUSH    BC
  188.         PUSH    DE
  189.         PUSH    HL
  190.         PUSH    IX
  191.         LD      L,A
  192.         LD      H,#00
  193.         ADD     HL,HL
  194.         ADD     HL,HL
  195.         ADD     HL,HL
  196.         ADD     HL,HL
  197.         ADD     HL,HL
  198.         ADD     HL,HL
  199.         LD      BC,L_DE22
  200.         ADD     HL,BC
  201.         LD      (L_95E3),SP
  202.         LD      SP,HL
  203.         LD      A,E
  204.         AND     #07
  205.         ADD     A,A
  206.         LD      L,A
  207.         LD      H,#00
  208.         LD      BC,L_95D3
  209.         ADD     HL,BC
  210.         LD      C,(HL)
  211.         INC     HL
  212.         LD      B,(HL)
  213.         LD      IX,#0000
  214.         ADD     IX,BC
  215.         LD      L,D
  216.         LD      H,#00
  217.         ADD     HL,HL
  218.         ADD     HL,HL
  219.         ADD     HL,HL
  220.         ADD     HL,HL
  221.         ADD     HL,HL
  222.         LD      D,#73
  223. L_9502       EQU       $-1
  224.         LD      A,E
  225.         AND     #F8
  226.         RRCA
  227.         RRCA
  228.         RRCA
  229.         LD      E,A
  230.         ADD     HL,DE
  231.         LD      (L_9566),HL
  232.         LD      B,#10
  233. L_9510  POP     DE
  234.         SCF
  235.         LD      C,#FF
  236.         JP      (IX)
  237. ;
  238. L_9516  RL      D
  239.         RL      E
  240.         RL      C
  241. L_951C  RL      D
  242.         RL      E
  243.         RL      C
  244. L_9522  RL      D
  245.         RL      E
  246.         RL      C
  247. L_9528  RL      D
  248.         RL      E
  249.         RL      C
  250.         LD      A,C
  251.         AND     (HL)
  252.         LD      (HL),A
  253.         INC     HL
  254.         LD      A,E
  255.         AND     (HL)
  256.         LD      (HL),A
  257.         INC     HL
  258.         LD      A,D
  259.         AND     (HL)
  260.         LD      (HL),A
  261.         LD      DE,#001E
  262.         ADD     HL,DE
  263.         DJNZ    L_9510
  264.         JP      L_9565
  265. ;
  266. L_9542  RR      E
  267.         RR      D
  268.         RR      C
  269. L_9548  RR      E
  270.         RR      D
  271.         RR      C
  272. L_954E  RR      E
  273.         RR      D
  274.         RR      C
  275. L_9554  LD      A,E
  276.         AND     (HL)
  277.         LD      (HL),A
  278.         INC     HL
  279.         LD      A,D
  280.         AND     (HL)
  281.         LD      (HL),A
  282.         INC     HL
  283.         LD      A,C
  284.         AND     (HL)
  285.         LD      (HL),A
  286.         LD      DE,#001E
  287.         ADD     HL,DE
  288.         DJNZ    L_9510
  289. L_9565  LD      HL,#830F
  290. L_9566       EQU       $-2
  291.         LD      DE,#005E
  292.         ADD     IX,DE
  293.         LD      B,#10
  294. L_956F  POP     DE
  295.         LD      C,#00
  296.         JP      (IX)
  297. ;
  298.         SLA     D
  299.         RL      E
  300.         RL      C
  301.         SLA     D
  302.         RL      E
  303.         RL      C
  304.         SLA     D
  305.         RL      E
  306.         RL      C
  307.         SLA     D
  308.         RL      E
  309.         RL      C
  310.         LD      A,C
  311.         OR      (HL)
  312.         LD      (HL),A
  313.         INC     HL
  314.         LD      A,E
  315.         OR      (HL)
  316.         LD      (HL),A
  317.         INC     HL
  318.         LD      A,D
  319.         OR      (HL)
  320.         LD      (HL),A
  321.         LD      DE,#001E
  322.         ADD     HL,DE
  323.         DJNZ    L_956F
  324.         JP      L_95C3
  325. ;
  326.         SRL     E
  327.         RR      D
  328.         RR      C
  329.         SRL     E
  330.         RR      D
  331.         RR      C
  332.         SRL     E
  333.         RR      D
  334.         RR      C
  335.         LD      A,E
  336.         OR      (HL)
  337.         LD      (HL),A
  338.         INC     HL
  339.         LD      A,D
  340.         OR      (HL)
  341.         LD      (HL),A
  342.         INC     HL
  343.         LD      A,C
  344.         OR      (HL)
  345.         LD      (HL),A
  346.         LD      DE,#001E
  347.         ADD     HL,DE
  348.         DJNZ    L_956F
  349. L_95C3  LD      SP,(L_95E3)
  350.         LD      HL,L_95D2
  351.         INC     (HL)
  352.         POP     IX
  353.         POP     HL
  354.         POP     DE
  355.         POP     BC
  356.         POP     AF
  357.         RET
  358. ;
  359. L_95D2       DB       #05
  360. ;
  361. L_95D3       DW       L_9554
  362.        DW       L_954E
  363.        DW       L_9548
  364.        DW       L_9542
  365.        DW       L_9516
  366.        DW       L_951C
  367.        DW       L_9522
  368.        DW       L_9528
  369. L_95E3       DW       L_FFEE
  370. ;
  371. L_95E5  PUSH    HL
  372.         LD      HL,(L_95F4)
  373.         LD      (HL),E
  374.         INC     HL
  375.         LD      (HL),D
  376.         INC     HL
  377.         LD      (HL),#FF
  378.         LD      (L_95F4),HL
  379.         POP     HL
  380.         RET
  381. ;
  382. L_95F4       DW       L_9612
  383. ;
  384. L_95F6       DB       #00,#00,#00,#00,#00,#00,#00,#00
  385.        DB       #00,#00,#00,#00,#48,#90,#48,#90
  386.        DB       #38,#70,#B8,#70,#68,#20,#6B,#20
  387.        DB       #80,#80,#7F,#80
  388. L_9612       DB       #FF,#40,#54,#40,#BE,#B0,#C0,#B0
  389.        DB       #FF,#40,#FF,#30,#FF,#78,#FF,#30
  390.        DB       #FF,#00,#00,#00,#00,#00,#00,#00
  391.        DB       #00,#00,#00,#00,#00,#00,#00,#00
  392.        DB       #00,#00,#00,#00,#00,#00,#00,#00
  393.        DB       #00,#00,#00,#00,#00,#00,#00,#00
  394.        DB       #00,#00,#00,#00,#00,#00,#00,#00
  395.        DB       #00,#00,#00,#00,#00,#00,#00,#00
  396.        DB       #00,#00,#00,#00,#00,#00,#00,#00
  397.        DB       #00,#00,#00,#00,#00,#00,#00,#00
  398.        DB       #00,#00,#00,#00,#00,#00,#00,#00
  399.        DB       #00,#00,#00,#00,#00,#00,#00,#00
  400.        DB       #00,#00,#00,#00,#00,#00,#00,#00
  401.        DB       #00,#00,#00,#00,#00,#00,#00,#00
  402.        DB       #00,#00,#00,#00,#00,#00,#00,#00
  403.        DB       #00,#00,#00,#00,#00,#00,#00,#00
  404.        DB       #00,#00,#00,#00,#00
  405. ;
  406. L_9697  LD      HL,L_95F6
  407. L_969A  LD      A,(HL)
  408.         CP      #FF
  409.         RET     Z
  410.         LD      E,A
  411.         INC     HL
  412.         LD      D,(HL)
  413.         INC     HL
  414.         PUSH    HL
  415.         CALL    L_96A9
  416.         POP     HL
  417.         JR      L_969A
  418. ;
  419. L_96A9  LD      A,D
  420.         CP      #08
  421.         JP      C,L_96F0
  422.         LD      L,D
  423.         LD      H,#00
  424.         ADD     HL,HL
  425.         ADD     HL,HL
  426.         ADD     HL,HL
  427.         ADD     HL,HL
  428.         ADD     HL,HL
  429.         LD      B,#73
  430.         LD      A,E
  431.         AND     #F8
  432.         RRCA
  433.         RRCA
  434.         RRCA
  435.         LD      C,A
  436.         ADD     HL,BC
  437.         PUSH    HL
  438.         CALL    CountScreenAddr_bytable_DEyx
  439.         EX      DE,HL
  440.         POP     HL
  441.         LD      BC,L_FFFF
  442.         LD      A,#10
  443. L_96CC  EX      AF,AF' ;'
  444.         LDI
  445.         LDI
  446.         LDI
  447.         DEC     DE
  448.         DEC     DE
  449.         DEC     DE
  450.         INC     D
  451.         LD      A,D
  452.         AND     #07
  453.         JR      NZ,L_96E6
  454.         LD      A,E
  455.         ADD     A,#20
  456.         LD      E,A
  457.         JR      C,L_96E6
  458.         LD      A,D
  459.         SUB     #08
  460.         LD      D,A
  461. L_96E6  LD      BC,#001D
  462.         ADD     HL,BC
  463.         EX      AF,AF' ;'
  464.         DEC     A
  465.         JP      NZ,L_96CC
  466.         RET
  467. ;
  468. L_96F0  LD      A,D
  469.         CPL
  470.         AND     #07
  471.         INC     A
  472.         ADD     A,D
  473.         LD      D,A
  474.         LD      L,D
  475.         LD      H,#00
  476.         ADD     HL,HL
  477.         ADD     HL,HL
  478.         ADD     HL,HL
  479.         ADD     HL,HL
  480.         ADD     HL,HL
  481.         LD      B,#73
  482.         LD      A,E
  483.         AND     #F8
  484.         RRCA
  485.         RRCA
  486.         RRCA
  487.         LD      C,A
  488.         ADD     HL,BC
  489.         PUSH    HL
  490.         CALL    CountScreenAddr_bytable_DEyx
  491.         EX      DE,HL
  492.         POP     HL
  493.         LD      BC,L_FFFF
  494.         LD      A,#10
  495. L_9714  EX      AF,AF' ;'
  496.         LDI
  497.         LDI
  498.         LDI
  499.         DEC     DE
  500.         DEC     DE
  501.         DEC     DE
  502.         INC     D
  503.         LD      A,D
  504.         AND     #07
  505.         JR      NZ,L_972E
  506.         LD      A,E
  507.         ADD     A,#20
  508.         LD      E,A
  509.         JR      C,L_972E
  510.         LD      A,D
  511.         SUB     #08
  512.         LD      D,A
  513. L_972E  LD      BC,#001D
  514.         ADD     HL,BC
  515.         EX      AF,AF' ;'
  516.         DEC     A
  517.         JP      NZ,L_9714
  518.         RET
  519. ;
  520. L_9738  LD      HL,L_95F6
  521. L_973B  LD      A,(HL)
  522.         CP      #FF
  523.         RET     Z
  524.         LD      E,A
  525.         INC     HL
  526.         LD      D,(HL)
  527.         INC     HL
  528.         PUSH    HL
  529.         CALL    L_974A
  530.         POP     HL
  531.         JR      L_973B
  532. ;
  533. L_974A  LD      L,D
  534.         LD      H,#00
  535.         ADD     HL,HL
  536.         ADD     HL,HL
  537.         ADD     HL,HL
  538.         ADD     HL,HL
  539.         ADD     HL,HL
  540.         LD      D,#5B
  541.         LD      A,E
  542.         AND     #F8
  543.         RRCA
  544.         RRCA
  545.         RRCA
  546.         LD      E,A
  547.         ADD     HL,DE
  548.         PUSH    HL
  549.         LD      DE,#1800
  550.         ADD     HL,DE
  551.         EX      DE,HL
  552.         POP     HL
  553.         LD      BC,L_FFFF
  554.         LD      A,#10
  555. L_9768  LDI
  556.         LDI
  557.         LDI
  558.         LD      BC,#001D
  559.         ADD     HL,BC
  560.         EX      DE,HL
  561.         ADD     HL,BC
  562.         EX      DE,HL
  563.         DEC     A
  564.         JP      NZ,L_9768
  565.         RET
  566. ;
  567. DrawSprite
  568.         PUSH    AF
  569.         PUSH    BC
  570.         PUSH    DE
  571.         PUSH    HL
  572.         CALL    CountScrAddr_DEyx
  573.         LD      BC,#9000
  574.         ADD     HL,BC
  575.         LD      (HL),A
  576.         LD      L,A
  577.         LD      H,#00
  578.         ADD     HL,HL
  579.         ADD     HL,HL
  580.         ADD     HL,HL
  581.         ADD     HL,HL
  582.         ADD     HL,HL
  583.         LD      BC,L_DDC2
  584.         ADD     HL,BC
  585.         LD      (L_95E3),SP
  586.         LD      SP,HL
  587.         LD      A,D
  588.         ADD     A,A
  589.         ADD     A,A
  590.         ADD     A,A
  591.         LD      L,A
  592.         LD      H,#00
  593.         ADD     HL,HL
  594.         ADD     HL,HL
  595.         ADD     HL,HL
  596.         ADD     HL,HL
  597.         ADD     HL,HL
  598.         LD      D,#5B
  599.         ADD     HL,DE
  600.         LD      A,#10
  601.         LD      BC,#001F
  602. L_97AB  POP     DE
  603.         LD      (HL),E
  604.         INC     HL
  605.         LD      (HL),D
  606.         ADD     HL,BC
  607.         DEC     A
  608.         JP      NZ,L_97AB
  609.         LD      SP,(L_95E3)
  610.         POP     HL
  611.         POP     DE
  612.         POP     BC
  613.         POP     AF
  614.         RET
  615. ;
  616. L_97BD  LD      HL,#5B00
  617.         LD      DE,#7300
  618.         LD      BC,#1800
  619.         LDIR
  620.         RET
  621. ;
  622.        DB       #21,#00,#73,#11,#00,#5B,#01,#00       ;!.s..[..
  623.        DB       #18,#ED,#B0,#C9       ;.m0I
  624. ;
  625. L_97D5  LD      HL,#7300
  626.         LD      DE,#4000
  627.         LD      B,#C0
  628. L_97DD  PUSH    BC
  629.         PUSH    DE
  630.         LD      BC,#0020
  631.         LDIR
  632.         POP     DE
  633.         POP     BC
  634.         EX      DE,HL
  635.         CALL    DownHL
  636.         EX      DE,HL
  637.         DJNZ    L_97DD
  638.         RET
  639. ;
  640. L_97EE  PUSH    DE
  641.         PUSH    AF
  642.         LD      A,E
  643.         AND     #F8
  644.         RRCA
  645.         RRCA
  646.         RRCA
  647.         LD      E,A
  648.         LD      A,D
  649.         AND     #F8
  650.         RRCA
  651.         RRCA
  652.         RRCA
  653.         LD      D,A
  654.         CALL    CountScrAddr_DEyx
  655.         LD      DE,#8D00
  656.         ADD     HL,DE
  657.         POP     AF
  658.         POP     DE
  659.         RET
  660. ;
  661. CountScrAddr_DEyx
  662.         PUSH    AF
  663.         LD      A,D
  664.         SRA     A
  665.         SRA     A
  666.         SRA     A
  667.         LD      H,A
  668.         LD      A,D
  669.         AND     #07
  670.         RRCA
  671.         RRCA
  672.         RRCA
  673.         ADD     A,E
  674.         LD      L,A
  675.         POP     AF
  676.         RET
  677. ;
  678. L_981B  PUSH    AF
  679.         PUSH    BC
  680.         PUSH    DE
  681.         PUSH    HL
  682.         CALL    CountScrAddr_DEyx
  683.         LD      DE,#5800
  684.         ADD     HL,DE
  685.         LD      DE,#001F
  686.         LD      (HL),C
  687.         INC     L
  688.         LD      (HL),C
  689.         ADD     HL,DE
  690.         LD      (HL),C
  691.         INC     L
  692.         LD      (HL),C
  693.         POP     HL
  694.         POP     DE
  695.         POP     BC
  696.         POP     AF
  697.         RET
  698. ;
  699. L_9835  PUSH    BC
  700.         PUSH    HL
  701.         LD      HL,tkeys
  702.         LD      D,#FE
  703. L_983C  LD      A,D
  704.         IN      A,(#FE)
  705.         LD      E,#01
  706.         LD      B,#05
  707. L_9843  RRCA
  708.         JR      NC,L_984F
  709.         INC     HL
  710.         SLA     E
  711.         DJNZ    L_9843
  712.         RLC     D
  713.         JR      C,L_983C
  714. L_984F  LD      A,(HL)
  715.         POP     HL
  716.         POP     BC
  717.         RET
  718. ;
  719. tkeys
  720.        DB       #01
  721.        DM       "ZXCVASDFGQWERT1234509876POIUY"
  722.        DB       #0D
  723.        DM       "LKJH "
  724.        DB       #02
  725.        DM       "MNB"
  726.        DB       #00
  727. ;
  728. WaitNoKey
  729.         XOR     A
  730.         IN      A,(#FE)
  731.         CPL
  732.         AND     #1F
  733.         JR      NZ,WaitNoKey
  734.         RET
  735. ;
  736.        DB       #3E,#F7,#DB,#FE,#E6,#1F,#FE,#1B       ;>w[~f.~.
  737.        DB       #C0,#01,#F4,#01,#CD,#1A,#99,#CD       ;@.t.M..M
  738.        DB       #7C,#98,#C3,#00,#00       ;|.C..
  739. ;
  740. L_989A  PUSH    HL
  741.         PUSH    DE
  742.         PUSH    BC
  743.         LD      HL,(L_98B5)
  744.         LD      DE,#0007
  745.         ADD     HL,DE
  746.         LD      E,L
  747.         LD      D,H
  748.         ADD     HL,HL
  749.         ADD     HL,HL
  750.         LD      C,L
  751.         LD      B,H
  752.         ADD     HL,HL
  753.         ADD     HL,BC
  754.         ADD     HL,DE
  755.         LD      (L_98B5),HL
  756.         XOR     H
  757.         POP     BC
  758.         POP     DE
  759.         POP     HL
  760.         RET
  761. ;
  762. L_98B5       DW       L_AB61
  763. ;
  764. Cls
  765.         LD      C,#00
  766. Cls_attrC
  767.         LD      HL,#5AFF
  768.         LD      DE,#5AFE
  769.         LD      (HL),C
  770.         LD      BC,#0300
  771.         LDDR
  772.         LD      (HL),#00
  773.         LD      BC,#17FF
  774.         LDDR
  775.         RET
  776. ;
  777. MakeScreenYTable
  778.         LD      IX,screenYtable;#8B00
  779.         LD      IY,screenYtable+256;#8C00
  780.         LD      HL,#4000
  781.         LD      B,#C0
  782. L_98DA  LD      (IX+#00),H
  783.         LD      (IY+#00),L
  784.         CALL    DownHL
  785.         INC     IX
  786.         INC     IY
  787.         DJNZ    L_98DA
  788.         RET
  789. ;
  790. CountScreenAddr_bytable_DEyx
  791.         PUSH    AF
  792.         LD      L,D
  793.         LD      H,screenYtable/256;#8B
  794.         LD      A,(HL)
  795.         INC     H
  796.         LD      L,(HL)
  797.         LD      H,A
  798.         LD      A,E
  799.         AND     #F8
  800.         RRCA
  801.         RRCA
  802.         RRCA
  803.         ADD     A,L
  804.         LD      L,A
  805.         POP     AF
  806.         RET
  807. ;
  808. DownHL  INC     H
  809.         LD      A,H
  810.         AND     #07
  811.         RET     NZ
  812.         LD      A,L
  813.         ADD     A,#20
  814.         LD      L,A
  815.         RET     C
  816.         LD      A,H
  817.         SUB     #08
  818.         LD      H,A
  819.         RET
  820. ;
  821.        DB       #7C,#25,#E6,#07,#C0,#7D,#D6,#20       ;|%f.@}V
  822.        DB       #6F,#D8,#7C,#C6,#08,#67,#C9       ;oX|F.gI
  823. ;
  824. PauseBC
  825.         PUSH    BC
  826.         PUSH    DE
  827.         PUSH    HL
  828.         LD      HL,#0000
  829.         LD      DE,#0000
  830.         LDIR
  831.         POP     HL
  832.         POP     DE
  833.         POP     BC
  834.         RET
  835. ;
  836. PrintString_HL
  837.         LD      A,(HL)
  838.         INC     HL
  839.         CP      #61
  840.         JP      NC,L_9937
  841.         CALL    PrintChar
  842. printstring_printcharaddr=$-2
  843.         INC     E
  844.         JP      PrintString_HL
  845. ;
  846. L_9937  CP      #90
  847.         JP      NC,L_9947
  848.         SUB     #78
  849.         ADD     A,D
  850.         LD      D,A
  851.         LD      A,(HL)
  852.         ADD     A,E
  853.         LD      E,A
  854.         INC     HL
  855.         JP      PrintString_HL
  856. ;
  857. L_9947  CP      #CF
  858.         JP      NC,L_9954
  859.         INC     D
  860.         SUB     #AF
  861.         ADD     A,E
  862.         LD      E,A
  863.         JP      PrintString_HL
  864. ;
  865. L_9954  CP      #DF
  866.         JP      NC,L_996D
  867.         SUB     #CF
  868.         CP      #08
  869.         JP      C,L_9964
  870.         SUB     #08
  871.         OR      #40
  872. L_9964  LD      B,A
  873.         LD      A,C
  874.         AND     #38
  875.         OR      B
  876.         LD      C,A
  877.         JP      PrintString_HL
  878. ;
  879. L_996D  CP      #DF
  880.         JP      NZ,L_9979
  881.         LD      D,(HL)
  882.         INC     HL
  883.         LD      E,(HL)
  884.         INC     HL
  885.         JP      PrintString_HL
  886. ;
  887. L_9979  CP      #E0
  888.         JP      NZ,L_9983
  889.         LD      C,(HL)
  890.         INC     HL
  891.         JP      PrintString_HL
  892. ;
  893. L_9983  CP      #E1
  894.         JP      NZ,L_998F
  895.         LD      B,(HL)
  896.         INC     HL
  897. L_998A  PUSH    HL
  898.         PUSH    BC
  899.         JP      PrintString_HL
  900. ;
  901. L_998F  CP      #E2
  902.         JP      NZ,L_999F
  903.         POP     BC
  904.         DJNZ    L_999B
  905.         POP     AF
  906.         JP      PrintString_HL
  907. ;
  908. L_999B  POP     HL
  909.         JP      L_998A
  910. ;
  911. L_999F  CP      #E3
  912.         JP      NZ,L_99B5
  913.         LD      A,(HL)
  914.         INC     HL
  915.         PUSH    HL
  916.         LD      H,(HL)
  917.         LD      L,A
  918.         PUSH    BC
  919.         PUSH    DE
  920.         CALL    PrintString_HL
  921.         POP     DE
  922.         POP     BC
  923.         POP     HL
  924.         INC     HL
  925.         JP      PrintString_HL
  926. ;
  927. L_99B5  CP      #E4
  928.         JP      NZ,L_99C7
  929.         LD      B,(HL)
  930.         INC     HL
  931.         LD      A,(HL)
  932. L_99BD  CALL    PrintChar
  933. L_99BE       EQU       $-2
  934.         INC     E
  935.         DJNZ    L_99BD
  936.         INC     HL
  937.         JP      PrintString_HL
  938. ;
  939. L_99C7  CP      #E5
  940.         JP      NZ,L_99D9
  941.         LD      B,(HL)
  942.         INC     HL
  943.         LD      A,(HL)
  944. L_99CF  CALL    PrintChar
  945. L_99D0       EQU       $-2
  946.         INC     D
  947.         DJNZ    L_99CF
  948.         INC     HL
  949.         JP      PrintString_HL
  950. ;
  951. L_99D9  CP      #E6
  952.         JR      NZ,L_99EA
  953.         LD      A,(HL)
  954.         LD      (L_9A57),A
  955.         INC     HL
  956.         LD      A,(HL)
  957.         LD      (L_9A58),A
  958.         INC     HL
  959.         JP      PrintString_HL
  960. ;
  961. L_99EA  CP      #E7
  962.         JR      NZ,L_9A07
  963.         PUSH    HL
  964.         LD      HL,(L_9A57)
  965.         PUSH    HL
  966.         LD      HL,L_D712
  967.         LD      (L_9A57),HL
  968.         LD      A,#20
  969.         CALL    PrintChar
  970. L_99FC       EQU       $-2
  971.         INC     E
  972.         POP     HL
  973.         LD      (L_9A57),HL
  974.         POP     HL
  975.         JP      PrintString_HL
  976. ;
  977. L_9A07  CP      #E8
  978.         JR      NZ,L_9A13
  979.         LD      A,(HL)
  980.         LD      (L_9AA6),A
  981.         INC     HL
  982.         JP      PrintString_HL
  983. ;
  984. L_9A13  CP      #E9
  985.         JR      NZ,L_9A1A
  986.         JP      PrintString_HL
  987. ;
  988. L_9A1A  CP      #EA
  989.         JR      NZ,L_9A21
  990.         JP      PrintString_HL
  991. ;
  992. L_9A21  CP      #EB
  993.         RET     NZ
  994.         PUSH    BC
  995.         PUSH    HL
  996.         LD      L,(HL)
  997.         LD      H,#00
  998.         ADD     HL,HL
  999.         LD      BC,L_9A44
  1000.         ADD     HL,BC
  1001.         LD      A,(HL)
  1002.         INC     HL
  1003.         LD      H,(HL)
  1004.         LD      L,A
  1005.         LD      (printstring_printcharaddr),HL
  1006.         LD      (L_99BE),HL
  1007.         LD      (L_99D0),HL
  1008.         LD      (L_99FC),HL
  1009.         POP     HL
  1010.         POP     BC
  1011.         INC     HL
  1012.         JP      PrintString_HL
  1013. ;
  1014. L_9A44       DW       PrintChar
  1015.        DW       DrawSprite
  1016.        DW       L_9A82
  1017.        DW       L_9ABA
  1018. ;
  1019. PrintChar
  1020.         PUSH    AF
  1021.         PUSH    DE
  1022.         PUSH    HL
  1023.         PUSH    BC
  1024.         ADD     A,A
  1025.         LD      L,A
  1026.         LD      H,#00
  1027.         ADD     HL,HL
  1028.         ADD     HL,HL
  1029.         LD      BC,L_DCDA
  1030. L_9A57       EQU       $-2
  1031. L_9A58       EQU       $-1
  1032.         ADD     HL,BC
  1033.         LD      A,D
  1034.         AND     #F8
  1035.         OR      #40
  1036.         LD      B,A
  1037.         LD      A,D
  1038.         LD      D,B
  1039.         AND     #07
  1040.         RRCA
  1041.         RRCA
  1042.         RRCA
  1043.         ADD     A,E
  1044.         LD      E,A
  1045.         LD      B,#08
  1046. L_9A6B  LD      A,(HL)
  1047.         LD      (DE),A
  1048.         INC     D
  1049.         INC     HL
  1050.         DJNZ    L_9A6B
  1051.         DEC     D
  1052.         LD      A,D
  1053.         RRCA
  1054.         RRCA
  1055.         RRCA
  1056.         AND     #03
  1057.         OR      #58
  1058.         LD      H,A
  1059.         LD      L,E
  1060.         POP     BC
  1061.         LD      (HL),C
  1062.         POP     HL
  1063.         POP     DE
  1064.         POP     AF
  1065.         RET
  1066. ;
  1067. L_9A82  PUSH    HL
  1068.         PUSH    DE
  1069.         PUSH    AF
  1070.         LD      A,#5B
  1071.         LD      (L_9502),A
  1072.         LD      A,E
  1073.         ADD     A,A
  1074.         ADD     A,A
  1075.         ADD     A,A
  1076.         LD      E,A
  1077.         LD      A,D
  1078.         ADD     A,A
  1079.         ADD     A,A
  1080.         ADD     A,A
  1081.         LD      D,A
  1082.         POP     AF
  1083.         CALL    L_94CD
  1084.         POP     DE
  1085.         PUSH    AF
  1086.         PUSH    DE
  1087.         CALL    L_981B
  1088.         CALL    CountScrAddr_DEyx
  1089.         LD      DE,#8D00
  1090.         ADD     HL,DE
  1091.         LD      A,#01
  1092. L_9AA6       EQU       $-1
  1093.         LD      (HL),A
  1094.         INC     HL
  1095.         LD      (HL),A
  1096.         LD      DE,#001F
  1097.         ADD     HL,DE
  1098.         LD      (HL),A
  1099.         INC     HL
  1100.         LD      (HL),A
  1101.         LD      A,#73
  1102.         LD      (L_9502),A
  1103.         POP     DE
  1104.         POP     AF
  1105.         POP     HL
  1106.         RET
  1107. ;
  1108. L_9ABA  PUSH    AF
  1109.         PUSH    HL
  1110.         PUSH    BC
  1111.         PUSH    DE
  1112.         LD      L,A
  1113.         LD      H,#00
  1114.         ADD     HL,HL
  1115.         ADD     HL,HL
  1116.         ADD     HL,HL
  1117.         LD      BC,(L_9A57)
  1118.         ADD     HL,BC
  1119.         PUSH    HL
  1120.         LD      H,D
  1121.         LD      L,#00
  1122.         LD      D,#5B
  1123.         ADD     HL,DE
  1124.         POP     DE
  1125.         LD      BC,#0020
  1126.         LD      A,#08
  1127. L_9AD6  EX      AF,AF'
  1128.         LD      A,(DE)
  1129.         LD      (HL),A
  1130.         INC     DE
  1131.         ADD     HL,BC
  1132.         EX      AF,AF'
  1133.         DEC     A
  1134.         JP      NZ,L_9AD6
  1135.         POP     DE
  1136.         CALL    CountScrAddr_DEyx
  1137.         LD      BC,#8D00
  1138.         ADD     HL,BC
  1139.         LD      A,(L_9AA6)
  1140.         LD      (HL),A
  1141.         LD      BC,L_CB00
  1142.         ADD     HL,BC
  1143.         POP     BC
  1144.         LD      (HL),C
  1145.         POP     HL
  1146.         POP     AF
  1147.         RET
  1148. ;
  1149.        DB       #F5,#E5,#C5,#D5,#ED,#73,#2E,#9B       ;ueEUms..
  1150.        DB       #6F,#26,#00,#29,#29,#29,#ED,#4B       ;o&.)))mK
  1151.        DB       #57,#9A,#09,#F9,#62,#2E,#00,#16       ;W..yb...
  1152.        DB       #73,#19,#01,#20,#00,#D1,#73,#09       ;s.. .Qs.
  1153.        DB       #72,#09,#D1,#73,#09,#72,#09,#D1       ;r.Qs.r.Q
  1154.        DB       #73,#09,#72,#09,#D1,#73,#09,#72       ;s.r.Qs.r
  1155.        DB       #ED,#7B,#2E,#9B,#D1,#C1,#E1,#F1       ;m{..QAaq
  1156.        DB       #C9,#00,#00       ;I..
  1157. ;
  1158. L_9B30  LD      A,(L_A390)
  1159.         CP      #04
  1160.         JR      Z,L_9B3B
  1161.         XOR     A
  1162.         LD      (L_C3AB),A
  1163. L_9B3B  CALL    L_A391
  1164.         LD      A,(L_A390)
  1165.         ADD     A,A
  1166.         LD      L,A
  1167.         LD      H,#00
  1168.         LD      BC,L_9C03
  1169.         ADD     HL,BC
  1170.         LD      E,(HL)
  1171.         INC     HL
  1172.         LD      D,(HL)
  1173.         LD      (L_A8C6),DE
  1174.         XOR     A
  1175.         LD      (L_9AA6),A
  1176.         LD      A,(L_A390)
  1177.         LD      BC,L_9C53
  1178.         CALL    GetHLFrom2APlusBC
  1179.         LD      DE,#0000
  1180.         LD      BC,#0000
  1181.         CALL    PrintString_HL
  1182.         CALL    L_C34E
  1183.         OR      A
  1184.         JR      NZ,L_9B81
  1185.         CALL    CountXYtoxy_DE
  1186.         LD      A,#2F
  1187.         CALL    L_9A82
  1188.         CALL    L_C33C
  1189.         CALL    CountXYtoxy_DE
  1190.         LD      A,#1D
  1191.         CALL    L_9A82
  1192.         JR      L_9B8C
  1193. ;
  1194. L_9B81  CALL    L_C33C
  1195.         CALL    CountXYtoxy_DE
  1196.         LD      A,#01
  1197.         CALL    L_9A82
  1198. L_9B8C  CALL    L_CB7C
  1199.         CALL    L_D3D1
  1200.         LD      C,#47
  1201.         CALL    Cls_attrC
  1202.         CALL    L_9BB2
  1203.         LD      HL,L_9C2D
  1204.         CALL    PrintString_HL
  1205.         CALL    L_97BD
  1206.         JP      L_97D5
  1207. ;
  1208. GetHLFrom2APlusBC
  1209.         PUSH    AF
  1210.         LD      L,A
  1211.         LD      H,#00
  1212.         ADD     HL,HL
  1213.         ADD     HL,BC
  1214.         LD      A,(HL)
  1215.         INC     HL
  1216.         LD      H,(HL)
  1217.         LD      L,A
  1218.         POP     AF
  1219.         RET
  1220. ;
  1221. L_9BB2  LD      A,#1C
  1222.         LD      (L_9BFC),A
  1223.         LD      (L_9BFD),A
  1224.         LD      A,#02
  1225.         LD      (L_9AA6),A
  1226.         LD      A,(L_A390)
  1227.         LD      BC,L_9FE6
  1228.         CALL    GetHLFrom2APlusBC
  1229.         LD      C,#45
  1230. L_9BCA  LD      A,(HL)
  1231.         CP      #FF
  1232.         RET     Z
  1233.         CP      #FE
  1234.         JR      NZ,L_9BE1
  1235.         LD      A,(L_9AA6)
  1236.         XOR     #03
  1237.         LD      (L_9AA6),A
  1238.         LD      A,C
  1239.         XOR     #03
  1240.         LD      C,A
  1241.         INC     HL
  1242.         JR      L_9BF1
  1243. ;
  1244. L_9BE1  CP      #FD
  1245.         JR      NZ,L_9BF1
  1246.         LD      A,(L_9BFC)
  1247.         XOR     #08
  1248.         LD      (L_9BFC),A
  1249.         LD      (L_9BFD),A
  1250.         INC     HL
  1251. L_9BF1  LD      E,(HL)
  1252.         INC     HL
  1253.         LD      D,(HL)
  1254.         INC     HL
  1255.         LD      B,(HL)
  1256.         INC     HL
  1257.         LD      A,#00
  1258. L_9BF9  CALL    L_9A82
  1259. L_9BFC  INC     E
  1260. L_9BFD  INC     E
  1261.         DJNZ    L_9BF9
  1262.         JP      L_9BCA
  1263. ;
  1264. L_9C03       DB       #48,#90,#18,#80,#38,#30,#28,#80
  1265.        DB       #E8,#60,#18,#50,#68,#B0,#78,#B0
  1266.        DB       #28,#B0,#48,#B0,#58,#B0,#28,#80
  1267.        DB       #78,#90,#58,#B0,#78,#B0,#D8,#B0
  1268.        DB       #28,#80,#00,#00,#00,#00,#00,#00
  1269.        DB       #18,#20
  1270. L_9C2D       DB       #EB,#03,#E6,#EA,#D9,#E8,#01,#DF
  1271.        DB       #00,#00,#E0,#44,#E1,#06,#00,#AE
  1272.        DB       #01,#AE,#02,#AE,#03,#AE,#E2,#DF
  1273.        DB       #00,#1F,#E1,#06,#00,#AE,#01,#AE
  1274.        DB       #02,#AE,#03,#AE,#E2,#FF
  1275. ;
  1276. L_9C53       DW       L_9C7D
  1277.        DW       L_9CA2
  1278.        DW       L_9CD1
  1279.        DW       L_9CFC
  1280.        DW       L_9D2B
  1281.        DW       L_9D5A
  1282.        DW       L_9D89
  1283.        DW       L_9DC1
  1284.        DW       L_9DF9
  1285.        DW       L_9E32
  1286.        DW       L_9E67
  1287.        DW       L_9E93
  1288.        DW       L_9EC2
  1289.        DW       L_9EFA
  1290.        DW       L_9F26
  1291.        DW       L_9F55
  1292.        DW       L_9F89
  1293.        DW       L_9FB8
  1294.        DW       L_9FB9
  1295.        DW       L_9FBA
  1296.        DW       L_9FBB
  1297. ;
  1298. L_9C7D       DB       #DF,#00,#01,#EB,#01,#E1,#06,#E1
  1299.        DB       #07,#00,#78,#01,#01,#78,#01,#E2
  1300.        DB       #00,#78,#01,#7A,#E2,#E1,#07,#01
  1301.        DB       #78,#01,#00,#78,#01,#E2,#01,#78
  1302.        DB       #01,#7A,#E2,#E2,#FF
  1303. L_9CA2       DB       #DF,#00,#01,#EB,#01,#E1,#06,#E1
  1304.        DB       #07,#00,#78,#01,#01,#78,#01,#E2
  1305.        DB       #00,#78,#01,#7A,#E2,#E1,#07,#01
  1306.        DB       #78,#01,#00,#78,#01,#E2,#01,#78
  1307.        DB       #01,#7A,#E2,#E2,#EB,#02,#DF,#02
  1308.        DB       #03,#1C,#DF,#02,#07,#1C,#FF
  1309. L_9CD1       DB       #DF,#00,#01,#EB,#01,#E1,#06,#E1
  1310.        DB       #07,#00,#78,#01,#01,#78,#01,#E2
  1311.        DB       #00,#78,#01,#7A,#E2,#E1,#07,#01
  1312.        DB       #78,#01,#00,#78,#01,#E2,#01,#78
  1313.        DB       #01,#7A,#E2,#E2,#EB,#02,#DF,#02
  1314.        DB       #0B,#1C,#FF
  1315. L_9CFC       DB       #DF,#00,#01,#EB,#01,#E1,#06,#E1
  1316.        DB       #07,#00,#78,#01,#01,#78,#01,#E2
  1317.        DB       #00,#78,#01,#7A,#E2,#E1,#07,#01
  1318.        DB       #78,#01,#00,#78,#01,#E2,#01,#78
  1319.        DB       #01,#7A,#E2,#E2,#EB,#02,#DF,#14
  1320.        DB       #05,#1C,#DF,#14,#19,#1C,#FF
  1321. L_9D2B       DB       #DF,#00,#01,#EB,#01,#E1,#06,#E1
  1322.        DB       #07,#00,#78,#01,#01,#78,#01,#E2
  1323.        DB       #00,#78,#01,#7A,#E2,#E1,#07,#01
  1324.        DB       #78,#01,#00,#78,#01,#E2,#01,#78
  1325.        DB       #01,#7A,#E2,#E2,#EB,#02,#DF,#04
  1326.        DB       #07,#1C,#DF,#04,#17,#1C,#FF
  1327. L_9D5A       DB       #DF,#00,#01,#EB,#01,#E1,#06,#E1
  1328.        DB       #07,#00,#78,#01,#01,#78,#01,#E2
  1329.        DB       #00,#78,#01,#7A,#E2,#E1,#07,#01
  1330.        DB       #78,#01,#00,#78,#01,#E2,#01,#78
  1331.        DB       #01,#7A,#E2,#E2,#EB,#02,#DF,#02
  1332.        DB       #07,#1C,#DF,#02,#19,#1C,#FF
  1333. L_9D89       DB       #DF,#00,#01,#EB,#01,#E1,#06,#E1
  1334.        DB       #07,#00,#78,#01,#01,#78,#01,#E2
  1335.        DB       #00,#78,#01,#7A,#E2,#E1,#07,#01
  1336.        DB       #78,#01,#00,#78,#01,#E2,#01,#78
  1337.        DB       #01,#7A,#E2,#E2,#DF,#12,#03,#E1
  1338.        DB       #07,#02,#78,#03,#E2,#EB,#02,#DF
  1339.        DB       #02,#05,#1C,#DF,#02,#19,#1C,#FF
  1340. L_9DC1       DB       #DF,#00,#01,#EB,#01,#E1,#06,#E1
  1341.        DB       #07,#00,#78,#01,#01,#78,#01,#E2
  1342.        DB       #00,#78,#01,#7A,#E2,#E1,#07,#01
  1343.        DB       #78,#01,#00,#78,#01,#E2,#01,#78
  1344.        DB       #01,#7A,#E2,#E2,#DF,#12,#03,#E1
  1345.        DB       #07,#02,#78,#03,#E2,#EB,#02,#DF
  1346.        DB       #00,#09,#1C,#DF,#00,#17,#1C,#FF
  1347. L_9DF9       DB       #DF,#00,#01,#EB,#01,#E1,#06,#E1
  1348.        DB       #07,#00,#78,#01,#01,#78,#01,#E2
  1349.        DB       #00,#78,#01,#7A,#E2,#E1,#07,#01
  1350.        DB       #78,#01,#00,#78,#01,#E2,#01,#78
  1351.        DB       #01,#7A,#E2,#E2,#DF,#12,#03,#E1
  1352.        DB       #07,#02,#78,#03,#E2,#EB,#02,#DF
  1353.        DB       #02,#0D,#1C,#DF,#02,#11,#1C,#FF
  1354.        DB       #FF
  1355. L_9E32       DB       #DF,#00,#01,#EB,#01,#E1,#06,#E1
  1356.        DB       #07,#00,#78,#01,#01,#78,#01,#E2
  1357.        DB       #00,#78,#01,#7A,#E2,#E1,#07,#01
  1358.        DB       #78,#01,#00,#78,#01,#E2,#01,#78
  1359.        DB       #01,#7A,#E2,#E2,#DF,#12,#03,#E1
  1360.        DB       #07,#02,#78,#03,#E2,#EB,#02,#DF
  1361.        DB       #00,#0B,#1C,#FF,#FF
  1362. L_9E67       DB       #DF,#00,#01,#EB,#01,#E1,#06,#E1
  1363.        DB       #07,#00,#78,#01,#01,#78,#01,#E2
  1364.        DB       #00,#78,#01,#7A,#E2,#E1,#07,#01
  1365.        DB       #78,#01,#00,#78,#01,#E2,#01,#78
  1366.        DB       #01,#7A,#E2,#E2,#EB,#02,#DF,#10
  1367.        DB       #05,#1C,#FF,#FF
  1368. L_9E93       DB       #DF,#00,#01,#EB,#01,#E1,#06,#E1
  1369.        DB       #07,#00,#78,#01,#01,#78,#01,#E2
  1370.        DB       #00,#78,#01,#7A,#E2,#E1,#07,#01
  1371.        DB       #78,#01,#00,#78,#01,#E2,#01,#78
  1372.        DB       #01,#7A,#E2,#E2,#EB,#02,#DF,#14
  1373.        DB       #05,#1C,#DF,#14,#19,#1C,#FF
  1374. L_9EC2       DB       #DF,#00,#01,#EB,#01,#E1,#06,#E1
  1375.        DB       #07,#00,#78,#01,#01,#78,#01,#E2
  1376.        DB       #00,#78,#01,#7A,#E2,#E1,#07,#01
  1377.        DB       #78,#01,#00,#78,#01,#E2,#01,#78
  1378.        DB       #01,#7A,#E2,#E2,#DF,#12,#03,#E1
  1379.        DB       #07,#02,#78,#03,#E2,#EB,#02,#DF
  1380.        DB       #02,#05,#1C,#DF,#02,#19,#1C,#FF
  1381. L_9EFA       DB       #DF,#00,#01,#EB,#01,#E1,#06,#E1
  1382.        DB       #07,#00,#78,#01,#01,#78,#01,#E2
  1383.        DB       #00,#78,#01,#7A,#E2,#E1,#07,#01
  1384.        DB       #78,#01,#00,#78,#01,#E2,#01,#78
  1385.        DB       #01,#7A,#E2,#E2,#EB,#02,#DF,#00
  1386.        DB       #01,#1C,#FF,#FF
  1387. L_9F26       DB       #DF,#00,#01,#EB,#01,#E1,#06,#E1
  1388.        DB       #07,#00,#78,#01,#01,#78,#01,#E2
  1389.        DB       #00,#78,#01,#7A,#E2,#E1,#07,#01
  1390.        DB       #78,#01,#00,#78,#01,#E2,#01,#78
  1391.        DB       #01,#7A,#E2,#E2,#EB,#02,#DF,#02
  1392.        DB       #0D,#1C,#DF,#02,#11,#1C,#FF
  1393. L_9F55       DB       #DF,#00,#01,#EB,#01,#E1,#06,#E1
  1394.        DB       #07,#00,#78,#01,#01,#78,#01,#E2
  1395.        DB       #00,#78,#01,#7A,#E2,#E1,#07,#01
  1396.        DB       #78,#01,#00,#78,#01,#E2,#01,#78
  1397.        DB       #01,#7A,#E2,#E2,#DF,#10,#03,#E1
  1398.        DB       #07,#02,#78,#03,#E2,#EB,#02,#DF
  1399.        DB       #12,#01,#1C,#FF
  1400. L_9F89       DB       #DF,#00,#01,#EB,#01,#E1,#06,#E1
  1401.        DB       #07,#00,#78,#01,#01,#78,#01,#E2
  1402.        DB       #00,#78,#01,#7A,#E2,#E1,#07,#01
  1403.        DB       #78,#01,#00,#78,#01,#E2,#01,#78
  1404.        DB       #01,#7A,#E2,#E2,#EB,#02,#DF,#14
  1405.        DB       #05,#1C,#DF,#14,#19,#1C,#FF
  1406. L_9FB8       DB       #FF
  1407. L_9FB9       DB       #FF
  1408. L_9FBA       DB       #FF
  1409. L_9FBB       DB       #DF,#00,#01,#EB,#01,#E1,#06,#E1
  1410.        DB       #07,#00,#78,#01,#01,#78,#01,#E2
  1411.        DB       #00,#78,#01,#7A,#E2,#E1,#07,#01
  1412.        DB       #78,#01,#00,#78,#01,#E2,#01,#78
  1413.        DB       #01,#7A,#E2,#E2,#EB,#02,#DF,#02
  1414.        DB       #1B,#1C,#FF
  1415. ;
  1416. L_9FE6       DW       L_A010
  1417.        DW       L_A05A
  1418.        DW       L_A080
  1419.        DW       L_A0DD
  1420.        DW       L_A115
  1421.        DW       L_A135
  1422.        DW       L_A140
  1423.        DW       L_A178
  1424.        DW       L_A1D2
  1425.        DW       L_A1E9
  1426.        DW       L_A23C
  1427.        DW       L_A26E
  1428.        DW       L_A2A6
  1429.        DW       L_A2EF
  1430.        DW       L_A311
  1431.        DW       L_A346
  1432.        DW       L_A347
  1433.        DW       L_A37F
  1434.        DW       L_A380
  1435.        DW       L_A381
  1436.        DW       L_A382
  1437. ;
  1438. L_A010       DB       #0D,#06,#03,#0B,#08,#01,#13,#08
  1439.        DB       #01,#0D,#0A,#03,#0D,#0C,#03,#09
  1440.        DB       #10,#01,#07,#12,#01,#09,#14,#01
  1441.        DB       #0B,#12,#05,#15,#10,#01,#17,#12
  1442.        DB       #01,#15,#14,#01,#FE,#0B,#06,#01
  1443.        DB       #13,#06,#01,#0B,#0A,#01,#13,#0A
  1444.        DB       #01,#07,#10,#01,#0B,#10,#01,#07
  1445.        DB       #14,#01,#0B,#14,#01,#13,#10,#01
  1446.        DB       #17,#10,#01,#13,#14,#01,#17,#14
  1447.        DB       #01,#FF
  1448. L_A05A       DB       #19,#06,#02,#15,#08,#02,#11,#0A
  1449.        DB       #02,#0B,#0E,#03,#07,#10,#07,#03
  1450.        DB       #12,#02,#FE,#03,#06,#02,#07,#08
  1451.        DB       #02,#0B,#0A,#02,#11,#0E,#02,#15
  1452.        DB       #10,#02,#19,#12,#02,#FF
  1453. L_A080       DB       #0D,#02,#03,#0F,#04,#01,#17,#04
  1454.        DB       #01,#1B,#08,#01,#17,#0C,#02,#1D
  1455.        DB       #0C,#01,#1B,#0E,#01,#03,#0C,#04
  1456.        DB       #03,#0E,#02,#03,#12,#01,#0B,#12
  1457.        DB       #05,#0D,#14,#01,#11,#14,#01,#FE
  1458.        DB       #0D,#00,#03,#0D,#04,#01,#11,#04
  1459.        DB       #01,#0D,#06,#03,#03,#08,#0C,#03
  1460.        DB       #0A,#04,#15,#0A,#03,#15,#0C,#01
  1461.        DB       #07,#0E,#02,#15,#0E,#03,#0B,#10
  1462.        DB       #05,#0B,#14,#01,#13,#14,#01,#03
  1463.        DB       #16,#09,#FD,#01,#00,#0C,#1D,#00
  1464.        DB       #06,#1D,#0E,#05,#FF
  1465. L_A0DD       DB       #0B,#00,#01,#0F,#00,#01,#13,#00
  1466.        DB       #01,#0B,#04,#01,#13,#04,#01,#01
  1467.        DB       #02,#03,#05,#04,#01,#01,#06,#03
  1468.        DB       #19,#02,#03,#19,#04,#01,#19,#06
  1469.        DB       #03,#03,#0C,#01,#1B,#0C,#01,#07
  1470.        DB       #12,#04,#11,#12,#04,#FE,#05,#12
  1471.        DB       #01,#0F,#12,#01,#19,#12,#01,#FF
  1472. L_A115       DB       #09,#12,#01,#15,#12,#01,#FE,#01
  1473.        DB       #06,#02,#1B,#06,#02,#17,#0E,#04
  1474.        DB       #01,#0E,#04,#0B,#0A,#01,#13,#0A
  1475.        DB       #01,#0F,#06,#01,#0F,#0E,#01,#FF
  1476. L_A135       DB       #FE,#03,#08,#01,#03,#0C,#01,#0B
  1477.        DB       #12,#05,#FF
  1478. L_A140       DB       #1D,#02,#01,#19,#04,#02,#17,#06
  1479.        DB       #01,#13,#0A,#01,#0F,#0E,#01,#15
  1480.        DB       #02,#01,#11,#06,#01,#0D,#0A,#01
  1481.        DB       #09,#0E,#01,#01,#12,#03,#03,#14
  1482.        DB       #01,#01,#16,#02,#FE,#05,#08,#02
  1483.        DB       #17,#04,#01,#13,#08,#02,#0F,#0C
  1484.        DB       #02,#0B,#10,#02,#07,#14,#02,#FF
  1485. L_A178       DB       #05,#04,#05,#05,#10,#05,#11,#04
  1486.        DB       #05,#11,#10,#05,#09,#08,#01,#07
  1487.        DB       #0A,#01,#0B,#0A,#01,#09,#0C,#01
  1488.        DB       #15,#08,#01,#13,#0A,#01,#17,#0A
  1489.        DB       #01,#15,#0C,#01,#FD,#03,#06,#05
  1490.        DB       #1B,#06,#05,#0F,#06,#05,#FE,#03
  1491.        DB       #04,#01,#0F,#04,#01,#1B,#04,#01
  1492.        DB       #03,#10,#01,#0F,#10,#01,#1B,#10
  1493.        DB       #01,#07,#08,#01,#0B,#08,#01,#07
  1494.        DB       #0C,#01,#0B,#0C,#01,#13,#08,#01
  1495.        DB       #17,#08,#01,#13,#0C,#01,#17,#0C
  1496.        DB       #01,#FF
  1497. L_A1D2       DB       #FE,#0D,#08,#01,#11,#08,#01,#0D
  1498.        DB       #0C,#01,#11,#0C,#01,#0D,#10,#01
  1499.        DB       #11,#10,#01,#0F,#16,#01,#FF
  1500. L_A1E9       DB       #0D,#04,#02,#0B,#08,#04,#15,#08
  1501.        DB       #01,#1D,#08,#01,#09,#0C,#02,#07
  1502.        DB       #10,#04,#15,#10,#01,#19,#10,#01
  1503.        DB       #05,#14,#01,#FE,#03,#04,#01,#07
  1504.        DB       #04,#01,#0B,#04,#01,#11,#04,#01
  1505.        DB       #0D,#08,#01,#13,#08,#01,#17,#08
  1506.        DB       #01,#1B,#08,#01,#03,#0C,#01,#07
  1507.        DB       #0C,#01,#0D,#0C,#01,#05,#10,#01
  1508.        DB       #0F,#10,#01,#13,#10,#01,#17,#10
  1509.        DB       #01,#1B,#10,#01,#03,#14,#01,#07
  1510.        DB       #14,#01,#FF
  1511. L_A23C       DB       #05,#0A,#03,#07,#14,#01,#15,#12
  1512.        DB       #01,#FE,#05,#08,#05,#0D,#0A,#01
  1513.        DB       #0F,#0C,#02,#13,#0E,#01,#15,#10
  1514.        DB       #01,#05,#0C,#03,#0B,#0E,#01,#0D
  1515.        DB       #10,#02,#0F,#12,#02,#11,#14,#03
  1516.        DB       #15,#16,#01,#01,#10,#02,#07,#10
  1517.        DB       #01,#FF
  1518. L_A26E       DB       #0B,#00,#01,#0F,#00,#01,#13,#00
  1519.        DB       #01,#0B,#04,#01,#13,#04,#01,#01
  1520.        DB       #02,#03,#05,#04,#01,#01,#06,#03
  1521.        DB       #19,#02,#03,#19,#04,#01,#19,#06
  1522.        DB       #03,#03,#0C,#01,#1B,#0C,#01,#07
  1523.        DB       #12,#04,#11,#12,#04,#FE,#05,#12
  1524.        DB       #01,#0F,#12,#01,#19,#12,#01,#FF
  1525. L_A2A6       DB       #FD,#0B,#00,#03,#13,#00,#03,#FD
  1526.        DB       #0D,#06,#03,#07,#0C,#02,#0D,#0E
  1527.        DB       #01,#11,#0E,#01,#15,#0C,#02,#07
  1528.        DB       #12,#02,#0D,#14,#01,#11,#14,#01
  1529.        DB       #15,#12,#02,#FE,#0B,#06,#01,#13
  1530.        DB       #06,#01,#05,#0C,#01,#0B,#0C,#01
  1531.        DB       #0F,#0E,#01,#13,#0C,#01,#19,#0C
  1532.        DB       #01,#05,#12,#01,#0B,#12,#01,#0F
  1533.        DB       #14,#01,#13,#12,#01,#19,#12,#01
  1534.        DB       #FF
  1535. L_A2EF       DB       #FE,#01,#04,#04,#05,#08,#06,#01
  1536.        DB       #0C,#04,#07,#10,#06,#01,#14,#04
  1537.        DB       #FD,#0D,#06,#09,#FE,#09,#08,#01
  1538.        DB       #0D,#0A,#01,#03,#0C,#01,#09,#10
  1539.        DB       #01,#FF
  1540. L_A311       DB       #03,#0E,#02,#FD,#01,#10,#04,#05
  1541.        DB       #10,#04,#03,#14,#01,#FD,#19,#0E
  1542.        DB       #02,#FD,#19,#10,#04,#1D,#10,#04
  1543.        DB       #1B,#14,#01,#FE,#0B,#06,#02,#09
  1544.        DB       #0A,#02,#07,#0E,#05,#01,#0E,#01
  1545.        DB       #13,#06,#02,#15,#0A,#02,#17,#0E
  1546.        DB       #05,#1D,#0E,#01,#FF
  1547. L_A346       DB       #FF
  1548. L_A347       DB       #0B,#00,#01,#0F,#00,#01,#13,#00
  1549.        DB       #01,#0B,#04,#01,#13,#04,#01,#01
  1550.        DB       #02,#03,#05,#04,#01,#01,#06,#03
  1551.        DB       #19,#02,#03,#19,#04,#01,#19,#06
  1552.        DB       #03,#03,#0C,#01,#1B,#0C,#01,#07
  1553.        DB       #12,#04,#11,#12,#04,#FE,#05,#12
  1554.        DB       #01,#0F,#12,#01,#19,#12,#01,#FF
  1555. L_A37F       DB       #FF
  1556. L_A380       DB       #FF
  1557. L_A381       DB       #FF
  1558. L_A382       DB       #FE,#01,#06,#0B,#09,#0A,#0B,#01
  1559.        DB       #0E,#0B,#09,#12,#0B,#FF
  1560. ;
  1561. L_A390       DB       #00
  1562. ;
  1563. L_A391  LD      HL,#5B00
  1564.         LD      (HL),#00
  1565.         LD      DE,#5B01
  1566.         LD      BC,#2FFF
  1567.         LDIR
  1568.         LD      HL,#8D00
  1569.         LD      DE,#8D01
  1570.         LD      BC,#05FF
  1571.         LD      (HL),#00
  1572.         LDIR
  1573.         RET
  1574. ;
  1575. L_A3AC  LD      A,(L_A390)
  1576.         LD      BC,L_A3E4
  1577.         CALL    GetHLFrom2APlusBC
  1578.         LD      DE,L_A3CF
  1579.         LD      BC,#0014
  1580.         LDIR
  1581.         RET
  1582. ;
  1583. L_A3BE  LD      HL,L_A3CF
  1584. L_A3C1  LD      A,(HL)
  1585.         CP      #FF
  1586.         RET     Z
  1587.         LD      E,A
  1588.         INC     HL
  1589.         LD      D,(HL)
  1590.         INC     HL
  1591.         CALL    L_AB46
  1592.         JP      L_A3C1
  1593. ;
  1594. L_A3CF       DB       #FF,#18,#10,#38,#10,#FF,#58,#10
  1595.        DB       #FF,#28,#A0,#C8,#A0,#FF,#38,#20
  1596.        DB       #B8,#20,#FF,#38,#FF
  1597. ;
  1598. L_A3E4       DW       L_A40E
  1599.        DW       L_A40F
  1600.        DW       L_A414
  1601.        DW       L_A417
  1602.        DW       L_A41C
  1603.        DW       L_A421
  1604.        DW       L_A426
  1605.        DW       L_A42B
  1606.        DW       L_A430
  1607.        DW       L_A435
  1608.        DW       L_A438
  1609.        DW       L_A43B
  1610.        DW       L_A440
  1611.        DW       L_A445
  1612.        DW       L_A448
  1613.        DW       L_A44D
  1614.        DW       L_A450
  1615.        DW       L_A455
  1616.        DW       L_A456
  1617.        DW       L_A457
  1618.        DW       L_A458
  1619. ;
  1620. L_A40E       DB       #FF
  1621. L_A40F       DB       #18,#10,#38,#10,#FF
  1622. L_A414       DB       #58,#10,#FF
  1623. L_A417       DB       #28,#A0,#C8,#A0,#FF
  1624. L_A41C       DB       #38,#20,#B8,#20,#FF
  1625. L_A421       DB       #38,#10,#C8,#10,#FF
  1626. L_A426       DB       #28,#10,#C8,#10,#FF
  1627. L_A42B       DB       #48,#00,#B8,#00,#FF
  1628. L_A430       DB       #68,#10,#88,#10,#FF
  1629. L_A435       DB       #58,#00,#FF
  1630. L_A438       DB       #28,#80,#FF
  1631. L_A43B       DB       #28,#A0,#C8,#A0,#FF
  1632. L_A440       DB       #C8,#10,#28,#10,#FF
  1633. L_A445       DB       #08,#00,#FF
  1634. L_A448       DB       #68,#10,#88,#10,#FF
  1635. L_A44D       DB       #08,#90,#FF
  1636. L_A450       DB       #28,#A0,#C8,#A0,#FF
  1637. L_A455       DB       #FF
  1638. L_A456       DB       #FF
  1639. L_A457       DB       #FF
  1640. L_A458       DB       #D8,#10,#FF
  1641. L_A45B       DB       #78,#10,#D8,#80,#98,#60,#C8,#80
  1642.        DB       #18,#60,#D8,#50,#08,#A0,#A8,#50
  1643.        DB       #D8,#B0,#18,#40,#D8,#A0,#C8,#80
  1644.        DB       #78,#10,#08,#B0,#18,#B0,#D8,#10
  1645.        DB       #C8,#80,#00,#00,#00,#00,#00,#00
  1646.        DB       #D8,#B0
  1647. L_A485       DB       #A8,#90,#00,#D8,#20,#00,#A8,#80
  1648.        DB       #00,#78,#80,#00,#78,#50,#00,#78
  1649.        DB       #50,#00,#E8,#30,#00,#48,#50,#00
  1650.        DB       #78,#60,#00,#C8,#40,#00,#68,#70
  1651.        DB       #00,#78,#80,#00,#78,#60,#00,#28
  1652.        DB       #10,#00,#D8,#B0,#00,#C8,#B0,#00
  1653.        DB       #78,#80,#00,#00,#00,#00,#00,#00
  1654.        DB       #00,#00,#00,#00,#38,#20,#00,#FF
  1655. ;
  1656. L_A4C5       DW       L_A4EF
  1657.        DW       L_A510
  1658.        DW       L_A519
  1659.        DW       L_A526
  1660.        DW       L_A52B
  1661.        DW       L_A544
  1662.        DW       L_A555
  1663.        DW       L_A566
  1664.        DW       L_A5A3
  1665.        DW       L_A5C4
  1666.        DW       L_A5DD
  1667.        DW       L_A5EA
  1668.        DW       L_A5F3
  1669.        DW       L_A608
  1670.        DW       L_A625
  1671.        DW       L_A64A
  1672.        DW       L_A677
  1673.        DW       L_A678
  1674.        DW       L_A679
  1675.        DW       L_A67A
  1676.        DW       L_A67B
  1677. ;
  1678. L_A4EF       DB       #68,#40,#48,#01,#78,#40,#4C,#01
  1679.        DB       #88,#40,#48,#01,#68,#50,#40,#02
  1680.        DB       #78,#50,#41,#02,#88,#50,#40,#02
  1681.        DB       #28,#50,#47,#01,#C8,#50,#47,#01
  1682.        DB       #FF
  1683. L_A510       DB       #88,#50,#48,#02,#78,#20,#4C,#01
  1684.        DB       #FF
  1685. L_A519       DB       #B8,#60,#44,#02,#18,#90,#48,#02
  1686.        DB       #C8,#10,#4C,#01,#FF
  1687. L_A526       DB       #B8,#20,#46,#02,#FF
  1688. L_A52B       DB       #88,#A0,#44,#01,#68,#A0,#4C,#01
  1689.        DB       #78,#40,#41,#01,#78,#60,#44,#01
  1690.        DB       #68,#50,#47,#01,#88,#50,#47,#01
  1691.        DB       #FF
  1692. L_A544       DB       #78,#10,#4C,#01,#68,#80,#40,#01
  1693.        DB       #88,#80,#40,#01,#28,#50,#60,#02
  1694.        DB       #FF
  1695. L_A555       DB       #18,#A0,#4C,#02,#D8,#B0,#48,#01
  1696.        DB       #B8,#60,#44,#01,#C8,#60,#44,#01
  1697.        DB       #FF
  1698. L_A566       DB       #78,#10,#4C,#01,#38,#30,#3F,#01
  1699.        DB       #58,#30,#3F,#01,#28,#40,#3F,#01
  1700.        DB       #68,#40,#3F,#01,#28,#60,#3F,#01
  1701.        DB       #68,#60,#47,#01,#98,#30,#3F,#01
  1702.        DB       #B8,#30,#3F,#01,#88,#40,#3F,#01
  1703.        DB       #C8,#40,#44,#01,#88,#60,#47,#01
  1704.        DB       #C8,#60,#44,#01,#08,#B0,#4A,#02
  1705.        DB       #78,#50,#43,#02,#FF
  1706. L_A5A3       DB       #78,#40,#4C,#01,#68,#50,#43,#01
  1707.        DB       #78,#50,#43,#02,#88,#50,#43,#01
  1708.        DB       #68,#70,#43,#01,#78,#70,#43,#02
  1709.        DB       #88,#70,#43,#01,#78,#80,#48,#01
  1710.        DB       #FF
  1711. L_A5C4       DB       #98,#B0,#47,#01,#B8,#B0,#47,#01
  1712.        DB       #D8,#B0,#47,#01,#A8,#B0,#4A,#02
  1713.        DB       #C8,#B0,#60,#02,#18,#10,#4C,#01
  1714.        DB       #FF
  1715. L_A5DD       DB       #58,#20,#46,#01,#A8,#90,#44,#02
  1716.        DB       #18,#A0,#5F,#01,#FF
  1717. L_A5EA       DB       #98,#20,#46,#02,#68,#90,#60,#02
  1718.        DB       #FF
  1719. L_A5F3       DB       #28,#30,#44,#01,#C8,#30,#44,#01
  1720.        DB       #88,#70,#48,#02,#68,#70,#4C,#02
  1721.        DB       #78,#50,#5E,#01,#FF
  1722. L_A608       DB       #48,#20,#5E,#01,#78,#50,#47,#01
  1723.        DB       #88,#50,#47,#01,#78,#60,#47,#01
  1724.        DB       #88,#60,#47,#01,#78,#70,#47,#01
  1725.        DB       #88,#70,#47,#01,#FF
  1726. L_A625       DB       #18,#20,#47,#01,#18,#30,#42,#01
  1727.        DB       #D8,#20,#47,#01,#D8,#30,#42,#01
  1728.        DB       #18,#80,#44,#01,#18,#90,#44,#01
  1729.        DB       #48,#B0,#48,#01,#A8,#B0,#48,#01
  1730.        DB       #78,#10,#4A,#01,#FF
  1731. L_A64A       DB       #38,#70,#47,#01,#78,#70,#47,#01
  1732.        DB       #38,#80,#47,#01,#48,#80,#47,#01
  1733.        DB       #68,#80,#47,#01,#78,#80,#47,#01
  1734.        DB       #38,#90,#47,#01,#58,#90,#47,#01
  1735.        DB       #78,#90,#47,#01,#38,#A0,#47,#01
  1736.        DB       #78,#A0,#47,#01,#FF
  1737. L_A677       DB       #FF
  1738. L_A678       DB       #FF
  1739. L_A679       DB       #FF
  1740. L_A67A       DB       #FF
  1741. L_A67B       DB       #C8,#30,#47,#01,#D8,#30,#42,#01
  1742.        DB       #18,#50,#42,#01,#28,#50,#47,#01
  1743.        DB       #C8,#70,#47,#01,#D8,#70,#42,#01
  1744.        DB       #18,#90,#42,#01,#28,#90,#47,#01
  1745.        DB       #78,#A0,#4C,#01,#28,#00,#46,#02
  1746.        DB       #38,#00,#46,#02,#48,#00,#46,#02
  1747.        DB       #08,#B0,#48,#02,#28,#B0,#5E,#02
  1748.        DB       #18,#20,#5E,#01,#FF
  1749. L_A6B8       DB       #68,#40,#48,#01,#78,#40,#4C,#01
  1750.        DB       #88,#40,#48,#01,#68,#50,#40,#02
  1751.        DB       #78,#50,#41,#02,#88,#50,#40,#02
  1752.        DB       #28,#50,#47,#01,#C8,#50,#47,#01
  1753.        DB       #FF,#88,#50,#48,#02,#78,#20,#4C
  1754.        DB       #01,#FF,#B8,#60,#44,#02,#18,#90
  1755.        DB       #48,#02,#C8,#10,#4C,#01,#FF,#B8
  1756.        DB       #20,#46,#02,#FF,#88,#A0,#44,#01
  1757.        DB       #68,#A0,#4C,#01,#78,#40,#41,#01
  1758.        DB       #78,#60,#44,#01,#68,#50,#47,#01
  1759.        DB       #FF
  1760. ;
  1761. ReadOPQAM
  1762.         LD      D,#01
  1763.         LD      HL,curcontrols-1;L_A7B2
  1764.         LD      C,#FE
  1765. L_A710  INC     HL
  1766.         LD      B,#DF
  1767.         IN      A,(C)
  1768.         AND     #02 ;'O'
  1769.         JR      NZ,L_A71A
  1770.         LD      (HL),D
  1771. L_A71A  INC     HL
  1772.         LD      B,#DF
  1773.         IN      A,(C)
  1774.         AND     #01 ;'P'
  1775.         JR      NZ,L_A724
  1776.         LD      (HL),D
  1777. L_A724  INC     HL
  1778.         LD      B,#FB
  1779.         IN      A,(C)
  1780.         AND     #01 ;'Q'
  1781.         JR      NZ,L_A72E
  1782.         LD      (HL),D
  1783. L_A72E  INC     HL
  1784.         LD      B,#FD
  1785.         IN      A,(C)
  1786.         AND     #01 ;'A'
  1787.         JR      NZ,L_A738
  1788.         LD      (HL),D
  1789. L_A738  INC     HL
  1790.         LD      B,#7F
  1791.         IN      A,(C)
  1792.         AND     #04 ;'M'
  1793.         RET     NZ
  1794.         LD      (HL),D
  1795.         RET
  1796. ;
  1797. ReadSinclairJoy
  1798.         LD      BC,0xEFFE
  1799.         IN      A,(C)
  1800.         CPL
  1801.         AND     #1F
  1802.         LD      D,A
  1803.         CALL    L_A78E
  1804.         LD      (curfire),A
  1805.         CALL    L_A78E
  1806.         LD      (curup),A
  1807.         CALL    L_A78E
  1808.         LD      (curdown),A
  1809.         CALL    L_A78E
  1810.         LD      (curright),A
  1811.         CALL    L_A78E
  1812.         LD      (curleft),A
  1813.         RET
  1814. ;
  1815. ReadKempstonJoy
  1816.         LD      BC,#001F
  1817.         IN      D,(C)
  1818.         CALL    L_A78E
  1819.         LD      (curright),A
  1820.         CALL    L_A78E
  1821.         LD      (curleft),A
  1822.         CALL    L_A78E
  1823.         LD      (curdown),A
  1824.         CALL    L_A78E
  1825.         LD      (curup),A
  1826.         CALL    L_A78E
  1827.         LD      (curfire),A
  1828.         RET
  1829. ;
  1830. L_A78E  XOR     A
  1831.         SRL     D
  1832.         RLA
  1833.         RET
  1834. ;
  1835. ReadControls
  1836.         CALL    ClearControls
  1837.         LD      A,(L_A7B8)
  1838.         OR      A
  1839.         JP      Z,ReadOPQAM
  1840.         CP      #01
  1841.         JP      Z,ReadSinclairJoy
  1842.         JP      ReadKempstonJoy
  1843. ;
  1844. ClearControls
  1845.         LD      HL,curcontrols
  1846.         LD      DE,curcontrols+1;curright
  1847.         LD      (HL),#00
  1848.         LD      BC,#0004
  1849.         LDIR
  1850.         RET
  1851. ;
  1852. curcontrols
  1853. curleft
  1854.        DB       #00
  1855. curright       DB       #00
  1856. curup       DB       #00
  1857. curdown       DB       #00
  1858. curfire       DB       #00
  1859. L_A7B8       DB       #00
  1860. ;
  1861. L_A7B9  LD      DE,(L_A8C6)
  1862.         CALL    L_95E5
  1863.         LD      A,(L_A8C3)
  1864.         OR      A
  1865.         JR      Z,L_A7D1
  1866.         DEC     A
  1867.         LD      (L_A8C3),A
  1868.         LD      A,(L_A8C4)
  1869.         LD      B,A
  1870.         JP      L_A87F
  1871. ;
  1872. L_A7D1  LD      HL,L_A8C2
  1873.         LD      A,(HL)
  1874.         OR      A
  1875.         JR      Z,L_A7F9
  1876.         CP      #0C
  1877.         JR      NC,L_A7E1
  1878.         CALL    L_A964
  1879.         JR      NZ,L_A7F5
  1880. L_A7E1  LD      A,(HL)
  1881.         DEC     (HL)
  1882.         LD      L,A
  1883.         LD      H,#00
  1884.         LD      BC,L_A8B3
  1885.         ADD     HL,BC
  1886.         LD      A,(HL)
  1887.         ADD     A,D
  1888.         LD      D,A
  1889.         LD      B,#38
  1890.         XOR     A
  1891.         LD      (curdown),A
  1892.         JR      L_A849
  1893. ;
  1894. L_A7F5  XOR     A
  1895.         LD      (L_A8C2),A
  1896. L_A7F9  CALL    L_A964
  1897.         JR      NZ,L_A80E
  1898.         LD      A,D
  1899.         CP      #B0
  1900.         JR      Z,L_A80E
  1901.         ADD     A,#04
  1902.         LD      D,A
  1903.         LD      B,#38
  1904.         XOR     A
  1905.         LD      (curdown),A
  1906.         JR      L_A849
  1907. ;
  1908. L_A80E  LD      A,(curdown)
  1909.         OR      A
  1910.         JP      NZ,L_A849
  1911.         LD      A,D
  1912.         OR      A
  1913.         JR      Z,L_A849
  1914.         LD      A,(curup)
  1915.         OR      A
  1916.         JR      Z,L_A846
  1917.         LD      A,(L_A8C5)
  1918.         OR      A
  1919.         JR      NZ,L_A849
  1920.         CALL    L_A98F
  1921.         JR      Z,L_A841
  1922.         CALL    L_AA8A
  1923.         LD      A,#01
  1924.         LD      (L_A8C5),A
  1925.         LD      A,#05
  1926.         LD      (L_A8C3),A
  1927.         LD      B,#46
  1928.         CALL    L_D0B7
  1929.         LD      B,#37
  1930.         JP      L_A87F
  1931. ;
  1932. L_A841  LD      A,#0E
  1933.         LD      (L_A8C2),A
  1934. L_A846  LD      (L_A8C5),A
  1935. L_A849  LD      B,#36
  1936.         LD      HL,(curcontrols)
  1937.         LD      A,L
  1938.         XOR     H
  1939.         JR      Z,L_A87F
  1940.         BIT     0,L
  1941.         JR      NZ,L_A863
  1942.         XOR     A
  1943.         LD      (L_A8C8),A
  1944.         CALL    L_A927
  1945.         JR      NZ,L_A87F
  1946.         INC     E
  1947.         INC     E
  1948.         JR      L_A86F
  1949. ;
  1950. L_A863  LD      A,#03
  1951.         LD      (L_A8C8),A
  1952.         CALL    L_A947
  1953.         JR      NZ,L_A87F
  1954.         DEC     E
  1955.         DEC     E
  1956. L_A86F  LD      A,(L_A8B3)
  1957.         CP      #05
  1958.         JR      NZ,L_A878
  1959.         LD      A,#FF
  1960. L_A878  INC     A
  1961.         LD      (L_A8B3),A
  1962.         ADD     A,#30
  1963.         LD      B,A
  1964. L_A87F  LD      A,(curdown)
  1965.         OR      A
  1966.         JR      Z,L_A887
  1967.         LD      B,#39
  1968. L_A887  LD      A,(L_A8C8)
  1969.         OR      A
  1970.         JR      NZ,L_A896
  1971.         LD      A,(L_A924)
  1972.         OR      A
  1973.         CALL    NZ,MirrorSprite
  1974.         JR      L_A89D
  1975. ;
  1976. L_A896  LD      A,(L_A924)
  1977.         OR      A
  1978.         CALL    Z,MirrorSprite
  1979. L_A89D  CALL    L_A964
  1980.         JR      NZ,L_A8A4
  1981.         LD      B,#38
  1982. L_A8A4  LD      A,B
  1983.         LD      (L_A8C4),A
  1984.         LD      C,A
  1985.         LD      (L_A8C6),DE
  1986.         CALL    L_95E5
  1987.         JP      L_94CD
  1988. ;
  1989. L_A8B3       DB       #04,#04,#04,#02,#02,#02,#02,#00
  1990.        DB       #00,#FE,#FE,#FE,#FE,#FC,#FC
  1991. L_A8C2       DB       #00
  1992. L_A8C3       DB       #00
  1993. L_A8C4       DB       #36
  1994. L_A8C5       DB       #00
  1995. ;
  1996. L_A8C6       DW       #9048
  1997. L_A8C7       EQU       $-1
  1998. ;
  1999. L_A8C8       DB       #00
  2000. ;
  2001. MirrorSprite
  2002.         PUSH    AF
  2003.         PUSH    BC
  2004.         PUSH    DE
  2005.         PUSH    HL
  2006.         LD      BC,#0160
  2007.         LD      (L_A925),SP
  2008.         LD      HL,L_EA22
  2009.         LD      SP,HL
  2010. L_A8D8  POP     DE
  2011.         SRL     D
  2012.         RLA
  2013.         SRL     D
  2014.         RLA
  2015.         SRL     D
  2016.         RLA
  2017.         SRL     D
  2018.         RLA
  2019.         SRL     D
  2020.         RLA
  2021.         SRL     D
  2022.         RLA
  2023.         SRL     D
  2024.         RLA
  2025.         SRL     D
  2026.         RLA
  2027.         LD      (HL),A
  2028.         INC     HL
  2029.         SRL     E
  2030.         RLA
  2031.         SRL     E
  2032.         RLA
  2033.         SRL     E
  2034.         RLA
  2035.         SRL     E
  2036.         RLA
  2037.         SRL     E
  2038.         RLA
  2039.         SRL     E
  2040.         RLA
  2041.         SRL     E
  2042.         RLA
  2043.         SRL     E
  2044.         RLA
  2045.         LD      (HL),A
  2046.         INC     HL
  2047.         DEC     BC
  2048.         LD      A,B
  2049.         OR      C
  2050.         JP      NZ,L_A8D8
  2051.         LD      A,(L_A924)
  2052.         XOR     #01
  2053.         LD      (L_A924),A
  2054.         LD      SP,(L_A925)
  2055.         POP     HL
  2056.         POP     DE
  2057.         POP     BC
  2058.         POP     AF
  2059.         RET
  2060. ;
  2061. L_A924       DB       #00
  2062. L_A925       DB       #EE,#FF
  2063. ;
  2064. L_A927  PUSH    BC
  2065.         PUSH    DE
  2066.         PUSH    HL
  2067.         DEC     E
  2068.         DEC     E
  2069.         DEC     E
  2070.         DEC     E
  2071.         CALL    L_97EE
  2072.         INC     L
  2073.         INC     L
  2074.         LD      BC,#0020
  2075.         LD      A,(HL)
  2076.         ADD     HL,BC
  2077.         OR      (HL)
  2078.         LD      E,A
  2079.         LD      A,D
  2080.         AND     #07
  2081.         LD      A,E
  2082.         JR      Z,L_A942
  2083.         ADD     HL,BC
  2084.         OR      (HL)
  2085. L_A942  OR      A
  2086.         POP     HL
  2087.         POP     DE
  2088.         POP     BC
  2089.         RET
  2090. ;
  2091. L_A947  PUSH    BC
  2092.         PUSH    DE
  2093.         PUSH    HL
  2094.         INC     E
  2095.         INC     E
  2096.         INC     E
  2097.         CALL    L_97EE
  2098.         LD      BC,#0020
  2099.         LD      A,(HL)
  2100.         ADD     HL,BC
  2101.         OR      (HL)
  2102.         LD      E,A
  2103.         LD      A,D
  2104.         AND     #07
  2105.         LD      A,E
  2106.         JR      Z,L_A95F
  2107.         ADD     HL,BC
  2108.         OR      (HL)
  2109. L_A95F  OR      A
  2110.         POP     HL
  2111.         POP     DE
  2112.         POP     BC
  2113.         RET
  2114. ;
  2115. L_A964  PUSH    BC
  2116.         PUSH    DE
  2117.         PUSH    HL
  2118.         INC     E
  2119.         INC     E
  2120.         INC     E
  2121.         INC     E
  2122.         LD      A,D
  2123.         CP      #B0
  2124.         LD      A,#01
  2125.         JR      NC,L_A98A
  2126.         LD      A,D
  2127.         AND     #0F
  2128.         LD      A,#00
  2129.         JR      NZ,L_A98A
  2130.         CALL    L_97EE
  2131.         LD      BC,#0040
  2132.         ADD     HL,BC
  2133.         LD      A,(HL)
  2134.         LD      D,A
  2135.         LD      A,E
  2136.         AND     #07
  2137.         LD      A,D
  2138.         JR      Z,L_A98A
  2139.         INC     L
  2140.         OR      (HL)
  2141. L_A98A  OR      A
  2142.         POP     HL
  2143.         POP     DE
  2144.         POP     BC
  2145.         RET
  2146. ;
  2147. L_A98F  PUSH    BC
  2148.         PUSH    DE
  2149.         PUSH    HL
  2150.         LD      A,D
  2151.         OR      A
  2152.         LD      A,#01
  2153.         JP      Z,L_A9B5
  2154.         INC     E
  2155.         INC     E
  2156.         INC     E
  2157.         INC     E
  2158.         LD      A,D
  2159.         AND     #0F
  2160.         LD      A,#00
  2161.         JR      NZ,L_A9B5
  2162.         CALL    L_97EE
  2163.         LD      BC,L_FFE0
  2164.         ADD     HL,BC
  2165.         LD      A,(HL)
  2166.         LD      D,A
  2167.         LD      A,E
  2168.         AND     #07
  2169.         LD      A,D
  2170.         JR      Z,L_A9B5
  2171.         INC     L
  2172.         OR      (HL)
  2173. L_A9B5  OR      A
  2174.         POP     HL
  2175.         POP     DE
  2176.         POP     BC
  2177.         RET
  2178. ;
  2179. L_A9BA  LD      A,(L_A8C3)
  2180.         OR      A
  2181.         RET     NZ
  2182.         LD      A,(curfire)
  2183.         OR      A
  2184.         JR      NZ,L_A9C9
  2185.         LD      (L_AA89),A
  2186.         RET
  2187. ;
  2188. L_A9C9  LD      A,(L_AA89)
  2189.         OR      A
  2190.         RET     NZ
  2191.         INC     A
  2192.         LD      (L_AA89),A
  2193.         LD      A,#05
  2194.         LD      (L_A8C3),A
  2195.         LD      B,#46
  2196.         CALL    L_D0B7
  2197.         LD      DE,(L_A8C6)
  2198.         LD      A,(L_A8C8)
  2199.         OR      A
  2200.         JR      NZ,L_A9EC
  2201.         LD      A,E
  2202.         ADD     A,#12
  2203.         LD      E,A
  2204.         JR      L_A9F0
  2205. ;
  2206. L_A9EC  LD      A,E
  2207.         SUB     #14
  2208.         LD      E,A
  2209. L_A9F0  CALL    CountXYtoxy_DE
  2210.         SET     0,E
  2211.         RES     0,D
  2212.         LD      A,(curdown)
  2213.         OR      A
  2214.         JR      Z,L_AA0E
  2215.         PUSH    DE
  2216.         LD      DE,(L_A8C6)
  2217.         LD      A,D
  2218.         CP      #B0
  2219.         JR      Z,L_AA0A
  2220.         CALL    L_A964
  2221. L_AA0A  POP     DE
  2222.         RET     Z
  2223.         INC     D
  2224.         INC     D
  2225. L_AA0E  CALL    CountScrAddr_DEyx
  2226.         LD      BC,#8D00
  2227.         ADD     HL,BC
  2228.         LD      A,(HL)
  2229.         OR      A
  2230.         JR      Z,L_AA4F
  2231.         CP      #01
  2232.         RET     Z
  2233. L_AA1C  PUSH    AF
  2234.         PUSH    BC
  2235.         PUSH    DE
  2236.         PUSH    HL
  2237.         XOR     A
  2238.         LD      (L_9AA6),A
  2239.         CALL    L_9A82
  2240.         CALL    CountScrAddr_DEyx
  2241.         LD      BC,#9000
  2242.         ADD     HL,BC
  2243.         LD      A,(HL)
  2244.         CALL    DrawSprite
  2245.         LD      C,#47
  2246.         CALL    L_981B
  2247.         CALL    CountxytoXY_DE
  2248.         CALL    L_95E5
  2249.         CALL    L_AAE5
  2250.         PUSH    DE
  2251.         CALL    L_974A
  2252.         POP     DE
  2253.         LD      B,D
  2254.         LD      C,E
  2255.         CALL    L_CBB5
  2256.         POP     HL
  2257.         POP     DE
  2258.         POP     BC
  2259.         POP     AF
  2260.         RET
  2261. ;
  2262. L_AA4F  PUSH    DE
  2263.         CALL    CountxytoXY_DE
  2264.         PUSH    DE
  2265.         CALL    L_AC0C
  2266.         POP     DE
  2267.         OR      A
  2268.         CALL    NZ,L_CD19
  2269.         CALL    NZ,L_C363
  2270.         POP     DE
  2271.         RET     NZ
  2272.         LD      A,#02
  2273.         LD      (L_9AA6),A
  2274.         LD      A,#00
  2275.         LD      C,#45
  2276.         CALL    L_9A82
  2277.         CALL    CountxytoXY_DE
  2278.         LD      A,#00
  2279.         CALL    L_95E5
  2280.         CALL    L_94CD
  2281.         CALL    L_AAE5
  2282.         LD      HL,#5801
  2283.         LD      DE,#5802
  2284.         LD      BC,#001D
  2285.         LD      (HL),#47
  2286.         LDIR
  2287.         RET
  2288. ;
  2289. L_AA89       DB       #00
  2290. ;
  2291. L_AA8A  PUSH    AF
  2292.         PUSH    BC
  2293.         PUSH    DE
  2294.         PUSH    HL
  2295.         LD      DE,(L_A8C6)
  2296.         CALL    CountXYtoxy_DE
  2297.         DEC     D
  2298.         DEC     D
  2299.         SET     0,E
  2300.         RES     0,D
  2301.         CALL    CountScrAddr_DEyx
  2302.         LD      BC,#8D00
  2303.         ADD     HL,BC
  2304.         LD      A,(HL)
  2305.         CP      #02
  2306.         JR      NZ,L_AABD
  2307.         LD      A,#03
  2308.         LD      (L_9AA6),A
  2309.         LD      C,#45
  2310.         CALL    L_9A82
  2311.         CALL    CountxytoXY_DE
  2312.         LD      A,#03
  2313.         CALL    L_94CD
  2314.         CALL    L_95E5
  2315.         XOR     A
  2316. L_AABD  CP      #03
  2317.         CALL    Z,L_AA1C
  2318.         POP     HL
  2319.         POP     DE
  2320.         POP     BC
  2321.         POP     AF
  2322.         RET
  2323. ;
  2324. CountXYtoxy_DE
  2325.         PUSH    AF
  2326.         LD      A,D
  2327.         AND     #F8
  2328.         RRCA
  2329.         RRCA
  2330.         RRCA
  2331.         LD      D,A
  2332.         LD      A,E
  2333.         AND     #F8
  2334.         RRCA
  2335.         RRCA
  2336.         RRCA
  2337.         LD      E,A
  2338.         POP     AF
  2339.         RET
  2340. ;
  2341. CountxytoXY_DE
  2342.         PUSH    AF
  2343.         LD      A,D
  2344.         ADD     A,A
  2345.         ADD     A,A
  2346.         ADD     A,A
  2347.         LD      D,A
  2348.         LD      A,E
  2349.         ADD     A,A
  2350.         ADD     A,A
  2351.         ADD     A,A
  2352.         LD      E,A
  2353.         POP     AF
  2354.         RET
  2355. ;
  2356. L_AAE5  LD      HL,L_AAFB
  2357. L_AAE8  LD      A,(HL)
  2358.         CP      #FF
  2359.         RET     Z
  2360.         INC     HL
  2361.         INC     HL
  2362.         LD      A,(HL)
  2363.         OR      A
  2364.         INC     HL
  2365.         JR      NZ,L_AAE8
  2366.         DEC     HL
  2367.         LD      (HL),#07
  2368.         DEC     HL
  2369.         LD      (HL),D
  2370.         DEC     HL
  2371.         LD      (HL),E
  2372.         RET
  2373. ;
  2374. L_AAFB       DB       #68,#B0,#00,#3B,#B0,#00,#38,#B0
  2375.        DB       #00,#00,#00,#00,#00,#00,#00,#00
  2376.        DB       #00,#00,#FF
  2377. ;
  2378. L_AB0E  LD      HL,L_AAFB
  2379. L_AB11  LD      A,(HL)
  2380.         CP      #FF
  2381.         RET     Z
  2382.         LD      E,A
  2383.         INC     HL
  2384.         LD      D,(HL)
  2385.         INC     HL
  2386.         LD      A,(HL)
  2387.         INC     HL
  2388.         OR      A
  2389.         JR      Z,L_AB11
  2390.         PUSH    HL
  2391.         DEC     HL
  2392.         DEC     (HL)
  2393.         JR      Z,L_AB35
  2394.         LD      L,A
  2395.         LD      H,#00
  2396.         LD      BC,L_AB3E
  2397.         ADD     HL,BC
  2398.         LD      A,(HL)
  2399.         CALL    L_94CD
  2400.         CALL    L_95E5
  2401.         POP     HL
  2402.         JP      L_AB11
  2403. ;
  2404. L_AB35  CALL    L_95E5
  2405.         CALL    L_974A
  2406.         POP     HL
  2407.         JP      L_AB11
  2408. L_AB3E       EQU       $-1
  2409. ;
  2410.        DB       #00,#08,#08,#08,#09,#09,#09       ;.......
  2411. ;
  2412. L_AB46  PUSH    HL
  2413.         LD      HL,(L_AB55)
  2414.         LD      (HL),E
  2415.         INC     HL
  2416.         LD      (HL),D
  2417.         INC     HL
  2418.         LD      (HL),#FF
  2419.         LD      (L_AB55),HL
  2420.         POP     HL
  2421.         RET
  2422. ;
  2423. L_AB55       DW       L_AB6D
  2424. ;
  2425. L_AB57       DB       #78,#10,#68,#40,#78,#40,#88,#40
  2426.        DB       #28,#50
  2427. L_AB61       DB       #C8,#50,#A8,#90,#38,#70,#B8,#70
  2428.        DB       #6B,#20,#7F,#80
  2429. L_AB6D       DB       #FF,#78,#FF,#00,#00,#00,#00,#00
  2430.        DB       #00,#00,#00,#00,#00,#00,#00,#00
  2431.        DB       #00,#00,#00,#00,#00,#00,#00,#00
  2432.        DB       #00,#00,#00,#00,#00,#00,#00,#00
  2433.        DB       #00,#00,#00,#00,#00,#00,#00,#00
  2434.        DB       #00,#00,#00,#00,#00,#00,#00,#00
  2435.        DB       #00,#00,#00,#00,#00,#00,#00,#00
  2436.        DB       #00,#00,#00,#00,#00,#00,#00,#00
  2437.        DB       #00,#00,#00,#00,#00,#00,#00,#00
  2438.        DB       #00,#00,#00,#00,#00,#00,#00,#00
  2439.        DB       #00,#00,#00,#00,#00,#00,#00,#00
  2440.        DB       #00,#00,#00,#00,#00,#00,#00,#00
  2441.        DB       #00,#00,#00,#00,#00,#00,#00,#00
  2442.        DB       #00,#00,#00,#00,#00,#00,#00,#00
  2443.        DB       #00,#00,#00,#00,#00,#00,#00,#00
  2444.        DB       #00,#00,#00,#00,#00,#00,#00,#00
  2445.        DB       #00,#00,#00,#00,#00,#00,#00,#00
  2446.        DB       #00,#00,#FF
  2447. ;
  2448. L_ABF8  LD      A,D
  2449.         SUB     B
  2450.         SUB     #11
  2451.         CP      #E3
  2452.         LD      A,#00
  2453.         RET     C
  2454.         LD      A,E
  2455.         SUB     C
  2456.         SUB     #11
  2457.         CP      #E3
  2458.         LD      A,#00
  2459.         RET     C
  2460.         INC     A
  2461.         RET
  2462. ;
  2463. L_AC0C  PUSH    BC
  2464.         PUSH    HL
  2465.         INC     D
  2466.         INC     D
  2467.         INC     E
  2468.         INC     E
  2469.         LD      HL,L_AB57
  2470. L_AC15  LD      A,(HL)
  2471.         CP      #FF
  2472.         LD      A,#00
  2473.         JR      Z,L_AC27
  2474.         LD      C,(HL)
  2475.         INC     HL
  2476.         LD      B,(HL)
  2477.         INC     HL
  2478.         CALL    L_ABF8
  2479.         OR      A
  2480.         JP      Z,L_AC15
  2481. L_AC27  POP     HL
  2482.         POP     BC
  2483.         RET
  2484. ;
  2485. L_AC2A  PUSH    BC
  2486.         PUSH    DE
  2487.         PUSH    HL
  2488.         LD      A,E
  2489.         ADD     A,#10
  2490.         LD      E,A
  2491.         CALL    CountXYtoxy_DE
  2492.         CALL    CountScrAddr_DEyx
  2493.         LD      BC,#8D00
  2494.         ADD     HL,BC
  2495.         LD      A,(HL)
  2496.         CP      #02
  2497.         JR      C,L_AC49
  2498.         CALL    L_AA1C
  2499.         LD      A,#01
  2500.         POP     HL
  2501.         POP     DE
  2502.         POP     BC
  2503.         RET
  2504. ;
  2505. L_AC49  XOR     A
  2506.         POP     HL
  2507.         POP     DE
  2508.         POP     BC
  2509.         RET
  2510. ;
  2511. L_AC4E  PUSH    BC
  2512.         PUSH    DE
  2513.         PUSH    HL
  2514.         LD      A,E
  2515.         SUB     #09
  2516.         LD      E,A
  2517.         CALL    CountXYtoxy_DE
  2518.         CALL    CountScrAddr_DEyx
  2519.         LD      BC,#8D00
  2520.         ADD     HL,BC
  2521.         LD      A,(HL)
  2522.         CP      #02
  2523.         JR      C,L_AC6D
  2524.         CALL    L_AA1C
  2525.         LD      A,#01
  2526.         POP     HL
  2527.         POP     DE
  2528.         POP     BC
  2529.         RET
  2530. ;
  2531. L_AC6D  XOR     A
  2532.         POP     HL
  2533.         POP     DE
  2534.         POP     BC
  2535.         RET
  2536. ;
  2537. L_AC72  PUSH    BC
  2538.         PUSH    DE
  2539.         PUSH    HL
  2540.         LD      A,D
  2541.         SUB     #10
  2542.         LD      D,A
  2543.         CALL    CountXYtoxy_DE
  2544.         CALL    CountScrAddr_DEyx
  2545.         LD      BC,#8D00
  2546.         ADD     HL,BC
  2547.         LD      A,(HL)
  2548.         CP      #02
  2549.         JR      C,L_AC91
  2550.         CALL    L_AA1C
  2551.         LD      A,#01
  2552.         POP     HL
  2553.         POP     DE
  2554.         POP     BC
  2555.         RET
  2556. ;
  2557. L_AC91  XOR     A
  2558.         POP     HL
  2559.         POP     DE
  2560.         POP     BC
  2561.         RET
  2562. ;
  2563. L_AC96  PUSH    BC
  2564.         PUSH    DE
  2565.         PUSH    HL
  2566.         LD      A,D
  2567.         ADD     A,#10
  2568.         LD      D,A
  2569.         CALL    CountXYtoxy_DE
  2570.         CALL    CountScrAddr_DEyx
  2571.         LD      BC,#8D00
  2572.         ADD     HL,BC
  2573.         LD      A,(HL)
  2574.         CP      #02
  2575.         JR      C,L_ACB5
  2576.         CALL    L_AA1C
  2577.         LD      A,#01
  2578.         POP     HL
  2579.         POP     DE
  2580.         POP     BC
  2581.         RET
  2582. ;
  2583. L_ACB5  XOR     A
  2584.         POP     HL
  2585.         POP     DE
  2586.         POP     BC
  2587.         RET
  2588. ;
  2589. L_ACBA  LD      BC,L_AD20
  2590.         LD      A,(L_A390)
  2591.         CALL    GetHLFrom2APlusBC
  2592.         LD      DE,L_AD01
  2593.         LD      BC,#001E
  2594.         LDIR
  2595.         RET
  2596. ;
  2597. L_ACCC  LD      HL,L_AD01
  2598. L_ACCF  LD      A,(HL)
  2599.         CP      #FF
  2600.         RET     Z
  2601.         LD      E,A
  2602.         INC     HL
  2603.         LD      D,(HL)
  2604.         CALL    L_A964
  2605.         JR      NZ,L_ACE8
  2606.         CALL    L_95E5
  2607.         LD      A,D
  2608.         CP      #B0
  2609.         JR      Z,L_ACE8
  2610.         INC     D
  2611.         INC     D
  2612.         INC     D
  2613.         INC     D
  2614.         LD      (HL),D
  2615. L_ACE8  INC     HL
  2616.         INC     HL
  2617.         CALL    L_95E5
  2618.         CALL    L_AB46
  2619.         CALL    L_BFE0
  2620.         LD      A,(L_9478)
  2621.         AND     #01
  2622.         ADD     A,#06
  2623.         CALL    L_94CD
  2624.         JP      L_ACCF
  2625. ;
  2626.        DB       #06
  2627. ;
  2628. L_AD01       DB       #38,#70,#00,#B8,#70,#00,#FF,#FF
  2629.        DB       #FF,#FF,#FF,#FF,#A8,#00,#00,#88
  2630.        DB       #20,#00,#68,#40,#00,#48,#60,#00
  2631.        DB       #28,#80,#00,#FF,#FF,#FF,#FF
  2632. ;
  2633. L_AD20       DW       L_AD4A
  2634.        DW       L_AD51
  2635.        DW       L_AD52
  2636.        DW       L_AD53
  2637.        DW       L_AD54
  2638.        DW       L_AD55
  2639.        DW       L_AD56
  2640.        DW       L_AD66
  2641.        DW       L_AD67
  2642.        DW       L_AD68
  2643.        DW       L_AD69
  2644.        DW       L_AD6A
  2645.        DW       L_AD6B
  2646.        DW       L_AD6C
  2647.        DW       L_AD6D
  2648.        DW       L_AD6E
  2649.        DW       L_AD6F
  2650.        DW       L_AD70
  2651.        DW       L_AD71
  2652.        DW       L_AD72
  2653.        DW       L_AD73
  2654. ;
  2655. L_AD4A       DB       #38,#70,#00,#B8,#70,#00,#FF
  2656. L_AD51       DB       #FF
  2657. L_AD52       DB       #FF
  2658. L_AD53       DB       #FF
  2659. L_AD54       DB       #FF
  2660. L_AD55       DB       #FF
  2661. L_AD56       DB       #A8,#00,#00,#88,#20,#00,#68,#40
  2662.        DB       #00,#48,#60,#00,#28,#80,#00,#FF
  2663. L_AD66       DB       #FF
  2664. L_AD67       DB       #FF
  2665. L_AD68       DB       #FF
  2666. L_AD69       DB       #FF
  2667. L_AD6A       DB       #FF
  2668. L_AD6B       DB       #FF
  2669. L_AD6C       DB       #FF
  2670. L_AD6D       DB       #FF
  2671. L_AD6E       DB       #FF
  2672. L_AD6F       DB       #FF
  2673. L_AD70       DB       #FF
  2674. L_AD71       DB       #FF
  2675. L_AD72       DB       #FF
  2676. L_AD73       DB       #FF
  2677. ;
  2678. L_AD74  LD      BC,L_AE18
  2679.         LD      A,(L_A390)
  2680.         CALL    GetHLFrom2APlusBC
  2681.         LD      DE,L_ADFB
  2682.         LD      BC,#001C
  2683.         LDIR
  2684.         RET
  2685. ;
  2686. L_AD86  LD      HL,L_AE8F
  2687.         LD      DE,L_AE90
  2688.         LD      BC,#0031
  2689.         LD      (HL),#00
  2690.         LDIR
  2691.         RET
  2692. ;
  2693. L_AD94  LD      IX,L_ADFB
  2694. L_AD98  LD      A,(IX+#00)
  2695.         CP      #FF
  2696.         RET     Z
  2697.         LD      A,(IX+#05)
  2698.         OR      A
  2699.         JR      Z,L_ADAE
  2700.         DEC     (IX+#05)
  2701.         LD      BC,#0007
  2702.         ADD     IX,BC
  2703.         JR      L_AD98
  2704. ;
  2705. L_ADAE  LD      A,(IX+#04)
  2706.         LD      (IX+#05),A
  2707.         LD      E,(IX+#00)
  2708.         LD      D,(IX+#01)
  2709.         LD      A,(IX+#02)
  2710.         XOR     (IX+#03)
  2711.         LD      (IX+#03),A
  2712.         CALL    L_ADCD
  2713.         LD      BC,#0007
  2714.         ADD     IX,BC
  2715.         JR      L_AD98
  2716. ;
  2717. L_ADCD  LD      BC,#0005
  2718.         LD      IY,L_AE8F
  2719. L_ADD4  LD      A,(IY+#00)
  2720.         CP      #FF
  2721.         RET     Z
  2722.         LD      A,(IY+#02)
  2723.         OR      A
  2724.         JR      NZ,L_ADF7
  2725.         LD      (IY+#00),E
  2726.         LD      (IY+#01),D
  2727.         LD      A,(IX+#03)
  2728.         LD      (IY+#02),A
  2729.         LD      (IY+#03),#00
  2730.         LD      A,(IX+#06)
  2731.         LD      (IY+#04),A
  2732.         RET
  2733. ;
  2734. L_ADF7  ADD     IY,BC
  2735.         JR      L_ADD4
  2736. ;
  2737. L_ADFB       DB       #FF,#38,#10,#00,#03,#64,#1E,#50
  2738.        DB       #FF,#FF,#FF,#38,#20,#00,#FD,#78
  2739.        DB       #78,#50,#B8,#20,#00,#03,#78,#78
  2740.        DB       #50,#FF,#38,#10,#FF
  2741. ;
  2742. L_AE18       DW       L_AE42
  2743.        DW       L_AE43
  2744.        DW       L_AE4B
  2745.        DW       L_AE4C
  2746.        DW       L_AE4D
  2747.        DW       L_AE5C
  2748.        DW       L_AE6B
  2749.        DW       L_AE73
  2750.        DW       L_AE74
  2751.        DW       L_AE75
  2752.        DW       L_AE76
  2753.        DW       L_AE77
  2754.        DW       L_AE78
  2755.        DW       L_AE87
  2756.        DW       L_AE88
  2757.        DW       L_AE89
  2758.        DW       L_AE8A
  2759.        DW       L_AE8B
  2760.        DW       L_AE8C
  2761.        DW       L_AE8D
  2762.        DW       L_AE8E
  2763. ;
  2764. L_AE42       DB       #FF
  2765. L_AE43       DB       #38,#10,#00,#03,#64,#1E,#50,#FF
  2766. L_AE4B       DB       #FF
  2767. L_AE4C       DB       #FF
  2768. L_AE4D       DB       #38,#20,#00,#FD,#78,#78,#50,#B8
  2769.        DB       #20,#00,#03,#78,#78,#50,#FF
  2770. L_AE5C       DB       #38,#10,#00,#03,#78,#78,#50,#C8
  2771.        DB       #10,#00,#FD,#78,#78,#50,#FF
  2772. L_AE6B       DB       #C8,#10,#00,#FD,#78,#5A,#8C,#FF
  2773. L_AE73       DB       #FF
  2774. L_AE74       DB       #FF
  2775. L_AE75       DB       #FF
  2776. L_AE76       DB       #FF
  2777. L_AE77       DB       #FF
  2778. L_AE78       DB       #28,#10,#FE,#FD,#28,#0A,#3C,#C8
  2779.        DB       #10,#FE,#03,#28,#0A,#3C,#FF
  2780. L_AE87       DB       #FF
  2781. L_AE88       DB       #FF
  2782. L_AE89       DB       #FF
  2783. L_AE8A       DB       #FF
  2784. L_AE8B       DB       #FF
  2785. L_AE8C       DB       #FF
  2786. L_AE8D       DB       #FF
  2787. L_AE8E       DB       #FF
  2788. L_AE8F       DB       #00
  2789. L_AE90       DB       #00,#00,#00,#00,#00,#00,#00,#00
  2790.        DB       #00,#00,#00,#00,#00,#00,#00,#00
  2791.        DB       #00,#00,#00,#00,#00,#00,#00,#00
  2792.        DB       #00,#00,#00,#00,#00,#00,#00,#00
  2793.        DB       #00,#00,#00,#00,#00,#00,#00,#00
  2794.        DB       #00,#00,#00,#00,#00,#00,#00,#00
  2795.        DB       #00,#FF
  2796. ;
  2797. L_AEC2  LD      IX,L_AE8F
  2798. L_AEC6  LD      A,(IX+#00)
  2799.         CP      #FF
  2800.         RET     Z
  2801.         LD      E,A
  2802.         LD      A,(IX+#02)
  2803.         OR      A
  2804.         JR      Z,L_AEE0
  2805.         LD      D,(IX+#01)
  2806.         CALL    L_C6C8
  2807.         OR      A
  2808.         JR      Z,L_AEE0
  2809.         LD      (IX+#02),#00
  2810. L_AEE0  LD      BC,#0005
  2811.         ADD     IX,BC
  2812.         JR      L_AEC6
  2813. ;
  2814. L_AEE7  LD      IX,L_AE8F
  2815. L_AEEB  LD      A,(IX+#00)
  2816.         CP      #FF
  2817.         RET     Z
  2818.         LD      E,A
  2819.         LD      D,(IX+#01)
  2820.         LD      A,(IX+#02)
  2821.         OR      A
  2822.         JR      NZ,L_AF03
  2823.         LD      BC,#0005
  2824.         ADD     IX,BC
  2825.         JP      L_AEEB
  2826. ;
  2827. L_AF03  CALL    L_95E5
  2828.         CALL    L_A964
  2829.         OR      A
  2830.         JR      NZ,L_AF1B
  2831.         LD      A,D
  2832.         CP      #B0
  2833.         JR      Z,L_AF1B
  2834.         ADD     A,#04
  2835.         LD      D,A
  2836.         LD      (IX+#01),A
  2837.         XOR     A
  2838.         JP      L_AF60
  2839. ;
  2840. L_AF1B  LD      A,(IX+#02)
  2841.         CP      #FD
  2842.         JR      Z,L_AF3C
  2843.         LD      C,A
  2844.         CALL    L_A927
  2845.         LD      A,C
  2846.         JR      Z,L_AF52
  2847.         NEG
  2848.         LD      (IX+#02),A
  2849.         CALL    L_AC2A
  2850.         OR      A
  2851.         JP      Z,L_AF52
  2852.         LD      (IX+#03),#05
  2853.         JP      L_AF52
  2854. ;
  2855. L_AF3C  LD      C,A
  2856.         CALL    L_A947
  2857.         LD      A,C
  2858.         JR      Z,L_AF52
  2859.         NEG
  2860.         LD      (IX+#02),A
  2861.         CALL    L_AC4E
  2862.         OR      A
  2863.         JR      Z,L_AF52
  2864.         LD      (IX+#03),#05
  2865. L_AF52  LD      A,(IX+#03)
  2866.         OR      A
  2867.         JR      Z,L_AF5D
  2868.         DEC     (IX+#03)
  2869.         JR      L_AF65
  2870. ;
  2871. L_AF5D  LD      A,(IX+#02)
  2872. L_AF60  ADD     A,E
  2873.         LD      E,A
  2874.         LD      (IX+#00),E
  2875. L_AF65  CALL    L_95E5
  2876.         CALL    L_AB46
  2877.         CALL    L_BFE0
  2878.         LD      A,(L_9478)
  2879.         RRCA
  2880.         AND     #07
  2881.         ADD     A,#0C
  2882.         CALL    L_94CD
  2883.         LD      A,(L_9478)
  2884.         AND     #01
  2885.         JR      Z,L_AF8F
  2886.         DEC     (IX+#04)
  2887.         JR      NZ,L_AF8F
  2888.         LD      (IX+#02),#00
  2889.         CALL    L_AAE5
  2890.         CALL    L_974A
  2891. L_AF8F  LD      BC,#0005
  2892.         ADD     IX,BC
  2893.         JP      L_AEEB
  2894. ;
  2895. L_AF97  LD      BC,L_B04C
  2896.         LD      A,(L_A390)
  2897.         CALL    GetHLFrom2APlusBC
  2898.         LD      DE,L_B02F
  2899.         LD      BC,#001C
  2900.         LDIR
  2901.         RET
  2902. ;
  2903. L_AFA9  LD      HL,L_B0AE
  2904.         LD      DE,L_B0AF
  2905.         LD      BC,#003B
  2906.         LD      (HL),#00
  2907.         LDIR
  2908.         RET
  2909. ;
  2910. L_AFB7  LD      A,(L_B110)
  2911.         CP      #02
  2912.         JR      NZ,L_AFC0
  2913.         LD      A,#FF
  2914. L_AFC0  INC     A
  2915.         LD      (L_B110),A
  2916.         LD      IX,L_B02F
  2917. L_AFC8  LD      A,(IX+#00)
  2918.         CP      #FF
  2919.         RET     Z
  2920.         LD      A,(IX+#05)
  2921.         OR      A
  2922.         JR      Z,L_AFDE
  2923.         DEC     (IX+#05)
  2924.         LD      BC,#0007
  2925.         ADD     IX,BC
  2926.         JR      L_AFC8
  2927. ;
  2928. L_AFDE  LD      A,(IX+#04)
  2929.         LD      (IX+#05),A
  2930.         LD      E,(IX+#00)
  2931.         LD      D,(IX+#01)
  2932.         LD      A,(IX+#02)
  2933.         XOR     (IX+#03)
  2934.         LD      (IX+#03),A
  2935.         CALL    L_AFFD
  2936.         LD      BC,#0007
  2937.         ADD     IX,BC
  2938.         JR      L_AFC8
  2939. ;
  2940. L_AFFD  LD      BC,#0006
  2941.         LD      IY,L_B0AE
  2942. L_B004  LD      A,(IY+#00)
  2943.         CP      #FF
  2944.         RET     Z
  2945.         LD      A,(IY+#02)
  2946.         OR      A
  2947.         JR      NZ,L_B02B
  2948.         LD      A,(IX+#06)
  2949.         LD      (IY+#04),A
  2950.         LD      (IY+#00),E
  2951.         LD      (IY+#01),D
  2952.         LD      A,(IX+#03)
  2953.         LD      (IY+#02),A
  2954.         LD      (IY+#03),#00
  2955.         LD      (IY+#05),#01
  2956.         RET
  2957. ;
  2958. L_B02B  ADD     IY,BC
  2959.         JR      L_B004
  2960. ;
  2961. L_B02F       DB       #FF,#18,#10,#FC,#FE,#64,#14,#41
  2962.        DB       #FF,#FF,#FF,#FF,#FF,#FF,#FF,#FF
  2963.        DB       #58,#00,#00,#FE,#3C,#1E,#50,#FF
  2964.        DB       #FF,#FF,#FF,#08,#FF
  2965. ;
  2966. L_B04C       DW       L_B076
  2967.        DW       L_B077
  2968.        DW       L_B07F
  2969.        DW       L_B080
  2970.        DW       L_B081
  2971.        DW       L_B082
  2972.        DW       L_B083
  2973.        DW       L_B084
  2974.        DW       L_B085
  2975.        DW       L_B086
  2976.        DW       L_B08E
  2977.        DW       L_B08F
  2978.        DW       L_B090
  2979.        DW       L_B091
  2980.        DW       L_B099
  2981.        DW       L_B0A8
  2982.        DW       L_B0A9
  2983.        DW       L_B0AA
  2984.        DW       L_B0AB
  2985.        DW       L_B0AC
  2986.        DW       L_B0AD
  2987. ;
  2988. L_B076       DB       #FF
  2989. L_B077       DB       #18,#10,#FC,#FE,#64,#14,#41,#FF
  2990. L_B07F       DB       #FF
  2991. L_B080       DB       #FF
  2992. L_B081       DB       #FF
  2993. L_B082       DB       #FF
  2994. L_B083       DB       #FF
  2995. L_B084       DB       #FF
  2996. L_B085       DB       #FF
  2997. L_B086       DB       #58,#00,#00,#FE,#3C,#1E,#50,#FF
  2998. L_B08E       DB       #FF
  2999. L_B08F       DB       #FF
  3000. L_B090       DB       #FF
  3001. L_B091       DB       #08,#00,#00,#02,#32,#0A,#32,#FF
  3002. L_B099       DB       #64,#10,#00,#02,#4B,#28,#19,#8C
  3003.        DB       #10,#00,#FE,#4B,#28,#19,#FF
  3004. L_B0A8       DB       #FF
  3005. L_B0A9       DB       #FF
  3006. L_B0AA       DB       #FF
  3007. L_B0AB       DB       #FF
  3008. L_B0AC       DB       #FF
  3009. L_B0AD       DB       #FF
  3010. L_B0AE       DB       #00
  3011. L_B0AF       DB       #00,#00,#00,#00,#00,#00,#00,#00
  3012.        DB       #00,#00,#00,#00,#00,#00,#00,#00
  3013.        DB       #00,#00,#00,#00,#00,#00,#00,#00
  3014.        DB       #00,#00,#00,#00,#00,#00,#00,#00
  3015.        DB       #00,#00,#00,#00,#00,#00,#00,#00
  3016.        DB       #00,#00,#00,#00,#00,#00,#00,#00
  3017.        DB       #00,#00,#00,#00,#00,#00,#00,#00
  3018.        DB       #00,#00,#00,#FF
  3019. ;
  3020. L_B0EB  LD      IX,L_B0AE
  3021. L_B0EF  LD      A,(IX+#00)
  3022.         CP      #FF
  3023.         RET     Z
  3024.         LD      E,A
  3025.         LD      A,(IX+#02)
  3026.         OR      A
  3027.         JR      Z,L_B109
  3028.         LD      D,(IX+#01)
  3029.         CALL    L_C6C8
  3030.         OR      A
  3031.         JR      Z,L_B109
  3032.         LD      (IX+#02),#00
  3033. L_B109  LD      BC,#0006
  3034.         ADD     IX,BC
  3035.         JR      L_B0EF
  3036. ;
  3037. L_B110       DB       #00
  3038. ;
  3039. L_B111  LD      IX,L_B0AE
  3040. L_B115  LD      A,(IX+#00)
  3041.         CP      #FF
  3042.         RET     Z
  3043.         LD      E,A
  3044.         LD      D,(IX+#01)
  3045.         LD      A,(IX+#02)
  3046.         OR      A
  3047.         JR      NZ,L_B12D
  3048.         LD      BC,#0006
  3049.         ADD     IX,BC
  3050.         JP      L_B115
  3051. ;
  3052. L_B12D  CALL    L_95E5
  3053.         CALL    L_A964
  3054.         OR      A
  3055.         JR      NZ,L_B15D
  3056.         LD      A,D
  3057.         CP      #B0
  3058.         JR      Z,L_B15D
  3059.         ADD     A,#04
  3060.         LD      D,A
  3061.         LD      (IX+#01),A
  3062.         LD      (IX+#03),#03
  3063.         LD      A,#01
  3064.         LD      (IX+#05),A
  3065.         LD      B,#17
  3066.         LD      A,(IX+#02)
  3067.         CP      #FE
  3068.         LD      A,#00
  3069.         JP      Z,L_B203
  3070.         LD      B,#14
  3071.         LD      A,#00
  3072.         JP      L_B203
  3073. ;
  3074. L_B15D  LD      A,(IX+#05)
  3075.         OR      A
  3076.         JR      Z,L_B173
  3077.         LD      A,(L_A8C6)
  3078.         CP      E
  3079.         JR      NC,L_B16F
  3080.         LD      (IX+#02),#FE
  3081.         JR      L_B173
  3082. ;
  3083. L_B16F  LD      (IX+#02),#02
  3084. L_B173  LD      (IX+#05),#00
  3085.         LD      A,(IX+#02)
  3086.         CP      #FE
  3087.         JR      Z,L_B1AA
  3088.         LD      C,A
  3089.         LD      B,#14
  3090.         CALL    L_A927
  3091.         LD      A,C
  3092.         JR      Z,L_B1D3
  3093.         NEG
  3094.         LD      (IX+#02),A
  3095.         CALL    L_AC2A
  3096.         OR      A
  3097.         JR      Z,L_B1D3
  3098.         PUSH    DE
  3099.         LD      A,E
  3100.         ADD     A,#10
  3101.         LD      E,A
  3102.         CALL    L_B23C
  3103.         LD      (IX+#03),#0A
  3104.         LD      A,(IX+#02)
  3105.         NEG
  3106.         LD      (IX+#02),A
  3107.         POP     DE
  3108.         JP      L_B1D3
  3109. ;
  3110. L_B1AA  LD      C,A
  3111.         LD      B,#17
  3112.         CALL    L_A947
  3113.         LD      A,C
  3114.         JR      Z,L_B1D3
  3115.         NEG
  3116.         LD      (IX+#02),A
  3117.         CALL    L_AC4E
  3118.         OR      A
  3119.         JR      Z,L_B1D3
  3120.         PUSH    DE
  3121.         LD      A,E
  3122.         SUB     #10
  3123.         LD      E,A
  3124.         CALL    L_B23C
  3125.         LD      A,(IX+#02)
  3126.         NEG
  3127.         LD      (IX+#02),A
  3128.         POP     DE
  3129.         LD      (IX+#03),#0A
  3130. L_B1D3  LD      A,(IX+#03)
  3131.         OR      A
  3132.         JR      Z,L_B1ED
  3133.         DEC     (IX+#03)
  3134.         LD      B,#17
  3135.         LD      A,(IX+#02)
  3136.         CP      #FE
  3137.         LD      A,#00
  3138.         JR      Z,L_B203
  3139.         LD      B,#14
  3140.         LD      A,#00
  3141.         JR      L_B203
  3142. ;
  3143. L_B1ED  LD      A,(IX+#02)
  3144.         ADD     A,E
  3145.         LD      E,A
  3146.         LD      (IX+#00),E
  3147.         LD      A,(IX+#02)
  3148.         CP      #FE
  3149.         LD      B,#17
  3150.         JR      Z,L_B200
  3151.         LD      B,#14
  3152. L_B200  LD      A,(L_B110)
  3153. L_B203  ADD     A,B
  3154.         CALL    L_94CD
  3155.         CALL    L_95E5
  3156.         CALL    L_AB46
  3157.         CALL    L_BFE0
  3158.         LD      A,(L_9478)
  3159.         AND     #03
  3160.         JR      NZ,L_B226
  3161.         DEC     (IX+#04)
  3162.         JR      NZ,L_B226
  3163.         LD      (IX+#02),#00
  3164.         CALL    L_AAE5
  3165.         CALL    L_974A
  3166. L_B226  LD      BC,#0006
  3167.         ADD     IX,BC
  3168.         JP      L_B115
  3169. ;
  3170. L_B22E  LD      HL,L_B252
  3171.         LD      DE,L_B253
  3172.         LD      BC,#001D
  3173.         LD      (HL),#00
  3174.         LDIR
  3175.         RET
  3176. ;
  3177. L_B23C  LD      HL,L_B252
  3178. L_B23F  LD      A,(HL)
  3179.         CP      #FF
  3180.         RET     Z
  3181.         INC     HL
  3182.         INC     HL
  3183.         LD      A,(HL)
  3184.         INC     HL
  3185.         OR      A
  3186.         JR      NZ,L_B23F
  3187.         DEC     HL
  3188.         LD      (HL),#0A
  3189.         DEC     HL
  3190.         LD      (HL),D
  3191.         DEC     HL
  3192.         LD      (HL),E
  3193.         RET
  3194. ;
  3195. L_B252       DB       #00
  3196. L_B253       DB       #00,#00,#00,#00,#00,#00,#00,#00
  3197.        DB       #00,#00,#00,#00,#00,#00,#00,#00
  3198.        DB       #00,#00,#00,#00,#00,#00,#00,#00
  3199.        DB       #00,#00,#00,#00,#00,#FF
  3200. ;
  3201. L_B271  LD      HL,L_B252
  3202. L_B274  LD      A,(HL)
  3203.         CP      #FF
  3204.         RET     Z
  3205.         LD      E,A
  3206.         INC     HL
  3207.         LD      D,(HL)
  3208.         INC     HL
  3209.         LD      A,(HL)
  3210.         OR      A
  3211.         INC     HL
  3212.         JR      Z,L_B274
  3213.         DEC     HL
  3214.         DEC     (HL)
  3215.         INC     HL
  3216.         JR      Z,L_B29F
  3217.         CALL    L_95E5
  3218.         CALL    L_AB46
  3219.         CALL    L_BFE0
  3220.         LD      A,(L_B2AA)
  3221.         XOR     #01
  3222.         LD      (L_B2AA),A
  3223.         ADD     A,#1A
  3224.         CALL    L_94CD
  3225.         JP      L_B274
  3226. ;
  3227. L_B29F  PUSH    HL
  3228.         CALL    L_95E5
  3229.         CALL    L_974A
  3230.         POP     HL
  3231.         JP      L_B274
  3232. ;
  3233. L_B2AA       DB       #01
  3234. ;
  3235. L_B2AB  LD      BC,L_B2BD
  3236.         LD      A,(L_A390)
  3237.         CALL    GetHLFrom2APlusBC
  3238.         LD      DE,L_B2E7
  3239.         LD      BC,#001E
  3240.         LDIR
  3241.         RET
  3242. ;
  3243. L_B2BD       DW       L_B3F0
  3244.        DW       L_B3F5
  3245.        DW       L_B3F6
  3246.        DW       L_B3F7
  3247.        DW       L_B3F8
  3248.        DW       L_B3F9
  3249.        DW       L_B402
  3250.        DW       L_B403
  3251.        DW       L_B404
  3252.        DW       L_B415
  3253.        DW       L_B416
  3254.        DW       L_B417
  3255.        DW       L_B418
  3256.        DW       L_B419
  3257.        DW       L_B41E
  3258.        DW       L_B41F
  3259.        DW       L_B420
  3260.        DW       L_B421
  3261.        DW       L_B422
  3262.        DW       L_B423
  3263.        DW       L_B424
  3264. ;
  3265. L_B2E7       DB       #6B,#20,#03,#00,#FF,#FF,#FF,#FF
  3266.        DB       #FF,#78,#40,#FD,#00,#78,#60,#FD
  3267.        DB       #00,#FF,#FF,#FF,#58,#50,#03,#00
  3268.        DB       #58,#70,#03,#00,#98,#50,#FF
  3269. ;
  3270. L_B306  LD      IX,L_B2E7
  3271. L_B30A  LD      A,(IX+#00)
  3272.         CP      #FF
  3273.         RET     Z
  3274.         LD      E,A
  3275.         LD      A,(IX+#02)
  3276.         OR      A
  3277.         JR      Z,L_B324
  3278.         LD      D,(IX+#01)
  3279.         CALL    L_C6C8
  3280.         OR      A
  3281.         JR      Z,L_B324
  3282.         LD      (IX+#02),#00
  3283. L_B324  LD      BC,#0004
  3284.         ADD     IX,BC
  3285.         JR      L_B30A
  3286. ;
  3287. L_B32B  LD      IX,L_B2E7
  3288. L_B32F  LD      A,(IX+#00)
  3289.         CP      #FF
  3290.         RET     Z
  3291.         LD      E,A
  3292.         LD      D,(IX+#01)
  3293.         LD      A,(IX+#02)
  3294.         OR      A
  3295.         JR      NZ,L_B347
  3296.         LD      BC,#0004
  3297.         ADD     IX,BC
  3298.         JP      L_B32F
  3299. ;
  3300. L_B347  CALL    L_95E5
  3301.         LD      A,(IX+#03)
  3302.         OR      A
  3303.         JP      NZ,L_B3DF
  3304.         LD      A,(IX+#02)
  3305.         CP      #FD
  3306.         JR      Z,L_B38E
  3307.         LD      C,A
  3308.         LD      B,#0A
  3309.         CALL    L_A927
  3310.         LD      A,C
  3311.         JR      Z,L_B3C1
  3312.         NEG
  3313.         LD      (IX+#02),A
  3314.         PUSH    AF
  3315.         PUSH    BC
  3316.         PUSH    DE
  3317.         PUSH    HL
  3318.         LD      A,E
  3319.         ADD     A,#10
  3320.         LD      E,A
  3321.         CALL    CountXYtoxy_DE
  3322.         CALL    CountScrAddr_DEyx
  3323.         LD      BC,#8D00
  3324.         ADD     HL,BC
  3325.         LD      A,(HL)
  3326.         CP      #02
  3327.         JR      C,L_B387
  3328.         LD      (IX+#03),#05
  3329.         CALL    L_AA1C
  3330.         JP      L_B3DB
  3331. ;
  3332. L_B387  POP     HL
  3333.         POP     DE
  3334.         POP     BC
  3335.         POP     AF
  3336.         JP      L_B3C1
  3337. ;
  3338. L_B38E  LD      C,A
  3339.         LD      B,#0B
  3340.         CALL    L_A947
  3341.         LD      A,C
  3342.         JR      Z,L_B3C1
  3343.         NEG
  3344.         LD      (IX+#02),A
  3345.         PUSH    AF
  3346.         PUSH    BC
  3347.         PUSH    DE
  3348.         PUSH    HL
  3349.         LD      A,E
  3350.         SUB     #09
  3351.         LD      E,A
  3352.         CALL    CountXYtoxy_DE
  3353.         CALL    CountScrAddr_DEyx
  3354.         LD      BC,#8D00
  3355.         ADD     HL,BC
  3356.         LD      A,(HL)
  3357.         CP      #02
  3358.         JR      C,L_B3BD
  3359.         LD      (IX+#03),#05
  3360.         CALL    L_AA1C
  3361.         JP      L_B3DB
  3362. ;
  3363. L_B3BD  POP     HL
  3364.         POP     DE
  3365.         POP     BC
  3366.         POP     AF
  3367. L_B3C1  ADD     A,E
  3368.         LD      E,A
  3369.         LD      (IX+#00),E
  3370. L_B3C6  LD      A,B
  3371.         CALL    L_95E5
  3372.         CALL    L_AB46
  3373.         CALL    L_BFE0
  3374.         CALL    L_94CD
  3375.         LD      BC,#0004
  3376.         ADD     IX,BC
  3377.         JP      L_B32F
  3378. ;
  3379. L_B3DB  POP     HL
  3380.         POP     DE
  3381.         POP     BC
  3382.         POP     AF
  3383. L_B3DF  DEC     (IX+#03)
  3384.         LD      A,(IX+#02)
  3385.         CP      #FD
  3386.         LD      B,#0A
  3387.         JP      Z,L_B3C6
  3388.         INC     B
  3389.         JP      L_B3C6
  3390. ;
  3391. L_B3F0       DB       #08,#20,#03,#00,#FF
  3392. L_B3F5       DB       #FF
  3393. L_B3F6       DB       #FF
  3394. L_B3F7       DB       #FF
  3395. L_B3F8       DB       #FF
  3396. L_B3F9       DB       #78,#40,#FD,#00,#78,#60,#FD,#00
  3397.        DB       #FF
  3398. L_B402       DB       #FF
  3399. L_B403       DB       #FF
  3400. L_B404       DB       #58,#50,#03,#00,#58,#70,#03,#00
  3401.        DB       #98,#50,#FD,#00,#98,#70,#FD,#00
  3402.        DB       #FF
  3403. L_B415       DB       #FF
  3404. L_B416       DB       #FF
  3405. L_B417       DB       #FF
  3406. L_B418       DB       #FF
  3407. L_B419       DB       #78,#10,#FD,#00,#FF
  3408. L_B41E       DB       #FF
  3409. L_B41F       DB       #FF
  3410. L_B420       DB       #FF
  3411. L_B421       DB       #FF
  3412. L_B422       DB       #FF
  3413. L_B423       DB       #FF
  3414. L_B424       DB       #FF
  3415. ;
  3416. L_B425  LD      A,(L_A390)
  3417.         LD      BC,L_B45C
  3418.         CALL    GetHLFrom2APlusBC
  3419.         LD      DE,L_B4BE
  3420.         LD      BC,#0019
  3421.         LDIR
  3422.         RET
  3423. ;
  3424. L_B437  LD      IX,L_B4BE
  3425. L_B43B  LD      A,(IX+#00)
  3426.         CP      #FF
  3427.         RET     Z
  3428.         LD      E,A
  3429.         LD      A,(IX+#02)
  3430.         OR      A
  3431.         JR      Z,L_B455
  3432.         LD      D,(IX+#01)
  3433.         CALL    L_C6C8
  3434.         OR      A
  3435.         JR      Z,L_B455
  3436.         LD      (IX+#02),#00
  3437. L_B455  LD      BC,#0005
  3438.         ADD     IX,BC
  3439.         JR      L_B43B
  3440. ;
  3441. L_B45C       DW       L_B486
  3442.        DW       L_B48C
  3443.        DW       L_B48D
  3444.        DW       L_B493
  3445.        DW       L_B494
  3446.        DW       L_B495
  3447.        DW       L_B4A0
  3448.        DW       L_B4A1
  3449.        DW       L_B4A2
  3450.        DW       L_B4A3
  3451.        DW       L_B4A4
  3452.        DW       L_B4A5
  3453.        DW       L_B4A6
  3454.        DW       L_B4A7
  3455.        DW       L_B4A8
  3456.        DW       L_B4B3
  3457.        DW       L_B4B4
  3458.        DW       L_B4B5
  3459.        DW       L_B4B6
  3460.        DW       L_B4B7
  3461.        DW       L_B4B8
  3462. ;
  3463. L_B486       DB       #78,#80,#01,#00,#00,#FF
  3464. L_B48C       DB       #FF
  3465. L_B48D       DB       #38,#A0,#FF,#00,#00,#FF
  3466. L_B493       DB       #FF
  3467. L_B494       DB       #FF
  3468. L_B495       DB       #18,#B0,#01,#00,#00,#E0,#B0,#FF
  3469.        DB       #00,#00,#FF
  3470. L_B4A0       DB       #FF
  3471. L_B4A1       DB       #FF
  3472. L_B4A2       DB       #FF
  3473. L_B4A3       DB       #FF
  3474. L_B4A4       DB       #FF
  3475. L_B4A5       DB       #FF
  3476. L_B4A6       DB       #FF
  3477. L_B4A7       DB       #FF
  3478. L_B4A8       DB       #08,#60,#01,#00,#00,#E8,#60,#FF
  3479.        DB       #00,#00,#FF
  3480. L_B4B3       DB       #FF
  3481. L_B4B4       DB       #FF
  3482. L_B4B5       DB       #FF
  3483. L_B4B6       DB       #FF
  3484. L_B4B7       DB       #FF
  3485. L_B4B8       DB       #78,#B0,#FF,#00,#00,#FF
  3486. L_B4BE       DB       #7F,#80,#FF,#00,#00,#FF,#FF,#38
  3487.        DB       #A0,#FF,#00,#00,#FF,#FF,#FF,#18
  3488.        DB       #B0,#01,#00,#00,#E0,#B0,#FF,#00
  3489.        DB       #00,#FF
  3490. ;
  3491. L_B4D8  LD      IX,L_B4BE
  3492. L_B4DC  LD      A,(IX+#00)
  3493.         CP      #FF
  3494.         RET     Z
  3495.         LD      E,A
  3496.         LD      A,(IX+#02)
  3497.         OR      A
  3498.         JR      NZ,L_B4F1
  3499. L_B4E9  LD      BC,#0005
  3500.         ADD     IX,BC
  3501.         JP      L_B4DC
  3502. ;
  3503. L_B4F1  LD      D,(IX+#01)
  3504.         CALL    L_95E5
  3505.         CALL    L_A964
  3506.         JR      NZ,L_B536
  3507.         LD      A,(IX+#03)
  3508.         CP      #04
  3509.         JR      C,L_B50A
  3510.         INC     D
  3511.         INC     D
  3512.         INC     D
  3513.         INC     D
  3514.         LD      (IX+#01),D
  3515. L_B50A  LD      A,#23
  3516.         CALL    L_94CD
  3517.         CALL    L_95E5
  3518.         CALL    L_AB46
  3519.         CALL    L_BFE0
  3520.         INC     (IX+#03)
  3521.         LD      A,(IX+#03)
  3522.         CP      #08
  3523.         JP      NZ,L_B4E9
  3524.         CALL    L_AAE5
  3525.         CALL    L_974A
  3526.         XOR     A
  3527.         LD      (IX+#02),A
  3528.         LD      (IX+#03),A
  3529.         LD      (IX+#04),A
  3530.         JP      L_B4E9
  3531. ;
  3532. L_B536  LD      A,(IX+#02)
  3533.         CP      #FF
  3534.         JR      Z,L_B562
  3535.         PUSH    DE
  3536.         LD      A,E
  3537.         ADD     A,#08
  3538.         LD      E,A
  3539.         CALL    L_A964
  3540.         POP     DE
  3541.         JR      Z,L_B54D
  3542.         CALL    L_A927
  3543.         JR      Z,L_B584
  3544. L_B54D  LD      (IX+#02),#FF
  3545.         CALL    L_AC2A
  3546.         OR      A
  3547.         JR      Z,L_B584
  3548.         LD      (IX+#04),#0A
  3549.         LD      (IX+#02),#01
  3550.         JP      L_B584
  3551. ;
  3552. L_B562  PUSH    DE
  3553.         LD      A,E
  3554.         SUB     #09
  3555.         LD      E,A
  3556.         CALL    L_A964
  3557.         POP     DE
  3558.         JR      Z,L_B572
  3559.         CALL    L_A947
  3560.         JR      Z,L_B584
  3561. L_B572  LD      (IX+#02),#01
  3562.         CALL    L_AC4E
  3563.         OR      A
  3564.         JR      Z,L_B584
  3565.         LD      (IX+#02),#FF
  3566.         LD      (IX+#04),#0A
  3567. L_B584  LD      A,(IX+#04)
  3568.         OR      A
  3569.         JR      Z,L_B5A8
  3570.         DEC     (IX+#04)
  3571.         LD      A,(IX+#02)
  3572.         CP      #FF
  3573.         LD      A,#28
  3574.         JP      Z,L_B599
  3575.         LD      A,#22
  3576. L_B599  CALL    L_94CD
  3577.         CALL    L_95E5
  3578.         CALL    L_AB46
  3579.         CALL    L_BFE0
  3580.         JP      L_B4E9
  3581. ;
  3582. L_B5A8  LD      A,(IX+#02)
  3583.         ADD     A,E
  3584.         LD      E,A
  3585.         LD      (IX+#00),E
  3586.         LD      A,(IX+#02)
  3587.         LD      B,#24
  3588.         CP      #FF
  3589.         JR      Z,L_B5BB
  3590.         LD      B,#1E
  3591. L_B5BB  LD      A,(L_9478)
  3592.         RRCA
  3593.         RRCA
  3594.         AND     #03
  3595.         ADD     A,B
  3596.         CALL    L_94CD
  3597.         CALL    L_AB46
  3598.         CALL    L_95E5
  3599.         CALL    L_BFE0
  3600.         JP      L_B4E9
  3601. ;
  3602. L_B5D2  LD      A,(L_A390)
  3603.         LD      BC,L_B5E4
  3604.         CALL    GetHLFrom2APlusBC
  3605.         LD      DE,L_B637
  3606.         LD      BC,#0019
  3607.         LDIR
  3608.         RET
  3609. ;
  3610. L_B5E4       DW       L_B60E
  3611.        DW       L_B60F
  3612.        DW       L_B610
  3613.        DW       L_B61B
  3614.        DW       L_B61C
  3615.        DW       L_B627
  3616.        DW       L_B628
  3617.        DW       L_B629
  3618.        DW       L_B62A
  3619.        DW       L_B62B
  3620.        DW       L_B62C
  3621.        DW       L_B62D
  3622.        DW       L_B62E
  3623.        DW       L_B62F
  3624.        DW       L_B630
  3625.        DW       L_B631
  3626.        DW       L_B632
  3627.        DW       L_B633
  3628.        DW       L_B634
  3629.        DW       L_B635
  3630.        DW       L_B636
  3631. ;
  3632. L_B60E       DB       #FF
  3633. L_B60F       DB       #FF
  3634. L_B610       DB       #78,#70,#01,#00,#00,#78,#70,#FF
  3635.        DB       #00,#00,#FF
  3636. L_B61B       DB       #FF
  3637. L_B61C       DB       #08,#20,#01,#00,#00,#E8,#20,#FF
  3638.        DB       #00,#00,#FF
  3639. L_B627       DB       #FF
  3640. L_B628       DB       #FF
  3641. L_B629       DB       #FF
  3642. L_B62A       DB       #FF
  3643. L_B62B       DB       #FF
  3644. L_B62C       DB       #FF
  3645. L_B62D       DB       #FF
  3646. L_B62E       DB       #FF
  3647. L_B62F       DB       #FF
  3648. L_B630       DB       #FF
  3649. L_B631       DB       #FF
  3650. L_B632       DB       #FF
  3651. L_B633       DB       #FF
  3652. L_B634       DB       #FF
  3653. L_B635       DB       #FF
  3654. L_B636       DB       #FF
  3655. L_B637       DB       #FF,#FF,#78,#70,#01,#00,#00,#78
  3656.        DB       #70,#FF,#00,#00,#FF,#FF,#08,#20
  3657.        DB       #01,#00,#00,#E8,#20,#FF,#00,#00
  3658.        DB       #FF,#FF
  3659. ;
  3660. L_B651  LD      IX,L_B637
  3661. L_B655  LD      A,(IX+#00)
  3662.         CP      #FF
  3663.         RET     Z
  3664.         LD      E,A
  3665.         LD      A,(IX+#02)
  3666.         OR      A
  3667.         JR      Z,L_B66F
  3668.         LD      D,(IX+#01)
  3669.         CALL    L_C6C8
  3670.         OR      A
  3671.         JR      Z,L_B66F
  3672.         LD      (IX+#02),#00
  3673. L_B66F  LD      BC,#0005
  3674.         ADD     IX,BC
  3675.         JR      L_B655
  3676. ;
  3677. L_B676  LD      IX,L_B637
  3678. L_B67A  LD      A,(IX+#00)
  3679.         CP      #FF
  3680.         RET     Z
  3681.         LD      E,A
  3682.         LD      A,(IX+#02)
  3683.         OR      A
  3684.         JR      NZ,L_B68F
  3685. L_B687  LD      BC,#0005
  3686.         ADD     IX,BC
  3687.         JP      L_B67A
  3688. ;
  3689. L_B68F  LD      D,(IX+#01)
  3690.         CALL    L_95E5
  3691.         CALL    L_A964
  3692.         JR      NZ,L_B6DD
  3693.         LD      A,(IX+#03)
  3694.         CP      #04
  3695.         JR      C,L_B6A8
  3696.         INC     D
  3697.         INC     D
  3698.         INC     D
  3699.         INC     D
  3700.         LD      (IX+#01),D
  3701. L_B6A8  LD      A,(IX+#02)
  3702.         CP      #01
  3703.         LD      A,#29
  3704.         JR      Z,L_B6B3
  3705.         LD      A,#2B
  3706. L_B6B3  CALL    L_94CD
  3707.         CALL    L_95E5
  3708.         CALL    L_AB46
  3709.         CALL    L_BFE0
  3710.         INC     (IX+#03)
  3711.         LD      A,(IX+#03)
  3712.         CP      #08
  3713.         JP      NZ,L_B687
  3714.         CALL    L_AAE5
  3715.         CALL    L_974A
  3716.         XOR     A
  3717.         LD      (IX+#02),A
  3718.         LD      (IX+#03),A
  3719.         LD      (IX+#04),A
  3720.         JP      L_B687
  3721. ;
  3722. L_B6DD  LD      A,(IX+#02)
  3723.         CP      #FF
  3724.         JR      Z,L_B712
  3725.         PUSH    DE
  3726.         LD      A,E
  3727.         ADD     A,#08
  3728.         LD      E,A
  3729.         CALL    L_A964
  3730.         POP     DE
  3731.         JR      Z,L_B6F4
  3732.         CALL    L_A927
  3733.         JR      Z,L_B73D
  3734. L_B6F4  LD      (IX+#02),#FF
  3735.         CALL    L_AC2A
  3736.         OR      A
  3737.         JR      Z,L_B73D
  3738.         PUSH    DE
  3739.         LD      A,E
  3740.         ADD     A,#10
  3741.         LD      E,A
  3742.         CALL    L_B23C
  3743.         POP     DE
  3744.         LD      (IX+#04),#0A
  3745.         LD      (IX+#02),#01
  3746.         JP      L_B73D
  3747. ;
  3748. L_B712  PUSH    DE
  3749.         LD      A,E
  3750.         SUB     #09
  3751.         LD      E,A
  3752.         CALL    L_A964
  3753.         POP     DE
  3754.         JR      Z,L_B722
  3755.         CALL    L_A947
  3756.         JR      Z,L_B73D
  3757. L_B722  LD      (IX+#02),#01
  3758.         CALL    L_AC4E
  3759.         OR      A
  3760.         JR      Z,L_B73D
  3761.         PUSH    DE
  3762.         LD      A,E
  3763.         SUB     #10
  3764.         LD      E,A
  3765.         CALL    L_B23C
  3766.         POP     DE
  3767.         LD      (IX+#02),#FF
  3768.         LD      (IX+#04),#0A
  3769. L_B73D  LD      A,(IX+#04)
  3770.         OR      A
  3771.         JR      Z,L_B761
  3772.         DEC     (IX+#04)
  3773.         LD      A,(IX+#02)
  3774.         CP      #FF
  3775.         LD      A,#2B
  3776.         JP      Z,L_B752
  3777.         LD      A,#29
  3778. L_B752  CALL    L_94CD
  3779.         CALL    L_95E5
  3780.         CALL    L_AB46
  3781.         CALL    L_BFE0
  3782.         JP      L_B687
  3783. ;
  3784. L_B761  LD      A,(IX+#02)
  3785.         ADD     A,E
  3786.         LD      E,A
  3787.         LD      (IX+#00),E
  3788.         LD      A,(IX+#02)
  3789.         LD      B,#2B
  3790.         CP      #FF
  3791.         JR      Z,L_B774
  3792.         LD      B,#29
  3793. L_B774  LD      A,(L_9478)
  3794.         RRCA
  3795.         AND     #01
  3796.         ADD     A,B
  3797.         CALL    L_94CD
  3798.         CALL    L_AB46
  3799.         CALL    L_95E5
  3800.         CALL    L_BFE0
  3801.         JP      L_B687
  3802. ;
  3803. L_B78A  LD      A,(L_A390)
  3804.         LD      BC,L_B7C1
  3805.         CALL    GetHLFrom2APlusBC
  3806.         LD      DE,L_B7EB
  3807.         LD      BC,#0063
  3808.         LDIR
  3809.         RET
  3810. ;
  3811. L_B79C  LD      IX,L_B7EB
  3812. L_B7A0  LD      A,(IX+#00)
  3813.         CP      #FF
  3814.         RET     Z
  3815.         LD      E,A
  3816.         LD      A,(IX+#02)
  3817.         OR      A
  3818.         JR      Z,L_B7BA
  3819.         LD      D,(IX+#01)
  3820.         CALL    L_C6C8
  3821.         OR      A
  3822.         JR      Z,L_B7BA
  3823.         LD      (IX+#02),#00
  3824. L_B7BA  LD      BC,#0005
  3825.         ADD     IX,BC
  3826.         JR      L_B7A0
  3827. ;
  3828. L_B7C1       DW       L_B850
  3829.        DW       L_B851
  3830.        DW       L_B852
  3831.        DW       L_B85D
  3832.        DW       L_B85E
  3833.        DW       L_B85F
  3834.        DW       L_B860
  3835.        DW       L_B861
  3836.        DW       L_B885
  3837.        DW       L_B886
  3838.        DW       L_B887
  3839.        DW       L_B897
  3840.        DW       L_B898
  3841.        DW       L_B899
  3842.        DW       L_B89A
  3843.        DW       L_B8A5
  3844.        DW       L_B8A6
  3845.        DW       L_B8A7
  3846.        DW       L_B8A8
  3847.        DW       L_B8A9
  3848.        DW       L_B8AA
  3849. ;
  3850. L_B7EB       DB       #FF,#FF,#B8,#14,#01,#02,#00,#78
  3851.        DB       #A4,#01,#02,#00,#FF,#FF,#FF,#FF
  3852.        DB       #FF,#58,#2C,#03,#02,#00,#58,#34
  3853.        DB       #01,#02,#00,#B8,#2C,#03,#02,#00
  3854.        DB       #B8,#34,#01,#02,#00,#58,#8C,#03
  3855.        DB       #02,#00,#B8,#8C,#03,#02,#00,#78
  3856.        DB       #14,#01,#02,#00,#FF,#FF,#FF,#88
  3857.        DB       #84,#01,#04,#00,#98,#90,#01,#04
  3858.        DB       #00,#08,#80,#01,#04,#00,#FF,#FF
  3859.        DB       #FF,#FF,#D8,#94,#01,#04,#00,#D8
  3860.        DB       #7C,#03,#04,#00,#FF,#FF,#FF,#FF
  3861.        DB       #FF,#FF,#FF,#DD,#21,#EB,#B7,#DD
  3862.        DB       #7E,#00,#FE,#00,#FF
  3863. L_B850       DB       #FF
  3864. L_B851       DB       #FF
  3865. L_B852       DB       #B8,#14,#01,#02,#00,#78,#A4,#01
  3866.        DB       #02,#00,#FF
  3867. L_B85D       DB       #FF
  3868. L_B85E       DB       #FF
  3869. L_B85F       DB       #FF
  3870. L_B860       DB       #FF
  3871. L_B861       DB       #58,#2C,#03,#02,#00,#58,#34,#01
  3872.        DB       #02,#00,#B8,#2C,#03,#02,#00,#B8
  3873.        DB       #34,#01,#02,#00,#58,#8C,#03,#02
  3874.        DB       #00,#B8,#8C,#03,#02,#00,#78,#14
  3875.        DB       #01,#02,#00,#FF
  3876. L_B885       DB       #FF
  3877. L_B886       DB       #FF
  3878. L_B887       DB       #88,#84,#01,#04,#00,#98,#90,#01
  3879.        DB       #04,#00,#08,#80,#01,#04,#00,#FF
  3880. L_B897       DB       #FF
  3881. L_B898       DB       #FF
  3882. L_B899       DB       #FF
  3883. L_B89A       DB       #D8,#94,#01,#04,#00,#D8,#7C,#03
  3884.        DB       #04,#00,#FF
  3885. L_B8A5       DB       #FF
  3886. L_B8A6       DB       #FF
  3887. L_B8A7       DB       #FF
  3888. L_B8A8       DB       #FF
  3889. L_B8A9       DB       #FF
  3890. L_B8AA       DB       #FF
  3891. ;
  3892. L_B8AB  LD      IX,L_B7EB
  3893. L_B8AF  LD      A,(IX+#00)
  3894.         CP      #FF
  3895.         RET     Z
  3896.         LD      A,(IX+#02)
  3897.         OR      A
  3898.         JR      NZ,L_B8C3
  3899. L_B8BB  LD      BC,#0005
  3900.         ADD     IX,BC
  3901.         JP      L_B8AF
  3902. ;
  3903. L_B8C3  LD      E,(IX+#00)
  3904.         LD      D,(IX+#01)
  3905.         CALL    L_95E5
  3906.         LD      A,(IX+#04)
  3907.         OR      A
  3908.         JP      NZ,L_B9AC
  3909.         LD      A,(IX+#02)
  3910.         CP      #01
  3911.         JR      Z,L_B8F9
  3912.         CP      #02
  3913.         JR      Z,L_B910
  3914.         CP      #03
  3915.         JR      Z,L_B927
  3916.         CALL    L_BA90
  3917.         JR      Z,L_B8EC
  3918.         LD      A,#03
  3919.         JP      L_B93E
  3920. ;
  3921. L_B8EC  CALL    L_BA42
  3922.         LD      A,#00
  3923.         JP      NZ,L_B93E
  3924.         LD      A,#01
  3925.         JP      L_B93E
  3926. ;
  3927. L_B8F9  CALL    L_BA42
  3928.         JR      Z,L_B903
  3929.         LD      A,#04
  3930.         JP      L_B93E
  3931. ;
  3932. L_B903  CALL    L_BA61
  3933.         LD      A,#00
  3934.         JP      NZ,L_B93E
  3935.         LD      A,#02
  3936.         JP      L_B93E
  3937. ;
  3938. L_B910  CALL    L_BA61
  3939.         JR      Z,L_B91A
  3940.         LD      A,#01
  3941.         JP      L_B93E
  3942. ;
  3943. L_B91A  CALL    L_BA20
  3944.         LD      A,#00
  3945.         JP      NZ,L_B93E
  3946.         LD      A,#03
  3947.         JP      L_B93E
  3948. ;
  3949. L_B927  CALL    L_BA20
  3950.         JR      Z,L_B931
  3951.         LD      A,#02
  3952.         JP      L_B93E
  3953. ;
  3954. L_B931  CALL    L_BA90
  3955.         LD      A,#00
  3956.         JP      NZ,L_B93E
  3957.         LD      A,#04
  3958.         JP      L_B93E
  3959. ;
  3960. L_B93E  LD      H,A
  3961.         LD      L,(IX+#02)
  3962.         LD      B,(IX+#03)
  3963.         OR      A
  3964.         JR      Z,L_B94B
  3965.         LD      (IX+#02),A
  3966. L_B94B  LD      A,(IX+#02)
  3967.         CP      #01
  3968.         JR      NZ,L_B959
  3969.         LD      A,B
  3970.         NEG
  3971.         ADD     A,E
  3972.         LD      E,A
  3973.         JR      L_B970
  3974. ;
  3975. L_B959  CP      #02
  3976.         JR      NZ,L_B962
  3977.         LD      A,B
  3978.         ADD     A,D
  3979.         LD      D,A
  3980.         JR      L_B970
  3981. ;
  3982. L_B962  CP      #03
  3983.         JR      NZ,L_B96B
  3984.         LD      A,B
  3985.         ADD     A,E
  3986.         LD      E,A
  3987.         JR      L_B970
  3988. ;
  3989. L_B96B  LD      A,B
  3990.         NEG
  3991.         ADD     A,D
  3992.         LD      D,A
  3993. L_B970  LD      A,(IX+#04)
  3994.         OR      A
  3995.         JR      NZ,L_B98E
  3996.         LD      A,H
  3997.         OR      A
  3998.         JR      Z,L_B98E
  3999.         CALL    L_BA06
  4000.         JR      NZ,L_B98E
  4001.         LD      (IX+#04),#01
  4002.         LD      (IX+#02),L
  4003.         LD      E,(IX+#00)
  4004.         LD      D,(IX+#01)
  4005.         JR      L_B9AC
  4006. ;
  4007. L_B98E  LD      (IX+#00),E
  4008.         LD      (IX+#01),D
  4009.         LD      A,(L_9478)
  4010.         RRCA
  4011.         RRCA
  4012.         AND     #01
  4013.         ADD     A,#2D
  4014.         CALL    L_94CD
  4015.         CALL    L_95E5
  4016.         CALL    L_AB46
  4017.         CALL    L_BFE0
  4018.         JP      L_B8BB
  4019. ;
  4020. L_B9AC  LD      A,(IX+#02)
  4021.         CP      #01
  4022.         JP      Z,L_B9D0
  4023.         CP      #02
  4024.         JP      Z,L_B9E2
  4025.         CP      #03
  4026.         JP      Z,L_B9F4
  4027.         CALL    L_BA90
  4028.         LD      B,A
  4029.         CALL    L_BA42
  4030.         OR      B
  4031.         JP      Z,L_B93E
  4032.         LD      (IX+#04),#00
  4033.         JP      L_B8C3
  4034. ;
  4035. L_B9D0  CALL    L_BA42
  4036.         LD      B,A
  4037.         CALL    L_BA61
  4038.         OR      B
  4039.         JP      Z,L_B93E
  4040.         LD      (IX+#04),#00
  4041.         JP      L_B8C3
  4042. ;
  4043. L_B9E2  CALL    L_BA61
  4044.         LD      B,A
  4045.         CALL    L_BA20
  4046.         OR      B
  4047.         JP      Z,L_B93E
  4048.         LD      (IX+#04),#00
  4049.         JP      L_B8C3
  4050. ;
  4051. L_B9F4  CALL    L_BA20
  4052.         LD      B,A
  4053.         CALL    L_BA90
  4054.         OR      B
  4055.         JP      Z,L_B93E
  4056.         LD      (IX+#04),#00
  4057.         JP      L_B8C3
  4058. ;
  4059. L_BA06  PUSH    BC
  4060.         PUSH    HL
  4061.         CALL    L_BA42
  4062.         LD      H,A
  4063.         CALL    L_BA20
  4064.         LD      L,A
  4065.         CALL    L_BA90
  4066.         LD      B,A
  4067.         CALL    L_BA61
  4068.         LD      C,A
  4069.         XOR     A
  4070.         OR      H
  4071.         OR      L
  4072.         OR      B
  4073.         OR      C
  4074.         POP     HL
  4075.         POP     BC
  4076.         RET
  4077. ;
  4078. L_BA20  PUSH    BC
  4079.         PUSH    DE
  4080.         PUSH    HL
  4081.         DEC     E
  4082.         DEC     E
  4083.         DEC     E
  4084.         DEC     E
  4085.         INC     D
  4086.         INC     D
  4087.         INC     D
  4088.         INC     D
  4089.         CALL    L_97EE
  4090.         INC     L
  4091.         INC     L
  4092.         LD      BC,#0020
  4093.         LD      A,(HL)
  4094.         LD      E,A
  4095.         LD      A,D
  4096.         AND     #07
  4097.         LD      A,E
  4098.         JR      Z,L_BA3D
  4099.         ADD     HL,BC
  4100.         OR      (HL)
  4101. L_BA3D  OR      A
  4102.         POP     HL
  4103.         POP     DE
  4104.         POP     BC
  4105.         RET
  4106. ;
  4107. L_BA42  PUSH    BC
  4108.         PUSH    DE
  4109.         PUSH    HL
  4110.         INC     E
  4111.         INC     E
  4112.         INC     E
  4113.         INC     D
  4114.         INC     D
  4115.         INC     D
  4116.         INC     D
  4117.         CALL    L_97EE
  4118.         LD      BC,#0020
  4119.         LD      A,(HL)
  4120.         LD      E,A
  4121.         LD      A,D
  4122.         AND     #07
  4123.         LD      A,E
  4124.         JR      Z,L_BA5C
  4125.         ADD     HL,BC
  4126.         OR      (HL)
  4127. L_BA5C  OR      A
  4128.         POP     HL
  4129.         POP     DE
  4130.         POP     BC
  4131.         RET
  4132. ;
  4133. L_BA61  PUSH    BC
  4134.         PUSH    DE
  4135.         PUSH    HL
  4136.         LD      A,D
  4137.         CP      #B0
  4138.         LD      A,#01
  4139.         JR      NC,L_BA8B
  4140.         INC     E
  4141.         INC     E
  4142.         INC     E
  4143.         INC     E
  4144.         DEC     D
  4145.         DEC     D
  4146.         DEC     D
  4147.         DEC     D
  4148.         LD      A,D
  4149.         AND     #0F
  4150.         LD      A,#00
  4151.         JR      NZ,L_BA8B
  4152.         CALL    L_97EE
  4153.         LD      BC,#0040
  4154.         ADD     HL,BC
  4155.         LD      A,(HL)
  4156.         LD      D,A
  4157.         LD      A,E
  4158.         AND     #07
  4159.         LD      A,D
  4160.         JR      Z,L_BA8B
  4161.         INC     L
  4162.         OR      (HL)
  4163. L_BA8B  OR      A
  4164.         POP     HL
  4165.         POP     DE
  4166.         POP     BC
  4167.         RET
  4168. ;
  4169. L_BA90  PUSH    BC
  4170.         PUSH    DE
  4171.         PUSH    HL
  4172.         LD      A,D
  4173.         OR      A
  4174.         LD      A,#01
  4175.         JR      Z,L_BAB9
  4176.         INC     E
  4177.         INC     E
  4178.         INC     E
  4179.         INC     E
  4180.         INC     D
  4181.         INC     D
  4182.         INC     D
  4183.         INC     D
  4184.         LD      A,D
  4185.         AND     #0F
  4186.         LD      A,#00
  4187.         JR      NZ,L_BAB9
  4188.         CALL    L_97EE
  4189.         LD      BC,L_FFE0
  4190.         ADD     HL,BC
  4191.         LD      A,(HL)
  4192.         LD      D,A
  4193.         LD      A,E
  4194.         AND     #07
  4195.         LD      A,D
  4196.         JR      Z,L_BAB9
  4197.         INC     L
  4198.         OR      (HL)
  4199. L_BAB9  OR      A
  4200.         POP     HL
  4201.         POP     DE
  4202.         POP     BC
  4203.         RET
  4204. ;
  4205. L_BABE  LD      A,(L_A390)
  4206.         LD      BC,L_BAF5
  4207.         CALL    GetHLFrom2APlusBC
  4208.         LD      DE,L_BB1F
  4209.         LD      BC,#0063
  4210.         LDIR
  4211.         RET
  4212. ;
  4213. L_BAD0  LD      IX,L_BB1F
  4214. L_BAD4  LD      A,(IX+#00)
  4215.         CP      #FF
  4216.         RET     Z
  4217.         LD      E,A
  4218.         LD      A,(IX+#02)
  4219.         OR      A
  4220.         JR      Z,L_BAEE
  4221.         LD      D,(IX+#01)
  4222.         CALL    L_C6C8
  4223.         OR      A
  4224.         JR      Z,L_BAEE
  4225.         LD      (IX+#02),#00
  4226. L_BAEE  LD      BC,#0005
  4227.         ADD     IX,BC
  4228.         JR      L_BAD4
  4229. ;
  4230. L_BAF5       DW       L_BB84
  4231.        DW       L_BB85
  4232.        DW       L_BB86
  4233.        DW       L_BB8C
  4234.        DW       L_BB8D
  4235.        DW       L_BBAC
  4236.        DW       L_BBAD
  4237.        DW       L_BBAE
  4238.        DW       L_BBC3
  4239.        DW       L_BBC4
  4240.        DW       L_BBC5
  4241.        DW       L_BBCB
  4242.        DW       L_BBCC
  4243.        DW       L_BBCD
  4244.        DW       L_BBCE
  4245.        DW       L_BBD9
  4246.        DW       L_BBDA
  4247.        DW       L_BBDB
  4248.        DW       L_BBDC
  4249.        DW       L_BBDD
  4250.        DW       L_BBDE
  4251. ;
  4252. L_BB1F       DB       #FF,#FF,#B8,#2C,#01,#02,#00,#FF
  4253.        DB       #FF,#78,#24,#03,#02,#00,#58,#44
  4254.        DB       #03,#02,#00,#78,#64,#03,#02,#00
  4255.        DB       #98,#44,#03,#02,#00,#48,#84,#03
  4256.        DB       #02,#00,#A8,#84,#03,#02,#00,#FF
  4257.        DB       #FF,#FF,#58,#74,#03,#02,#00,#58
  4258.        DB       #6C,#01,#02,#00,#B8,#74,#03,#02
  4259.        DB       #00,#B8,#6C,#01,#02,#00,#FF,#FF
  4260.        DB       #FF,#38,#94,#03,#02,#00,#FF,#FF
  4261.        DB       #FF,#FF,#D8,#94,#03,#04,#00,#D8
  4262.        DB       #7C,#01,#04,#00,#FF,#FF,#FF,#FF
  4263.        DB       #FF,#FF,#FF,#DD,#21,#1F,#BB,#DD
  4264.        DB       #7E,#00,#FE,#00,#FF
  4265. L_BB84       DB       #FF
  4266. L_BB85       DB       #FF
  4267. L_BB86       DB       #B8,#2C,#01,#02,#00,#FF
  4268. L_BB8C       DB       #FF
  4269. L_BB8D       DB       #78,#24,#03,#02,#00,#58,#44,#03
  4270.        DB       #02,#00,#78,#64,#03,#02,#00,#98
  4271.        DB       #44,#03,#02,#00,#48,#84,#03,#02
  4272.        DB       #00,#A8,#84,#03,#02,#00,#FF
  4273. L_BBAC       DB       #FF
  4274. L_BBAD       DB       #FF
  4275. L_BBAE       DB       #58,#74,#03,#02,#00,#58,#6C,#01
  4276.        DB       #02,#00,#B8,#74,#03,#02,#00,#B8
  4277.        DB       #6C,#01,#02,#00,#FF
  4278. L_BBC3       DB       #FF
  4279. L_BBC4       DB       #FF
  4280. L_BBC5       DB       #38,#94,#03,#02,#00,#FF
  4281. L_BBCB       DB       #FF
  4282. L_BBCC       DB       #FF
  4283. L_BBCD       DB       #FF
  4284. L_BBCE       DB       #D8,#94,#03,#04,#00,#D8,#7C,#01
  4285.        DB       #04,#00,#FF
  4286. L_BBD9       DB       #FF
  4287. L_BBDA       DB       #FF
  4288. L_BBDB       DB       #FF
  4289. L_BBDC       DB       #FF
  4290. L_BBDD       DB       #FF
  4291. L_BBDE       DB       #FF
  4292. ;
  4293. L_BBDF  LD      IX,L_BB1F
  4294. L_BBE3  LD      A,(IX+#00)
  4295.         CP      #FF
  4296.         RET     Z
  4297.         LD      A,(IX+#02)
  4298.         OR      A
  4299.         JR      NZ,L_BBF7
  4300. L_BBEF  LD      BC,#0005
  4301.         ADD     IX,BC
  4302.         JP      L_BBE3
  4303. ;
  4304. L_BBF7  LD      E,(IX+#00)
  4305.         LD      D,(IX+#01)
  4306.         CALL    L_95E5
  4307.         LD      A,(IX+#04)
  4308.         OR      A
  4309.         JP      NZ,L_BCE0
  4310.         LD      A,(IX+#02)
  4311.         CP      #01
  4312.         JR      Z,L_BC2D
  4313.         CP      #02
  4314.         JR      Z,L_BC44
  4315.         CP      #03
  4316.         JR      Z,L_BC5B
  4317.         CALL    L_BA90
  4318.         JR      Z,L_BC20
  4319.         LD      A,#01
  4320.         JP      L_BC72
  4321. ;
  4322. L_BC20  CALL    L_BA20
  4323.         LD      A,#00
  4324.         JP      NZ,L_BC72
  4325.         LD      A,#03
  4326.         JP      L_BC72
  4327. ;
  4328. L_BC2D  CALL    L_BA42
  4329.         JR      Z,L_BC37
  4330.         LD      A,#02
  4331.         JP      L_BC72
  4332. ;
  4333. L_BC37  CALL    L_BA90
  4334.         LD      A,#00
  4335.         JP      NZ,L_BC72
  4336.         LD      A,#04
  4337.         JP      L_BC72
  4338. ;
  4339. L_BC44  CALL    L_BA61
  4340.         JR      Z,L_BC4E
  4341.         LD      A,#03
  4342.         JP      L_BC72
  4343. ;
  4344. L_BC4E  CALL    L_BA42
  4345.         LD      A,#00
  4346.         JP      NZ,L_BC72
  4347.         LD      A,#01
  4348.         JP      L_BC72
  4349. ;
  4350. L_BC5B  CALL    L_BA20
  4351.         JR      Z,L_BC65
  4352.         LD      A,#04
  4353.         JP      L_BC72
  4354. ;
  4355. L_BC65  CALL    L_BA61
  4356.         LD      A,#00
  4357.         JP      NZ,L_BC72
  4358.         LD      A,#02
  4359.         JP      L_BC72
  4360. ;
  4361. L_BC72  LD      H,A
  4362.         LD      L,(IX+#02)
  4363.         LD      B,(IX+#03)
  4364.         OR      A
  4365.         JR      Z,L_BC7F
  4366.         LD      (IX+#02),A
  4367. L_BC7F  LD      A,(IX+#02)
  4368.         CP      #01
  4369.         JR      NZ,L_BC8D
  4370.         LD      A,B
  4371.         NEG
  4372.         ADD     A,E
  4373.         LD      E,A
  4374.         JR      L_BCA4
  4375. ;
  4376. L_BC8D  CP      #02
  4377.         JR      NZ,L_BC96
  4378.         LD      A,B
  4379.         ADD     A,D
  4380.         LD      D,A
  4381.         JR      L_BCA4
  4382. ;
  4383. L_BC96  CP      #03
  4384.         JR      NZ,L_BC9F
  4385.         LD      A,B
  4386.         ADD     A,E
  4387.         LD      E,A
  4388.         JR      L_BCA4
  4389. ;
  4390. L_BC9F  LD      A,B
  4391.         NEG
  4392.         ADD     A,D
  4393.         LD      D,A
  4394. L_BCA4  LD      A,(IX+#04)
  4395.         OR      A
  4396.         JR      NZ,L_BCC2
  4397.         LD      A,H
  4398.         OR      A
  4399.         JR      Z,L_BCC2
  4400.         CALL    L_BA06
  4401.         JR      NZ,L_BCC2
  4402.         LD      (IX+#04),#01
  4403.         LD      (IX+#02),L
  4404.         LD      E,(IX+#00)
  4405.         LD      D,(IX+#01)
  4406.         JR      L_BCE0
  4407. ;
  4408. L_BCC2  LD      (IX+#00),E
  4409.         LD      (IX+#01),D
  4410.         LD      A,(L_9478)
  4411.         RRCA
  4412.         RRCA
  4413.         AND     #01
  4414.         ADD     A,#2D
  4415.         CALL    L_94CD
  4416.         CALL    L_95E5
  4417.         CALL    L_AB46
  4418.         CALL    L_BFE0
  4419.         JP      L_BBEF
  4420. ;
  4421. L_BCE0  LD      A,(IX+#02)
  4422.         CP      #01
  4423.         JP      Z,L_BD04
  4424.         CP      #02
  4425.         JP      Z,L_BD16
  4426.         CP      #03
  4427.         JP      Z,L_BD28
  4428.         CALL    L_BA90
  4429.         LD      B,A
  4430.         CALL    L_BA20
  4431.         OR      B
  4432.         JP      Z,L_BC72
  4433.         LD      (IX+#04),#00
  4434.         JP      L_BBF7
  4435. ;
  4436. L_BD04  CALL    L_BA42
  4437.         LD      B,A
  4438.         CALL    L_BA90
  4439.         OR      B
  4440.         JP      Z,L_BC72
  4441.         LD      (IX+#04),#00
  4442.         JP      L_BBF7
  4443. ;
  4444. L_BD16  CALL    L_BA61
  4445.         LD      B,A
  4446.         CALL    L_BA42
  4447.         OR      B
  4448.         JP      Z,L_BC72
  4449.         LD      (IX+#04),#00
  4450.         JP      L_BBF7
  4451. ;
  4452. L_BD28  CALL    L_BA20
  4453.         LD      B,A
  4454.         CALL    L_BA61
  4455.         OR      B
  4456.         JP      Z,L_BC72
  4457.         LD      (IX+#04),#00
  4458.         JP      L_BBF7
  4459. ;
  4460. L_BD3A  LD      IY,L_BD52
  4461.         LD      (L_BF39),HL
  4462.         JP      (IY)
  4463. ;
  4464. L_BD43  LD      IY,L_BD4A
  4465.         LD      (L_BF39),HL
  4466. L_BD4A  XOR     A
  4467.         IN      A,(#FE)
  4468.         AND     #1F
  4469.         CP      #1F
  4470.         RET     NZ
  4471. L_BD52  LD      HL,(L_BF39)
  4472.         LD      A,(HL)
  4473.         OR      A
  4474.         RET     Z
  4475.         INC     HL
  4476.         LD      (L_BF38),A
  4477.         LD      C,(HL)
  4478.         INC     HL
  4479.         LD      B,(HL)
  4480.         INC     HL
  4481.         LD      (L_BF39),HL
  4482.         LD      A,C
  4483.         OR      B
  4484.         JP      NZ,L_BD70
  4485.         LD      A,(L_BF38)
  4486.         CALL    L_BF4E
  4487.         JP      (IY)
  4488. ;
  4489. L_BD70  LD      H,#00
  4490.         LD      L,C
  4491.         LD      DE,L_BFAC
  4492.         ADD     HL,DE
  4493.         LD      D,(HL)
  4494.         LD      H,#00
  4495.         LD      L,B
  4496.         LD      BC,L_BFAC
  4497.         ADD     HL,BC
  4498.         LD      E,(HL)
  4499.         LD      A,(L_BF38)
  4500.         CALL    L_BF87
  4501.         JP      (IY)
  4502. ;
  4503. L_BD88       DB       #0F,#1C,#28,#0F,#1C,#2C,#0F,#1C
  4504.        DB       #2F,#0F,#1B,#27,#0F,#1B,#2B,#0F
  4505.        DB       #1B,#2E,#0F,#1A,#26,#0F,#1A,#2A
  4506.        DB       #0F,#1A,#2D,#0F,#19,#25,#0F,#19
  4507.        DB       #29,#0F,#19,#2C,#0F,#18,#24,#0F
  4508.        DB       #18,#28,#0F,#18,#2B,#0F,#17,#23
  4509.        DB       #0F,#17,#27,#0F,#17,#2A,#2D,#1C
  4510.        DB       #28,#00,#00
  4511. L_BDC3       DB       #12,#07,#13,#12,#08,#14,#12,#09
  4512.        DB       #15,#12,#0A,#16,#12,#0B,#17,#12
  4513.        DB       #0C,#18,#12,#0D,#19,#12,#0E,#1A
  4514.        DB       #12,#0F,#1B,#12,#10,#1C,#12,#11
  4515.        DB       #1D,#12,#12,#1E,#12,#13,#1F,#12
  4516.        DB       #14,#20,#12,#15,#21,#12,#17,#23
  4517.        DB       #24,#18,#24,#24,#18,#24
  4518. L_BDF9       DB       #24,#13,#26,#12,#13,#24,#12,#13
  4519.        DB       #26,#24,#18,#28,#12,#1C,#24,#12
  4520.        DB       #1C,#21,#24,#1F,#1F,#24,#1C,#1F
  4521.        DB       #24,#18,#24,#24,#18,#24,#24,#13
  4522.        DB       #26,#12,#13,#24,#12,#13,#26,#24
  4523.        DB       #18,#28,#12,#1F,#28,#12,#21,#28
  4524.        DB       #12,#23,#28,#12,#24,#28,#24,#26
  4525.        DB       #28,#24,#18,#24,#24,#18,#24,#24
  4526.        DB       #13,#26,#12,#13,#24,#12,#13,#26
  4527.        DB       #24,#18,#28,#12,#1C,#24,#12,#1C
  4528.        DB       #21,#24,#1F,#1F,#24,#1C,#1F,#24
  4529.        DB       #18,#24,#24,#18,#24,#24,#13,#26
  4530.        DB       #12,#13,#24,#12,#13,#26,#12,#18
  4531.        DB       #24,#12,#1C,#24,#12,#18,#24,#12
  4532.        DB       #1C,#24,#12,#1F,#24,#12,#1C,#24
  4533.        DB       #12,#1F,#24,#12,#24,#24,#24,#18
  4534.        DB       #2B,#24,#1C,#2B,#12,#18,#28,#12
  4535.        DB       #18,#26,#12,#1C,#24,#12,#1C,#24
  4536.        DB       #24,#18,#2B,#24,#1C,#2B,#12,#18
  4537.        DB       #28,#12,#18,#26,#12,#1C,#24,#12
  4538.        DB       #1C,#24,#24,#18,#2B,#24,#1C,#2B
  4539.        DB       #12,#18,#28,#12,#18,#26,#12,#1C
  4540.        DB       #24,#12,#1C,#24,#24,#18,#26,#12
  4541.        DB       #1C,#24,#12,#1C,#26,#24,#18,#28
  4542.        DB       #24,#1C,#24,#12,#13,#1F,#12,#17
  4543.        DB       #1F,#12,#1A,#1F,#12,#1F,#1F,#24
  4544.        DB       #18,#24,#24,#18,#24,#24,#13,#26
  4545.        DB       #12,#13,#24,#12,#13,#26,#24,#18
  4546.        DB       #28,#12,#1C,#24,#12,#1C,#21,#24
  4547.        DB       #1F,#1F,#24,#1C,#1F,#24,#18,#24
  4548.        DB       #24,#18,#24,#24,#13,#26,#12,#13
  4549.        DB       #24,#12,#13,#26,#24,#1C,#24,#24
  4550.        DB       #1A,#23,#24,#18,#21,#24,#1A,#23
  4551. L_BF01       DB       #24,#0C,#18,#12,#0C,#18,#12,#0C
  4552.        DB       #1A,#12,#10,#1C,#12,#10,#1F,#24
  4553.        DB       #13,#21,#24,#18,#24,#24,#1A,#23
  4554.        DB       #48,#1C,#24,#00,#00
  4555. L_BF1E       DB       #12,#07,#13,#12,#08,#14,#12,#09
  4556.        DB       #15,#12,#0A,#16,#12,#0B,#17,#12
  4557.        DB       #0C,#18,#12,#0D,#19,#12,#0E,#1A
  4558.        DB       #00,#00
  4559. ;
  4560. L_BF38       DB       #24
  4561. ;
  4562. L_BF39       DW       L_BDF9
  4563. ;
  4564. L_BF3B  AND     #FF
  4565.         EX      AF,AF'
  4566.         INC     D
  4567.         JP      NZ,L_BF69
  4568. L_BF42  DB      #00
  4569.         DB      #00
  4570.         DB      #00
  4571.         XOR     C
  4572.         LD      D,L
  4573.         DJNZ    L_BF58
  4574.         DEC     H
  4575.         JP      NZ,L_BF5A
  4576.         RET
  4577. ;
  4578. L_BF4E  LD      H,A
  4579.         LD      XL,E
  4580.         LD      L,D
  4581.         LD      C,#10
  4582.         XOR     A
  4583.         EX      AF,AF'
  4584.         XOR     A
  4585.         LD      B,A
  4586. L_BF58  OR      A
  4587.         AND     A
  4588. L_BF5A  EX      AF,AF'
  4589.         INC     E
  4590.         DB      #00
  4591.         DB      #00
  4592.         DB      #00
  4593.         JR      NZ,L_BF3B
  4594.         XOR     C
  4595.         LD      E,XL
  4596.         EX      AF,AF'
  4597.         INC     D
  4598.         JP      Z,L_BF42
  4599. L_BF69  DB      #00
  4600.         DB      #00
  4601.         DB      #00
  4602.         OR      A
  4603.         AND     A
  4604.         DJNZ    L_BF58
  4605.         DEC     H
  4606.         JP      NZ,L_BF5A
  4607.         RET
  4608. ;
  4609. L_BF75  AND     #FF
  4610.         EX      AF,AF'
  4611.         INC     D
  4612.         JP      NZ,L_BFA1
  4613. L_BF7C  OUT     (#FE),A
  4614.         XOR     C
  4615.         LD      D,L
  4616.         DJNZ    L_BF91
  4617.         DEC     H
  4618.         JP      NZ,L_BF93
  4619.         RET
  4620. ;
  4621. L_BF87  LD      H,A
  4622.         LD      XL,E
  4623.         LD      L,D
  4624.         LD      C,#10
  4625.         XOR     A
  4626.         EX      AF,AF'
  4627.         XOR     A
  4628.         LD      B,A
  4629. L_BF91  OR      A
  4630.         AND     A
  4631. L_BF93  EX      AF,AF'
  4632.         INC     E
  4633.         OUT     (#FE),A
  4634.         JR      NZ,L_BF75
  4635.         XOR     C
  4636.         LD      E,XL
  4637.         EX      AF,AF'
  4638.         INC     D
  4639.         JP      Z,L_BF7C
  4640. L_BFA1  OUT     (#FE),A
  4641.         OR      A
  4642.         AND     A
  4643.         DJNZ    L_BF91
  4644.         DEC     H
  4645.         JP      NZ,L_BF93
  4646.         RET
  4647. ;
  4648. L_BFAC       DB       #01,#1D,#29,#34,#40,#4C,#54,#5F
  4649.        DB       #69,#70,#78,#80,#87,#8E,#94,#9A
  4650.        DB       #A0,#A5,#AA,#AF,#B4,#B8,#BC,#C0
  4651.        DB       #C3,#C7,#CA,#CD,#D0,#D3,#D5,#D8
  4652.        DB       #DA,#DC,#DE,#E0,#E2,#E4,#E5,#E7
  4653.        DB       #E8,#E9,#EB,#EC,#ED,#EE,#EF,#F0
  4654.        DB       #F1,#F2,#F3,#F4
  4655. ;
  4656. L_BFE0  PUSH    HL
  4657.         LD      HL,(L_BFEF)
  4658.         LD      (HL),E
  4659.         INC     HL
  4660.         LD      (HL),D
  4661.         INC     HL
  4662.         LD      (HL),#FF
  4663.         LD      (L_BFEF),HL
  4664.         POP     HL
  4665.         RET
  4666. ;
  4667. L_BFEF       DW       L_BFF9
  4668. ;
  4669. L_BFF1       DB       #38
  4670. ;
  4671.        DB       #70,#B8,#70,#6B,#20,#7F,#80       ;p8pk ..
  4672. ;
  4673. L_BFF9       DB       #FF,#B0,#FF,#00,#00,#00,#00,#00
  4674.        DB       #00,#00,#00,#00,#00,#00,#00,#00
  4675.        DB       #00,#00,#00,#00,#00,#00,#00,#00
  4676.        DB       #00,#00,#00,#00,#00,#00,#00,#00
  4677.        DB       #00,#00,#00,#00,#00,#00,#00,#00
  4678.        DB       #00,#00,#00,#00,#00,#00,#00,#00
  4679.        DB       #00,#00,#00,#00,#00,#00,#00,#00
  4680.        DB       #00,#00,#00,#00,#00,#00,#00,#00
  4681.        DB       #00,#00,#00,#00,#00,#00,#00,#00
  4682.        DB       #00,#00,#00,#00,#00,#00,#00,#00
  4683.        DB       #00,#00,#00,#00,#00,#00,#00,#00
  4684.        DB       #00,#00,#00,#00,#00,#00,#00,#00
  4685.        DB       #00,#00,#00,#00,#00,#00,#00,#00
  4686.        DB       #00,#00,#00,#00,#00,#00,#00,#00
  4687.        DB       #00,#00,#00,#00,#00,#00,#00,#00
  4688.        DB       #00,#00,#00,#00,#00,#00,#00,#00
  4689.        DB       #00,#00,#00,#00,#00,#00,#00,#00
  4690.        DB       #00,#00,#00,#00,#00,#00,#00,#00
  4691.        DB       #00,#00,#00,#00,#00,#00,#00,#00
  4692.        DB       #FF
  4693. ;
  4694. L_C092  LD      A,E
  4695.         SUB     C
  4696.         SUB     #02
  4697.         CP      #EE
  4698.         LD      A,#00
  4699.         RET     C
  4700.         LD      A,D
  4701.         SUB     B
  4702.         SUB     #02
  4703.         CP      #EE
  4704.         LD      A,#00
  4705.         RET     C
  4706.         INC     A
  4707.         RET
  4708. ;
  4709. L_C0A6  LD      HL,(L_C295)
  4710.         LD      A,L
  4711.         OR      H
  4712.         JP      Z,L_C0EE
  4713.         LD      DE,(L_A8C6)
  4714.         CALL    L_C0CC
  4715.         OR      A
  4716.         RET     Z
  4717.         LD      HL,L_BD88
  4718.         CALL    L_BD3A
  4719. L_C0BD  LD      A,(L_C255)
  4720. L_C0C0  DEC     A
  4721.         LD      (L_C255),A
  4722.         OR      A
  4723.         JP      Z,L_C13A
  4724.         POP     BC
  4725.         JP      L_932C
  4726. ;
  4727. L_C0CC  PUSH    BC
  4728.         PUSH    HL
  4729.         LD      HL,L_BFF1
  4730. L_C0D1  LD      A,(HL)
  4731.         CP      #FF
  4732.         LD      A,#00
  4733.         JR      Z,L_C0EB
  4734.         LD      C,(HL)
  4735.         INC     HL
  4736.         LD      B,(HL)
  4737.         LD      A,B
  4738.         ADD     A,#08
  4739.         LD      B,A
  4740.         LD      A,C
  4741.         ADD     A,#08
  4742.         LD      C,A
  4743.         INC     HL
  4744.         CALL    L_C092
  4745.         OR      A
  4746.         JP      Z,L_C0D1
  4747. L_C0EB  POP     HL
  4748.         POP     BC
  4749.         RET
  4750. ;
  4751. L_C0EE  LD      HL,L_BD88
  4752.         CALL    L_BD3A
  4753.         CALL    Cls
  4754.         LD      HL,L_C11B
  4755.         CALL    PrintString_HL
  4756.         LD      BC,#0000
  4757.         CALL    PauseBC
  4758.         CALL    PauseBC
  4759.         CALL    PauseBC
  4760.         CALL    PauseBC
  4761.         CALL    PauseBC
  4762.         CALL    PauseBC
  4763.         CALL    PauseBC
  4764.         CALL    PauseBC
  4765.         JP      L_C0BD
  4766. ;
  4767. L_C11B       DB       #DF,#00,#08,#EB,#00,#E3,#EC,#C5
  4768.        DB       #E6,#12,#D7,#EB,#00,#DF,#0B,#0A
  4769.        DB       #E0,#46,#4F,#55,#54,#20,#4F,#46
  4770.        DB       #20,#54,#49,#4D,#45,#21,#FF
  4771. ;
  4772. L_C13A  CALL    Cls
  4773.         LD      HL,L_C164
  4774.         CALL    PrintString_HL
  4775.         LD      BC,#0000
  4776.         CALL    PauseBC
  4777.         CALL    PauseBC
  4778.         CALL    PauseBC
  4779.         CALL    PauseBC
  4780.         CALL    PauseBC
  4781.         CALL    PauseBC
  4782.         CALL    PauseBC
  4783.         CALL    PauseBC
  4784.         CALL    L_D5CA
  4785.         JP      L_9300
  4786. ;
  4787. L_C164       DB       #EB,#00,#DF,#00,#08,#E3,#EC,#C5
  4788.        DB       #DF,#0A,#0B,#E6,#12,#D7,#E0,#46
  4789.        DB       #DF,#0B,#0B,#47,#41,#4D,#45,#20
  4790.        DB       #4F,#56,#45,#52,#FF
  4791. L_C181       DB       #EB,#00,#E6,#0A,#DA,#DF,#00,#01
  4792.        DB       #E0,#47,#00,#01,#02,#78,#06,#0E
  4793.        DB       #03,#04,#05,#78,#05,#0E,#06,#07
  4794.        DB       #08,#09,#0A,#78,#01,#0E,#0B,#0C
  4795.        DB       #0D,#FF
  4796. ;
  4797. L_C1A3  LD      HL,L_C181
  4798.         CALL    PrintString_HL
  4799.         CALL    L_C1B5
  4800.         CALL    L_C1CE
  4801.         CALL    L_C1E1
  4802.         JP      L_C1EE
  4803. ;
  4804. L_C1B5  LD      C,#47
  4805.         LD      HL,L_D712
  4806.         LD      (L_9A57),HL
  4807.         LD      HL,L_C21F
  4808.         LD      DE,#0004
  4809.         LD      B,#06
  4810. L_C1C5  LD      A,(HL)
  4811.         CALL    PrintChar
  4812.         INC     E
  4813.         INC     HL
  4814.         DJNZ    L_C1C5
  4815.         RET
  4816. ;
  4817. L_C1CE  LD      C,#47
  4818.         LD      HL,L_C28F
  4819.         LD      DE,#000E
  4820.         LD      B,#05
  4821. L_C1D8  LD      A,(HL)
  4822.         CALL    PrintChar
  4823.         INC     E
  4824.         INC     HL
  4825.         DJNZ    L_C1D8
  4826.         RET
  4827. ;
  4828. L_C1E1  LD      C,#47
  4829.         LD      A,(L_C256)
  4830.         ADD     A,#30
  4831.         LD      DE,#0019
  4832.         JP      PrintChar
  4833. ;
  4834. L_C1EE  LD      C,#47
  4835.         LD      A,(L_C255)
  4836.         ADD     A,#30
  4837.         LD      E,#1E
  4838.         JP      PrintChar
  4839. ;
  4840. L_C1FA  PUSH    AF
  4841.         PUSH    BC
  4842.         PUSH    DE
  4843.         PUSH    HL
  4844.         LD      C,#00
  4845.         LD      HL,L_C224
  4846.         LD      B,#06
  4847. L_C205  LD      A,(DE)
  4848.         ADD     A,(HL)
  4849.         SUB     #30
  4850.         ADD     A,C
  4851.         CP      #3A
  4852.         LD      C,#01
  4853.         JR      C,L_C214
  4854.         SUB     #0A
  4855.         JR      L_C215
  4856. ;
  4857. L_C214  DEC     C
  4858. L_C215  LD      (HL),A
  4859.         DEC     HL
  4860.         DEC     DE
  4861.         DJNZ    L_C205
  4862.         POP     HL
  4863.         POP     DE
  4864.         POP     BC
  4865.         POP     AF
  4866.         RET
  4867. ;
  4868. L_C21F       DM       "0"
  4869. L_C220       DM       "0000"
  4870. L_C224       DM       "000010"
  4871. L_C22A       DM       "000020"
  4872. L_C230       DM       "000050"
  4873. L_C236       DM       "000100"
  4874. L_C23C       DM       "000200"
  4875. L_C242       DM       "0"
  4876.        DM       "005000"
  4877.        DM       "010000"
  4878.        DM       "020000"
  4879. ;
  4880. L_C255       DB       #06
  4881. L_C256       DB       #00
  4882. ;
  4883. L_C257  LD      HL,(L_C295)
  4884.         LD      IX,L_C28F
  4885.         LD      IY,L_C284
  4886. L_C262  LD      A,#30
  4887.         LD      E,(IY+#00)
  4888.         LD      D,(IY+#01)
  4889. L_C26A  OR      A
  4890.         SBC     HL,DE
  4891.         JR      C,L_C272
  4892.         INC     A
  4893.         JR      L_C26A
  4894. ;
  4895. L_C272  ADD     HL,DE
  4896.         LD      (IX+#00),A
  4897.         INC     IX
  4898.         INC     IY
  4899.         INC     IY
  4900.         LD      A,(IX+#00)
  4901.         CP      #FF
  4902.         RET     Z
  4903.         JR      L_C262
  4904. ;
  4905. L_C284       DB       #10,#27,#E8,#03,#64,#00,#0A,#00
  4906.        DB       #01,#00,#30
  4907. L_C28F       DB       #30,#39,#38,#34
  4908. L_C293       DB       #30,#FF
  4909. ;
  4910. L_C295       DW       #2670
  4911. L_C297       DW       #2710
  4912. ;
  4913. L_C299  CALL    L_C34E
  4914.         OR      A
  4915.         RET     NZ
  4916.         CALL    L_AB46
  4917.         LD      BC,(L_A8C6)
  4918.         LD      A,B
  4919.         ADD     A,#08
  4920.         LD      B,A
  4921.         LD      A,C
  4922.         ADD     A,#08
  4923.         LD      C,A
  4924.         CALL    L_C092
  4925.         OR      A
  4926.         RET     Z
  4927.         LD      (HL),A
  4928.         LD      HL,L_BF1E
  4929.         PUSH    DE
  4930.         CALL    L_BD3A
  4931.         POP     DE
  4932.         CALL    CountXYtoxy_DE
  4933.         CALL    CountScrAddr_DEyx
  4934.         LD      BC,#9000
  4935.         ADD     HL,BC
  4936.         LD      A,(HL)
  4937.         CALL    DrawSprite
  4938.         CALL    CountxytoXY_DE
  4939.         CALL    L_AAE5
  4940.         PUSH    DE
  4941.         CALL    L_C33C
  4942.         LD      B,D
  4943.         LD      C,E
  4944.         POP     DE
  4945.         JP      L_D725
  4946. ;
  4947. L_C2D9  LD      HL,L_A485
  4948. L_C2DC  LD      A,(HL)
  4949.         CP      #FF
  4950.         RET     Z
  4951.         INC     HL
  4952.         INC     HL
  4953.         LD      (HL),#00
  4954.         INC     HL
  4955.         JR      L_C2DC
  4956. ;
  4957. L_C2E7  CALL    L_C34E
  4958.         OR      A
  4959.         RET     Z
  4960.         CALL    L_C33C
  4961.         LD      BC,(L_A8C6)
  4962.         LD      A,B
  4963.         ADD     A,#08
  4964.         LD      B,A
  4965.         LD      A,C
  4966.         ADD     A,#08
  4967.         LD      C,A
  4968.         CALL    L_C092
  4969.         OR      A
  4970.         RET     Z
  4971.         POP     BC
  4972.         LD      A,(L_A390)
  4973.         CP      #14
  4974.         JR      NZ,L_C30F
  4975.         LD      A,#04
  4976.         LD      (L_A390),A
  4977.         JR      L_C31A
  4978. ;
  4979. L_C30F  LD      A,(L_C3AB)
  4980.         OR      A
  4981.         JR      Z,L_C31A
  4982.         LD      A,#13
  4983.         LD      (L_A390),A
  4984. L_C31A  LD      A,(L_A390)
  4985.         CP      #10
  4986.         JR      NZ,L_C326
  4987.         CALL    L_C2D9
  4988.         LD      A,#FF
  4989. L_C326  INC     A
  4990.         LD      (L_A390),A
  4991.         LD      HL,L_BF01
  4992.         CALL    L_BD3A
  4993.         LD      DE,L_C293
  4994.         CALL    L_C1FA
  4995.         CALL    L_C1B5
  4996.         JP      L_932C
  4997. ;
  4998. L_C33C  PUSH    BC
  4999.         PUSH    HL
  5000.         LD      BC,L_A45B
  5001.         LD      HL,(L_A390)
  5002.         LD      H,#00
  5003.         ADD     HL,HL
  5004.         ADD     HL,BC
  5005.         LD      E,(HL)
  5006.         INC     HL
  5007.         LD      D,(HL)
  5008.         POP     HL
  5009.         POP     BC
  5010.         RET
  5011. ;
  5012. L_C34E  PUSH    BC
  5013.         LD      HL,(L_A390)
  5014. L_C350       EQU       $-2
  5015.         LD      H,#00
  5016.         LD      B,H
  5017.         LD      C,L
  5018.         ADD     HL,HL
  5019.         ADD     HL,BC
  5020.         LD      BC,L_A485
  5021.         ADD     HL,BC
  5022.         LD      E,(HL)
  5023.         INC     HL
  5024.         LD      D,(HL)
  5025.         INC     HL
  5026.         LD      A,(HL)
  5027.         POP     BC
  5028.         RET
  5029. ;
  5030. L_C363  PUSH    AF
  5031.         PUSH    BC
  5032.         PUSH    HL
  5033.         PUSH    DE
  5034.         LD      A,(L_A390)
  5035.         CP      #04
  5036.         JR      NZ,L_C3A6
  5037.         CALL    L_C34E
  5038.         LD      H,D
  5039.         LD      L,E
  5040.         OR      A
  5041.         JR      NZ,L_C3A6
  5042.         POP     DE
  5043.         PUSH    DE
  5044.         AND     A
  5045.         SBC     HL,DE
  5046.         JR      NZ,L_C3A6
  5047.         CALL    L_AAE5
  5048.         CALL    CountXYtoxy_DE
  5049.         CALL    CountScrAddr_DEyx
  5050.         LD      BC,#9000
  5051.         ADD     HL,BC
  5052.         LD      A,(HL)
  5053.         CALL    DrawSprite
  5054.         XOR     A
  5055.         LD      (L_9AA6),A
  5056.         LD      A,(L_C3AB)
  5057.         XOR     #01
  5058.         LD      (L_C3AB),A
  5059.         LD      B,#2F
  5060.         JR      Z,L_C3A0
  5061.         LD      B,#61
  5062. L_C3A0  LD      A,B
  5063.         LD      C,#47
  5064.         CALL    L_9A82
  5065. L_C3A6  POP     DE
  5066.         POP     HL
  5067.         POP     BC
  5068.         POP     AF
  5069.         RET
  5070. ;
  5071. L_C3AB       DB       #00
  5072. ;
  5073. Menu    CALL    Cls
  5074.         LD      HL,tmenu
  5075.         CALL    PrintString_HL
  5076.         CALL    L_C49F
  5077.         CALL    WaitNoKey
  5078.         LD      HL,L_BDC3
  5079.         CALL    L_BD43
  5080.         LD      BC,#00C8
  5081. L_C3C4  PUSH    BC
  5082.         CALL    L_F69F
  5083.         CP      #31
  5084.         JR      C,L_C3F0
  5085.         CP      #36
  5086.         JR      NC,L_C3F0
  5087.         CP      #31
  5088.         JP      Z,L_932C
  5089.         CP      #32
  5090.         JP      Z,L_C4B9
  5091.         SUB     #33
  5092.         LD      E,A
  5093.         LD      A,(L_A7B8)
  5094.         CP      E
  5095.         JR      Z,L_C3F0
  5096.         LD      A,E
  5097.         LD      (L_A7B8),A
  5098.         LD      HL,tmenu
  5099.         CALL    PrintString_HL
  5100.         CALL    L_C49F
  5101. L_C3F0  POP     BC
  5102.         DEC     BC
  5103.         LD      A,B
  5104.         OR      C
  5105.         JP      NZ,L_C3C4
  5106.         CALL    L_D480
  5107.         JP      Menu
  5108. ;
  5109. tmenu       DB       #EB,#00,#DF,#00,#08,#E3,#EC,#C5
  5110.        DB       #E6,#12,#D7,#DF,#09,#02,#E0,#44
  5111. ;
  5112.        DM       "CONVERSION BY PROBE SOFTWARE"
  5113. ;
  5114.        DB       #DF,#0C,#09,#DA
  5115. ;
  5116.        DM       "1"
  5117. ;
  5118.        DB       #DC
  5119. ;
  5120.        DM       " START GAME"
  5121. ;
  5122.        DB       #79,#F4,#DA
  5123. ;
  5124.        DM       "2"
  5125. ;
  5126.        DB       #DC
  5127. ;
  5128.        DM       " DEFINE KEYS"
  5129. ;
  5130.        DB       #79,#F3,#DA
  5131. ;
  5132.        DM       "3"
  5133. ;
  5134.        DB       #DC
  5135. ;
  5136.        DM       " KEYBOARD"
  5137. ;
  5138.        DB       #79,#F6,#DA
  5139. ;
  5140.        DM       "4"
  5141. ;
  5142.        DB       #DC
  5143. ;
  5144.        DM       " INTERFACE 2"
  5145. ;
  5146.        DB       #79,#F3,#DA
  5147. ;
  5148.        DM       "5"
  5149. ;
  5150.        DB       #DC
  5151. ;
  5152.        DM       " KEMPSTON"
  5153. ;
  5154.        DB       #DF,#17,#02,#DD
  5155. ;
  5156.        DM       "SOLOMON'S KEY (C) 1987 TECMO"
  5157. ;
  5158.        DB       #DF,#12,#0A,#E3,#4D,#C6,#FF
  5159. ;
  5160. L_C49F  LD      A,(L_A7B8)
  5161.         ADD     A,#0E
  5162.         LD      D,A
  5163.         LD      E,#0B
  5164.         CALL    CountScrAddr_DEyx
  5165.         LD      DE,#5800
  5166.         ADD     HL,DE
  5167.         LD      (HL),#47
  5168.         LD      E,L
  5169.         LD      D,H
  5170.         INC     E
  5171.         LD      BC,#000D
  5172.         LDIR
  5173.         RET
  5174. ;
  5175. L_C4B9  CALL    Cls
  5176.         XOR     A
  5177.         LD      (L_A7B8),A
  5178.         LD      HL,tselectkeys
  5179.         CALL    PrintString_HL
  5180.         LD      IX,L_A710
  5181.         LD      IY,topqam
  5182.         LD      DE,#090F
  5183.         LD      B,#05
  5184. L_C4D3  PUSH    BC
  5185.         LD      A,#3F
  5186.         LD      C,#44
  5187.         CALL    PrintChar
  5188.         PUSH    DE
  5189.         CALL    WaitNoKey
  5190. L_C4DF  CALL    L_F69F
  5191.         OR      A
  5192.         JR      Z,L_C4DF
  5193.         LD      (IX+#02),D
  5194.         LD      (IX+#06),E
  5195.         LD      DE,#000A
  5196.         ADD     IX,DE
  5197.         LD      (IY+#00),A
  5198.         INC     IY
  5199.         POP     DE
  5200.         LD      HL,L_C54B
  5201.         CP      #20
  5202.         JR      NZ,L_C500
  5203.         LD      HL,tspace
  5204. L_C500  CP      #0D
  5205.         JR      NZ,L_C507
  5206.         LD      HL,tenter
  5207. L_C507  CP      #01
  5208.         JR      NZ,L_C50E
  5209.         LD      HL,tcapsshift
  5210. L_C50E  CP      #02
  5211.         JR      NZ,L_C515
  5212.         LD      HL,tsymbolshift
  5213. L_C515  LD      (L_C54B),A
  5214.         LD      C,#43
  5215.         CALL    PrintString_HL
  5216.         POP     BC
  5217.         DJNZ    L_C4D3
  5218.         LD      BC,L_C350
  5219.         CALL    PauseBC
  5220.         CALL    PauseBC
  5221.         LD      HL,topqam
  5222.         LD      DE,teborp
  5223.         LD      B,#05
  5224. L_C531  LD      A,(DE)
  5225.         CP      (HL)
  5226.         JP      NZ,Menu
  5227.         INC     HL
  5228.         INC     DE
  5229.         DJNZ    L_C531
  5230.         LD      A,(L_C0C0)
  5231.         XOR     #3D
  5232.         LD      (L_C0C0),A
  5233.         LD      HL,L_BF01
  5234.         CALL    Z,L_BD3A
  5235.         JP      Menu
  5236. ;
  5237. L_C54B       DB       #4D,#7A,#FF,#FF
  5238. ;
  5239. tspace       DM       "SPACE"
  5240. ;
  5241.        DB       #7A,#FB,#FF
  5242. ;
  5243. tenter       DM       "ENTER"
  5244. ;
  5245.        DB       #7A,#FB,#FF
  5246. ;
  5247. tcapsshift       DM       "CAPS SHIFT"
  5248. ;
  5249.        DB       #7A,#F6,#FF
  5250. ;
  5251. tsymbolshift       DM       "SYMBOL SHIFT"
  5252. ;
  5253.        DB       #7A,#F4,#FF
  5254. ;
  5255. topqam       DM       "OPQAM"
  5256. teborp       DM       "EBORP"
  5257. ;
  5258. tselectkeys       DB       #EB,#00,#E0,#46,#DF,#06,#07,#E6
  5259.        DB       #12,#D7
  5260. ;
  5261.        DM       "SELECT KEY FOR...."
  5262. ;
  5263.        DB       #DE,#7B,#EE
  5264. ;
  5265.        DM       "LEFT"
  5266. ;
  5267.        DB       #7A,#FC
  5268. ;
  5269.        DM       "RIGHT"
  5270. ;
  5271.        DB       #7A,#FB
  5272. ;
  5273.        DM       "JUMP"
  5274. ;
  5275.        DB       #7A,#FC
  5276. ;
  5277.        DM       "DUCK"
  5278. ;
  5279.        DB       #7A,#FC
  5280. ;
  5281.        DM       "BLOCKS"
  5282. ;
  5283.        DB       #70,#02,#E5,#09,#20,#DF,#17,#02
  5284.        DB       #DE
  5285. ;
  5286.        DM       "SOLOMON'S KEY (C) 1987 TECMO"
  5287. ;
  5288.        DB       #E6,#12,#D7,#FF,#E6,#82,#DA,#E0       ;f.W.f.Z`
  5289.        DB       #43,#00,#01,#02,#03,#04,#05,#06       ;C.......
  5290.        DB       #07,#A7,#08,#09,#0A,#0B,#0C,#0D       ;.'......
  5291.        DB       #0E,#0F,#A7,#10,#11,#12,#13,#14       ;..'.....
  5292.        DB       #15,#16,#17,#76,#00,#18,#19,#1A       ;...v....
  5293.        DB       #1B,#1C,#1D,#1E,#1F,#A7,#20,#21       ;.....' !
  5294.        DB       #22,#23,#24,#25,#26,#27,#A7,#28       ;"#$%&''(
  5295.        DB       #29,#2A,#2B,#2C,#2D,#2E,#2F,#79       ;)*+,-./y
  5296.        DB       #F0,#30,#31,#32,#79,#01,#DB,#E6       ;p012y.[f
  5297.        DB       #1A,#DC,#00,#01,#02,#03,#04,#05       ;.\......
  5298.        DB       #06,#07,#A7,#08,#09,#0A,#0B,#0C       ;..'.....
  5299.        DB       #0D,#0E,#0F,#A7,#10,#11,#12,#13       ;...'....
  5300.        DB       #14,#15,#16,#17,#FF,#E6,#DA,#DC       ;.....fZ\
  5301.        DB       #E0,#07,#17,#E4,#05,#15,#12,#15       ;`..d....
  5302.        DB       #15,#13,#14,#A4,#18,#00,#01,#02       ;...$....
  5303.        DB       #03,#04,#05,#06,#07,#10,#1A,#A4       ;.......$
  5304.        DB       #18,#08,#09,#0A,#0B,#0C,#0D,#0E       ;........
  5305.        DB       #0F,#11,#1A,#A4,#19,#E4,#09,#1C       ;...$.d..
  5306.        DB       #1B,#FF       ;..
  5307. ;
  5308. L_C67A  LD      A,(L_C72B)
  5309.         LD      B,A
  5310.         LD      A,(L_C899)
  5311.         OR      B
  5312.         RET     NZ
  5313.         LD      A,#FE
  5314.         IN      A,(#FE)
  5315.         AND     #10
  5316.         RET     NZ
  5317.         LD      A,(L_C256)
  5318.         OR      A
  5319.         RET     Z
  5320.         DEC     A
  5321.         LD      (L_C256),A
  5322.         CALL    L_C1E1
  5323.         LD      A,(L_A8C8)
  5324.         OR      A
  5325.         JR      Z,L_C6B2
  5326.         LD      DE,(L_A8C6)
  5327.         LD      A,E
  5328.         AND     #F8
  5329.         LD      E,A
  5330.         LD      A,D
  5331.         CP      #B0
  5332.         JP      Z,L_C87A
  5333.         AND     #F8
  5334.         ADD     A,#04
  5335.         LD      D,A
  5336.         JP      L_C87A
  5337. ;
  5338. L_C6B2  LD      DE,(L_A8C6)
  5339.         LD      A,E
  5340.         AND     #F8
  5341.         LD      E,A
  5342.         LD      A,D
  5343.         CP      #B0
  5344.         JP      Z,L_C70C
  5345.         AND     #F8
  5346.         ADD     A,#04
  5347.         LD      D,A
  5348.         JP      L_C70C
  5349. ;
  5350. L_C6C8  PUSH    BC
  5351.         PUSH    DE
  5352.         PUSH    HL
  5353.         LD      A,(L_C72B)
  5354.         LD      B,A
  5355.         LD      A,(L_C899)
  5356.         OR      B
  5357.         JR      Z,L_C706
  5358.         LD      BC,(L_C70A)
  5359.         LD      A,B
  5360.         ADD     A,#08
  5361.         LD      B,A
  5362.         LD      A,C
  5363.         ADD     A,#08
  5364.         LD      C,A
  5365.         CALL    L_C092
  5366.         OR      A
  5367.         JR      Z,L_C706
  5368.         PUSH    AF
  5369.         LD      A,(L_C72B)
  5370.         OR      A
  5371.         LD      A,#01
  5372.         JR      Z,L_C6FC
  5373.         LD      (L_C72B),A
  5374.         CALL    L_CE85
  5375.         CALL    L_CE19
  5376.         POP     AF
  5377.         JR      L_C706
  5378. ;
  5379. L_C6FC  LD      (L_C899),A
  5380.         CALL    L_CE85
  5381.         CALL    L_CE19
  5382.         POP     AF
  5383. L_C706  POP     HL
  5384.         POP     DE
  5385.         POP     BC
  5386.         RET
  5387. ;
  5388. L_C70A       DW       #88E4
  5389. ;
  5390. L_C70C  LD      IX,L_C726
  5391.         LD      (IX+#00),E
  5392.         LD      (IX+#01),D
  5393.         LD      (IX+#02),#03
  5394.         LD      (IX+#05),#32
  5395.         CALL    L_BA06
  5396.         CPL
  5397.         LD      (IX+#04),A
  5398.         RET
  5399. ;
  5400. L_C726       DB       #B8,#2C,#01,#04,#00
  5401. ;
  5402. L_C72B       DB       #00
  5403.        DB       #FF
  5404. ;
  5405. L_C72D  LD      IX,L_C726
  5406.         LD      A,(IX+#05)
  5407.         OR      A
  5408.         RET     Z
  5409. L_C736  LD      E,(IX+#00)
  5410.         LD      D,(IX+#01)
  5411.         CALL    L_95E5
  5412.         LD      A,(IX+#04)
  5413.         OR      A
  5414.         JP      NZ,L_C820
  5415.         LD      A,(IX+#02)
  5416.         CP      #01
  5417.         JR      Z,L_C76C
  5418.         CP      #02
  5419.         JR      Z,L_C783
  5420.         CP      #03
  5421.         JR      Z,L_C79A
  5422.         CALL    L_BA90
  5423.         JR      Z,L_C75F
  5424.         LD      A,#01
  5425.         JP      L_C7B1
  5426. ;
  5427. L_C75F  CALL    L_BA20
  5428.         LD      A,#00
  5429.         JP      NZ,L_C7B1
  5430.         LD      A,#03
  5431.         JP      L_C7B1
  5432. ;
  5433. L_C76C  CALL    L_BA42
  5434.         JR      Z,L_C776
  5435.         LD      A,#02
  5436.         JP      L_C7B1
  5437. ;
  5438. L_C776  CALL    L_BA90
  5439.         LD      A,#00
  5440.         JP      NZ,L_C7B1
  5441.         LD      A,#04
  5442.         JP      L_C7B1
  5443. ;
  5444. L_C783  CALL    L_BA61
  5445.         JR      Z,L_C78D
  5446.         LD      A,#03
  5447.         JP      L_C7B1
  5448. ;
  5449. L_C78D  CALL    L_BA42
  5450.         LD      A,#00
  5451.         JP      NZ,L_C7B1
  5452.         LD      A,#01
  5453.         JP      L_C7B1
  5454. ;
  5455. L_C79A  CALL    L_BA20
  5456.         JR      Z,L_C7A4
  5457.         LD      A,#04
  5458.         JP      L_C7B1
  5459. ;
  5460. L_C7A4  CALL    L_BA61
  5461.         LD      A,#00
  5462.         JP      NZ,L_C7B1
  5463.         LD      A,#02
  5464.         JP      L_C7B1
  5465. ;
  5466. L_C7B1  LD      H,A
  5467.         LD      L,(IX+#02)
  5468.         LD      B,(IX+#03)
  5469.         OR      A
  5470.         JR      Z,L_C7BE
  5471.         LD      (IX+#02),A
  5472. L_C7BE  LD      A,(IX+#02)
  5473.         CP      #01
  5474.         JR      NZ,L_C7CC
  5475.         LD      A,B
  5476.         NEG
  5477.         ADD     A,E
  5478.         LD      E,A
  5479.         JR      L_C7E3
  5480. ;
  5481. L_C7CC  CP      #02
  5482.         JR      NZ,L_C7D5
  5483.         LD      A,B
  5484.         ADD     A,D
  5485.         LD      D,A
  5486.         JR      L_C7E3
  5487. ;
  5488. L_C7D5  CP      #03
  5489.         JR      NZ,L_C7DE
  5490.         LD      A,B
  5491.         ADD     A,E
  5492.         LD      E,A
  5493.         JR      L_C7E3
  5494. ;
  5495. L_C7DE  LD      A,B
  5496.         NEG
  5497.         ADD     A,D
  5498.         LD      D,A
  5499. L_C7E3  LD      A,(IX+#04)
  5500.         OR      A
  5501.         JR      NZ,L_C801
  5502.         LD      A,H
  5503.         OR      A
  5504.         JR      Z,L_C801
  5505.         CALL    L_BA06
  5506.         JR      NZ,L_C801
  5507.         LD      (IX+#04),#01
  5508.         LD      (IX+#02),L
  5509.         LD      E,(IX+#00)
  5510.         LD      D,(IX+#01)
  5511.         JR      L_C820
  5512. ;
  5513. L_C801  LD      (IX+#00),E
  5514.         LD      (IX+#01),D
  5515.         LD      A,(IX+#02)
  5516.         ADD     A,#51
  5517.         CALL    L_94CD
  5518.         CALL    L_95E5
  5519.         CALL    L_AB46
  5520.         LD      (L_C70A),DE
  5521.         DEC     (IX+#05)
  5522.         JP      Z,L_974A
  5523.         RET
  5524. ;
  5525. L_C820  LD      A,(IX+#02)
  5526.         CP      #01
  5527.         JP      Z,L_C844
  5528.         CP      #02
  5529.         JP      Z,L_C856
  5530.         CP      #03
  5531.         JP      Z,L_C868
  5532.         CALL    L_BA90
  5533.         LD      B,A
  5534.         CALL    L_BA20
  5535.         OR      B
  5536.         JP      Z,L_C7B1
  5537.         LD      (IX+#04),#00
  5538.         JP      L_C736
  5539. ;
  5540. L_C844  CALL    L_BA42
  5541.         LD      B,A
  5542.         CALL    L_BA90
  5543.         OR      B
  5544.         JP      Z,L_C7B1
  5545.         LD      (IX+#04),#00
  5546.         JP      L_C736
  5547. ;
  5548. L_C856  CALL    L_BA61
  5549.         LD      B,A
  5550.         CALL    L_BA42
  5551.         OR      B
  5552.         JP      Z,L_C7B1
  5553.         LD      (IX+#04),#00
  5554.         JP      L_C736
  5555. ;
  5556. L_C868  CALL    L_BA20
  5557.         LD      B,A
  5558.         CALL    L_BA61
  5559.         OR      B
  5560.         JP      Z,L_C7B1
  5561.         LD      (IX+#04),#00
  5562.         JP      L_C736
  5563. ;
  5564. L_C87A  LD      IX,L_C894
  5565.         LD      (IX+#00),E
  5566.         LD      (IX+#01),D
  5567.         LD      (IX+#02),#01
  5568.         LD      (IX+#05),#32
  5569.         CALL    L_BA06
  5570.         CPL
  5571.         LD      (IX+#04),A
  5572.         RET
  5573. ;
  5574. L_C894       DB       #E4,#88,#04,#04,#00
  5575. ;
  5576. L_C899       DB       #00
  5577.        DB       #FF
  5578. ;
  5579. L_C89B  LD      IX,L_C894
  5580.         LD      A,(IX+#05)
  5581.         OR      A
  5582.         RET     Z
  5583. L_C8A4  LD      E,(IX+#00)
  5584.         LD      D,(IX+#01)
  5585.         CALL    L_95E5
  5586.         LD      A,(IX+#04)
  5587.         OR      A
  5588.         JP      NZ,L_C98E
  5589.         LD      A,(IX+#02)
  5590.         CP      #01
  5591.         JR      Z,L_C8DA
  5592.         CP      #02
  5593.         JR      Z,L_C8F1
  5594.         CP      #03
  5595.         JR      Z,L_C908
  5596.         CALL    L_BA90
  5597.         JR      Z,L_C8CD
  5598.         LD      A,#03
  5599.         JP      L_C91F
  5600. ;
  5601. L_C8CD  CALL    L_BA42
  5602.         LD      A,#00
  5603.         JP      NZ,L_C91F
  5604.         LD      A,#01
  5605.         JP      L_C91F
  5606. ;
  5607. L_C8DA  CALL    L_BA42
  5608.         JR      Z,L_C8E4
  5609.         LD      A,#04
  5610.         JP      L_C91F
  5611. ;
  5612. L_C8E4  CALL    L_BA61
  5613.         LD      A,#00
  5614.         JP      NZ,L_C91F
  5615.         LD      A,#02
  5616.         JP      L_C91F
  5617. ;
  5618. L_C8F1  CALL    L_BA61
  5619.         JR      Z,L_C8FB
  5620.         LD      A,#01
  5621.         JP      L_C91F
  5622. ;
  5623. L_C8FB  CALL    L_BA20
  5624.         LD      A,#00
  5625.         JP      NZ,L_C91F
  5626.         LD      A,#03
  5627.         JP      L_C91F
  5628. ;
  5629. L_C908  CALL    L_BA20
  5630.         JR      Z,L_C912
  5631.         LD      A,#02
  5632.         JP      L_C91F
  5633. ;
  5634. L_C912  CALL    L_BA90
  5635.         LD      A,#00
  5636.         JP      NZ,L_C91F
  5637.         LD      A,#04
  5638.         JP      L_C91F
  5639. ;
  5640. L_C91F  LD      H,A
  5641.         LD      L,(IX+#02)
  5642.         LD      B,(IX+#03)
  5643.         OR      A
  5644.         JR      Z,L_C92C
  5645.         LD      (IX+#02),A
  5646. L_C92C  LD      A,(IX+#02)
  5647.         CP      #01
  5648.         JR      NZ,L_C93A
  5649.         LD      A,B
  5650.         NEG
  5651.         ADD     A,E
  5652.         LD      E,A
  5653.         JR      L_C951
  5654. ;
  5655. L_C93A  CP      #02
  5656.         JR      NZ,L_C943
  5657.         LD      A,B
  5658.         ADD     A,D
  5659.         LD      D,A
  5660.         JR      L_C951
  5661. ;
  5662. L_C943  CP      #03
  5663.         JR      NZ,L_C94C
  5664.         LD      A,B
  5665.         ADD     A,E
  5666.         LD      E,A
  5667.         JR      L_C951
  5668. ;
  5669. L_C94C  LD      A,B
  5670.         NEG
  5671.         ADD     A,D
  5672.         LD      D,A
  5673. L_C951  LD      A,(IX+#04)
  5674.         OR      A
  5675.         JR      NZ,L_C96F
  5676.         LD      A,H
  5677.         OR      A
  5678.         JR      Z,L_C96F
  5679.         CALL    L_BA06
  5680.         JR      NZ,L_C96F
  5681.         LD      (IX+#04),#01
  5682.         LD      (IX+#02),L
  5683.         LD      E,(IX+#00)
  5684.         LD      D,(IX+#01)
  5685.         JR      L_C98E
  5686. ;
  5687. L_C96F  LD      (IX+#00),E
  5688.         LD      (IX+#01),D
  5689.         LD      A,(IX+#02)
  5690.         ADD     A,#51
  5691.         CALL    L_94CD
  5692.         CALL    L_95E5
  5693.         CALL    L_AB46
  5694.         LD      (L_C70A),DE
  5695.         DEC     (IX+#05)
  5696.         JP      Z,L_974A
  5697.         RET
  5698. ;
  5699. L_C98E  LD      A,(IX+#02)
  5700.         CP      #01
  5701.         JP      Z,L_C9B2
  5702.         CP      #02
  5703.         JP      Z,L_C9C4
  5704.         CP      #03
  5705.         JP      Z,L_C9D6
  5706.         CALL    L_BA90
  5707.         LD      B,A
  5708.         CALL    L_BA42
  5709.         OR      B
  5710.         JP      Z,L_C91F
  5711.         LD      (IX+#04),#00
  5712.         JP      L_C8A4
  5713. ;
  5714. L_C9B2  CALL    L_BA42
  5715.         LD      B,A
  5716.         CALL    L_BA61
  5717.         OR      B
  5718.         JP      Z,L_C91F
  5719.         LD      (IX+#04),#00
  5720.         JP      L_C8A4
  5721. ;
  5722. L_C9C4  CALL    L_BA61
  5723.         LD      B,A
  5724.         CALL    L_BA20
  5725.         OR      B
  5726.         JP      Z,L_C91F
  5727.         LD      (IX+#04),#00
  5728.         JP      L_C8A4
  5729. ;
  5730. L_C9D6  CALL    L_BA20
  5731.         LD      B,A
  5732.         CALL    L_BA90
  5733.         OR      B
  5734.         JP      Z,L_C91F
  5735.         LD      (IX+#04),#00
  5736.         JP      L_C8A4
  5737. ;
  5738. L_C9E8  LD      BC,L_C9FA
  5739.         LD      A,(L_A390)
  5740.         CALL    GetHLFrom2APlusBC
  5741.         LD      DE,L_CA24
  5742.         LD      BC,#001E
  5743.         LDIR
  5744.         RET
  5745. ;
  5746. L_C9FA       DW       L_CB35
  5747.        DW       L_CB36
  5748.        DW       L_CB37
  5749.        DW       L_CB3C
  5750.        DW       L_CB3D
  5751.        DW       L_CB3E
  5752.        DW       L_CB3F
  5753.        DW       L_CB40
  5754.        DW       L_CB41
  5755.        DW       L_CB42
  5756.        DW       L_CB43
  5757.        DW       L_CB44
  5758.        DW       L_CB45
  5759.        DW       L_CB46
  5760.        DW       L_CB47
  5761.        DW       L_CB4C
  5762.        DW       L_CB4D
  5763.        DW       L_CB4E
  5764.        DW       L_CB4F
  5765.        DW       L_CB50
  5766.        DW       L_CB51
  5767. ;
  5768. L_CA24       DB       #FF,#FF,#D8,#80,#FD,#00,#FF,#FF
  5769.        DB       #FF,#FF,#FF,#FF,#FF,#FF,#FF,#FF
  5770.        DB       #FF,#FF,#78,#20,#FD,#00,#FF,#FF
  5771.        DB       #FF,#FF,#FF,#FF,#B0,#40,#FF
  5772. ;
  5773. L_CA43  LD      IX,L_CA24
  5774. L_CA47  LD      A,(IX+#00)
  5775.         CP      #FF
  5776.         RET     Z
  5777.         LD      E,A
  5778.         LD      A,(IX+#02)
  5779.         OR      A
  5780.         JR      Z,L_CA61
  5781.         LD      D,(IX+#01)
  5782.         CALL    L_C6C8
  5783.         OR      A
  5784.         JR      Z,L_CA61
  5785.         LD      (IX+#02),#00
  5786. L_CA61  LD      BC,#0004
  5787.         ADD     IX,BC
  5788.         JR      L_CA47
  5789. ;
  5790. L_CA68  LD      IX,L_CA24
  5791. L_CA6C  LD      A,(IX+#00)
  5792.         CP      #FF
  5793.         RET     Z
  5794.         LD      E,A
  5795.         LD      D,(IX+#01)
  5796.         LD      A,(IX+#02)
  5797.         OR      A
  5798.         JR      NZ,L_CA84
  5799.         LD      BC,#0004
  5800.         ADD     IX,BC
  5801.         JP      L_CA6C
  5802. ;
  5803. L_CA84  CALL    L_95E5
  5804.         LD      A,(IX+#03)
  5805.         OR      A
  5806.         JP      NZ,L_CB24
  5807.         LD      A,(IX+#02)
  5808.         CP      #FD
  5809.         JR      Z,L_CACB
  5810.         LD      C,A
  5811.         LD      B,#3B
  5812.         CALL    L_A927
  5813.         LD      A,C
  5814.         JR      Z,L_CAFE
  5815.         NEG
  5816.         LD      (IX+#02),A
  5817.         PUSH    AF
  5818.         PUSH    BC
  5819.         PUSH    DE
  5820.         PUSH    HL
  5821.         LD      A,E
  5822.         ADD     A,#10
  5823.         LD      E,A
  5824.         CALL    CountXYtoxy_DE
  5825.         CALL    CountScrAddr_DEyx
  5826.         LD      BC,#8D00
  5827.         ADD     HL,BC
  5828.         LD      A,(HL)
  5829.         CP      #02
  5830.         JR      C,L_CAC4
  5831.         LD      (IX+#03),#05
  5832.         CALL    L_AA1C
  5833.         JP      L_CB20
  5834. ;
  5835. L_CAC4  POP     HL
  5836.         POP     DE
  5837.         POP     BC
  5838.         POP     AF
  5839.         JP      L_CAFE
  5840. ;
  5841. L_CACB  LD      C,A
  5842.         LD      B,#3D
  5843.         CALL    L_A947
  5844.         LD      A,C
  5845.         JR      Z,L_CAFE
  5846.         NEG
  5847.         LD      (IX+#02),A
  5848.         PUSH    AF
  5849.         PUSH    BC
  5850.         PUSH    DE
  5851.         PUSH    HL
  5852.         LD      A,E
  5853.         SUB     #09
  5854.         LD      E,A
  5855.         CALL    CountXYtoxy_DE
  5856.         CALL    CountScrAddr_DEyx
  5857.         LD      BC,#8D00
  5858.         ADD     HL,BC
  5859.         LD      A,(HL)
  5860.         CP      #02
  5861.         JR      C,L_CAFA
  5862.         LD      (IX+#03),#05
  5863.         CALL    L_AA1C
  5864.         JP      L_CB20
  5865. ;
  5866. L_CAFA  POP     HL
  5867.         POP     DE
  5868.         POP     BC
  5869.         POP     AF
  5870. L_CAFE  ADD     A,E
  5871.         LD      E,A
  5872. L_CB00  LD      (IX+#00),E
  5873.         LD      A,(L_9478)
  5874.         AND     #01
  5875.         JR      Z,L_CB0B
  5876.         INC     B
  5877. L_CB0B  LD      A,B
  5878.         CALL    L_95E5
  5879.         CALL    L_AB46
  5880.         CALL    L_BFE0
  5881.         CALL    L_94CD
  5882.         LD      BC,#0004
  5883.         ADD     IX,BC
  5884.         JP      L_CA6C
  5885. ;
  5886. L_CB20  POP     HL
  5887.         POP     DE
  5888.         POP     BC
  5889.         POP     AF
  5890. L_CB24  DEC     (IX+#03)
  5891.         LD      A,(IX+#02)
  5892.         CP      #FD
  5893.         LD      B,#3C
  5894.         JP      Z,L_CB0B
  5895.         INC     B
  5896.         JP      L_CB0B
  5897. ;
  5898. L_CB35       DB       #FF
  5899. L_CB36       DB       #FF
  5900. L_CB37       DB       #D8,#80,#FD,#00,#FF
  5901. L_CB3C       DB       #FF
  5902. L_CB3D       DB       #FF
  5903. L_CB3E       DB       #FF
  5904. L_CB3F       DB       #FF
  5905. L_CB40       DB       #FF
  5906. L_CB41       DB       #FF
  5907. L_CB42       DB       #FF
  5908. L_CB43       DB       #FF
  5909. L_CB44       DB       #FF
  5910. L_CB45       DB       #FF
  5911. L_CB46       DB       #FF
  5912. L_CB47       DB       #78,#20,#FD,#00,#FF
  5913. L_CB4C       DB       #FF
  5914. L_CB4D       DB       #FF
  5915. L_CB4E       DB       #FF
  5916. L_CB4F       DB       #FF
  5917. L_CB50       DB       #FF
  5918. L_CB51       DB       #B0,#40,#03,#00,#D8,#40,#03,#00
  5919.        DB       #10,#60,#FD,#00,#38,#60,#FD,#00
  5920.        DB       #B0,#80,#03,#00,#D8,#80,#03,#00
  5921.        DB       #FF
  5922. ;
  5923. L_CB6A  LD      A,(L_A390)
  5924.         LD      BC,L_A4C5
  5925.         CALL    GetHLFrom2APlusBC
  5926.         LD      DE,L_A6B8
  5927.         LD      BC,#0050
  5928.         LDIR
  5929.         RET
  5930. ;
  5931. L_CB7C  XOR     A
  5932.         LD      (L_9AA6),A
  5933.         LD      HL,L_A6B8
  5934. L_CB83  LD      A,(HL)
  5935.         CP      #FF
  5936.         RET     Z
  5937.         LD      E,A
  5938.         INC     HL
  5939.         LD      D,(HL)
  5940.         INC     HL
  5941.         LD      C,(HL)
  5942.         INC     HL
  5943.         LD      A,(HL)
  5944.         INC     HL
  5945.         CP      #01
  5946.         JR      NZ,L_CB83
  5947.         LD      A,C
  5948.         LD      C,#47
  5949.         CALL    CountXYtoxy_DE
  5950.         CALL    L_9A82
  5951.         JP      L_CB83
  5952. ;
  5953. L_CB9F  LD      HL,L_A6B8
  5954. L_CBA2  LD      A,(HL)
  5955.         CP      #FF
  5956.         RET     Z
  5957.         LD      E,A
  5958.         INC     HL
  5959.         LD      D,(HL)
  5960.         INC     HL
  5961.         INC     HL
  5962.         LD      A,(HL)
  5963.         INC     HL
  5964.         CP      #01
  5965.         CALL    Z,L_AB46
  5966.         JP      L_CBA2
  5967. ;
  5968. L_CBB5  XOR     A
  5969.         LD      (L_9AA6),A
  5970.         LD      HL,L_A6B8
  5971. L_CBBC  LD      A,(HL)
  5972.         CP      #FF
  5973.         RET     Z
  5974.         LD      E,A
  5975.         INC     HL
  5976.         LD      D,(HL)
  5977.         LD      A,E
  5978.         CP      C
  5979.         JR      NZ,L_CBE3
  5980.         LD      A,D
  5981.         CP      B
  5982.         JR      NZ,L_CBE3
  5983.         INC     HL
  5984.         LD      C,(HL)
  5985.         INC     HL
  5986.         LD      A,(HL)
  5987.         INC     HL
  5988.         CP      #02
  5989.         JR      NZ,L_CBBC
  5990.         DEC     HL
  5991.         LD      (HL),#01
  5992.         LD      A,C
  5993.         CALL    L_94CD
  5994.         CALL    CountXYtoxy_DE
  5995.         LD      C,#47
  5996.         JP      L_9A82
  5997. ;
  5998. L_CBE3  INC     HL
  5999.         INC     HL
  6000.         INC     HL
  6001.         JR      L_CBBC
  6002. ;
  6003. L_CBE8  LD      HL,L_A6B8
  6004. L_CBEB  LD      A,(HL)
  6005.         CP      #FF
  6006.         RET     Z
  6007.         LD      C,A
  6008.         INC     HL
  6009.         LD      B,(HL)
  6010.         LD      A,B
  6011.         ADD     A,#08
  6012.         LD      B,A
  6013.         LD      A,C
  6014.         ADD     A,#08
  6015.         LD      C,A
  6016.         INC     HL
  6017.         LD      A,(HL)
  6018.         EX      AF,AF'
  6019.         INC     HL
  6020.         LD      A,(HL)
  6021.         INC     HL
  6022.         CP      #01
  6023.         JR      NZ,L_CBEB
  6024.         LD      DE,(L_A8C6)
  6025.         CALL    L_C092
  6026.         OR      A
  6027.         JR      Z,L_CBEB
  6028.         EX      AF,AF'
  6029.         PUSH    BC
  6030.         LD      C,#32
  6031. L_CC12  LD      B,#0A
  6032.         CALL    L_D0B7
  6033.         DEC     C
  6034.         JR      NZ,L_CC12
  6035.         POP     BC
  6036.         CALL    L_CC43
  6037.         CALL    L_CC81
  6038.         DEC     HL
  6039.         LD      (HL),#00
  6040.         LD      A,C
  6041.         SUB     #08
  6042.         LD      E,A
  6043.         LD      A,B
  6044.         SUB     #08
  6045.         LD      D,A
  6046.         CALL    CountXYtoxy_DE
  6047.         CALL    CountScrAddr_DEyx
  6048.         LD      BC,#9000
  6049.         ADD     HL,BC
  6050.         LD      A,(HL)
  6051.         CALL    DrawSprite
  6052.         CALL    CountxytoXY_DE
  6053.         CALL    L_95E5
  6054.         JP      L_974A
  6055. ;
  6056. L_CC43  PUSH    AF
  6057.         PUSH    BC
  6058.         PUSH    DE
  6059.         PUSH    HL
  6060.         LD      C,A
  6061.         LD      HL,L_CC65
  6062. L_CC4B  LD      A,(HL)
  6063.         CP      #FF
  6064.         JR      Z,L_CC60
  6065.         CP      C
  6066.         INC     HL
  6067.         LD      E,(HL)
  6068.         INC     HL
  6069.         LD      D,(HL)
  6070.         INC     HL
  6071.         JR      Z,L_CC5A
  6072.         JR      L_CC4B
  6073. ;
  6074. L_CC5A  CALL    L_C1FA
  6075.         CALL    L_C1B5
  6076. L_CC60  POP     HL
  6077.         POP     DE
  6078.         POP     BC
  6079.         POP     AF
  6080.         RET
  6081. ;
  6082. L_CC65       DB       #3F,#2A,#C2,#40,#30,#C2,#41,#36
  6083.        DB       #C2,#42,#3C,#C2,#43,#42,#C2,#44
  6084.        DB       #48,#C2,#45,#4E,#C2,#46,#54,#C2
  6085.        DB       #47,#3C,#C2,#FF
  6086. ;
  6087. L_CC81  PUSH    AF
  6088.         PUSH    BC
  6089.         PUSH    DE
  6090.         PUSH    HL
  6091.         CP      #48
  6092.         JR      NZ,L_CC9A
  6093.         LD      A,(L_C256)
  6094.         CP      #03
  6095.         JR      Z,L_CCFD
  6096.         INC     A
  6097.         LD      (L_C256),A
  6098.         CALL    L_C1E1
  6099.         JP      L_CCFD
  6100. ;
  6101. L_CC9A  CP      #49
  6102.         JR      NZ,L_CCB1
  6103.         LD      HL,(L_C297)
  6104.         SRL     H
  6105.         RR      L
  6106.         LD      (L_C295),HL
  6107.         CALL    L_C257
  6108.         CALL    L_C1CE
  6109.         JP      L_CCFD
  6110. ;
  6111. L_CCB1  CP      #4A
  6112.         JR      NZ,L_CCC4
  6113.         LD      HL,(L_C297)
  6114.         LD      (L_C295),HL
  6115.         CALL    L_C257
  6116.         CALL    L_C1CE
  6117.         JP      L_CCFD
  6118. ;
  6119. L_CCC4  CP      #4C
  6120.         JR      NZ,L_CCD4
  6121.         CALL    L_C33C
  6122.         CALL    L_CF70
  6123.         CALL    L_AAE5
  6124.         JP      L_CCFD
  6125. ;
  6126. L_CCD4  CP      #5E
  6127.         JR      NZ,L_CCE8
  6128.         LD      HL,(L_C295)
  6129.         ADD     HL,HL
  6130.         LD      (L_C295),HL
  6131.         CALL    L_C257
  6132.         CALL    L_C1CE
  6133.         JP      L_CCFD
  6134. ;
  6135. L_CCE8  CP      #5F
  6136.         JR      NZ,L_CCFD
  6137.         LD      HL,(L_C295)
  6138.         LD      B,H
  6139.         LD      C,H
  6140.         ADD     HL,HL
  6141.         ADD     HL,HL
  6142.         ADD     HL,BC
  6143.         LD      (L_C295),HL
  6144.         CALL    L_C257
  6145.         CALL    L_C1CE
  6146. L_CCFD  POP     HL
  6147.         POP     DE
  6148.         POP     BC
  6149.         POP     AF
  6150.         RET
  6151. ;
  6152. L_CD02  LD      A,(L_A390)
  6153.         LD      BC,L_CDAB
  6154.         CALL    GetHLFrom2APlusBC
  6155.         LD      DE,L_CDA2
  6156.         LD      BC,#0008
  6157.         LDIR
  6158.         XOR     A
  6159.         LD      (L_CD18),A
  6160.         RET
  6161. ;
  6162. L_CD18       DB       #00
  6163. ;
  6164. L_CD19  PUSH    AF
  6165.         PUSH    BC
  6166.         PUSH    DE
  6167.         PUSH    HL
  6168.         PUSH    IX
  6169.         XOR     A
  6170.         LD      (L_9AA6),A
  6171.         LD      BC,#0002
  6172.         LD      IX,L_CDA2
  6173. L_CD2A  LD      A,(IX+#00)
  6174.         CP      #FF
  6175.         JR      Z,L_CD9B
  6176.         LD      L,A
  6177.         LD      H,(IX+#01)
  6178.         AND     A
  6179.         SBC     HL,DE
  6180.         JR      Z,L_CD3E
  6181.         ADD     IX,BC
  6182.         JR      L_CD2A
  6183. ;
  6184. L_CD3E  LD      L,(IX+#00)
  6185.         LD      H,(IX+#01)
  6186.         LD      IX,L_A6B8
  6187.         LD      BC,#0004
  6188. L_CD4B  LD      A,(IX+#00)
  6189.         CP      #FF
  6190.         JR      Z,L_CD9B
  6191.         LD      E,A
  6192.         LD      D,(IX+#01)
  6193.         AND     A
  6194.         PUSH    HL
  6195.         SBC     HL,DE
  6196.         POP     HL
  6197.         JR      Z,L_CD61
  6198.         ADD     IX,BC
  6199.         JR      L_CD4B
  6200. ;
  6201. L_CD61  LD      A,(IX+#03)
  6202.         CP      #01
  6203.         JR      NZ,L_CD9B
  6204.         EX      DE,HL
  6205.         LD      HL,L_CD18
  6206.         LD      A,(HL)
  6207.         INC     (HL)
  6208.         AND     #07
  6209.         LD      L,A
  6210.         LD      H,#00
  6211.         LD      BC,L_CDF0
  6212.         ADD     HL,BC
  6213.         LD      A,(HL)
  6214.         LD      (IX+#02),A
  6215.         PUSH    AF
  6216.         CALL    CountXYtoxy_DE
  6217.         CALL    CountScrAddr_DEyx
  6218.         LD      BC,#9000
  6219.         ADD     HL,BC
  6220.         LD      A,(HL)
  6221.         CALL    DrawSprite
  6222.         POP     AF
  6223.         LD      C,#47
  6224.         CALL    L_9A82
  6225.         CALL    CountxytoXY_DE
  6226.         PUSH    DE
  6227.         CALL    L_974A
  6228.         POP     DE
  6229.         CALL    L_AAE5
  6230. L_CD9B  POP     IX
  6231.         POP     HL
  6232.         POP     DE
  6233.         POP     BC
  6234.         POP     AF
  6235.         RET
  6236. ;
  6237. L_CDA2       DB       #FF,#FF,#FF,#FF,#FF,#28,#50,#FF
  6238.        DB       #FF
  6239. ;
  6240. L_CDAB       DW       L_CDD5
  6241.        DW       L_CDD6
  6242.        DW       L_CDD7
  6243.        DW       L_CDD8
  6244.        DW       L_CDD9
  6245.        DW       L_CDDA
  6246.        DW       L_CDDD
  6247.        DW       L_CDDE
  6248.        DW       L_CDDF
  6249.        DW       L_CDE0
  6250.        DW       L_CDE3
  6251.        DW       L_CDE4
  6252.        DW       L_CDE7
  6253.        DW       L_CDE8
  6254.        DW       L_CDE9
  6255.        DW       L_CDEA
  6256.        DW       L_CDEB
  6257.        DW       L_CDEC
  6258.        DW       L_CDED
  6259.        DW       L_CDEE
  6260.        DW       L_CDEF
  6261. ;
  6262. L_CDD5       DB       #FF
  6263. L_CDD6       DB       #FF
  6264. L_CDD7       DB       #FF
  6265. L_CDD8       DB       #FF
  6266. L_CDD9       DB       #FF
  6267. L_CDDA       DB       #28,#50,#FF
  6268. L_CDDD       DB       #FF
  6269. L_CDDE       DB       #FF
  6270. L_CDDF       DB       #FF
  6271. L_CDE0       DB       #C8,#B0,#FF
  6272. L_CDE3       DB       #FF
  6273. L_CDE4       DB       #68,#90,#FF
  6274. L_CDE7       DB       #FF
  6275. L_CDE8       DB       #FF
  6276. L_CDE9       DB       #FF
  6277. L_CDEA       DB       #FF
  6278. L_CDEB       DB       #FF
  6279. L_CDEC       DB       #FF
  6280. L_CDED       DB       #FF
  6281. L_CDEE       DB       #FF
  6282. L_CDEF       DB       #FF
  6283. L_CDF0       DB       #48,#5E,#4A,#46,#4C,#49,#5F,#44
  6284. ;
  6285. L_CDF8  LD      HL,L_CE06
  6286.         LD      DE,L_CE07
  6287.         LD      (HL),#00
  6288.         LD      BC,#0011
  6289.         LDIR
  6290.         RET
  6291. ;
  6292. L_CE06       DB       #00
  6293. ;
  6294. L_CE07       DB       #00,#00,#00,#00,#00,#00,#00,#00
  6295.        DB       #00,#00,#00,#00,#00,#00,#00,#00
  6296.        DB       #00,#FF
  6297. ;
  6298. L_CE19  PUSH    AF
  6299.         PUSH    BC
  6300.         PUSH    DE
  6301.         PUSH    HL
  6302.         PUSH    IX
  6303.         LD      A,D
  6304.         AND     #F8
  6305.         LD      D,A
  6306.         LD      BC,#0003
  6307.         LD      IX,L_CE06
  6308. L_CE2A  LD      A,(IX+#00)
  6309.         CP      #FF
  6310.         JR      Z,L_CE48
  6311.         LD      A,(IX+#02)
  6312.         OR      A
  6313.         JR      NZ,L_CE43
  6314.         LD      (IX+#00),E
  6315.         LD      (IX+#01),D
  6316.         LD      (IX+#02),#01
  6317.         JR      L_CE48
  6318. ;
  6319. L_CE43  ADD     IX,BC
  6320.         JP      L_CE2A
  6321. ;
  6322. L_CE48  POP     IX
  6323.         POP     HL
  6324.         POP     DE
  6325.         POP     BC
  6326.         POP     AF
  6327.         RET
  6328. ;
  6329. L_CE4F  LD      IX,L_CE06
  6330. L_CE53  LD      A,(IX+#00)
  6331.         CP      #FF
  6332.         RET     Z
  6333.         LD      E,A
  6334.         LD      D,(IX+#01)
  6335.         CALL    L_95E5
  6336.         LD      A,(IX+#02)
  6337.         OR      A
  6338.         JR      Z,L_CE7D
  6339.         CALL    L_A964
  6340.         JR      NZ,L_CE6F
  6341.         INC     D
  6342.         INC     D
  6343.         INC     D
  6344.         INC     D
  6345. L_CE6F  LD      (IX+#01),D
  6346.         CALL    L_95E5
  6347.         CALL    L_AB46
  6348.         LD      A,#4B
  6349.         CALL    L_94CD
  6350. L_CE7D  LD      BC,#0003
  6351.         ADD     IX,BC
  6352.         JP      L_CE53
  6353. ;
  6354. L_CE85  PUSH    AF
  6355.         PUSH    BC
  6356.         PUSH    DE
  6357.         PUSH    HL
  6358.         PUSH    IX
  6359.         LD      A,#1E
  6360. L_CE8D  LD      B,#19
  6361.         CALL    L_D0B7
  6362.         DEC     A
  6363.         JR      NZ,L_CE8D
  6364.         LD      BC,#0003
  6365.         LD      IX,L_CEC1
  6366. L_CE9C  LD      A,(IX+#00)
  6367.         CP      #FF
  6368.         JR      Z,L_CEBA
  6369.         LD      A,(IX+#02)
  6370.         OR      A
  6371.         JR      NZ,L_CEB5
  6372.         LD      (IX+#02),#14
  6373.         LD      (IX+#00),E
  6374.         LD      (IX+#01),D
  6375.         JR      L_CEBA
  6376. ;
  6377. L_CEB5  ADD     IX,BC
  6378.         JP      L_CE9C
  6379. ;
  6380. L_CEBA  POP     IX
  6381.         POP     HL
  6382.         POP     DE
  6383.         POP     BC
  6384.         POP     AF
  6385.         RET
  6386. ;
  6387. L_CEC1       DB       #89,#B0,#00,#00,#00,#00,#00,#00
  6388.        DB       #00,#00,#00,#00,#00,#00,#00,#00
  6389.        DB       #00,#00,#00,#00,#00,#00,#00,#00
  6390.        DB       #00,#00,#00,#00,#00,#00,#FF
  6391. ;
  6392. L_CEE0  LD      IX,L_CEC1
  6393. L_CEE4  LD      A,(IX+#00)
  6394.         CP      #FF
  6395.         RET     Z
  6396.         LD      E,A
  6397.         LD      A,(IX+#02)
  6398.         OR      A
  6399.         JR      Z,L_CF02
  6400.         LD      D,(IX+#01)
  6401.         CALL    L_95E5
  6402.         LD      A,#4D
  6403.         CALL    L_94CD
  6404.         DEC     (IX+#02)
  6405.         CALL    Z,L_974A
  6406. L_CF02  LD      BC,#0003
  6407.         ADD     IX,BC
  6408.         JP      L_CEE4
  6409. ;
  6410. L_CF0A  LD      IX,L_CE06
  6411. L_CF0E  LD      A,(IX+#00)
  6412.         CP      #FF
  6413.         RET     Z
  6414.         LD      E,A
  6415.         LD      A,(IX+#02)
  6416.         OR      A
  6417.         JR      Z,L_CF57
  6418.         LD      D,(IX+#01)
  6419.         LD      BC,(L_A8C6)
  6420.         LD      A,B
  6421.         ADD     A,#08
  6422.         LD      B,A
  6423.         LD      A,C
  6424.         ADD     A,#08
  6425.         LD      C,A
  6426.         CALL    L_C092
  6427.         OR      A
  6428.         JR      Z,L_CF57
  6429.         LD      (IX+#02),#00
  6430.         CALL    L_974A
  6431.         CALL    L_989A
  6432.         AND     #07
  6433.         LD      L,A
  6434.         LD      H,#00
  6435.         ADD     HL,HL
  6436.         LD      BC,L_CF5F
  6437.         ADD     HL,BC
  6438.         LD      E,(HL)
  6439.         INC     HL
  6440.         LD      D,(HL)
  6441.         CALL    L_C1FA
  6442.         LD      A,#1E
  6443. L_CF4C  LD      B,#0A
  6444.         CALL    L_D0B7
  6445.         DEC     A
  6446.         JR      NZ,L_CF4C
  6447.         JP      L_C1B5
  6448. ;
  6449. L_CF57  LD      BC,#0003
  6450.         ADD     IX,BC
  6451.         JP      L_CF0E
  6452. ;
  6453. L_CF5F       DW       L_C22A
  6454.        DW       L_C22A
  6455.        DW       L_C230
  6456.        DW       L_C230
  6457.        DW       L_C236
  6458.        DW       L_C236
  6459.        DW       L_C23C
  6460.        DW       L_C242
  6461. ;
  6462. L_CF6F       DB       #00
  6463. ;
  6464. L_CF70  PUSH    AF
  6465.         PUSH    BC
  6466.         PUSH    DE
  6467.         PUSH    HL
  6468.         PUSH    IX
  6469.         LD      BC,#0003
  6470.         LD      IX,L_CFB0
  6471. L_CF7D  LD      A,(IX+#00)
  6472.         CP      #FF
  6473.         JR      Z,L_CF9B
  6474.         LD      A,(IX+#02)
  6475.         OR      A
  6476.         JR      NZ,L_CF96
  6477.         LD      (IX+#00),E
  6478.         LD      (IX+#01),D
  6479.         LD      (IX+#02),#01
  6480.         JR      L_CF9B
  6481. ;
  6482. L_CF96  ADD     IX,BC
  6483.         JP      L_CF7D
  6484. ;
  6485. L_CF9B  POP     IX
  6486.         POP     HL
  6487.         POP     DE
  6488.         POP     BC
  6489.         POP     AF
  6490.         RET
  6491. ;
  6492. L_CFA2  LD      HL,L_CFB0
  6493.         LD      DE,L_CFB1
  6494.         LD      BC,#000E
  6495.         LD      (HL),#00
  6496.         LDIR
  6497.         RET
  6498. ;
  6499. L_CFB0       DB       #00
  6500. L_CFB1       DB       #00,#00,#00,#00,#00,#00,#00,#00
  6501.        DB       #00,#00,#00,#00,#00,#00,#FF
  6502. ;
  6503. L_CFC0  LD      IX,L_CFB0
  6504. L_CFC4  LD      A,(IX+#00)
  6505.         CP      #FF
  6506.         RET     Z
  6507.         LD      E,A
  6508.         LD      A,(IX+#02)
  6509.         OR      A
  6510.         JR      Z,L_D037
  6511.         LD      D,(IX+#01)
  6512.         CALL    L_95E5
  6513.         CALL    L_989A
  6514.         CP      #C8
  6515.         JR      C,L_CFE6
  6516.         LD      A,(L_A8C6)
  6517.         CP      E
  6518.         JR      C,L_CFF6
  6519.         JR      L_CFED
  6520. ;
  6521. L_CFE6  CALL    L_989A
  6522.         AND     #01
  6523.         JR      Z,L_CFF6
  6524. L_CFED  CALL    L_BA20
  6525.         JR      NZ,L_CFF6
  6526.         INC     E
  6527.         JP      L_CFFC
  6528. ;
  6529. L_CFF6  CALL    L_BA42
  6530.         JR      NZ,L_CFFC
  6531.         DEC     E
  6532. L_CFFC  CALL    L_989A
  6533.         CP      #C8
  6534.         JR      C,L_D00B
  6535.         LD      A,(L_A8C7)
  6536.         CP      D
  6537.         JR      C,L_D01A
  6538.         JR      L_D012
  6539. ;
  6540. L_D00B  CALL    L_989A
  6541.         AND     #01
  6542.         JR      Z,L_D01A
  6543. L_D012  CALL    L_BA61
  6544.         JR      NZ,L_D01A
  6545.         INC     D
  6546.         JR      L_D020
  6547. ;
  6548. L_D01A  CALL    L_BA90
  6549.         JR      NZ,L_D020
  6550.         DEC     D
  6551. L_D020  LD      (IX+#00),E
  6552.         LD      (IX+#01),D
  6553.         CALL    L_95E5
  6554.         CALL    L_AB46
  6555.         LD      A,(L_9478)
  6556.         RRCA
  6557.         AND     #03
  6558.         ADD     A,#4E
  6559.         CALL    L_94CD
  6560. L_D037  LD      BC,#0003
  6561.         ADD     IX,BC
  6562.         JP      L_CFC4
  6563. ;
  6564. L_D03F  LD      IX,L_CFB0
  6565. L_D043  LD      A,(IX+#00)
  6566.         CP      #FF
  6567.         RET     Z
  6568.         LD      E,A
  6569.         LD      A,(IX+#02)
  6570.         OR      A
  6571.         JR      Z,L_D092
  6572.         LD      D,(IX+#01)
  6573.         LD      BC,(L_A8C6)
  6574.         LD      A,B
  6575.         ADD     A,#08
  6576.         LD      B,A
  6577.         LD      A,C
  6578.         ADD     A,#08
  6579.         LD      C,A
  6580.         CALL    L_C092
  6581.         OR      A
  6582.         JR      Z,L_D092
  6583.         LD      (IX+#02),#00
  6584.         CALL    L_95E5
  6585.         CALL    L_974A
  6586.         LD      DE,L_C242
  6587.         CALL    L_C1FA
  6588.         CALL    L_C1B5
  6589.         CALL    L_D09A
  6590.         LD      A,(L_CF6F)
  6591.         INC     A
  6592.         CP      #0A
  6593.         JR      NZ,L_D08E
  6594.         LD      A,(L_C255)
  6595.         INC     A
  6596.         LD      (L_C255),A
  6597.         CALL    L_C1EE
  6598.         XOR     A
  6599. L_D08E  LD      (L_CF6F),A
  6600.         RET
  6601. ;
  6602. L_D092  LD      BC,#0003
  6603.         ADD     IX,BC
  6604.         JP      L_D043
  6605. ;
  6606. L_D09A  PUSH    AF
  6607.         PUSH    BC
  6608.         PUSH    DE
  6609.         PUSH    HL
  6610.         XOR     A
  6611.         LD      DE,#1F30
  6612. L_D0A2  LD      H,#0A
  6613. L_D0A4  XOR     #10
  6614.         OUT     (#FE),A
  6615.         LD      B,E
  6616. L_D0A9  DJNZ    L_D0A9
  6617.         DEC     H
  6618.         JR      NZ,L_D0A4
  6619.         INC     E
  6620.         DEC     D
  6621.         JR      NZ,L_D0A2
  6622.         POP     HL
  6623.         POP     DE
  6624.         POP     BC
  6625.         POP     AF
  6626.         RET
  6627. ;
  6628. L_D0B7  PUSH    AF
  6629.         PUSH    BC
  6630.         PUSH    DE
  6631. L_D0BA  LD      A,R
  6632.         AND     #F8
  6633.         OUT     (#FE),A
  6634.         LD      E,B
  6635.         INC     E
  6636. L_D0C2  DEC     E
  6637.         JR      NZ,L_D0C2
  6638.         XOR     A
  6639.         OUT     (#FE),A
  6640.         DJNZ    L_D0BA
  6641.         POP     DE
  6642.         POP     BC
  6643.         POP     AF
  6644.         RET
  6645. ;
  6646. L_D0CE       DB       #00
  6647. L_D0CF       DB       #00,#00,#00,#00,#00,#00,#00,#00
  6648.        DB       #00,#00,#00,#00,#00,#00,#FF
  6649. ;
  6650. L_D0DE  LD      HL,L_D0CE
  6651.         LD      DE,L_D0CF
  6652.         LD      BC,#000E
  6653.         LD      (HL),#00
  6654.         LDIR
  6655.         RET
  6656. ;
  6657. L_D0EC  PUSH    BC
  6658.         PUSH    DE
  6659.         PUSH    HL
  6660.         PUSH    IX
  6661.         PUSH    AF
  6662.         LD      BC,#0003
  6663.         LD      IX,L_D0CE
  6664. L_D0F9  LD      A,(IX+#00)
  6665.         CP      #FF
  6666.         JR      Z,L_D119
  6667.         LD      A,(IX+#02)
  6668.         OR      A
  6669.         JR      NZ,L_D114
  6670.         POP     AF
  6671.         PUSH    AF
  6672.         LD      (IX+#00),E
  6673.         LD      (IX+#01),D
  6674.         LD      (IX+#02),A
  6675.         JP      L_D119
  6676. ;
  6677. L_D114  ADD     IX,BC
  6678.         JP      L_D0F9
  6679. ;
  6680. L_D119  POP     AF
  6681.         POP     IX
  6682.         POP     HL
  6683.         POP     DE
  6684.         POP     BC
  6685.         RET
  6686. ;
  6687. L_D120  LD      IX,L_D0CE
  6688. L_D124  LD      A,(IX+#00)
  6689.         CP      #FF
  6690.         RET     Z
  6691.         LD      A,(IX+#02)
  6692.         OR      A
  6693.         JR      Z,L_D1AD
  6694.         LD      E,(IX+#00)
  6695.         LD      D,(IX+#01)
  6696.         CALL    L_95E5
  6697.         CP      #01
  6698.         JR      Z,L_D157
  6699.         CP      #03
  6700.         JR      Z,L_D169
  6701.         CP      #04
  6702.         JR      Z,L_D17B
  6703.         CALL    L_A964
  6704.         JR      Z,L_D150
  6705.         CALL    L_AC96
  6706.         JP      L_D18D
  6707. ;
  6708. L_D150  LD      A,D
  6709.         ADD     A,#04
  6710.         LD      D,A
  6711.         JP      L_D196
  6712. ;
  6713. L_D157  CALL    L_A947
  6714.         JR      Z,L_D162
  6715.         CALL    L_AC4E
  6716.         JP      L_D18D
  6717. ;
  6718. L_D162  LD      A,E
  6719.         SUB     #04
  6720.         LD      E,A
  6721.         JP      L_D196
  6722. ;
  6723. L_D169  CALL    L_A927
  6724.         JR      Z,L_D174
  6725.         CALL    L_AC2A
  6726.         JP      L_D18D
  6727. ;
  6728. L_D174  LD      A,E
  6729.         ADD     A,#04
  6730.         LD      E,A
  6731.         JP      L_D196
  6732. ;
  6733. L_D17B  CALL    L_A98F
  6734.         JR      Z,L_D186
  6735.         CALL    L_AC72
  6736.         JP      L_D18D
  6737. ;
  6738. L_D186  LD      A,D
  6739.         SUB     #04
  6740.         LD      D,A
  6741.         JP      L_D196
  6742. ;
  6743. L_D18D  LD      (IX+#02),#00
  6744.         CALL    L_AAE5
  6745.         JR      L_D1AD
  6746. ;
  6747. L_D196  LD      (IX+#00),E
  6748.         LD      (IX+#01),D
  6749.         LD      A,(IX+#02)
  6750.         ADD     A,#51
  6751.         CALL    L_94CD
  6752.         CALL    L_95E5
  6753.         CALL    L_AB46
  6754.         CALL    L_BFE0
  6755. L_D1AD  LD      BC,#0003
  6756.         ADD     IX,BC
  6757.         JP      L_D124
  6758. ;
  6759. L_D1B5  LD      A,(L_A390)
  6760.         LD      BC,L_D1C7
  6761.         CALL    GetHLFrom2APlusBC
  6762.         LD      DE,L_D21A
  6763.         LD      BC,#0019
  6764.         LDIR
  6765.         RET
  6766. ;
  6767. L_D1C7       DW       L_D1F1
  6768.        DW       L_D1F2
  6769.        DW       L_D1F3
  6770.        DW       L_D1F9
  6771.        DW       L_D1FA
  6772.        DW       L_D1FB
  6773.        DW       L_D201
  6774.        DW       L_D207
  6775.        DW       L_D20D
  6776.        DW       L_D20E
  6777.        DW       L_D20F
  6778.        DW       L_D210
  6779.        DW       L_D211
  6780.        DW       L_D212
  6781.        DW       L_D213
  6782.        DW       L_D214
  6783.        DW       L_D215
  6784.        DW       L_D216
  6785.        DW       L_D217
  6786.        DW       L_D218
  6787.        DW       L_D219
  6788. ;
  6789. L_D1F1       DB       #FF
  6790. L_D1F2       DB       #FF
  6791. L_D1F3       DB       #18,#80,#01,#00,#00,#FF
  6792. L_D1F9       DB       #FF
  6793. L_D1FA       DB       #FF
  6794. L_D1FB       DB       #78,#80,#01,#00,#00,#FF
  6795. L_D201       DB       #28,#30,#01,#00,#00,#FF
  6796. L_D207       DB       #18,#10,#01,#00,#00,#FF
  6797. L_D20D       DB       #FF
  6798. L_D20E       DB       #FF
  6799. L_D20F       DB       #FF
  6800. L_D210       DB       #FF
  6801. L_D211       DB       #FF
  6802. L_D212       DB       #FF
  6803. L_D213       DB       #FF
  6804. L_D214       DB       #FF
  6805. L_D215       DB       #FF
  6806. L_D216       DB       #FF
  6807. L_D217       DB       #FF
  6808. L_D218       DB       #FF
  6809. L_D219       DB       #FF
  6810. L_D21A       DB       #FF,#FF,#18,#80,#01,#00,#00,#FF
  6811.        DB       #FF,#FF,#78,#80,#01,#00,#00,#FF
  6812.        DB       #28,#30,#01,#00,#00,#FF,#18,#10
  6813.        DB       #01,#FF
  6814. ;
  6815. L_D234  LD      IX,L_D21A
  6816. L_D238  LD      A,(IX+#00)
  6817.         CP      #FF
  6818.         RET     Z
  6819.         LD      E,A
  6820.         LD      A,(IX+#02)
  6821.         OR      A
  6822.         JR      Z,L_D252
  6823.         LD      D,(IX+#01)
  6824.         CALL    L_C6C8
  6825.         OR      A
  6826.         JR      Z,L_D252
  6827.         LD      (IX+#02),#00
  6828. L_D252  LD      BC,#0005
  6829.         ADD     IX,BC
  6830.         JR      L_D238
  6831. ;
  6832. L_D259  LD      IX,L_D21A
  6833. L_D25D  LD      A,(IX+#00)
  6834.         CP      #FF
  6835.         RET     Z
  6836.         LD      E,A
  6837.         LD      A,(IX+#02)
  6838.         OR      A
  6839.         JR      NZ,L_D272
  6840. L_D26A  LD      BC,#0005
  6841.         ADD     IX,BC
  6842.         JP      L_D25D
  6843. ;
  6844. L_D272  LD      D,(IX+#01)
  6845.         CALL    L_95E5
  6846.         CALL    L_A964
  6847.         JR      NZ,L_D2C0
  6848.         LD      A,(IX+#03)
  6849.         CP      #04
  6850.         JR      C,L_D28B
  6851.         INC     D
  6852.         INC     D
  6853.         INC     D
  6854.         INC     D
  6855.         LD      (IX+#01),D
  6856. L_D28B  LD      A,(IX+#02)
  6857.         CP      #01
  6858.         LD      A,#56
  6859.         JR      Z,L_D296
  6860.         LD      A,#58
  6861. L_D296  CALL    L_94CD
  6862.         CALL    L_95E5
  6863.         CALL    L_AB46
  6864.         CALL    L_BFE0
  6865.         INC     (IX+#03)
  6866.         LD      A,(IX+#03)
  6867.         CP      #08
  6868.         JP      NZ,L_D26A
  6869.         CALL    L_AAE5
  6870.         CALL    L_974A
  6871.         XOR     A
  6872.         LD      (IX+#02),A
  6873.         LD      (IX+#03),A
  6874.         LD      (IX+#04),A
  6875.         JP      L_D26A
  6876. ;
  6877. L_D2C0  CALL    L_D370
  6878.         LD      A,(IX+#02)
  6879.         CP      #FF
  6880.         JR      Z,L_D2F8
  6881.         PUSH    DE
  6882.         LD      A,E
  6883.         ADD     A,#08
  6884.         LD      E,A
  6885.         CALL    L_A964
  6886.         POP     DE
  6887.         JR      Z,L_D2DA
  6888.         CALL    L_A927
  6889.         JR      Z,L_D323
  6890. L_D2DA  LD      (IX+#02),#FF
  6891.         CALL    L_AC2A
  6892.         OR      A
  6893.         JR      Z,L_D323
  6894.         PUSH    DE
  6895.         LD      A,E
  6896.         ADD     A,#10
  6897.         LD      E,A
  6898.         CALL    L_B23C
  6899.         POP     DE
  6900.         LD      (IX+#04),#0A
  6901.         LD      (IX+#02),#01
  6902.         JP      L_D323
  6903. ;
  6904. L_D2F8  PUSH    DE
  6905.         LD      A,E
  6906.         SUB     #09
  6907.         LD      E,A
  6908.         CALL    L_A964
  6909.         POP     DE
  6910.         JR      Z,L_D308
  6911.         CALL    L_A947
  6912.         JR      Z,L_D323
  6913. L_D308  LD      (IX+#02),#01
  6914.         CALL    L_AC4E
  6915.         OR      A
  6916.         JR      Z,L_D323
  6917.         PUSH    DE
  6918.         LD      A,E
  6919.         SUB     #10
  6920.         LD      E,A
  6921.         CALL    L_B23C
  6922.         POP     DE
  6923.         LD      (IX+#02),#FF
  6924.         LD      (IX+#04),#0A
  6925. L_D323  LD      A,(IX+#04)
  6926.         OR      A
  6927.         JR      Z,L_D347
  6928.         DEC     (IX+#04)
  6929.         LD      A,(IX+#02)
  6930.         CP      #FF
  6931.         LD      A,#58
  6932.         JP      Z,L_D338
  6933.         LD      A,#56
  6934. L_D338  CALL    L_94CD
  6935.         CALL    L_95E5
  6936.         CALL    L_AB46
  6937.         CALL    L_BFE0
  6938.         JP      L_D26A
  6939. ;
  6940. L_D347  LD      A,(IX+#02)
  6941.         ADD     A,E
  6942.         LD      E,A
  6943.         LD      (IX+#00),E
  6944.         LD      A,(IX+#02)
  6945.         LD      B,#58
  6946.         CP      #FF
  6947.         JR      Z,L_D35A
  6948.         LD      B,#56
  6949. L_D35A  LD      A,(L_9478)
  6950.         RRCA
  6951.         AND     #01
  6952.         ADD     A,B
  6953.         CALL    L_94CD
  6954.         CALL    L_AB46
  6955.         CALL    L_95E5
  6956.         CALL    L_BFE0
  6957.         JP      L_D26A
  6958. ;
  6959. L_D370  LD      BC,(L_A8C6)
  6960.         LD      A,C
  6961.         CP      E
  6962.         JR      C,L_D382
  6963.         LD      A,(IX+#02)
  6964.         CP      #01
  6965.         RET     NZ
  6966.         LD      H,#03
  6967.         JR      L_D38A
  6968. ;
  6969. L_D382  LD      A,(IX+#02)
  6970.         CP      #FF
  6971.         RET     NZ
  6972.         LD      H,#01
  6973. L_D38A  LD      A,D
  6974.         SUB     #11
  6975.         CP      B
  6976.         RET     NC
  6977.         ADD     A,#21
  6978.         CP      B
  6979.         RET     C
  6980.         LD      A,(L_9478)
  6981.         AND     #1F
  6982.         JR      NZ,L_D39E
  6983.         LD      A,H
  6984.         CALL    L_D0EC
  6985. L_D39E  LD      A,(IX+#02)
  6986.         LD      B,#58
  6987.         CP      #FF
  6988.         JR      Z,L_D3A9
  6989.         LD      B,#56
  6990. L_D3A9  LD      A,B
  6991.         CALL    L_94CD
  6992.         CALL    L_AB46
  6993.         CALL    L_95E5
  6994.         CALL    L_BFE0
  6995.         POP     BC
  6996.         LD      BC,#0005
  6997.         ADD     IX,BC
  6998.         JP      L_D25D
  6999. ;
  7000. L_D3BF  LD      BC,L_D429
  7001.         LD      A,(L_A390)
  7002.         CALL    GetHLFrom2APlusBC
  7003.         LD      DE,L_D419
  7004.         LD      BC,#000F
  7005.         LDIR
  7006.         RET
  7007. ;
  7008. L_D3D1  PUSH    HL
  7009.         LD      HL,L_D419
  7010. L_D3D5  LD      A,(HL)
  7011.         CP      #FF
  7012.         JR      Z,L_D3ED
  7013.         LD      E,A
  7014.         INC     HL
  7015.         LD      D,(HL)
  7016.         INC     HL
  7017.         LD      A,(HL)
  7018.         INC     HL
  7019.         CALL    CountXYtoxy_DE
  7020.         ADD     A,#59
  7021.         LD      C,#47
  7022.         CALL    L_9A82
  7023.         JP      L_D3D5
  7024. ;
  7025. L_D3ED  POP     HL
  7026.         RET
  7027. ;
  7028. L_D3EF  LD      IX,L_D419
  7029.         LD      BC,#0003
  7030. L_D3F6  LD      A,(IX+#00)
  7031.         CP      #FF
  7032.         RET     Z
  7033.         LD      E,A
  7034.         LD      A,(IX+#02)
  7035.         OR      A
  7036.         JR      Z,L_D414
  7037.         LD      D,(IX+#01)
  7038.         CALL    L_AB46
  7039.         LD      A,(L_9478)
  7040.         AND     #3F
  7041.         LD      A,(IX+#02)
  7042.         CALL    Z,L_D0EC
  7043. L_D414  ADD     IX,BC
  7044.         JP      L_D3F6
  7045. ;
  7046. L_D419       DB       #FF,#FF,#18,#20,#03,#FF,#FF,#FF
  7047.        DB       #FF,#FF,#FF,#FF,#FF,#18,#00,#FF
  7048. ;
  7049. L_D429       DW       L_D453
  7050.        DW       L_D454
  7051.        DW       L_D455
  7052.        DW       L_D459
  7053.        DW       L_D45A
  7054.        DW       L_D45B
  7055.        DW       L_D45C
  7056.        DW       L_D45D
  7057.        DW       L_D45E
  7058.        DW       L_D45F
  7059.        DW       L_D460
  7060.        DW       L_D467
  7061.        DW       L_D468
  7062.        DW       L_D469
  7063.        DW       L_D46A
  7064.        DW       L_D46B
  7065.        DW       L_D47B
  7066.        DW       L_D47C
  7067.        DW       L_D47D
  7068.        DW       L_D47E
  7069.        DW       L_D47F
  7070. ;
  7071. L_D453       DB       #FF
  7072. L_D454       DB       #FF
  7073. L_D455       DB       #18,#20,#03,#FF
  7074. L_D459       DB       #FF
  7075. L_D45A       DB       #FF
  7076. L_D45B       DB       #FF
  7077. L_D45C       DB       #FF
  7078. L_D45D       DB       #FF
  7079. L_D45E       DB       #FF
  7080. L_D45F       DB       #FF
  7081. L_D460       DB       #18,#00,#02,#28,#B0,#04,#FF
  7082. L_D467       DB       #FF
  7083. L_D468       DB       #FF
  7084. L_D469       DB       #FF
  7085. L_D46A       DB       #FF
  7086. L_D46B       DB       #08,#30,#03,#08,#40,#03,#08,#50
  7087.        DB       #03,#08,#60,#03,#08,#70,#03,#FF
  7088. L_D47B       DB       #FF
  7089. L_D47C       DB       #FF
  7090. L_D47D       DB       #FF
  7091. L_D47E       DB       #FF
  7092. L_D47F       DB       #FF
  7093. ;
  7094. L_D480  CALL    Cls
  7095.         LD      HL,L_D4BD
  7096.         CALL    PrintString_HL
  7097.         LD      HL,L_D712
  7098.         LD      (L_9A57),HL
  7099.         LD      HL,L_D4C7
  7100.         LD      B,#0F
  7101.         LD      C,#46
  7102.         LD      DE,#0808
  7103. L_D499  PUSH    BC
  7104.         LD      B,#10
  7105. L_D49C  LD      A,(HL)
  7106.         CALL    PrintChar
  7107.         INC     HL
  7108.         INC     E
  7109.         DJNZ    L_D49C
  7110.         POP     BC
  7111.         INC     D
  7112.         LD      E,#08
  7113.         DJNZ    L_D499
  7114.         CALL    WaitNoKey
  7115.         LD      BC,#3A98
  7116. L_D4B0  PUSH    BC
  7117.         CALL    L_F69F
  7118.         OR      A
  7119.         POP     BC
  7120.         RET     NZ
  7121.         DEC     BC
  7122.         LD      A,B
  7123.         OR      C
  7124.         RET     Z
  7125.         JR      L_D4B0
  7126. ;
  7127. L_D4BD       DB       #EB,#00,#DF,#00,#08,#E3,#EC,#C5
  7128.        DB       #FF,#00
  7129. ;
  7130. L_D4C7       DM       "RAFFAELE  040000"
  7131.        DM       "SURYANI   030000"
  7132.        DM       "CHRIS     020000"
  7133.        DM       "FERGUS    010000"
  7134.        DM       "PROBE     009000"
  7135.        DM       "EQUINOX   008000"
  7136.        DM       "QUEEN     007000"
  7137.        DM       "NICK      006000"
  7138.        DM       "EEYUP!    005000"
  7139.        DM       "NATWEST   004000"
  7140.        DM       "THE..     003000"
  7141.        DM       "..HERO    002000"
  7142.        DM       "CUTEE     001000"
  7143.        DM       "TIKUS     001000"
  7144.        DM       "HANFRU    00100"
  7145. L_D5B6       DM       "0"
  7146. L_D5B7       DB       #FF       ;.
  7147.        DM       "ANFRU    00100"
  7148. L_D5C6       DM       "0"
  7149.        DB       #00,#00,#00       ;...
  7150. ;
  7151. L_D5CA  LD      IX,L_D4C7
  7152. L_D5CE  BIT     7,(IX+#00)
  7153.         RET     NZ
  7154.         PUSH    IX
  7155.         LD      DE,#000A
  7156.         ADD     IX,DE
  7157.         LD      HL,L_C21F
  7158.         LD      B,#06
  7159. L_D5DF  LD      A,(IX+#00)
  7160.         CP      (HL)
  7161.         JP      Z,L_D69A
  7162.         JP      NC,L_D6A1
  7163.         POP     HL
  7164.         PUSH    HL
  7165.         LD      A,#FF
  7166.         LD      BC,#03E8
  7167.         CPIR
  7168.         LD      HL,#03E8
  7169.         AND     A
  7170.         SBC     HL,BC
  7171.         PUSH    HL
  7172.         POP     BC
  7173.         LD      DE,L_D5C6
  7174.         LD      HL,L_D5B6
  7175.         LDDR
  7176.         LD      A,#FF
  7177.         LD      (L_D5B7),A
  7178.         POP     HL
  7179.         PUSH    HL
  7180.         LD      DE,#000A
  7181.         ADD     HL,DE
  7182.         EX      DE,HL
  7183.         LD      HL,L_C21F
  7184.         LD      BC,#0006
  7185.         LDIR
  7186.         CALL    Cls
  7187.         LD      HL,L_D71D
  7188.         LD      DE,L_D71E
  7189.         LD      BC,#0007
  7190.         LD      (HL),#20
  7191.         LDIR
  7192.         LD      HL,L_D6AB
  7193.         CALL    PrintString_HL
  7194.         LD      DE,#0F0C
  7195.         LD      HL,L_D71D
  7196. L_D632  LD      C,#44
  7197.         LD      A,#3F
  7198.         CALL    PrintChar
  7199. L_D639  LD      BC,#03E8
  7200.         CALL    PauseBC
  7201.         CALL    WaitNoKey
  7202.         PUSH    DE
  7203. L_D643  CALL    L_F69F
  7204.         OR      A
  7205.         JR      Z,L_D643
  7206.         POP     DE
  7207.         CP      #0D
  7208.         JR      Z,L_D688
  7209.         CP      #01
  7210.         JR      Z,L_D659
  7211.         CP      #02
  7212.         JR      NZ,L_D679
  7213.         PUSH    DE
  7214.         JR      L_D643
  7215. ;
  7216. L_D659  LD      A,E
  7217.         CP      #13
  7218.         JR      NZ,L_D667
  7219.         LD      A,(HL)
  7220.         CP      #20
  7221.         JR      Z,L_D667
  7222.         LD      (HL),#20
  7223.         JR      L_D632
  7224. ;
  7225. L_D667  LD      A,E
  7226.         CP      #0C
  7227.         JR      Z,L_D632
  7228.         LD      A,#2D
  7229.         LD      C,#47
  7230.         CALL    PrintChar
  7231.         DEC     HL
  7232.         LD      (HL),#20
  7233.         DEC     E
  7234.         JR      L_D632
  7235. ;
  7236. L_D679  LD      (HL),A
  7237.         LD      C,#46
  7238.         CALL    PrintChar
  7239.         LD      A,E
  7240.         CP      #13
  7241.         JR      Z,L_D639
  7242.         INC     HL
  7243.         INC     E
  7244.         JR      L_D632
  7245. ;
  7246. L_D688  POP     DE
  7247.         LD      HL,L_D71D
  7248.         LD      BC,#0008
  7249.         LDIR
  7250.         CALL    WaitNoKey
  7251.         CALL    L_D480
  7252.         JP      L_9300
  7253. ;
  7254. L_D69A  INC     HL
  7255.         INC     IX
  7256.         DEC     B
  7257.         JP      NZ,L_D5DF
  7258. L_D6A1  POP     IX
  7259.         LD      DE,#0010
  7260.         ADD     IX,DE
  7261.         JP      L_D5CE
  7262. ;
  7263. L_D6AB       DB       #EB,#00,#DF,#00,#08,#E3,#EC,#C5
  7264.        DB       #DF,#08,#08,#E0,#46,#E6,#12,#D7
  7265. ;
  7266.        DM       "CONGRATULATIONS!{"
  7267. ;
  7268.        DB       #ED,#DB
  7269. ;
  7270.        DM       "PLEASE ENTER YOUR NAME"
  7271. ;
  7272.        DB       #DF,#0F,#0C,#DE,#2D,#2D,#2D,#2D
  7273.        DB       #2D,#2D,#2D,#2D,#7B,#F2,#DC
  7274. ;
  7275.        DM       "PRESS CAPS TO DELETE"
  7276. ;
  7277.        DB       #7A,#ED,#DD
  7278. ;
  7279.        DM       "PRESS EN"
  7280. L_D712       DM       "TER TO END"
  7281. ;
  7282.        DB       #FF
  7283. ;
  7284. L_D71D       DM       "E"
  7285. L_D71E       DM       "RT     "
  7286. ;
  7287. L_D725  PUSH    AF
  7288.         PUSH    BC
  7289.         PUSH    DE
  7290.         PUSH    HL
  7291.         PUSH    IX
  7292.         LD      IX,L_D7BC
  7293.         LD      H,E
  7294.         LD      L,D
  7295.         LD      A,B
  7296.         LD      B,C
  7297.         LD      C,A
  7298.         LD      DE,#0101
  7299.         LD      A,B
  7300.         SUB     H
  7301.         JR      NC,L_D73F
  7302.         LD      D,#FF
  7303.         NEG
  7304. L_D73F  LD      B,A
  7305.         LD      A,C
  7306.         SUB     L
  7307.         JR      NC,L_D748
  7308.         LD      E,#FF
  7309.         NEG
  7310. L_D748  LD      C,A
  7311.         OR      B
  7312.         RET     Z
  7313.         LD      A,C
  7314.         CP      B
  7315.         LD      (IX+#00),H
  7316.         LD      (IX+#01),L
  7317.         LD      H,D
  7318.         LD      L,E
  7319.         LD      (IX+#04),H
  7320.         LD      (IX+#03),L
  7321.         LD      L,#00
  7322.         JR      C,L_D763
  7323.         LD      H,L
  7324.         LD      L,E
  7325.         LD      C,B
  7326.         LD      B,A
  7327. L_D763  LD      (IX+#06),H
  7328.         LD      (IX+#05),L
  7329.         LD      (IX+#02),B
  7330.         LD      A,B
  7331.         SRL     A
  7332.         LD      (IX+#07),A
  7333.         LD      (IX+#09),B
  7334.         LD      (IX+#08),C
  7335.         POP     IX
  7336.         POP     HL
  7337.         POP     DE
  7338.         POP     BC
  7339.         POP     AF
  7340.         RET
  7341. ;
  7342. L_D77F  LD      B,(IX+#09)
  7343.         LD      C,(IX+#08)
  7344.         LD      L,(IX+#07)
  7345.         LD      A,L
  7346.         ADD     A,C
  7347.         JR      C,L_D78F
  7348.         CP      B
  7349.         JR      C,L_D79B
  7350. L_D78F  SUB     B
  7351.         LD      (IX+#07),A
  7352.         LD      D,(IX+#04)
  7353.         LD      E,(IX+#03)
  7354.         JR      L_D7A4
  7355. ;
  7356. L_D79B  LD      (IX+#07),A
  7357.         LD      D,(IX+#06)
  7358.         LD      E,(IX+#05)
  7359. L_D7A4  LD      H,(IX+#00)
  7360.         LD      L,(IX+#01)
  7361.         LD      A,H
  7362.         ADD     A,D
  7363.         LD      H,A
  7364.         LD      A,L
  7365.         ADD     A,E
  7366.         LD      L,A
  7367.         LD      D,L
  7368.         LD      E,H
  7369.         DEC     (IX+#02)
  7370.         LD      (IX+#00),E
  7371.         LD      (IX+#01),D
  7372.         RET
  7373. ;
  7374. L_D7BC       DB       #78,#10
  7375. ;
  7376. L_D7BE       DB       #00
  7377. ;
  7378.        DB       #FF,#FF,#FF,#00,#40,#30,#80       ;....@0.
  7379. ;
  7380. L_D7C6  LD      IX,L_D7BC
  7381.         LD      A,(IX+#02)
  7382.         OR      A
  7383.         RET     Z
  7384.         LD      E,(IX+#00)
  7385.         LD      D,(IX+#01)
  7386.         CALL    L_95E5
  7387.         LD      B,#08
  7388. L_D7DA  PUSH    BC
  7389.         LD      E,(IX+#00)
  7390.         LD      D,(IX+#01)
  7391.         CALL    L_D77F
  7392.         POP     BC
  7393.         JR      Z,L_D7F6
  7394.         DJNZ    L_D7DA
  7395.         LD      A,(L_9478)
  7396.         AND     #01
  7397.         ADD     A,#08
  7398.         CALL    L_94CD
  7399.         JP      L_95E5
  7400. ;
  7401. L_D7F6  CALL    L_C33C
  7402.         LD      A,#01
  7403.         CALL    L_94CD
  7404.         CALL    L_AAE5
  7405.         CALL    L_95E5
  7406.         CALL    CountXYtoxy_DE
  7407.         XOR     A
  7408.         LD      (L_9AA6),A
  7409.         LD      A,#01
  7410.         LD      C,#47
  7411.         JP      L_9A82
  7412. ;
  7413.        DB       #00,#00,#00,#00,#00,#00,#00,#00       ;........
  7414.        DB       #00,#1C,#1C,#1C,#1C,#00,#1C,#00       ;........
  7415.        DB       #00,#77,#77,#00,#00,#00,#00,#00       ;.ww.....
  7416.        DB       #00,#24,#7E,#24,#24,#7E,#24,#00       ;.$~$$~$.
  7417.        DB       #18,#18,#5A,#58,#18,#5A,#18,#18       ;..ZX.Z..
  7418.        DB       #00,#60,#4E,#1C,#38,#72,#06,#00       ;.`N.8r..
  7419.        DB       #00,#00,#00,#00,#00,#00,#00,#00       ;........
  7420.        DB       #00,#38,#38,#70,#00,#00,#00,#00       ;.88p....
  7421.        DB       #00,#1C,#38,#38,#38,#38,#1C,#00       ;..8888..
  7422.        DB       #00,#38,#1C,#1C,#1C,#1C,#38,#00       ;.8....8.
  7423.        DB       #00,#00,#00,#00,#00,#00,#00,#00       ;........
  7424.        DB       #00,#1C,#1C,#7F,#1C,#1C,#00,#00       ;........
  7425.        DB       #00,#00,#00,#00,#00,#38,#38,#70       ;.....88p
  7426.        DB       #00,#00,#00,#7E,#00,#00,#00,#00       ;...~....
  7427.        DB       #00,#00,#00,#00,#38,#38,#38,#00       ;....888.
  7428.        DB       #00,#00,#0E,#1C,#38,#70,#00,#00       ;....8p..
  7429.        DB       #00,#3C,#72,#76,#7A,#72,#3C,#00       ;.<rvzr<.
  7430.        DB       #00,#1C,#3C,#1C,#1C,#1C,#1C,#00       ;..<.....
  7431.        DB       #00,#3C,#5E,#1E,#7C,#70,#7E,#00       ;.<^.|p~.
  7432.        DB       #00,#7C,#1E,#3C,#1E,#1E,#7C,#00       ;.|.<..|.
  7433.        DB       #00,#70,#74,#74,#7E,#7E,#04,#00       ;.ptt~~..
  7434.        DB       #00,#7E,#70,#7C,#1E,#1E,#7C,#00       ;.~p|..|.
  7435.        DB       #00,#3C,#70,#7C,#72,#72,#3C,#00       ;.<p|rr<.
  7436.        DB       #00,#7E,#1E,#1E,#3C,#78,#70,#00       ;.~..<xp.
  7437.        DB       #00,#3C,#72,#7C,#32,#72,#3C,#00       ;.<r|2r<.
  7438.        DB       #00,#3C,#72,#72,#3E,#1E,#7C,#00       ;.<rr>.|.
  7439.        DB       #00,#38,#38,#00,#00,#38,#38,#00       ;.88..88.
  7440.        DB       #00,#00,#38,#38,#00,#38,#38,#70       ;..88.88p
  7441.        DB       #00,#0E,#1C,#38,#70,#38,#1C,#0E       ;...8p8..
  7442.        DB       #00,#00,#7E,#00,#00,#7E,#00,#00       ;..~..~..
  7443.        DB       #00,#70,#38,#1C,#0E,#1C,#38,#70       ;.p8...8p
  7444.        DB       #00,#7C,#EE,#0E,#3C,#70,#00,#70       ;.|n.<p.p
  7445.        DB       #00,#38,#44,#54,#54,#5C,#40,#3C       ;.8DTT\@<
  7446.        DB       #00,#3C,#72,#72,#7E,#72,#72,#00       ;.<rr~rr.
  7447.        DB       #00,#7C,#72,#7C,#72,#72,#7C,#00       ;.|r|rr|.
  7448.        DB       #00,#3C,#72,#70,#70,#72,#3C,#00       ;.<rppr<.
  7449.        DB       #00,#7C,#72,#72,#72,#72,#7E,#00       ;.|rrrr~.
  7450.        DB       #00,#7E,#70,#7C,#70,#70,#7E,#00       ;.~p|pp~.
  7451.        DB       #00,#7E,#70,#7C,#70,#70,#70,#00       ;.~p|ppp.
  7452.        DB       #00,#3C,#72,#70,#76,#72,#3C,#00       ;.<rpvr<.
  7453.        DB       #00,#72,#72,#7E,#72,#72,#72,#00       ;.rr~rrr.
  7454.        DB       #00,#7C,#38,#38,#38,#38,#7C,#00       ;.|8888|.
  7455.        DB       #00,#7C,#38,#38,#38,#38,#70,#00       ;.|8888p.
  7456.        DB       #00,#72,#74,#78,#78,#74,#72,#00       ;.rtxxtr.
  7457.        DB       #00,#70,#70,#70,#70,#70,#7E,#00       ;.ppppp~.
  7458.        DB       #00,#72,#7E,#72,#72,#72,#72,#00       ;.r~rrrr.
  7459.        DB       #00,#72,#7A,#76,#72,#72,#72,#00       ;.rzvrrr.
  7460.        DB       #00,#3C,#72,#72,#72,#72,#3C,#00       ;.<rrrr<.
  7461.        DB       #00,#7C,#72,#72,#7C,#70,#70,#00       ;.|rr|pp.
  7462.        DB       #00,#3C,#72,#72,#72,#74,#3A,#00       ;.<rrrt:.
  7463.        DB       #00,#7C,#72,#72,#7C,#74,#72,#00       ;.|rr|tr.
  7464.        DB       #00,#3C,#72,#78,#3C,#5E,#3C,#00       ;.<rx<^<.
  7465.        DB       #00,#7C,#38,#38,#38,#38,#38,#00       ;.|88888.
  7466.        DB       #00,#72,#72,#72,#72,#72,#3C,#00       ;.rrrrr<.
  7467.        DB       #00,#72,#72,#72,#72,#34,#18,#00       ;.rrrr4..
  7468.        DB       #00,#72,#72,#72,#72,#7E,#72,#00       ;.rrrr~r.
  7469.        DB       #00,#42,#66,#3C,#18,#3C,#66,#00       ;.Bf<.<f.
  7470.        DB       #00,#44,#28,#38,#38,#38,#38,#00       ;.D(8888.
  7471.        DB       #00,#7E,#1E,#3C,#78,#70,#7E,#00       ;.~.<xp~.
  7472.        DB       #FF,#80,#BD,#B4,#BD,#9C,#9D,#BC       ;..=4=..<
  7473.        DB       #9D,#BC,#BD,#B8,#B9,#BC,#BD,#B8       ;.<=89<=8
  7474.        DB       #BD,#BC,#BD,#9C,#9D,#BC,#BD,#BC       ;=<=..<=<
  7475.        DB       #B9,#BC,#BD,#8C,#BD,#80,#D5,#00       ;9<=.=.U.
  7476.        DB       #00,#33,#44,#24,#14,#54,#23,#00       ;.3D$.T#.
  7477.        DB       #00,#26,#55,#56,#55,#55,#25,#00       ;.&UVUU%.
  7478.        DB       #00,#70,#40,#60,#40,#40,#70,#00       ;.p@`@@p.
  7479.        DB       #00,#62,#55,#65,#55,#55,#62,#00       ;.bUeUUb.
  7480.        DB       #00,#55,#55,#75,#55,#55,#57,#00       ;.UUuUUW.
  7481.        DB       #00,#30,#40,#20,#10,#50,#20,#00       ;.0@ .P .
  7482.        DB       #00,#75,#45,#65,#45,#45,#45,#00       ;.uEeEEE.
  7483.        DB       #00,#9D,#51,#99,#51,#51,#5D,#00       ;..Q.QQ].
  7484.        DB       #00,#89,#55,#9D,#55,#55,#95,#00       ;..U.UU..
  7485.        DB       #00,#10,#11,#10,#10,#11,#DC,#00       ;......\.
  7486.        DB       #00,#C0,#00,#80,#40,#40,#80,#00       ;.@..@@..
  7487.        DB       #00,#45,#45,#45,#45,#45,#74,#00       ;.EEEEEt.
  7488.        DB       #00,#5C,#51,#58,#50,#51,#9C,#00       ;.\QXPQ..
  7489.        DB       #00,#C0,#00,#80,#40,#40,#80,#00       ;.@..@@..
  7490.        DB       #00,#00,#00,#00,#00,#00,#00,#00       ;........
  7491.        DB       #00,#00,#01,#07,#0F,#1F,#1F,#3F       ;.......?
  7492.        DB       #00,#00,#FE,#FF,#FF,#FF,#87,#03       ;..~.....
  7493.        DB       #00,#00,#00,#80,#C0,#E0,#E0,#F0       ;....@``p
  7494.        DB       #00,#00,#00,#00,#00,#00,#00,#00       ;........
  7495.        DB       #1F,#1F,#1F,#1F,#1F,#1F,#1F,#1F       ;........
  7496.        DB       #00,#E0,#C0,#C0,#C0,#C0,#C0,#C0       ;.`@@@@@@
  7497.        DB       #00,#00,#00,#00,#00,#00,#00,#00       ;........
  7498.        DB       #00,#00,#00,#00,#00,#00,#00,#00       ;........
  7499.        DB       #3F,#3F,#3F,#1F,#1F,#07,#01,#F0       ;???....p
  7500.        DB       #03,#00,#80,#C0,#FC,#FF,#FF,#3F       ;...@|..?
  7501.        DB       #F0,#F0,#01,#03,#03,#87,#C7,#E7       ;pp....Gg
  7502.        DB       #3F,#FF,#FF,#FF,#FE,#FC,#FC,#FC       ;?...~|||
  7503.        DB       #9F,#EF,#F7,#F7,#3B,#3B,#3B,#3B       ;.oww;;;;
  7504.        DB       #80,#80,#80,#80,#80,#80,#80,#80       ;........
  7505.        DB       #07,#1F,#3F,#7F,#7F,#FF,#FF,#FF       ;..?.....
  7506.        DB       #F3,#FD,#FE,#FE,#C7,#87,#87,#87       ;s}~~G...
  7507.        DB       #FE,#FE,#FE,#FF,#7F,#7F,#3F,#1F       ;~~~...?.
  7508.        DB       #0F,#07,#07,#07,#8F,#FF,#FF,#FF       ;........
  7509.        DB       #E7,#F7,#F7,#F7,#F3,#E3,#E1,#C0       ;gwwwsca@
  7510.        DB       #F8,#F8,#F8,#F8,#FF,#FF,#FF,#7F       ;xxxx....
  7511.        DB       #7B,#7B,#7B,#F7,#F7,#EF,#DF,#1F       ;{{{wwo_.
  7512.        DB       #00,#00,#01,#03,#0F,#FF,#FF,#FF       ;........
  7513.        DB       #FF,#FF,#7F,#7F,#7F,#7F,#3F,#0F       ;......?.
  7514.        DB       #0F,#0F,#0F,#1E,#FE,#FD,#FB,#E3       ;....~}{c
  7515.        DB       #00,#00,#00,#00,#00,#00,#00,#00       ;........
  7516.        DB       #00,#00,#00,#00,#00,#00,#00,#00       ;........
  7517.        DB       #00,#00,#00,#00,#00,#00,#00,#00       ;........
  7518.        DB       #00,#00,#00,#00,#00,#00,#00,#00       ;........
  7519.        DB       #00,#00,#00,#00,#00,#00,#00,#00       ;........
  7520.        DB       #00,#00,#00,#0E,#0E,#0E,#1C,#00       ;........
  7521.        DB       #00,#00,#00,#00,#00,#00,#00,#00       ;........
  7522.        DB       #00,#00,#00,#00,#00,#00,#00,#00       ;........
  7523.        DB       #E0,#E0,#F1,#F1,#7B,#7B,#7F,#7F       ;``qq{{..
  7524.        DB       #F8,#F8,#F9,#FB,#FB,#F7,#F7,#F7       ;xxy{{www
  7525.        DB       #3F,#FF,#FF,#FF,#FE,#FC,#FC,#FC       ;?...~|||
  7526.        DB       #8F,#EF,#F7,#F7,#3B,#3B,#3B,#3B       ;.oww;;;;
  7527.        DB       #00,#80,#80,#C0,#E0,#E0,#F0,#F8       ;...@``px
  7528.        DB       #F1,#E7,#EF,#EF,#EF,#EF,#EF,#E7       ;qgooooog
  7529.        DB       #FC,#FF,#FF,#9F,#0F,#00,#C0,#F8       ;|.....@x
  7530.        DB       #00,#00,#00,#80,#80,#00,#00,#00       ;........
  7531.        DB       #7F,#7F,#6E,#EE,#C4,#C4,#80,#80       ;..nnDD..
  7532.        DB       #F7,#F7,#F7,#F7,#7B,#7B,#3D,#3C       ;wwww{{=<
  7533.        DB       #F8,#F8,#F8,#F8,#FF,#FF,#FF,#7F       ;xxxx....
  7534.        DB       #7B,#7B,#7B,#F7,#F7,#EF,#DF,#1F       ;{{{wwo_.
  7535.        DB       #F9,#FD,#BF,#1F,#0F,#07,#03,#01       ;y}?.....
  7536.        DB       #C3,#C0,#DE,#DE,#DF,#DF,#CF,#C3       ;C@^^__OC
  7537.        DB       #FC,#7E,#1E,#0F,#1F,#FF,#FE,#F8       ;|~....~x
  7538.        DB       #00,#00,#00,#00,#00,#00,#00,#00       ;........
  7539.        DB       #07,#00,#00,#00,#00,#00,#00,#00       ;........
  7540.        DB       #FF,#FE,#00,#00,#00,#00,#00,#00       ;.~......
  7541.        DB       #80,#00,#00,#00,#00,#00,#00,#00       ;........
  7542.        DB       #07,#07,#07,#07,#0F,#0F,#0F,#0F       ;........
  7543.        DB       #F0,#F0,#F1,#E3,#E7,#EF,#FF,#FF       ;ppqcgo..
  7544.        DB       #7E,#FC,#F8,#F1,#E1,#C1,#81,#01       ;~|xqaA..
  7545.        DB       #FF,#FF,#FF,#FF,#FF,#FC,#FC,#FC       ;.....|||
  7546.        DB       #FE,#FE,#FD,#FD,#FD,#01,#00,#00       ;~~}}}...
  7547.        DB       #F8,#F8,#FC,#FC,#FE,#FF,#FF,#7F       ;xx||~...
  7548.        DB       #3F,#3F,#7F,#7F,#FF,#FE,#FC,#F8       ;??...~|x
  7549.        DB       #F0,#E0,#C0,#80,#00,#00,#00,#00       ;p`@.....
  7550.        DB       #0F,#0F,#0F,#0F,#1F,#1F,#1F,#1F       ;........
  7551.        DB       #FE,#FC,#F8,#F0,#E0,#C0,#E0,#F0       ;~|xp`@`p
  7552.        DB       #01,#03,#03,#03,#03,#03,#03,#07       ;........
  7553.        DB       #FC,#F8,#FF,#FF,#FF,#FF,#F8,#F0       ;|x....xp
  7554.        DB       #00,#00,#F8,#F0,#F0,#F0,#00,#00       ;..xppp..
  7555.        DB       #3F,#1F,#0F,#0F,#0F,#1F,#1F,#1F       ;?.......
  7556.        DB       #F0,#E0,#E0,#E0,#E0,#E0,#E0,#E0       ;p```````
  7557.        DB       #00,#00,#00,#00,#00,#00,#00,#00       ;........
  7558.        DB       #1F,#1F,#1F,#1F,#3F,#3F,#3F,#3F       ;....????
  7559.        DB       #F8,#FC,#FE,#BF,#9F,#0F,#07,#03       ;x|~?....
  7560.        DB       #07,#07,#07,#07,#87,#CF,#EF,#F7       ;.....Oow
  7561.        DB       #F0,#F0,#F0,#FF,#FF,#FF,#FF,#FF       ;ppp.....
  7562.        DB       #00,#00,#00,#F0,#F0,#F0,#E0,#E0       ;...ppp``
  7563.        DB       #3F,#3F,#3F,#7F,#7F,#7F,#FF,#FF       ;???.....
  7564.        DB       #E0,#E0,#E0,#E0,#E0,#E0,#E0,#E0       ;````````
  7565.        DB       #00,#00,#00,#00,#00,#00,#00,#00       ;........
  7566. ;
  7567. L_DCDA       DB       #38,#20,#07,#0F,#0F,#1F,#1F,#1F
  7568.        DB       #7E,#1E,#8E,#CE,#C6,#E6,#E6,#E6
  7569.        DB       #70,#40,#0F,#1F,#3F,#3F,#7F,#7F
  7570.        DB       #FF,#3E,#1C,#9C,#F8,#F9,#F9,#F9
  7571.        DB       #87,#01,#78,#FC,#FC,#FE,#FE,#FE
  7572.        DB       #E7,#E4,#E0,#E1,#63,#63,#67,#67
  7573.        DB       #0F,#03,#F1,#F9,#F8,#FC,#FC,#FC
  7574.        DB       #FC,#F0,#E3,#E7,#CF,#CF,#C0,#C0
  7575.        DB       #0F,#0F,#07,#20,#38,#3F,#3F,#3F
  7576.        DB       #C6,#CE,#8E,#1E,#7E,#FE,#FE,#FE
  7577.        DB       #7F,#7F,#7F,#7F,#7F,#7F,#7F,#7F
  7578.        DB       #F9,#F9,#F9,#F8,#FC,#FC,#FE,#FF
  7579.        DB       #FE,#FE,#FE,#FC,#FC,#78,#01,#87
  7580.        DB       #67,#67,#63,#63,#E1,#E0,#E4,#E7
  7581.        DB       #FC,#FC,#FC,#F8,#F9,#F1,#03,#0F
  7582.        DB       #CF,#CF,#CF,#CF,#E7,#E3,#F0,#FC
  7583.        DB       #1F,#07,#E3,#F3,#F9,#F9,#01,#01
  7584.        DB       #FF,#FF,#F9,#F9,#F3,#E3,#07,#1F
  7585.        DB       #FF,#FF,#00,#FF,#E7,#E7,#E7,#E7
  7586.        DB       #FF,#FF,#00,#FF,#C4,#ED,#ED,#FF
  7587.        DB       #FE,#FC,#01,#FA,#99,#5A,#D9,#FA
  7588.        DB       #FF,#FF,#00,#FF,#FF,#FF,#FF,#FF
  7589.        DB       #FF,#FF,#FF,#FF,#FF,#00,#55,#AA
  7590.        DB       #7F,#BF,#C0,#DF,#DF,#DF,#DF,#DF
  7591.        DB       #DF,#DF,#DF,#DF,#DF,#DF,#DF,#DF
  7592.        DB       #DF,#DF,#DF,#DF,#DF,#C0,#95,#2A
  7593.        DB       #F9,#FA,#F9,#FA,#F9,#FA,#F9,#FA
  7594.        DB       #F9,#FA,#F9,#FA,#F9,#02,#55,#AA
  7595.        DB       #FF,#FF,#FF,#FF,#FF,#00,#55,#AA
  7596. L_DDC2       DB       #00,#00,#7F,#FF,#7F,#00,#78,#00
  7597.        DB       #70,#00,#60,#00,#60,#00,#60,#00
  7598.        DB       #40,#00,#40,#00,#40,#00,#40,#00
  7599.        DB       #40,#00,#40,#00,#40,#00,#00,#00
  7600.        DB       #00,#00,#FF,#FE,#00,#00,#00,#00
  7601.        DB       #00,#00,#00,#00,#00,#02,#00,#00
  7602.        DB       #00,#02,#00,#00,#00,#02,#00,#00
  7603.        DB       #00,#0A,#00,#00,#02,#AA,#00,#00
  7604.        DB       #00,#00,#5F,#FE,#58,#3E,#5B,#DE
  7605.        DB       #5B,#DE,#5B,#DE,#5B,#DE,#58,#3E
  7606.        DB       #5A,#FE,#5B,#6E,#5B,#A6,#5B,#C2
  7607.        DB       #5B,#E6,#5F,#EE,#5F,#FE,#00,#00
  7608. L_DE22       DB       #00,#00,#00,#00,#00,#00,#00,#00
  7609.        DB       #00,#00,#00,#00,#00,#00,#00,#00
  7610.        DB       #00,#00,#00,#00,#00,#00,#00,#00
  7611.        DB       #00,#00,#00,#00,#00,#00,#00,#00
  7612.        DB       #3F,#FE,#7F,#FC,#AA,#AA,#F7,#D4
  7613.        DB       #FB,#F2,#FF,#F4,#7F,#E2,#FF,#D4
  7614.        DB       #FF,#F2,#FF,#F4,#7F,#F2,#FF,#F4
  7615.        DB       #BF,#F2,#7B,#E4,#ED,#B0,#00,#00
  7616.        DB       #C0,#03,#80,#01,#00,#00,#00,#00
  7617.        DB       #00,#00,#00,#00,#00,#00,#00,#00
  7618.        DB       #00,#00,#00,#00,#00,#00,#00,#00
  7619.        DB       #00,#00,#00,#00,#00,#00,#00,#00
  7620.        DB       #07,#E0,#18,#18,#27,#E4,#44,#22
  7621.        DB       #44,#22,#BF,#FD,#A1,#09,#A1,#09
  7622.        DB       #BF,#FD,#84,#21,#84,#21,#BF,#FD
  7623.        DB       #A1,#09,#A1,#09,#BF,#FD,#80,#01
  7624.        DB       #E0,#00,#E0,#00,#C0,#00,#C0,#00
  7625.        DB       #C0,#00,#80,#01,#80,#00,#00,#00
  7626.        DB       #00,#00,#00,#01,#00,#01,#04,#03
  7627.        DB       #00,#01,#00,#00,#08,#00,#F8,#00
  7628.        DB       #07,#F8,#0B,#FF,#0F,#00,#10,#EE
  7629.        DB       #03,#F8,#08,#00,#37,#FC,#2F,#FE
  7630.        DB       #5E,#00,#19,#F4,#61,#E8,#51,#E8
  7631.        DB       #30,#00,#E3,#F4,#03,#FA,#00,#00
  7632.        DB       #00,#00,#00,#00,#00,#00,#00,#00
  7633.        DB       #00,#00,#00,#00,#00,#00,#00,#00
  7634.        DB       #00,#00,#00,#00,#00,#00,#00,#00
  7635.        DB       #00,#00,#00,#00,#00,#00,#00,#00
  7636.        DB       #3F,#FE,#7F,#FC,#AA,#AA,#F7,#D4
  7637.        DB       #EB,#F2,#FF,#F4,#3F,#F2,#9F,#34
  7638.        DB       #C8,#72,#E1,#B4,#79,#D2,#F4,#F4
  7639.        DB       #A6,#72,#6B,#24,#C5,#10,#00,#00
  7640.        DB       #C0,#0F,#00,#0F,#00,#03,#00,#03
  7641.        DB       #00,#03,#00,#07,#80,#01,#00,#01
  7642.        DB       #00,#00,#00,#00,#80,#00,#80,#00
  7643.        DB       #C0,#00,#80,#00,#00,#00,#00,#10
  7644.        DB       #07,#E0,#1F,#C0,#FF,#C0,#00,#F8
  7645.        DB       #77,#00,#1F,#C0,#00,#10,#3F,#EC
  7646.        DB       #7F,#74,#00,#76,#2F,#06,#17,#76
  7647.        DB       #17,#6E,#00,#0E,#2F,#C7,#5F,#C0
  7648.        DB       #00,#07,#00,#07,#00,#03,#00,#03
  7649.        DB       #00,#03,#80,#01,#00,#01,#00,#00
  7650.        DB       #00,#00,#80,#00,#80,#00,#C0,#20
  7651.        DB       #80,#00,#00,#00,#00,#10,#00,#1F
  7652.        DB       #1F,#E0,#FF,#D0,#00,#F0,#77,#08
  7653.        DB       #1F,#C0,#00,#10,#3F,#EC,#7F,#F4
  7654.        DB       #00,#7A,#2F,#98,#17,#86,#17,#8A
  7655.        DB       #00,#0C,#2F,#C7,#5F,#C0,#00,#00
  7656.        DB       #FE,#3F,#FE,#0F,#FE,#0F,#F8,#0F
  7657.        DB       #F8,#07,#E0,#07,#E0,#07,#E0,#01
  7658.        DB       #E0,#01,#C0,#01,#C0,#01,#C0,#01
  7659.        DB       #C0,#01,#C0,#01,#E0,#03,#F8,#03
  7660.        DB       #00,#80,#00,#80,#00,#A0,#00,#20
  7661.        DB       #02,#20,#02,#90,#0A,#90,#0A,#E0
  7662.        DB       #09,#C4,#0D,#D4,#15,#D4,#0F,#F0
  7663.        DB       #13,#F4,#0B,#E0,#01,#C8,#02,#40
  7664.        DB       #FF,#FF,#FE,#3F,#F8,#3F,#F8,#0F
  7665.        DB       #F0,#0F,#F0,#03,#F0,#03,#C0,#03
  7666.        DB       #C0,#01,#C0,#01,#C0,#01,#C0,#01
  7667.        DB       #E0,#01,#E0,#03,#E0,#03,#E0,#0F
  7668.        DB       #00,#00,#00,#00,#00,#80,#02,#80
  7669.        DB       #00,#A0,#04,#A0,#04,#A8,#01,#A8
  7670.        DB       #13,#48,#13,#D4,#17,#F0,#07,#E4
  7671.        DB       #0F,#F0,#03,#E8,#0B,#C0,#01,#20
  7672.        DB       #FC,#7F,#FC,#7F,#F8,#3F,#F8,#3F
  7673.        DB       #F0,#1F,#F0,#1F,#C0,#07,#00,#01
  7674.        DB       #00,#01,#00,#01,#C0,#07,#F0,#1F
  7675.        DB       #F0,#1F,#F8,#3F,#F8,#3F,#FC,#7F
  7676.        DB       #00,#00,#01,#00,#01,#00,#03,#80
  7677.        DB       #03,#80,#07,#C0,#07,#C0,#1F,#F0
  7678.        DB       #7F,#FC,#1F,#F0,#07,#C0,#07,#C0
  7679.        DB       #03,#80,#03,#80,#01,#00,#01,#00
  7680.        DB       #FF,#FF,#FF,#FF,#8F,#E3,#83,#83
  7681.        DB       #80,#03,#C0,#07,#C0,#07,#E0,#0F
  7682.        DB       #E0,#0F,#E0,#0F,#C0,#07,#C0,#07
  7683.        DB       #80,#03,#83,#83,#8F,#E3,#FF,#FF
  7684.        DB       #00,#00,#00,#00,#00,#00,#20,#08
  7685.        DB       #18,#30,#1E,#F0,#0F,#E0,#0F,#E0
  7686.        DB       #07,#C0,#0F,#E0,#0F,#E0,#1E,#F0
  7687.        DB       #18,#30,#20,#08,#00,#00,#00,#00
  7688.        DB       #F8,#00,#F8,#00,#F8,#00,#30,#00
  7689.        DB       #00,#00,#00,#00,#00,#00,#00,#00
  7690.        DB       #00,#00,#00,#00,#00,#00,#00,#00
  7691.        DB       #00,#00,#00,#00,#80,#00,#E0,#7F
  7692.        DB       #01,#FC,#03,#FE,#01,#F0,#02,#F5
  7693.        DB       #87,#75,#D7,#B0,#F7,#DF,#77,#E0
  7694.        DB       #FB,#F6,#FC,#FB,#7F,#3B,#7F,#BB
  7695.        DB       #7F,#BB,#3F,#76,#0F,#00,#0C,#00
  7696.        DB       #00,#1F,#00,#1F,#00,#1F,#00,#0C
  7697.        DB       #00,#00,#00,#00,#00,#00,#00,#00
  7698.        DB       #00,#00,#00,#00,#00,#00,#00,#00
  7699.        DB       #00,#00,#00,#00,#00,#01,#FE,#07
  7700.        DB       #3F,#80,#7F,#C0,#0F,#80,#AF,#40
  7701.        DB       #AE,#E1,#0D,#EB,#FB,#EF,#07,#EE
  7702.        DB       #6F,#DF,#DF,#3F,#DC,#FE,#DD,#FE
  7703.        DB       #DD,#FE,#6E,#FC,#00,#F0,#00,#30
  7704.        DB       #00,#00,#00,#00,#00,#00,#00,#00
  7705.        DB       #00,#00,#00,#00,#00,#00,#00,#00
  7706.        DB       #00,#00,#00,#00,#00,#00,#00,#00
  7707.        DB       #80,#01,#80,#01,#C0,#03,#E0,#07
  7708.        DB       #87,#E1,#5F,#FA,#2F,#F4,#57,#EA
  7709.        DB       #6B,#D2,#DB,#DB,#CB,#D3,#D3,#CB
  7710.        DB       #D9,#9B,#6D,#B6,#75,#AE,#38,#0C
  7711.        DB       #3B,#DC,#1A,#58,#0C,#30,#07,#E0
  7712.        DB       #C0,#00,#80,#00,#00,#01,#00,#00
  7713.        DB       #00,#00,#00,#00,#00,#00,#00,#00
  7714.        DB       #00,#00,#00,#00,#00,#00,#80,#00
  7715.        DB       #C0,#01,#E0,#01,#E0,#03,#F0,#03
  7716.        DB       #13,#F2,#0B,#E4,#35,#C8,#7A,#D4
  7717.        DB       #7A,#D6,#F8,#C6,#F3,#F3,#F5,#CB
  7718.        DB       #F6,#DB,#7B,#36,#3C,#CE,#1C,#0C
  7719.        DB       #0D,#EC,#0D,#28,#04,#18,#07,#F0
  7720.        DB       #80,#07,#00,#07,#00,#07,#00,#07
  7721.        DB       #00,#03,#00,#03,#00,#03,#00,#01
  7722.        DB       #00,#01,#80,#01,#80,#01,#C0,#01
  7723.        DB       #E0,#01,#F0,#01,#F8,#03,#FC,#03
  7724.        DB       #0F,#30,#3F,#40,#7F,#A0,#FF,#F0
  7725.        DB       #FF,#F0,#FF,#98,#7F,#A8,#7F,#D0
  7726.        DB       #3F,#E4,#3F,#FC,#1F,#FC,#0F,#C4
  7727.        DB       #07,#D4,#03,#D0,#01,#D8,#01,#F8
  7728.        DB       #C0,#00,#80,#00,#00,#01,#00,#00
  7729.        DB       #00,#00,#00,#00,#00,#00,#00,#00
  7730.        DB       #00,#00,#00,#00,#00,#00,#80,#00
  7731.        DB       #C0,#01,#E0,#01,#E0,#03,#F0,#03
  7732.        DB       #13,#D2,#0F,#F4,#3F,#E8,#7F,#F4
  7733.        DB       #7F,#FA,#FF,#FE,#FF,#FD,#FF,#FB
  7734.        DB       #FF,#FD,#7F,#FE,#3F,#FA,#1B,#EC
  7735.        DB       #0E,#B4,#0F,#F8,#07,#A8,#07,#50
  7736.        DB       #00,#00,#00,#00,#00,#00,#00,#00
  7737.        DB       #00,#00,#00,#00,#00,#00,#00,#00
  7738.        DB       #00,#00,#00,#00,#00,#00,#00,#00
  7739.        DB       #80,#01,#80,#01,#C0,#03,#E0,#07
  7740.        DB       #87,#E1,#5F,#DA,#3F,#F4,#7F,#FA
  7741.        DB       #7F,#FE,#FF,#FB,#FF,#FD,#FF,#FF
  7742.        DB       #FF,#FD,#7F,#FE,#7F,#FA,#2F,#EC
  7743.        DB       #3A,#B4,#1F,#E8,#0F,#50,#06,#A0
  7744.        DB       #00,#03,#00,#01,#80,#00,#00,#00
  7745.        DB       #00,#00,#00,#00,#00,#00,#00,#00
  7746.        DB       #00,#00,#00,#00,#00,#00,#00,#01
  7747.        DB       #80,#03,#80,#07,#C0,#07,#C0,#0F
  7748.        DB       #4F,#C8,#2F,#B0,#1F,#EC,#3F,#F6
  7749.        DB       #7F,#FA,#7F,#FB,#FF,#FD,#FF,#FB
  7750.        DB       #FF,#FD,#7F,#FA,#7F,#F4,#37,#C8
  7751.        DB       #3D,#70,#1F,#D0,#1F,#60,#0E,#A0
  7752.        DB       #E0,#01,#E0,#00,#E0,#00,#E0,#00
  7753.        DB       #C0,#00,#C0,#00,#C0,#00,#80,#00
  7754.        DB       #80,#00,#80,#01,#80,#01,#80,#03
  7755.        DB       #80,#07,#80,#0F,#C0,#1F,#C0,#3F
  7756.        DB       #0C,#F0,#02,#EC,#05,#FA,#0F,#FD
  7757.        DB       #0F,#FB,#19,#FD,#15,#FA,#0B,#FA
  7758.        DB       #27,#FC,#3F,#F4,#3F,#E8,#23,#D0
  7759.        DB       #2B,#A0,#0B,#40,#1B,#80,#1E,#80
  7760.        DB       #00,#03,#00,#01,#80,#00,#00,#00
  7761.        DB       #00,#00,#00,#00,#00,#00,#00,#00
  7762.        DB       #00,#00,#00,#00,#00,#00,#00,#01
  7763.        DB       #80,#03,#80,#07,#C0,#07,#C0,#0F
  7764.        DB       #4F,#C8,#27,#D0,#13,#AC,#2B,#5A
  7765.        DB       #6B,#5C,#63,#1F,#CF,#CD,#D3,#AF
  7766.        DB       #DB,#6D,#6C,#DA,#73,#34,#30,#38
  7767.        DB       #37,#B0,#14,#B0,#18,#20,#0F,#E0
  7768.        DB       #FC,#1F,#F8,#0F,#F0,#07,#80,#03
  7769.        DB       #00,#00,#00,#00,#00,#00,#00,#00
  7770.        DB       #00,#03,#00,#03,#00,#03,#00,#01
  7771.        DB       #00,#01,#00,#01,#00,#01,#80,#03
  7772.        DB       #00,#C0,#01,#00,#03,#E0,#04,#30
  7773.        DB       #26,#D8,#63,#0F,#67,#FF,#CF,#80
  7774.        DB       #CF,#F0,#CC,#78,#E3,#88,#77,#C0
  7775.        DB       #77,#CC,#7B,#DC,#3D,#F8,#1C,#70
  7776.        DB       #FC,#1F,#F8,#0F,#F0,#07,#80,#03
  7777.        DB       #00,#00,#00,#00,#00,#00,#00,#00
  7778.        DB       #00,#03,#00,#03,#00,#03,#00,#03
  7779.        DB       #00,#1F,#00,#03,#00,#01,#80,#01
  7780.        DB       #00,#C0,#01,#00,#03,#E0,#04,#30
  7781.        DB       #26,#D8,#63,#0F,#67,#FF,#CF,#80
  7782.        DB       #CF,#F0,#CC,#78,#E3,#88,#77,#C0
  7783.        DB       #77,#C0,#7B,#80,#3D,#F8,#1C,#FC
  7784.        DB       #FC,#1F,#F8,#0F,#F0,#07,#C0,#03
  7785.        DB       #80,#00,#80,#00,#00,#00,#00,#00
  7786.        DB       #00,#03,#00,#03,#00,#03,#00,#03
  7787.        DB       #00,#1F,#80,#07,#80,#03,#80,#03
  7788.        DB       #00,#C0,#01,#00,#03,#E0,#04,#30
  7789.        DB       #16,#D8,#33,#0F,#37,#FF,#6F,#80
  7790.        DB       #6F,#F0,#6C,#78,#63,#88,#77,#C0
  7791.        DB       #37,#C0,#3B,#80,#3D,#F0,#1D,#F8
  7792.        DB       #F8,#3F,#F0,#1F,#E0,#0F,#C0,#01
  7793.        DB       #00,#00,#00,#00,#00,#00,#00,#00
  7794.        DB       #C0,#00,#C0,#00,#C0,#00,#80,#00
  7795.        DB       #80,#00,#80,#00,#80,#00,#C0,#01
  7796.        DB       #03,#00,#00,#80,#07,#C0,#0C,#20
  7797.        DB       #1B,#64,#F0,#C6,#FF,#E6,#01,#F3
  7798.        DB       #0F,#F3,#1E,#33,#11,#C7,#03,#EE
  7799.        DB       #33,#EE,#3B,#DE,#1F,#BC,#0E,#38
  7800.        DB       #F8,#3F,#F0,#1F,#E0,#0F,#C0,#01
  7801.        DB       #00,#00,#00,#00,#00,#00,#00,#00
  7802.        DB       #C0,#00,#C0,#00,#C0,#00,#C0,#00
  7803.        DB       #F8,#00,#C0,#00,#80,#00,#80,#01
  7804.        DB       #03,#00,#00,#80,#07,#C0,#0C,#20
  7805.        DB       #1B,#64,#F0,#C6,#FF,#E6,#01,#F3
  7806.        DB       #0F,#F3,#1E,#33,#11,#C7,#03,#EE
  7807.        DB       #03,#EE,#01,#DE,#1F,#BC,#3F,#38
  7808.        DB       #F8,#3F,#F0,#1F,#E0,#0F,#C0,#03
  7809.        DB       #00,#01,#00,#01,#00,#00,#00,#00
  7810.        DB       #C0,#00,#C0,#00,#C0,#00,#C0,#00
  7811.        DB       #F8,#00,#E0,#01,#C0,#01,#C0,#01
  7812.        DB       #03,#00,#00,#80,#07,#C0,#0C,#20
  7813.        DB       #1B,#68,#F0,#CC,#FF,#EC,#01,#F6
  7814.        DB       #0F,#F6,#1E,#36,#11,#C6,#03,#EE
  7815.        DB       #03,#EC,#01,#DC,#0F,#BC,#1F,#B8
  7816.        DB       #FE,#3F,#F0,#07,#F0,#07,#E0,#07
  7817.        DB       #00,#00,#00,#00,#00,#00,#00,#00
  7818.        DB       #80,#07,#E0,#07,#E0,#0F,#E0,#0F
  7819.        DB       #FC,#7F,#FF,#FF,#FF,#FF,#FF,#FF
  7820.        DB       #00,#00,#00,#80,#04,#10,#00,#80
  7821.        DB       #0A,#50,#54,#0D,#B2,#9A,#28,#00
  7822.        DB       #05,#50,#00,#80,#08,#20,#01,#00
  7823.        DB       #00,#00,#00,#00,#00,#00,#00,#00
  7824.        DB       #FC,#0F,#E0,#0F,#C0,#07,#80,#07
  7825.        DB       #00,#00,#00,#00,#00,#00,#00,#00
  7826.        DB       #E0,#07,#F0,#07,#F0,#07,#FE,#3F
  7827.        DB       #FF,#FF,#FF,#FF,#FF,#FF,#FF,#FF
  7828.        DB       #00,#00,#01,#20,#08,#80,#15,#50
  7829.        DB       #28,#80,#82,#AA,#55,#05,#0A,#50
  7830.        DB       #00,#80,#04,#50,#00,#80,#00,#00
  7831.        DB       #00,#00,#00,#00,#00,#00,#00,#00
  7832.        DB       #03,#C0,#00,#00,#00,#00,#00,#00
  7833.        DB       #00,#00,#00,#00,#00,#00,#00,#00
  7834.        DB       #00,#00,#00,#00,#00,#00,#00,#00
  7835.        DB       #00,#00,#C0,#03,#C0,#03,#C0,#03
  7836.        DB       #30,#0C,#40,#02,#FF,#FF,#E0,#07
  7837.        DB       #C7,#03,#CE,#0B,#DC,#1B,#D8,#3B
  7838.        DB       #D0,#73,#C0,#E3,#D1,#CB,#71,#8E
  7839.        DB       #15,#28,#14,#28,#14,#28,#1F,#F8
  7840.        DB       #C0,#03,#80,#01,#00,#00,#00,#00
  7841.        DB       #00,#00,#00,#00,#00,#00,#00,#00
  7842.        DB       #00,#00,#00,#00,#00,#00,#00,#00
  7843.        DB       #00,#00,#00,#00,#00,#00,#00,#00
  7844.        DB       #07,#E0,#18,#18,#23,#C4,#5B,#DA
  7845.        DB       #58,#1A,#BF,#FD,#8F,#8D,#EF,#05
  7846.        DB       #8F,#05,#BF,#05,#BF,#8D,#BF,#8D
  7847.        DB       #8F,#8D,#EF,#8D,#8F,#FD,#BF,#FD
  7848.        DB       #F0,#1F,#F0,#0F,#F0,#0F,#F0,#0F
  7849.        DB       #C0,#0F,#80,#0F,#80,#07,#80,#07
  7850.        DB       #80,#07,#80,#07,#80,#07,#80,#07
  7851.        DB       #80,#07,#F0,#0F,#F0,#0F,#F0,#0F
  7852.        DB       #03,#80,#07,#40,#07,#20,#07,#E0
  7853.        DB       #03,#C0,#1C,#00,#38,#E0,#33,#70
  7854.        DB       #37,#70,#37,#70,#37,#B0,#37,#70
  7855.        DB       #00,#00,#07,#80,#07,#E0,#07,#E0
  7856.        DB       #F0,#1F,#F0,#0F,#F0,#0F,#F0,#0F
  7857.        DB       #C0,#0F,#80,#0F,#80,#07,#80,#07
  7858.        DB       #80,#07,#80,#07,#80,#07,#80,#07
  7859.        DB       #80,#07,#C0,#07,#C0,#07,#C0,#07
  7860.        DB       #03,#80,#07,#40,#07,#20,#07,#E0
  7861.        DB       #03,#C0,#1C,#00,#3E,#60,#3D,#B0
  7862.        DB       #3B,#B0,#3B,#90,#3B,#D0,#3B,#90
  7863.        DB       #00,#00,#1E,#40,#1F,#B0,#1F,#B0
  7864.        DB       #F0,#1F,#F0,#0F,#F0,#0F,#F0,#0F
  7865.        DB       #C0,#0F,#80,#0F,#80,#07,#80,#07
  7866.        DB       #80,#07,#80,#07,#80,#07,#80,#07
  7867.        DB       #80,#07,#F0,#0F,#F0,#0F,#F0,#0F
  7868.        DB       #03,#80,#07,#40,#07,#20,#07,#E0
  7869.        DB       #03,#C0,#1C,#00,#38,#E0,#33,#70
  7870.        DB       #37,#70,#37,#70,#37,#B0,#37,#70
  7871.        DB       #00,#00,#07,#80,#07,#E0,#07,#E0
  7872.        DB       #F0,#1F,#F0,#0F,#F0,#0F,#F0,#0F
  7873.        DB       #C0,#0F,#80,#0F,#80,#07,#80,#07
  7874.        DB       #80,#07,#80,#07,#80,#07,#80,#07
  7875.        DB       #80,#07,#C0,#07,#C0,#07,#C0,#07
  7876.        DB       #03,#80,#07,#40,#07,#20,#07,#E0
  7877.        DB       #03,#C0,#1C,#00,#38,#E0,#37,#70
  7878.        DB       #2F,#70,#2E,#F0,#2F,#70,#2E,#F0
  7879.        DB       #00,#00,#1B,#C0,#1B,#F0,#1B,#F0
  7880.        DB       #F0,#1F,#F0,#0F,#F0,#0F,#F0,#0F
  7881.        DB       #C0,#0F,#80,#07,#80,#00,#80,#00
  7882.        DB       #80,#00,#80,#00,#80,#00,#80,#07
  7883.        DB       #80,#07,#F0,#0F,#F0,#0F,#F0,#0F
  7884.        DB       #03,#80,#07,#40,#07,#20,#07,#E0
  7885.        DB       #03,#C0,#1C,#00,#3F,#90,#3F,#67
  7886.        DB       #3E,#FF,#3E,#FF,#3F,#00,#3F,#F0
  7887.        DB       #00,#00,#07,#80,#07,#E0,#07,#E0
  7888.        DB       #00,#00,#00,#00,#00,#00,#00,#00
  7889.        DB       #00,#00,#00,#00,#00,#00,#00,#00
  7890.        DB       #00,#00,#C0,#03,#C0,#03,#C0,#00
  7891.        DB       #C0,#00,#C0,#00,#C0,#00,#C0,#7F
  7892.        DB       #33,#CC,#64,#26,#45,#A2,#A6,#65
  7893.        DB       #E2,#47,#CD,#B3,#DE,#7B,#5F,#FA
  7894.        DB       #1F,#F8,#1F,#F8,#1F,#C0,#1F,#B8
  7895.        DB       #00,#3E,#07,#3E,#1F,#00,#1F,#00
  7896.        DB       #F8,#0F,#F0,#0F,#F0,#0F,#F0,#0F
  7897.        DB       #F0,#03,#F0,#01,#E0,#01,#E0,#01
  7898.        DB       #E0,#01,#E0,#01,#E0,#01,#E0,#01
  7899.        DB       #E0,#01,#F0,#0F,#F0,#0F,#F0,#0F
  7900.        DB       #01,#C0,#02,#E0,#04,#E0,#07,#E0
  7901.        DB       #03,#C0,#00,#38,#07,#1C,#0E,#CC
  7902.        DB       #0E,#EC,#0E,#EC,#0D,#EC,#0E,#EC
  7903.        DB       #00,#00,#01,#E0,#07,#E0,#07,#E0
  7904.        DB       #F8,#0F,#F0,#0F,#F0,#0F,#F0,#0F
  7905.        DB       #F0,#03,#F0,#01,#E0,#01,#E0,#01
  7906.        DB       #E0,#01,#E0,#01,#E0,#01,#E0,#01
  7907.        DB       #E0,#01,#E0,#03,#E0,#03,#E0,#03
  7908.        DB       #01,#C0,#02,#E0,#04,#E0,#07,#E0
  7909.        DB       #03,#C0,#00,#38,#06,#7C,#0D,#BC
  7910.        DB       #0D,#DC,#09,#DC,#0B,#DC,#09,#DC
  7911.        DB       #00,#00,#02,#78,#0D,#F8,#0D,#F8
  7912.        DB       #F8,#0F,#F0,#0F,#F0,#0F,#F0,#0F
  7913.        DB       #F0,#03,#F0,#01,#E0,#01,#E0,#01
  7914.        DB       #E0,#01,#E0,#01,#E0,#01,#E0,#01
  7915.        DB       #E0,#01,#F0,#0F,#F0,#0F,#F0,#0F
  7916.        DB       #01,#C0,#02,#E0,#04,#E0,#07,#E0
  7917.        DB       #03,#C0,#00,#38,#07,#1C,#0E,#CC
  7918.        DB       #0E,#EC,#0E,#EC,#0D,#EC,#0E,#EC
  7919.        DB       #00,#00,#01,#E0,#07,#E0,#07,#E0
  7920.        DB       #F8,#0F,#F0,#0F,#F0,#0F,#F0,#0F
  7921.        DB       #F0,#03,#F0,#01,#E0,#01,#E0,#01
  7922.        DB       #E0,#01,#E0,#01,#E0,#01,#E0,#01
  7923.        DB       #E0,#01,#E0,#03,#E0,#03,#E0,#03
  7924.        DB       #01,#C0,#02,#E0,#04,#E0,#07,#E0
  7925.        DB       #03,#C0,#00,#38,#07,#1C,#0E,#EC
  7926.        DB       #0E,#F4,#0F,#74,#0E,#F4,#0F,#74
  7927.        DB       #00,#00,#03,#D8,#0F,#D8,#0F,#D8
  7928.        DB       #F8,#0F,#F0,#0F,#F0,#0F,#F0,#0F
  7929.        DB       #F0,#03,#E0,#01,#00,#01,#00,#01
  7930.        DB       #00,#01,#00,#01,#00,#01,#E0,#01
  7931.        DB       #E0,#01,#F0,#0F,#F0,#0F,#F0,#0F
  7932.        DB       #01,#C0,#02,#E0,#04,#E0,#07,#E0
  7933.        DB       #03,#C0,#00,#38,#09,#FC,#E6,#FC
  7934.        DB       #FF,#7C,#FF,#7C,#00,#FC,#0F,#FC
  7935.        DB       #00,#00,#01,#E0,#07,#E0,#07,#E0
  7936.        DB       #0F,#E0,#0F,#E0,#0F,#C0,#01,#80
  7937.        DB       #00,#00,#00,#00,#00,#00,#00,#00
  7938.        DB       #00,#01,#00,#03,#00,#03,#00,#03
  7939.        DB       #00,#03,#00,#01,#01,#80,#01,#80
  7940.        DB       #00,#07,#60,#08,#80,#08,#80,#1E
  7941.        DB       #9C,#39,#7E,#7D,#FF,#FF,#FF,#FC
  7942.        DB       #FB,#F8,#FD,#F8,#FD,#F8,#7D,#D8
  7943.        DB       #7B,#B8,#70,#38,#38,#1C,#7C,#3E
  7944.        DB       #FF,#E0,#87,#E0,#0F,#C0,#01,#80
  7945.        DB       #00,#00,#00,#00,#00,#00,#00,#00
  7946.        DB       #00,#01,#00,#03,#00,#03,#00,#03
  7947.        DB       #00,#07,#80,#07,#80,#03,#80,#03
  7948.        DB       #00,#0E,#00,#08,#60,#08,#80,#1E
  7949.        DB       #9C,#39,#7E,#7D,#FF,#FF,#FF,#FC
  7950.        DB       #FB,#F8,#FD,#F8,#7D,#F8,#7D,#B0
  7951.        DB       #3B,#70,#38,#60,#1C,#30,#3E,#F8
  7952.        DB       #07,#F0,#07,#F0,#03,#F0,#01,#80
  7953.        DB       #00,#00,#00,#00,#00,#00,#00,#00
  7954.        DB       #80,#00,#C0,#00,#C0,#00,#C0,#00
  7955.        DB       #C0,#00,#80,#00,#01,#80,#01,#80
  7956.        DB       #E0,#00,#10,#06,#88,#01,#78,#01
  7957.        DB       #9C,#39,#BE,#7E,#FF,#FF,#3F,#FF
  7958.        DB       #1F,#DF,#1F,#BF,#1F,#BF,#1B,#BE
  7959.        DB       #1D,#DE,#1C,#0E,#38,#1C,#7C,#3E
  7960.        DB       #07,#FF,#07,#F0,#03,#F0,#01,#80
  7961.        DB       #00,#00,#00,#00,#80,#00,#00,#00
  7962.        DB       #80,#00,#C0,#00,#E0,#00,#C0,#00
  7963.        DB       #E0,#00,#E0,#01,#C0,#01,#C0,#01
  7964.        DB       #70,#00,#10,#00,#10,#06,#78,#01
  7965.        DB       #9C,#39,#BE,#7E,#FF,#FF,#3F,#FF
  7966.        DB       #1F,#DF,#1F,#BF,#1F,#BE,#0D,#BE
  7967.        DB       #0E,#DC,#06,#1C,#0C,#38,#1F,#7C
  7968.        DB       #C4,#7F,#C4,#71,#80,#61,#80,#01
  7969.        DB       #80,#03,#C0,#07,#C0,#00,#00,#00
  7970.        DB       #00,#00,#00,#07,#C0,#03,#C0,#03
  7971.        DB       #84,#41,#84,#21,#8C,#31,#FE,#3F
  7972.        DB       #00,#00,#11,#00,#11,#04,#22,#08
  7973.        DB       #12,#70,#09,#80,#03,#C0,#1B,#CE
  7974.        DB       #63,#B0,#05,#80,#08,#60,#11,#18
  7975.        DB       #11,#08,#21,#04,#00,#80,#00,#00
  7976.        DB       #F8,#61,#88,#41,#00,#01,#00,#01
  7977.        DB       #00,#01,#00,#01,#00,#00,#00,#00
  7978.        DB       #80,#00,#C0,#01,#80,#01,#80,#01
  7979.        DB       #80,#01,#80,#07,#E1,#0F,#E3,#8F
  7980.        DB       #00,#00,#03,#0C,#21,#10,#50,#20
  7981.        DB       #09,#8C,#03,#D0,#47,#E0,#37,#E2
  7982.        DB       #07,#EC,#0B,#C0,#13,#80,#20,#2C
  7983.        DB       #24,#90,#04,#40,#08,#20,#00,#00
  7984.        DB       #F8,#7F,#C0,#7F,#80,#1F,#80,#1F
  7985.        DB       #80,#1F,#C0,#1F,#E0,#3F,#F0,#1F
  7986.        DB       #F8,#00,#FC,#00,#FE,#00,#FF,#00
  7987.        DB       #FF,#00,#FF,#00,#FF,#00,#FF,#00
  7988.        DB       #00,#00,#03,#00,#17,#00,#3A,#C0
  7989.        DB       #1D,#C0,#0E,#80,#07,#00,#03,#80
  7990.        DB       #01,#C0,#00,#FE,#00,#42,#00,#5A
  7991.        DB       #00,#5A,#00,#42,#00,#7E,#00,#00
  7992. L_EA22       DB       #F0,#03,#F0,#00,#C0,#00,#C0,#00
  7993.        DB       #C0,#00,#E0,#00,#80,#01,#80,#00
  7994.        DB       #00,#00,#00,#00,#00,#01,#00,#01
  7995.        DB       #00,#03,#00,#01,#00,#00,#08,#00
  7996.        DB       #07,#E0,#03,#F8,#03,#FF,#1F,#00
  7997.        DB       #00,#EE,#03,#F8,#08,#00,#37,#FC
  7998.        DB       #2E,#FE,#6E,#00,#60,#BC,#6E,#B8
  7999.        DB       #76,#B8,#70,#00,#E2,#FC,#02,#FE
  8000.        DB       #F0,#03,#F0,#00,#C0,#00,#C0,#00
  8001.        DB       #C0,#00,#E0,#00,#80,#01,#80,#00
  8002.        DB       #00,#00,#00,#00,#00,#01,#00,#01
  8003.        DB       #00,#01,#00,#01,#00,#01,#08,#03
  8004.        DB       #07,#E0,#03,#F8,#03,#FF,#1F,#00
  8005.        DB       #00,#EE,#03,#F8,#08,#00,#37,#FC
  8006.        DB       #36,#FE,#77,#00,#70,#F4,#77,#60
  8007.        DB       #73,#68,#70,#04,#E3,#F0,#03,#F8
  8008.        DB       #F0,#03,#F0,#00,#C0,#00,#C0,#00
  8009.        DB       #C0,#00,#E0,#00,#80,#01,#80,#00
  8010.        DB       #00,#00,#00,#00,#00,#01,#00,#01
  8011.        DB       #00,#03,#00,#01,#00,#01,#00,#01
  8012.        DB       #07,#E0,#03,#F8,#03,#FF,#1F,#00
  8013.        DB       #00,#EE,#03,#F8,#08,#00,#37,#FC
  8014.        DB       #36,#FE,#77,#00,#70,#6C,#73,#98
  8015.        DB       #75,#40,#70,#18,#EF,#DC,#0F,#E0
  8016.        DB       #F0,#03,#F0,#00,#C0,#00,#C0,#00
  8017.        DB       #C0,#00,#E0,#00,#80,#01,#80,#00
  8018.        DB       #00,#00,#00,#00,#00,#01,#00,#01
  8019.        DB       #00,#03,#00,#01,#00,#00,#00,#00
  8020.        DB       #07,#E0,#03,#F8,#03,#FF,#1F,#00
  8021.        DB       #00,#EE,#03,#F8,#08,#00,#37,#FC
  8022.        DB       #36,#FE,#77,#00,#70,#EC,#77,#58
  8023.        DB       #73,#18,#70,#80,#EF,#DC,#00,#3E
  8024.        DB       #F0,#03,#F0,#00,#C0,#00,#C0,#00
  8025.        DB       #C0,#00,#E0,#00,#80,#01,#80,#00
  8026.        DB       #00,#00,#00,#00,#00,#01,#00,#01
  8027.        DB       #00,#03,#00,#07,#00,#07,#08,#07
  8028.        DB       #07,#E0,#03,#F8,#03,#FF,#1F,#00
  8029.        DB       #00,#EE,#03,#F8,#08,#00,#37,#FC
  8030.        DB       #2E,#FE,#6E,#00,#60,#F4,#6E,#E8
  8031.        DB       #76,#10,#71,#E0,#E3,#F0,#00,#00
  8032.        DB       #F0,#03,#F0,#00,#C0,#00,#C0,#00
  8033.        DB       #C0,#00,#E0,#00,#80,#01,#80,#00
  8034.        DB       #00,#00,#00,#00,#00,#01,#00,#01
  8035.        DB       #00,#03,#00,#01,#00,#01,#08,#01
  8036.        DB       #07,#E0,#03,#F8,#03,#FF,#1F,#00
  8037.        DB       #00,#EE,#03,#F8,#08,#00,#37,#FC
  8038.        DB       #2E,#FE,#6E,#00,#60,#BC,#6E,#B8
  8039.        DB       #76,#00,#70,#F8,#E2,#FC,#03,#00
  8040.        DB       #F0,#03,#F0,#00,#C0,#00,#C0,#00
  8041.        DB       #C0,#00,#E0,#00,#80,#01,#80,#00
  8042.        DB       #00,#00,#00,#00,#00,#01,#00,#01
  8043.        DB       #00,#03,#00,#01,#00,#00,#08,#00
  8044.        DB       #07,#E0,#03,#F8,#03,#FF,#1F,#00
  8045.        DB       #00,#EE,#03,#F8,#08,#00,#37,#FC
  8046.        DB       #2E,#FE,#6E,#00,#60,#F4,#6E,#E8
  8047.        DB       #76,#E8,#70,#00,#E3,#F4,#03,#FA
  8048.        DB       #E0,#00,#E0,#00,#C0,#00,#C0,#00
  8049.        DB       #C0,#00,#80,#01,#80,#00,#00,#00
  8050.        DB       #00,#00,#00,#01,#00,#01,#04,#03
  8051.        DB       #00,#01,#00,#00,#08,#00,#F8,#00
  8052.        DB       #07,#F8,#0B,#FF,#0F,#00,#10,#EE
  8053.        DB       #03,#F8,#08,#00,#37,#FC,#2F,#FE
  8054.        DB       #5E,#00,#19,#F4,#61,#E8,#51,#E8
  8055.        DB       #30,#00,#E3,#F4,#03,#FA,#00,#00
  8056.        DB       #F0,#00,#F0,#00,#00,#00,#00,#00
  8057.        DB       #00,#00,#00,#00,#00,#00,#80,#00
  8058.        DB       #80,#00,#00,#00,#00,#01,#00,#01
  8059.        DB       #00,#03,#00,#00,#00,#00,#10,#00
  8060.        DB       #07,#E3,#03,#F8,#03,#FF,#DF,#00
  8061.        DB       #E0,#ED,#53,#FB,#3C,#02,#1F,#FC
  8062.        DB       #2F,#FE,#30,#00,#7B,#F4,#79,#E8
  8063.        DB       #75,#D8,#76,#00,#C7,#EE,#03,#F7
  8064.        DB       #FF,#FF,#FF,#FF,#F0,#0F,#F0,#03
  8065.        DB       #F0,#00,#C0,#00,#C0,#00,#C0,#00
  8066.        DB       #E0,#00,#80,#01,#80,#00,#00,#00
  8067.        DB       #00,#00,#00,#00,#00,#00,#00,#00
  8068.        DB       #00,#00,#00,#00,#00,#00,#07,#E0
  8069.        DB       #03,#F8,#03,#FF,#1F,#00,#00,#EE
  8070.        DB       #03,#F8,#08,#00,#37,#FC,#2E,#FE
  8071.        DB       #6E,#FE,#60,#00,#6E,#F4,#F6,#FA
  8072.        DB       #00,#38,#00,#08,#00,#00,#00,#00
  8073.        DB       #00,#00,#00,#00,#00,#00,#00,#00
  8074.        DB       #00,#00,#00,#00,#00,#00,#00,#00
  8075.        DB       #C0,#01,#C0,#00,#C0,#00,#C1,#80
  8076.        DB       #AC,#01,#A6,#83,#29,#A3,#6D,#9A
  8077.        DB       #65,#A9,#ED,#B3,#ED,#BB,#ED,#BB
  8078.        DB       #F5,#BB,#F5,#A7,#93,#8E,#13,#B0
  8079.        DB       #17,#7C,#0A,#FC,#1C,#3E,#18,#02
  8080.        DB       #F0,#00,#F0,#00,#E0,#00,#E0,#00
  8081.        DB       #E0,#00,#80,#00,#80,#00,#00,#01
  8082.        DB       #00,#01,#00,#01,#00,#01,#00,#01
  8083.        DB       #00,#01,#00,#01,#00,#01,#80,#03
  8084.        DB       #03,#F7,#07,#8A,#07,#B4,#0A,#D7
  8085.        DB       #06,#67,#0B,#3F,#25,#C0,#31,#7C
  8086.        DB       #BA,#88,#DE,#D4,#7E,#E8,#3E,#D4
  8087.        DB       #DD,#E8,#63,#D4,#3F,#A8,#1F,#50
  8088.        DB       #F0,#00,#F0,#00,#80,#00,#00,#00
  8089.        DB       #00,#00,#00,#00,#00,#00,#00,#01
  8090.        DB       #00,#01,#00,#01,#00,#01,#00,#01
  8091.        DB       #00,#01,#00,#01,#00,#01,#80,#03
  8092.        DB       #03,#F7,#07,#8A,#07,#B4,#36,#D7
  8093.        DB       #7A,#67,#FD,#3F,#FE,#C0,#DF,#7C
  8094.        DB       #BA,#88,#B5,#D4,#27,#E8,#0F,#D4
  8095.        DB       #CF,#E8,#7F,#D4,#3F,#A8,#1F,#50
  8096.        DB       #00,#0F,#00,#0F,#00,#07,#00,#07
  8097.        DB       #00,#07,#00,#01,#00,#01,#80,#00
  8098.        DB       #80,#00,#80,#00,#80,#00,#80,#00
  8099.        DB       #80,#00,#80,#00,#80,#00,#C0,#01
  8100.        DB       #EF,#C0,#51,#E0,#2D,#E0,#EB,#50
  8101.        DB       #E6,#60,#FC,#D0,#03,#A4,#3E,#8C
  8102.        DB       #11,#5D,#2B,#7B,#17,#7E,#2B,#7C
  8103.        DB       #17,#BB,#2B,#C6,#15,#FC,#0A,#F8
  8104.        DB       #00,#0F,#00,#0F,#00,#01,#00,#00
  8105.        DB       #00,#00,#00,#00,#00,#00,#80,#00
  8106.        DB       #80,#00,#80,#00,#80,#00,#80,#00
  8107.        DB       #80,#00,#80,#00,#80,#00,#C0,#01
  8108.        DB       #EF,#C0,#51,#E0,#2D,#E0,#EB,#6C
  8109.        DB       #E6,#5E,#FC,#BF,#03,#7F,#3E,#FB
  8110.        DB       #11,#5D,#2B,#AD,#17,#E4,#2B,#F0
  8111.        DB       #17,#F3,#2B,#FE,#15,#FC,#0A,#F8
  8112.        DB       #FF,#FF,#FF,#FF,#FF,#FF,#FF,#FF
  8113.        DB       #C0,#03,#80,#01,#80,#01,#80,#01
  8114.        DB       #80,#01,#80,#01,#80,#01,#C0,#03
  8115.        DB       #FF,#FF,#FF,#FF,#FF,#FF,#FF,#FF
  8116.        DB       #00,#00,#00,#00,#00,#00,#00,#00
  8117.        DB       #00,#00,#1F,#F8,#35,#7C,#2A,#F4
  8118.        DB       #17,#C4,#2E,#04,#1F,#F8,#00,#00
  8119.        DB       #00,#00,#00,#00,#00,#00,#00,#00
  8120.        DB       #FC,#3F,#F8,#1F,#F0,#0F,#E0,#07
  8121.        DB       #C0,#03,#80,#01,#00,#00,#00,#00
  8122.        DB       #00,#00,#00,#00,#80,#01,#C0,#03
  8123.        DB       #E0,#07,#F0,#0F,#F8,#1F,#FC,#3F
  8124.        DB       #00,#00,#01,#80,#03,#40,#07,#A0
  8125.        DB       #0F,#50,#1F,#A8,#3F,#54,#7F,#A2
  8126.        DB       #55,#02,#2A,#04,#15,#08,#0A,#10
  8127.        DB       #04,#20,#02,#40,#01,#80,#00,#00
  8128.        DB       #F8,#1F,#F0,#0F,#E0,#07,#E0,#07
  8129.        DB       #E0,#07,#E0,#07,#E0,#07,#E0,#07
  8130.        DB       #E0,#07,#E0,#07,#E0,#07,#E0,#07
  8131.        DB       #E0,#07,#E0,#07,#F0,#0F,#F8,#1F
  8132.        DB       #00,#00,#03,#C0,#07,#E0,#0E,#70
  8133.        DB       #0D,#B0,#0D,#30,#0C,#30,#0C,#20
  8134.        DB       #0D,#10,#0D,#20,#0D,#10,#0C,#20
  8135.        DB       #0E,#50,#06,#A0,#03,#40,#00,#00
  8136.        DB       #F0,#1F,#C0,#07,#80,#03,#80,#03
  8137.        DB       #00,#01,#00,#01,#00,#01,#00,#01
  8138.        DB       #00,#01,#00,#01,#00,#01,#00,#01
  8139.        DB       #80,#03,#80,#03,#C0,#07,#F0,#1F
  8140.        DB       #00,#00,#07,#C0,#1F,#F0,#3F,#D8
  8141.        DB       #3F,#A8,#7F,#D4,#7F,#D4,#7E,#FC
  8142.        DB       #7E,#FC,#57,#FC,#57,#FC,#2B,#F8
  8143.        DB       #37,#F8,#1F,#F0,#07,#C0,#00,#00
  8144.        DB       #F0,#07,#C0,#01,#80,#00,#80,#00
  8145.        DB       #00,#00,#00,#00,#00,#00,#00,#00
  8146.        DB       #00,#00,#00,#00,#00,#00,#00,#00
  8147.        DB       #80,#00,#80,#01,#C0,#01,#F0,#07
  8148.        DB       #00,#00,#07,#D0,#1F,#F4,#3F,#DA
  8149.        DB       #3F,#A8,#7F,#D5,#7F,#D4,#7E,#FD
  8150.        DB       #7E,#FC,#57,#FD,#57,#FC,#2B,#FA
  8151.        DB       #37,#F8,#1F,#F4,#07,#D0,#00,#00
  8152.        DB       #F0,#0F,#E0,#07,#C0,#03,#C0,#03
  8153.        DB       #C0,#03,#C0,#03,#C0,#03,#C0,#03
  8154.        DB       #C0,#03,#C0,#03,#C0,#03,#C0,#03
  8155.        DB       #C0,#03,#C0,#03,#E0,#07,#F0,#0F
  8156.        DB       #00,#00,#07,#E0,#0F,#F0,#1E,#68
  8157.        DB       #1D,#B0,#1A,#08,#1A,#10,#18,#08
  8158.        DB       #1A,#10,#1A,#08,#1A,#10,#1C,#28
  8159.        DB       #1E,#48,#0F,#90,#06,#A0,#00,#00
  8160.        DB       #F0,#1F,#C0,#07,#80,#03,#80,#03
  8161.        DB       #00,#01,#00,#01,#00,#01,#00,#01
  8162.        DB       #00,#01,#00,#01,#00,#01,#00,#01
  8163.        DB       #80,#03,#80,#03,#C0,#07,#F0,#1F
  8164.        DB       #00,#00,#07,#C0,#1F,#F0,#3F,#F8
  8165.        DB       #3F,#F8,#7E,#FC,#7A,#BC,#7C,#7C
  8166.        DB       #7C,#7C,#7A,#BC,#7E,#FC,#3F,#F8
  8167.        DB       #3F,#F8,#1F,#F0,#07,#C0,#00,#00
  8168.        DB       #F0,#07,#C0,#01,#80,#00,#80,#00
  8169.        DB       #00,#00,#00,#00,#00,#00,#00,#00
  8170.        DB       #00,#00,#00,#00,#00,#00,#00,#00
  8171.        DB       #80,#00,#80,#01,#C0,#01,#F0,#07
  8172.        DB       #00,#00,#07,#D0,#1F,#F4,#3F,#FA
  8173.        DB       #3F,#F8,#7E,#FD,#7A,#BC,#7C,#7D
  8174.        DB       #7C,#7C,#7A,#BD,#7E,#FC,#3F,#FA
  8175.        DB       #3F,#F8,#1F,#F4,#07,#D0,#00,#00
  8176.        DB       #FF,#FF,#FF,#FF,#F8,#1F,#F0,#0F
  8177.        DB       #E0,#07,#E0,#07,#C0,#03,#C0,#03
  8178.        DB       #80,#01,#80,#01,#80,#01,#80,#01
  8179.        DB       #80,#01,#E0,#07,#FF,#FF,#FF,#FF
  8180. ;L_EFFE       EQU       $-4
  8181.        DB       #00,#00,#00,#00,#00,#00,#03,#C0
  8182.        DB       #04,#E0,#09,#F0,#0B,#F0,#1F,#F8
  8183.        DB       #0E,#70,#35,#AC,#39,#9C,#39,#9C
  8184.        DB       #0F,#F0,#00,#00,#00,#00,#00,#00
  8185.        DB       #E0,#07,#E0,#07,#F0,#0F,#F0,#0F
  8186.        DB       #E0,#07,#C0,#03,#C0,#03,#80,#01
  8187.        DB       #80,#01,#80,#01,#80,#01,#80,#01
  8188.        DB       #80,#01,#C0,#03,#C0,#03,#E0,#07
  8189.        DB       #0B,#F0,#05,#E0,#05,#E0,#05,#E0
  8190.        DB       #05,#E0,#0B,#F0,#1B,#F8,#17,#78
  8191.        DB       #3E,#BC,#3D,#7C,#3A,#BC,#3C,#5C
  8192.        DB       #1A,#28,#1C,#18,#0E,#30,#03,#C0
  8193.        DB       #80,#03,#80,#03,#C0,#07,#C0,#07
  8194.        DB       #C0,#07,#E0,#0F,#E0,#0F,#F0,#1F
  8195.        DB       #E0,#0F,#E0,#0F,#C0,#07,#C0,#07
  8196.        DB       #C0,#07,#80,#03,#80,#03,#80,#03
  8197.        DB       #3F,#F8,#16,#10,#16,#10,#16,#10
  8198.        DB       #0B,#20,#0B,#20,#04,#40,#03,#80
  8199.        DB       #04,#40,#08,#20,#08,#20,#11,#10
  8200.        DB       #13,#90,#17,#D0,#3F,#F8,#00,#00
  8201.        DB       #80,#03,#80,#03,#C0,#07,#C0,#07
  8202.        DB       #C0,#07,#E0,#0F,#E0,#0F,#F0,#1F
  8203.        DB       #E0,#0F,#E0,#0F,#C0,#07,#C0,#07
  8204.        DB       #C0,#07,#80,#03,#80,#03,#80,#03
  8205.        DB       #3F,#F8,#14,#10,#14,#10,#1B,#F0
  8206.        DB       #0D,#E0,#0D,#E0,#07,#C0,#03,#80
  8207.        DB       #04,#40,#09,#20,#0B,#A0,#17,#D0
  8208.        DB       #17,#D0,#1F,#F0,#3F,#F8,#00,#00
  8209.        DB       #00,#07,#00,#07,#00,#07,#80,#00
  8210.        DB       #C0,#00,#80,#00,#00,#00,#00,#00
  8211.        DB       #00,#00,#00,#03,#00,#03,#00,#03
  8212.        DB       #00,#03,#00,#03,#00,#07,#00,#0F
  8213.        DB       #7F,#E0,#77,#D0,#2F,#A0,#1F,#C0
  8214.        DB       #04,#46,#11,#19,#3F,#ED,#79,#D2
  8215.        DB       #76,#E8,#FE,#D0,#FD,#E8,#FB,#D0
  8216.        DB       #FB,#A8,#7F,#D0,#7B,#A0,#1F,#40
  8217.        DB       #FF,#F0,#FF,#E0,#FC,#00,#E0,#00
  8218.        DB       #00,#01,#00,#03,#00,#03,#00,#03
  8219.        DB       #00,#03,#00,#03,#00,#07,#80,#07
  8220.        DB       #80,#07,#80,#0F,#80,#0F,#C0,#0F
  8221.        DB       #00,#03,#00,#07,#00,#0E,#01,#DC
  8222.        DB       #0E,#28,#BC,#70,#B9,#F8,#DF,#F0
  8223.        DB       #5F,#E8,#6F,#D0,#37,#E0,#19,#50
  8224.        DB       #2E,#A0,#37,#40,#1B,#A0,#00,#C0
  8225.        DB       #00,#00,#00,#00,#00,#00,#00,#00
  8226.        DB       #00,#00,#00,#00,#00,#00,#00,#00
  8227.        DB       #00,#00,#00,#00,#00,#00,#00,#00
  8228.        DB       #00,#00,#00,#00,#00,#00,#00,#00
  8229.        DB       #01,#00,#00,#00,#21,#04,#01,#00
  8230.        DB       #05,#60,#0E,#70,#09,#90,#03,#DD
  8231.        DB       #BB,#C0,#05,#90,#0E,#30,#06,#A0
  8232.        DB       #00,#80,#20,#84,#00,#00,#00,#80
  8233.        DB       #80,#00,#00,#00,#00,#00,#00,#00
  8234.        DB       #00,#00,#00,#00,#00,#00,#00,#00
  8235.        DB       #00,#00,#00,#00,#00,#00,#80,#00
  8236.        DB       #C0,#01,#F0,#07,#F0,#07,#F0,#07
  8237.        DB       #19,#CC,#32,#26,#75,#D7,#34,#96
  8238.        DB       #15,#D4,#45,#51,#50,#85,#1E,#3C
  8239.        DB       #25,#D2,#7B,#EF,#3B,#6E,#11,#C4
  8240.        DB       #03,#E0,#03,#E0,#07,#F0,#03,#E0
  8241.        DB       #C0,#01,#80,#00,#80,#00,#80,#00
  8242.        DB       #00,#00,#00,#00,#00,#00,#00,#00
  8243.        DB       #80,#00,#80,#00,#80,#00,#C0,#01
  8244.        DB       #F8,#0F,#F0,#07,#F0,#07,#F0,#07
  8245.        DB       #09,#C8,#12,#24,#35,#D6,#14,#94
  8246.        DB       #05,#D0,#45,#51,#50,#85,#1E,#3C
  8247.        DB       #25,#D2,#3B,#EE,#1B,#6C,#01,#C0
  8248.        DB       #03,#E0,#03,#E0,#07,#F0,#03,#E0
  8249.        DB       #F8,#0F,#F0,#07,#F0,#07,#F0,#07
  8250.        DB       #10,#04,#00,#00,#00,#00,#00,#00
  8251.        DB       #C0,#01,#F0,#07,#F8,#0F,#F8,#0F
  8252.        DB       #F8,#0F,#F0,#07,#F0,#07,#F0,#07
  8253.        DB       #01,#C0,#02,#20,#05,#D0,#04,#90
  8254.        DB       #05,#D0,#45,#51,#50,#85,#1E,#3C
  8255.        DB       #05,#D0,#03,#E0,#03,#60,#01,#C0
  8256.        DB       #03,#E0,#03,#E0,#07,#F0,#03,#E0
  8257.        DB       #C0,#01,#80,#00,#80,#00,#80,#00
  8258.        DB       #00,#00,#00,#00,#00,#00,#00,#00
  8259.        DB       #80,#00,#80,#00,#80,#00,#C0,#01
  8260.        DB       #F8,#0F,#F0,#07,#F0,#07,#F0,#07
  8261.        DB       #09,#C8,#12,#24,#35,#D6,#14,#94
  8262.        DB       #05,#D0,#45,#51,#50,#85,#1E,#3C
  8263.        DB       #25,#D2,#3B,#EE,#1B,#6C,#01,#C0
  8264.        DB       #03,#E0,#03,#E0,#07,#F0,#03,#E0
  8265.        DB       #FF,#FF,#FF,#FF,#FF,#FF,#80,#FF
  8266.        DB       #00,#1F,#00,#0F,#00,#01,#00,#00
  8267.        DB       #00,#00,#00,#00,#00,#01,#00,#0F
  8268.        DB       #00,#1F,#81,#FF,#FF,#FF,#FF,#FF
  8269.        DB       #00,#00,#00,#00,#00,#00,#00,#00
  8270.        DB       #3A,#00,#55,#40,#BE,#A0,#6D,#54
  8271.        DB       #FE,#A9,#DB,#54,#EE,#A0,#79,#40
  8272.        DB       #34,#00,#00,#00,#00,#00,#00,#00
  8273.        DB       #FE,#3F,#FC,#1F,#FC,#1F,#FC,#1F
  8274.        DB       #F8,#0F,#F0,#07,#F0,#07,#F0,#07
  8275.        DB       #E0,#07,#E0,#03,#E0,#03,#E0,#03
  8276.        DB       #E0,#03,#E0,#03,#E0,#03,#F0,#07
  8277.        DB       #00,#80,#00,#00,#01,#40,#00,#80
  8278.        DB       #01,#40,#02,#A0,#05,#50,#02,#A0
  8279.        DB       #05,#50,#0A,#E0,#07,#A8,#0B,#F0
  8280.        DB       #0E,#D8,#0B,#B8,#05,#F0,#02,#E0
  8281.        DB       #FF,#FF,#FF,#FF,#FF,#FF,#FF,#01
  8282.        DB       #F8,#00,#F0,#00,#80,#00,#00,#00
  8283.        DB       #00,#00,#00,#00,#80,#00,#F0,#00
  8284.        DB       #F8,#00,#FF,#81,#FF,#FF,#FF,#FF
  8285.        DB       #00,#00,#00,#00,#00,#00,#00,#00
  8286.        DB       #00,#5C,#02,#AA,#05,#7D,#2A,#B6
  8287.        DB       #95,#7F,#2A,#DB,#05,#77,#02,#9E
  8288.        DB       #00,#2C,#00,#00,#00,#00,#00,#00
  8289.        DB       #E0,#0F,#C0,#07,#C0,#07,#C0,#07
  8290.        DB       #C0,#07,#C0,#07,#C0,#07,#E0,#07
  8291.        DB       #E0,#0F,#E0,#0F,#E0,#0F,#F0,#1F
  8292.        DB       #F8,#3F,#F8,#3F,#F8,#3F,#FC,#7F
  8293.        DB       #07,#40,#0F,#A0,#1D,#D0,#1B,#70
  8294.        DB       #0F,#D0,#15,#E0,#07,#50,#0A,#A0
  8295.        DB       #05,#40,#0A,#A0,#05,#40,#02,#80
  8296.        DB       #01,#00,#02,#80,#00,#00,#01,#00
  8297.        DB       #00,#00,#00,#00,#00,#00,#00,#00
  8298.        DB       #00,#00,#00,#00,#00,#00,#00,#07
  8299.        DB       #00,#01,#00,#00,#00,#00,#00,#00
  8300.        DB       #00,#00,#00,#00,#80,#00,#C0,#00
  8301.        DB       #DE,#1C,#EF,#BF,#F4,#51,#F6,#60
  8302.        DB       #F7,#EE,#73,#DF,#B8,#00,#B7,#C0
  8303.        DB       #85,#F0,#8A,#FC,#95,#3B,#AA,#8F
  8304.        DB       #55,#72,#2A,#F8,#15,#F3,#0B,#BF
  8305.        DB       #00,#00,#00,#00,#00,#00,#00,#00
  8306.        DB       #00,#00,#00,#00,#00,#00,#00,#07
  8307.        DB       #00,#01,#00,#00,#00,#00,#00,#00
  8308.        DB       #00,#00,#00,#00,#80,#00,#C0,#00
  8309.        DB       #1E,#1C,#CF,#BF,#E4,#51,#F6,#60
  8310.        DB       #F7,#EE,#33,#DF,#B8,#00,#B7,#C0
  8311.        DB       #B5,#F0,#8A,#FC,#95,#3B,#AA,#0F
  8312.        DB       #54,#E2,#29,#F0,#13,#E2,#07,#7E
  8313.        DB       #00,#00,#00,#00,#00,#00,#00,#00
  8314.        DB       #00,#00,#00,#00,#00,#00,#E0,#00
  8315.        DB       #80,#00,#00,#00,#00,#00,#00,#00
  8316.        DB       #00,#00,#00,#00,#00,#01,#00,#03
  8317.        DB       #38,#7B,#FD,#F7,#8A,#2F,#06,#6F
  8318.        DB       #77,#EF,#FB,#CE,#00,#1D,#03,#ED
  8319.        DB       #0F,#A1,#3F,#51,#DC,#A9,#F1,#55
  8320.        DB       #4E,#AA,#1F,#54,#CF,#A8,#FD,#D0
  8321.        DB       #00,#00,#00,#00,#00,#00,#00,#00
  8322.        DB       #00,#00,#00,#00,#00,#00,#E0,#00
  8323.        DB       #80,#00,#00,#00,#00,#00,#00,#00
  8324.        DB       #00,#00,#00,#00,#00,#01,#00,#03
  8325.        DB       #38,#78,#FD,#F3,#8A,#27,#06,#6F
  8326.        DB       #77,#EF,#FB,#CC,#00,#1D,#03,#ED
  8327.        DB       #0F,#AD,#3F,#51,#DC,#A9,#F0,#55
  8328.        DB       #47,#2A,#0F,#94,#47,#C8,#7E,#E0
  8329.        DB       #FC,#00,#F8,#00,#F8,#00,#E0,#00
  8330.        DB       #80,#00,#00,#00,#00,#00,#00,#00
  8331.        DB       #00,#00,#80,#00,#F0,#00,#E0,#00
  8332.        DB       #E0,#00,#E0,#00,#E0,#00,#F8,#00
  8333.        DB       #00,#7E,#01,#FE,#03,#FE,#03,#06
  8334.        DB       #0E,#6E,#3E,#5E,#7B,#3E,#77,#FE
  8335.        DB       #2F,#EE,#07,#9E,#00,#3E,#00,#FE
  8336.        DB       #0F,#FE,#0F,#FE,#03,#FE,#00,#3E
  8337.        DB       #00,#00,#00,#00,#00,#00,#00,#00
  8338.        DB       #00,#00,#00,#00,#00,#00,#00,#00
  8339.        DB       #00,#00,#00,#00,#00,#01,#80,#07
  8340.        DB       #84,#07,#FC,#0F,#FC,#0F,#FE,#1F
  8341.        DB       #00,#00,#FF,#FF,#FF,#FF,#FF,#F7
  8342.        DB       #FE,#E7,#FD,#D7,#79,#B7,#7B,#86
  8343.        DB       #73,#CE,#73,#FC,#33,#B0,#31,#70
  8344.        DB       #00,#E0,#01,#E0,#00,#C0,#00,#00
  8345.        DB       #00,#3F,#00,#1F,#00,#1F,#00,#07
  8346.        DB       #00,#01,#00,#00,#00,#00,#00,#00
  8347.        DB       #00,#00,#00,#01,#00,#0F,#00,#07
  8348.        DB       #00,#07,#00,#07,#00,#07,#00,#1F
  8349.        DB       #7E,#00,#7F,#80,#7F,#C0,#60,#C0
  8350.        DB       #76,#70,#7A,#7C,#7C,#DE,#7F,#EE
  8351.        DB       #77,#F4,#79,#E0,#7C,#00,#7F,#00
  8352.        DB       #7F,#F0,#7F,#F0,#7F,#C0,#7C,#00
  8353.        DB       #FE,#1F,#FC,#0F,#FC,#0F,#84,#07
  8354.        DB       #80,#07,#00,#01,#00,#00,#00,#00
  8355.        DB       #00,#00,#00,#00,#00,#00,#00,#00
  8356.        DB       #00,#00,#00,#00,#00,#00,#00,#00
  8357.        DB       #00,#00,#00,#C0,#01,#E0,#00,#E0
  8358.        DB       #31,#70,#33,#B0,#73,#FC,#73,#CE
  8359.        DB       #7B,#86,#79,#B7,#FD,#D7,#FE,#E7
  8360.        DB       #FF,#F7,#FF,#FF,#FF,#FF,#00,#00
  8361.        DB       #E0,#07,#E0,#07,#F0,#0F,#E0,#07
  8362.        DB       #C0,#03,#80,#01,#00,#00,#00,#00
  8363.        DB       #00,#00,#00,#00,#00,#00,#80,#01
  8364.        DB       #80,#01,#C0,#03,#C0,#03,#E0,#07
  8365.        DB       #0F,#F0,#04,#20,#05,#20,#05,#20
  8366.        DB       #0A,#10,#14,#08,#28,#04,#40,#02
  8367.        DB       #5F,#FA,#5F,#FA,#2F,#F4,#2F,#F4
  8368.        DB       #17,#E8,#17,#E8,#08,#10,#0F,#F0
  8369.        DB       #E0,#07,#E0,#07,#F0,#0F,#E0,#07
  8370.        DB       #C0,#03,#80,#01,#00,#00,#00,#00
  8371.        DB       #00,#00,#00,#00,#00,#00,#80,#01
  8372.        DB       #80,#01,#C0,#03,#C0,#03,#E0,#07
  8373.        DB       #0F,#F0,#04,#20,#05,#A0,#05,#A0
  8374.        DB       #0A,#D0,#15,#E8,#2B,#F4,#57,#FA
  8375.        DB       #57,#FA,#5F,#FA,#2F,#F4,#2F,#F4
  8376.        DB       #17,#E8,#17,#E8,#08,#10,#0F,#F0
  8377.        DB       #F8,#1F,#F0,#0F,#E0,#07,#C0,#03
  8378.        DB       #80,#01,#00,#00,#00,#00,#00,#00
  8379.        DB       #00,#00,#00,#00,#00,#00,#80,#01
  8380.        DB       #C0,#03,#E0,#07,#F0,#0F,#F8,#1F
  8381.        DB       #01,#80,#03,#C0,#06,#60,#0C,#30
  8382.        DB       #19,#98,#32,#4C,#60,#46,#C0,#83
  8383.        DB       #C1,#03,#61,#06,#30,#0C,#19,#18
  8384.        DB       #0C,#30,#06,#60,#03,#C0,#01,#80
  8385.        DB       #FF,#00,#FF,#00,#FF,#00,#FF,#00
  8386.        DB       #FF,#00,#C2,#00,#C0,#00,#00,#00
  8387.        DB       #00,#1F,#00,#3F,#00,#7F,#80,#FF
  8388.        DB       #81,#FF,#83,#FF,#C7,#FF,#FF,#FF
  8389.        DB       #00,#00,#00,#7E,#00,#42,#00,#5A
  8390.        DB       #00,#5A,#00,#42,#18,#FE,#1D,#C0
  8391.        DB       #6B,#80,#77,#00,#2E,#00,#1C,#00
  8392.        DB       #38,#00,#10,#00,#00
  8393. ;
  8394. L_F69F  PUSH    BC
  8395.         LD      B,#32
  8396. L_F6A2  PUSH    BC
  8397.         LD      B,#FF
  8398. L_F6A5  DB      #00
  8399.         DJNZ    L_F6A5
  8400.         POP     BC
  8401.         DJNZ    L_F6A2
  8402.         POP     BC
  8403.         CALL    L_9835
  8404.          push af
  8405.          call CheckQuit
  8406.          pop af
  8407.         RET
  8408. ;
  8409.         ;org #ffe0
  8410. L_FFE0=0xffe0
  8411.         ;org #ffee
  8412. L_FFEE=0xffee
  8413.         ;org #fff6
  8414. L_FFF6=0xfff6
  8415.         ;org #ffff
  8416. L_FFFF=0xffff
  8417.