原帖由 tongmengyuan 于 2007-8-19 22:05 发表 
按键精灵 我知道 可是怎么实现 加一下 再向下移动加一个呢
貼出來給你看看啦~~~
這是改藍色刻紋的每個7個的~
我是搜完後把所有的加入~之後在位置表格用下面的腳本改的~~~
不過~這很容易把卸下裝備改掉~所以之後要補上一個卸下裝備~
VBS dim a,b
VBS b = 1
For 21
If b = 1
VBS a= "69h,0,7,0,0,0,1ch,19h,5eh,0,ffh,ffh,ffh,ffh,1,0,0,0,1ch,19h,5eh,0,ffh,ffh,ffh,ffh,5,0,0,0"
ElseIf b = 2
VBS a= "69h,0,7,0,0,0,1ch,19h,5eh,0,ffh,ffh,ffh,ffh,2,0,0,0,1ch,19h,5eh,0,ffh,ffh,ffh,ffh,3,0,0,0"
ElseIf b = 3
VBS a= "69h,0,7,0,0,0,1ch,19h,5eh,0,ffh,ffh,ffh,ffh,3,0,0,0,1ch,19h,5eh,0,ffh,ffh,ffh,ffh,5,0,0,0"
ElseIf b = 4
VBS a= "69h,0,7,0,0,0,1ch,19h,5eh,0,ffh,ffh,ffh,ffh,4,0,0,0,1ch,19h,5eh,0,ffh,ffh,ffh,ffh,3,0,0,0"
ElseIf b = 5
VBS a= "69h,0,7,0,0,0,1ch,19h,5eh,0,ffh,ffh,ffh,ffh,5,0,0,0,1ch,19h,5eh,0,ffh,ffh,ffh,ffh,5,0,0,0"
ElseIf b = 6
VBS a= "69h,0,7,0,0,0,1ch,19h,5eh,0,ffh,ffh,ffh,ffh,6,0,0,0,1ch,19h,5eh,0,ffh,ffh,ffh,ffh,5,0,0,0"
ElseIf b = 7
VBS a= "69h,0,7,0,0,0,1ch,19h,5eh,0,ffh,ffh,ffh,ffh,7,0,0,0,1ch,19h,5eh,0,ffh,ffh,ffh,ffh,5,0,0,0"
ElseIf b = 8
VBS a= "69h,0,7,0,0,0,1ch,19h,5eh,0,ffh,ffh,ffh,ffh,8,0,0,0,1ch,19h,5eh,0,ffh,ffh,ffh,ffh,5,0,0,0"
ElseIf b = 9
VBS a= "69h,0,7,0,0,0,1ch,19h,5eh,0,ffh,ffh,ffh,ffh,9,0,0,0,1ch,19h,5eh,0,ffh,ffh,ffh,ffh,2,0,0,0"
ElseIf b = 10
VBS a= "69h,0,7,0,0,0,1ch,19h,5eh,0,ffh,ffh,ffh,ffh,10,0,0,0,1ch,19h,5eh,0,ffh,ffh,ffh,ffh,5,0,0,0"
ElseIf b = 11
VBS a= "69h,0,7,0,0,0,1ch,19h,5eh,0,ffh,ffh,ffh,ffh,11,0,0,0,1ch,19h,5eh,0,ffh,ffh,ffh,ffh,3,0,0,0"
ElseIf b = 12
VBS a= "69h,0,7,0,0,0,1ch,19h,5eh,0,ffh,ffh,ffh,ffh,12,0,0,0,1ch,19h,5eh,0,ffh,ffh,ffh,ffh,3,0,0,0"
ElseIf b = 13
VBS a= "69h,0,7,0,0,0,1ch,19h,5eh,0,ffh,ffh,ffh,ffh,13,0,0,0,1ch,19h,5eh,0,ffh,ffh,ffh,ffh,5,0,0,0"
ElseIf b = 14
VBS a= "69h,0,7,0,0,0,1ch,19h,5eh,0,ffh,ffh,ffh,ffh,14,0,0,0,1ch,19h,5eh,0,ffh,ffh,ffh,ffh,5,0,0,0"
ElseIf b = 15
VBS a= "69h,0,7,0,0,0,1ch,19h,5eh,0,ffh,ffh,ffh,ffh,15,0,0,0,1ch,19h,5eh,0,ffh,ffh,ffh,ffh,3,0,0,0"
ElseIf b = 16
VBS a= "69h,0,7,0,0,0,1ch,19h,5eh,0,ffh,ffh,ffh,ffh,16,0,0,0,1ch,19h,5eh,0,ffh,ffh,ffh,ffh,3,0,0,0"
ElseIf b = 17
VBS a= "69h,0,7,0,0,0,1ch,19h,5eh,0,ffh,ffh,ffh,ffh,17,0,0,0,1ch,19h,5eh,0,ffh,ffh,ffh,ffh,1,0,0,0"
ElseIf b = 18
VBS a= "69h,0,7,0,0,0,1ch,19h,5eh,0,ffh,ffh,ffh,ffh,18,0,0,0,1ch,19h,5eh,0,ffh,ffh,ffh,ffh,4,0,0,0"
ElseIf b = 19
VBS a= "69h,0,7,0,0,0,1ch,19h,5eh,0,ffh,ffh,ffh,ffh,19,0,0,0,1ch,19h,5eh,0,ffh,ffh,ffh,ffh,3,0,0,0"
ElseIf b = 20
VBS a= "69h,0,7,0,0,0,1ch,19h,5eh,0,ffh,ffh,ffh,ffh,20,0,0,0,1ch,19h,5eh,0,ffh,ffh,ffh,ffh,3,0,0,0"
ElseIf b = 21
VBS a= "69h,0,7,0,0,0,1ch,19h,5eh,0,ffh,ffh,ffh,ffh,21,0,0,0,1ch,19h,5eh,0,ffh,ffh,ffh,ffh,1,0,0,
EndIf
VBS b = b +1
For 7
KeyPress 13,1
SayString a
Delay 500
KeyPress 13,1
KeyPress 40,1
EndFor
EndFor |