- UID
- 5647
- 帖子
- 12
- 积分
- 11
- 紫菀
- 0 朵
- 花瓣
- 18 片
- 花蕊
- 4 朵
- 野草莓
- 0 个
- 蒲公英
- 0 朵
- 社区等级
- 2 级
- 在线时间
- 6 小时
- 注册时间
- 2007-1-22
- 登录状态
-
当前离线
|
板凳
发表于 2007-2-9 12:25
| 只看该作者
<神泣>祭司自动加血脚本
使用前请先参照说明设置:
QUOTE:
[ 脚本说明 ]
1.游戏分辨率1024*768/32色
2.自定义加血百分比 默认为80%
3.自定义加血技能键位 默认为数字"1"
4.脚本自动判断组队人数 如果人数有变化须重新启动脚本
[Copy to clipboard]CODE:
//---------------------------------------------- [ 声明变量 ]
dim hp,k,rs,x,y,ay,hpx,hpy,key
//---------------------------------------------- [ 用户自定义变量 ]
UserVar hp=80 设置自动补红的百分比(默认为80%)
UserVar k=1 设置自动补红技能键位(默认为数字1)
hp=cint(hp):k=asc(k):rs=0
//---------------------------------------------- [ 血条定位 ]
Delay 100
VBSCall FindColorex(10,90,210,400,"32089C",0,0.9,x,y)
//区域找组队血条颜色
If x>=10 and y>=90
IfColor x y+9 D6A506 2
//如果血条下面的蓝条存在
hpx=x+cint((119/100)*hp):ay=y
//计算组队血条自定义百分比位置
Gosub 组队人数
Else
MessageBox 没有找到队伍血条
Goto end
EndIf
EndIf
//---------------------------------------------- [ 自动加血 ]
Rem start
key=112:hpy=ay
//定义选取队员键码和血条纵坐标变量
For rs
Delay 50
IfColor hpx hpy 000000 0
//如果血条百分比位置为底色,则执行以下的加血命令
Delay 50
KeyDownH key 1
Delay 100
KeyUpH key 1
Delay 200
KeyDownH k 1
Delay 200
KeyUpH k 1
EndIf
key=key+1:hpy=hpy+52
//变量递增
EndFor
Delay 50
Goto start
//---------------------------------------------- [ 判断组队人数 ]
Sub 组队人数
For 7
Delay 10
IfColor x y 32089C 2
rs=rs+1
//计算组队人数
EndIf
y=y+52
EndFor
Return 组队人数
//---------------------------------------------- [ 脚本终止 ]
Rem end
EndScript |
|