求高手给做个按键精灵后台脚本的将游戏脚本

求高手做个按键精灵脚本 每秒按一次1键 每4秒再按一次TAB键 魔兽世界游戏可以最小化_百度知道
求高手做个按键精灵脚本 每秒按一次1键 每4秒再按一次TAB键 魔兽世界游戏可以最小化
的按键精灵是8.21
1&quot&#39.;.KeyClick Hwnd.Foreground()Rem xhFor 4Plugin.KeyClick H但是由于游戏屏蔽问题.&#39, 1Delay 1000NextKeyPressS &quot.Window.BGKM5., 1Goto xh&#39.BGKM5;4&quot.可能用不了;==================前台脚本======================';前台一般情况下可以使用&#39,52Goto xh'==================后台脚本(可以最小化)======================Hwnd = Plugin.,49Delay 1000NextPlugin..;==================前台脚本(不可以最小化)======================Rem xhFor 4KeyPressS &quot
其他类似问题
按键精灵脚本的相关知识
其他2条回答
后台你能最小化?????白日做梦呢吧
您可能关注的推广
等待您来回答
下载知道APP
随时随地咨询
出门在外也不愁求高手帮我用按键精灵做一个脚本,事成手机卡回报!_百度知道
求高手帮我用按键精灵做一个脚本,事成手机卡回报!
想做一个魔域SF的脚本。自动抽奖的,事成后我可以为你的手机冲值!还有很多复杂的,比如抽完奖自动挑要的东西交易过另外一个号,在这里先谢了,请高手帮帮我,要智能化的
我有更好的答案
我无语了.要自动挑要的东西.不是吧?
其他类似问题
按键精灵的相关知识
等待您来回答
下载知道APP
随时随地咨询
出门在外也不愁新手求组 高手帮忙做个后台游戏按键脚本_按键精灵吧_百度贴吧
&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&签到排名:今日本吧第个签到,本吧因你更精彩,明天继续来努力!
本吧签到人数:0成为超级会员,使用一键签到本月漏签0次!成为超级会员,赠送8张补签卡连续签到:天&&累计签到:天超级会员单次开通12个月以上,赠送连续签到卡3张
新手求组 高手帮忙做个后台游戏按键脚本收藏
求高手帮忙写个后台脚本 主要操作鼠标移动到824,571(如果可以希望鼠标可以自动寻找上面图片的坐标谢谢)延迟1000毫秒单击鼠标左键一次延迟100毫秒单击鼠标左键一次延迟1000毫秒按住键盘Ctrl 键延迟300毫秒按键(键盘上面横向一排数字) 1延迟1800毫秒按键2延迟1800毫秒按键3 延迟200毫秒弹起Ctrl延迟1800毫秒按下数字2延迟3秒按下数字2延迟3秒按下数字2延迟3秒按下数字2延迟3秒按下数字2延迟3秒按下数字2延迟3秒按下数字3延迟1800毫秒按下数字4延迟1800毫秒按下数字2延迟3秒按下数字2延迟3秒按下数字2延迟3秒按下数字1延迟3秒
最近贝爷又有了新的挑战:生吃楼主这是极具挑战性的!因为,面对整天撸管、全身不知道什么味道的楼主来说,吃下去的每一丝肉都有可能夺取贝爷的生命!但是,贝爷似乎并不害怕,他静静在贴吧首页等待楼主发帖................终于!楼主出现了!贝爷以迅雷不及掩耳之势抓住了楼主,楼主用多年撸管的手也未能推开贝爷。贝爷先吃了胳膊,再吃了头,再剖开内脏,将菊花切掉。饱餐一顿。贝爷就餐完毕后,肚子除了有点拉稀并没有生命危险。
饿 这个是什么。。
登录百度帐号我的游戏推荐游戏
后查看最近玩过的游戏
为兴趣而生,贴吧更懂你。或你的位置:
做了个天下3采集脚本自己用,有几个问题一直无法解决,求高手帮帮忙
来源: 按键精灵资源站
1.求高手帮忙优化下我的脚本,感觉运行起来卡卡的
2。如何判断自动寻路到达目的地,还是卡图了
3.寻到矿后,我是采用鼠标特征码圆形渐开搜矿,搜到矿鼠标停止。天下3矿要成熟后才能才鼠标特征码分为未成熟和成熟两种,但是如果鼠标不动即使矿已成熟,鼠标特征码不会变成成熟的特征码,就不会执行下面程序了,希望各位前辈帮我想想。
3.如果进入战斗状态,要先打掉怪才能采集,这段代码怎么写。
下面是我写的代码
//---------------------------查找窗口-----------------------------------
Hwnd = Plugin.Window.GetKeyFocusWnd()
sRect = Plugin.Window.GetClientRect(Hwnd)
Dim MyArray
MyArray=Split(sRect,&|&)
Ux=CLng(MyArray(0))
Uy = CLng(MyArray(1))
//查找当前窗口
Call Plugin.Window.Move(Hwnd, 0, 0)
//将当前窗口移动到0,0点
//---------------------------寻矿篇-----------------------------------
//按下采矿键1,并打开背包
KeyPress &1&, 3
FindPic 0,0,,&Attachment:\beibao.bmp&,0.6,beibaoX,beibaoY
If beibaoX & 0 And beibaoY & 0 Then
Goto fanhui
KeyPress &B&, 1
Rem fanhui
//-----------------------------------------------------------------
Dim a(4), b(9), c(2),d(9)
a(0) = &Attachment:\jin.bmp&
a(1) = &Attachment:\yin.bmp&
a(2) = &Attachment:\gong.bmp&
a(3) = &Attachment:\tie.bmp&
a(4) = &Attachment:\tong.bmp&
b(0) = &Attachment:\1.bmp&
b(1) = &Attachment:\2.bmp&
b(2) = &Attachment:\3.bmp&
b(3) = &Attachment:\4.bmp&
b(4) = &Attachment:\5.bmp&
b(5) = &Attachment:\6.bmp&
b(6) = &Attachment:\7.bmp&
b(7) = &Attachment:\8.bmp&
b(8) = &Attachment:\9.bmp&
c(0) = &Attachment:\jinzutongjia.bmp&
c(1) = &Attachment:\jinzutongyi.bmp&
d(0) = &Attachment:\ditu1.bmp&
d(1) = &Attachment:\ditu2.bmp&
d(2) = &Attachment:\ditu3.bmp&
d(3) = &Attachment:\ditu4.bmp&
d(4) = &Attachment:\ditu5.bmp&
d(5) = &Attachment:\ditu6.bmp&
d(6) = &Attachment:\ditu7.bmp&
d(7) = &Attachment:\ditu8.bmp&
d(8) = &Attachment:\ditu9.bmp&
Call 查找图片数组()
Sub 查找图片数组()
For i = 0 To 4
FindPic 0,0,,a(i),0.9,intX,intY
If intX & 0 And intY & 0 Then
MoveTo intX, intY
RightClick 1
End If& & & &
Next& & & & & & & &
//------------------------------------------
KeyPress &B&, 1
Delay 3000& & & &
//----------------------------------------------& & & &
//查找感应所指矿的坐标& & & &
For j = 0 To 9
Call 寻找图片阵列(b(j))
//感应所指坐标组
Sub 寻找图片阵列(p)
& & FindPic 0,0,,p,0.9,X,Y
& & If X & 0 And Y & 0 Then
& & MoveTo x+12,y+12
& & Delay 400
& & LeftClick 1
& & Delay 400
& & Call 寻找矿坐标1()
& & End If
Sub 寻找矿坐标1()
FindPic 0,0,,&Attachment:\zuobiao1.bmp&,0.7,intX,intY
If intX & 0 And intY & 0 Then
Goto guanbi
Rem guanbi
FindPic 0, 0, , &Attachment:\guanbi.bmp&, 0.9, intX, intY
If intX & 0 And intY & 0 Then
MoveTo intX, intY
LeftClick 1
//--------------------------------------
//搜索是否有足通
FindPic 0,0,350,350,&Attachment:\zutongbiaozhi.bmp&,0.8,intX,intY
If intX & 0 And intY & 0 Then
Goto xunlu
KeyPress &B&, 1
Call 查找足通()
KeyPress &B&, 1
//-------------------------------------------------------
Sub 查找足通()
For i = 0 To 2
FindPic 0,0,,c(i),0.9,intX,intY
If intX & 0 And intY & 0 Then
MoveTo intX, intY
RightClick 1
End If& & & &
Next& & & & & & & &
//---------------------------------------------------------
KeyPress &M&, 1
FindPic 0,0,,&Attachment:\kuangzuobiao.bmp&,0.9,intX,intY
If intX & 0 And intY & 0 Then
MoveTo intX+5, intY+5
LeftClick 1
KeyPress &Enter&, 1
RightClick 2
//--------------------------------
For l = 0 To 9
Call 寻找地图(d(l))
//-----------------------------------
Sub 寻找地图(p)
& & FindPic 0,0,,p,0.9,X,Y
& & If X & 0 And Y & 0 Then
& & MoveTo x + 12, y + 12
& & Delay 100
& & LeftClick 1
& & Delay 500
& & Call 寻矿()
& & Delay 500
& & RightClick 1
& & End If
//------------------------------------
Sub 寻矿()
FindPic 254,79,,&Attachment:\kuangzuobiao.bmp&,0.3,intX,intY
If intX & 0 And intY & 0 Then
MoveTo intX+5, intY+5
LeftClick 1
KeyPress &Enter&, 1
//--------------------------------------------
KeyPress &M&, 1
Delay 2000
//------------判断自动寻路是否停止-----------
&&Rem 走路
& & c1=GetPixelColor(1198,63)
& & Delay 5000
& & c2=GetPixelColor(1198,63)
& & If c1 = c2 Then
& &&&Goto sssss
& && &&&Delay 200
& && &&&Goto 走路
& & End If
//------水平面扫描鼠标形状---
Rem huaquan
Call 画圈(&650,450&, 1, 10)
Sub 画圈(中心坐标, 半径, 圈数)
& & 横坐标 = Split(Trim(中心坐标), &,&)(0)
& & 纵坐标 = Split(Trim(中心坐标), &,&)(1)
& & 派 = 3.7
& & 角度 = 0 : 种子 = 派 / 180 : 圈数s = 0
& & While 1
& && &&&偏移x = 半径 * Cos(角度 * 种子)
& && &&&偏移y = 半径 * Sin(角度 * 种子)
& && &&&MoveTo 横坐标 + 偏移x, 纵坐标 + 偏移y
& && &&&'此处进行鼠标特征判断
& && &&&var = GetCursorShape(0)
Goto huaquan
& && &&&角度 = 角度 + 5 '单位可以自己改,越小越圆滑
& && &&&If 角度 mod 20 = 0 Then
& && && && &半径 = 半径 + 1
& && && && &If 角度 &= 360 Then
& && && && && & 角度 = 0
& && && && && & 圈数s = 圈数s + 1
& && && && && & If 圈数s = 圈数 Then
& && && && && && &&&Exit Sub
& && && && && & End If
& && && && &End If
& && &&&End If& && && && && && &&&
& && &&&Delay 10 '加大转的慢
shubiao = GetCursorShape(0)
If shubiao =
& & & & RightClick 2
Delay 5000
KeyPress &Enter&, 1
//---------战斗---------
GetColor=GetPixelColor(30,60)
If GetColor = &0000FF& Then
& & & & MessageBox &进入战斗&关于按键精灵,我想做一个能够自动点击网页上”确定“的脚本,求高手!!我刚来百度还没有分数,谢谢了。_百度知道
关于按键精灵,我想做一个能够自动点击网页上”确定“的脚本,求高手!!我刚来百度还没有分数,谢谢了。
提问者采纳
oveto 横坐标,纵坐标leftchink 1
提问者评价
其他类似问题
按键精灵的相关知识
按默认排序
其他1条回答
用网页自动点击监控工具就行了
等待您来回答
下载知道APP
随时随地咨询
出门在外也不愁

我要回帖

更多关于 按键精灵后台脚本 的文章

 

随机推荐