海岛上有个封元守卫,从他那里可以买
- -
打开网页按键精灵,先输入打豆豆地址,点脚本,点编辑脚本,会出现按键精灵,然后点新建,点源文件,然后把下面的脚本复制进去
s=0
x=0
y=0
While s=0
FindColor 0,y+1,1000,500,"E1E1E1",x,y
If GetPixelColor(x+1,y)="E1E1E1" and GetPixelColor(x,y+1)="E1E1E1" and GetPixelColor(x+1,y+1)="FEFAF9" Then
s=1
//MessageBox "a"&x&" "&y
End If
Wend
Dim a(15,23)
Dim b(10)
dim c(4)
dim d(4)
Dim e(4)
b(1)="03CC03"
b(2)="0367CC"
b(3)="CCCC67"
b(4)="9A9A9A"
b(5)="67CCCC"
b(6)="6666FF"
b(7)="039AFF"
b(8)="FF6703"
b(9)="FEABFD"
b(10)="CC67CC"
x=x-1
y=y+34
For i=1 to 15
For j=1 to 23
a(i,j)=GetPixelColor(x+25*j,y+25*i)
Select Case a(i,j)
Case b(1)
a(i,j)=1
Case b(2)
a(i,j)=2
Case b(3)
a(i,j)=3
Case b(4)
a(i,j)=4
Case b(5)
a(i,j)=5
Case b(6)
a(i,j)=6
Case b(7)
a(i,j)=7
Case b(8)
a(i,j)=8
Case b(9)
a(i,j)=9
Case b(10)
a(i,j)=10
Case else
a(i,j)=0
End Select
//MessageBox "a("&i&","&j&")="&a(i,j)
Next
Next
//MessageBox "p1e"
For i=2 to 14
For j=2 to 22
If a(i,j)=0 then
Delay 200
For k=1 to 4
e(k)=1
Next
d(1)=0
For c(1)=i-1 to 1 step -1
If a(c(1),j)>0 then
d(1)=a(c(1),j)
Exit For
End If
next
d(2)=0
For c(2)=i+1 to 15
If a(c(2),j)>0 then
d(2)=a(c(2),j)
Exit For
End If
next
d(3)=0
For c(3)=j-1 to 1 step -1
If a(i,c(3))>0 then
d(3)=a(i,c(3))
Exit For
End If
next
d(4)=0
For c(4)=j+1 to 23
If a(i,c(4))>0 then
d(4)=a(i,c(4))
Exit For
End If
Next
s=0
For k=1 to 3
For l=k+1 to 4
If d(k)=d(l) and d(k)>0 then
s=1
e(k)=0
e(l)=0
End if
Next
Next
If e(1)=0
a(c(1),j)=0
end if
If e(2)=0
a(c(2),j)=0
end if
If e(3)=0
a(i,c(3))=0
end if
If e(4)=0
a(i,c(4))=0
end if
If s=1
MoveTo x+25*j,y+25*i
//MessageBox i&j&" "&c(1)&c(2)&c(3)&c(4)&" "&d(1)&d(2)&d(3)&d(4)
LeftClick 1
end if
End if
Next
Next
最后保存退出,打上勾启用,然后回到网页按键精灵,按一下F10,就会自动打豆豆了,(后半部分还要再点一次f10)最后打豆豆的速度会越来越慢。建议按一下f12后,自己打豆豆
还有什么问题不懂hi我