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.
User:Cegaiel/Macros/Potash/Code
From A Tale in the Desert
Jump to navigationJump to search6 Kettles: (12 Kettles at bottom)
;Make Potash with 6 kettles (MAY work with other stoked kettle projects, just change coordinates of Click Potash button)
;Requires (1, 2, 3, 4, 5 runs):
;168, 336, 504, 672, 840 Wood
;150 Water
;30, 60, 90, 120, 150 Ash
;Pin 6 kettle menus from left to right
;Ctrl+Alt+W to start script
;Ctrl+R to reload
;Ctrl+P to pause
;Emergency: Hold F2 button down 2 seconds to Abort current countdown and hit Stoke Max immediately on all pots
;Only the current countdown will abort. It will move on to the next countdown and continue normally.
;Trust the script, only use Emergency F2 when you have more than 32s when the Wood count turns to zero
;As long as there is less than 32s, when the wood hits zero, then dont interupt the script
;When it hits zero wood, its still a full 32 seconds before the kettle goes out
;Likewise with stoking. It does not matter if you stoke the instant it hits zero wood or 29 seconds later, it wont speed anything up.
^r::reload
^p::Pause
^!w::
IfWinExist eGenesis Client
{
WinGet, GameWinHandle, ID, eGenesis Client
} else {
Msgbox, eGenesis client not running, exiting...
Exit
}
WinGetActiveStats, win_Title, Xmax, Ymax, win_Xpos, win_Ypos
;======================================================================
;Check to see if we are in the correct resolution, or else exit script.
;You may remove this entire routine, if you wish.
if (Xmax = 1032) && (Ymax = 746)
{
nothing = 0
} else {
Msgbox, You are not in 1024x768 resolution`n`nExiting...
EXIT
}
;======================================================================
Gui, +AlwaysOnTop +ToolWindow
Gui, Add, Text,, Type of Kettles?
Gui, Add, DropDownList, vKettle Choose1, Private|Public
Gui, Add, Button, Default gStart, GO
Gui, Show
return
Start:
seconds = 5
Gui, Submit
Gui, Destroy
Msgbox, Ingredients needed to run 6 kettles:`n`n168 Wood`n150 Water`n30 Ash`n`nMake sure you have that in your inventory!`n`nKettle Type: %Kettle%`n`nClick OK to continue...
Gui, +AlwaysOnTop +ToolWindow
Gui, Font, bold
Gui, Add, Text, vMineCycleText, %seconds% seconds before the script will begin ...
Gui, Font, norm
Gui, Show
GuiControl, Text, MineCycleText, %seconds% seconds before the script will begin ...
Loop, %seconds%
{
GuiControl, Text, MineCycleText, %seconds% seconds before the script will begin ...
seconds --
Sleep 1000
}
SetDefaultMouseSpeed, 0
GuiControl, Text, MineCycleText, Focusing to eGenesis client ...
WinActivate, eGenesis Client
;Click Potash Button
PotashY = 165
if (Kettle == "Public")
PotashY := PotashY + 15
GuiControl, Text, MineCycleText, Clicking Potash, Pot 1
Click, 45, %PotashY% ;Pot 1
sleep 200
GuiControl, Text, MineCycleText, Click Potash, Pot 2
Click, 220, %PotashY% ;Pot 2
sleep 200
GuiControl, Text, MineCycleText, Click Potash, Pot 3
Click, 385, %PotashY% ;Pot 3
sleep 200
GuiControl, Text, MineCycleText, Click Potash, Pot 4
Click, 555, %PotashY% ;Pot 4
sleep 200
GuiControl, Text, MineCycleText, Click Potash, Pot 5
Click, 725, %PotashY% ;Pot 5
sleep 200
GuiControl, Text, MineCycleText, Click Potash, Pot 6
Click, 890, %PotashY% ;Pot 6
sleep 200
;Click Begin button
BeginIgniteY = 240
if (Kettle == "Public")
BeginIgniteY := BeginIgniteY + 15
GuiControl, Text, MineCycleText, Click Begin, Pot 1
Click, 45, %BeginIgniteY% ;Pot 1
sleep 200
GuiControl, Text, MineCycleText, Click Begin, Pot 2
Click, 220, %BeginIgniteY% ;Pot 2
sleep 200
GuiControl, Text, MineCycleText, Click Begin, Pot 3
Click, 385, %BeginIgniteY% ;Pot 3
sleep 200
GuiControl, Text, MineCycleText, Click Begin, Pot 4
Click, 555, %BeginIgniteY% ;Pot 4
sleep 200
GuiControl, Text, MineCycleText, Click Begin, Pot 5
Click, 725, %BeginIgniteY% ;Pot 5
sleep 200
GuiControl, Text, MineCycleText, Click Begin, Pot 6
Click, 890, %BeginIgniteY% ;Pot 6
sleep 200
;Click Ignite + Max button, then Refresh Menu (to show Stoke Max option)
MaxButtonX = 515
MaxButtonY = 420
;Pot 1
GuiControl, Text, MineCycleText, Igniting/Refreshing Pot 1
Click, 45, %BeginIgniteY% ;Ignite
sleep 200
Click, %MaxButtonX%, %MaxButtonY% ;Max button
sleep 200
Click, 70, 45 ;Click Menu to refresh
sleep 200
;Pot 2
GuiControl, Text, MineCycleText, Igniting/Refreshing Pot 2
Click, 220, %BeginIgniteY% ;Ignite
sleep 200
Click, %MaxButtonX%, %MaxButtonY% ;Max button
sleep 200
Click, 245, 45 ;Click Menu to refresh
sleep 200
;Pot 3
GuiControl, Text, MineCycleText, Igniting/Refreshing Pot 3
Click, 385, %BeginIgniteY% ;Ignite
sleep 200
Click, %MaxButtonX%, %MaxButtonY% ;Max button
sleep 200
Click, 415, 45 ;Click Menu to refresh
sleep 200
;Pot 4
GuiControl, Text, MineCycleText, Igniting/Refreshing Pot 4
Click, 555, %BeginIgniteY% ;Ignite
sleep 200
Click, %MaxButtonX%, %MaxButtonY% ;Max button
sleep 200
Click, 580, 45 ;Click Menu to refresh
sleep 200
;Pot 5
GuiControl, Text, MineCycleText, Igniting/Refreshing Pot 5
Click, 725, %BeginIgniteY% ;Ignite
sleep 200
Click, %MaxButtonX%, %MaxButtonY% ;Max button
sleep 200
Click, 750, 45 ;Click Menu to refresh
sleep 200
;Pot 6
GuiControl, Text, MineCycleText, Igniting/Refreshing Pot 6
Click, 890, %BeginIgniteY% ;Ignite
sleep 200
Click, %MaxButtonX%, %MaxButtonY% ;Max button
sleep 200
Click, 915, 45 ;Click Menu to refresh
sleep 200
;Stoke 1 countdown
seconds = 132
Loop, %seconds%
{
GuiControl, Text, MineCycleText, %seconds% seconds until Stoke 1/5 (24 water)
seconds --
Sleep 1000
GetKeyState, state, F2
if state = D
break
}
Gosub, StokeMax
;Stoke 2 (19 water) countdown
seconds = 165
Loop, %seconds%
{
GuiControl, Text, MineCycleText, %seconds% seconds until Stoke 2/5 (19 water)
seconds --
Sleep 1000
GetKeyState, state, F2
if state = D
{
break
}
}
Gosub, StokeMax
;Stoke 3 (14 water) countdown
seconds = 165
Loop, %seconds%
{
GuiControl, Text, MineCycleText, %seconds% seconds until Stoke 3/5 (14 water)
seconds --
Sleep 1000
GetKeyState, state, F2
if state = D
break
}
Gosub, StokeMax
;Stoke 4 (9 water) countdown
seconds = 165
Loop, %seconds%
{
GuiControl, Text, MineCycleText, %seconds% seconds until Stoke 4/5 (9 water)
seconds --
Sleep 1000
GetKeyState, state, F2
if state = D
break
}
Gosub, StokeMax
;Stoke 5 (6 water) countdown
seconds = 96
Loop, %seconds%
{
GuiControl, Text, MineCycleText, %seconds% seconds until Stoke 5/5 (6 water)
seconds --
Sleep 1000
GetKeyState, state, F2
if state = D
break
}
Gosub, StokeMax
;Countdown until complete
seconds = 176
Loop, %seconds%
{
GuiControl, Text, MineCycleText, %seconds% seconds until Kettles complete...
seconds --
Sleep 1000
}
;Click Take button
WinActivate, eGenesis Client
GuiControl, Text, MineCycleText, Taking, Pot 1
Click, 45, %BeginIgniteY1% ;Pot 1
Sleep 200
GuiControl, Text, MineCycleText, Taking, Pot 2
Click, 220, %BeginIgniteY1% ;Pot 2
Sleep 200
GuiControl, Text, MineCycleText, Click Begin, Pot 3
Click, 385, %BeginIgniteY1% ;Pot 3
Sleep 200
GuiControl, Text, MineCycleText, Click Begin, Pot 4
Click, 555, %BeginIgniteY1% ;Pot 4
Sleep 200
GuiControl, Text, MineCycleText, Click Begin, Pot 5
Click, 725, %BeginIgniteY1% ;Pot 5
Sleep 200
GuiControl, Text, MineCycleText, Click Begin, Pot 6
Click, 890, %BeginIgniteY1% ;Pot 6
Sleep 200
Gui, Destroy
Gui, Add, Text,, Done!.
Gui, Show
return
StokeMax:
WinActivate, eGenesis Client
StokeMaxY = 75
if (Kettle == "Public")
StokeMaxY := StokeMaxY + 15
;Click Stoke Max
MouseGetPos, OldMX, OldMY
GuiControl, Text, MineCycleText, Stoking, Pot 1
Click, 50, %StokeMaxY% ; Pot 1
sleep 200
GuiControl, Text, MineCycleText, Stoking, Pot 2
Click, 250, %StokeMaxY% ; Pot 2
sleep 200
GuiControl, Text, MineCycleText, Stoking, Pot 3
Click, 420, %StokeMaxY% ; Pot 3
sleep 200
GuiControl, Text, MineCycleText, Stoking, Pot 4
Click, 590, %StokeMaxY% ; Pot 4
sleep 200
GuiControl, Text, MineCycleText, Stoking, Pot 5
Click, 750, %StokeMaxY% ; Pot 5
sleep 200
GuiControl, Text, MineCycleText, Stoking, Pot 6
Click, 910, %StokeMaxY% ; Pot 6
sleep 200
MouseMove, %OldMX%, %OldMY%, 0
return
12 Kettles:
;Make Potash, Acid, Salt, Sulfur with 12 kettles (MAY work with other stoked kettle projects, just change coordinates of Click Potash button)
;Requires (per run):
;336 Wood
;300 Water
;60 Ash
;Pin 2 rows of 6 kettle menus, from left to right
;Ctrl+Alt+W to start script
;Ctrl+R to reload
;Ctrl+P to pause
;Emergency: Hold F2 button down 2 seconds to Abort current countdown and hit Stoke Max immediately on all pots
;Only the current countdown will abort. It will move on to the next countdown and continue normally.
;Trust the script, only use Emergency F2 when you have more than 32s when the Wood count turns to zero
;As long as there is less than 32s, when the wood hits zero, then dont interupt the script
;When it hits zero wood, its still a full 32 seconds before the kettle goes out
;Likewise with stoking. It does not matter if you stoke the instant it hits zero wood or 29 seconds later, it wont speed anything up.
; Date: 4/28/2010
^r::reload
^p::Pause
^!w::
IfWinExist eGenesis Client
{
WinGet, GameWinHandle, ID, eGenesis Client
} else {
Msgbox, eGenesis client not running, exiting...
Exit
}
WinGetActiveStats, win_Title, Xmax, Ymax, win_Xpos, win_Ypos
;======================================================================
;Check to see if we are in the correct resolution, or else exit script.
;You may remove this entire routine, if you wish.
if (Xmax = 1032) && (Ymax = 746)
{
nothing = 0
} else {
Msgbox, You are not in 1024x768 resolution`n`nExiting...
EXIT
}
;======================================================================
Gui, +AlwaysOnTop +ToolWindow
Gui, Add, Text,, Type of Kettles?
Gui, Add, DropDownList, vKettle Choose2, Private|Public
Gui, Add, Text,, What are you making?
Gui, Add, DropDownList, vType Choose2, Acid|Potash|Salt|Sulfur
Gui, Add, Text,, How Many Runs (1)?
Gui, Add, Edit, vTurns wp number
Gui, Add, Button, Default gStart, GO
Gui, Show
return
Start:
seconds = 5
Gui, Submit
Gui, Destroy
Msgbox, Ingredients needed to run 12 kettles:`n`n336 Wood`n300 Water`n60 Ash`n`nMake sure you have that in your inventory!`n`nKettle Type: %Kettle%`n`nClick OK to continue...
Gui, +AlwaysOnTop +ToolWindow
Gui, Font, bold
Gui, Add, Text, vMineCycleText, %seconds% seconds before the script will begin ...
Gui, Font, norm
Gui, Show
GuiControl, Text, MineCycleText, %seconds% seconds before the script will begin ...
Loop, %seconds%
{
GuiControl, Text, MineCycleText, %seconds% seconds before the script will begin ...
seconds --
Sleep 1000
}
SetDefaultMouseSpeed, 0
GuiControl, Text, MineCycleText, Focusing to eGenesis client ...
WinActivate, eGenesis Client
;Potash and Sulfur have same X
;Salt and Acid have same X
if (Type == "Potash")
{
TypeX1 := 45
TypeX2 := 220
TypeX3 := 385
TypeX4 := 555
TypeX5 := 725
TypeX6 := 890
TypeY1 := 165
TypeY2 := 423
} else if (Type == "Sulfur") {
TypeX1 := 45
TypeX2 := 220
TypeX3 := 385
TypeX4 := 555
TypeX5 := 725
TypeX6 := 890
TypeY1 := 283
TypeY2 := 560
} else if (Type == "Salt") {
TypeX1 := 126
TypeX2 := 295
TypeX3 := 465
TypeX4 := 634
TypeX5 := 802
TypeX6 := 968
TypeY1 := 258
TypeY2 := 533
} else if (Type == "Acid") {
TypeX1 := 126
TypeX2 := 295
TypeX3 := 465
TypeX4 := 634
TypeX5 := 802
TypeX6 := 968
TypeY1 := 283
TypeY2 := 558
}
if (Kettle == "Public")
{
TypeY1 := TypeY1 + 15
TypeY2 := TypeY2 + 30
}
Loop, %Turns%
{
;Click Type (Potash, Acid, Sulfur, Salt) Button
GuiControl, Text, MineCycleText, Clicking Potash, Pot 1
Click, %TypeX1%, %TypeY1% ;Pot 1
Sleep 200
GuiControl, Text, MineCycleText, Click Potash, Pot 2
Click, %TypeX2%, %TypeY1% ;Pot 2
Sleep 200
GuiControl, Text, MineCycleText, Click Potash, Pot 3
Click, %TypeX3%, %TypeY1% ;Pot 3
Sleep 200
GuiControl, Text, MineCycleText, Click Potash, Pot 4
Click, %TypeX4%, %TypeY1% ;Pot 4
Sleep 200
GuiControl, Text, MineCycleText, Click Potash, Pot 5
Click, %TypeX5%, %TypeY1% ;Pot 5
Sleep 200
GuiControl, Text, MineCycleText, Click Potash, Pot 6
Click, %TypeX6%, %TypeY1% ;Pot 6
Sleep 200
GuiControl, Text, MineCycleText, Clicking Potash, Pot 7
Click, %TypeX1%, %TypeY2% ;Pot 7
Sleep 200
GuiControl, Text, MineCycleText, Click Potash, Pot 8
Click, %TypeX2%, %TypeY2% ;Pot 8
Sleep 200
GuiControl, Text, MineCycleText, Click Potash, Pot 9
Click, %TypeX3%, %TypeY2% ;Pot 9
Sleep 200
GuiControl, Text, MineCycleText, Click Potash, Pot 10
Click, %TypeX4%, %TypeY2% ;Pot 10
Sleep 200
GuiControl, Text, MineCycleText, Click Potash, Pot 11
Click, %TypeX5%, %TypeY2% ;Pot 11
Sleep 200
GuiControl, Text, MineCycleText, Click Potash, Pot 12
Click, %TypeX6%, %TypeY2% ;Pot 12
Sleep 200
BeginIgniteY1 = 240
BeginIgniteY2 = 500
if (Kettle == "Public")
{
BeginIgniteY1 := BeginIgniteY1 + 15
BeginIgniteY2 := BeginIgniteY2 + 30
}
;Click Begin button
GuiControl, Text, MineCycleText, Click Begin, Pot 1
Click, 45, %BeginIgniteY1% ;Pot 1
Sleep 200
GuiControl, Text, MineCycleText, Click Begin, Pot 2
Click, 220, %BeginIgniteY1% ;Pot 2
Sleep 200
GuiControl, Text, MineCycleText, Click Begin, Pot 3
Click, 385, %BeginIgniteY1% ;Pot 3
Sleep 200
GuiControl, Text, MineCycleText, Click Begin, Pot 4
Click, 555, %BeginIgniteY1% ;Pot 4
Sleep 200
GuiControl, Text, MineCycleText, Click Begin, Pot 5
Click, 725, %BeginIgniteY1% ;Pot 5
Sleep 200
GuiControl, Text, MineCycleText, Click Begin, Pot 6
Click, 890, %BeginIgniteY1% ;Pot 6
Sleep 200
GuiControl, Text, MineCycleText, Click Begin, Pot 7
Click, 45, %BeginIgniteY2% ;Pot 7
Sleep 200
GuiControl, Text, MineCycleText, Click Begin, Pot 8
Click, 220, %BeginIgniteY2% ;Pot 8
Sleep 200
GuiControl, Text, MineCycleText, Click Begin, Pot 9
Click, 385, %BeginIgniteY2% ;Pot 9
Sleep 200
GuiControl, Text, MineCycleText, Click Begin, Pot 10
Click, 555, %BeginIgniteY2% ;Pot 10
Sleep 200
GuiControl, Text, MineCycleText, Click Begin, Pot 11
Click, 725, %BeginIgniteY2% ;Pot 11
Sleep 200
GuiControl, Text, MineCycleText, Click Begin, Pot 12
Click, 890, %BeginIgniteY2% ;Pot 12
Sleep 200
;Click Ignite + Max button, then Refresh Menu (to show Stoke Max option)
MaxButtonX = 520
MaxButtonY = 423
;Pot 1
GuiControl, Text, MineCycleText, Igniting/Refreshing Pot 1
Click, 45, %BeginIgniteY1% ;Ignite
Sleep 200
Click, %MaxButtonX%, %MaxButtonY% ;Max button
Sleep 200
Click, 70, 45 ;Click Menu to refresh
Sleep 200
;Pot 2
GuiControl, Text, MineCycleText, Igniting/Refreshing Pot 2
Click, 220, %BeginIgniteY1% ;Ignite
Sleep 200
Click, %MaxButtonX%, %MaxButtonY% ;Max button
Sleep 200
Click, 245, 45 ;Click Menu to refresh
Sleep 200
;Pot 3
GuiControl, Text, MineCycleText, Igniting/Refreshing Pot 3
Click, 385, %BeginIgniteY1% ;Ignite
Sleep 200
Click, %MaxButtonX%, %MaxButtonY% ;Max button
Sleep 200
Click, 415, 45 ;Click Menu to refresh
Sleep 200
;Pot 4
GuiControl, Text, MineCycleText, Igniting/Refreshing Pot 4
Click, 555, %BeginIgniteY1% ;Ignite
Sleep 200
Click, %MaxButtonX%, %MaxButtonY% ;Max button
Sleep 200
Click, 580, 45 ;Click Menu to refresh
Sleep 200
;Pot 5
GuiControl, Text, MineCycleText, Igniting/Refreshing Pot 5
Click, 725, %BeginIgniteY1% ;Ignite
Sleep 200
Click, %MaxButtonX%, %MaxButtonY% ;Max button
Sleep 200
Click, 750, 45 ;Click Menu to refresh
Sleep 200
;Pot 6
GuiControl, Text, MineCycleText, Igniting/Refreshing Pot 6
Click, 890, %BeginIgniteY1% ;Ignite
Sleep 200
Click, %MaxButtonX%, %MaxButtonY% ;Max button
Sleep 200
Click, 915, 45 ;Click Menu to refresh
Sleep 200
;Pot 7
GuiControl, Text, MineCycleText, Igniting/Refreshing Pot 7
Click, 45, %BeginIgniteY2% ;Ignite
Sleep 200
Click, %MaxButtonX%, %MaxButtonY% ;Max button
Sleep 200
Click, 70, 305 ;Click Menu to refresh
Sleep 200
;Pot 8
GuiControl, Text, MineCycleText, Igniting/Refreshing Pot 8
Click, 220, %BeginIgniteY2% ;Ignite
Sleep 200
Click, %MaxButtonX%, %MaxButtonY% ;Max button
Sleep 200
Click, 245, 305 ;Click Menu to refresh
Sleep 200
;Pot 9
GuiControl, Text, MineCycleText, Igniting/Refreshing Pot 9
Click, 385, %BeginIgniteY2% ;Ignite
Sleep 200
Click, %MaxButtonX%, %MaxButtonY% ;Max button
Sleep 200
Click, 415, 305 ;Click Menu to refresh
Sleep 200
;Pot 10
GuiControl, Text, MineCycleText, Igniting/Refreshing Pot 10
Click, 555, %BeginIgniteY2% ;Ignite
Sleep 200
Click, %MaxButtonX%, %MaxButtonY% ;Max button
Sleep 200
Click, 580, 305 ;Click Menu to refresh
Sleep 200
;Pot 11
GuiControl, Text, MineCycleText, Igniting/Refreshing Pot 11
Click, 725, %BeginIgniteY2% ;Ignite
Sleep 200
Click, %MaxButtonX%, %MaxButtonY% ;Max button
Sleep 200
Click, 750, 305 ;Click Menu to refresh
Sleep 200
;Pot 12
GuiControl, Text, MineCycleText, Igniting/Refreshing Pot 12
Click, 890, %BeginIgniteY2% ;Ignite
Sleep 200
Click, %MaxButtonX%, %MaxButtonY% ;Max button
Sleep 200
Click, 915, 305 ;Click Menu to refresh
Sleep 200
;Stoke 1 countdown
seconds = 132
Loop, %seconds%
{
GuiControl, Text, MineCycleText, %seconds% seconds until Stoke 1/5 (24 water)
seconds --
Sleep 1000
GetKeyState, state, F2
if state = D
break
}
Gosub, StokeMax
;Stoke 2 (19 water) countdown
seconds = 163
Loop, %seconds%
{
GuiControl, Text, MineCycleText, %seconds% seconds until Stoke 2/5 (19 water)
seconds --
Sleep 1000
GetKeyState, state, F2
if state = D
{
break
}
}
Gosub, StokeMax
;Stoke 3 (14 water) countdown
seconds = 163
Loop, %seconds%
{
GuiControl, Text, MineCycleText, %seconds% seconds until Stoke 3/5 (14 water)
seconds --
Sleep 1000
GetKeyState, state, F2
if state = D
break
}
Gosub, StokeMax
;Stoke 4 (9 water) countdown
seconds = 163
Loop, %seconds%
{
GuiControl, Text, MineCycleText, %seconds% seconds until Stoke 4/5 (9 water)
seconds --
Sleep 1000
GetKeyState, state, F2
if state = D
break
}
Gosub, StokeMax
;Stoke 5 (6 water) countdown
seconds = 96
Loop, %seconds%
{
GuiControl, Text, MineCycleText, %seconds% seconds until Stoke 5/5 (6 water)
seconds --
Sleep 1000
GetKeyState, state, F2
if state = D
break
}
Gosub, StokeMax
;Countdown until complete
seconds = 176
Loop, %seconds%
{
GuiControl, Text, MineCycleText, %seconds% seconds until Kettles complete...
seconds --
Sleep 1000
}
Sleep 10000
;Click Take button
WinActivate, eGenesis Client
GuiControl, Text, MineCycleText, Taking, Pot 1
Click, 45, %BeginIgniteY1% ;Pot 1
Sleep 200
GuiControl, Text, MineCycleText, Taking, Pot 2
Click, 220, %BeginIgniteY1% ;Pot 2
Sleep 200
GuiControl, Text, MineCycleText, Click Begin, Pot 3
Click, 385, %BeginIgniteY1% ;Pot 3
Sleep 200
GuiControl, Text, MineCycleText, Click Begin, Pot 4
Click, 555, %BeginIgniteY1% ;Pot 4
Sleep 200
GuiControl, Text, MineCycleText, Click Begin, Pot 5
Click, 725, %BeginIgniteY1% ;Pot 5
Sleep 200
GuiControl, Text, MineCycleText, Click Begin, Pot 6
Click, 890, %BeginIgniteY1% ;Pot 6
Sleep 200
GuiControl, Text, MineCycleText, Click Begin, Pot 7
Click, 45, %BeginIgniteY2% ;Pot 7
Sleep 200
GuiControl, Text, MineCycleText, Click Begin, Pot 8
Click, 220, %BeginIgniteY2% ;Pot 8
Sleep 200
GuiControl, Text, MineCycleText, Click Begin, Pot 9
Click, 385, %BeginIgniteY2% ;Pot 9
Sleep 200
GuiControl, Text, MineCycleText, Click Begin, Pot 10
Click, 555, %BeginIgniteY2% ;Pot 10
Sleep 200
GuiControl, Text, MineCycleText, Click Begin, Pot 11
Click, 725, %BeginIgniteY2% ;Pot 11
Sleep 200
GuiControl, Text, MineCycleText, Click Begin, Pot 12
Click, 890, %BeginIgniteY2% ;Pot 12
Sleep 200
} ;End Loop Turns
Gui, Destroy
Gui, Add, Text,, %Turns% turns...`n`nAll Done!.
Gui, Show
return
StokeMax:
WinActivate, eGenesis Client
StokeMaxY1 = 75
StokeMaxY2 = 335
if (Kettle == "Public")
{
StokeMaxY1 := StokeMaxY1 + 15
StokeMaxY2 := StokeMaxY2 + 30
}
;Click Stoke Max
MouseGetPos, OldMX, OldMY
GuiControl, Text, MineCycleText, Stoking, Pot 1
Click, 50, %StokeMaxY1% ; Pot 1
Sleep 200
GuiControl, Text, MineCycleText, Stoking, Pot 2
Click, 250, %StokeMaxY1% ; Pot 2
Sleep 200
GuiControl, Text, MineCycleText, Stoking, Pot 3
Click, 420, %StokeMaxY1% ; Pot 3
Sleep 200
GuiControl, Text, MineCycleText, Stoking, Pot 4
Click, 590, %StokeMaxY1% ; Pot 4
Sleep 200
GuiControl, Text, MineCycleText, Stoking, Pot 5
Click, 750, %StokeMaxY1% ; Pot 5
Sleep 200
GuiControl, Text, MineCycleText, Stoking, Pot 6
Click, 910, %StokeMaxY1% ; Pot 6
Sleep 200
GuiControl, Text, MineCycleText, Stoking, Pot 7
Click, 50, %StokeMaxY2% ; Pot 7
Sleep 200
GuiControl, Text, MineCycleText, Stoking, Pot 8
Click, 250, %StokeMaxY2% ; Pot 8
Sleep 200
GuiControl, Text, MineCycleText, Stoking, Pot 9
Click, 420, %StokeMaxY2% ; Pot 9
Sleep 200
GuiControl, Text, MineCycleText, Stoking, Pot 10
Click, 590, %StokeMaxY2% ; Pot 10
Sleep 200
GuiControl, Text, MineCycleText, Stoking, Pot 11
Click, 750, %StokeMaxY2% ; Pot 11
Sleep 200
GuiControl, Text, MineCycleText, Stoking, Pot 12
Click, 910, %StokeMaxY2% ; Pot 12
Sleep 200
MouseMove, %OldMX%, %OldMY%, 0
return
