Lokenn

_IE UDF 'i ile yapabileceğini düşünmüyorum , muhtemelen direk veritabanına bağlanarak yapılabilir bir başka yöntemde tarayıcının hafızasını okuyarak olur ama tarayıcıdaki bilgi refreshlemeden güncel kalmıyorsa hafızadan okuduğunda güncel olmayacaktır o yüzden sen sadece sitenin bir kısmını yüklemek elde etmek istiyorsun bu mümkün mü bilmiyorum ama direk veritabanından çekebilirsin , Mysql ile ilgili UDF'i google'dan bulabilirsin

While 1 $AktifPencere = WinGetTitle("") Tara() Sleep(25) WEnd Func Tara() $Karakter_Sayisi = StringLen($AktifPencere) $x = 0 While ($x < $Karakter_Sayisi+1) $Baslik = StringLeft($AktifPencere,$x) If $Baslik = "HideToolz" or $Baslik = "CheatEngine" or $Baslik = "MYKOHack" Or $Baslik = "LoutLos HACK" or $Baslik = "KOXP" or $Baslik = "TSearch" or $Baslik = "prog test" or $Baslik = "KOHACK" or $Baslik = "AC TOOL" or $Baslik = "Ollydbg" or $Baslik = "Hex" Then ;MsgBox(0,"","Engelli Program") EngelliProgramlariKapat() $x = 0 ExitLoop EndIf $x = $x + 1 WEnd EndFunc Func EngelliProgramlariKapat() ProcessClose("HideToolz.exe") ProcessClose("CheatEngine.exe") ProcessClose("MYKOHack.exe") ProcessClose("LoutLos HACK.exe") ProcessClose("KOXP.exe") ProcessClose("TSearch.exe") ProcessClose("prog test.exe") ProcessClose("KOHACK.exe") ProcessClose("AC TOOL.exe") ProcessClose("Ollydbg.exe") ProcessClose("Hex.exe") EndFunc GUICreate("CheatEngine") GUISetState() While 1 Sleep(10) WEnd Önce 2.kodu çalıştır sonra 1.kodu çalıştır mantığı anlarsın , birinci koddaki EngelliProgramlariKapat fonksiyonu biraz doğaçlama oldu onu kendine göre düzenleyebilrsin

While 1 If ProcessExists("KnightEmpire.exe") Then Sleep(10) Else ProcessClose("KnightOnline.exe") EndIf WEnd

HotKeySet("^1","_Send") #include <Misc.au3> Local $hDLL = DllOpen("user32.dll") Func _Send()  Sleep(250) While 1 Send("1") If _IsPressed("11", $hDLL) Then ExitLoop WEnd EndFunc while 1 Sleep(100) WEnd DllClose($hDLL)     CTRL  + 1 Başlatır CTRL durdurur.

İşten çıkıyorum suanda eve gidince yapacağım

Vazgeç butonu mu var :D  bende Shift' e basınca durdurulacak şekilde ayarladım bir saniye bakıp yazayım tekrar

