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
|
; VBlank: Write loading text, then wait for generation, then loading vram stuff
; When VBlank interrupts -> context switch
; When stat out of vblank interrupt -> context switch back to generation
New_Dungeon:
LD SP, $fffe
LD HL, $mem_loaded_enemies_indices
LD A, $02
LD (HL+), A
LD (HL+), A
LD A, $00
LD (HL+), A
LD A, $03
LD (HL+), A
LD A, $06
LD $mem_loaded_special_entity_index, A
LD HL, $mem_bunny_attacks
LD A, $00
LD (HL+), A
INC A
LD (HL+), A
INC A
LD (HL+), A
INC A
LD (HL+), A
CALL =Reload_EP_Cost
CALL =Dungeon_Generation
CALL =Initialize_Entities
CALL =Initialize_Objects
; Reset animations
LD HL, $mem_animation_list
LD BC, $1f
CALL =bzero
LD A, $00
LD $mem_display_flag, A
LD $mem_moving_animation_step, A
LD $mem_animation_wait_frames, A
LD $mem_blinking_animation_counter, A
LD A, $mem_bunny_x
LD $mem_bunny_predicted_x, A
LD A, $mem_bunny_y
LD $mem_bunny_predicted_y, A
LD A, $mem_map_loading_flags
RES 3, A
LD $mem_map_loading_flags, A
LD A, $enum_dungeon_mode
LD $mem_current_mode, A
LD $mem_requested_mode, A
CALL =Update_VBlank_Handler
; Heart
LD A, $f0
LD ($9d62), A
; Energy points
LD A, $f1
LD ($9d66), A
; Floor
LD A, $f4
LD ($9d73), A
CALL =Generation_Event_Execution
CALL =Reload_Entities_Tile_Data
CALL =Reset_Entities_Collision_Map
; Clear OAM
LD HL, $fe00
LD BC, $00a0
CALL =bzero
CALL =Load_Tile
CALL =Load_Map
CALL =Load_Objects
LD HL, $9d71
LD A, $mem_floor_count
CALL =Print_8bit
.SET_WINDOW_LCDC_E
.ENABLE_TOP_BAR
.ENABLE_VBLANK_INTERRUPTS
EI
Wait_for_Interrupt.loop:
HALT
EI
JP =Wait_for_Interrupt.loop
|
