From b5249a171772971af5a3917319c173671c1aa574 Mon Sep 17 00:00:00 2001 From: =?UTF-8?q?Ruben=20Mu=CC=88ller?= Date: Sat, 20 Aug 2011 17:00:06 +0200 Subject: [PATCH] stuff --- src/Draw.pbi | 2 +- src/Functions.pbi | 2 +- src/Main.pb | 5 +++-- 3 files changed, 5 insertions(+), 4 deletions(-) diff --git a/src/Draw.pbi b/src/Draw.pbi index 47e2a89..34b1357 100644 --- a/src/Draw.pbi +++ b/src/Draw.pbi @@ -34,7 +34,7 @@ Procedure DrawRunningGame() Box(0, 0, 200, 200, RGB(0, 255, 0)) EndProcedure ; IDE Options = PureBasic 4.51 (MacOS X - x86) -; CursorPosition = 26 +; CursorPosition = 8 ; Folding = - ; EnableUnicode ; EnableThread diff --git a/src/Functions.pbi b/src/Functions.pbi index 5e9a352..8936786 100644 --- a/src/Functions.pbi +++ b/src/Functions.pbi @@ -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 \ No newline at end of file +; 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 \ No newline at end of file diff --git a/src/Main.pb b/src/Main.pb index 2699f21..a1a2b1b 100644 --- a/src/Main.pb +++ b/src/Main.pb @@ -47,6 +47,8 @@ If ReadFile(0, "../data/menu.data") CloseFile(0) EndIf +InitTileset() + Menus("MAIN_MENU")\Title = "ESCape" Define Item.GameMenuItem @@ -110,8 +112,7 @@ If OpenWindow(0, 0, 0, Screen\Width, Screen\Height, title, #PB_Window_ScreenCent Until KeyboardPushed(#PB_Key_Escape) EndIf ; IDE Options = PureBasic 4.51 (MacOS X - x86) -; CursorPosition = 65 -; FirstLine = 9 +; CursorPosition = 49 ; EnableXP ; EnableCompileCount = 0 ; EnableBuildCount = 0 \ No newline at end of file