Myn at 12:23, 11 November 2010

2010-11-11T12:23:46Z

Myn: Created page with "//General purpose slate and clay collector. Works best without a fishing pole or jugs (if not doing clay). // To begin, hover your mouse over the icon you wish to click in ATITD..."

2010-11-11T12:21:30Z

Created page with "//General purpose slate and clay collector. Works best without a fishing pole or jugs (if not doing clay). // To begin, hover your mouse over the icon you wish to click in ATITD..."

New page

//General purpose slate and clay collector. Works best without a fishing pole or jugs (if not doing clay).
// To begin, hover your mouse over the icon you wish to click in ATITD (i.e. be over a patch of clay or a piece of
//slate and have this program active. Press F2, and the macro *should* start.
Constants
Red = 0
Green = 0
Blue = 0
XPos1 = 0
YPos1 = 0
ReturnXPos = 0
ReturnYPos = 0
CurrKey = 0
End
SetConst XPos1 = {MouseX}
SetConst YPos1 = {MouseY}
LoadRGB $XPos1, $YPos1
SetConst Red = {RGBRed}
SetConst Blue = {RGBBlue}
SetConst Green = {RGBGreen}
SetConst CurrKey = {GlobalKeys} /// i'm not sure exactly what this one is doing, if anything at all. It may be something left over from another macro.

While 1 = 1

SetConst ReturnXPos = {MouseX}
SetConst ReturnYPos = {MouseY}
GetRed $XPos1, $YPos1 = $Red
GetGreen $XPos1, $YPos1 = $Green
GetBlue $XPos1, $YPos1 = $Blue

MousePos $XPos1, $YPos1
RightClick
MousePos $ReturnXPos, $ReturnYPos
End
End
End

Delay 150
End

@@ Line 1: / Line 1: @@
-//General purpose slate and clay collector.  Works best without a fishing pole or jugs (if not doing clay).
+ //General purpose slate and clay collector.  Works best without a fishing pole or jugs (if not doing clay).
-// To begin, hover your mouse over the icon you wish to click in ATITD (i.e. be over a patch of clay or a piece of
+ // To begin, hover your mouse over the icon you wish to click in ATITD (i.e. be over a patch of clay or a  piece of
-//slate and have this program active.  Press F2, and the macro *should* start.
+ //slate and have this program active.  Press F2, and the macro *should* start.
 Constants
    Red = 0
    Green = 0
@@ Line 11: / Line 12: @@
    ReturnYPos = 0
    CurrKey = 0
-End
+ End
 SetConst XPos1 = {MouseX}
-SetConst YPos1 = {MouseY}
+ SetConst XPos1 = {MouseX}
-LoadRGB $XPos1, $YPos1
+ SetConst YPos1 = {MouseY}
-SetConst Red = {RGBRed}
+ LoadRGB $XPos1, $YPos1
-SetConst Blue = {RGBBlue}
+ SetConst Red = {RGBRed}
-SetConst Green = {RGBGreen}
+ SetConst Blue = {RGBBlue}
-SetConst CurrKey = {GlobalKeys}  /// i'm not sure exactly what this one is doing, if anything at all. It may be something left over from another macro.
+ SetConst Green = {RGBGreen}
+ SetConst CurrKey = {GlobalKeys}  /// i'm not sure exactly what this one is doing, if anything at all. It may be something left over from another macro.
-−
+ While 1 = 1
 While 1 = 1
+ SetConst ReturnXPos = {MouseX}
-SetConst ReturnXPos = {MouseX}
+ SetConst ReturnYPos = {MouseY}
    GetRed  $XPos1, $YPos1 = $Red
      GetGreen  $XPos1, $YPos1 = $Green
@@ Line 38: / Line 38: @@
    Delay 150
-End
+ End

User:Myn/Temp - Revision history

Myn at 12:23, 11 November 2010

Myn: Created page with "//General purpose slate and clay collector. Works best without a fishing pole or jugs (if not doing clay). // To begin, hover your mouse over the icon you wish to click in ATITD..."