32 lines
680 B
Plaintext
32 lines
680 B
Plaintext
|
|
Global DataPath.s = "../data/"
|
|
|
|
; Global variables
|
|
Global Fullscreen = 0
|
|
Global Title.s = "ESCape - Build " + Str(#PB_Editor_BuildCount)
|
|
Global Screen.ScreenDimension\width = 800
|
|
Screen.ScreenDimension\height = 600
|
|
|
|
NewMap GameStates.GameState()
|
|
Global NewMap Menus.GameMenu()
|
|
Global CurrentState.s = "MAIN_MENU"
|
|
Global *ActiveMenu.GameMenu
|
|
|
|
; Fonts
|
|
Global Font_H1 = LoadFont(1, "Courier", 40, #PB_Font_Bold)
|
|
Global Font_H2 = LoadFont(2, "Verdana", 18)
|
|
|
|
; Graphics
|
|
Enumeration 500
|
|
#Tile01
|
|
#Tile02
|
|
#Tile03
|
|
#Tile04
|
|
#Tile05
|
|
#Tile06
|
|
EndEnumeration
|
|
|
|
; Sounds
|
|
Global Dim Sounds.s(2)
|
|
Sounds(0) = DataPath + "sound/menu_change.wav"
|
|
Sounds(1) = DataPath + "sound/menu_select.wav" |