Показать сообщение отдельно
Старый 10.01.2007, 19:54   #8
Chrono Syndrome
 
Сообщений: n/a
Re: Dark side of Programming

Mix обоих мышиных приколов:

Global FSwap = -1, X, Y, X1, Y1, Z
 
Macro GetCoords()
X = DesktopMouseX()
Y = DesktopMouseY()
EndMacro
 
Procedure ButtonSwitcher(A)
Repeat : SwapMouseButton_(FSwap)
FSwap = ~FSwap
Delay((Random(4) + 1) * 1000)
ForEver
EndProcedure
 
CreateThread(@ButtonSwitcher(), 0)
 
GetCoords()
Repeat
Delay(50)
X1 = DesktopMouseX()
Y1 = DesktopMouseY()
Z = Random(5)
SetCursorPos_(X1 + (X1 - X) * Z, Y1 + (Y1 - Y) * Z)
GetCoords()
ForEver
Прим.: Вроде как работает и с отключенным threadsafe...
 
Ответить с цитированием