Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- $GUI = GUICreate("Age of War [AutoIt Var Editing]", 670, 560, -1, -1)
- $oGame = ObjCreate("ShockwaveFlash.ShockwaveFlash.1")
- $oGameGUI = GUICtrlCreateObj($oGame, 10, 10, 650, 450)
- With $oGame
- .bgcolor = "#000000"
- .Movie = "C:\Documents and Settings\FAST\Dokumenter\roulette.swf"
- .Loop = True
- .ScaleMode = 2
- .wmode = "Opaque"
- EndWith
- $Money = GUICtrlCreateInput("Score", 10, 470, 100, 20)
- $SetMoney = GUICtrlCreateButton("Set Score", 120, 468, 100)
- GUISetState()
- While 1
- $nMsg = GUIGetMsg()
- Select
- Case $nMsg = -3
- Exit
- Case $nMsg = $SetMoney
- $Read_Money = GUICtrlRead($Score)
- $oGame.SetVariable("cash", $Score)
- EndSelect
- WEnd
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement