#cs ----------------------------------------------------------------------------

 AutoIt Version: 3.3.12.0
 Author:         Kiksen

 Script Function:
	Dobler tabte bet op så man altid tjener på european roulette

#ce ----------------------------------------------------------------------------

; Script Start - Add your code below here

HotKeySet("{ESC}", "Terminate")
HotKeySet("!c", "getColor")
HotKeySet("!a", "total")

Global $color


MsgBox(0, "Starting Up", "Starting, use ESCAPE to quit, Alt + C to set color, and Alt + A to run")

Func Terminate()
   Exit 1
EndFunc

Func getColor()
   $point = MouseGetPos()
   $color = PixelGetColor($point[0], $point[1])
   MsgBox(0, "Color Set", "The color has been set to " & $color)
EndFunc



Func total()

   $bet = 1

   $black = MouseClick("left", 630, 496)
   Sleep(2000)
   $spin = MouseClick("left", 373, 646)
   Sleep(6000)

While 1

   Sleep(5000)
   $point = PixelSearch(489, 607, 566, 688, $color)
   if IsArray($point) Then

		 MouseClick("left", $point[0], $point[1])


		 $black = MouseClick("left", 630, 496)
		 Sleep(1000)
		 $spin = MouseClick("left", 373, 646)
		 Sleep(1000)
		 $bet = 1


   ElseIf  IsArray($point) = "0" Then
	  $bet *= 2
	  $counter = 0
	  While $counter < $bet
		 Sleep(250)
		 $black = MouseClick("left", 630, 496)
		 $counter += 1
			While $counter = $bet
			   Sleep(3000)
			   $spin = MouseClick("left", 373, 646)
			   If $counter == $bet Then ExitLoop


			WEnd

		 If $counter == $bet Then ExitLoop




	  WEnd
   EndIf

WEnd

EndFunc
While 1
   sleep(250)
WEnd