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:Wopper87/links"
From ATITD5
Jump to navigationJump to search| Line 17: | Line 17: | ||
| − | + | ==my own macros i use== | |
below are macros i have made or modified to fit my use. i use a 1900x1200 resolution in windowed mode and if it can be set used for anyone that is important to understand the mouse placement | below are macros i have made or modified to fit my use. i use a 1900x1200 resolution in windowed mode and if it can be set used for anyone that is important to understand the mouse placement | ||
Revision as of 17:29, 17 September 2010
basic resources | herbs | insects | mushrooms | ore and refined metal | gems | resin | fireworks | need |
links
macros
below is links to most common macros list
my own macros i use
below are macros i have made or modified to fit my use. i use a 1900x1200 resolution in windowed mode and if it can be set used for anyone that is important to understand the mouse placement
i also use jimbly macro. most all work well
bunny catcher
-actools
// will drop carrots in a 5x5 grid to catch bunnies
// make sure you have about 2 coord space from where you stand to the north and east
// make sure you have 25 carrots
// double f8 and zoom in
// click self and click drop. pin the menu in top left corner
// make sure carrots are at the top of list
// alt tab to macro and press f2
//alt tab to atitd (you have 4 seconds)
// resolution 1900 x 1200 windowed mode
// |u|r|r|r|r| |^|>|>|>|>|
// |u|u|r|r|d| |^|^|>|>|v|
// |u|u|U|d|d| or |^|^|^|v|v|
// |u|u|L|d|d| |^|^|<|v|v|
// |u|L|L|L|d| |^|<|<|<|v|
delay 4000
loop 5 // moves up 5 times
KEYDOWN {UP} 200 //moves up for 2/10 of a second
MousePos 29, 38 //you might have to change this and all the way down if it does not select carrot
delay 500
Leftclick
delay 500
KEYDOWN {RETURN} // selects the default quantity of one
end
loop 4 // moves right 4 times (5 including the one dropped in last loop)
KEYDOWN {RIGHT} 200 //moves right 2/10 of a second
MousePos 29, 38
delay 500
Leftclick
delay 500
KEYDOWN {RETURN} // selects the default quantity of one
end
loop 4 // moves down 4 times (5 including the one dropped in last loop)
KEYDOWN {DOWN} 200 // moves down 2/10 of a second
MousePos 29 , 38
delay 500
leftclick
delay 500
KEYDOWN {RETURN} // selects the default quantity of one
end
loop 3 // moves left 3 times (5 including the one dropped from last loop and one from first up row)
KEYDOWN {LEFT} 200 // moves left 2/10 of a second
MousePos 29 , 38
delay 500
leftclick
delay 500
KEYDOWN {RETURN} // selects the default quantity of one
end
loop 3 // moves up 3 times (5 including the one dropped from last drop and one from the first right row)
KEYDOWN {UP} 200 // moves up again
MousePos 29 , 38
delay 500
leftclick
delay 500
KEYDOWN {RETURN} // selects the default quantity of one
end
loop 2 // moves right 2 times (5 including last loop and first down)
KEYDOWN {RIGHT} 200 // moves right again
MousePos 29 , 38
delay 500
leftclick
delay 500
KEYDOWN {RETURN} // selects the default quantity of one
end
loop 2 // moves down 2 times (5 including last loop and first left)
KEYDOWN {DOWN} 200 // moves down again
MousePos 29 , 38
delay 500
leftclick
delay 500
KEYDOWN {RETURN} // selects the default quantity of one
end
KEYDOWN {LEFT} 200 // moves left again one time
MousePos 29 , 38
delay 500
leftclick
delay 500
KEYDOWN {RETURN} // selects the default quantity of one
KEYDOWN {up} 200 //moves up again one time and end in the middle
MousePos 29 , 38
delay 500
leftclick
delay 500
KEYDOWN {RETURN} // selects the default quantity of one
cchearth
- written many times over i just adjusted for res. above
-actools
//Charcoal Hearth
// this is Anka's CC hearth Macro from T3
// I've re-adjusted this macro to run in 1900x1200 resolution , only tried it with 2 hearths so far , but works fine.
// Not lost a batch yet ( wopper87)
// also you will need to have hearths set to allow anyone to use otherwise you will need to adjust positions up a little
//
// Setup: I've added a setup routine to the macro. Pin the windows on top of each
// other in the top left corner. I suggest at least 200 wood per hearth (normally consumes 160)
// and about 15 water per hearth to be safe. All hearths are slightly
// different but I suggest that you put your fastest burning hearths first
// in line. You can tweak the settings in the built in menu.
//
// Hearths: Total number of hearths you are running.
// Hearths Across: How many Hearths on the top row of windows. Make sure
// you set this each time even if you are running 1 hearth.
// Variables in the macro are set off of this number.
// Guilded?: Check this box if you are using guilded hearths.
// Need Setup?: Check this box if you need the macro to position your
// windows that are stacked in top left corner. This is
// usefull if you run another round on the hearths and your
// windows are set up already. Check if needed or not.
// Stealth Mouse: Check this if you don't want to see the mouse move around
// on the hearth windows. When checked, it will save your
// mouse position, move to the spot it needs, perform its
// action then return the pointer to where it started. Alows
// you to change chat windows are dig in chest while the
// macro is running :)
// Heat: Threshold for Heat bar, increase or decrease as needed. If heat
// reaches this lvl, water will be added.
// Wood: Wood threshold, adds wood up to this point.
// Water: Alowable water level, not much play here. If the water lvl is above
// this lvl, water will not be added. Prevents drowning the hearth.
// RGBGreen: Used to detect completion bar. If the macro adds a bunch of water
// before the macro is done then moves to the next hearth, increase
// this number. Or lower it if it doesnt see green.
// RGBBlue: Works just like RGBGreen but for blue bars. If the macro keeps
// adding wood till the hearth is full, it's not seeing blue. If
// this happens, lower this number. Other problem may be that the
// mouse pointer is not lining up over the bar correctly. Run the
// Mouse Test.
// Check Bars Interval: This is the pause time between bar checks. The
// default value of 4000 works well for 1-8 hearths
// but you may need to decrease this number if you
// are running more than 8.
// Mouse Test: This is to test if the mouse pointer is lining up correctly
// with your windows. Run 1 hearth manually and start the macro
// with this option checked. You don't need to worry about any
// other option. It will move over the Heat, Wood, Water, Danger,
// and Status bar then over the Wood and Water buttons 10 times
// before it stops. If these positions are off a bit, you can
// change the Y coordinates below in the constants section.
//
// The macro doesn't watch Oxygen. I was going to add a vent option but this
// macro runs very well and never fails for me. If your oxygen is getting too
// high, try adding more wood. But, by adding more wood, you add more heat
// which may require you adding more water. A small amount of water in the
// presence of heat evaporates producing more Oxygen. :) Find the balance
// you want.
//
// ENJOY! :)
// Anka
//
Constants
//User Definable variables
Hearths = 4
HeatX = 165
WoodX = 107
WaterX = 76
DangerX = 165
RGBBlue = 220
RGBGreen = 240
Guild = 1
// Y Coordinates - Don't change unless you are having a problem.
RegY = 78 // Y coord for Regulator button
BeginY = 254 // Y coord for Begin Button
HeatY = 165 // Y coord for Heat Bar
WoodY = 190 // Y coord for Wood Bar
WaterY = 202 // Y coord for Water Bar
DangerY = 214 // Y coord for Danger Bar
StatusY = 226 // Y coord for Status Bar
WoodBY = 261 // Y coord for Wood and Water buttons
//End User variables
Hrow = 0
Hrow1 = 0
AddX = 226
Add2X = 15
Add1Y = 65
Add2Y = 17
Add3Y = 250
RegX = 47
BeginX = 111
NewX = 0
New2X = 0
New2Y = 0
NewY = 0
Heat = 0
Wood = 0
Water = 0
Danger = 0
Status = 0
OxyY = 168
StatusX = 167
WoodBX = 35
WaterBX = 85
Num = 0
Jump = 5
JumpM = 0
Jumped = 0
Used = 0
MDelay = 250
SDelay = 200
S1Delay = 100
Count = 0
CountM = 0
MouseX = 0
MouseY = 0
CheckDelay = 0
Setup = 0
SetX = 10
SetY = 40
SetAddX = 227
SetAddY = 250
SetLoop = 0
Mouse = 1
OrigX = 0
OrigY = 0
End
Form ccHearth, Settings
ed1=Combobox:Hearths:1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12
ed13=Editbox:Hearths Across:4
ed2=CheckBox:Guilded?:True
ed14=Checkbox:Need Setup?:True
ed15=Checkbox:Stealth Mouse:True
ed3=Editbox:Heat default 165 (75-188):165
//ed10=Editbox:HeatMin (75-188):116
//ed11=Editbox:HeatMax (75-188):184
//ed4=Editbox:Low Oxy (75-188):82
//ed5=Editbox:High Oxy (75-188):134
ed6=Editbox:Wood default 107 (75-188):107
ed7=Editbox:Water default 76 (75-188):76
ed8=Editbox:RGBGreen:240
ed9=Editbox:RGBBlue:220
ed12=Editbox:Check Bars Interval (miliseconds):4000
ed16=Checkbox:Mouse Check:False
end
FormLoad ccHearth, ccHearth.frm
if ShowForm ccHearth
SetConst Hearths = ccHearth[ed1]
If ccHearth[ed2] = True
SetConst Guild = 1
Else
SetConst Guild = 0
End
SetConst HeatX = ccHearth[ed3]
//SetConst Oxy1X = ccHearth[ed4]
//SetConst Oxy2X = ccHearth[ed5]
SetConst WoodX = ccHearth[ed6]
SetConst WaterX = ccHearth[ed7]
SetConst RGBGreen = ccHearth[ed8]
SetConst RGBBlue = ccHearth[ed9]
//SetConst HeatMin = ccHearth[ed10]
//SetConst HeatMax = ccHearth[ed11]
SetConst CheckDelay = ccHearth[ed12]
Set HRow = ccHearth[ed13]
Compute SetLoop = $Hearths - 1
Compute HRow1 = $Hrow + 1
If ccHearth[ed15] = True
Set Mouse = 0
End
else
Stop
end
FormSave ccHearth, ccHearth.frm
MousePos 100, 20 //Activates eGenesis window.. Don't run ACTool maximized.
Delay $MDelay
LeftClick
Delay 2000
If $Guild = 1
Call Guild
End
if ccHearth[ed16] = True
Call HearthTest
End
If ccHearth[ed14] = True
Call Setup
End
Call SetReg
SetConst NewX = $BeginX
SetConst NewY = $BeginY
SetConst Count = 1
Loop $Hearths
If $Count = $HRow1 //$Jump
SetConst NewX = $BeginX
Compute NewY = $BeginY + $Add3Y
End
MousePos $NewX, $NewY
Delay $MDelay
Rightclick
Delay $MDelay
Compute NewX = $NewX + $AddX
Compute Count = $Count + 1
End
SetConst NewX = $BeginX //Dont remember why this is here :)
Call Main
Procedure Setup
Set NewX = $SetX
Set NewY = $SetY
Loop $SetLoop
Mousepos $SetX, $SetY
if {loopno} = $HRow
Set NewX = $SetX
Compute NewY = $SetY + $SetAddY
else
Compute NewX = $NewX + $SetAddX
End
Dragto $NewX, $NewY
End
End
Procedure Main
SetConst CountM = 1
SetConst Status = 0
Compute JumpM = $HRow1 - 1 //$Jump - 1
Loop $Hearths
If $CountM = $HRow1 //$Jump
// may have to use New Newx and newy variables in Main
SetConst NewX = $StatusX
Compute NewY = $StatusY + $Add3Y
SetConst New2X = $WaterBX
Compute New2Y = $WoodBY + $Add3Y
End
While $Status = 0
Call CheckBars
If $Status = 1
Call Snuff
//code to advance to next hearth
Compute Used = $Used + 1
If $Used = $JumpM
Compute HeatX = $HeatX - (($Used - 1) * $AddX)
Compute HeatY = $HeatY + $Add3Y
Compute WoodX = $WoodX - (($Used - 1) * $AddX)
Compute WoodY = $WoodY + $Add3Y
Compute WaterX = $WaterX - (($Used - 1) * $AddX)
Compute WaterY = $WaterY + $Add3Y
Compute DangerX = $DangerX - (($Used - 1) * $AddX)
Compute DangerY = $DangerY + $Add3Y
Compute StatusX = $StatusX - (($Used - 1) * $AddX)
Compute StatusY = $StatusY + $Add3Y
//Compute WaterBX = $WaterBX - (($Used -1) * $AddX)
//Compute WoodBX = $WoodBX - (($Used - 1 ) * $AddX)
//Compute WoodBY = $WoodBY + $Add3Y
SetConst Jumped = 1
Continue
Else
Compute HeatX = $HeatX + $AddX
Compute WoodX = $WoodX + $AddX
Compute WaterX = $WaterX + $AddX
Compute DangerX = $DangerX + $AddX
Compute StatusX = $StatusX + $AddX
//Compute WaterBX = $WaterBX + $AddX
//Compute WoodBX = $WoodBX + $AddX
End
Continue
End
If $Heat = 0 and $Danger = 0 and $Wood = 0
Call Wood
Else
If $Heat = 1 or $Danger = 1
If $Water = 0
Call Water
End
End
End
Delay $CheckDelay
End
Compute CountM = $CountM + 1
SetConst Status = 0
End
End
Procedure CheckBars
If $Mouse = 1
MousePos $HeatX, $HeatY
Delay $SDelay
end
LoadRGB $HeatX, $HeatY
if {RGBBlue} > $RGBBlue
SetConst Heat = 1
Else
SetConst Heat = 0
End
If $Mouse = 1
MousePos $WoodX, $WoodY
Delay $S1Delay
end
LoadRGB $WoodX, $WoodY
if {RGBBlue} > $RGBBlue
SetConst Wood = 1
Else
SetConst Wood = 0
End
If $Mouse = 1
MousePos $WaterX, $WaterY
Delay $S1Delay
End
LoadRGB $WaterX, $WaterY
if {RGBBlue} > $RGBBlue
SetConst Water = 1
Else
SetConst Water = 0
End
If $Mouse = 1
MousePos $DangerX, $DangerY
Delay $S1Delay
End
LoadRGB $DangerX, $DangerY
if {RGBBlue} > $RGBBlue
SetConst Danger = 1
Else
SetConst Danger = 0
End
If $Mouse = 1
MousePos $StatusX, $StatusY
End
LoadRGB $StatusX, $StatusY
if {RGBGreen} > $RGBGreen
SetConst Status = 1
Else
SetConst Status = 0
End
End
Procedure Water
SetConst NewX = $WaterBX
SetConst NewY = $WoodBY
Loop $Hearths
IF {loopno} = $HRow1 //$Jump
SetConst NewX = $WaterBX
Compute NewY = $WoodBY + $Add3Y
End
If {loopno} > $Used
If $Mouse = 0
Set OrigX = {mousex}
Set OrigY = {mousey}
End
MousePos $NewX, $NewY
Delay $SDelay
Rightclick
Delay $SDelay
If $Mouse = 0
Mousepos $OrigX, $OrigY
End
End
Compute NewX = $NewX + $AddX
End
SetConst NewX = $WaterBX
End
Procedure Snuff
SetConst New2X = $WaterBX
SetConst New2Y = $WoodBY
Compute Num = $Used + 1
Loop $Hearths
IF {loopno} = $Hrow1 //$Jump
SetConst New2X = $WaterBX
Compute New2Y = $WoodBY + $Add3Y
End
If {loopno} = $Num
If $Mouse = 0
Set OrigX = {mousex}
Set OrigY = {mousey}
End
MousePos $New2X, $New2Y
Loop 8
Rightclick
End
If $Mouse = 0
Mousepos $OrigX, $OrigY
End
End
Compute New2X = $New2X + $AddX
End
End
Procedure Wood
SetConst NewX = $WoodBX
SetConst NewY = $WoodBY
Loop $Hearths
IF {loopno} = $HRow1 //$Jump
SetConst NewX = $WoodBX
Compute NewY = $WoodBY + $Add3Y
End
If {loopno} > $Used
If $Mouse = 0
Set OrigX = {mousex}
Set OrigY = {mousey}
End
MousePos $NewX, $NewY
Delay $SDelay
Rightclick
Delay $SDelay
If $Mouse = 0
MousePos $OrigX, $OrigY
End
End
Compute NewX = $NewX + $AddX
End
SetConst NewX = $WoodBX
End
Procedure SetReg
SetConst NewX = $RegX
SetConst Count = 1
Loop $Hearths
If $Count = $HRow1
SetConst NewX = $RegX
Compute RegY = $RegY + $Add3Y
End
MousePos $NewX, $RegY
Delay $MDelay
Rightclick
Compute NewX = $NewX + $Add2X
If $Count > $HRow
Compute NewY = $RegY + $Add2Y
else
Compute NewY = $RegY + $Add1Y
end
MousePos $NewX, $NewY
Delay $MDelay
Rightclick
Delay $MDelay
Compute NewX = $NewX + $AddX
Compute Count = $Count + 1
End
SetConst NewX = $RegX
SetConst Count = 1
End
Procedure Guild
Compute BeginX = $BeginX - 7
Compute BeginY = $BeginY + 16
Compute RegY = $RegY + 16
Compute RegX = $RegX - 14
Compute AddX = $AddX - 15
Compute Add3Y = $Add3Y + 16
Compute Add1Y = $Add1Y - 16
Compute WoodBY = $WoodBY + 16
Compute HeatX = $HeatX - 4
Compute HeatY = $HeatY + 16
Compute WoodX = $WoodX - 1
Compute WoodY = $WoodY + 16
Compute WaterY = $WaterY + 16
Compute DangerX = $DangerX - 4
Compute DangerY = $DangerY + 16
Compute StatusX = $StatusX - 5
Compute StatusY = $StatusY + 16
Set SetAddX = 212
Set SetAddY = 266
End
Procedure HearthTest
Loop 10
MousePos $HeatX, $HeatY
Delay 2000
MousePos $WoodX, $WoodY
Delay 2000
MousePos $WaterX, $WaterY
Delay 2000
MousePos $DangerX, $DangerY
Delay 2000
MousePos $StatusX, $StatusY
Delay 2000
MousePos $WoodBX, $WoodBY
Delay 2000
MousePos $WaterBX, $WoodBY
Delay 2000
end
Stop
End
//Written with ACTool 5.3.0 by Anka
Bell Asterisk
carpentry blade v1.0
- it only does about 5000k blades right now working out a different hit tech. to see if i can get it up higher -actools
delay 4000
// ver 1.0
// make sure you are in double f8 and zoomed all the way in
// pin the tools menu in the upper left corner and force level menu right next to the tools menu
// minimize chat
// face forge so you are facing the blade side of project
// set your mouse pointer to the tip of the lower left prong sticking out of the forge (there is a set of 4, 2 on the left and two on the right)
// screen is 1900x1200 in windowed mode
// alt-tab to macro and press f2
// alt tab back to atitd
constants // this is to store the starting mouse position (StartX and Y) and the recalculated coord. (NewX and Y)
StartX=0
StartY=0
NewX=0
NewY=0
end
SetConst StartX = {MouseX} // when the macro starts this gets the starting mouse position
SetConst StartY = {MouseY}
keys c //this selects the wide chisel
delay 500
keys 7 //this sets force level to 7
delay 500
Compute NewX = $StartX + 124 //first hit on blade side left side near left end and in middle of blade side
Compute NewY = $StartY + 41 //these two lines are taking the starting position and adding 124 to X and 41 to Y and storing the result in NewX and Y
MousePos $NewX, $NewY // moves the mouse based on the stored result from above
delay 500
Leftclick
delay 500
Compute NewX = $StartX + 185 //second hit mid way between first hit and middle
Compute NewY = $StartY + 41
MousePos $NewX, $NewY
delay 500
Leftclick
delay 500
Compute NewX = $StartX + 246 // third hit about middle
Compute NewY = $StartY + 41
MousePos $NewX, $NewY
delay 500
Leftclick
delay 500
Compute NewX = $StartX + 307 // forth hit mid way between middle and last hit
Compute NewY = $StartY + 41
MousePos $NewX, $NewY
delay 500
Leftclick
delay 500
Compute NewX = $StartX + 368 // last hit like first near end
Compute NewY = $StartY + 41
MousePos $NewX, $NewY
delay 500
Leftclick
delay 500
Compute NewX = $StartX + 124 // repeats previous hits but at edge of blade
Compute NewY = $StartY + 63
MousePos $NewX, $NewY
delay 500
Leftclick
delay 500
Compute NewX = $StartX + 185 // see above
Compute NewY = $StartY + 63
MousePos $NewX, $NewY
delay 500
Leftclick
delay 500
Compute NewX = $StartX + 246 // see above
Compute NewY = $StartY + 63
MousePos $NewX, $NewY
delay 500
Leftclick
delay 500
Compute NewX = $StartX + 307 // see above
Compute NewY = $StartY + 63
MousePos $NewX, $NewY
delay 500
Leftclick
delay 500
Compute NewX = $StartX + 368 // see above
Compute NewY = $StartY + 63
MousePos $NewX, $NewY
delay 500
Leftclick
delay 500
Compute NewX = $StartX + 124 // repeats the last set but refines the edge more
Compute NewY = $StartY + 63
MousePos $NewX, $NewY
delay 500
Leftclick
delay 500
Compute NewX = $StartX + 185 // see above
Compute NewY = $StartY + 63
MousePos $NewX, $NewY
delay 500
Leftclick
delay 500
Compute NewX = $StartX + 246 // see above
Compute NewY = $StartY + 63
MousePos $NewX, $NewY
delay 500
Leftclick
delay 500
Compute NewX = $StartX + 307 // see above
Compute NewY = $StartY + 63
MousePos $NewX, $NewY
delay 500
Leftclick
delay 500
Compute NewX = $StartX + 368 // see above
Compute NewY = $StartY + 63
MousePos $NewX, $NewY
delay 500
Leftclick
delay 500
keys b // selects ball peen
delay 500
keys 9 // sets force to 9
delay 500
Compute NewX = $StartX + 140 // first hit on back side of middle tab
Compute NewY = $StartY - 56
MousePos $NewX, $NewY
delay 500
Leftclick
delay 500
Compute NewX = $StartX + 157 // second hit on back side of top tab
Compute NewY = $StartY - 155
MousePos $NewX, $NewY
delay 500
Leftclick
delay 500
Compute NewX = $StartX + 373 // repeats on other side of blade
Compute NewY = $StartY - 56
MousePos $NewX, $NewY
delay 500
Leftclick
delay 500
Compute NewX = $StartX + 351 // repeats on other side of blade
Compute NewY = $StartY - 155
MousePos $NewX, $NewY
delay 500
Leftclick
delay 1000
MousePos 81, 120 // selects shaping mallet i had to sue mouse position in stead of the keys beacause the last hit causes mouse to be off anvil so they wont work
Leftclick // you could make the mouse reposition then use keys that way you dont have to have the menus pinned in a certain spot
delay 1000
MousePos 254, 102 // selects force level 5
Leftclick
delay 1000
Compute NewX = $StartX + 194 // pushes down the ridge on front of blade starting on left
Compute NewY = $StartY + 15
MousePos $NewX, $NewY
delay 500
Leftclick
delay 500
Compute NewX = $StartX + 260 // see above at middle
Compute NewY = $StartY + 15
MousePos $NewX, $NewY
delay 500
Leftclick
delay 500
Compute NewX = $StartX + 332 // see above at right
Compute NewY = $StartY + 15
MousePos $NewX, $NewY
delay 500
Leftclick
delay 500
// should have a blade at about 5000 (im working on refining the hits to make it better)
grass
-actools
delay 4000
loop 250 //depending on rythmic strength you will need to adjust this
// if you had no basket this will give you 250 grass x 2=500 grass
// if you had a basket with good rythmic strength that pulled 3 grass per it would be 3(per pull)x2(once for up and once for down)=6(pulled per loop)x250(loops)=1500 total
KEYDOWN {UP} 350
MousePos 29, 38 //location of the Pick Grass icon (you can hover over it and hit Ctrl-M in ACTools window to find the loc)
Leftclick
delay 3300 //this delay has you wait until you pick up the grass - which is important
KEYDOWN {DOWN} 350
MousePos 226, 66
leftclick
delay 3300
end
clay
-this is basicly the grass picker modified for the distance of the clay -actools
delay 4000
loop 25 // << this number x(2) x(average clay/pick) is what you should end up with
// keep in mind you will need to have enough water for each run
KEYDOWN {UP} 1000
MousePos 226, 66 //location of the clay icon (you can hover over it and hit Ctrl-M in ACTools window to find the loc)
Leftclick
delay 1000 //this delay has you wait until you pick up the grass - which is important
KEYDOWN {DOWN} 1000
MousePos 226, 66
leftclick
delay 1000
end
thermometer
-actools
delay 4000 //a 4 second delay at the front (might need to add more time if you cant switch windows in time) //if you are swapping between programs //thermo //minimize chat, start thermo, set arrow in glory hole. // alt- tab to macro and press f2 // alt tab back to atitd //standard heat, might have to adjust this. original was front and it did not work for me so i switched to standard //puts pipe in hole loop 30 keys a delay 100 end //move it back out loop 7 keys s delay 200 end //rotate it while it heats loop 21 keys n delay 300 end //rotate and blow loop 4 keys b delay 50 keys n delay 100 end keys q delay 50 keys u delay 50 // got over 5000 thermo each time
slate
-ahk
HotKeySet("^x","Terminate")
HotKeySet("^s","Start")
HotKeySet("^1","Set")
$slatepos = 0
$slatecolour = 0
$test = True
Do
until $test = False
Func Set()
$slatepos = MouseGetPos()
$slatecolour = PixelGetColor($slatepos[0] ,$slatepos[1])
EndFunc
Func Start()
if $slatepos = 0 or $slatecolour = 0 Then
msgbox(0,"Error","You must hover your mouse over the slate icon and press Control + 1 to set the details before starting the Macro")
Else
sleep(500)
dim $test = False
Do
dim $pixel = PixelGetColor($slatepos[0],$slatepos[1])
if $pixel = $slatecolour Then
$tempmos = MouseGetPos()
mouseclick("left" ,$slatepos[0],$slatepos[1],1,0)
MouseMove($tempmos[0],$tempmos[1],0)
sleep(100)
endIf
until $test = True
endIf
EndFunc
Func Terminate()
Exit 0
EndFunc
