RE: 求解~!古仙域挂机脚本本可以自动寻怪但不打怪?

我们不是古域外挂- 古域辅助脚本免费下载网- 打怪|刷昆仑探秘|挂机...
我们不是古域外挂声明:
最专业的辅助非古域外挂网!本站拥有着极其丰富的古域辅助脚本游戏资料免费下载。最新的古域挂机脚本信息,经验心得,我们不是古域ol外挂请放心下载,更有最新古域劲爆视频,快速寻怪打怪,自动刷昆仑探秘,古域刷钱挂机,客户端下载等资料。希望新老玩家前来免费使用本站所提供的古域辅助纯绿色软件,所有脚本不是外挂让您用得更放心!
古域辅助脚本周点击排行:
简单游最新脚本推荐
简单游不是外挂 热门游戏辅助脚本推荐
最新古域辅助脚本免费下载- 简单游推荐脚本列表
功能简介:古域脚本使用说明,完美答题,自动寻找怪物进行攻击,支持两大模式打怪!模式一:任务杀怪辅助,自动寻找指定任务怪||模式二:自由寻怪,可自定义自由寻怪的范围设置。||自动封灵灵兽,自动练卦,自动恢复,自动拾取,自动攻击|新增功能:自动刷昆仑探秘!速度就是金钱,昆仑探险活动全天24小时开放,大量金装成品、经验!
功能简介:古域定点挂机脚本实现1、自动定点找怪;
2、自动打怪并捡东西;
3、自动补血补蓝;
4、自动给宝宝补血补蓝;
5、打坐回血;永久免费,能高效杀怪喝药,支持0x600两种分辨率下面杀怪!
功能简介:实现后台自动喊话,可以用于商业宣传等!任意窗口大小,任意窗口位置,随意设置喊话内容、喊话时间间隔及喊话模式等,免去玩家频繁手动发送广告或者摊位信息的麻烦,是长久广告或者摆摊的好助手。你的位置:
古域简单辅助脚本,免费使用,自动补红蓝,抓宝,卖东西,完善中!
11:10:44 |
来源: 按键精灵资源站
本帖最后由 zouyuquan 于
11:15 编辑
简单辅助脚本,完善中!免费使用,欢迎共同探讨!QQ:449582275
  1、请在系统设置中设置使用窗口模式、分辨率800*600、颜色32Bit,并确认勾选全部拾取。
  3、选择怪物比较集中的地点挂机。 
  2、购买好瞬红、瞬蓝及宝宝瞬红后,请先召唤宝宝、在任务面板关闭任务追踪、跑到挂机点开始挂机!
  3、出现验证和包满,报警后请手动干预!
  4、参考设置:数字1键[第一攻击技能]、数字2键[第二攻击技能]、数字3键[抓宝宝技能]、数字4键[第一辅助技能]、数字5键[第二辅助技能]、数字6键[瞬红药]、数字7键[瞬蓝药]、数字8键[宝宝瞬红药]
  其他功能,正在研究解决中!
