全球微动态丨魔域按键精灵脚本制作流程(魔域按键精灵脚本)
【资料图】
1、没有物品宝宝存仓库,有的可以自己增加一下.VBS dim tp(16),a,x,y,linex,liney,bx,by,s,i,jsqVBS jsjg,jsjiage,jyjg,jyjiage,zdljg,zdljiage,mhjg,mhjiage,hmjg,hmjiageVBS jszjg,jszjiage,jyzjg,jyzjiage,zdlzjg,zdlzjiage,mhzxjg,mhzxjiage,hmzxjg,hmzxjiageVBS lhjg,lhjiage,ojg,ojiage,gxjg,gxjiage,sxjg,sxjiage,fzjg,fzjiageVBS zzjg,zzjiage,cjqsjg,cjqsjiage,zongjiage//声明变量UserVar jsjg=1 减伤害低级的价格UserVar jyjg=1 经验低级的价格UserVar zdljg=5 战斗力低级的价格UserVar mhjg=3 魔魂的价格UserVar hmjg=7 幻魔的价格UserVar jszjg=15 减伤害中级的价格UserVar jyzjg=15 经验中级的价格UserVar zdlzjg=60 战斗力中级的价格UserVar mhzxjg=90 魔魂之心的价格UserVar hmzxjg=120 幻魔之心的价格UserVar lhjg=60 灵魂的价格UserVar ojg=20 O型宝宝的价格UserVar gxjg=6 孤星的价格UserVar sxjg=6 双星的价格UserVar fzjg=15 法猪的价格UserVar zzjg=15 战猪的价格UserVar cjqsjg=7 莎菲的价格VBS tp(0)="1js1":tp(1)="2jyx1":tp(2)="3zdx5":tp(3)="4mh4":tp(4)="5hm8":tp(5)="6jsz15"VBS tp(6)="7jyz15":tp(7)="8zdz60":tp(8)="9mhzx100":tp(9)="10hmzx120":tp(10)="11lh70":tp(11)="12o20"VBS tp(12)="13gx5":tp(13)="14sx5":tp(14)="15fz14":tp(15)="16zz14":tp(16)="17cjqs7"//初始化变量,x是区域左边、y是区域左边、bx是区域下边、by是区域下边,s是图片数量UserVar str1="收裁决骑士莎菲7 双防22 猪18 双孤星8 战斗力+1/5" 请输入自动叫喊的第1句话UserVar str2="人在【一】号摊位旁边卖的速度,不收的东西放上去价格全部不计" 请输入自动叫喊的第2句话UserVar str3="收裁决骑士莎菲7 双防22 猪18 双孤星8 战斗力+1/5" 请输入自动叫喊的第3句话UserVar str4="请速度放上东西,时间不等人,不收的东西放上去价格全部不计" 请输入自动叫喊的第4句话UserVar str5="这是自动喊的第5句话" 请输入自动叫喊的第5句话UserVar Yanshi=5000 两句喊话之间的等待时间,1秒钟是1000//****************设置结束*****************Delay 4000Rem 开始喊话KeyPress 13 1Delay 300SayExpression str1KeyPress 13 1Delay YanshiGosub 检查有没有交易KeyPress 13 1Delay 300SayExpression str2KeyPress 13 1Gosub 检查有没有交易Delay YanshiKeyPress 13 1Delay 300SayExpression str3KeyPress 13 1Gosub 检查有没有交易Delay DaYanshiRem 等待半分钟后,进行下一轮叫卖Goto 开始喊话EndScriptSub 程序开始 Gosub 计算物品数量 Delay 100 Gosub 输入价钱 Delay 100 Gosub 交易等待Return 程序开始Sub 检查有没有交易 VBSCall findpic(0,0,1024,768,"..myphoto商贸.bmp",0.9,x,y) If x>=0 and y>=0 Delay 300 MoveTo 443,446 Delay 500 LeftClick 1 Delay 2000 Gosub 检测放物品 Delay 500 Gosub 程序开始 EndIfEndIfReturn 检查有没有交易Sub 检测放物品 VBS i=0 VBS a = 0 : x = 51 : y = 264 VBS s=0 For 12 Rem 开始检测放物品 If i>=6 Goto 检测放物品结束 EndIf IfColor x,y,80808,2 Delay 2000 VBS i=i+1 Goto 开始检测放物品 Else VBS x=x+34 VBS i=0 VBS a=a+1 If a=5 VBS x = 51 : y = 264+34 EndIf EndIf EndFor Rem 检测放物品结束Return 检测放物品Sub 检测交易有没有被提前结束 IfColor 125,144,896c6,2 IfColor 149,141,896c6,2 Goto 交易没被结束 Else Goto 开始喊话 EndIf Else Goto 开始喊话 EndIf Rem 交易没被结束Return 检测交易有没有被提前结束Sub 计算物品数量 VBS i=0 Gosub 检测交易有没有被提前结束 For 17 VBS a = 0 : x = 34 : y = 247 : bx = 294 : by = 347 VBS s=0 Delay 100 While a = 0 //如果变量a等于0,则循环执行下面命令 Delay 10 VBSCall findpic(x,y,bx,by,"..myphoto"&tp(i)&".bmp",0.9,x,y) //区域找图 If x>=0 and y>=0 //Delay 1000 //MoveTo x,y //Delay 1000 //MoveTo 247,294 //Delay 3000 x = x + 34 : by = y + 34 //区域左边加1。
2、这里的34指的是图片的宽度,自改 s = s + 1 //如果找到图片在数量上加1 Rem line Delay 10 VBSCall findpic(x,y,bx,by,"..myphoto"&tp(i)&".bmp",0.9,linex,liney) //这是是在同一行再查找 If linex>=0 and liney>=0 //Delay 1000 //MoveTo linex,liney //Delay 1000 //MoveTo 247,294 //Delay 3000 x = linex + 34 //区域左边加1 s = s + 1 //数量加1 Goto line //返回同一行再查找 Else //否则 x = 34 : y = y + 34 : by = 347 //左边初始为0,上边加1,初始化区域下边 EndIf Else //如果没有找到图片 a = 1 //变量a为1(退出循环) EndIf EndWhile Gosub 计算价格 // VBSCall messagebox("共找到 " & s & " 个"&"tp("&i&") "&"相同图片" & tp(i) & " ") VBS i=i+1 //弹出结果 EndForReturn 计算物品数量Sub 计算价格 //《计算价格》 If i=0 Rizhi="减伤害低级石头" VBS jsjiage=(jsjg*s) //VBSCall messagebox("合计 " & jsjiage & " MS") ElseIf i=1 Rizhi="经验低级石头" VBS jyjiage=jyjg*s //VBSCall messagebox("合计 " & jyjiage & " MS") ElseIf i=2 Rizhi="战斗力低级石头" VBS zdljiage=zdljg*s //VBSCall messagebox("合计 " & zdljiage & " MS") ElseIf i=3 Rizhi="魔魂" VBS mhjiage=mhjg*s //VBSCall messagebox("合计 " & mhjiage & " MS") ElseIf i=4 Rizhi="幻魔" VBS hmjiage=(hmjg*s) //VBSCall messagebox("合计 " & hmjiage & " MS") ElseIf i=5 Rizhi="减伤害中级石头" VBS jszjiage=jszjg*s ElseIf i=6 Rizhi="经验中级石头" VBS jyzjiage=jyzjg*s ElseIf i=7 Rizhi="战斗力中级石头" VBS zdlzjiage=zdlzjg*s ElseIf i=8 Rizhi="魔魂之心" VBS mhzxjiage=mhzxjg*s ElseIf i=9 Rizhi="幻魔之心" VBS hmzxjiage=hmzxjg*s ElseIf i=10 Rizhi="灵魂" VBS lhjiage=lhjg*s //VBSCall messagebox("合计 " & lhjiage & " MS") ElseIf i=11 Rizhi="O型宝宝" VBS ojiage=ojg*s ElseIf i=12 Rizhi="孤星" VBS gxjiage=gxjg*s ElseIf i=13 Rizhi="双星" VBS sxjiage=sxjg*s ElseIf i=14 Rizhi="法猪" VBS fzjiage=fzjg*s ElseIf i=15 Rizhi="战猪" VBS zzjiage=zzjg*s ElseIf i=16 Rizhi="莎菲" VBS cjqsjiage=cjqsjg*s VBS zongjiage=0 VBS zongjiage=(jsjiage+jyjiage+zdljiage+mhjiage+hmjiage+jszjiage+jyzjiage+zdlzjiage+mhzxjiage+hmzxjiage+lhjiage+ojiage+gxjiage+sxjiage+fzjiage+zzjiage+cjqsjiage) //VBSCall messagebox("合计 " & zongjiage & " MS") Else VBS zongjiage=0 EndIfReturn 计算价格Sub 输入价钱 MoveTo 200,410 Delay 1000 Gosub 检测交易有没有被提前结束 LeftClick 1 Delay 100 Gosub 检测交易有没有被提前结束 LeftClick 1 Delay 1000 SayString zongjiage Delay 1000 Rem 输入ms MoveTo 263,415 Delay 1000 Gosub 检测交易有没有被提前结束 LeftClick 1 Delay 100 Gosub 检测交易有没有被提前结束 LeftClick 1 Delay 500 IfColor 263,415,8ccfde,2 Goto 输入ms Else MoveTo 136,513 Delay 500 Gosub 检测交易有没有被提前结束 LeftClick 1 Delay 300 EndIfReturn 输入价钱Sub 交易等待 jsq=0 Rem 等待交易 If jsq>=20 MoveTo 205,515 Delay 1000 Gosub 检测交易有没有被提前结束 LeftClick 1 Delay 300 Goto 对方不交易 EndIf IfColor 233,494,a5f62,2 Delay 1000 jsq=jsq+1 Goto 等待交易 Else EndIf Rem 对方不交易Return 交易等待好象没有哦。
本文到此分享完毕,希望对大家有所帮助。
图片
精彩推送
- 全球微动态丨魔域按键精灵脚本制作流程(魔域按键精灵脚本)
- 环球今头条!叉烧饭是什么意思(叉烧饭)
- 食物放大器可以放哪些食物?-世界通讯
- 在铁路12306买卧铺票也可以在线选铺位了!手把手教你怎么操作
- 焦点资讯:中邮证券:行情底部区域,市场反攻可期
- 巫师2打不开launcher(巫师2打不开)
- 世界播报:广州退休金与佛山退休金区别大吗?退休待遇怎么样?
- 哪吒4000辆车发运海外,车企谋求“外部突围” 当前滚动
- 精选!乔欣终于不扮乖乖女,一袭黄色高开叉礼服大秀曼妙身材,性感时髦
- 世界观天下!RK3588-UART
- 河南麦收进入尾声 已收获小麦8402万亩-环球关注
- ttl逻辑电平_ttl电平是什么意思
- 全球微资讯!光线传媒王长田:AI有可能让动画电影制作效率提升30%
- 母泰迪多大来大姨妈呢 ?体质不一样时间也不一样,一样的是注意护理
- 一片冰心在玉壶用了什么样的修辞手法(一片冰心在玉壶修辞手法)
- 抢字当头抓好夏收夏种 用心用情保护农民利益|环球新动态
- 5000年前的古蜀人长啥样?一睹真容→_全球今头条
- AI前哨 | GPT-5什么时间上线?OpenAI CEO在中国会议上发言 每日热文
- 第12届金交会开幕,现场签约总金额超3500亿元
- 侯门一入深似海从此萧郎是路人吗_侯门一入深似海从此萧郎是路人-每日快报
- 考后心理波动期来了?几个方法帮考生收心
- 实时:玉溪非遗资源系列微视频展播《玉溪手艺》之传奇鱼笼——大鱼笼编织工艺
- 高质量发展调研行 | 在智慧港口见证大湾区经济活力——广州南沙港走访一线见闻
- 深入推进央地交流合作 共促数字经济创新发展 数字湖南公司正式揭牌成立 省政府与中国电子签署战略合作协议 毛伟明出席-环球新动态
- 光线传媒王长田:AI有可能让动画电影制作效率提升30%_短讯
- 5月新能源车单车销量榜,秦PLUS DM-i和特斯拉model Y分别是冠亚军 世界聚焦
- 地产板块强势反弹 私募大咖林园“笑了” 李蓓却“止损在黎明前”
- 全球看点:美国旧金山毒品泛滥、暴力犯罪猖獗 市民称正在目睹西方文明崩溃
- 关于铁路计次票、定期票 如何购买使用→_今日最新
- 国联证券拟将定增募资额上限从70亿元下调至50亿元
- 四川阿坝州茂县发生3.2级地震
- 专家企业家齐聚哈尔滨 共谋人工智能引领龙江数字经济发展 每日速读
- 【环球新要闻】英大证券一分析师收警示函 相关研报表述不严谨等
- 6万元能办“提前退休”?警惕新型养老诈骗案|时讯
- 粤开证券收警示函 部分研报财务数据预测不严谨
- 热资讯!陕西西安推动“十里沣河”文旅深度融合古老沣河涌动新活力
- 江苏考生最爱报哪个专业?去哪里上学?大数据分析报告来了!
- 6 英尺是多高(6英尺是多长) 天天快资讯
- 硫代硫酸钠化学式的含义(硫代硫酸钠化学式)
- 费祎登仙_费祎 全球报道
- 水润沃野保粮丰——我国夯实夏粮丰收水利根基
- 使用不当或引发肾衰竭!正确使用这类药物请牢记
- 画图照片怎么改大小kb(画图怎么改图片大小kb)
- 【全球时快讯】综合消息:“汉语桥”比赛在多国举行 世界观速讯
- 她被雪藏的原因,国剧今天终于敢播 全球今日报
- 能链智电于翔:为充电站提供光储充一站式解决方案
- 天天消息!扎克伯格批苹果首款MR头显,酸葡萄心理?
- 停车场道闸系统维保方案_停车场道闸系统-聚看点
- 2023高考今日落幕,多地公布志愿填报时间_焦点播报
- 炎帝简介_炎帝 当前快讯
- “高考劣质笔”事件内情|每日资讯
- 当前热门:华为获转让问界商标:可用于汽车等
- 全球热点评!爱旭股份:拟出资24亿元设立山东爱旭
- 220件文物讲述汉字源远流长 成博新展带你走进“汉字中国”丨文化和自然遗产日
- 【环球新要闻】河南省2023年普通高校艺术类专业招生志愿填报问题解答
- 王楠跪在地上指导女儿打球,鼓掌叫好,老公郭斌:这妈能打90分
- 世界播报:今年1至4月西藏涉外收支总额为1.3亿美元
- 世界微资讯!荣盛发展复牌一字涨停 收购新能源前景向好
- 三部门联合部署推进打击整治盗采海砂违法犯罪专项行动
- 5月末我国外汇储备规模为31765亿美元-环球速讯
- 全国超40城调整首套房贷利率下限至4%以下
- 时讯:河南:关于做好2023年军队院校招收普通高中毕业生政治考核工作的通知
- 白俄罗斯总统签署法令 促进中医药生产和使用|环球新消息
- 19款速腾和21款速腾区别(速腾19款和20款有什么区别?) 每日热闻
- 国画四君子是指哪四个字(国画四君子是指哪四个)
- 居理买房暴雷!前员工称“欠薪千万元,丈母娘顶替法人”
- 【世界时快讯】别克新世纪商务车(别克新世纪)
- 75部影片已定档,暑期档票房有望冲击150亿
- 闪耀暖暖踏月而来搭配攻略 踏月而来高分搭配推荐[多图]
- 成功发射一箭26星!带你了解广州南沙航天产业化基地-环球热门
- “带押过户”常态化重在协同-天天看点
- 滚动播报:厦门启动防御暴雨洪水IV级应急响应|当前时讯
- 【环球时快讯】电驱动方案加速轻卡电气化进程
- 全球观焦点:“研学游”需要更好融合“研”与“游”
- 全球速看:宫颈糜烂三度要动手术吗_宫颈糜烂三度一定要手术吗
- 5G商用加速培育新应用场景和商业模式
- 万分号符号怎么输入(万分号符号)
- 焦点速读:员工优秀称号大全(优秀员工称号有哪些)
- 河北着力促进高校毕业生顺利就业
- 夜魔水晶韦鲁斯特效_lol夜魔水晶韦鲁斯多少钱
- 画图照片怎么改大小kb(画图怎么改图片大小kb) 信息
- 0341是哪个城市的区号_034 全球快看
- 焦点速读:中国兵装集团特种装备研究院_中国兵装集团
- 烈火金刚小说朗读(烈火金刚小说) 世界微动态
- 世界微动态丨黑松露菌菇汤_黑松露菌
- 环球要闻:《蜘蛛侠动画版2》幕后:最小的动画师只有14岁
- tunnel和channel的区别_tunnel|全球速讯
- 环球通讯!旱碱麦成“名片”迎来丰收 盐碱地特色农业开出“增收花”
- 冰箱行业市场深度分析及现状分析 环球头条
- 焦点速读:下单成年陪玩,来的却是未成年人 记者调查陪玩行业乱象
- 当前速讯:国际锐评丨剥开美英澳的层层“核谋”
- 2023世界动力电池大会在宜宾开幕
- 皮阿诺:二季度前两个月工程和家装渠道订单不及预期
- 今起12306试行在线选铺服务,买卧铺票可以在线选下铺了!
- 锦龙股份再抛定增计划,公司实控人杨志茂拟以现金全额认购2.64亿股
- 全球焦点!《波斯语课》《1917》后又一部高分战争佳作即将上映
- 今热点:出口“新三样”走俏,中国外贸动能澎湃
- 天天通讯!河南麦收进入尾声 已收获小麦8402万亩
- ps图层叠加原理(ps图层叠加在哪里) 环球快看点
- 剪映怎么缩小视频文件大小 怎么缩小视频文件大小_全球热头条