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

Cegaiel at 06:24, 28 October 2010

2010-10-28T06:24:14Z

Cegaiel at 06:21, 28 October 2010

2010-10-28T06:21:57Z

Cegaiel at 06:18, 28 October 2010

2010-10-28T06:18:19Z

Cegaiel at 04:03, 28 October 2010

2010-10-28T04:03:35Z

Cegaiel at 04:02, 28 October 2010

2010-10-28T04:02:06Z

Cegaiel at 04:01, 28 October 2010

2010-10-28T04:01:19Z

Cegaiel at 04:00, 28 October 2010

2010-10-28T04:00:15Z

Cegaiel at 02:19, 28 October 2010

2010-10-28T02:19:15Z

Cegaiel at 02:12, 28 October 2010

2010-10-28T02:12:38Z

Cegaiel at 11:01, 27 October 2010

2010-10-27T11:01:02Z

← Older revision		Revision as of 06:24, 28 October 2010
Line 1,177:		Line 1,177:


−	~~Sleep %PopUpDelay%~~
	PixelSearch, Px, Py, %CenterX%, %CenterY%, %CenterX%, %CenterY%, 0xEBDDBB, %shade%, Fast\|RGB		PixelSearch, Px, Py, %CenterX%, %CenterY%, %CenterX%, %CenterY%, 0xEBDDBB, %shade%, Fast\|RGB

← Older revision		Revision as of 06:21, 28 October 2010
Line 1,101:		Line 1,101:


−	;Not necessary, just waiting a moment before ~~bring~~ up the menu again, so I can read the last of the floating black text :)	+	;Not necessary, just waiting a moment before bringing up the menu again, so I can read the last of the floating black text :)
	Sleep 2000		Sleep 2000

@@ Line 25: / Line 25: @@
 	;This is the speed that it highlights your mine crystals
-		Delay = 200  ;Safe (lag) is 200+, Fast is 100 (fast computer, no lag)
+		Delay = 100  ;Safe (lag) is 200+, Fast is 100 (fast computer, no lag)
 	;If you have problems with it not closing the popup, then try adjusting this number higher.
-		PopUpDelay = 300  ;Safe (lag) is 300+, Fast is 200 (fast computer, no lag)
+		PopUpDelay = 100  ;Safe (lag) is 200+, Fast is 100 (fast computer, no lag)
 	;This is the shade at which is searches the for the color of the popup box.
@@ Line 61: / Line 61: @@
 	if (Pattern == "")
+	{
-	Gui, Add, Text,,Last: N/A
+	Gui, Add, Text,,Last: N/A`nSets: N/A
 	} else {
-	Gui, Add, Text,,Last: %Pattern%
+	Gui, Add, Text,,Last: %Pattern%`nSets: %Sets%
+	}
@@ Line 164: / Line 164: @@
 ;Set1: A, B, C, D, E, F
 Stone1 := 1
@@ Line 249: / Line 250: @@
 ;E = 6
 ;F = 7
 ;Set1: A-1, B, C, F
@@ Line 361: / Line 364: @@
 ;D: 6
 ;E: 7
 ;Set1: C, D, E
@@ Line 481: / Line 486: @@
 ;D: 6
 ;E: 7
 ;Set1: A-1, B, C
@@ Line 588: / Line 595: @@
 ;C-2 = 6
 ;D = 7
 ;Set1: A-1, B-1, C-1
@@ Line 701: / Line 710: @@
 ;D: 7
 ;Set1: A-1, A-2, A-3
@@ Line 799: / Line 810: @@
 ;D: 7
 ;Set1: A-1, B, C
@@ Line 909: / Line 922: @@
 else if (pattern == "3 Color (Triple + 2 Pair)")
+{
 Msgbox, No single stone can be worked 7 times on this pattern.`n`nConcede and just get a new workload...
+}
@@ Line 929: / Line 943: @@
 ;Set1: A-1, B-1, C
