JuSt3e
Üye-
Posts
21 -
Joined
-
Last visited
JuSt3e's Achievements
Newbie (1/14)
0
Reputation
-
Merhabalar, Yapılan bir programda exe haline getirdiğimiz zaman nasıl programın telif hakkı, açıklama gibi bilgilerini gireriz ?
-
Ben burada hazır program kapma peşinde değilim. Sen bana örnek atıyorsun ama içerisindeki kodların ne işlevi olduğunu söylesen anlarım. HTML'de örneğin <center> gibi komutun yazığı ortaladığı gibi içindeki komutların neyi çalıştırdığını hangi görevi yaptığınıda eklersen çözülür. Ama sen sadece ortaya bir örnek atıyorsun al kurcala diyorsun.
-
"ENTER" basınca donuyor program :) Durdurmaya çalışıyorum yine donuyor :D
-
Oto Mouse Kodu #cs ---------------------------------------------------------------------------- AutoIt Version: 3.3.8.1 Author: myName Script Function: Template AutoIt script. #ce ---------------------------------------------------------------------------- ; Script Start - Add your code below here #include <ButtonConstants.au3> #include <ComboConstants.au3> #include <EditConstants.au3> #include <GUIConstantsEx.au3> #include <StaticConstants.au3> #include <WindowsConstants.au3> #include <Misc.au3> HotKeySet("{F6}", "_basla") HotKeySet("{F9}", "_dur") #Region ### START Koda GUI section ### Form= $Form1 = GUICreate("AutoTick", 372, 146, -1, -1) $Button1 = GUICtrlCreateButton("Koordinat Bul", 8, 8, 107, 21) $Input1 = GUICtrlCreateInput("", 9, 40, 106, 21) $Input2 = GUICtrlCreateInput("", 138, 24, 41, 21, BitOR($GUI_SS_DEFAULT_INPUT,$ES_NUMBER)) $Graphic1 = GUICtrlCreateGraphic(8, 72, 361, 1) GUICtrlSetColor(-1, 0x004000) $Label1 = GUICtrlCreateLabel("Salise", 186, 28, 60, 17) $Combo1 = GUICtrlCreateCombo("", 248, 24, 81, 25, BitOR($CBS_DROPDOWNLIST,$CBS_AUTOHSCROLL)) GUICtrlSetData(-1, "1. Sol (Tek)|2. Sol (Çift)|3. Sağ") $Label2 = GUICtrlCreateLabel("Komut", 336, 28, 56, 17) $Button2 = GUICtrlCreateButton("F6 (Başla)", 8, 80, 75, 25) $Button3 = GUICtrlCreateButton("F9 (Durdur)", 88, 80, 75, 25) $ButtonEnter = GUICtrlCreateButton("F4 (ENTER)", 168, 80, 75, 25) $Label3 = GUICtrlCreateLabel("Coder: asmazh", 8, 120, 203, 17) GUISetState(@SW_SHOW) #EndRegion ### END Koda GUI section ### Global $Coor, $TickStyle While 1 $nMsg = GUIGetMsg() Switch $nMsg Case $GUI_EVENT_CLOSE Exit Case $Button1 GUICtrlSetState($Button1, $GUI_DISABLE) _CoorToMake() GUICtrlSetData($Input1, $Coor[0] & ";" & $Coor[1]) GUICtrlSetState($Button1, $GUI_ENABLE) If Not WinActive($Form1, "") Then WinActivate($Form1, "") Case $Button2 _basla() case $Button3 _dur() EndSwitch WEnd Func _CoorToMake() While _IsPressed("01") <> 1 Sleep(5) ToolTip("Koordinatını almak istediğiniz alanın üstüne" & @CRLF & "fare ile sol tıklayın.") WEnd ToolTip("") $Coor = MouseGetPos() EndFunc Func _StartTick() If $TickStyle = 1 Then MouseClick("left", $Coor[0], $Coor[1], 1, 0) ElseIf $TickStyle = 2 Then MouseClick("left", $Coor[0], $Coor[1], 2, 0) Else MouseClick("right", $Coor[0], $Coor[1], 1, 0) EndIf EndFunc func _dur() AdlibUnRegister("_StartTick") endfunc Func _basla() If Not IsArray($Coor) Or _ GUICtrlRead($Input2) = "" Or _ GUICtrlRead($Combo1) = "" Then MsgBox(0, "Eksik görünen birşey var!", "Gerekli yerleri doldurduğunuza emin olun", $Form1) Else $TickStyle = Number(StringLeft(GUICtrlRead($Combo1), 1)) AdlibRegister("_StartTick", Number(GUICtrlRead($Input2)) * 1) EndIf endfunc Oto tuş kodu ; Press Esc to terminate script Global $UnPaused HotKeySet("{F5}", "TogglePause") HotKeySet("{ESC}", "Terminate") While 1 Sleep(100) ToolTip("Uygulamayı başlatıp veya durdurmak için F5 tuşunu kullanın. Çıkış yapmak için ESC tuşuna basın!",0,0) WEnd Func TogglePause() $UnPaused = NOT $UnPaused While $UnPaused ToolTip("Çalışıyor...",0,0) Send("{ENTER}") WEnd EndFunc Func Terminate() Exit 0 EndFunc
-
İncelemediğimimi zannediyorsunuz ? Diyorum ki size zaten ENTER komutuna kadar kodları buldum kodlarda ekleme yapınca program donuyor. Sen bana örnek kod gösteriyorsun ama birşey anlamıyorum diyorum sizde bu konuda anlamamakta sıkıntı yaşıyorsunuz sanırım.
-
Çalışıyor sizede teşekkür etmiştim :=) Tekrar yine saolun :) Oto tuş basma komutunu yapmaya çalışıyorum. Gereken kodları buldum fakat sizin vermiş olduğunuz kodlara ekleyince çalışmıyor sanırım bir yerde hata yapıyor olmalıyım :) Aynı programın içinde oto tuş basmayıda yapabilirsem çok daha güzel olacak F6 ve F9 ile oto tıklama oluyorsa örneğin; F5 ile "ENTER" tuşuna otomatik basmayı aktifleştirmeyi çalışıyorum fakat birtürlü yapamadım. Resim belki açıklayıcı olur diye koymak istedim :)
-
#cs ---------------------------------------------------------------------------- AutoIt Version: 3.3.8.1 Author: myName Script Function: Template AutoIt script. #ce ---------------------------------------------------------------------------- ; Script Start - Add your code below here Global $UnPaused HotKeySet("{F8}", "TogglePause") While 1 Sleep(100) ToolTip("ENTER tuşuna otomatik basmayı başlatmak için F8 tuşuna basın.",0,0) WEnd Func TogglePause() $UnPaused = NOT $UnPaused While $UnPaused ToolTip("ENTER tuşuna otomatik basmayı durdurmak için F8 tuşuna basın.",0,0) Send("{ENTER}") WEnd EndFunc Oto tuş basma komutunuda buldum. Bu kodları nereye koyarsam koyayım hata veriyor.
-
Çok teşekkür ediyorum. Komutların ne anlama geldiğini öğrenebilirsem inanın çok sarılacağım AutoIT'e
-
Şimdi ben bu kodu nereye yapıştırayım ? Nereleri düzenlemem gerekiyor ?
-
İnceledim burayı daha önce pek birşey anlamadım.
-
#cs ---------------------------------------------------------------------------- AutoIt Version: 3.3.8.1 Author: myName Script Function: Template AutoIt script. #ce ---------------------------------------------------------------------------- ; Script Start - Add your code below here #include <ButtonConstants.au3> #include <ComboConstants.au3> #include <EditConstants.au3> #include <GUIConstantsEx.au3> #include <StaticConstants.au3> #include <WindowsConstants.au3> #include <Misc.au3> #Region ### START Koda GUI section ### Form= $Form1 = GUICreate("AutoTick", 372, 146, -1, -1) $Button1 = GUICtrlCreateButton("Koordinat Bul", 8, 8, 107, 21) $Input1 = GUICtrlCreateInput("", 9, 40, 106, 21) $Input2 = GUICtrlCreateInput("", 138, 24, 41, 21, BitOR($GUI_SS_DEFAULT_INPUT,$ES_NUMBER)) $Graphic1 = GUICtrlCreateGraphic(8, 72, 361, 1) GUICtrlSetColor(-1, 0x004000) $Label1 = GUICtrlCreateLabel("Salise", 186, 28, 60, 17) $Combo1 = GUICtrlCreateCombo("", 248, 24, 81, 25, BitOR($CBS_DROPDOWNLIST,$CBS_AUTOHSCROLL)) GUICtrlSetData(-1, "1. Sol (Tek)|2. Sol (Çift)|3. Sağ") $Label2 = GUICtrlCreateLabel("Komut", 336, 28, 56, 17) $Button2 = GUICtrlCreateButton("Başla", 8, 80, 75, 25) $Button3 = GUICtrlCreateButton("Dur", 88, 80, 75, 25) $Label3 = GUICtrlCreateLabel("Basit bir örnektir. Çeşitlendirilebilir. AsmazH", 8, 120, 203, 17) GUISetState(@SW_SHOW) #EndRegion ### END Koda GUI section ### Global $Coor, $TickStyle While 1 $nMsg = GUIGetMsg() Switch $nMsg Case $GUI_EVENT_CLOSE Exit Case $Button1 GUICtrlSetState($Button1, $GUI_DISABLE) _CoorToMake() GUICtrlSetData($Input1, $Coor[0] & ";" & $Coor[1]) GUICtrlSetState($Button1, $GUI_ENABLE) If Not WinActive($Form1, "") Then WinActivate($Form1, "") Case $Button2 If Not IsArray($Coor) Or _ GUICtrlRead($Input2) = "" Or _ GUICtrlRead($Combo1) = "" Then MsgBox(0, "", "kardeş önce gerekli ayarları gir. yok öyle 3 kuruşa 5 köfte. (ne alakaysa :))", $Form1) Else $TickStyle = Number(StringLeft(GUICtrlRead($Combo1), 1)) AdlibRegister("_StartTick", Number(GUICtrlRead($Input2)) * 1) EndIf case $Button3 AdlibUnRegister("_StartTick") EndSwitch WEnd Func _CoorToMake() While _IsPressed("01") <> 1 Sleep(5) ToolTip("Koordinatını almak istediğiniz alanın üstüne" & @CRLF & "fare ile sol tıklayın.") WEnd ToolTip("") $Coor = MouseGetPos() EndFunc Func _StartTick() If $TickStyle = 1 Then MouseClick("left", $Coor[0], $Coor[1], 1, 0) ElseIf $TickStyle = 2 Then MouseClick("left", $Coor[0], $Coor[1], 2, 0) Else MouseClick("right", $Coor[0], $Coor[1], 1, 0) EndIf EndFunc asmazh arkadaşımızın yapmış olduğu kodda klavye ile durdurma, başlatma komutunu gösterebilcek var mı ? Örneğin; Butonlara tıklayarak değilde F6-F9 gibi tuşlara tıklarak durdurulup, başlatılmasını istiyorum.
-
Bende diyorum seyli birşey varmıydı :)
-
Salise olayı tamamdır :) HotKeySey bulmaya çalışıyorum :))
-
Öncelikle çok teşekkür ederim. Saniyede tıklama değilde, nasıl salise ayarına alabiliriz ? Klavyeden kontrol nasıl sağlarız. Mesela F7 bastığım zaman başlayacak F9 bastığım zaman duracak :)
-
Ben bundan pek nasıl bir yol alacağımı anlayamadım :)