The Wiki for Tale 4 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 "SlateClayGrass"
(New page: <nowiki>//General purpose slate and clay collector. Works best without water jugs //or a fishing pole. To begin, hover your mouse over the icon //you wish to collect in ATITD (i.e. be ov...) |
|||
Line 1: | Line 1: | ||
− | + | //General purpose slate and clay collector. Works best without water jugs | |
//or a fishing pole. To begin, hover your mouse over the icon | //or a fishing pole. To begin, hover your mouse over the icon | ||
//you wish to collect in ATITD (i.e. be over a patch of clay or a piece of | //you wish to collect in ATITD (i.e. be over a patch of clay or a piece of | ||
Line 48: | Line 48: | ||
Stop | Stop | ||
End | End | ||
− | End | + | End |
Revision as of 11:11, 2 February 2010
//General purpose slate and clay collector. Works best without water jugs //or a fishing pole. To begin, hover your mouse over the icon //you wish to collect 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 will start. Constants
Red = 0 Green = 0 Blue = 0 XPos = 0 YPos = 0 CurrKey = 0 OrigX = 0 OrigY = 0 right = 0
End SetConst XPos = {MouseX} SetConst YPos = {MouseY} LoadRGB $XPos, $YPos SetConst Red = {RGBRed} SetConst Blue = {RGBBlue} SetConst Green = {RGBGreen} SetConst CurrKey = {GlobalKeys} Rightclick
While $CheckforLostFocus = 0
GetRed $XPos, $YPos = $Red GetGreen $XPos, $YPos = $Green GetBlue $XPos, $YPos = $Blue Set OrigX = {mousex} Set OrigY = {Mousey} MousePos $XPos, $YPos Delay 10 Rightclick Delay 10 MousePos $OrigX, $OrigY End End End
End
Function CheckforLostFocus
if {activewindow} contains eGenesis Compute Result = 0 Exit Else Bell Exclamation Stop End
End