@@ Line 994: / Line 1,009: @@
 ;B: 6
 ;C: 7
 ;Set1: A-1, A-2, A-3
@@ Line 1,074: / Line 1,091: @@
 GoSub, PatternSet
+}
@@ Line 1,167: / Line 1,177: @@
-			Sleep %Delay%
+			Sleep %PopUpDelay%
 			PixelSearch, Px, Py, %CenterX%, %CenterY%, %CenterX%, %CenterY%, 0xEBDDBB, %shade%, Fast|RGB

← Older revision		Revision as of 04:03, 28 October 2010
Line 1,185:		Line 1,185:
	Gui, Destroy		Gui, Destroy

−	Msgbox, Ctrl + R = Reload`nCtrl + P to Pause, Ctrl + P again to Resume.`n`n`nConsistently has all 7 stones crumble:`n`n6 Color (1 Pair)`n5 Color (2 Pairs)`n`n`nNote the "3 Color (Triple + 2 Pair)" has no single stone that can be worked 7 times.`nDo not even bother with this pattern. It will tell you that anyways, if you choose it.	+	Msgbox, Ctrl + R = Reload`nCtrl + P to Pause, Ctrl + P again to Resume.`n`n`nConsistently has all 7 stones crumble (These are most desireable):`n`n6 Color (1 Pair)`n5 Color (2 Pairs)`n`n`nNote the "3 Color (Triple + 2 Pair)" has no single stone that can be worked 7 times.`nDo not even bother with this pattern. It will tell you that anyways, if you choose it.

@@ Line 534: / Line 534: @@
 Stone1 := 2
 Stone2 := 4
 Stone3 := 6
 Stone4 := 0

@@ Line 6: / Line 6: @@
 ;Last Update: 10/28/2010
 ;Author: Cegaiel
@@ Line 49: / Line 58: @@
 	Gui, Add, Button, gRecord, NEXT
