User:Akiiki Bastet - Revision history

Akiiki Bastet: /* My Thistle Garden Recording Macro */

2010-09-14T06:57:01Z

My Thistle Garden Recording Macro

Akiiki Bastet: /* My Thistle Garden Recording Macro */

2010-09-14T06:27:12Z

My Thistle Garden Recording Macro

Akiiki Bastet at 06:26, 14 September 2010

2010-09-14T06:26:13Z

Show changes

Akiiki Bastet: New page: == My Gravel Macro == To use: * Uses AHK - Windows Auto Hot Keys * Move to an open area. Drop your stones. Bring a sledgehammer. I prefer F8F8 view, zoomed moderately in - you can pl...

2010-08-29T04:32:26Z

New page: == My Gravel Macro == To use: * Uses AHK - Windows Auto Hot Keys * Move to an open area. Drop your stones. Bring a sledgehammer. I prefer F8F8 view, zoomed moderately in - you can pl...

New page

== My Gravel Macro ==

To use:
* Uses AHK - Windows Auto Hot Keys
* Move to an open area. Drop your stones. Bring a sledgehammer. I prefer F8F8 view, zoomed moderately in - you can play with this if you get 'too far' messages. Don't wear white!
* CLOSE CHAT! It uses hotkeys, sorry
* Ctrl+F1 to get the splash screen.
* F2 to start
* F3 to pause - you'll want to exit the macro before using maps!
* It will try to use 'S' to Smash stones or Scoop gravel.
* Failing that, it will use Right Click to pick up piles of multiple gravel (which do not scoop)

<pre>
F3::Pause Toggle
^F1::Setup()
F2::Harvest()

Setup() {
MsgBox, Graveller F2 to launch F3 to Pause
}

Harvest() {
WinWait, eGenesis Client,
IfWinNotActive, eGenesis Client, , WinActivate, eGenesis Client,
WinWaitActive, eGenesis Client,
WinGetActiveStats, win_Title, win_Width, win_Height, win_Xpos, win_Ypos
ScreenWidth := win_Width
ScreenHeight := win_Height
PapyColour := 0xFFFFFF
Loop {
PixelSearch, x, y, ScreenWidth/10*4, ScreenHeight/10*4, ScreenWidth/10*6, ScreenHeight/10*6, %PapyColour%, 6, Fast RGB
if (ErrorLevel == 0) {
MouseMove, x, y
Send s
Sleep, 2000
Click Right

} else {
PixelSearch, x, y, ScreenWidth/10*3, ScreenHeight/10*3, ScreenWidth/10*7, ScreenHeight/10*7, %PapyColour%, 6, Fast RGB
if (ErrorLevel == 0) {
MouseMove, x, y
Send s
Sleep, 2000
Click Right

} else {
PixelSearch, x, y, ScreenWidth/10*2, ScreenHeight/10*2, ScreenWidth/10*8, ScreenHeight/10*8, %PapyColour%, 6, Fast RGB
if (ErrorLevel == 0) {
MouseMove, x, y
Send s
Sleep, 2000
Click Right

} else {
PixelSearch, x, y, ScreenWidth/10, ScreenHeight/10, ScreenWidth/10*9, ScreenHeight/10*9, %PapyColour%, 6, Fast RGB
if (ErrorLevel == 0) {
MouseMove, x, y
Send s
Sleep, 2000
Click Right

}
}
}
}
Sleep, 2000
}
}
</pre>

@@ Line 71: / Line 71: @@
 == My Thistle Garden Recording Macro ==
 To use:
 * Uses AHK - Windows Auto Hot Keys
-* You will need the image files to make this go.  The zip should contain ONLY bmp images.  Be suspicious of exe's, etc!
+* You will need the [[http://www.atitd.org/wiki/tale4/Image:ThistleImages.zip image]] files to make this go.  The zip should contain ONLY bmp images.  Be suspicious of exe's, etc!
 * Ensure you have adequate water, dung, seeds, etc for your macro before you run.
 * Edit the Tick# lines to program the operations.  N adds Nit, P pot, H water, O aerates and S toggles sun.  Use letters multiple times per row if you wish.

@@ Line 72: / Line 72: @@
 To use:
 * Uses AHK - Windows Auto Hot Keys
 * Ensure you have adequate water, dung, seeds, etc for your macro before you run.
 * Edit the Tick# lines to program the operations.  N adds Nit, P pot, H water, O aerates and S toggles sun.  Use letters multiple times per row if you wish.
@@ Line 80: / Line 81: @@
 * It uses the mouse, but no keys, so feel free to chat.
 * Outputs observed nutrients from ticks 0 to 39 into ThistleResults.txt
 <pre>