[教学]QQ天堂岛开箱脚本_修复版本

[教学]QQ天堂岛开箱脚本_修复版本 QQ天堂岛开箱脚本_修复版本 说明:QQ天堂岛开宝箱着实是个头痛的问,因为以前写过批处理和接触过开发软件,所以仔细研究了一下按键精灵. 脚本没有用太多的按键精灵的功能,也有些代码是多余的,目的是让大家看懂脚本运行的思路,方便大家在这个基础上创造更强大的脚本,比如后台脚本,按钮坐标利用取色或者找图功能实现,转换城小精灵可以自由设置播种方向等等.基于按键精灵基础和时间的关系,只能写这么多了.希望大家打造更完善的脚本. 本脚本利用求余数的方法来判断数量的奇偶性,解决了奇数坐标对于数量较多时鼠标偏移差异过大的问题,在1024*768和1366*768分辨率下获得的宝箱大小是50*25,不知道其他分辨率怎么样. 使用方法:打开商城的宝箱页面,先购买宝箱,然后放到要摆放的起始位置,记得是从上到下的哦,鼠标尽量放在宝箱的中间,然后运行就可以了. 编写:闪剑 QQ:2950800 //***************以下是脚本内容************** //闪剑开宝箱专用脚本,测试版本,不断完善中 //为了方便使用加入了将可选择项目在前面自由修改,方便操作,以后会完善的 //如果选择开源一定是免费的,请大家放心使用,也顺便学习一下按键精灵的编程技巧 Call GetCursorPos (mx, my) //获取鼠标坐标 Delay 1500 Const ys = 150 //设置播种延时,单位毫秒 Const number = 13 //设置每行播种数量 Const line = 22 //设置播种行数 Const dds = 22 //设置开宝箱后等待时间,单位秒 Const cishu = 100 //执行次数 Dim cs cs = 0 Rem kaishi Dim dx, dy, cx, cy, ly, geshu, hangshu, dd //定义变量,可以省略 dx = mx dy = my ly = my geshu = 0 hangshu = 0 dd = dds * 1000 //定义变量值 MoveTo 963, 673 //商城按钮坐标位置 Delay 100 LeftClick 1 Delay 1200 MoveTo 442, 595 //宝箱或者动物坐标(注意,只支持打开商城后的当前页面,后期会完善) Delay100 LeftClick 1 Delay 500 Rem fix dx = dx + 25 //向右种为减,向左种为加,左右请保持一致,否则会乱 套 dy = dy - 12 Goto odd Rem odd //奇数个数种植段落 dx = dx - 25 //向右种为加,向左种为减,左右请保持一致,否则会乱 套 dy = dy + 12 MoveTo dx, dy Delay ys LeftClick 1 geshu = geshu + 1 If geshu = number Then Goto huanhang Else Goto even End If Rem even //偶数个数种植段落 dx = dx - 25 //向右种为加,向左种为减,左右请保持一致,否则会乱 套 dy = dy + 13 MoveTo dx, dy Delay ys LeftClick 1 geshu = geshu + 1 If geshu = number Then Goto huanhang Else Goto odd End If Rem huanhang geshu = 0 hangshu = hangshu + 1 If hangshu = line Then Goto kaixiang Else dx = mx + hangshu * 25 //向右种为减,向左种为加 If (hangshu mod 2) = 0 Then ly = ly + 13 Else ly = ly + 12 End If dy = ly Goto fix End If Rem kaixiang MoveTo 698, 663 //一键功能坐标 Delay 500 LeftClick 1 Delay 500 MoveTo 878, 592 //一键开宝箱按钮坐标 Delay 500 LeftClick 1 cs = cs + 1 If cs = cishu Then Goto stop Else Delay dd Goto kaishi End If Rem stop EndScript //***************以上是脚本内容**************