Wizard101Helper/DanceBot.ahk at master · haendd/Wizard101Helper · GitHub

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
#SingleInstance force
WinActivate, ahk_exe WizardGraphicalClient.exe

InputBox, Times, Setup, Please enter number of games to play`nPress q to quit
If(ErrorLevel){
    Exit
}
WinActivate, ahk_exe WizardGraphicalClient.exe
CoordMode, Mouse, Screen
CoordMode, Pixel, Screen
WinGetPos Xpos, Ypos, , , Wizard101

Games = 1
While Games <= Times
{
   Send {x}
   Sleep, 400

   WinGetActiveTitle, WinTitle
   BlockInput, On
   MouseGetPos, posx, posy
   WinActivate, ahk_exe WizardGraphicalClient.exe

   MouseMove, % Xpos + 632, % Ypos + 491, 0
   Click
   Click
   Sleep, 400

   MouseGetPos, posx, posy
   MouseMove, % Xpos + 627 , % Ypos + 588 , 0
   Click
   Click
   WinActivate, %WinTitle%
   MouseMove, posx, posy, 0
   BlockInput, Off

   MoveArray := []
   PixelGetColor, color, % Xpos + 400 , % Ypos + 530
   While  color != 0xC2DBEB ;Wait until minigame has loaded
   {
	  PixelGetColor, color,% Xpos + 400,% Ypos + 530
	  Sleep, 20
   }
   FileAppend "Game Starting... "`n, *
   rounds = 2
   while rounds <= 6
   {
	  Moves = 0
	  ;Get Moves
	  while Moves <= rounds
	{
		 PixelSearch Px, Py, % Xpos  + 402 , %  Ypos + 545, % Xpos  + 402, %  Ypos + 545, 0x5AE7F3, 15, Fast
		 if !ErrorLevel
		{
			;Up or Down
			PixelSearch Px, Py, % Xpos + 405, % Ypos + 578, % Xpos + 405 ,% Ypos + 578, 0x085B69, 15, Fast
			if !ErrorLevel {
				FileAppend UP`n, *
				 MoveArray[Moves] := "Up"
			} else{
				FileAppend DOWN`n, *
			   MoveArray[Moves] := "Down"
			}
			Moves++
			Sleep, 200
		 }

		 PixelSearch Px, Py, % Xpos + 389, % Ypos + 560,  % Xpos + 389, % Ypos + 560, 0x2Ac8d5, 15, Fast
		 if !ErrorLevel
		{
			;Left or Right
			PixelSearch Px, Py, % Xpos + 423, % Ypos + 560, % Xpos + 423, % Ypos + 560, 0x142f34, 15, Fast
			if !ErrorLevel {
			   FileAppend Right`n, *
			   MoveArray[Moves] := "Right"
			} else {
			   FileAppend Left`n, *
			    MoveArray[Moves] := "Left"
			}
			Moves++
			Sleep, 200
		 }
	  }
	  ;Execute Moves
	  Sleep, 500

	  WinGetActiveTitle, WinTitle
	  BlockInput,On
	  WinActivate, ahk_exe WizardGraphicalClient.exe
	  i = 0
	  WinGet, winid
	  While i <= Moves
	  {
		 if MoveArray[i] == "Down"
		{
			 FileAppend Sending Down`n, *
			 SendInput {s}
			 Sleep, 150
		 } else if MoveArray[i] == "Up" {
			 FileAppend Sending Up`n, *
			 SendInput {w}
			Sleep, 150
		 } else if MoveArray[i] == "Right" {
			 FileAppend Sending Right`n, *
			 SendInput {d}
			Sleep, 150
		 } else if MoveArray[i] == "Left" {
			 FileAppend Sending Left`n, *
			 SendInput {a}
			 Sleep, 150
		 }
		  i++
	 }
	 WinActivate, %WinTitle%
		BlockInput,Off
   rounds++
}

    Sleep, 2500 ;Lazy wait for loading

	MouseMove, % Xpos + 620 ,% Ypos + 588, 0
	sleep,200
    Click ;Next
	Click
    Sleep, 100

	MouseMove, % Xpos + 174 ,% Ypos + 487, 0
	Sleep 200
    Click ;Snack Select
    Sleep, 100

    MouseMove, % Xpos + 620 ,% Ypos + 588, 0
    Sleep,200
    Click ;Feed Pet
	Click
    Sleep, 100

    MouseMove, % Xpos + 184 ,% Ypos + 588, 0
    Sleep,200
    Click ;Exit
	Click

   Loaded := False
   While(!Loaded){
		PixelSearch, Px, Py, % Xpos + 239, % Ypos + 537, % Xpos + 239, % Ypos + 537, 0xB576EF, 5, Fast
		If !ErrorLevel {
			Loaded := True
		}Else{
			Sleep, 50
		}
	}
   Games++
}
ExitApp

q::ExitApp