aboutsummaryrefslogtreecommitdiff
path: root/playerattacks/freeze.gbasm
blob: 936bf47a27640834497d808c4355504757e6e749 (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
Freeze_Attack_Loading_VBlank:
	LD A, $mem_prepared_viewport_x
	LD B, A
	LD A, $mem_loading_step
	SRA A
	AND $03
	BIT 1, A
	RES 1, A
	JR NZ, =.Shaking_Animation.skip_invert
	CPL
	INC A
	.Shaking_Animation.skip_invert:
	ADD B
	LD $mem_prepared_viewport_x, A

	LD A, $mem_loading_step
	SRA A
	SRA A
	BIT 0, A
	JR Z, =.Blink_Animation.dark_palette
	LD A, $palette_normal
	LD $mem_prepared_color_palette, A
	JR =.end

	.Blink_Animation.dark_palette:
	LD A, $palette_white
	LD $mem_prepared_color_palette, A

	.end:
	LD A, $mem_loading_step
	INC A
	AND $0f
	LD $mem_loading_step, A
	CP $00
	RET NZ

	LD A, $enum_dungeon_mode
	LD $mem_current_mode, A
	LD $mem_requested_mode, A
	LD A, $mem_map_loading_flags
	SET 3, A
	LD $mem_map_loading_flags, A
	RET

Freeze_Attack_Loading_Regular:
	LD A, $mem_loading_step
	CP $00
	RET Z

	LD BC, $mem_entities_list
	SLA A
	SLA A
	SLA A
	SLA A
	INC A
	LD C, A

	LD A, (BC)
	LD E, A

	LD A, $mem_bunny_x
	SUB E
	.ABS

	LD D, A

	INC C

	LD A, (BC)
	LD E, A

	LD A, $mem_bunny_y
	SUB E
	.ABS

	ADD D
	LD D, A

	LD A, $02
	CP D

	RET C

	LD A, C
	ADD $05
	LD C, A
	LD A, (BC)
	SET 1, A
	LD (BC), A

	INC C
	LD A, $01
	LD (BC), A
	RET

Freeze_Attack:
	LD BC, =Freeze_Attack_Loading_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, =Freeze_Attack_Loading_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
	RET