曾经和朋友一起玩的一个只能氪金变强的游戏，随着iOS10系越狱全部发出，开始写了一些脚本，花了一晚上写了一个自动点角色箱碎片的脚本可以帮忙点掉1000多个碎片箱（脚本已完成730碎片箱子并指定碎片种类的测试）。目前主要精力还是在写这个游戏另一个完整版，很全面的脚本。
已知/潜在问题
- 仅限iPhone SE或同分辨率机型
- 若需要其它分辨率需要修改代码或者修改静态数据
- UI界面不方便
- 若箱子小于100可能会计算出错，需要加一个if判断
- 子程序调用会出错所以实际代码中直接复制了子程序代码（反正不长）
UI界面代码：
界面1:
{
配置内容:
{
文字框:
{
注释:"提示1",
名称:"提示1",
显示内容:"请输入碎片箱子在第几列",
文字大小:0,
高度:0,
宽度:0
},
输入框:
{
注释:"碎片箱子第几列",
名称:"suipian_lie",
提示内容:"碎片箱子第几列",
初始文本:"1",
仅输入数字:true,
文字大小:0,
最大输入长度:5000,
高度:0,
宽度:0
},
文字框:
{
注释:"提示2",
名称:"提示2",
显示内容:"请输入碎片箱子在第几行",
文字大小:0,
高度:0,
宽度:0
},
输入框:
{
注释:"碎片箱子第几行",
名称:"suipian_hang",
提示内容:"碎片箱子第几行",
初始文本:"1",
仅输入数字:true,
文字大小:0,
最大输入长度:5000,
高度:0,
宽度:0
},
文字框:
{
注释:"问题1",
名称:"问题2",
显示内容:"碎片箱子数量",
文字大小:0,
高度:0,
宽度:0
},
输入框:
{
注释:"问题1",
名称:"suipian_number",
提示内容:"碎片箱子数量",
初始文本:"100",
仅输入数字:true,
文字大小:0,
最大输入长度:5000,
高度:0,
宽度:0
},
文字框:
{
注释:"提示3",
名称:"提示3",
显示内容:"今天是否有公会战",
文字大小:0,
高度:0,
宽度:0
},
下拉框:
{
注释:"公会战",
名称:"gonghui_battle",
点击响应:"gonghui_battle",
选项:
[
"是",
"否",
],
初始选项:0
},
文字框:
{
注释:"碎片种类",
名称:"碎片种类",
显示内容:"输入阿拉伯数字 需要红几 比如需要红2 则输入2",
文字大小:0,
高度:0,
宽度:0
},
输入框:
{
注释:"red_number",
名称:"red_number_input",
提示内容:"输入阿拉伯数字 需要红几",
初始文本:"2",
仅输入数字:true,
文字大小:0,
最大输入长度:1,
高度:0,
宽度:0
},
},
}脚本代码
//作者：天雨
//网站：https://irain.in
//author: Tianyu
//web: https://irain.in
//主程序数据准备
// 初始化变量
Dim suipian_hang, suipian_lie, suipian_number, gonghui_battle_boolean, suipian_class
//读取数据
suipian_hang = ReadUIConfig("suipian_hang")
suipian_lie = ReadUIConfig("suipian_lie")
suipian_number = ReadUIConfig("suipian_number")
gonghui_battle_boolean = ReadUIConfig("gonghui_battle")
suipian_class = ReadUIConfig("red_number_input")
//静态数据
Dim onetime_open, shiyongX, shiyongY, red1X, red1Y, red2X, red2Y, red3X,red3Y, quedingX, quedingY, fanhuiX, fanhuiY, battle_annX, battle_annY, annX, annY
shiyongX = 113
shiyongY = 835
red1X = 345
red1Y = 424
red2X = 345
red2Y = 558
red3X = 338
red3Y = 687
quedingX = 164
quedingY = 561
fanhuiX = 200
fanhuiY = 570
battle_annX = 580
battle_annY = 976
annX = 609
annY = 929
onetime_open = 100
//列数据
Dim lie1, lie2, lie3, lie4
lie1 = 345
lie2 = 430
lie3 = 510
lie4 = 614
//行数据
Dim hang1, hang2, hang3, hang4, hang5
hang1 = 503
hang2 = 407
hang3 = 323
hang4 = 233
hang5 = 153
//计算重启次数（必须100次以上）
Dim count100number, last_count
last_count = suipian_number Mod onetime_open
count100number = (suipian_number - last_count) / onetime_open
//主程序核心数据
Dim suipianX, suipianY, boxX, boxY
If suipian_class = "1" Then
suipianX = red1X
suipianY = red2Y
ElseIf suipian_class = "2" Then
suipianX = red2X
suipianY = red2Y
Else
suipianX = red3X
suipianY = red3Y
End If
If suipian_hang = "1" Then
boxY = lie1
ElseIf suipian_hang = "2" Then
boxY = lie2
ElseIf suipian_hang = "3" Then
boxY = lie3
Else
boxY = hang4
End If
If suipian_lie = "1" Then
boxX = hang1
ElseIf suipian_lie = "2" Then
boxX = hang2
ElseIf suipian_lie = "3" Then
boxX = hang3
ElseIf suipian_lie = "4" Then
boxX = hang4
Else
boxX = hang5
End If
//主程序
ShowMessage "你的碎片箱位于第"&suipian_hang&"行", 2000
Delay 3000
ShowMessage "你的碎片箱位于第"&suipian_lie&"列", 2000
Delay 3000
ShowMessage "你的碎片箱数量为"&suipian_number, 2000
Delay 3000
ShowMessage "你选择的碎片种类为红"&suipian_class, 2000
Delay 3000
ShowMessage "碎片箱X轴位置为"&boxX, 2000
Delay 3000
ShowMessage "碎片箱Y轴位置为"&boxY, 2000
Delay 3000
KeyPress "Home"
KeyPress "Home"
Touch 168, 416, 5000
Swipe 168, 416, 578, 410
Delay 2000
KeyPress "Home"
KeyPress "Home"
Delay 1000
Tap 242, 832
Delay 10000
Tap 85, 560
Delay 20000
Tap 580, 976
Delay 2000
Tap 580, 976
Delay 5000
Tap 609, 929
Delay 1000
Tap 55, 835
Delay 3000
For count100number
For onetime_open
Tap boxX, boxY
Delay 1000
Tap shiyongX, shiyongY
Delay 1500
Tap suipianX, suipianY
Delay 1000
Tap quedingX, quedingY
Delay 1000
Tap fanhuiX, fanhuiY
Next
KeyPress "Home"
KeyPress "Home"
Touch 168, 416, 5000
Swipe 168, 416, 578, 410
Delay 2000
KeyPress "Home"
KeyPress "Home"
Delay 1000
Tap 242, 832
Delay 10000
Tap 85, 560
Delay 20000
Tap 580, 976
Delay 2000
Tap 580, 976
Delay 5000
Tap 609, 929
Delay 1000
Tap 55, 835
Next
For last_count
Tap boxX, boxY
Delay 1000
Tap shiyongX, shiyongY
Delay 1500
Tap suipianX, suipianY
Delay 1000
Tap quedingX, quedingY
Delay 1000
Tap fanhuiX, fanhuiY
Next
/子程序：重启游戏
Sub RestartGame
KeyPress "Home"
KeyPress "Home"
Touch 168, 416, 5000
Swipe 168, 416, 578, 410
Delay 2000
KeyPress "Home"
KeyPress "Home"
Delay 1000
Tap 242, 832
Delay 10000
Tap 85, 560
Delay 20000
Tap 580, 976
Delay 2000
Tap 580, 976
Delay 5000
Tap 609, 929
Delay 1000
Tap 55, 835
End Sub
转载请标注来源
