not working help pls

[sinan]

not working macro

Help pls

expandcollapse popup

#include <GUIConstants.au3>

Opt("GUIOnEventMode", 1)
#Region ### START Koda GUI section ### Form=
$Form1 = GUICreate("Copyright by sin2018 -  - DandikBot v2.0", 390, 400, -1, -1, BitOR($WS_MINIMIZEBOX,$WS_CAPTION,$WS_POPUP,$WS_GROUP,$WS_BORDER,$WS_CLIPSIBLINGS))
GUISetOnEvent($GUI_EVENT_CLOSE, "Form1Close")
GUISetOnEvent($GUI_EVENT_MINIMIZE, "Form1Minimize")
GUISetOnEvent($GUI_EVENT_MAXIMIZE, "Form1Maximize")
GUISetOnEvent($GUI_EVENT_RESTORE, "Form1Restore")
GuiCtrlCreateGroup("Genel", 5, 5, 380, 80 )
GuiCtrlCreateGroup("Bufflar", 5, 90, 250, 290)
GuiCtrlCreateGroup("Aç/dur/kapat", 260, 90, 120, 290)
$Label1 = GUICtrlCreateLabel("Atak Skilleri :", 24, 16, 100, 22)
GUICtrlSetFont(-1, 10, 800, 0, "Trebuchet MS")
GUICtrlSetColor(-1, 0x0000FF)
GUICtrlSetOnEvent(-1, "Label1Click")
$Label2 = GUICtrlCreateLabel("Bufflar :", 24, 48, 61, 22)
GUICtrlSetFont(-1, 10, 800, 0, "Trebuchet MS")
GUICtrlSetColor(-1, 0x0000FF)
GUICtrlSetOnEvent(-1, "Label2Click")
$Combo1 = GUICtrlCreateCombo("", 152, 16, 65, 25,$CBS_DROPDOWNLIST)
GUICtrlSetOnEvent(-1, "Combo1Change")
GUICtrlSetData(-1,"{F1}|{F2}|{F3}|{F4}","{F1}")
$Combo2 = GUICtrlCreateCombo("", 152, 48, 65, 25,$CBS_DROPDOWNLIST)
GUICtrlSetOnEvent(-1, "Combo2Change")
GUICtrlSetData(-1,"{F1}|{F2}|{F3}|{F4}","{F2}")
$Button1 = GUICtrlCreateButton("Başlat", 280, 130, 70, 25, 0)
GUICtrlSetOnEvent(-1, "Button1Click")
$Button2 = GUICtrlCreateButton("Durdur", 280, 180, 70, 25, 0)
GUICtrlSetOnEvent(-1, "Button2Click")
$Button3 = GUICtrlCreateButton("Çık", 280, 230, 70, 25, 0)
GUICtrlSetOnEvent(-1, "Button3Click")
$Checkbox1 = GUICtrlCreateCheckbox("Dusenleri Topla", 250, 18, 97, 17)
GUICtrlSetOnEvent(-1, "Checkbox1Click")
$Checkbox2 = GUICtrlCreateCheckbox("Berserk Dolunca Kullan", 250, 50, 157, 17)
GUICtrlSetOnEvent(-1, "Checkbox2Click")
$Checkbox3 = GUICtrlCreateCheckbox("2. Slotdaki skill", 60, 120, 157, 17)
GUICtrlSetOnEvent(-1, "Checkbox3Click")
$Checkbox4 = GUICtrlCreateCheckbox("3. Slotdaki skill", 60, 170, 157, 17)
GUICtrlSetOnEvent(-1, "Checkbox4Click")
$Checkbox5 = GUICtrlCreateCheckbox("4. Slotdaki skill", 60, 220, 157, 17)
GUICtrlSetOnEvent(-1, "Checkbox5Click")
$Checkbox6 = GUICtrlCreateCheckbox("5. Slotdaki skill", 60, 270, 157, 17)
GUICtrlSetOnEvent(-1, "Checkbox6Click")
$Checkbox7 = GUICtrlCreateCheckbox("6. Slotdaki skill", 60, 320, 157, 17)
GUICtrlSetOnEvent(-1, "Checkbox7Click")
$zaman1 = GUICtrlCreateInput("1000",40, 145, 40,20)
GUICtrlCreateLabel("2-3 skill arası bekleme zamanı",100, 145)
$zaman2 = GUICtrlCreateInput("1000",40, 195, 40,20)
GUICtrlCreateLabel("3-4 skill arası bekleme zamanı",100, 195)
$zaman3 = GUICtrlCreateInput("2000",40, 245, 40,20)
GUICtrlCreateLabel("4-5 skill arası bekleme zamanı",100, 245)
$zaman4 = GUICtrlCreateInput("3000",40, 295, 40,20)
GUICtrlCreateLabel("5-6 skill arası bekleme zamanı",100, 295)
$zaman5 = GUICtrlCreateInput("3000",40, 345, 40,20)
GUICtrlCreateLabel("6-- skill arası bekleme zamanı",100, 345)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###




