cleanup
This commit is contained in:
parent
b5249a1717
commit
21cb61eb0a
6 changed files with 7 additions and 38 deletions
10
src/Draw.pbi
10
src/Draw.pbi
|
@ -32,12 +32,4 @@ EndProcedure
|
|||
|
||||
Procedure DrawRunningGame()
|
||||
Box(0, 0, 200, 200, RGB(0, 255, 0))
|
||||
EndProcedure
|
||||
; IDE Options = PureBasic 4.51 (MacOS X - x86)
|
||||
; CursorPosition = 8
|
||||
; Folding = -
|
||||
; EnableUnicode
|
||||
; EnableThread
|
||||
; EnableXP
|
||||
; EnableCompileCount = 0
|
||||
; EnableBuildCount = 0
|
||||
EndProcedure
|
|
@ -35,12 +35,4 @@ Procedure HandleEventMenu()
|
|||
EndProcedure
|
||||
|
||||
Procedure HandleEventRunningGame()
|
||||
EndProcedure
|
||||
; IDE Options = PureBasic 4.51 (MacOS X - x86)
|
||||
; CursorPosition = 32
|
||||
; Folding = -
|
||||
; EnableUnicode
|
||||
; EnableThread
|
||||
; EnableXP
|
||||
; EnableCompileCount = 0
|
||||
; EnableBuildCount = 0
|
||||
EndProcedure
|
|
@ -1 +1 @@
|
|||
; This file holds all the functions If it gets too big,
; we can split it in categories
; *****************************************************************************
; * Tileset
Procedure InitTileset()
Debug "Init tileset"
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
; *****************************************************************************
; IDE Options = PureBasic 4.51 (MacOS X - x86)
; CursorPosition = 7
; 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
; *****************************************************************************
|
|
@ -12,9 +12,4 @@ 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
|
||||
Global Font_H2 = LoadFont(2, "Verdana", 18)
|
|
@ -111,8 +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 = 49
|
||||
; EnableXP
|
||||
; EnableCompileCount = 0
|
||||
; EnableBuildCount = 0
|
||||
|
||||
End
|
|
@ -30,11 +30,4 @@ EndStructure
|
|||
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
|
||||
EndStructure
|
Loading…
Reference in a new issue