1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
|
Grab_sight_check: ; BC = XY of the enemy. D = direction (must be unchanged). Direction to face in E (or 0 if not)
.vertical:
LD A, $mem_bunny_x
CP B
JR NZ, =.horizontal
; up
LD A, $mem_bunny_y
SUB $02
CP C
LD E, $enum_direction_down
RET Z
; down
ADD $04
CP C
LD E, $enum_direction_up
RET Z
LD E, $00
RET
.horizontal:
LD A, $mem_bunny_y
CP C
LD E, $00
RET NZ
; left
LD A, $mem_bunny_x
SUB $02
CP B
LD E, $enum_direction_right
RET Z
; right
ADD $04
CP B
LD E, $enum_direction_left
RET Z
LD E, $00
RET
Grab_Enemy_Attack: ; Direction to face in E. Result in BC (XY), Direction in D
LD A, E
DEC A
DEC D
XOR D
INC D
CP $00
JR Z, =.attack
BIT 1, A
JR NZ, =.attack
LD D, E
RET
.attack:
LD A, E
OR $10
LD D, A
PUSH BC
LD A, $mem_bunny_direction
AND $08
LD B, A
LD A, $mem_bunny_flags
AND $01
OR B
CP $09
POP BC
RET Z
PUSH DE
PUSH BC
LD D, E
LD A, E
DEC A
XOR $01
INC A
OR $08
LD $mem_bunny_direction, A
CALL =Fix_Bunny_screen
POP BC
POP DE
RET
|
