Added hide buttons option

1 files changed, 11 insertions, 8 deletions

diff --git a/menu.bmx b/menu.bmx
index 1a9c220..eea7aed 100644
--- a/menu.bmx
+++ b/menu.bmx
@@ -31,20 +31,24 @@ Type TMenu
 		list.AddLast(TMenuOpt.Create(x,y,i,id))
 	End Method
 	
-	' Returns the selected item, or -1 for none.  Err, so don't use -1 as an ID.
+	' Returns the selected item, or -1 for none.  Err, so don't use -1 as an ID.  Set hide to remove the buttons.
 	'
-	Method Render:Int()
-		Local in:Int=-1
-		Local mx:Int=MouseX()
-		Local my:Int=MouseY()
-		Local any:Int=False
-		
+	Method Render:Int(hide:Int)
 		SetAlpha(0.5)
 		For Local p:TMenuBdrop=EachIn bdrop
 			p.Update()
 		Next
 		SetAlpha(1)
 		
+		If hide
+			Return -1
+		EndIf
+		
+		Local in:Int=-1
+		Local mx:Int=MouseX()
+		Local my:Int=MouseY()
+		Local any:Int=False
+		
 		For Local opt:TMenuOpt=EachIn list
 			If opt.InBox(mx,my)
 				SetColor(255,255,255)
@@ -70,7 +74,6 @@ Type TMenu
 			mbdown=False
 		EndIf
 		
-		
 		Return in
 	End Method
 End Type