Routines
Prev: 82F1 Up: Map Next: 8B6A
8301: Handler: Batlet
HandlerBatlet 8301 LD A,($EA91)
8304 CP (IX+$01)
8307 JP NZ,HandlerBatlet_43
830A CALL StoreEntity
830D LD HL,$5E25
8310 INC (HL)
8311 CALL HandlerBatlet_39
8314 DEC E
8315 JP Z,HandlerBatlet_42
8318 CALL HandlerBatlet_32
831B DEC E
831C JP Z,HandlerBatlet_54
831F LD (IX+$0F),$00
8323 LD DE,($5E1D)
8327 LD A,(IX+$09)
832A INC A
832B AND $0F
832D LD (IX+$09),A
8330 JP NZ,HandlerBatlet_0
8333 LD A,R
8335 AND $07
8337 LD (IX+$08),A
HandlerBatlet_0 833A CALL HandlerBatlet_14
833D LD (IX+$05),$43
8341 JR NZ,HandlerBatlet_1
8343 INC HL
HandlerBatlet_1 8344 LD A,(HL)
8345 BIT 1,(IX+$08)
8349 JR NZ,HandlerBatlet_2
834B NEG
HandlerBatlet_2 834D ADD A,(IX+$04)
8350 LD C,A
8351 SUB $68
8353 JR C,HandlerBatlet_3
8355 CP D
8356 JR NC,HandlerBatlet_10
8358 JR HandlerBatlet_4
HandlerBatlet_3 835A NEG
835C CP D
835D JR NC,HandlerBatlet_11
HandlerBatlet_4 835F LD (IX+$04),C
HandlerBatlet_5 8362 CALL HandlerBatlet_14
8365 JR Z,HandlerBatlet_6
8367 INC HL
HandlerBatlet_6 8368 LD A,(HL)
8369 BIT 0,(IX+$08)
836D JR NZ,HandlerBatlet_7
836F NEG
HandlerBatlet_7 8371 ADD A,(IX+$03)
8374 LD C,A
8375 SUB $58
8377 JR C,HandlerBatlet_8
8379 CP E
837A JR NC,HandlerBatlet_13
837C JR HandlerBatlet_9
HandlerBatlet_8 837E NEG
8380 CP E
8381 JR NC,HandlerBatlet_12
HandlerBatlet_9 8383 LD (IX+$03),C
8386 LD A,(IX+$09)
8389 RRA
838A RRA
838B AND $01
838D LD C,A
838E LD A,(IX+$00)
8391 AND $FE
8393 ADD A,C
8394 LD (IX+$00),A
8397 LD A,($EA90)
839A CP $31
839C JP NC,HandlerBatlet_54
839F JP HandlerKnight_6
HandlerBatlet_10 83A2 RES 1,(IX+$08)
83A6 JR HandlerBatlet_5
HandlerBatlet_11 83A8 SET 1,(IX+$08)
83AC JR HandlerBatlet_5
HandlerBatlet_12 83AE SET 0,(IX+$08)
83B2 JR HandlerBatlet_9
HandlerBatlet_13 83B4 RES 0,(IX+$08)
83B8 JR HandlerBatlet_9
HandlerBatlet_14 83BA LD C,(IX+$09)
83BD SLA C
83BF LD B,$00
83C1 LD HL,$83CA
83C4 ADD HL,BC
83C5 BIT 2,(IX+$08)
83C9 RET
83CA INC BC
83CB NOP
83CC INC BC
83CD NOP
83CE INC BC
83CF LD BC,$0103
83D2 INC BC
83D3 LD BC,$0202
83D6 LD (BC),A
83D7 LD (BC),A
83D8 LD (BC),A
83D9 LD (BC),A
83DA LD (BC),A
83DB LD (BC),A
83DC LD (BC),A
83DD LD (BC),A
83DE LD (BC),A
83DF LD (BC),A
83E0 LD BC,$0103
83E3 INC BC
83E4 LD BC,$0003
83E7 INC BC
83E8 NOP
83E9 INC BC
This entry point is used by the routine at HandlerKnight.
HandlerBatlet_15 83EA LD A,($5E26)
83ED LD C,A
83EE LD A,($EA91)
83F1 CP C
83F2 JR NZ,HandlerBatlet_19
83F4 LD HL,$5E27
83F7 LD A,(HL)
83F8 AND A
83F9 JR Z,HandlerBatlet_20
83FB DEC (HL)
83FC RET NZ
HandlerBatlet_16 83FD LD HL,$EE60
8400 LD DE,$0010
8403 LD B,$03
HandlerBatlet_17 8405 LD A,(HL)
8406 AND A
8407 JR Z,HandlerBatlet_18
8409 ADD HL,DE
840A DJNZ HandlerBatlet_17
840C RET
HandlerBatlet_18 840D EX DE,HL
840E LD HL,$8B6A
8411 LD BC,$0010
8414 PUSH DE
8415 LDIR
8417 POP HL
8418 PUSH HL
8419 INC HL
841A LD A,($EA91)
841D LD (HL),A
841E INC HL
841F PUSH HL
8420 LD HL,$8B7A
8423 LD A,($5C78)
8426 AND $0F
8428 LD E,A
8429 LD D,$00
842B ADD HL,DE
842C LD A,(HL)
842D POP HL
842E LD (HL),A
842F LD DE,($5E1D)
8433 LD B,E
8434 CALL HandlerBatlet_35
8437 LD (HL),A
8438 LD B,D
8439 CALL HandlerBatlet_35
843C LD (HL),A
843D POP DE
843E PUSH IX
8440 LD IX,$0000
8444 ADD IX,DE
8446 CALL HandlerBatlet_48
8449 CALL DrawEntity
844C POP IX
844E RET
HandlerBatlet_19 844F LD ($5E26),A
8452 LD A,$20
8454 LD ($5E27),A
8457 RET
HandlerBatlet_20 8458 LD A,R
845A AND $0F
845C RET NZ
845D JR HandlerBatlet_16
845F CALL StoreEntity
8462 LD A,($EA91)
8465 CP (IX+$01)
8468 JP NZ,HandlerBatlet_43
846B LD HL,$5E25
846E INC (HL)
846F CALL HandlerBatlet_32
8472 DEC E
8473 JP Z,HandlerBatlet_54
8476 CALL HandlerBatlet_39
8479 DEC E
847A JP Z,HandlerBatlet_42
847D LD DE,($5E1D)
8481 LD (IX+$0F),$00
8485 LD (IX+$05),$46
8489 LD A,(IX+$07)
848C AND $0F
848E JR NZ,HandlerBatlet_21
8490 LD A,R
8492 AND $03
8494 LD (IX+$06),A
HandlerBatlet_21 8497 BIT 0,(IX+$07)
849B JR NZ,HandlerBatlet_23
849D BIT 0,(IX+$06)
84A1 JP Z,HandlerBatlet_30
84A4 LD A,(IX+$08)
84A7 CP $02
84A9 JR Z,HandlerBatlet_22
84AB INC (IX+$08)
HandlerBatlet_22 84AE BIT 1,(IX+$06)
84B2 JP Z,HandlerBatlet_31
84B5 LD A,(IX+$09)
84B8 CP $02
84BA JR Z,HandlerBatlet_23
84BC INC (IX+$09)
HandlerBatlet_23 84BF INC (IX+$07)
84C2 LD A,(IX+$07)
84C5 AND $01
84C7 XOR (IX+$00)
84CA LD (IX+$00),A
HandlerBatlet_24 84CD LD A,(IX+$03)
84D0 ADD A,(IX+$08)
84D3 LD C,A
84D4 SUB $58
84D6 JR C,HandlerBatlet_25
84D8 CP E
84D9 JR C,HandlerBatlet_26
84DB RES 0,(IX+$06)
84DF LD (IX+$08),$FE
84E3 LD C,(IX+$03)
84E6 JR HandlerBatlet_26
HandlerBatlet_25 84E8 NEG
84EA CP E
84EB JR C,HandlerBatlet_26
84ED SET 0,(IX+$06)
84F1 LD C,(IX+$03)
84F4 LD (IX+$08),$02
HandlerBatlet_26 84F8 LD A,(IX+$04)
84FB ADD A,(IX+$09)
84FE LD B,A
84FF SUB $68
8501 JR C,HandlerBatlet_27
8503 CP D
8504 JR C,HandlerBatlet_28
8506 RES 1,(IX+$06)
850A LD (IX+$09),$FE
850E LD B,(IX+$04)
8511 JR HandlerBatlet_28
HandlerBatlet_27 8513 NEG
8515 CP D
8516 JR C,HandlerBatlet_28
8518 SET 1,(IX+$06)
851C LD B,(IX+$04)
851F LD (IX+$09),$02
HandlerBatlet_28 8523 LD (IX+$03),C
8526 LD (IX+$04),B
8529 LD A,($EA91)
852C CP (IX+$01)
852F RET NZ
8530 LD A,(IX+$00)
8533 AND $FC
8535 CP $9C
8537 JR Z,HandlerBatlet_29
8539 AND $F0
853B CP $70
853D JR Z,HandlerBatlet_29
853F LD A,($EA90)
8542 CP $31
8544 JP NC,HandlerBatlet_54
HandlerBatlet_29 8547 JP HandlerKnight_6
HandlerBatlet_30 854A LD A,(IX+$08)
854D CP $FE
854F JP Z,HandlerBatlet_22
8552 DEC (IX+$08)
8555 JP HandlerBatlet_22
HandlerBatlet_31 8558 LD A,(IX+$09)
855B CP $FE
855D JP Z,HandlerBatlet_23
8560 DEC (IX+$09)
8563 JP HandlerBatlet_23
HandlerBatlet_32 8566 LD A,($EA99)
8569 LD E,$00
856B CP (IX+$01)
856E RET NZ
856F LD A,($EA98)
8572 AND A
8573 RET Z
8574 LD A,($EA9B)
8577 SUB (IX+$03)
857A JP P,HandlerBatlet_33
857D NEG
HandlerBatlet_33 857F CP $0C
8581 RET NC
8582 LD A,($EA9C)
8585 SUB (IX+$04)
8588 JP P,HandlerBatlet_34
858B NEG
HandlerBatlet_34 858D CP $0C
858F RET NC
8590 LD A,$01
8592 LD ($EA9A),A
8595 LD E,$01
8597 RET
HandlerBatlet_35 8598 LD A,B
8599 SUB $08
859B LD B,A
859C LD A,R
859E INC HL
HandlerBatlet_36 859F CP B
85A0 JR C,HandlerBatlet_37
85A2 SUB B
85A3 JR HandlerBatlet_36
HandlerBatlet_37 85A5 LD C,A
85A6 LD A,R
85A8 BIT 1,A
85AA LD A,$60
85AC JR Z,HandlerBatlet_38
85AE ADD A,C
85AF RET
HandlerBatlet_38 85B0 SUB C
85B1 RET
HandlerBatlet_39 85B2 LD A,($EA91)
85B5 LD E,$00
85B7 CP (IX+$01)
85BA RET NZ
85BB LD A,($EA90)
85BE AND A
85BF RET Z
85C0 CP $31
85C2 RET NC
85C3 LD A,($EA93)
85C6 SUB (IX+$03)
85C9 JP P,HandlerBatlet_40
85CC NEG
HandlerBatlet_40 85CE CP $0C
85D0 RET NC
85D1 LD A,($EA94)
85D4 SUB (IX+$04)
85D7 JP P,HandlerBatlet_41
85DA NEG
HandlerBatlet_41 85DC CP $0C
85DE RET NC
85DF LD A,$01
85E1 LD ($EA92),A
85E4 CALL SoundsTouching
85E7 LD E,$01
85E9 RET
HandlerBatlet_42 85EA CALL HandlerKnight_11
85ED JP HandlerBatlet_54
HandlerBatlet_43 85F0 DEC (IX+$0F)
85F3 RET NZ
85F4 JP HandlerWeapon_7
85F7 CALL StoreEntity
85FA LD A,($EA91)
85FD CP (IX+$01)
8600 JP NZ,HandlerBatlet_43
8603 LD HL,$5E25
8606 INC (HL)
8607 DEC (IX+$0E)
860A JR Z,HandlerBatlet_44
860C LD A,(IX+$0E)
860F AND $03
8611 ADD A,$58
8613 LD (IX+$00),A
8616 LD (IX+$0F),$80
861A LD A,($EA90)
861D CP $31
861F JP NC,HandlerBatlet_54
8622 JP HandlerKnight_6
HandlerBatlet_44 8625 LD A,(IX+$02)
8628 LD (IX+$00),A
862B JP HandlerKnight_6
862E CALL StoreEntity
8631 LD A,($EA91)
8634 CP (IX+$01)
8637 JP NZ,HandlerBatlet_43
863A LD HL,$5E25
863D INC (HL)
863E CALL HandlerBatlet_39
8641 DEC E
8642 JP Z,HandlerBatlet_42
8645 CALL HandlerBatlet_32
8648 DEC E
8649 JP Z,HandlerBatlet_54
864C LD (IX+$05),$45
8650 INC (IX+$07)
8653 CALL Z,HandlerBatlet_48
8656 LD A,(IX+$07)
8659 RRA
865A RRA
865B AND $01
865D LD C,A
865E LD A,(IX+$00)
8661 AND $FE
8663 ADD A,C
8664 LD (IX+$00),A
8667 LD DE,($5E1D)
866B LD (IX+$0F),$00
866F JP HandlerBatlet_24
8672 CALL StoreEntity
8675 LD A,($EA91)
8678 CP (IX+$01)
867B JP NZ,HandlerBatlet_43
867E LD HL,$5E25
8681 INC (HL)
8682 LD (IX+$0F),$00
8686 CALL HandlerBatlet_39
8689 DEC E
868A JP Z,HandlerBatlet_42
868D CALL HandlerBatlet_32
8690 DEC E
8691 JP Z,HandlerBatlet_54
8694 LD A,(IX+$0A)
8697 RRA
8698 AND $01
869A LD C,A
869B LD A,(IX+$00)
869E AND $FE
86A0 ADD A,C
86A1 LD (IX+$00),A
86A4 LD DE,($5E1D)
86A8 INC (IX+$0A)
86AB LD A,(IX+$0A)
86AE CP $07
86B0 JR NZ,HandlerBatlet_45
86B2 CALL HandlerBatlet_48
86B5 LD (IX+$0A),$F9
HandlerBatlet_45 86B9 SRA A
86BB ADD A,(IX+$04)
86BE LD C,A
86BF SUB $68
86C1 JP P,HandlerBatlet_47
86C4 NEG
86C6 CP D
86C7 JR C,HandlerBatlet_46
86C9 LD (IX+$09),$02
86CD SET 1,(IX+$06)
86D1 BIT 7,(IX+$0A)
86D5 JR Z,HandlerBatlet_46
86D7 LD (IX+$0A),$00
HandlerBatlet_46 86DB LD (IX+$04),C
86DE JP HandlerBatlet_24
HandlerBatlet_47 86E1 CP D
86E2 JR C,HandlerBatlet_46
86E4 RES 1,(IX+$06)
86E8 LD (IX+$09),$FE
86EC LD (IX+$0A),$F9
86F0 JR HandlerBatlet_46
HandlerBatlet_48 86F2 LD A,R
86F4 BIT 0,A
86F6 JR Z,HandlerBatlet_51
86F8 AND $04
86FA SUB $02
HandlerBatlet_49 86FC LD (IX+$09),A
86FF LD A,R
8701 RRA
8702 BIT 0,A
8704 JR Z,HandlerBatlet_52
8706 AND $04
8708 SUB $02
HandlerBatlet_50 870A LD (IX+$08),A
870D RET
HandlerBatlet_51 870E AND $02
8710 SUB $01
8712 JR HandlerBatlet_49
HandlerBatlet_52 8714 AND $02
8716 SUB $01
8718 JR HandlerBatlet_50
871A CALL StoreEntity
871D LD A,($EA91)
8720 CP (IX+$01)
8723 JP NZ,HandlerBatlet_43
8726 LD HL,$5E25
8729 INC (HL)
872A LD (IX+$0F),$00
872E CALL HandlerBatlet_39
8731 DEC E
8732 JP Z,HandlerBatlet_42
8735 CALL HandlerBatlet_32
8738 DEC E
8739 JP Z,HandlerBatlet_54
873C LD DE,($5E1D)
8740 DEC (IX+$0D)
8743 JR NZ,HandlerBatlet_53
8745 LD (IX+$0D),$11
8749 CALL HandlerBatlet_48
HandlerBatlet_53 874C LD A,(IX+$0D)
874F RRA
8750 AND $01
8752 LD C,A
8753 LD A,(IX+$00)
8756 AND $FE
8758 ADD A,C
8759 LD (IX+$00),A
875C JP HandlerBatlet_24
HandlerBatlet_54 875F LD A,(IX+$05)
8762 PUSH AF
8763 LD A,($5E1A)
8766 LD (IX+$05),A
8769 CALL RemoveEntity
876C CALL SetEntityAttributes_0
876F POP AF
8770 LD (IX+$05),A
8773 LD (IX+$00),$6C
8777 LD (IX+$0E),$10
877B LD BC,$0155
877E CALL AddToScore
8781 CALL DrawEntity
8784 JP SetEntityAttributes_0
8787 CALL StoreEntity
878A LD A,($EA91)
878D CP (IX+$01)
8790 JP NZ,HandlerBatlet_43
8793 DEC (IX+$0E)
8796 JP Z,HandlerWeapon_6
8799 LD A,(IX+$0E)
879C AND $03
879E ADD A,$6C
87A0 LD (IX+$00),A
87A3 JP HandlerKnight_6
87A6 CALL StoreEntity
87A9 LD A,($EA91)
87AC CP (IX+$01)
87AF JP NZ,HandlerBatlet_43
87B2 LD HL,$5E25
87B5 INC (HL)
87B6 CALL HandlerBatlet_32
87B9 DEC E
87BA JP Z,HandlerBatlet_54
87BD CALL HandlerBatlet_39
87C0 DEC E
87C1 JP Z,HandlerBatlet_42
87C4 LD DE,($5E1D)
87C8 LD (IX+$0F),$00
87CC LD (IX+$05),$46
87D0 LD A,(IX+$07)
87D3 AND $07
87D5 JR NZ,HandlerBatlet_55
87D7 LD A,R
87D9 AND $03
87DB LD (IX+$06),A
HandlerBatlet_55 87DE BIT 0,(IX+$07)
87E2 JR NZ,HandlerBatlet_57
87E4 BIT 0,(IX+$06)
87E8 JR Z,HandlerBatlet_58
87EA LD A,(IX+$08)
87ED CP $02
87EF JR Z,HandlerBatlet_56
87F1 INC (IX+$08)
HandlerBatlet_56 87F4 BIT 1,(IX+$06)
87F8 JR Z,HandlerBatlet_59
87FA LD A,(IX+$09)
87FD CP $02
87FF JR Z,HandlerBatlet_57
8801 INC (IX+$09)
HandlerBatlet_57 8804 INC (IX+$07)
8807 LD A,(IX+$07)
880A AND $01
880C XOR (IX+$00)
880F LD (IX+$00),A
8812 JP HandlerBatlet_24
HandlerBatlet_58 8815 LD A,(IX+$08)
8818 CP $FE
881A JR Z,HandlerBatlet_56
881C DEC (IX+$08)
881F JR HandlerBatlet_56
HandlerBatlet_59 8821 LD A,(IX+$09)
8824 CP $FE
8826 JR Z,HandlerBatlet_57
8828 DEC (IX+$09)
882B JR HandlerBatlet_57
HandlerBatlet_60 882D LD C,$00
882F LD A,D
8830 CP (IX+$04)
8833 JR Z,HandlerBatlet_62
8835 JR NC,HandlerBatlet_63
8837 LD (IX+$09),$FF
HandlerBatlet_61 883B LD A,E
883C CP (IX+$03)
883F JR Z,HandlerBatlet_64
8841 JR NC,HandlerBatlet_65
8843 LD (IX+$08),$FF
8847 RET
HandlerBatlet_62 8848 LD (IX+$09),$00
884C SET 0,C
884E JR HandlerBatlet_61
HandlerBatlet_63 8850 LD (IX+$09),$01
8854 JR HandlerBatlet_61
HandlerBatlet_64 8856 LD (IX+$08),$00
885A SET 1,C
885C RET
HandlerBatlet_65 885D LD (IX+$08),$01
8861 RET
8862 CALL StoreEntity
8865 CALL HandlerBatlet_39
8868 DEC E
8869 CALL Z,HandlerBatlet_82
886C LD HL,$EAE0
886F LD A,(HL)
8870 AND A
8871 JR Z,HandlerBatlet_66
8873 INC HL
8874 LD A,(HL)
8875 CP (IX+$01)
8878 JR NZ,HandlerBatlet_66
887A INC HL
887B INC HL
887C LD E,(HL)
887D INC HL
887E LD D,(HL)
887F JR HandlerBatlet_70
HandlerBatlet_66 8881 BIT 7,(IX+$06)
8885 JR NZ,HandlerBatlet_73
8887 LD HL,$EAC8
888A LD A,(HL)
888B AND A
888C JR Z,HandlerBatlet_72
888E INC HL
888F LD A,(HL)
8890 CP (IX+$01)
8893 JR NZ,HandlerBatlet_72
8895 LD D,(IX+$0C)
8898 LD E,(IX+$0B)
889B CALL HandlerBatlet_60
889E LD A,C
889F CP $03
88A1 JR Z,HandlerBatlet_68
HandlerBatlet_67 88A3 LD A,($5E12)
88A6 RRA
88A7 RRA
88A8 AND $03
88AA ADD A,$70
88AC LD (IX+$00),A
88AF LD DE,$3838
88B2 JP HandlerBatlet_80
HandlerBatlet_68 88B5 BIT 6,(IX+$06)
88B9 JR Z,HandlerBatlet_69
88BB LD (IX+$0B),$8C
88BF LD (IX+$0C),$68
88C3 RES 6,(IX+$06)
88C7 JR HandlerBatlet_67
HandlerBatlet_69 88C9 LD (IX+$0B),$68
88CD LD (IX+$0C),$38
88D1 SET 6,(IX+$06)
88D5 JR HandlerBatlet_67
HandlerBatlet_70 88D7 CALL HandlerBatlet_60
88DA LD A,C
88DB CP $03
88DD JR NZ,HandlerBatlet_67
88DF PUSH IX
88E1 LD IX,$EAE0
88E5 LD A,($EA91)
88E8 CP (IX+$01)
88EB JR NZ,HandlerBatlet_71
88ED CALL DrawEntity
HandlerBatlet_71 88F0 POP IX
88F2 LD A,$6B
88F4 LD ($EAE1),A
88F7 JR HandlerBatlet_68
HandlerBatlet_72 88F9 SET 7,(IX+$06)
HandlerBatlet_73 88FD LD DE,($EA93)
8901 CALL HandlerBatlet_60
8904 JR HandlerBatlet_67
8906 CALL StoreEntity
8909 CALL HandlerBatlet_39
890C DEC E
890D CALL Z,HandlerBatlet_82
8910 LD DE,$468A
8913 CALL HandlerCaveDoorLocked_2
8916 JR NZ,HandlerBatlet_74
8918 LD DE,($EA93)
891C CALL HandlerBatlet_60
891F LD A,(IX+$08)
8922 NEG
8924 LD (IX+$08),A
8927 LD A,(IX+$09)
892A NEG
892C LD (IX+$09),A
892F JR HandlerBatlet_75
HandlerBatlet_74 8931 LD A,($EA91)
8934 CP (IX+$01)
8937 JR NZ,HandlerBatlet_76
8939 LD DE,($EA93)
893D CALL HandlerBatlet_60
HandlerBatlet_75 8940 LD A,($5E12)
8943 RRA
8944 RRA
8945 AND $03
8947 ADD A,$7C
8949 LD (IX+$00),A
894C LD DE,$3434
894F JP HandlerBatlet_80
HandlerBatlet_76 8952 LD (IX+$0B),$68
8956 LD (IX+$0C),$68
895A CALL HandlerBatlet_60
895D LD A,($5C78)
8960 AND A
8961 JP NZ,HandlerBatlet_75
8964 LD A,R
8966 AND $7F
8968 LD C,A
8969 CALL HandlerBatlet_77
896C CP $03
896E JP NC,HandlerBatlet_75
8971 LD A,($EA91)
8974 CP C
8975 JP Z,HandlerBatlet_75
8978 LD (IX+$01),C
897B JR HandlerBatlet_75
HandlerBatlet_77 897D LD L,A
897E LD H,$00
8980 LD DE,$A854
8983 ADD HL,HL
8984 ADD HL,DE
8985 INC HL
8986 LD A,(HL)
8987 RET
8988 CALL StoreEntity
898B CALL HandlerBatlet_39
898E DEC E
898F JR NZ,HandlerBatlet_79
8991 LD DE,$458B
8994 CALL HandlerCaveDoorLocked_2
8997 JR NZ,HandlerBatlet_78
8999 LD BC,$1000
899C CALL AddToScore
899F JP HandlerBatlet_54
HandlerBatlet_78 89A2 CALL HandlerBatlet_82
HandlerBatlet_79 89A5 LD DE,($EA93)
89A9 CALL HandlerBatlet_60
89AC LD A,($5E12)
89AF RRA
89B0 RRA
89B1 AND $03
89B3 ADD A,$74
89B5 LD (IX+$00),A
89B8 LD DE,$3434
HandlerBatlet_80 89BB LD A,($EA90)
89BE CP $31
89C0 JP C,HandlerBatlet_24
89C3 LD DE,($EA93)
89C7 CALL HandlerBatlet_60
89CA LD A,(IX+$08)
89CD NEG
89CF LD (IX+$08),A
89D2 LD C,A
89D3 LD A,(IX+$09)
89D6 NEG
89D8 LD (IX+$09),A
89DB LD DE,$3434
89DE AND C
89DF JP NZ,HandlerBatlet_24
89E2 LD (IX+$08),$01
89E6 LD (IX+$09),$01
89EA JP HandlerBatlet_24
89ED CALL StoreEntity
89F0 CALL HandlerBatlet_39
89F3 DEC E
89F4 CALL Z,HandlerBatlet_82
89F7 LD DE,($EA93)
89FB CALL HandlerBatlet_60
89FE LD A,(IX+$00)
8A01 AND $FC
8A03 LD C,A
8A04 LD A,($5E12)
8A07 RRA
8A08 RRA
8A09 AND $03
8A0B ADD A,C
8A0C LD (IX+$00),A
8A0F LD DE,$3434
8A12 JP HandlerBatlet_80
HandlerBatlet_81 8A15 LD A,($5E28)
8A18 SUB $10
8A1A JR C,HandlerBatlet_84
8A1C JR HandlerBatlet_83
HandlerBatlet_82 8A1E LD A,($5E28)
8A21 SUB $08
8A23 JR C,HandlerBatlet_84
HandlerBatlet_83 8A25 LD ($5E28),A
8A28 JP DrawChicken
HandlerBatlet_84 8A2B POP HL
8A2C JP HandlerKnight_8
8A2F CALL StoreEntity
8A32 LD A,($EA91)
8A35 CP (IX+$01)
8A38 JP NZ,HandlerBatlet_43
8A3B LD HL,$5E25
8A3E INC (HL)
8A3F CALL HandlerBatlet_39
8A42 DEC E
8A43 JP Z,HandlerBatlet_42
8A46 CALL HandlerBatlet_32
8A49 DEC E
8A4A JP Z,HandlerBatlet_54
8A4D DEC (IX+$0D)
8A50 JR NZ,HandlerBatlet_85
8A52 CALL HandlerBatlet_48
8A55 SRA (IX+$09)
8A59 LD (IX+$0D),$10
HandlerBatlet_85 8A5D LD A,(IX+$00)
8A60 AND $FC
8A62 BIT 7,(IX+$08)
8A66 JR NZ,HandlerBatlet_86
8A68 ADD A,$02
HandlerBatlet_86 8A6A LD C,A
8A6B LD A,(IX+$0D)
8A6E RRA
8A6F AND $01
8A71 ADD A,C
8A72 LD (IX+$00),A
8A75 LD DE,($5E1D)
8A79 LD (IX+$05),$43
8A7D JP HandlerBatlet_24
8A80 CALL StoreEntity
8A83 LD A,($EA91)
8A86 CP (IX+$01)
8A89 JP NZ,HandlerBatlet_43
8A8C LD HL,$5E25
8A8F INC (HL)
8A90 CALL HandlerBatlet_39
8A93 DEC E
8A94 JP Z,HandlerBatlet_42
8A97 CALL HandlerBatlet_32
8A9A DEC E
8A9B JP Z,HandlerBatlet_54
8A9E DEC (IX+$0D)
8AA1 JR NZ,HandlerBatlet_87
8AA3 CALL HandlerBatlet_48
8AA6 LD A,($5C78)
8AA9 AND $04
8AAB SUB $02
8AAD LD (IX+$08),A
8AB0 SRA (IX+$09)
8AB4 LD (IX+$0D),$20
HandlerBatlet_87 8AB8 LD A,(IX+$00)
8ABB AND $FC
8ABD BIT 7,(IX+$08)
8AC1 JR NZ,HandlerBatlet_88
8AC3 ADD A,$02
HandlerBatlet_88 8AC5 LD C,A
8AC6 LD A,(IX+$0D)
8AC9 RRA
8ACA AND $01
8ACC ADD A,C
8ACD LD (IX+$00),A
8AD0 LD DE,($5E1D)
8AD4 LD (IX+$05),$42
8AD8 JP HandlerBatlet_24
HandlerBatlet_89 8ADB LD HL,$EB18
8ADE LD DE,$0008
8AE1 LD B,$08
HandlerBatlet_90 8AE3 PUSH HL
8AE4 LD A,(HL)
8AE5 AND A
8AE6 JR Z,HandlerBatlet_91
8AE8 INC HL
8AE9 LD A,(HL)
8AEA CP (IX+$01)
8AED JR NZ,HandlerBatlet_91
8AEF POP DE
8AF0 INC HL
8AF1 INC HL
8AF2 LD E,(HL)
8AF3 INC HL
8AF4 LD D,(HL)
8AF5 LD C,$01
8AF7 RET
HandlerBatlet_91 8AF8 POP HL
8AF9 ADD HL,DE
8AFA DJNZ HandlerBatlet_90
8AFC LD C,$00
8AFE RET
8AFF CALL StoreEntity
8B02 CALL HandlerBatlet_39
8B05 DEC E
8B06 CALL Z,HandlerBatlet_81
8B09 XOR A
8B0A LD (IX+$09),A
8B0D LD (IX+$08),A
8B10 CALL HandlerBatlet_89
8B13 DEC C
8B14 JP NZ,HandlerBatlet_94
8B17 CALL HandlerBatlet_60
8B1A LD A,C
8B1B CP $03
8B1D JR NZ,HandlerBatlet_93
8B1F CALL HandlerBatlet_89
8B22 LD DE,$0004
8B25 AND A
8B26 SBC HL,DE
8B28 PUSH IX
8B2A LD IX,$0000
8B2E EX DE,HL
8B2F ADD IX,DE
8B31 LD A,($EA91)
8B34 CP (IX+$01)
8B37 JR NZ,HandlerBatlet_92
8B39 CALL DrawEntity
HandlerBatlet_92 8B3C LD (IX+$00),$00
8B40 POP IX
8B42 JP HandlerBatlet_94
HandlerBatlet_93 8B45 LD A,(IX+$00)
8B48 AND $FC
8B4A LD C,A
8B4B LD A,($5E12)
8B4E RRA
8B4F RRA
8B50 AND $03
8B52 ADD A,C
8B53 LD (IX+$00),A
8B56 LD DE,$3C3C
HandlerBatlet_94 8B59 LD A,($EA90)
8B5C CP $31
8B5E JP C,HandlerBatlet_24
8B61 LD DE,$3A58
8B64 CALL HandlerBatlet_60
8B67 JP HandlerBatlet_24
Prev: 82F1 Up: Map Next: 8B6A