The Wiki for Tale 5 is in read-only mode and is available for archival and reference purposes only. Please visit the current Tale 11 Wiki in the meantime.

If you have any issues with this Wiki, please post in #wiki-editing on Discord or contact Brad in-game.

Difference between revisions of "User:Myn/Temp"

From ATITD5
Jump to navigationJump to search
m (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...")
 
m
 
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
+
 +
Constants
 
   Red = 0
 
   Red = 0
 
   Green = 0
 
   Green = 0
Line 11: Line 12:
 
   ReturnYPos = 0
 
   ReturnYPos = 0
 
   CurrKey = 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}
SetConst ReturnYPos = {MouseY}
 
 
   GetRed  $XPos1, $YPos1 = $Red
 
   GetRed  $XPos1, $YPos1 = $Red
 
     GetGreen  $XPos1, $YPos1 = $Green
 
     GetGreen  $XPos1, $YPos1 = $Green
Line 38: Line 38:
 
    
 
    
 
   Delay 150
 
   Delay 150
End
+
End

Latest revision as of 12:23, 11 November 2010

//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