From 5513939c6077032f625c2de98f395026caf063b1 Mon Sep 17 00:00:00 2001 From: Astatin Date: Tue, 22 Oct 2024 18:01:00 +0900 Subject: Add white window at the top for future health bar --- main.gbasm | 29 ++++++++++++++++++++++++++++- 1 file changed, 28 insertions(+), 1 deletion(-) (limited to 'main.gbasm') diff --git a/main.gbasm b/main.gbasm index a3447d2..eed71e3 100644 --- a/main.gbasm +++ b/main.gbasm @@ -22,9 +22,36 @@ New_Dungeon: JP =Wait_for_VRAM.loop VBLANK_Entrypoint: + ; Window enable + LD A, $reg_lcd_controller + OR $60 + AND $fd + LD $reg_lcd_controller, A + + LD A, $00 + LD $reg_viewport_y, A + LD $reg_viewport_x, A + + LD HL, $9c00 + LD A, $99 + CALL =Print_8bit + CALL =Display_Prepared_Block CALL =Display_Object CALL $OAM_DMA_Transfer_routine + RETI + +STAT_Entrypoint: + LD A, $reg_lcd_controller + AND $9f + OR $02 + LD $reg_lcd_controller, A + + LD A, $mem_prepared_viewport_x + LD $reg_viewport_x, A + + LD A, $mem_prepared_viewport_y + LD $reg_viewport_y, A CALL =Object_Interactions_Check @@ -34,7 +61,7 @@ VBLANK_Entrypoint: CALL =Prepare_Scrolling_Map CALL =Display_Entities - RET + RETI .INCLUDE "tiles.gbasm" .INCLUDE "rng.gbasm" -- cgit v1.2.3-70-g09d2