User:Cegaiel/Macros/FlaxHammock/Code - Revision history

Cegaiel at 09:42, 17 December 2010

2010-12-17T09:42:42Z

Cegaiel at 09:28, 17 December 2010

2010-12-17T09:28:44Z

Cegaiel at 20:16, 13 December 2010

2010-12-13T20:16:40Z

Show changes

Cegaiel at 20:14, 13 December 2010

2010-12-13T20:14:49Z

Show changes

Cegaiel at 20:12, 13 December 2010

2010-12-13T20:12:37Z

Cegaiel at 05:56, 14 November 2010

2010-11-14T05:56:26Z

Cegaiel at 02:42, 8 November 2010

2010-11-08T02:42:41Z

Cegaiel at 01:48, 8 November 2010

2010-11-08T01:48:15Z

Cegaiel at 01:47, 8 November 2010

2010-11-08T01:47:28Z

Cegaiel at 01:46, 8 November 2010

2010-11-08T01:46:58Z

← Older revision		Revision as of 09:42, 17 December 2010
Line 29:		Line 29:


−	// CONFIGURATION	+	; // CONFIGURATION


Line 43:		Line 43:


−	// END CONFIGURATION	+	; // END CONFIGURATION

@@ Line 4: / Line 4: @@
 ;Ctrl+R to reload script
 ;Date 3/17/2010
-;Last Update: 12/13/2010
+;Last Update: 12/17/2010
 ;Author: Cegaiel
@@ Line 49: / Line 49: @@
-			;Get coordinates, for your resolutions'  X,Y location of the popups (OK button) that will occur
+			;Get coordinates, for your resolutions'  X,Y location of the popups (OK button) that will occur later.
 			CenterX := Floor(Xmax/2)
 			CenterY := Floor(Ymax/2)+105
@@ Line 66: / Line 64: @@
 	Gui, Add, Edit, vQty wp number,
 	Gui, Add, Text,, `nHammock Max capacity:
-	Gui, Add, Text,, Grass: 200   (2 Teppy Min max)`nPapyrus: 20   (4 Teppy Min max)`nRotten Flax: 10   (2 Teppy Min
+	Gui, Add, Text,, Grass: 200   (2 Teppy Min max)`nPapyrus: 20   (4 Teppy Min max)`nRotten Flax: 10   (2 Teppy Min max)`n
 	Gui, Add, Button, gRecord, Next
 	Gui, Show, x0 y25