-	Gui, Add, Text,, `nPattern Explanations:
 	Gui, Add, Button, gHelp, HELP
 	Gui, Show
 	return
@@ Line 70: / Line 85: @@
 	Make sure you click all quad colors FIRST!
 	Make sure you click all triple colors SECOND!
 	Make sure you click all pair colors THIRD!
 	Then all the single colors, LAST!
+	)
@@ Line 1,080: / Line 1,089: @@
 else
+{
-Msgbox, This pattern is not recorded yet...
+Msgbox, This pattern is not recorded yet... Please /chat Cegaiel and inform him of the error.`n`nPlease report that you were working on the %Pattern% pattern.
+}
@@ Line 1,086: / Line 1,095: @@
+;Not necessary, just waiting a moment before bring up the menu again, so I can read the last of the floating black text :)
@@ Line 1,093: / Line 1,103: @@
 Gosub, Start
+return
+}
@@ Line 1,185: / Line 1,189: @@
 	Gui, Destroy
-	Msgbox, Help Screen... Stay tuned for updates!.`n`n`nAll possible patterns has been added, this script is 100 percent complete`n`nJust need to keep testing it with live runs...`n`n`nConsistently has all 7 stones crumbled:`n`n6 Color (1 Pair)`n5 Color (2 Pairs)
+	Msgbox, Ctrl + R = Reload`nCtrl + P to Pause, Ctrl + P again to Resume.`n`n`nConsistently has all 7 stones crumble:`n`n6 Color (1 Pair)`n5 Color (2 Pairs)`n`n`nNote the "3 Color (Triple + 2 Pair)" has no single stone that can be worked 7 times.`nDo not even bother with this pattern. It will tell you that anyways, if you choose it.

@@ Line 4: / Line 4: @@
 ;Ctrl+R to reload script
 ;Date: 10/27/2010
 ;Author: Cegaiel
@@ Line 150: / Line 151: @@
 ;D:4
 ;E:5
@@ Line 158: / Line 161: @@
 Stone4 := 4
 Stone5 := 5
 GoSub, PatternSet
@@ Line 165: / Line 169: @@
 Stone3 := 3
 Stone4 := 4
-Stone5 :=
+Stone5 := 5
 GoSub, PatternSet
 ;Set3: A, B, C, D, F, G
-Stone1 :=
+Stone1 := 1
-Stone2 :=
+Stone2 := 2
-Stone3 :=
+Stone3 := 3
-Stone4 :=
+Stone4 := 4
-Stone5 :=
+Stone5 := 6
 GoSub, PatternSet
 ;Set4: A, B, C, E, F, G
-Stone1 :=
+Stone1 := 1
-Stone2 :=
+Stone2 := 2
-Stone3 :=
+Stone3 := 3
-Stone4 :=
+Stone4 := 5
-Stone5 :=
+Stone5 := 6
 GoSub, PatternSet
 ;Set5: A, B, D, E, F, G
-Stone1 :=
+Stone1 := 1
-Stone2 :=
+Stone2 := 2
-Stone3 :=
+Stone3 := 4
-Stone4 :=
+Stone4 := 5
-Stone5 :=
+Stone5 := 6
 GoSub, PatternSet
 ;Set6: A, C, D, E, F, G
-Stone1 :=
+Stone1 := 1
-Stone2 :=
+Stone2 := 3
-Stone3 :=
+Stone3 := 4
-Stone4 :=
+Stone4 := 5
-Stone5 :=
+Stone5 := 6
 GoSub, PatternSet
 ;Set7: B, C, D, E, F, G
-Stone1 :=
+Stone1 := 2
-Stone2 :=
+Stone2 := 3
-Stone3 :=
+Stone3 := 4
-Stone4 :=
+Stone4 := 5
-Stone5 :=
+Stone5 := 6
 GoSub, PatternSet
 ;Set8: A, B, C, D, E, F, G Breaks all 7 stones
-Stone1 :=
+Stone1 := 1
-Stone2 :=
+Stone2 := 2
-Stone3 :=
+Stone3 := 3
-Stone4 :=
+Stone4 := 4
-Stone5 :=
+Stone5 := 5
 GoSub, PatternSet
+}

@@ Line 44: / Line 44: @@
 	Gui, +AlwaysOnTop +ToolWindow
 	Gui, Add, Text,, Choose Pattern:
-	Gui, Add, DropDownList, vPattern Choose1, 7 Color|6 Color (1 Pair)|5 Color (2 Pairs)|5 Color (Triple)|4 Color (3 Pairs)|4 Color (Triple + Pair)|4 Color (Quadruple)|3 Color (Triple + 2 Pair)|3 Color (Quad + Pair)|3 Color (Quintuple)
+	Gui, Add, DropDownList, vPattern Choose1, 7 Color|6 Color (1 Pair)|5 Color (2 Pair)|5 Color (Triple)|4 Color (3 Pair)|4 Color (Triple + Pair)|4 Color (Quadruple)|3 Color (Triple + 2 Pair)|3 Color (Quad + Pair)|3 Color (Quintuple)
@@ Line 331: / Line 331: @@
-else if (pattern == "5 Color (2 Pairs)")
+else if (pattern == "5 Color (2 Pair)")
+{
 ;KEY: Hit 100%
@@ Line 562: / Line 562: @@
-else if (pattern == "4 Color (3 Pairs)")
+else if (pattern == "4 Color (3 Pair)")
+{
 ;KEY:
@@ Line 1,083: / Line 1,083: @@
 Gosub, Start
 return

@@ Line 1,079: / Line 1,079: @@
 ;Bring up the Menu again (Force Restart)
-Msgbox, Debug Mode - This will be removed later`n`nPattern Completed: %Pattern%`n`n`nWork the Mine again.
+;Msgbox, Debug Mode - This will be removed later`n`nPattern Completed: %Pattern%`n`n`nWork the Mine again.
 Gosub, Start