aboutsummaryrefslogtreecommitdiff
path: root/playerattacks.gbasm
blob: 2257e54b6dbf12a6c65d74e335ee7dd09691e4ac (plain)
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
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
Loading_Mode_VBlank:
	LD A, $mem_current_mode
	CP $enum_loading_mode
	RET NZ

	LD A, $mem_loading_mode_vblank_func_pointer_high
	LD B, A
	LD A, $mem_loading_mode_vblank_func_pointer_low
	LD C, A
	PUSH BC
	RET

Loading_Mode_Regular:
	LD A, $mem_current_mode
	CP $enum_loading_mode
	RET NZ

	LD A, $mem_loading_mode_regular_func_pointer_high
	LD B, A
	LD A, $mem_loading_mode_regular_func_pointer_low
	LD C, A
	PUSH BC
	RET

Canceled_Attack_VBlank:
	RET

Canceled_Attack_Regular:
	LD A, $enum_dungeon_mode
	LD $mem_requested_mode, A
	RET

Canceled_Attack:
	LD HL, $mem_entities_list
	LD A, L
	ADD $13
	LD L, A
	Reset_Entities_Animations.loop:
		LD A, (HL)
		AND $07
		LD (HL), A
		Reset_Entities_Animations.loop.next:
		LD A, L
		AND $f0
		ADD $13
		LD L, A
		CP $03
		JR NZ, =Reset_Entities_Animations.loop

	LD BC, =Canceled_Attack_VBlank
	LD A, B
	LD $mem_loading_mode_vblank_func_pointer_high, A
	LD A, C
	LD $mem_loading_mode_vblank_func_pointer_low, A

	LD BC, =Canceled_Attack_Regular
	LD A, B
	LD $mem_loading_mode_regular_func_pointer_high, A
	LD A, C
	LD $mem_loading_mode_regular_func_pointer_low, A

	LD A, $enum_loading_mode
	LD $mem_requested_mode, A

	.CLOSE_DIALOGUE

	LD A, $mem_map_loading_flags
	SET 3, A
	LD $mem_map_loading_flags, A

	LD A, $mem_bunny_direction
	OR $40
	LD $mem_bunny_direction, A
	RET

Attack_List:
	.Hop:
		; Attack menu name string
		.DB =Hop_Attack_Menu_Txt

		; Attack function
		.DB =Hop_Attack

		; Energy point cost
		.DB $01

		.PADTO =.Hop+8

	.Heal:
		; Attack menu name string
		.DB =Heal_Attack_Menu_Txt

		;Attack function
		.DB =Heal_Attack

		; Energy point cost
		.DB $03

		.PADTO =.Heal+8

	.Freeze:
		; Attack menu name string
		.DB =Freeze_Attack_Menu_Txt

		; Attack function
		.DB =Freeze_Attack

		; Energy point cost
		.DB $03

		.PADTO =.Freeze+8

	.Earcoptr:
		; Attack menu name string
		.DB =Earcoptr_Attack_Menu_Txt

		; Attack function
		.DB =Earcoptr_Attack

		; Energy point cost
		.DB $04

		.PADTO =.Earcoptr+8

.INCLUDE "playerattacks/hop.gbasm"
.INCLUDE "playerattacks/heal.gbasm"
.INCLUDE "playerattacks/freeze.gbasm"
.INCLUDE "playerattacks/earcoptr.gbasm"