@@ Line 153: / Line 149: @@
+	{
 	GuiControl, Text, MineCycleText, %StartDelay%s countdown to drag this window out of way`n`n`n`n
-	Delay --
+	StartDelay --
 	Sleep 1000
+	}
@@ Line 233: / Line 229: @@
 			loop, %Seconds% {
 			Gui, Font, bold
-			GuiControl, Text, MineCycleText, %minutes_eta%m %seconds_eta%s drying time remaining
+			GuiControl, Text, MineCycleText, %minutes_eta%m %seconds_eta%s drying time remaining (%Word%)`n`n%Remaining% of %cycles% cycles remaining to process `n`nDried: %Dried% of %Qty%
 			Gui, Font, norm
 			Gui, Add, Text,,

@@ Line 4: / Line 4: @@
 ;Ctrl+R to reload script
 ;Date 3/17/2010
-;Last Update: 10/11/2010 (Now asks how much you have in inventory and stops when all has been processed, automatically)
+;Last Update: 12/13/2010
-;Last Update: 11/07/2010 - Changed Papyrus to Fertile Papyrus and added option for Sterile Papyrus (N Hotkey)
 ;Wheat is not supported due to the way it brings up a menu and makes you manually select which wheat you are drying
@@ Line 25: / Line 24: @@
-			PoupDelay = 300
 			;Get coordinates, for your resolutions'  X,Y location of the popups (OK button) that will occur later.
 			CenterX := Floor(Xmax/2)
 			CenterY := Floor(Ymax/2)+105
@@ Line 35: / Line 58: @@
+{
 	WinActivate
+	Gui, +AlwaysOnTop +ToolWindow
 	Gui, Add, Text,, What are you drying?
 	Gui, Add, DropDownList, vWord Choose1, Grass|Rotten Flax|Fertile Papyrus|Sterile Papyrus
 	Gui, Add, Text,, Qty you have in inventory:
 	Gui, Add, Edit, vQty wp number,
 	Gui, Add, Text,, `nHammock Max capacity:
-	Gui, Font, norm
+	Gui, Add, Text,, Grass: 200   (2 Teppy Min max)`nPapyrus: 20   (4 Teppy Min max)`nRotten Flax: 10   (2 Teppy Min
 	Gui, Add, Text,, Grass: 200   (2 Teppy Min max)`nPapyrus: 20   (4 Teppy Min max)`nRotten Flax: 10   (2 Teppy Min max)`n
 	Gui, Add, Button, gRecord, Next
 	Gui, Show, x0 y25
@@ Line 73: / Line 96: @@
 	MineNum = 0
+	PerCycle = 0
+	Dried = 0
 SetDefaultMouseSpeed, 0
@@ Line 117: / Line 140: @@
 	Gui, +AlwaysOnTop +ToolWindow
 	Gui, Font, bold
 	Gui, Add, Text, vMineCycleText, 5 seconds countdown to drag this window out of way`n`n`n
-	Gui, Font, norm
+	Gui, Add, Text, vMineCycleText, 5 seconds countdown to drag this window out of way`n`n`n`n
 	Gui, Show, x0 y25
-	GuiControl, Text, MineCycleText, 5 seconds countdown to drag this window out of way`n`n`n
+	GuiControl, Text, MineCycleText, 5 seconds countdown to drag this window out of way`n`n`n`n
-	Delay = 5
+	StartDelay = 5
 	;You got 5 seconds to drag the status window out of the way
-	Loop, %Delay%
+	Loop, %StartDelay%
+	{
-	GuiControl, Text, MineCycleText, %Delay%s countdown to drag this window out of way`n`n`n
+	GuiControl, Text, MineCycleText, %StartDelay%s countdown to drag this window out of way`n`n`n`n
 	Delay --
 	Sleep 1000
@@ Line 140: / Line 163: @@
 	Hammock := "F"
 	Seconds := sFlax
 	minutes_eta = 2
 	seconds_eta = 13
 	} else if (Word == "Grass") {
@@ Line 148: / Line 172: @@
 	Seconds := sGrass
 	Cycles := Ceil(Qty / (200 * TotalHammocks))
 	minutes_eta = 11
 	seconds_eta = 6
@@ Line 155: / Line 180: @@
 	Seconds := sPapy
 	Cycles := Ceil(Qty / (20 * TotalHammocks))
 	minutes_eta = 4
 	seconds_eta = 26
@@ Line 163: / Line 189: @@
 	Seconds := sPapy
 	Cycles := Ceil(Qty / (20 * TotalHammocks))
 	minutes_eta = 4
 	seconds_eta = 26
@@ Line 168: / Line 195: @@
+PerCycle := PerHammock * MineNum
 Remaining := Cycles
 	loop, %Cycles%
@@ Line 192: / Line 217: @@
 			MinePosY := MineY%MineNum%
 			MouseMove, %MinePosX%, %MinePosY%, 0
-			sleep 250
+			sleep %Delay%
 			Send {%Hammock%}
-			Sleep, 250
+			Sleep, %Delay%
 			MineNum++
 			GoSub, Popup
@@ Line 205: / Line 230: @@
 			loop, %Seconds% {
-			GuiControl, Text, MineCycleText, %minutes_eta%m %seconds_eta%s drying time remaining`n`n%Remaining% cycles remaining to process - %Qty% %Word%
+			Gui, Font, bold
 			;SecondsCountdown := SecondsCountdown - 1
@@ Line 229: / Line 262: @@
 			MinePosY := MineY%MineNum%
 			MouseMove, %MinePosX%, %MinePosY%, 0
-			Sleep, 250
+			Sleep, %Delay%
 			Send {T}
-			Sleep, 250
+			Sleep, %Delay%
 			GoSub, Popup
 			MineNum++
@@ Line 237: / Line 270: @@
 			Remaining --
+			Dried := Dried + PerCycle
 			;Set the minutes/seconds countdown again, for next cycle

@@ Line 6: / Line 6: @@
 ;Last Update: 10/11/2010 (Now asks how much you have in inventory and stops when all has been processed, automatically)
 ;Last Update: 11/07/2010 - Changed Papyrus to Fertile Papyrus and added option for Sterile Papyrus (N Hotkey)
+;Last Update: 11/14/2010 - Made all GUI's appear on upper left corner, so you do not need to drag out of way, anymore.
 ;Wheat is not supported due to the way it brings up a menu and makes you manually select which wheat you are drying
@@ Line 45: / Line 45: @@
 	Gui, Add, Text,, Grass: 200   (2 Teppy Min max)`nPapyrus: 20   (4 Teppy Min max)`nRotten Flax: 10   (2 Teppy Min max)`n
 	Gui, Add, Button, gRecord, Next
-	Gui, Show
+	Gui, Show, x0 y25
 	return
@@ Line 70: / Line 70: @@
 	Gui, Add, Button, default gMineSetLoops, OK
-	Gui, Show
+	Gui, Show, x0 y25
 	MineNum = 0
@@ Line 119: / Line 119: @@
 	Gui, Add, Text, vMineCycleText, 5 seconds countdown to drag this window out of way`n`n`n
 	Gui, Font, norm
-	Gui, Show
+	Gui, Show, x0 y25
 	GuiControl, Text, MineCycleText, 5 seconds countdown to drag this window out of way`n`n`n

@@ Line 246: / Line 246: @@
 			minutes_eta = 11
 			seconds_eta = 6
-			} else if (Word == "Papyrus") {
+			} else if (Word == "Fertile Papyrus") {
 			minutes_eta = 4
 			seconds_eta = 26

← Older revision		Revision as of 01:48, 8 November 2010
Line 271:		Line 271:

	;Search for the RBG color of 0xECDFBD (Same as HTML code: #ECDFBD)		;Search for the RBG color of 0xECDFBD (Same as HTML code: #ECDFBD)
−	~~;Was having too much problems with Sterope public sand mine.~~
−	~~;The shade would work one day and not the next, always adjusting and something I still kept walking randomly from misclick~~
−	~~;So this has been aborted and using imagesearch method~~

	PixelSearch, Px, Py, %CenterX%, %CenterY%, %CenterX%, %CenterY%, 0xEBDDBB, %shade%, Fast\|RGB		PixelSearch, Px, Py, %CenterX%, %CenterY%, %CenterX%, %CenterY%, 0xEBDDBB, %shade%, Fast\|RGB