arg/ld21-ESCape
3
0
Fork 0
Code Issues Pull requests Projects Releases Wiki Activity

Merge branch 'master' of c:/Users/Aaron/Desktop/game/Git

Browse source
This commit is contained in:
Aaron 2011-08-20 17:06:35 +02:00
commit 8b2ea22581
6 changed files with 9 additions and 39 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

8
src/Draw.pbi
View file

@ -33,11 +33,3 @@ EndProcedure
Procedure DrawRunningGame()
Box(0, 0, 200, 200, RGB(0, 255, 0))
EndProcedure
; IDE Options = PureBasic 4.51 (MacOS X - x86)
; CursorPosition = 26
; Folding = -
; EnableUnicode
; EnableThread
; EnableXP
; EnableCompileCount = 0
; EnableBuildCount = 0

8
src/Events.pbi
View file

@ -36,11 +36,3 @@ EndProcedure
Procedure HandleEventRunningGame()
EndProcedure
; IDE Options = PureBasic 4.51 (MacOS X - x86)
; CursorPosition = 32
; Folding = -
; EnableUnicode
; EnableThread
; EnableXP
; EnableCompileCount = 0
; EnableBuildCount = 0

2
src/Functions.pbi
View file

@ -1 +1 @@
; This file holds all the functions If it gets too big, ; we can split it in categories ; ***************************************************************************** ; * Menu Procedure Menu_GotoCurrent() If *ActiveMenu\Entries()\Selected <> #True FirstElement(*ActiveMenu\Entries()); ForEach *ActiveMenu\Entries() If *ActiveMenu\Entries()\Selected = #True Break EndIf Next EndIf EndProcedure ; ***************************************************************************** ; IDE Options = PureBasic 4.51 (MacOS X - x86) ; CursorPosition = 13 ; Folding = - ; EnableXP
; This file holds all the functions If it gets too big, ; we can split it in categories ; ***************************************************************************** ; * Tileset Procedure InitTileset() LoadImage EndProcedure ; ***************************************************************************** ; ***************************************************************************** ; * Menu Procedure Menu_GotoCurrent() If *ActiveMenu\Entries()\Selected <> #True FirstElement(*ActiveMenu\Entries()); ForEach *ActiveMenu\Entries() If *ActiveMenu\Entries()\Selected = #True Break EndIf Next EndIf EndProcedure ; *****************************************************************************

5
src/Globals.pbi
View file

@ -13,8 +13,3 @@ Global *ActiveMenu.GameMenu
; Fonts
Global Font_H1 = LoadFont(1, "Courier", 40, #PB_Font_Bold)
Global Font_H2 = LoadFont(2, "Verdana", 18)
; IDE Options = PureBasic 4.51 (MacOS X - x86)
; CursorPosition = 13
; EnableXP
; EnableCompileCount = 0
; EnableBuildCount = 0

10
src/Main.pb
View file

@ -47,6 +47,8 @@ If ReadFile(0, "../data/menu.data")
CloseFile(0)
EndIf
InitTileset()
Menus("MAIN_MENU")\Title = "ESCape"
Define Item.GameMenuItem
@ -109,9 +111,5 @@ If OpenWindow(0, 0, 0, Screen\Width, Screen\Height, title, #PB_Window_ScreenCent
Delay(1)
Until KeyboardPushed(#PB_Key_Escape)
EndIf
; IDE Options = PureBasic 4.51 (MacOS X - x86)
; CursorPosition = 65
; FirstLine = 9
; EnableXP
; EnableCompileCount = 0
; EnableBuildCount = 0
End

7
src/Structs.pbi
View file

@ -31,10 +31,3 @@ Structure GameMenu
Title.s
List Entries.GameMenuItem()
EndStructure
; IDE Options = PureBasic 4.51 (MacOS X - x86)
; CursorPosition = 32
; EnableUnicode
; EnableThread
; EnableXP
; EnableCompileCount = 1
; EnableBuildCount = 0