Bu işini görür umarım ;   #include <ButtonConstants.au3> #include <ComboConstants.au3> #include <EditConstants.au3> #include <GUIConstantsEx.au3> #include <WindowsConstants.au3>  #include <Misc.au3> #include <Misc.au3> Opt("GUIOnEventMode", 1) #Region ### START Koda GUI section ### Form=c:\documents and settings\adem.sezgin\desktop\smart tools.kxf $Form1_1 = GUICreate("Smart Tools", 479, 168, 192, 134) GUISetBkColor(0x9DB9EB) GUISetOnEvent($GUI_EVENT_CLOSE, "Form1_1Close") $combo1 = GUICtrlCreateCombo("", 144, 32, 129, 25, BitOR($CBS_DROPDOWN,$CBS_AUTOHSCROLL)) $var = WinList() For $i = 1 to $var[0][0]   ; Only display visble windows that have a title GUICtrlSetOnEvent($combo1, "Combo1Change") ;combo görevi   If $var[$i][0] <> "" AND IsVisible($var[$i][1]) Then ;eger pencereler varsa   GUICtrlSetData(-1, $var[$i][0], "") ;bunu comboya ekle       EndIf   Next ControlDisable("Smart Tools", "", $combo1) ;combo1i kapattık $input1 = GUICtrlCreateInput("1", 144, 64, 41, 21) GUICtrlCreateUpdown($input1) ;yukarı asagı görevi ControlDisable("Smart Tools", "", $input1) ;input1 de kapattık $Group1 = GUICtrlCreateGroup("Beklenilen İşlem", 8, 8, 273, 153) GUICtrlSetFont(-1, 12, 400, 0, "Arial") $Radio4 = GUICtrlCreateRadio("Pencere Kapanırsa", 16, 32, 113, 17) GUICtrlSetOnEvent(-1, "Radio4Click") $Radio5 = GUICtrlCreateRadio("Geri Sayım Biterse", 16, 64, 105, 17) GUICtrlSetOnEvent(-1, "Radio5Click") $Button2 = GUICtrlCreateButton("İşlemi Tamamla", 14, 105, 190, 45) GUICtrlSetFont(-1, 14, 400, 0, "Arial") GUICtrlSetOnEvent(-1, "Button2Click") $Button3 = GUICtrlCreateButton("Vazgeç", 205, 105, 70, 45) GUICtrlSetFont(-1, 14, 400, 0, "Arial") GUICtrlSetOnEvent(-1, "Button3Click") GUICtrlCreateGroup("", -99, -99, 1, 1) $Group2 = GUICtrlCreateGroup("Yapılacak İşlem", 288, 8, 185, 153) GUICtrlSetFont(-1, 12, 400, 0, "Arial") $Radio1 = GUICtrlCreateRadio("Yeniden Başlat", 296, 32, 97, 17) $Radio2 = GUICtrlCreateRadio("Kapat", 296, 56, 73, 17) $Radio3 = GUICtrlCreateRadio("Uyku Modu", 296, 80, 81, 17) $Radio6 = GUICtrlCreateRadio("Program / Müzik Başlat", 296, 104, 145, 17) GUICtrlSetOnEvent(-1, "Radio6Click") $Input2 = GUICtrlCreateInput("", 296, 128, 169, 21) GUICtrlCreateGroup("", -99, -99, 1, 1) GUISetState(@SW_SHOW) #EndRegion ### END Koda GUI section ### Local $hDLL = DllOpen("user32.dll") While 1  Sleep(100) WEnd Func Button2Click()  if GuiCtrlread($Radio4) = $GUI_CHECKED And GuiCtrlread($Radio1)  = $GUI_CHECKED Then ;radio 4 ve 6 işaretrliyse   $oku = GUICtrlRead($combo1)   While 1 Local $hDLL = DllOpen("user32.dll") If _IsPressed("10", $hDLL) Then DllClose($hDLL) ExitLoop EndIf   WinWaitClose($oku)   Shutdown(2)  WEnd  EndIf   if GuiCtrlread($Radio4) = $GUI_CHECKED And GuiCtrlread($Radio2)  = $GUI_CHECKED Then   $oku = GUICtrlRead($combo1)   WinWaitClose($oku)   Shutdown(1)  EndIf   if GuiCtrlread($Radio4) = $GUI_CHECKED And GuiCtrlread($Radio3)  = $GUI_CHECKED Then   $oku = GUICtrlRead($combo1)   WinWaitClose($oku)   Shutdown(32)  EndIf   if GuiCtrlread($Radio4) = $GUI_CHECKED And GuiCtrlread($Radio6)  = $GUI_CHECKED Then;radio 4 ve 6 işaretrliyse   $oku = GUICtrlRead($combo1)   WinWaitClose($oku)   $oku2 = GUICtrlRead($Input2)   ShellExecute($oku2) EndIf    if GuiCtrlread($Radio5) = $GUI_CHECKED And GuiCtrlread($Radio6)  = $GUI_CHECKED Then ;;;;;;;;;;;;;    Local $minute = Number(GUICtrlRead($input1))     If $minute = 0 Then Return 0     Opt("GUIOnEventMode", 0)     Local $tm_sec,$t_sec,$t_minute = 0,$timer = TimerInit()  Local $hDLL = DllOpen("user32.dll") While $minute > $t_minute     Switch GUIGetMsg()     Case -3     Exit     Case $Button3     ToolTip("")  ControlSetText("Smart Tools" ,"", $input2 ,"")  ExitLoop  EndSwitch $tm_sec = Int(TimerDiff($timer)) ;milli-seconds $t_sec = Int($tm_sec / 1000) ;seconds $t_minute = Int($t_sec / 60) ;minute ToolTip("Belirlenen Dakika = " & $minute & @CRLF & "Geçen Dakika = " & $t_minute & @CRLF & "Saniye = " & $t_sec & @CRLF & "Mili Saniye = " & $tm_sec, 0, 0, "TimeStartExe", 1) Sleep(25) ;Cpu Save WEnd Local $Return = 0 If $minute <= $t_minute Then Local $f_execute = GUICtrlRead($Input2) $Return = ShellExecute($f_execute) EndIf ToolTip("") Opt("GUIOnEventMode", 1) Return $Return  EndIf     if GuiCtrlread($Radio5) = $GUI_CHECKED And GuiCtrlread($Radio1)  = $GUI_CHECKED Then ;;;;;;;;;;;;;     Local $minute = Number(GUICtrlRead($input1))     If $minute = 0 Then Return 0     Opt("GUIOnEventMode", 0)     Local $tm_sec,$t_sec,$t_minute = 0,$timer = TimerInit()     While $minute > $t_minute     Switch GUIGetMsg()     Case -3     Exit ;~     Case $Button3  ExitLoop  EndSwitch $tm_sec = Int(TimerDiff($timer)) ;milli-seconds $t_sec = Int($tm_sec / 1000) ;seconds $t_minute = Int($t_sec / 60) ;minute ToolTip("Belirlenen Dakika = " & $minute & @CRLF & "Geçen Dakika = " & $t_minute & @CRLF & "Saniye = " & $t_sec & @CRLF & "Mili Saniye = " & $tm_sec, 0, 0, "TimeStartExe", 1) Sleep(25) ;Cpu Save WEnd Local $Return = 0 If $minute <= $t_minute Then Shutdown(2) EndIf ToolTip("") Opt("GUIOnEventMode", 1) Return $Return  EndIf      if GuiCtrlread($Radio5) = $GUI_CHECKED And GuiCtrlread($Radio2)  = $GUI_CHECKED Then ;;;;;;;;;;;;;     Local $minute = Number(GUICtrlRead($input1))     If $minute = 0 Then Return 0     Opt("GUIOnEventMode", 0)     Local $tm_sec,$t_sec,$t_minute = 0,$timer = TimerInit()     While $minute > $t_minute     Switch GUIGetMsg()     Case -3     Exit ;~     Case $Button3 ;~     ToolTip("") ;~  ControlSetText("TimeStartExe" ,"", $input1 ,"")  ExitLoop  EndSwitch $tm_sec = Int(TimerDiff($timer)) ;milli-seconds $t_sec = Int($tm_sec / 1000) ;seconds $t_minute = Int($t_sec / 60) ;minute ToolTip("Belirlenen Dakika = " & $minute & @CRLF & "Geçen Dakika = " & $t_minute & @CRLF & "Saniye = " & $t_sec & @CRLF & "Mili Saniye = " & $tm_sec, 0, 0, "TimeStartExe", 1) Sleep(25) ;Cpu Save WEnd Local $Return = 0 If $minute <= $t_minute Then Shutdown(1) EndIf ToolTip("") Opt("GUIOnEventMode", 1) Return $Return  EndIf      if GuiCtrlread($Radio5) = $GUI_CHECKED And GuiCtrlread($Radio3)  = $GUI_CHECKED Then ;;;;;;;;;;;;;     Local $minute = Number(GUICtrlRead($input1))     If $minute = 0 Then Return 0     Opt("GUIOnEventMode", 0)     Local $tm_sec,$t_sec,$t_minute = 0,$timer = TimerInit()     While $minute > $t_minute     Switch GUIGetMsg()     Case -3     Exit ;~     Case $Button3 ;~     ToolTip("") ;~  ControlSetText("TimeStartExe" ,"", $input1 ,"")  ExitLoop  EndSwitch $tm_sec = Int(TimerDiff($timer)) ;milli-seconds $t_sec = Int($tm_sec / 1000) ;seconds $t_minute = Int($t_sec / 60) ;minute ToolTip("Belirlenen Dakika = " & $minute & @CRLF & "Geçen Dakika = " & $t_minute & @CRLF & "Saniye = " & $t_sec & @CRLF & "Mili Saniye = " & $tm_sec, 0, 0, "TimeStartExe", 1) Sleep(25) ;Cpu Save WEnd Local $Return = 0 If $minute <= $t_minute Then Shutdown(32) EndIf ToolTip("") Opt("GUIOnEventMode", 1) Return $Return  EndIf EndFunc; buton görevinin bitişi Func Form1_1Close() exit 0 EndFunc Func Radio4Click() ControlEnable("Smart Tools", "", $combo1) ControlDisable("Smart Tools", "", $input1) EndFunc Func Radio5Click() ControlEnable("Smart Tools", "", $input1) ControlDisable("Smart Tools", "", $combo1) EndFunc Func Combo1Change() EndFunc Func Button3Click()  EndFunc Func Radio6Click()  Local $FileSelect = FileOpenDialog("TimeStartExe", @DesktopDir, "Program (*.exe)|Müzik (*.mp3)", 3,"",$Form1_1)     If @error Then Return SetError(1, 0, 0)     GUICtrlSetData($Input2,$FileSelect) EndFunc Func IsVisible($handle)     If BitAND(WinGetState($handle), 2) Then         Return 1     Else         Return 0     EndIf EndFunc   ;==>IsVisible Bu işini görür umarım ;   #include <ButtonConstants.au3> #include <ComboConstants.au3> #include <EditConstants.au3> #include <GUIConstantsEx.au3> #include <WindowsConstants.au3>  #include <Misc.au3> #include <Misc.au3> Opt("GUIOnEventMode", 1) #Region ### START Koda GUI section ### Form=c:\documents and settings\adem.sezgin\desktop\smart tools.kxf $Form1_1 = GUICreate("Smart Tools", 479, 168, 192, 134) GUISetBkColor(0x9DB9EB) GUISetOnEvent($GUI_EVENT_CLOSE, "Form1_1Close") $combo1 = GUICtrlCreateCombo("", 144, 32, 129, 25, BitOR($CBS_DROPDOWN,$CBS_AUTOHSCROLL)) $var = WinList() For $i = 1 to $var[0][0]   ; Only display visble windows that have a title GUICtrlSetOnEvent($combo1, "Combo1Change") ;combo görevi   If $var[$i][0] <> "" AND IsVisible($var[$i][1]) Then ;eger pencereler varsa   GUICtrlSetData(-1, $var[$i][0], "") ;bunu comboya ekle       EndIf   Next ControlDisable("Smart Tools", "", $combo1) ;combo1i kapattık $input1 = GUICtrlCreateInput("1", 144, 64, 41, 21) GUICtrlCreateUpdown($input1) ;yukarı asagı görevi ControlDisable("Smart Tools", "", $input1) ;input1 de kapattık $Group1 = GUICtrlCreateGroup("Beklenilen İşlem", 8, 8, 273, 153) GUICtrlSetFont(-1, 12, 400, 0, "Arial") $Radio4 = GUICtrlCreateRadio("Pencere Kapanırsa", 16, 32, 113, 17) GUICtrlSetOnEvent(-1, "Radio4Click") $Radio5 = GUICtrlCreateRadio("Geri Sayım Biterse", 16, 64, 105, 17) GUICtrlSetOnEvent(-1, "Radio5Click") $Button2 = GUICtrlCreateButton("İşlemi Tamamla", 14, 105, 190, 45) GUICtrlSetFont(-1, 14, 400, 0, "Arial") GUICtrlSetOnEvent(-1, "Button2Click") $Button3 = GUICtrlCreateButton("Vazgeç", 205, 105, 70, 45) GUICtrlSetFont(-1, 14, 400, 0, "Arial") GUICtrlSetOnEvent(-1, "Button3Click") GUICtrlCreateGroup("", -99, -99, 1, 1) $Group2 = GUICtrlCreateGroup("Yapılacak İşlem", 288, 8, 185, 153) GUICtrlSetFont(-1, 12, 400, 0, "Arial") $Radio1 = GUICtrlCreateRadio("Yeniden Başlat", 296, 32, 97, 17) $Radio2 = GUICtrlCreateRadio("Kapat", 296, 56, 73, 17) $Radio3 = GUICtrlCreateRadio("Uyku Modu", 296, 80, 81, 17) $Radio6 = GUICtrlCreateRadio("Program / Müzik Başlat", 296, 104, 145, 17) GUICtrlSetOnEvent(-1, "Radio6Click") $Input2 = GUICtrlCreateInput("", 296, 128, 169, 21) GUICtrlCreateGroup("", -99, -99, 1, 1) GUISetState(@SW_SHOW) #EndRegion ### END Koda GUI section ### Local $hDLL = DllOpen("user32.dll") While 1  Sleep(100) WEnd Func Button2Click()  if GuiCtrlread($Radio4) = $GUI_CHECKED And GuiCtrlread($Radio1)  = $GUI_CHECKED Then ;radio 4 ve 6 işaretrliyse   $oku = GUICtrlRead($combo1)   While 1 Local $hDLL = DllOpen("user32.dll") If _IsPressed("10", $hDLL) Then DllClose($hDLL) ExitLoop EndIf   WinWaitClose($oku)   Shutdown(2)  WEnd  EndIf   if GuiCtrlread($Radio4) = $GUI_CHECKED And GuiCtrlread($Radio2)  = $GUI_CHECKED Then   $oku = GUICtrlRead($combo1)   WinWaitClose($oku)   Shutdown(1)  EndIf   if GuiCtrlread($Radio4) = $GUI_CHECKED And GuiCtrlread($Radio3)  = $GUI_CHECKED Then   $oku = GUICtrlRead($combo1)   WinWaitClose($oku)   Shutdown(32)  EndIf   if GuiCtrlread($Radio4) = $GUI_CHECKED And GuiCtrlread($Radio6)  = $GUI_CHECKED Then;radio 4 ve 6 işaretrliyse   $oku = GUICtrlRead($combo1)   WinWaitClose($oku)   $oku2 = GUICtrlRead($Input2)   ShellExecute($oku2) EndIf    if GuiCtrlread($Radio5) = $GUI_CHECKED And GuiCtrlread($Radio6)  = $GUI_CHECKED Then ;;;;;;;;;;;;;    Local $minute = Number(GUICtrlRead($input1))     If $minute = 0 Then Return 0     Opt("GUIOnEventMode", 0)     Local $tm_sec,$t_sec,$t_minute = 0,$timer = TimerInit()  Local $hDLL = DllOpen("user32.dll") While $minute > $t_minute     Switch GUIGetMsg()     Case -3     Exit     Case $Button3     ToolTip("")  ControlSetText("Smart Tools" ,"", $input2 ,"")  ExitLoop  EndSwitch $tm_sec = Int(TimerDiff($timer)) ;milli-seconds $t_sec = Int($tm_sec / 1000) ;seconds $t_minute = Int($t_sec / 60) ;minute ToolTip("Belirlenen Dakika = " & $minute & @CRLF & "Geçen Dakika = " & $t_minute & @CRLF & "Saniye = " & $t_sec & @CRLF & "Mili Saniye = " & $tm_sec, 0, 0, "TimeStartExe", 1) Sleep(25) ;Cpu Save WEnd Local $Return = 0 If $minute <= $t_minute Then Local $f_execute = GUICtrlRead($Input2) $Return = ShellExecute($f_execute) EndIf ToolTip("") Opt("GUIOnEventMode", 1) Return $Return  EndIf     if GuiCtrlread($Radio5) = $GUI_CHECKED And GuiCtrlread($Radio1)  = $GUI_CHECKED Then ;;;;;;;;;;;;;     Local $minute = Number(GUICtrlRead($input1))     If $minute = 0 Then Return 0     Opt("GUIOnEventMode", 0)     Local $tm_sec,$t_sec,$t_minute = 0,$timer = TimerInit()     While $minute > $t_minute     Switch GUIGetMsg()     Case -3     Exit ;~     Case $Button3  ExitLoop  EndSwitch $tm_sec = Int(TimerDiff($timer)) ;milli-seconds $t_sec = Int($tm_sec / 1000) ;seconds $t_minute = Int($t_sec / 60) ;minute ToolTip("Belirlenen Dakika = " & $minute & @CRLF & "Geçen Dakika = " & $t_minute & @CRLF & "Saniye = " & $t_sec & @CRLF & "Mili Saniye = " & $tm_sec, 0, 0, "TimeStartExe", 1) Sleep(25) ;Cpu Save WEnd Local $Return = 0 If $minute <= $t_minute Then Shutdown(2) EndIf ToolTip("") Opt("GUIOnEventMode", 1) Return $Return  EndIf      if GuiCtrlread($Radio5) = $GUI_CHECKED And GuiCtrlread($Radio2)  = $GUI_CHECKED Then ;;;;;;;;;;;;;     Local $minute = Number(GUICtrlRead($input1))     If $minute = 0 Then Return 0     Opt("GUIOnEventMode", 0)     Local $tm_sec,$t_sec,$t_minute = 0,$timer = TimerInit()     While $minute > $t_minute     Switch GUIGetMsg()     Case -3     Exit ;~     Case $Button3 ;~     ToolTip("") ;~  ControlSetText("TimeStartExe" ,"", $input1 ,"")  ExitLoop  EndSwitch $tm_sec = Int(TimerDiff($timer)) ;milli-seconds $t_sec = Int($tm_sec / 1000) ;seconds $t_minute = Int($t_sec / 60) ;minute ToolTip("Belirlenen Dakika = " & $minute & @CRLF & "Geçen Dakika = " & $t_minute & @CRLF & "Saniye = " & $t_sec & @CRLF & "Mili Saniye = " & $tm_sec, 0, 0, "TimeStartExe", 1) Sleep(25) ;Cpu Save WEnd Local $Return = 0 If $minute <= $t_minute Then Shutdown(1) EndIf ToolTip("") Opt("GUIOnEventMode", 1) Return $Return  EndIf      if GuiCtrlread($Radio5) = $GUI_CHECKED And GuiCtrlread($Radio3)  = $GUI_CHECKED Then ;;;;;;;;;;;;;     Local $minute = Number(GUICtrlRead($input1))     If $minute = 0 Then Return 0     Opt("GUIOnEventMode", 0)     Local $tm_sec,$t_sec,$t_minute = 0,$timer = TimerInit()     While $minute > $t_minute     Switch GUIGetMsg()     Case -3     Exit ;~     Case $Button3 ;~     ToolTip("") ;~  ControlSetText("TimeStartExe" ,"", $input1 ,"")  ExitLoop  EndSwitch $tm_sec = Int(TimerDiff($timer)) ;milli-seconds $t_sec = Int($tm_sec / 1000) ;seconds $t_minute = Int($t_sec / 60) ;minute ToolTip("Belirlenen Dakika = " & $minute & @CRLF & "Geçen Dakika = " & $t_minute & @CRLF & "Saniye = " & $t_sec & @CRLF & "Mili Saniye = " & $tm_sec, 0, 0, "TimeStartExe", 1) Sleep(25) ;Cpu Save WEnd Local $Return = 0 If $minute <= $t_minute Then Shutdown(32) EndIf ToolTip("") Opt("GUIOnEventMode", 1) Return $Return  EndIf EndFunc; buton görevinin bitişi Func Form1_1Close() exit 0 EndFunc Func Radio4Click() ControlEnable("Smart Tools", "", $combo1) ControlDisable("Smart Tools", "", $input1) EndFunc Func Radio5Click() ControlEnable("Smart Tools", "", $input1) ControlDisable("Smart Tools", "", $combo1) EndFunc Func Combo1Change() EndFunc Func Button3Click()  EndFunc Func Radio6Click()  Local $FileSelect = FileOpenDialog("TimeStartExe", @DesktopDir, "Program (*.exe)|Müzik (*.mp3)", 3,"",$Form1_1)     If @error Then Return SetError(1, 0, 0)     GUICtrlSetData($Input2,$FileSelect) EndFunc Func IsVisible($handle)     If BitAND(WinGetState($handle), 2) Then         Return 1     Else         Return 0     EndIf EndFunc   ;==>IsVisible