Global $Paused = 0

$msg = 0
$atak = Guictrlread($combo1)
$buff = Guictrlread($combo2)
$i = 1
$b = 1
While $i =1


if $Paused = 1 Then

If WinActive("sro_client") and PixelGetColor(30,13) = 0xFF5A7E and GuiCtrlread($checkbox2) = $GUI_CHECKED then
Send("{Tab}")
Sleep(100)
endif

If WinActive("sro_client") and $b = 100 then
Send($buff)
Sleep(100)
Send("1")
Sleep(1000)
Send("2")
Sleep(1000)
Send("3")
Sleep(1000)
Send("4")
Sleep(1000)
Send("5")
Sleep(1000)
$b = 1
Sleep(500)

elseif WinActive("sro_client") and PixelGetColor(431,47) = 0x9C1111 and GuiCtrlread($checkbox2) = $GUI_CHECKED then
Send($atak)
Sleep(100)

elseif WinActive("sro_client") and PixelGetColor(431,47) = 0x9C1111 and GuiCtrlread($checkbox3) = $GUI_CHECKED then
Send("1")
Send("2")
Sleep($zaman1)

elseif WinActive("sro_client") and PixelGetColor(431,47) = 0x9C1111 and GuiCtrlread($checkbox4) = $GUI_CHECKED then
Send("1")
Send("3")
Sleep($zaman2)

elseif WinActive("sro_client") and PixelGetColor(431,47) = 0x9C1111 and GuiCtrlread($checkbox5) = $GUI_CHECKED then
Send("1")
Send("4")
Sleep($zaman3)

elseif WinActive("sro_client") and PixelGetColor(431,47) = 0x9C1111 and GuiCtrlread($checkbox6) = $GUI_CHECKED then
Send("1")
Send("5")
Sleep($zaman4)

elseif WinActive("sro_client") and PixelGetColor(431,47) = 0x9C1111 and GuiCtrlread($checkbox7) = $GUI_CHECKED then
Send("1")
Send("6")
Sleep($zaman5)





elseif WinActive("sro_client") and PixelGetColor(431,47) <> 0x9C1111 and GuiCtrlread($checkbox1) = $GUI_CHECKED then
Send("G")
Sleep(100)
Send("G")
Sleep(100)
Send($atak)
Sleep(100)
Send("1")
Sleep(500)
$b = $b + 1

elseif WinActive("sro_client") and PixelGetColor(431,47) <> 0x9C1111 then
MouseClick("middle")
Sleep(500)
$b = $b + 1
endif

EndIf

WEnd

Func Button1Click()
$basla = 1 ; başlat
EndFunc
Func Button2Click()
$basla = 0 ; durdur
EndFunc
Func Button3Click()
Exit ; programı kapat
EndFunc
Func Checkbox1Click()

EndFunc
Func Checkbox2Click()

EndFunc
Func Checkbox3Click()

EndFunc
Func Checkbox4Click()

EndFunc
Func Checkbox5Click()

EndFunc
Func Checkbox6Click()

EndFunc
Func Checkbox7Click()

EndFunc
Func Combo1Change()

EndFunc
Func Combo2Change()

EndFunc
Func Form1Close()

EndFunc
Func Form1Maximize()

EndFunc
Func Form1Minimize()

EndFunc
Func Form1Restore()

EndFunc
Func Label1Click()

EndFunc
Func Label2Click()

EndFunc

[JustinReno]

Whats not working?