Prewarning - this is prolly very sloppy, and not dont the correct way
Code:
VBSBegin
Dim xloc, yloc, x, y, i, f
x = "1199|1172|1152|1132|1131|1138|1131|1131|1131|1148|1169|1194|1215|1240|1256|1257|1251|1256|1257|1230|1202|1186"
y = "63|63|62|64|83|102|123|134|145|145|146|141|146|146|145|127|104|89|63|62|62|34"
xloc = Split(x, "|", -1, 1)
yloc = Split(y, "|",-1,1)
For i = 0 to Ubound(xloc)
MoveTo xloc(i), yloc(i)
LeftClick 1
Delay 1000
KeyPress 32,1
IfColor 670,53,dc1e00,0
Delay 500
KeyPress 32,1
Delay 500
EndIf
Next
KeyPress 32,1
EndFor
VBSEnd
I can only get it to select a few monsters and kill them, once reaching the first point it will stop attacking all together. I tried to use a method to get the pixel of the monsters MP bar so that I know the monster exists, has been targeted, and can be attacked.
using this method
Code:
IfColor 670,53,dc1e00,0
Delay 500
KeyPress 32,1
Delay 500
EndIf
Execution order 11, 1 run-time error -- Type mismatch: 'ifcolor',
Any help in this would very much appreciated
Ty