While 1 Send("{a down}") sleep(50) Send("{a up}") wend   Anlamayacak ne var ki süslü paranteze alıp sonuna down koyunca basılı tutuyor.Aynı şekilde sonuna up koyunca da kaldırıyor tuşu.

Send("{a down}")   İşlemler . . . .   Send("{a up}")     Geçte olsa kullanabileceğin bir kod

Başlamış bir fonksiyonu yarıda kes diye bir komut yok ancak komutları birleştirerek benzeri şeyleri yapabiliriz Örnek ; #include <ButtonConstants.au3> #include <GUIConstantsEx.au3> #include <StaticConstants.au3> #include <WindowsConstants.au3> Local $Time = @HOUR &":"& @MIN &":"& @SEC Local $Button1,$Button2 #Region ### START Koda GUI section ### Form= $Form1 = GUICreate("GUI", 157, 52, 192, 124) $Button1 = GUICtrlCreateButton("Başla", 0, 0, 75, 25) $Button2 = GUICtrlCreateButton("Durdur", 80, 0, 75, 25) $Label1 = GUICtrlCreateLabel($Time, 64, 32, 75, 17) GUISetState(@SW_SHOW) #EndRegion ### END Koda GUI section ### While 1 $nMsg = GUIGetMsg() Switch $nMsg Case $GUI_EVENT_CLOSE Exit Case $Button1 DurduralacakFonksiyon() EndSwitch WEnd Func DurduralacakFonksiyon() While 1 $Time =@HOUR &":"& @MIN &":"& @SEC GUICtrlSetData($Label1,$Time) Sleep(10) $nMsg = GUIGetMsg() Switch $nMsg Case $Button2 ExitLoop EndSwitch WEnd EndFunc

