怎么用按键精灵制作游戏辅助，细胞会不会越分越小很难啊？求大神指教！

来源：蜘蛛抓取(WebSpider) 时间：2014-10-28 11:10 标签： 你会不会突然的出现
求大神制作一个按键精灵脚本，按下一个键开始松开结束_百度知道
求大神制作一个按键精灵脚本，按下一个键开始松开结束
Alias &quot, 0KeyPress &quot,2&quot,按下Q键开始2和R的循环（期间2和R延迟为25毫秒）。松开Q键结束。
自己制作了一个,但是中途老是会出现Q这个按键。SetSimMode 2Declare Function GetAsyncKeyState Lib &quot,user32&quot,&gt, 1 KeyPress &quot,GetAsyncKeyState&quot,,,r&quot, (ByVal vKey As Long) As IntegerDox = WaitKeya = GetAsyncKeyState(71)While a &lt, 1a = GetAsyncKeyState(71)WendDelay 0Loop大神们快来,分全给上了。,
提问者采纳
jpg" />,我是个菜鸟虽然不懂,给你思路。
其他类似问题
按默认排序
其他1条回答
hiphotos,//f,Rem 啊Delay 25KeyPress &quot,hiphotos,2&quot,//f,R&quot,jpg" />关键是 把 暂,, 1Goto 啊
等待您来回答
下载知道APP
随时随地咨询
出门在外也不愁你的位置：
后台间隔时间 如何改 谢大神指教 在线等
来源: 按键精灵资源站
[i=s] 本帖最后由 nt_567 于
21:07 编辑
后台间隔时间 如何改 谢大神指教 在线等&&红色位置知道肯定错误 该怎么改写&&是把7,8,9改成56,57,58&&还是下面的也要改
Sub 定时任务()
UserVar jn1=&8& &设置防御8键位&
UserVar jn2=&9& &设置攻击9键位&
UserVar jn3=&7& &设置技能7键位&
UserVar s1=60 &设置防御施放间隔时间&
UserVar s2=90 &设置攻击施放间隔时间&
UserVar s3=120 &设置检测间隔时间&
//-----------------------------------------------------------------------
//---------------------------------------------------------[赋值初始变量]
//-----------------------------------------------------------------------
dim number(2),thetime(2),key(2),sj(2)
dim a,b,c,d,jn1,jn2,jn3,s1,s2,s3,t1,t2,t3,L
//声明变量
number(0)=jn1:number(1)=jn2:number(2)=jn3
thetime(0)=s1:thetime(1)=s2:thetime(2)=s3
//把自定义参数的返回值转换成数组元素
t1=now:t2=now:t3=now
//返回当前系统日期时间到变量
//-----------------------------------------------------------------------
//---------------------------------------------------------- [跳转子程序]
//-----------------------------------------------------------------------
Gosub 判断按键
Gosub 判断时间
//-----------------------------------------------------------------------
//---------------------------------------------------------- [脚本主程序]
//-----------------------------------------------------------------------
While true
& & //条件无限循环
& & If DateDiff(&s&,t1,now)&=sj(0) Then
& && &&&//& DateDiff 函数：返回两个日期之间的时间间隔&
& && &&&//&&s&：秒& &t1：时间变量& &now：当前系统日期和时间& &s(0)：自定义时间变量&
& && &&&Delay 200
&&& && &dm.KeyPress (0)
& && &&&//按键 变量k(0) 1次
& && &&&t1=now
& && &&&//重新赋值日期时间到变量
& & End If
& & If DateDiff(&s&,t2,now)&=sj(1) Then
& && &&&Delay 200
& && &&&dm.KeyPress (1)
Delay 1500& && &
& && &&&t2=now
& & End If
& & If DateDiff(&s&,t3,now)&=sj(2) Then
& &&&Delay 200
& && &&&dm.KeyPress (3)
Delay 1500&&
& && &&&t3=now
& & End If
& & Delay 200
//-----------------------------------------------------------------------
//------------------------------------------------------ [判断键码子程序]
//-----------------------------------------------------------------------
Sub 判断按键()
& & a=0:b=0
& & //赋值数组最小下标
& && &&&L=Len(number(a))
& && &&&//& Len 函数：返回字符串内字符的数量&
& && &&&If L=1 Then
& && && && &key(b)=Asc(UCase(number(a)))
& && && && &//& Asc 函数：返回字符串首字母的ASCII字符代码& & UCase 函数：返回转换为大写字母的字符&
& && && && &If key(b)&48 or key(b)&90 Then
& && && && && && &Call 结束()
& && && && && & //超出范围跳转到脚本结束标记
& && && && &ElseIf key(b)&57 and key(b)&65 Then
& && && && && & Call 结束()
& && && && &End If
& && &&&ElseIf L&1 and L&4 Then
& && && && &If UCase(Left(number(a),1))=&F& Then
& && && && && & //判断字符串首字字符&&& Left 函数：返回字符串最左边的指定数量的字符&
& && && && && & key(b)=Asc(UCase(Left(number(a),1)))+Right(number(a),L-1)+41
& && && && && & //& Right 函数：返回字符串最右边的指定数量的字符&
& && && && && & If key(b)&112 or key(b)&123 Then&&
& && && && && && &&&Call 输入错误()
& && && && && & End If
& && && && &Else
& && && && && & Call 输入错误()
& && && && &End If
& && &&&Else
& && && && &Call 输入错误()
& && &&&End If
& && &&&a=a+1:b=b+1
& && &&&//数组下标+1
& && &&&Delay 10
//-----------------------------------------------------------------------
//------------------------------------------------------ [判断时间子程序]
//-----------------------------------------------------------------------
Sub 判断时间()
& & c=0:d=0
& && &&&If IsNumeric(thetime(c))=True Then
& && && && &//& IsNumeric 函数：返回布尔值指明表达式的值是否为数字&
& && && && &sj(d)=cint(thetime(c))
& && && && &//& CInt 函数：返回已被转换为整形子类型的变体的表达式&
& && &&&Else
& && && && &Call 输入错误()
& && &&&End If
& && &&&c=c+1:d=d+1
& && &&&Delay 10
//-----------------------------------------------------------------------
//-------------------------------------------------------- [脚本停止标记]
//-----------------------------------------------------------------------
Sub 输入错误()
MessageBox &间隔时间输入错误 脚本停止运行&

我要回帖

更多关于 你会不会突然的出现 的文章

 

随机推荐