cleanup

src/Draw.pbi

@@ -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 = 8
-; Folding = -
-; EnableUnicode
-; EnableThread
-; EnableXP
-; EnableCompileCount = 0
-; EnableBuildCount = 0

src/Events.pbi

@@ -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

src/Functions.pbi

@@ -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

; *****************************************************************************

src/Globals.pbi

@@ -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

src/Main.pb

@@ -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
+End
-; EnableXP
-; EnableCompileCount = 0
-; EnableBuildCount = 0

src/Structs.pbi

@@ -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