Тема: Работает AHK Аукцион
Показать сообщение отдельно
Старый 06.04.2017, 10:38  
Enemt
Нуб
Аватар для Enemt
OFFLINE
Регистрация: 04.04.2017
Возраст: 37
Сообщений: 0
Благодарностей:
1 всего
Репутация: 4

Так блочится, у меня даже в моде плей. А вот если юзать дллку для передвижения мыши, и какую нить а4тек для кликов, с отключением мышки через библиотечку хука, то впринципе воркает. можно и кликать через маузивент, но я чет не стал. предварительно отключаю тор геймнета через бат.
Правд никакого очеловечивания при перескакивании мышки от координаты к координате добавить не выйдет.

Добавлено через 31 минуту
[HIDE="40"]Вот вчера поюзал, не оптимизировано, но и ладно мне для скупки пары троек печенюх. Окошко без рамки, 1080p и скупает и проверяет только в режиме торг. если не купили то и нам не надо
работает в связки с bat, код ниже. служба thorn на ручном режиме и макрос на клик мышки с общим временем на повтор 500мс.
PHP код:
net start Thorn
TIMEOUT 
/T 180 /NOBREAK
cd 
%LOCALAPPDATA%\THORN && thorn.exe -c 20***91;/HIDE***93; 
PHP код:
#NoEnv  ; Recommended for performance and compatibility with future AutoHotkey releases.
#Warn  ; Enable warnings to assist with detecting common errors.
SendMode Input  Recommended for new scripts due to its superior speed and reliability.
SetWorkingDir %A_ScriptDir%  ; Ensures a consistent starting directory.

CoordModePixelScreen

^XButton2::GoSub, Exit
return
^
X::GoSub, Exit
return
OnExit, Exit
return

XButton2::
VarX := 1300
VarY1 
:= 350
VarY2 
:= 410
VarY3 
:= 475
VarY4 
:= 540
VarXnew 
:= 800
VarYnew 
:= 775
VarXok 
:= 910
VarYok 
:= 479
VarXmax 
:= 1115
VarYmax 
:= 595
VarXs 
:= 900
VarYs 
:= 635
GoSub
Moff

GoSub
Part1
pause

Part1
:
sleep 30000
GoSub
Mon
DllCall
("SetCursorPos"intVarXnewintVarYnew)
sleep 2000
GoSub
Moff
EndTime 
:= A_TickCount 30000
FindCount 
0
while EndTime A_TickCount
{
PixelSearchOutputVarXOutputVarY127033013303600xffffff25Fast
    
If !ErrorLevel
    
{
        
GoSubMon
        DllCall
("SetCursorPos"intVarXintVarY1)
        
sleep 1000
        DllCall
("SetCursorPos"intVarXokintVarYok)
        
sleep 1000
        DllCall
("SetCursorPos"intVarXintVarY2)
        
sleep 1000
        DllCall
("SetCursorPos"intVarXokintVarYok)
        
sleep 1000
        DllCall
("SetCursorPos"intVarXintVarY3)
        
sleep 1000
        DllCall
("SetCursorPos"intVarXokintVarYok)
        
sleep 1000
        DllCall
("SetCursorPos"intVarXintVarY4)
        
sleep 1000
        DllCall
("SetCursorPos"intVarXokintVarYok)
        
sleep 1000
        FindCount 
:= 4
        GoSub
Moff
        Gosub
Part2
    
}
    else
    {
        
GoSubMon
        DllCall
("SetCursorPos"intVarXnewintVarYnew)
        
sleep 1000
        GoSub
Moff
    
}
}
If 
FindCount 0
    GoSub
Part2
else
    
GoSubPart1
return



Part2:
EndTime := A_TickCount 90000
while EndTime A_TickCount
{
PixelSearchOutputVarXOutputVarY127033013303600xffffff25Fast
    
If !ErrorLevel
    
{
        
GoSubMon
        DllCall
("SetCursorPos"intVarXintVarY1)
        
sleep 1000
        DllCall
("SetCursorPos"intVarXmaxintVarYmax)
        
sleep 1000
        DllCall
("SetCursorPos"intVarXsintVarYs)
        
sleep 1000
        DllCall
("SetCursorPos"intVarXokintVarYok)
        
sleep 1000
        DllCall
("SetCursorPos"intVarXintVarY2)
        
sleep 1000
        DllCall
("SetCursorPos"intVarXmaxintVarYmax)
        
sleep 1000
        DllCall
("SetCursorPos"intVarXsintVarYs)
        
sleep 1000
        DllCall
("SetCursorPos"intVarXokintVarYok)
        
sleep 1000
        DllCall
("SetCursorPos"intVarXintVarY3)
        
sleep 1000
        DllCall
("SetCursorPos"intVarXmaxintVarYmax)
        
sleep 1000
        DllCall
("SetCursorPos"intVarXsintVarYs)
        
sleep 1000
        DllCall
("SetCursorPos"intVarXokintVarYok)
        
sleep 1000
        DllCall
("SetCursorPos"intVarXintVarY4)
        
sleep 1000
        DllCall
("SetCursorPos"intVarXmaxintVarYmax)
        
sleep 1000
        DllCall
("SetCursorPos"intVarXsintVarYs)
        
sleep 1000
        DllCall
("SetCursorPos"intVarXokintVarYok)
        
sleep 1000
        DllCall
("SetCursorPos"int500int500)
        
GoSubMoff
        GoSub
Part1    
    
}    
}
return

Moff:
hHookMouse := DllCall("SetWindowsHookEx"
   
IntWH_MOUSE_LL := 14
   
PtrRegisterCallback("LowLevelMouseProc""Fast")
   , 
PtrDllCall("GetModuleHandle"UInt0Ptr)
   , 
UInt0Ptr)
return     
 
Mon:
DllCall("UnhookWindowsHookEx"PtrhHookMouse), hHookMouse := ""
return

Lc:
DllCall("mouse_event""UInt"0x02) ; left button down
DllCall
("mouse_event""UInt"0x04) ; left button up
return  



Exit:
   (
hHookMouse && DllCall("UnhookWindowsHookEx"PtrhHookMouse))
   
ExitApp

LowLevelMouseProc
(nCodewParamlParam)
{
   Return 
1
}***93; 

Последний раз редактировалось Enemt; 06.04.2017 в 11:09. Причина: Добавлено сообщение
 
Ответить с цитированием
Сказали спасибо:
ssnik (21.04.2017)