FANDOM


Created by Taz.

Using "RC_Core.rcm"
; By tazco 
 ;June 14th 2012
 ; Any new gambling script should be called for from this one, actors could be excluted if needed.

Function Main()
Player = Actor()
Target = ContextActor()


ChatBox$ = OpenDialog(Player, Target, "Gambling", 418)


        PlayerWithItem% = HasItem(Player, "Info Guide")
    
 			If (PlayerWithItem = 0)
 			 DialogOUtPUt(Player, D, "Register ha, what can I help you with?")
 			 DialogInput(Player, D, "Close")
 			 CloseDialog(Player, D)
 			 ChatBox$ = OpenDialog(Player, Target, "Gambling", 418)
 			 			 
 			EndIf 
 
 
 
 DialogOutPut(Player, ChatBox, "What would you like to gamble on?")
 POption% = DialogInPut(Player, ChatBox, "25 Cent Toss,Pick a Cup")
 
 	If (POption = 1)
 	 CloseDialog(Player, ChatBox)
 	 ThreadExecute("Gamble_Cent Toss", "Main", Player, 0) 
 	
 	EndIf
 	
 	
 	If (POption = 2)
 	 CloseDialog(Player, ChatBox)
 	 ThreadExecute("Gamble_Cup Pick", "Main", Player, 0) 
 	
 	EndIf
 
 
 
 
 
 End Function