hud and some player stuff
This commit is contained in:
parent
355d831f70
commit
345592067b
5 changed files with 22 additions and 4 deletions
BIN
data/gfx/hud.psd
Normal file
BIN
data/gfx/hud.psd
Normal file
Binary file not shown.
|
@ -159,6 +159,8 @@ EndProcedure
|
|||
Procedure DrawHUD()
|
||||
EndProcedure
|
||||
|
||||
; and ..
|
||||
|
||||
|
||||
; *****************************************************************************
|
||||
; * Menu
|
||||
|
|
|
@ -13,6 +13,12 @@
|
|||
#TILESET_TYPE_SOLID = 3
|
||||
#TILESET_TYPE_GRASS = 4
|
||||
|
||||
; Player directions
|
||||
#PLAYER_DIR_UP = 0
|
||||
#PLAYER_DIR_RIGHT = 0
|
||||
#PLAYER_DIR_DOWN = 0
|
||||
#PLAYER_DIR_LEFT = 0
|
||||
|
||||
; Global variables
|
||||
Global Fullscreen = 0
|
||||
Global Title.s = "ESCape - Build " + Str(#PB_Editor_BuildCount)
|
||||
|
@ -20,9 +26,10 @@ Global Screen.ScreenDimension\width = 800
|
|||
Screen.ScreenDimension\height = 600
|
||||
|
||||
; Player
|
||||
Global Player.Tile\X = 0
|
||||
Player.Tile\Y = 0
|
||||
Player.Tile\TileNumber = 0
|
||||
Global Player.Player\X = 0
|
||||
Player.Player\Y = 0
|
||||
Player.Player\TileNumber = 0
|
||||
Player.Player\Direction = #PLAYER_DIR_RIGHT
|
||||
|
||||
; Camera
|
||||
Global Cam.Camera\X = 0
|
||||
|
|
|
@ -71,11 +71,11 @@ menus("RLY_QUIT")\Entries() = Item
|
|||
*ActiveMenu.GameMenu = @Menus(CurrentState)
|
||||
|
||||
|
||||
|
||||
; Start the main loop which will create the window, wait for events and draw things
|
||||
; on the screen. To escape from this loop, press ESC or close the window.
|
||||
If OpenWindow(0, 0, 0, Screen\Width, Screen\Height, title, #PB_Window_ScreenCentered)
|
||||
OpenWindowedScreen(WindowID(0), 0, 0, Screen\Width, Screen\Height, 0, 0, 0)
|
||||
SetFrameRate(40)
|
||||
|
||||
InitGraphics()
|
||||
InitTileset()
|
||||
|
@ -108,6 +108,8 @@ If OpenWindow(0, 0, 0, Screen\Width, Screen\Height, title, #PB_Window_ScreenCent
|
|||
OpenWindowedScreen(WindowID(0), 0, 0, 800, 600, 0, 0, 0)
|
||||
Fullscreen = 0
|
||||
EndIf
|
||||
|
||||
SetFrameRate(40)
|
||||
InitGraphics()
|
||||
InitTileset()
|
||||
EndIf
|
||||
|
|
|
@ -43,6 +43,13 @@ Structure Tile
|
|||
Health.i
|
||||
EndStructure
|
||||
|
||||
Structure Player
|
||||
X.i
|
||||
Y.i
|
||||
TileNumber.i
|
||||
Direction.i
|
||||
EndStructure
|
||||
|
||||
Structure Shadow
|
||||
X.i
|
||||
Y.i
|
||||
|
|
Loading…
Reference in a new issue