İşine yarayacak bir kod _IsPressed  , Autoit Yardım Dosyasından daha fazla ayrıntıya bakabilirsin , bunu dene ;   #include <Misc.au3>  Local $hDLL = DllOpen("user32.dll")   Func Button2Click()   $dakika = GUICtrlRead($Combo1)     Local $60Count = 0, $begin = TimerInit() While $dakika > $60Count    If _IsPressed("41", $hDLL) Then ExitLoop  ;A tuşuna basılınca Döngüden Çıkar     $dif = TimerDiff($begin)     $dif2 = StringLeft($dif, StringInStr($dif, ".") -1)     $Count = int($dif/1000)     $60Count = Int($Count / 60)     ToolTip("Belirlenen Dakika = " & $dakika & @CRLF & "Geçen Dakika = " & $60Count & @CRLF & "Saniye = " & $Count & @CRLF & "Mili Saniye = " & $dif2, 0, 0, "TimeStartExe", 1)     Sleep(20) WEnd

Merhaba arkadaşlar sizden biraz yarım isticekdim.Şu ana kadar araştırdıgım bilgilerle bi bot yapmaşa başladım ama bot pixel bulunca aralıksız tıklıyor ve bu benim işime yaramıyor. HotKeySet("s", "_Exit") ; Items' Pixel $BonusBox=0x8D81CD $BonusBoxing=0xB5D9E0 $CurveBall=0xCFFFC4 While True $BallPosition = PixelSearch(117, 314, 582, 621, $BonusBox, 1) If IsArray($BallPosition) = True Then MouseClick("left", $BallPosition[0], $BallPosition[1], 1, 1) Sleep(500) EndIf WEnd Func _Exit() Exit EndFunc Benim ihtyacım olan komut mesela kutu topluyorsun diyelim.Bu kutuyu alana kadar bekleme(Yani bir kez tıkladıktan sonra) ,ara verme veya durma gibi bi komut.Eğer böyle bi komut bilyorsanız bu scriptde nereye yerleştirmeliyim teşekkürler.