Oğlum TETU'yla arada Roblox'tan Pet Simulator X oynuyoruz. Bu esnada ihtiyaçlarımızla birlikte basit bir fare autoclicker iken gelişip evrimleşen AutoHotKey scriptimi sizinle paylaşmak istedim. Belki birilerinin işine yarar.
Özellikleri:* Alt + F5 kombinasyonu: SOL FARE tuşuna basılı tutmayı açıp kapatır.
* Win + F5 kombinasyonu: SAĞ OK tuşuna basılı tutmayı açıp kapatır.
* Win + F6 kombinasyonu: 30 saniye aralıkla SOL FARE tuşuna uzun basma yapar.
* Win + F7 kombinasyonu: 30 saniye aralıkla BOŞLUK tuşuna basar.
* Win + F8 kombinasyonu: 19 dakika aralıkla Roblox penceresini ön plana getirip BOŞLUK tuşuna basıp tekrar minimize eder. Otomatik kasarken bilgisayarda takılma modu.
* Ctrl + Alt + Rakam kombinasyonu: Rakam * 100ms aralıkla SOL FARE tuşuna seri basmayı açıp kapatabilirsiniz. (1-> 100ms, 2-> 200ms, ... , 0->1000ms)
Notlar:1. Oyun 20 dakika bir tuşa basılmazsa disconnect olduğu için arada SPACE ile zıplıyoruz.
2. Eskiden büyük sandıklarda kasmak için Win+F6 kullanıyorduk ama daha sonra Ctrl + Alt + Rakam modlarını geliştirdim ve oyun ayarlarından Pet Sending-> All yaparak bu modları kullanmaya başladık.
3. Win + F7, Win + F5 ve Ctrl + Alt + 1 kombinasyonu ile kamera açısını değiştirip fare imlecini ufuk çizgisine getirince çevremizde dönerek farming yapabiliyoruz. Bu mod uzun süre çalışınca oyundan atyor, yani gece bırakmaya uygun değil.
4. Gece farmingi için Win + F7 ve Ctrl + Alt + 1 daha uygun.
5. Otomatik yumurta açmak için kamera açısını ayarlayarak yumurta açma simgesi ile ok simgesi aynı yerde çıkacak şekilde ayarlama yapıp Ctrl + Alt + 1 kullanıyoruz. Gece bırakılacaksa Win + F7 unutmuyoruz.
6. Roblox harici bir uygulamaya uyarlamak isterseniz ilk satırdaki Roblox ifadesini pencere başlığıyla değiştirerek yapabilirsiniz.
WinGet PID, PID, Roblox
WinActivate ahk_pid %PID%
SoundPlay *16
ToggleLMKP := false ; LeftMouse Keep Pressed (Alt + F5) (Toggle, Keep Pressed Until Toggle)
ToggleRAKP := false ; RightArrow Keep Pressed (Win + F5) (Toggle, Keep Pressed Until Toggle)
ToggleLMLP := false ; LeftMouse Long Press (Win + F6) (Toggle, Repeat Every 30 seconds)
ToggleSKPN := false ; Space Key Press Normal (Win + F7) (Toggle, Repeat Every 30 seconds)
ToggleSKPM := false ; Space Key Press Minimize (Win + F8) (Toggle, Repeat Every 19 minutes)
ToggleLMSP := false ; LeftMouse Short Press (Ctrl + Alt + Number) (Toggle, Repeat Every [Number * 0.1] seconds)
#UseHook
; LeftMouse Keep Pressed Toggle Key (Alt + F5)
!F5::
ToggleLMKP := !ToggleLMKP
if (ToggleLMKP)
{
SoundPlay %A_WinDir%\Media\Speech On.wav
Gosub LeftMouseKeepPressed
}
else
{
Gosub LeftMouseKeepReleased
SoundPlay %A_WinDir%\Media\Speech Off.wav
}
Return
; RightArrow Keep Pressed Toggle Key (Win + F5)
#F5::
ToggleRAKP := !ToggleRAKP
if (ToggleRAKP)
{
SoundPlay %A_WinDir%\Media\Speech On.wav
Gosub RightArrowKeepPressed
}
else
{
Gosub RightArrowKeepReleased
SoundPlay %A_WinDir%\Media\Speech Off.wav
}
Return
; LeftMouse Long Press Toggle Key (Win + F6)
#F6::
ToggleLMLP := !ToggleLMLP
if (ToggleLMLP)
{
ToggleLMSP := false
SetTimer LeftMouseShortPress, Off
SoundPlay %A_WinDir%\Media\Speech On.wav
Gosub LeftMouseLongPress
SetTimer LeftMouseLongPress, 30000 ; 30 seconds
}
else
{
SoundPlay %A_WinDir%\Media\Speech Off.wav
SetTimer LeftMouseLongPress, Off
}
Return
; Space Key Press Normal Toggle Key (Win + F7)
#F7::
ToggleSKPN := !ToggleSKPN
if (ToggleSKPN)
{
ToggleSKPM := false
SetTimer SpaceKeyPressMinimize, Off
SoundPlay %A_WinDir%\Media\Speech On.wav
Gosub SpaceKeyPressNormal
SetTimer SpaceKeyPressNormal, 30000 ; 30 seconds
}
else
{
SoundPlay %A_WinDir%\Media\Speech Off.wav
SetTimer SpaceKeyPressNormal, Off
}
Return
; Space Key Press Minimize Toggle Key (Win + F8)
#F8::
ToggleSKPM := !ToggleSKPM
if (ToggleSKPM)
{
ToggleSKPN := false
SetTimer SpaceKeyPressNormal, Off
SoundPlay %A_WinDir%\Media\Speech On.wav
Gosub SpaceKeyPressMinimize
SetTimer SpaceKeyPressMinimize, 1140000 ; 19 minutes
}
else
{
SoundPlay %A_WinDir%\Media\Speech Off.wav
SetTimer SpaceKeyPressMinimize, Off
}
Return
; LeftMouse Short Press Toggle Key (100 ms) (Ctrl + Alt + 1)
^!1::
ToggleLMSP := !ToggleLMSP
if (ToggleLMSP)
{
ToggleLMLP := false
SetTimer LeftMouseLongPress, Off
SoundPlay %A_WinDir%\Media\Speech On.wav
Gosub LeftMouseShortPress
SetTimer LeftMouseShortPress, 100 ; 100 milliseconds
}
else
{
SoundPlay %A_WinDir%\Media\Speech Off.wav
SetTimer LeftMouseShortPress, Off
}
Return
; LeftMouse Short Press Toggle Key (200 ms) (Ctrl + Alt + 2)
^!2::
ToggleLMSP := !ToggleLMSP
if (ToggleLMSP)
{
ToggleLMLP := false
SetTimer LeftMouseLongPress, Off
SoundPlay %A_WinDir%\Media\Speech On.wav
Gosub LeftMouseShortPress
SetTimer LeftMouseShortPress, 200 ; 200 milliseconds
}
else
{
SoundPlay %A_WinDir%\Media\Speech Off.wav
SetTimer LeftMouseShortPress, Off
}
Return
; LeftMouse Short Press Toggle Key (300 ms) (Ctrl + Alt + 3)
^!3::
ToggleLMSP := !ToggleLMSP
if (ToggleLMSP)
{
ToggleLMLP := false
SetTimer LeftMouseLongPress, Off
SoundPlay %A_WinDir%\Media\Speech On.wav
Gosub LeftMouseShortPress
SetTimer LeftMouseShortPress, 300 ; 300 milliseconds
}
else
{
SoundPlay %A_WinDir%\Media\Speech Off.wav
SetTimer LeftMouseShortPress, Off
}
Return
; LeftMouse Short Press Toggle Key (400 ms) (Ctrl + Alt + 4)
^!4::
ToggleLMSP := !ToggleLMSP
if (ToggleLMSP)
{
ToggleLMLP := false
SetTimer LeftMouseLongPress, Off
SoundPlay %A_WinDir%\Media\Speech On.wav
Gosub LeftMouseShortPress
SetTimer LeftMouseShortPress, 400 ; 400 milliseconds
}
else
{
SoundPlay %A_WinDir%\Media\Speech Off.wav
SetTimer LeftMouseShortPress, Off
}
Return
; LeftMouse Short Press Toggle Key (500 ms) (Ctrl + Alt + 5)
^!5::
ToggleLMSP := !ToggleLMSP
if (ToggleLMSP)
{
ToggleLMLP := false
SetTimer LeftMouseLongPress, Off
SoundPlay %A_WinDir%\Media\Speech On.wav
Gosub LeftMouseShortPress
SetTimer LeftMouseShortPress, 500 ; 500 milliseconds
}
else
{
SoundPlay %A_WinDir%\Media\Speech Off.wav
SetTimer LeftMouseShortPress, Off
}
Return
; LeftMouse Short Press Toggle Key (600 ms) (Ctrl + Alt + 6)
^!6::
ToggleLMSP := !ToggleLMSP
if (ToggleLMSP)
{
ToggleLMLP := false
SetTimer LeftMouseLongPress, Off
SoundPlay %A_WinDir%\Media\Speech On.wav
Gosub LeftMouseShortPress
SetTimer LeftMouseShortPress, 600 ; 600 milliseconds
}
else
{
SoundPlay %A_WinDir%\Media\Speech Off.wav
SetTimer LeftMouseShortPress, Off
}
Return
; LeftMouse Short Press Toggle Key (700 ms) (Ctrl + Alt + 7)
^!7::
ToggleLMSP := !ToggleLMSP
if (ToggleLMSP)
{
ToggleLMLP := false
SetTimer LeftMouseLongPress, Off
SoundPlay %A_WinDir%\Media\Speech On.wav
Gosub LeftMouseShortPress
SetTimer LeftMouseShortPress, 700 ; 700 milliseconds
}
else
{
SoundPlay %A_WinDir%\Media\Speech Off.wav
SetTimer LeftMouseShortPress, Off
}
Return
; LeftMouse Short Press Toggle Key (800 ms) (Ctrl + Alt + 8)
^!8::
ToggleLMSP := !ToggleLMSP
if (ToggleLMSP)
{
ToggleLMLP := false
SetTimer LeftMouseLongPress, Off
SoundPlay %A_WinDir%\Media\Speech On.wav
Gosub LeftMouseShortPress
SetTimer LeftMouseShortPress, 800 ; 800 milliseconds
}
else
{
SoundPlay %A_WinDir%\Media\Speech Off.wav
SetTimer LeftMouseShortPress, Off
}
Return
; LeftMouse Short Press Toggle Key (900 ms) (Ctrl + Alt + 9)
^!9::
ToggleLMSP := !ToggleLMSP
if (ToggleLMSP)
{
ToggleLMLP := false
SetTimer LeftMouseLongPress, Off
SoundPlay %A_WinDir%\Media\Speech On.wav
Gosub LeftMouseShortPress
SetTimer LeftMouseShortPress, 900 ; 900 milliseconds
}
else
{
SoundPlay %A_WinDir%\Media\Speech Off.wav
SetTimer LeftMouseShortPress, Off
}
Return
; LeftMouse Short Press Toggle Key (1000 ms) (Ctrl + Alt + 0)
^!0::
ToggleLMSP := !ToggleLMSP
if (ToggleLMSP)
{
ToggleLMLP := false
SetTimer LeftMouseLongPress, Off
SoundPlay %A_WinDir%\Media\Speech On.wav
Gosub LeftMouseShortPress
SetTimer LeftMouseShortPress, 1000 ; 1 seconds
}
else
{
SoundPlay %A_WinDir%\Media\Speech Off.wav
SetTimer LeftMouseShortPress, Off
}
Return
; AutoClick Functions To Be Timed
LeftMouseShortPress:
Click
Return
LeftMouseLongPress:
Click
Sleep 500
Click Down
Sleep 500
Click Up
Return
LeftMouseKeepPressed:
Click Down Left
Return
LeftMouseKeepReleased:
Click Up Left
Return
RightArrowKeepPressed:
Send {right down}
Return
RightArrowKeepReleased:
Send {right up}
Return
SpaceKeyPressNormal:
Send {space down}
Sleep 50
Send {space up}
Return
SpaceKeyPressMinimize:
WinActivate ahk_pid %PID%
Send {space down}
Sleep 50
Send {space up}
Sleep 1000
WinMinimize ahk_pid %PID%
Return
Derlemek için AutoHotKey yükleyip AutoClicker.ahk dosyasına sağ tıklayıp Compile Script (GUI)... seçeneği ile çalıştırılabilir hale getirebilir, AutoHotkey yüklü olmayan bilgisayarlarda da kullanabilirsiniz.
Genel Kategori
