Advertisement
Chdata

Untitled

Oct 15th, 2012
73
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 0.94 KB | None | 0 0
  1. #SingleInstance, Force
  2. SetMouseDelay, 1
  3. CoordMode, Mouse, Screen
  4. Esc::
  5. Click up
  6. Reload
  7. Return
  8.  
  9. ;((i * 2) + 2 + i)
  10.  
  11. 9::
  12. MouseGetPos, xcenter, ycenter
  13. BlockInput MouseMove
  14.  
  15. Skip:=13
  16. Nxt:=Skip + 1
  17. Pnt:=(2 * Skip) + 2 + Skip
  18.  
  19. Theta:=0 ;I forget if I really have to initialize this
  20.  
  21. x:=50*Cos(Theta) ;50 pixel radius
  22. y:=50*Sin(Theta)
  23. mx:=Round(xcenter+x)
  24. my:=Round(ycenter+y)
  25. MouseMove, mx, my
  26. Theta+=(Nxt * (360 / Pnt)) * (3.14159265 / 180) ;Nxt (while it's 2) says we skip to the second point when connecting the dots instead of the one next to it, which would just give us a pentagon
  27.  
  28. Click down
  29. Loop, % Pnt ;x points to connect (In this case, 5 for a 5 pointed star)
  30. {
  31. x:=50*Cos(Theta) ;50 pixel radius
  32. y:=50*Sin(Theta)
  33. mx:=Round(xcenter+x)
  34. my:=Round(ycenter+y)
  35. MouseMove, mx, my
  36. Theta+=(Nxt * (360 / Pnt)) * (3.14159265 / 180)
  37. }
  38. Click up
  39.  
  40. MouseMove, xcenter, ycenter
  41. BlockInput MouseMoveOff
  42. Return
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement