神锻全自动：夹层与熔炼的框架思路
神锻全自动：夹层、熔炉的框架思路
夹层：
Function 夹层()
Dim 夹层坐标()
Dim 洞={“夹层的颜色字符串"}//洞就是夹层
If 层数 > 5 and zm.FindMultiColor(找到夹层) Then //这里我加多了一个判断，要层数大于5才生效，因为前面盔甲能量可能会不够。
穿盔甲
Tap 夹层坐标["x"], 夹层坐标["y"]
确定
进图检测2 //这个程序是用来判断是否进图成功的
Do
if zm.FindMultiColor (夹层怪)then//
灵魂冲击 //如果存在怪，调用灵魂技能
For 4
zm.FindMultiColor (157,447,470,719,"024D88-050505","1|23|2A6AA4-050505,7|21|6B6968-050505,8|19|4D5051-050505,-12|21|1C9AC4-050505","014A81-050505","5|0|3B8BD0-050505,-7|-1|43C2D9-050505,27|-4|706E6D-050505,43|-5|696867-050505",true,"+0,-0,200",500)//找怪特征，点怪，循环4次，因为能量冲击的回合数是4
Next
Delay 500
Else
Delay 500
Exit Do
End If
Loop
ShowMessage "夹层清理完成"
End Function
------------------------
Sub 熔炉()//不需要用返回值的话，SUB和FUNCTION效果是一样的
Dim 熔炉坐标(),颜色数量,装备坐标()
Dim 加号={熔炼界面加装备的记号}
If zm.FindMultiColor(熔炉存在) Then
zm.FindMultiColor (打开背包)
装备部件(x1,y1,x2,y2,"特征字符串")//这是一个子程序，x1,y1,x2,y2的参数对应要检测的范围，比如要查看手部，那这个值就是手位置的范围坐标，特征为需要查找的装备特征。
装备部件逻辑为：检查设定范围内，是否存预设装备的特征，如果符合结束条件，否则查找背包范围内是否有符合条件装备。
例：
装备部件(442,518,519,603,"FCEF5F-020202","-36|32|46E8FF-020202,-25|33|40E4FE-020202,-12|32|37B6EF-020202,24|31|3CD2FB-020202")//竖琴
//装备检查完后，点击熔炉
Tap 熔炉坐标["x"], 熔炉坐标["y"]
Do //开始循环
Tap 460, 560//熔炼坐标
Delay 500
zm.FindMultiColor (“星星特征”)//选择可熔装备特征
颜色数量 = GetColorNum(装备坐标["x"] - 50, 装备坐标["y"] - 85, 装备坐标["x"] + 30, 装备坐标["y"], "465A65-020202", 0.95)
If 装备坐标["x"]>0 and 1200<颜色数量<4000 Then
Tap 装备坐标["x"], 装备坐标["y"]-20
确定
for 5
If zm.FindMultiColor (加号)Then//这个是加号代表的是，选择数量为最大时的加号特征
Exit For
Else
Tap 551, 678
Delay 20
End If
Next
确定
Else
zm.FindMultiColor 返回按钮
zm.FindMultiColor 返回按钮
ShowMessage "熔炉完成"
Exit Do
End If
Loop
刻印 //刻印用到的逻辑与装配装备一致，都是传参，判断指定区域是否有符合刻印，如为空则进入下级界面选择对应刻印。
Delay 500
清理背包 //熔炼结束后，把书和结晶嗑完，结束整个熔炉流程
End If
End Sub