& & 自动执行的按键小精灵超过附件大小来,传不上来,如果有人感兴趣,请和我联系!我可以发给你用
Dim t1,t2,t3
t1 = now : t2 = now : t3 = now
Dim Gx, Gy, GGx, GGy
UserVar Bao=6 &包裹行数&
UserVar atime1=600 &辅助技能一释放间隔&
UserVar atime2=600 &辅助技能二释放间隔&
UserVar atime3=300 &返回挂机点时间&
UserVar KeyHp=DropList{&关闭&:0|&1&:49|&2&:50|&3&:51|&4&:52|&5&:53|&6&:54|&7&:55|&8&:56|&9&:57}=0 &人物加血按键&
UserVar KeyMp=DropList{&关闭&:0|&1&:49|&2&:50|&3&:51|&4&:52|&5&:53|&6&:54|&7&:55|&8&:56|&9&:57}=0 &人物加蓝按键&
UserVar KeyBhp=DropList{&关闭&:0|&1&:49|&2&:50|&3&:51|&4&:52|&5&:53|&6&:54|&7&:55|&8&:56|&9&:57}=0 &宠物加血按键&
UserVar AssistSkill1=DropList{&关闭&:0|&1&:49|&2&:50|&3&:51|&4&:52|&5&:53|&6&:54|&7&:55|&8&:56|&9&:57}=0 &辅助技能一&
UserVar AssistSkill2=DropList{&关闭&:0|&1&:49|&2&:50|&3&:51|&4&:52|&5&:53|&6&:54|&7&:55|&8&:56|&9&:57}=0 &辅助技能二&
UserVar Skill1=DropList{&关闭&:0|&1&:49|&2&:50|&3&:51|&4&:52|&5&:53|&6&:54|&7&:55|&8&:56|&9&:57}=0 &技能一&
UserVar Skill2=DropList{&关闭&:0|&1&:49|&2&:50|&3&:51|&4&:52|&5&:53|&6&:54|&7&:55|&8&:56|&9&:57}=0 &技能二&
UserVar Skill3=DropList{&关闭&:0|&1&:49|&2&:50|&3&:51|&4&:52|&5&:53|&6&:54|&7&:55|&8&:56|&9&:57}=0 &技能三&
UserVar SkillDelayTime1=2000 &第一技能延迟时间&
UserVar SkillDelayTime2=2000 &第二技能延迟时间&
UserVar SkillDelayTime3=2000 &第二技能延迟时间&
UserVar CatchPet=DropList{&关闭&:0|&1&:49|&2&:50|&3&:51|&4&:52|&5&:53|&6&:54|&7&:55|&8&:56|&9&:57}=0 &捕捉技能&
PutAttachment&\Script&,&&
//获取窗口句柄
Hwnd = Plugin.Window.MousePoint()
//以下四条是获取窗口Hwnd的初始坐标(0,0)对应的实际坐标(Ux,Uy)。之后的调用如在窗口内坐标是(x,y),实际坐标就应该是(x+Ux,y+Uy)
Rect = Plugin.Window.GetClientRect(Hwnd)
MyArray=Split(Rect,&|&)
Ux=CLng(MyArray(0))
Uy = CLng(MyArray(1))
xxts = &初始化中..点击左键记录挂机点&
Call 写信息()
Call 记录挂机点()
Call 视觉和聊天调整()
KeyPress AssistSkill1, 1
Delay 1500
KeyPress AssistSkill2, 1
Call 辅助技能设置()
Call 返回挂机点()
Call 人加血蓝()
Call 宠加血蓝()
Call 包裹满()
Call 寻怪()
Call wai挂检测()
Rem 继续打怪
Call 是否有怪()
Sub 寻怪()
& & IfColor Ux+387,Uy+11,&FFFFFF&,1
& &&&KeyPress 192,1& &
& &&&Delay 200& &&&
& & End If& &
Sub 是否有怪()& &
& & IfColor Ux+387,Uy+11,&FFFFFF&,2
& && &&&Call 打怪()
& && &&&goto 继续打怪& && && &
& & Else& &
& && &&&Goto 开始
& & End If& && &
Sub wai挂检测()& &
& & Call FindPic(Ux+0,Uy+0,Ux+798,Uy+598,&Attachment:\WaiGuaFire.bmp&,0.6,intX,intY)
&&If intX&0 and intY&0&&
& &xxts =&报警中,请注意!!&
& && &Call 写信息& &&&
& && &Call 报警& && &
End If& && &&&
Sub 打怪()
&&Call 捕捉()
& && &&&KeyPress Skill1, 1
& && &&&Delay 2200& && &&&
& && &&&KeyPress Skill2, 1
& && &&&Delay 50
& && &&&KeyPress Skill3, 1
& && &&&Delay 50& && &&&
& && &&&Call FindPic(Ux+0,Uy+0,Ux+798,Uy+598,&Attachment:\WuXiao.bmp&,1,intX,intY)
&&If intX&0 and intY&0&&
& &KeyPress 192,1& &
& && &Delay 200& && &
&&Call 拾取()& && &
Sub 拾取()& &
Call FindPic(Ux+0,Uy+0,Ux+800,Uy+600,&Attachment:\BaoGuo1.bmp&,0.6,intX,intY)
If intX&0 and intY&0&&
xxts =&在坐标& & CLng(intX)&&:&& CLng(intY) & &拾取包裹&
& & Call 写信息
MoveTo intX,intY //976:227
w=intX+30:z=intY+25
Call 修正偏移()
& && && && &Delay 300
& && && && &LeftClick 1
& && && && &Delay 500& && && && &
& & Call FindPic(Ux+0,Uy+0,Ux+800,Uy+600,&Attachment:\b1.bmp&,0.6,intX,intY)
If intX&0 and intY&0&&
xxts =&在坐标& & CLng(intX)&&:&& CLng(intY) & &拾取包裹&
& & Call 写信息
MoveTo intX,intY //976:227
w=intX+30:z=intY+25
Call 修正偏移()
& && && && &Delay 300
& && && && &LeftClick 1
& && && && &Delay 500& && && && &
Call FindPic(Ux+0,Uy+0,Ux+800,Uy+600,&Attachment:\XiangZi.bmp&,0.6,intX,intY)
If intX&0 and intY&0&&
xxts =&在坐标& & CLng(intX)&&:&& CLng(intY) & &拾取宝箱&
& & Call 写信息
MoveTo intX,intY //976:227
w=intX+30:z=intY+25
Call 修正偏移()
& && && && &Delay 300
& && && && &LeftClick 1
& && && && &Delay 500& && && &&&
Sub 包裹满()& &
Call FindPic(Ux+0,Uy+0,Ux+800,Uy+600,&Attachment:\BaoGuoMan.bmp&,0.8,intX,intY)
If intX&0 and intY&0&&
&&xxts =&包裹满了,开始找店卖东西&
& &&&Call 写信息()
&&Call 卖东西()
Sub 卖东西()
Rem 继续找&&
w = Ux+743 : z = Uy+175
Call 修正偏移()&&
& & Delay 200
& & LeftClick 1
& & Delay 1000& && && && &&&
& & Call FindPic(Ux + 0, Uy + 0, Ux + 698, Uy +598, &Attachment:\YaoDian.bmp&,1, intX, intY)
& & If intX & 0 and intY & 0 Then
& && &w=intX+30:z=intY+25
& && && &Call 修正偏移()
& && && &Delay 500& && &&&
& && && &LeftClick 1
& && && &xxts =&自动寻路,跑向要店&
& && &Call 写信息()
& && &//找商店点击
& && &Rem go1
& && && &Call FindPic(Ux + 0, Uy + 0, Ux + 800, Uy + 600, &Attachment:\OpenShop.bmp&, 1, intX, intY)
& && && &If intX & 0 and intY & 0 Then
& && && && &w=intX+30:z=intY+25
& &Call 修正偏移()&&
& && && &&&Delay 200
& && && &&&LeftClick 1
& && && &Else
& && && && &Goto go1
& && && &End If
& && && & //定位背包第一格位置
& && &Rem go2
& && &//先找到包裹为参照,还要考虑鼠标漂移
& && && &Call FindPic(Ux + 0, Uy + 0, Ux + 800, Uy + 600, &Attachment:\BeiBao.bmp&, 0.8, intX, intY)
& && && &If intX & 0 and intY & 0 Then
& && && && &w=intX+30-110:z=intY+25+50
& &Call 修正偏移()&&
& && && &&&Delay 200
& && && &&&Call GetCursorPos(GGx, GGy)
& && && && &w=GGx&&
& && && &&&z=GGy
& && && &&&For Bao&&
& && && && &&&For 8& && && && && &
& && && && && &&&Call FindPic(Ux + 0, Uy + 0, Ux + 800, Uy + 600, &Attachment:\CiBi.bmp&, 1, intX, intY)
& && && &&&If intX & 0 and intY & 0 Then
& && && && &&&Delay 1000
& && && && &&&RightClick 1& && && &&&
& && && &&&End If
& && && &&&Call FindPic(Ux + 0, Uy + 0, Ux + 800, Uy + 600, &Attachment:\ShiCai.bmp&, 1, intX, intY)
& && && &&&If intX & 0 and intY & 0 Then
& && && && &&&Delay 1000
& && && && &&&RightClick 1& && && &&&
& && && &&&End If
& && && &&&Call FindPic(Ux + 0, Uy + 0, Ux + 800, Uy + 600, &Attachment:\NaiJiuDu.bmp&, 1, intX, intY)
& && && &&&If intX & 0 and intY & 0 Then
& && && && &&&Delay 1000
& && && && &&&RightClick 1
& && && && &&&Delay 500& && &
& && && &&&End If& && && && && && && && && &
& && && && && & Call 修正偏移()
& && && && && & w=w+40&&
& && && && && & Delay 500&&
& && && && &&&Next
& && && && && & z = z + 40
& && && && && & w=GGx
& && && &&&Next
& && && &&&//卖完东西
& && && &&&//Call 买东西()
& && && &&&//Call 修理装备()
& && && &&&//撤销返回挂机点
& && && &&&Delay 500
& && && &&&KeyPress 27, 1
& && && &&&Delay 200
& && && &&&KeyPress 27, 1
& && && &&&Delay 200
& && && &&&Delay 200
& && && &&&KeyPress 27, 1
& && && &&&Delay 200
& && && &&&Call 直接返回挂机点()
& && && &&&Goto 开始&&
& && && &&&'MessageBox (&卖东西结束&)
& && && &&&
& && && &Else
& && && && &Goto go2
& && && &End If
& && && &&&
& && && && & ' Call 报警
& && && && & ' MessageBox (&卖东西开始&)
& && && && &
& && &Else
& && && &Goto 继续找
& && &End If
Sub 捕捉()
Rem 继续捕捉& &
Call FindPic(Ux+0,Uy+0,Ux+800,Uy+600,&Attachment:\baobao.bmp&,0.8,intX,intY)
//Call GetCursorPos(qx,qy)
//MessageBox (intX & &*& & intY & &:& & qx & &*& & qy)
If intX&0 and intY&0&&
&&xxts =&在& & CLng(intX)&&:&& CLng(intY) & &捕捉宝宝&
& && &Call 写信息
&&KeyPress CatchPet,1& &
& &&&Delay 4000
& &&&Goto 继续捕捉
& &&&Goto 结束捕捉
Rem 结束捕捉
Sub 人加血蓝()& &
& & //加血& &
& &//hh=split(cstr(hong),&,&)& &
& &//IfColor clng(hh(0)), clng(hh(1)), hhh, 1 Then
& & IfColor Ux+143,41+Uy,&0000CC&,1
& && && &KeyPress KeyHp,1& &
& & End If& &
& & //加蓝& &
& & //ll=split(cstr(lan),&,&)& &
& &// IfColor clng(ll(0)),clng(ll(1)),lll,1&&
& & IfColor Ux+113,49+Uy,&D25700&,1
& && &&&KeyPress KeyMp,1& &
& & End If
& & End Sub
Sub 宠加血蓝()& &
& & //bbh=split(cstr(bhong),&,&)& &
& &// IfColor clng(bbh(0)),clng(bbh(1)),bh,1
& && &IfColor Ux+126,85+Uy,&0000DA&,1
& && &&&KeyPress KeyBhp,1& &
& & End If& &
Sub 写信息()
GyWindows=Plugin.Window.GetWindowRect(Hwnd)
Gyzb=split(GyWindows,&|&)
GyWx1=Clng(Gyzb(0)):GyWy1=Clng(Gyzb(1)):GyWx2=Clng(Gyzb(2)):GyWy2=Clng(Gyzb(3))
Call Plugin.Msg.ShowScrTXT(GyWx1+240,GyWy1+8,GyWx1+590,GyWy1+25,xxts,&0000FF&)
Sub 视觉和聊天调整()& &
& &//MoveTo Ux + 213, Uy + 533
& &w = Ux + 213 : z = Uy + 528
& &Call 修正偏移()
& & Delay 1000& &
& & LeftClick 1& &
& & Delay 200& &
& & KeyPress 78,1& &
& & Delay 500
Sub 座标防飘()
& & dim n,h //定义变量
& & n=1 //n的作用是当误差小于多少时就算是到目标点了 ,这里选择的是1 你也可以写成2 数字越大误差越大!
& & zx=w //w和z的作用是 把要去的目标点的横坐标和纵坐标的值带如防飘子程序
& & If zx&Ux or zx&Ux+800 //限制鼠标,不要移动到窗口外,意思是当鼠标要去的位置小于50或大于540 就现在鼠标的移动
& && &&&If zx&Ux //如果小于50就让鼠标的横坐标加40 这样鼠标就不会从左边飞出去了
& && && && &zzx=zx+20
& && &&&End If
& && &&&If zx&Ux+800 //如果大于540 就让鼠标横坐标减去40 这样鼠标就不会从右边飞出去了
& && && && &zzx=zx-20
& && &&&End If
& && &&&zzx=zx //如果不小于50也不大于540 就是说鼠标要去的地方不是在窗口边缘的位置,也就不会飞出去 所以不需要限制!
& & End If
& & If zy&Uy or zy&Uy+600 //纵坐标同理可证
& && &&&If zy&Uy
& && && && &zzy=zy+20
& && &&&End If
& && &&&If zy&Uy+600
& && && && &zzy=zy-20
& && &&&End If
& && &&&zzy=zy
& & End If
& & MoveTo zzx,zzy //这个时候移动的鼠标就是经过限制的鼠标了 一般情况下是飞不出去的,
& & Delay 10 //移动后 要加些延时,最少不要小于100
& & Rem py //做一个标记py,留在后面反复判断误差的时候用
& & //Call FindPic(0,0,650,500,&Attachment:\鼠标.bmp&,0.7,x1,y1) //找鼠标图片得到鼠标的位置
& & Call GetCursorPos(Gx, Gy)& &
& & If Gx&=0 and Gy&=0
& && &&&a=zx-Gx // 计算横坐标误差
& && &&&b=zy-Gy //计算纵坐标误差& &
& && &&&If Abs(a) & 2 and Abs(b) & 2 Then
& && && &Goto EndFind
& && &&&End If
& && &&&mz=1 //如果出现意外情况 鼠标飘出去了 就靠这个mz 变量让他回来
& && &&&MoveTo zzx,zzy //如果没找到鼠标的图片 这从新移动经过限制的坐标!
& && &&&Delay 100
& & End If
& & If h=20 //意思就是如果循环六次都没找到鼠标,鼠标有可能飘出去了
& && &&&MoveTo Ux+400,Uy+300 //这个时候把鼠标从新 移动的300,300的位置
& && &&&Delay 500
& && &&&h=0
& && &&&Goto py
& & End If
& & If mz=1 //如果没找到鼠标
& && &&&h=h+1 //配合mz使用
& && &&&Goto py
& && &&&If Abs(a)&n or Abs(b)&n //根据计算出的误差值,做相对移动
& && && && &MoveR a,b //a,b里面保存的就是误差值
& && && && &Delay 100& && && && &
& && && && &h=h+1
& && && && &Goto py
& && &&&End If
& & End If
& & Rem EndFind //漂移不大,直接调整退出
Sub 找图防飘()
& & dim n,h //定义变量
& & n=1 //n的作用是当误差小于多少时就算是到目标点了 ,这里选择的是1 你也可以写成2 数字越大误差越大!
& & zx=w //w和z的作用是 把要去的目标点的横坐标和纵坐标的值带如防飘子程序
& & If zx&Ux or zx&Ux+800 //限制鼠标,不要移动到窗口外,意思是当鼠标要去的位置小于50或大于540 就现在鼠标的移动
& && &&&If zx&Ux //如果小于50就让鼠标的横坐标加40 这样鼠标就不会从左边飞出去了
& && && && &zzx=zx+20
& && &&&End If
& && &&&If zx&Ux+800 //如果大于540 就让鼠标横坐标减去40 这样鼠标就不会从右边飞出去了
& && && && &zzx=zx-20
& && &&&End If
& && &&&zzx=zx //如果不小于50也不大于540 就是说鼠标要去的地方不是在窗口边缘的位置,也就不会飞出去 所以不需要限制!
& & End If
& & If zy&Uy or zy&Uy+600 //纵坐标同理可证
& && &&&If zy&Uy
& && && && &zzy=zy+20
& && &&&End If
& && &&&If zy&Uy+600
& && && && &zzy=zy-20
& && &&&End If
& && &&&zzy=zy
& & End If
& & MoveTo zzx,zzy //这个时候移动的鼠标就是经过限制的鼠标了 一般情况下是飞不出去的,
& & Delay 100 //移动后 要加些延时,最少不要小于100
& & Rem py //做一个标记py,留在后面反复判断误差的时候用
& & //Call FindPic(0,0,650,500,&Attachment:\鼠标.bmp&,0.7,x1,y1) //找鼠标图片得到鼠标的位置
& & Call GetCursorPos(Gx,Gy)
& & If Gx&=0 and Gy&=0
& && &&&a=zx-Gx+20 // 计算横坐标误差
& && &&&b=zy-Gy+20 //计算纵坐标误差
& && &&&If Abs(a) & 3 and Abs(b) & 3 Then
& && && &Goto EndFind
& && &&&End If
& && &&&mz=1 //如果出现意外情况 鼠标飘出去了 就靠这个mz 变量让他回来
& && &&&MoveTo zzx,zzy //如果没找到鼠标的图片 这从新移动经过限制的坐标!
& && &&&Delay 100
& & End If
& & If h=10 //意思就是如果循环六次都没找到鼠标,鼠标有可能飘出去了
& && &&&MoveTo Ux+400,Uy+300 //这个时候把鼠标从新 移动的300,300的位置
& && &&&Delay 500
& && &&&h=0
& && &&&Goto py
& & End If
& & If mz=1 //如果没找到鼠标
& && &&&h=h+1 //配合mz使用
& && &&&Goto py
& && &&&If Abs(a)&n or Abs(b)&n //根据计算出的误差值,做相对移动
& && && && &MoveR a,b //a,b里面保存的就是误差值
& && && && &Delay 100
& && && && &h=h+1
& && && && &Goto py
& && &&&End If
& & End If
& & Rem EndFind //6次没找到,不找了,推出
Sub 修正()& &
& & //w=w+2
& & //2是左边框的宽度
& &// z=z+30
& & //30是标题框的宽度
& & MoveTo w,z
& & SaveMousePos
& & Rem second& &
& & Call GetCursorPos(cx,cy)
& & If cy&=29 or cx&=2 or cx&800 or cy&600
& && &&&RestoreMousePos
& & End If
& & If abs(cx-w)&3 and abs(cy-z)&3
& && &&&Goto complete
& & End If
& & If cx-w &1 and cy-z&1
& && &&&MoveR - 1 , - 1
& && &&&End If
& & If cx-w&1 and cy-z&1
& && &&&MoveR 1, 1
& && &&&End if
& & If cx-w&1
& && && && &MoveR - 1 , 0
& && && && &End If
& && && && &
& & If cx-w&1
& && && && &MoveR 1, 0
& && && && &End If
& && && && &
& &&&If cy-z&1
& && && && &MoveR 0, - 1
& && && && &End If
& && && && &
& & If cy-z&1
& && && && &MoveR 0, 1& && && && &
& && && && &End if
& & Goto second
& & Rem complete
Sub 修正偏移()
& & MoveTo mx,my
& & Rem 继续移动
& & Delay 100
& & //查找当前游戏里的鼠标位置(查找范围请根据游戏窗口大小设定)
& & //FindPic 0,0,,&shu.bmp&,0.8,bitx,bity
& & //计算鼠标当前坐标和目的地坐标距离
& & Call GetCursorPos(bitx, bity)& &
& & If abs(bitx-mx)&3 and abs(bity-my)&3 Then
& && &&&Goto 到达目的地
& & End If& &
& & //相对一点一点移动鼠标
& & If bitx-mx&1 Then
& && &&&If bity-my&1 Then
& && && && &MoveR -1,-1
& && && && &Goto 继续移动
& && &&&End If
& & End If
& & If bitx-mx&1 Then
& && &&&If bity-my&1 Then
& && && && &MoveR 1,1
& && && && &Goto 继续移动
& && &&&End If
& & End If&&
& & If bitx-mx&1 Then
& && &&&MoveR -1,0& && && &
& && &&&If bitx-mx&1 Then
& && && && &MoveR 1,0& && && &
& && &&&Else
& && && && &If bity-my&1 Then
& && && && && & MoveR 0,-1& && && &
& && && && &Else
& && && && && & If bity-my&1 Then
& && && && && && &&&MoveR 0,1
& && && && && & Else
& && && && && && &&&Goto 到达目的地& && && && &
& && && && && & End If& && && &
& && && && &End If& && && &
& && &&&End If& && && &
& & End If
& & Goto 继续移动
& & //到达目的地结束
& & Rem 到达目的地
Sub 记录挂机点()
xxts=&保存挂机地点&
Call 写信息
KeyPress 9,1
WaitClick&&
Call GetCursorPos(Gx,Gy)
KeyPress 9,1
Sub 返回挂机点()
If DateDiff(&s&,t3,now)&=atime3 Then
xxts=&返回挂机地点&
Call 写信息
KeyPress 9, 1
MoveTo Gx, Gy
LeftClick 1
Delay 15000
KeyPress 9, 1
Sub 直接返回挂机点()
xxts=&直接返回挂机地点&
Call 写信息
KeyPress 9, 1
MoveTo Gx, Gy
LeftClick 1
Delay 15000
KeyPress 9, 1
Sub 辅助技能设置()
If DateDiff(&s&,t1,now)&=atime1 Then
xxts=& 使用辅助技能&
Gosub 写信息
KeyPress&&AssistSkill1,1
If DateDiff(&s&,t2,now)&=atime2 Then
xxts=& 使用辅助技能&
Gosub 写信息
KeyPress&&AssistSkill2,1
& && &&&VBS strSoundFile = &C:\WINDOWS\Media\Windows XP 启动.wav&
& && &&&VBS Set objShell = CreateObject(&Wscript.Shell&)
& && &&&VBS strCommand = &sndrec32 /play /close & & chr(34) & strSoundFile & chr(34)
& && &&&VBS objShell.Run strCommand, 0, True
& && &&&Delay 1000收藏的论坛
古域严惩非法辅助软件及外挂公告
  亲爱的玩家,大家好!  自《古域》开放性内测以来,在所有热爱古域的玩家大力支持下,《古域》不断茁壮成长,在线人数也屡创新高。我们的每一步脚印,每一次进步都离不开所有热心玩家的关怀与支持。  然而近期,我们发现有部分玩家通过使用非法辅助软件及外挂恶意破坏正常玩家的绿色游戏环境,给所有喜爱古域的玩家造成了极大的伤害,并带来了极恶劣的影响,我们将对这些影响游戏平衡,破坏游戏绿色环境的帐号进行永久封停处理。  [4月1日]古域打击并封停使用非法外挂的帐号12996个。  我们对外挂的打击没有停止,还在继续,每一次打击的结果,我们都将公告广大玩家,您的支持是我们打击外挂的永恒动力!  官方在此郑重声明:《古域》一直以来坚决打击游戏外挂的信念从来没有动摇过,我们将始终以保障正常玩家的切身利益为己任,对于使用游戏外挂的行为将绝不纵容!  如何提高帐号的安全等级?  固定宽带绑IP,安全级别最高级;及时绑定密保卡,常在网吧必备它!  密保卡周周换,打印留底防截屏;安全动态常关注,帐号安全有保障!  虚假网站要远离,查杀木马不偷懒;天掉馅饼要小心,中奖查询上官网!  免费绑定IP 免费绑定密保卡  搜狐畅游《古域》运营团队  
近期游戏热闻
你对该游戏感兴趣吗?谁有古域免费的辅助挂机软件._百度知道求 古域 免费的 挂机 脚本 要无毒的 。。谢谢了 给分。。。_百度知道}

我要回帖

更多关于 仙域挂机脚本 的文章

更多推荐

版权声明:文章内容来源于网络,版权归原作者所有,如有侵权请点击这里与我们联系,我们将及时删除。

点击添加站长微信