Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- _pntr01:
- JP _DFE1
- _DFB6:
- DEFB 010h,010h,006h,001h
- DEFB 000h,002h,000h,010h
- DEFB 040h,09Ch
- _DFC0:
- DEFB 088h,09Ch,0F0h,0D2h
- DEFB 087h,083h,099h,082h
- DEFB 098h,093h
- _DFCA:
- DEFB 014h
- _DFCB:
- DEFB 014h
- _DFCC:
- DEFB 006h
- _DFCD:
- DEFB 001h
- _DFCE:
- DEFB 000h
- _DFCF:
- DEFB 002h
- _DFD0:
- DEFB 000h
- _DFD1:
- DEFB 010h
- _DFD2:
- DEFB 040h,09Ch
- _DFD4:
- DEFB 0F0h,0D2h
- _DFD6:
- DEFB 000h,000h
- _DFD8:
- DEFB 014h,014h
- _DFDA:
- DEFB 058h
- _DFDB:
- DEFB 0FFh
- _DFDC:
- DEFB 058h,0FFh
- _DFDE:
- DEFB 001h
- _DFDF:
- DEFB 000h,000h
- _DFE1:
- DI
- LD IX,_DFB6
- LD BC,(_DFDF)
- _DFEA:
- PUSH BC
- PUSH IX
- POP HL
- LD BC,000E
- ADD IX,BC
- LD DE,_DFCA
- LDIR
- LD A,(_DFCD)
- AND A
- JP Z,_E07F
- LD HL,(_DFD4)
- LD (_DFDE),HL
- LD HL,(_DFD2)
- LD (_DFDC),HL
- LD BC,(_DFDA)
- LD A,B
- CALL 22B1
- LD (_DFD8),HL
- LD (_DFCE),A
- EXX
- LD DE,(_DFD6)
- EXX
- LD BC,(_DFD0)
- _E029:
- PUSH BC
- LD BC,(_DFDA)
- LD A,B
- INC A
- LD (_DFDB),A
- DEC A
- AND 07
- JR Z,_E03E
- LD HL,(_DFD8)
- INC H
- JR E043
- _E03E:
- LD A,B
- CALL 22B1
- INC H
- _E043:
- LD (_DFD8),HL
- DEC H
- LD A,A5
- ADD A,H
- LD H,A
- PUSH HL
- CALL E10D
- LD A,(_DFD0)
- AND A
- JR NZ, E068
- LD (E15F),A
- LD HL,A62F
- LD (E166),HL
- LD DE,5B20
- POP HL
- PUSH HL
- CALL E159
- LD A,06
- _E068:
- DEC A
- LD (E15F),A
- LD HL,00B6
- LD (E166).HL
- LD DE,5B00
- POP HL
- CALL E159
- POP BC
- DJNZ E029
- CALL E183
- _E07F:
- POP BC
- DEC B
- JP NZ,_DFEA
- LD BC,1800
- LD DE,4000
- LD HL,_E500
- LDIR
- LD BC,0300
- LD DE,5800
- LD HL,_FD00
- LDIR
- LD BC,0300
- LD DE,_FD00
- LD HL,_E200
- LDIR
- LD BC,(_DFDF)
- _E0A9:
- PUSH BC
- PUSH IX
- POP HL
- LD BC,000E
- OR A
- SBC HL,BC
- PUSH HL
- POP IX
- LD DE, _DFCA
- LDIR
- LD A,(_DFCD)
- AND A
- JR Z,_E108
- LD BC,(_DFCA)
- LD (_DFCA),BC
- LD A,B
- CALL 22B1
- LD (_DFD8),HL
- LD BC,(_DFD0)
- LD DE,(_DFD6)
- _E0D8:
- PUSH BC
- LD BC,(_DFDA)
- LD A,B
- INC A
- LD (_DFDB),A
- DEC A
- AND 07
- JR Z,_E0ED
- LD HL,(_DFD8)
- INC H
- JR E0F2
- _E0ED:
- LD A,B
- CALL 22B1
- INC H
- _E0F2:
- LD (_DFD8),HL
- DEC H
- LD BC,(_DFCF)
- INC C
- LD B,00
- EX DE,HL
- LD A,A5
- ADD A,D
- LD D,A
- LDIR
- EX DE,HL
- POP BC
- DJNZ E0D8
- _E108:
- POP BC
- DJNZ E0A9
- EI
- RET
- XOR A
- LD BC,(_DFCF)
- LD B,A
- PUSH BC
- LD HL,(_DFDC)
- LD DE,5B00
- LDIR
- LD (DE),A
- LD (_DFDC),HL
- POP BC
- LD A,(_DFD0)
- AND A
- JR NZ,_E133
- LD HL,(_DFDE)
- LD DE,5B20
- LDIR
- LD (DE),A
- LD (_DFDE),HL
- _E133:
- LD A,(_DFCE)
- AND A
- RET Z
- LD HL,5B00
- CALL E146
- LD A,(_DFD0)
- AND A
- RET NZ
- LD HL,5B20
- LD BC,(_DFCE)
- INC B
- _E14B:
- PUSH HL
- PUSH BC
- AND A
- _E14E:
- RR (HL)
- INC HL
- DJNZ E14E
- POP BC
- DEC C
- POP HL
- _E15E:
- JR NZ,_E14B
- RET
- LD BC,(_DFCE)
- INC B
- JR E165
- LD A,(HL)
- EXX
- LD (DE),A
- INC DE
- EXX
- _E165:
- LD A,(DE)
- NOP
- NOP
- LD (HL),A
- INC DE
- INC HL
- DJNZ E15E
- RET
- SUB E
- SBC A,B
- ADD A,D
- SBC A,C
- ADD A,E
- ADD A,A
- CALL 22B1
- LD A,H
- RRCA
- RRCA
- RRCA
- AND 03
- OR 58
- ADD A,A5
- LD H,A
- RET
- LD A,(_DFCC)
- AND A
- RET Z
- LD BC,(_DFCA)
- LD A,B
- CALL E174
- LD BC,(_DFCE)
- LD A,(_DFCA)
- AND 07
- JR Z, E19C
- INC B
- _E19C:
- LD A,(_DFCB)
- AND 07
- LD E,A
- LD A,(_DFD1)
- ADD A,E
- RRA
- RRA
- RRA
- AND 1F
- LD C,A
- LD A,(_DFD1)
- AND 07
- JR Z,_E1B4
- INC C
- _E1B4:
- LD A,(_DFCB)
- AND 07
- JR Z,_E1BC
- INC C
- _E1BC:
- LD A,B
- LD (_DFCE),A
- LD DE,0020
- _E1C3:
- PUSH HL
- LD A,(_DFCE)
- LD B,A
- LD A,(_DFCC)
- _E1CB:
- LD (HL),A
- INC HL
- DJNZ E1CB
- POP HL
- ADD HL,DE
- DEC C
- JR NZ,_E1C3
- RET
- LD DE,_E500
- LD HL,4000
- LD BC,1B00
- LDIR
- LD DE,_E200
- LD HL,5800
- LD BC,0300
- LDIR
- LD BC,1B00
- LD DE,4000
- LD HL,_E500
- LDIR
- RET
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement