忘仙480500仙玉等于多少钱588是多少

来源：蜘蛛抓取(WebSpider) 时间：2015-04-08 07:54 标签： 忘记过去就等于背叛
你的位置：
那个大哥帮我看下 忘仙脚本
18:34:19 |
来源: 按键精灵资源站
那个大哥帮我看下 忘仙脚本&&我初学&&就学会了找图 其他的看了还是不会 人笨 哎！
自定义变量 看了N边教程也没看懂
多线程 看了N边教程 也没看懂
问题1: 能帮改下自定义
问题2: 怎么让他一直找某个图（这个游戏一直有邀请窗口跳出 置顶，不点了去，背包技能说明都点不起）
假如：我正在合装备 突然跳出邀请窗口，自动关掉邀请窗口 继续合装备
//////////////////下面脚本//////////////////////////
Hwnd = Plugin.Window.Find(0, &BlueStacks App Player for Windows (beta-1)&)
Call Plugin.Window.Move(Hwnd, 0, 0)
Rem 王城到挂机
Rem 又修又合
Rem 绑银大于400L
//////////修合装备////////////////
& & Call 掉线登录()
& & Delay 1000
& & Call 回城复活()
& & Delay 1000
Call 国王邀请叉()
& & Delay 1000
Call 中间邀请叉()
& & Delay 1000
& & Call 登录奖励叉()
& && &&&Delay 1000
Call 地图识别王城()
Delay 1000
Call 情缘煮酒叉()
Delay 1000
Call 煮酒叉()
Delay 1000
Call 情缘叉()
Delay 1000
Call 背包叉()
Delay 1000
Call 私聊叉()
Delay 1000
Call 开启挂机()
Delay 1000
Call 点头像()
Delay 1000
Call 整理背包()
Delay 1000
Call 合装备()
Delay 1000
& && &&&Next
Call 随身修理()
Delay 1000
Call 打开背包()
Delay 1000
Call 绑银黄()
Delay 1000
Call 背包叉()
Delay 1000
Goto 王城到挂机
///////////下面只合不修装备////////////////
Rem 只合不修装备
Rem 绑银小于400L
Call 掉线登录()
Delay 1000
Call 回城复活()
Delay 1000
Call 国王邀请叉()
& & Delay 1000
Call 中间邀请叉()
&&Delay 1000
& & Call 登录奖励叉()
&&Delay 1000
& & Call 情缘煮酒叉()
Delay 1000
Call 煮酒叉()
Delay 1000
Call 情缘叉()
Delay 1000
Call 背包叉()
Delay 1000
Call 私聊叉()
Delay 1000
Call 开启挂机()
Delay 1000
Call 整理背包()
Delay 1000
Call 合装备()
Delay 1000
Call 打开背包()
Call 绑银红()
Call 绑银白()
Call 背包叉()
Goto 只合不修装备
////////////返回挂机////////////////
Rem 人物在王城
Hwnd = Plugin.Window.Find(0, &BlueStacks App Player for Windows (beta-1)&)
Call Plugin.Window.Move(Hwnd, 0, 0)
& & Delay 1000
Call 回城复活()
Delay 1000
Call 全屏叉()
Call 掉线登录()
Call 国王邀请叉()
Call 中间邀请叉()
Call 情缘煮酒叉()
Call 情缘叉()
Call 煮酒叉()
Call 骑马()
& & Delay 1000
Call 开大地图()
& & Delay 1000
Call 王城找挂机使者()
& & Delay 1000
& & Call 关大地图()
Call 对话挂机传送2()
& &Delay 1000
Call 选五层()
& & Delay 1000
Call 开大地图()
& & Delay 1000
Call 大地图传送选项()
& & Delay 1000
Call 六层()
Delay 35000
Call 开大地图()
& & Delay 1000
Call 大地图传送选项()
& & Delay 1000
Call 七层()
Delay 35000
Call 开大地图()
& & Delay 1000
Call 大地图传送选项()
& & Delay 1000
Call 八层()
Delay 35000
Call 开大地图()
& & Delay 1000
Call 怪物选项()
& & Delay 1000
Call 怪物5()
& & Delay 1000
& &Call 关大地图()
& && & Delay 1000
& &Call 点头像()
& && & Delay 1000
Goto 王城到挂机
/////////////掉线登录脚本///////////////
Rem 掉线重新登录
Call 登录帐号()
Goto 王城到挂机
////////////绑银不够停止运行/////////////////
Rem 绑银小于100L
MessageBox &绑银不够，休息了&
//////////////下一面是子程序/////////////
Sub 国王邀请叉()
FindColorEx 568,52,640,153,&00003E&,0,9,intX,intY
If intX & 0 And intY & 0 Then//国王邀请叉
MoveTo intx,inty
& & Delay 1000
& & LeftClick 1
& & Delay 1000
End If//国王邀请叉
Sub 中间邀请叉()
FindColorEx 205,202,776,366,&,9,intX,intY
If intX & 0 And intY & 0 Then//中间邀请叉
MoveTo intx,inty
& & Delay 1000
& & LeftClick 1
& & Delay 1000
End If//中间邀请叉
Sub 全屏叉()
FindColorEx 0,0,788,363,&,9,intX,intY
If intX & 0 And intY & 0 Then//全屏叉
MoveTo intx,inty
& & Delay 1000
& & LeftClick 1
& & Delay 1000
End If//全屏叉
Sub 情缘煮酒叉()
FindColorEx 428,221,498,277,&,0.9,intX,intY
If intX & 0 And intY & 0 Then
& & Delay 1000
MoveTo intx,inty
& & Delay 1000
& & LeftClick 1
End If//情缘煮酒叉
Sub 情缘叉()
FindColorEx 428,221,498,277,&,0.9,intX,intY
If intX & 0 And intY & 0 Then
& & Delay 1000
MoveTo intx,inty
& & Delay 1000
& & LeftClick 1
End If//情缘叉
Sub 煮酒叉()
FindColorEx 428,221,498,277,&,0.9,intX,intY
If intX & 0 And intY & 0 Then
& & Delay 1000
MoveTo intx,inty
& & Delay 1000
& & LeftClick 1
End If//煮酒叉
Sub 骑马()
FindPic 724,425,799,4988,&Attachment:\设置.bmp&,0.9,intX,intY
If intX & 0 And intY & 0 Then
MoveTo 44, 40//设置
Delay 1000
LeftClick 1//设置
Delay 1000
FindColorEx 707,353,796,491,&32C5C4&,0,0.9,intX,intY
If intX & 0 And intY & 0 Then
MoveTo 762,419//骑马
Delay 2000
LeftClick 1//骑马
Sub 开启挂机()
MoveTo 599, 46//移动到挂机选项
Delay 1000
LeftClick 1//点击打开挂机
Delay 4000
FindCenterColor 62,145,91,175,&FFFFFF&,intX,intY
If intX & 0 And intY & 0 Then//查看是否勾上打怪，是跳转，否勾选
& & Delay 1000
& && &&&Goto 打怪
& && &&&Delay 1000
& & MoveTo 80, 157
& & Delay 1000
& & LeftClick 1
& & Delay 1000
& & Rem 打怪
& & Delay 2000
FindPic 0,0,,&Attachment:\开启挂机.bmp&,0.9,intX,intY
If intX & 0 And intY & 0 Then
& & Delay 1000
MoveTo intx,inty
& & Delay 1000
& & LeftClick 1
& & Delay 2000
MoveTo 599, 46//移动到挂机选项
Delay 2000
LeftClick 1//关闭挂机窗口
Sub 掉线登录()
FindPic 0,0,504,308,&Attachment:\掉线.bmp&,0.9,intX,intY
If intX & 0 And intY & 0 Then
& & Delay 1000
& & MoveTo 409, 281
& && &&&MoveTo 409,281
& & Delay 1000
& & LeftClick 2
& & Goto 掉线重新登录
Sub 原地复活()
FindPic 0,0,,&Attachment:\原地复活.bmp&,0.9,intX,intY
If intX & 0 And intY & 0 Then
MoveTo intx,inty
& & Delay 180000
& & LeftClick 2
& && &Delay 1000
End If//原地复活
Sub 登录奖励叉()
FindColorEx 681,92,720,125,&,9,intX,intY
If intX & 0 And intY & 0 Then//登录奖励叉
MoveTo intx,inty
& & Delay 1000
& & LeftClick 1
& & Delay 1000
End If//登录奖励叉
Sub 背包叉()
FindColorEx 356,26,392,49,&,9,intX,intY
If intX & 0 And intY & 0 Then//背包叉
MoveTo intx,inty
& & Delay 1000
& & LeftClick 1
& & Delay 1000
End If//背包叉
Sub 私聊叉()
FindColorEx 302,245,346,280,&,9,intX,intY
If intX & 0 And intY & 0 Then//私聊叉
MoveTo intx,inty
& & Delay 1000
& & LeftClick 1
& & Delay 1000
End If//私聊叉
Sub 对话车夫()
Rem 找车夫
FindPic 565,226,641,448,&Attachment:\车.bmp&,0.9,intX,intY
If intX & 0 And intY & 0 Then
Delay 1000
& & MoveTo intx,inty
& & Delay 1000
& & LeftClick 1
& & Delay 10000
& & Goto 找车夫
End If//对话车夫
Sub 开大地图()
MoveTo 775,98//移动到大地图
Delay 2000
LeftClick 1//点击大地图
Delay 6000
Sub 关大地图()
MoveTo 775,98//移动到大地图
Delay 2000
LeftClick 1//点击大地图
Delay 3000
Sub 选五层()
Rem 找五层
FindPic 0,0,173,258,&Attachment:\五层选项.bmp&,0.9,intX,intY
If intX & 0 And intY & 0 Then
Delay 1000
& & MoveTo intx,inty
& & Delay 1000
& & LeftClick 1
& & Delay 10000
& & Goto 找五层
End If//选五层
Sub 大地图传送选项()
Rem 大地图传送
FindPic 0,0,,&Attachment:\传送.bmp&,0.9,intX,intY
If intX & 0 And intY & 0 Then
Delay 1000
& & MoveTo intx,inty
& & Delay 1000
& & LeftClick 1
& & Goto 大地图传送
Sub 三层()
Rem 找三层
FindPic 0,0,,&Attachment:\三.bmp&,0.9,intX,intY
If intX & 0 And intY & 0 Then
Delay 1000
& & MoveTo intx,inty
& & Delay 1000
& & LeftClick 1
& & Goto 找三层
Sub 二层()
Rem 找二层
FindPic 0,0,,&Attachment:\二.bmp&,0.9,intX,intY
If intX & 0 And intY & 0 Then
Delay 1000
& & MoveTo intx,inty
& & Delay 1000
& & LeftClick 1
& & Goto 找二层
Sub 六层()
FindPic 0,0,,&Attachment:\六.bmp&,0.9,intX,intY
If intX & 0 And intY & 0 Then
Delay 1000
& & MoveTo intx,inty
& & Delay 1000
& & LeftClick 1
& & Goto 找6层
Sub 七层()
FindPic 0,0,,&Attachment:\七.bmp&,0.9,intX,intY
If intX & 0 And intY & 0 Then
Delay 1000
& & MoveTo intx,inty
& & Delay 1000
& & LeftClick 1
& & Goto 找7层
Sub 八层()
FindPic 0,0,,&Attachment:\八.bmp&,0.9,intX,intY
If intX & 0 And intY & 0 Then
Delay 1000
& & MoveTo intx,inty
& & Delay 1000
& & LeftClick 1
& & Goto 找8层
Sub 随身修理()
MoveTo 111, 480//移动到打开背包
Delay 2000
LeftClick 1//打开背包
Delay 3000
MoveTo 315, 414//移动的随身商店
Delay 1000
LeftClick 1//点击随身商店
Delay 3000
MoveTo 455, 421//移动到修理
Delay 3000
LeftClick 1//点击修理
Delay 1000
LeftClick 1//点击修理
Delay 3000
MoveTo 355, 185//移动到修理确定
Delay 2000
LeftClick 1//点击修理确定
Delay 1000
LeftClick 1//点击修理确定
Delay 2000
FindColorEx 356,26,392,49,&,9,intX,intY
If intX & 0 And intY & 0 Then//背包叉
MoveTo intx,inty
& & Delay 1000
& & LeftClick 1
& & Delay 1000
End If//背包叉
Sub 合装备()
Delay 2000
MoveTo 482, 478//移动到宝鼎处
Delay 2000
LeftClick 1//点击宝鼎
Delay 5000
& & MoveTo 691,305//移动到物品处1
Delay 2000
LeftDoubleClick 1//点击放入物品
Delay 2000
MoveTo 313, 311//移动到自动放入
Delay 2000
LeftClick 2//点击自动放入
Delay 2000
MoveTo 320, 416//移动到合成装备
Delay 2000
LeftClick 1//点击合成装备
Delay 2000
& & MoveTo 464,302&&//移动到物品处2
Delay 2000
LeftDoubleClick 1//点击放入物品
Delay 2000
MoveTo 313, 311//移动到自动放入
Delay 2000
LeftClick 2//点击自动放入
Delay 2000
MoveTo 320, 416//移动到合成装备
Delay 2000
LeftClick 1//点击合成装备
Delay 2000
& & MoveTo 695,242//移动到物品处3
Delay 2000
LeftDoubleClick 1//点击放入物品
Delay 2000
MoveTo 313, 311//移动到自动放入
Delay 2000
LeftClick 2//点击自动放入
Delay 2000
MoveTo 320, 416//移动到合成装备
Delay 2000
LeftClick 1//点击合成装备
Delay 2000
& & MoveTo 468,242//移动到物品处4
Delay 2000
LeftDoubleClick 1//点击放入物品
Delay 2000
MoveTo 313, 311//移动到自动放入
Delay 2000
LeftClick 2//点击自动放入
Delay 2000
MoveTo 320, 416//移动到合成装备
Delay 2000
LeftClick 1//点击合成装备
Delay 2000
& & MoveTo 470,189//移动到物品处5
Delay 2000
LeftDoubleClick 1//点击放入物品
Delay 2000
MoveTo 313, 311//移动到自动放入
Delay 2000
LeftClick 2//点击自动放入
Delay 2000
MoveTo 320, 416//移动到合成装备
Delay 2000
LeftClick 1//点击合成装备
Delay 2000
MoveTo 482, 478//移动到宝鼎处
Delay 2000
LeftClick 1//关闭宝鼎
Delay 2000
Sub 整理背包()
MoveTo 111, 480//移动到打开背包
Delay 2000
LeftClick 1//点击打开背包
Delay 2000
MoveTo 48, 414 //移动到整理背包
Delay 1000
LeftClick 3//整理背包
Delay 2000
MoveTo 111, 480//移动到打开背包
Delay 2000
LeftClick 1//点击关闭背包
Sub 打开背包()
MoveTo 111, 480//移动到打开背包
Delay 2000
LeftClick 1//点击打开背包
Delay 2000
Sub 打开背包2()
MoveTo 111, 480//移动到打开背包
Delay 2000
LeftClick 1//点击打开背包
Delay 2000
MoveTo 140,64//背包2
Delay 2000
LeftClick 1//点击打开背包2
Delay 2000
Sub 关闭背包()
FindColorEx 356,26,392,49,&,9,intX,intY
If intX & 0 And intY & 0 Then//背包叉
MoveTo intx,inty
& & Delay 1000
& & LeftClick 1
& & Delay 1000
End If//背包叉
Sub 绑银白()
FindColorEx 168,375,168,375,&FFFFFF&,0,0.9,intX,intY
If intX & 0 And intY & 0 Then//银子大于400L
Goto 绑银大于400L
End If//绑银大于400L（白）
Sub 绑银黄()
FindColorEx 167,374,167,374,&00FFFF&,0,0.9,intX,intY
If intX & 0 And intY & 0 Then//银子低于400L
Goto 绑银小于400L
End If//绑银低于400L（黄）
Sub 绑银红()
FindColorEx 168,375,168,375,&,0.9,intX,intY
If intX & 0 And intY & 0 Then//银子低于100L
Goto 绑银小于100L
End If//绑银低于100L（红）
Sub 使用回城卷()
FindPic 0,0,,&Attachment:\回城卷.bmp&,0.9,intX,intY
If intX & 0 And intY & 0 Then
Delay 1000
MoveTo intx, inty
Delay 1000
LeftDoubleClick 1
Delay 1000
MoveTo 140,64//背包2
Delay 2000
LeftClick 1//点击打开背包2
Delay 1000
Call 使用回城卷()
Delay 15000
Sub 随机移动()
MoveTo 121, 414
Delay 1000
LeftDown 1
Delay 1000
MoveTo 58, 433
Delay 4000
Delay 1000
Sub 煮酒NPC()
FindPic 0,0,799,498,&Attachment:\煮酒.bmp&,0.9,intX,intY
If intX & 0 And intY & 0 Then
& & Delay 1000
MoveTo intx,inty
& & Delay 1000
LeftClick 1
Sub 随身商店()
MoveTo 315, 414//移动的随身商店
Delay 1000
LeftClick 1//点击随身商店
Delay 4000
Sub 买王城回城卷()
Rem 在买回城卷
MoveTo 600,291//随身商店中
Delay 1000
MouseWheel - 10
Delay 2000
FindPic 0,0,,&Attachment:\王城传送卷.bmp&,0.9,intX,intY
If intX & 0 And intY & 0 Then
Delay 2000
MoveTo intx + 117, inty + 64
Delay 2000
LeftClick 1
Delay 2000
Goto 在买回城卷
MoveTo 506, 377
Delay 2000
LeftClick 1
Sub 地图识别王城()
FindPic 720,25,743,47,&Attachment:\王.bmp&,0.9,intX,intY
If intX & 0 And intY & 0 Then
& & Goto 人物在王城
End If//人物在王城
Sub 回城复活()
FindPic 0,0,799,498,&Attachment:\回城复活.bmp&,0.9,intX,intY
If intX & 0 And intY & 0 Then
& & Delay 1000
MoveTo intx,inty
& & Delay 1000
LeftClick 2
& & Delay 15000
Sub 怪物5()
& &&&Rem 找怪物5
FindPic 0,0,,&Attachment:\怪5.bmp&,0.9,intX,intY
If intX & 0 And intY & 0 Then
Delay 1000
& & MoveTo intx,inty
& & Delay 1000
& & LeftClick 1
& & Goto 找怪物5
& & End If
Sub 怪物1()
& &&&Rem 找怪物1
FindPic 0,0,,&Attachment:\怪1.bmp&,0.9,intX,intY
If intX & 0 And intY & 0 Then
Delay 1000
& & MoveTo intx,inty
& & Delay 1000
& & LeftClick 1
& & Goto 找怪物1
& & End If
Sub 登录帐号()
Hwnd = Plugin.Window.Find(0, &BlueStacks App Player for Windows (beta-1)&)
Call Plugin.Window.Move(Hwnd, 0, 0)
Delay 15000
& & Rem 登录失败
FindPic 0,0,,&Attachment:\登录.bmp&,0.9,intX,intY
If intX & 0 And intY & 0 Then
&&Delay 1000
& & MoveTo 401,432
& & MoveTo 401,432
& & Delay 1000
& & LeftClick 1
& & LeftClick 1
Delay 15000
FindPic 0,0,,&Attachment:\进入.bmp&,0.9,intX,intY
If intX & 0 And intY & 0 Then
&&Delay 1000
& & MoveTo 743,459
& & MoveTo 743,459
& & Delay 1000
& & LeftClick 1
& & LeftClick 1
Delay 15000
FindPic 0,0,,&Attachment:\进入.bmp&,0.9,intX,intY
If intX & 0 And intY & 0 Then
& & Delay 1000
& & MoveTo 743,459
& & MoveTo 743,459
& & Delay 1000
& & LeftClick 1
& & LeftClick 1
& & Delay 15000
FindColorEx 587,33,616,61,&36A2F4&,0,0.9,intX,intY
If intX & 0 And intY & 0 Then
Goto 登录失败
&&Delay 1000
Call 点头像()
&&Delay 1000
Sub 怪物选项()
Rem 找怪物选项2
FindPic 0,0,,&Attachment:\怪物.bmp&,0.9,intX,intY
If intX & 0 And intY & 0 Then
Delay 1000
& & MoveTo intx,inty
& & Delay 1000
& & LeftClick 1
& & Goto 找怪物选项2
& & End If
Sub 挂机使者()
& & MoveTo 171,93
& & Delay 1000
& && &&&LeftClick 1//点击挂机使者
Delay 3000
Sub 点头像()
FindPic 724,425,799,4988,&Attachment:\设置.bmp&,0.9,intX,intY
If intX & 0 And intY & 0 Then
MoveTo 44, 40//设置
Delay 1000
LeftClick 1//设置
Delay 1000
Sub 四层()
Rem 找四层
FindPic 0,0,,&Attachment:\四.bmp&,0.9,intX,intY
If intX & 0 And intY & 0 Then
Delay 1000
& & MoveTo intx,inty
& & Delay 1000
& & LeftClick 1
& & Goto 找四层
Sub 王城修理()
Rem 跑路点1修理
FindPic 0,0,,&Attachment:\跑路点1修理.bmp&,0.9,intX,intY
If intX & 0 And intY & 0 Then
MoveTo intx,inty
& && &&&Delay 1000
& && &&&LeftClick 1
& && &&&Else
Goto 跑路点1修理
Call 关大地图()
Delay 1000
Rem 找技能商人
FindPic 0,0,,&Attachment:\技能商人.bmp&,0.9,intX,intY
If intX & 0 And intY & 0 Then
& && &&&Delay 1000
MoveTo intx,inty
& && &&&Delay 1000
& && &&&LeftClick 1
& && &&&Else
Goto 找技能商人
Delay 2000
& && && && && & Rem 打开商店
FindCenterColor 29,163,FFFF&,intX,intY
If intX & 0 And intY & 0 Then
& && &&&Delay 1000
MoveTo intx,inty
& && &&&Delay 1000
& && &&&LeftClick 1
& && &&&Else
Goto 打开商店
Delay 2000
& && && && && & Rem 找锤子
FindCenterColor 0,0,,&B29E8B&,intX,intY
If intX & 0 And intY & 0 Then
& && &&&Delay 1000
MoveTo intx,inty
& && &&&Delay 1000
& && &&&LeftClick 2
& && &&&Else
Goto 找锤子
Delay 2000
FindCenterColor 326,175,383,196,&FFFFFF&,intX,intY
If intX & 0 And intY & 0 Then
& && &&&Delay 1000
MoveTo intx,inty
& && &&&Delay 1000
& && &&&LeftClick 2
Delay 2000
& && && && && & Rem 找修理叉
FindCenterColor 0,0,0190&,intX,intY
If intX & 0 And intY & 0 Then
& && &&&Delay 1000
MoveTo intx,inty
& && &&&Delay 1000
& && &&&LeftClick 1
& && &&&Else
Goto 找修理叉
Sub 王城找挂机使者()
Rem 找挂机使者2
FindPic 0,0,800,500,&Attachment:\挂机使者点1.bmp&,0.9,intX,intY
If intX & 0 And intY & 0 Then
Delay 1000
& & MoveTo intx,inty
& & Delay 1000
& & LeftClick 1
& & Delay 1000
Goto 找挂机使者2
End If//跑路点1挂机
Sub 对话挂机传送2()
Delay 5000
MoveTo 469, 435
Delay 1000
LeftClick 1
////////////////////////////////喜欢忘仙北冥佛光银锭的还喜欢
价格: 1.00
价格: 1.00
价格: 1.00
价格: 1.00
价格: 1.00
价格: 495.00
价格: 100.00
价格: 1.00
价格: 1.00
价格: 1.00
价格: 1.00
价格: 100.00
价格: 6.00
价格: 1.00
价格: 1.00
价格: 1.00
价格: 1.00
价格: 1.00
价格: 100.00
价格: 520.00
价格: 1.00
价格: 1.00
价格: 1.00
价格: 1.00
价格: 1.00
价格: 1.00
价格: 8.00
价格: 1.00
价格: 1.00
价格: 1.00
价格: 1.00
价格: 1.00
价格: 100.00
价格: 1.00
价格: 1.00
价格: 1.00
价格: 100.00
价格: 1.00
价格: 1.00
价格: 1.00
价格: 1.00
价格: 100.00
价格: 1.00
价格: 55.00
价格: 498.00
Copyright ? xiawu.com, All Rights Reserved. 鄂ICP备

我要回帖

更多关于 忘记过去就等于背叛 的文章

 

随机推荐