Код:
;
;LCH1.ASM - sourced by SPEDIZ: Spectrum Dizassembler v1.5
;
ORG #A7B6
;
;#A7B6
PUSH IX
LD L,A
LD A,B
EXX
PUSH HL
LD L,A
LD E,L
LD H,#00
LD D,H
LD B,H
ADD HL,HL
ADD HL,HL
ADD HL,HL
ADD HL,DE
LD DE,(#D036)
ADD HL,DE
LD DE,(#A7B0)
EXX
LD E,L
LD H,#00
LD D,H
ADD HL,HL
ADD HL,HL
ADD HL,HL
ADD HL,DE
LD DE,(#D038)
ADD HL,DE
LD IX,#A7A6
LD B,#03
L_A7E3 PUSH BC
LD E,(IX+#00)
LD D,(IX+#01)
EXX
LD C,#03
L_A7ED EXX
PUSH HL
LD L,(HL)
LD H,#00
ADD HL,HL
ADD HL,HL
ADD HL,HL
LD BC,(#D03D)
ADD HL,BC
LD C,D
LD A,(HL)
LD (DE),A
INC D
INC HL
LD A,(HL)
LD (DE),A
INC D
INC HL
LD A,(HL)
LD (DE),A
INC D
INC HL
LD A,(HL)
LD (DE),A
INC D
INC HL
LD A,(HL)
LD (DE),A
INC D
INC HL
LD A,(HL)
LD (DE),A
INC D
INC HL
LD A,(HL)
LD (DE),A
INC D
INC HL
LD A,(HL)
LD (DE),A
LD D,C
INC E
POP HL
INC HL
EXX
LDI
JP PE,L_A7ED
LD A,E
ADD A,#1D
LD E,A
JP NC,L_A82B
INC D
L_A82B EXX
LD (IX+#00),E
LD (IX+#01),D
INC IX
INC IX
POP BC
DJNZ L_A7E3
EXX
LD (#A7B0),DE
POP HL
EXX
POP IX
RET
;
;#A843
;
еще был тестовый стёковый вариант (есть в архиве), но вроде как спрайты иногда черкались (прерывания возможно разрешаются в игре и надо ставить везде DI), не упомнить уже...