Advertisement
DevTricks

Вращение курсора по часовой стрелке пока нажата кнопка

Sep 7th, 2020
542
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
  1. F2::
  2.     X0:=500 ;центр восьмиугольника по Х
  3.     Y0:=500 ;центр восьмиугольника по Y
  4.     R:= 100 ;радиус
  5.     S:=0    ;скорость передвижения мыши (0 - максимальная)
  6.   Loop
  7.   {
  8.     if not GetKeyState("F2", "P") ;Выполнять цикл пока нажата клавиша
  9.       break
  10.     mousemove,X0,Y0-R,S
  11.     mousemove,X0+R*0.75,Y0-R*0.75,S
  12.     mousemove,X0+R,Y0,S
  13.     mousemove,X0+R*0.75,Y0+R*0.75,S
  14.     mousemove,X0,Y0+R,S
  15.     mousemove,X0-R*0.75,Y0+R*0.75,S
  16.     mousemove,X0-R,Y0,S
  17.     mousemove,X0-R*0.75,Y0-R*0.75,S
  18.   }
  19. return
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement