目前只截屏BOSS结算和升天冥，不截屏宝箱开的梦书和幻境。
以下是截升天冥的，存储在c:\photo\天冥\文件夹里。
Dim MyString
Dim MyArray(3)
IfColor 973, 397, "FFFFFF", 0 Then
IfColor 1032,398, "FCFCFC", 0 Then
Delay 1500
MyArray(0) = "c:\photo\天冥\"
MyArray(1) = Year(Date())&Month(Date())&Day(Date())&"-"&Hour(time())&"-"&minute(time())&"-"&second(time())
MyArray(2)=".jpg"
MyString = MyArray(0) & MyArray(1) & MyArray(2)
Call Plugin.Pic.PrintScreen(318, 142, 1641, 894, MyString)
Delay 10000
End If
Else
Delay 1000
End If
以下是截boss结算的，存储在c:\photo\结算\文件夹里
Dim MyString
Dim MyArray(3)
IfColor 800,406,"23FFFF", 0 Then
Delay 1500
MyArray(0) = "c:\photo\结算\"
MyArray(1) = Year(Date())&Month(Date())&Day(Date())&"-"&Hour(time())&"-"&minute(time())&"-"&second(time())
MyArray(2)=".jpg"
MyString = MyArray(0) & MyArray(1) & MyArray(2)
Call Plugin.Pic.PrintScreen(318, 142, 1641, 894, MyString)
Delay 10000
Else
Delay 1000
End If
按照年月日时分秒的方式来命名截图，之后自己打开文件夹整理就行。
PS：如果是录屏的话，记得在结算和天冥的界面需要停留2秒，否则点太快可能会截歪。
两个脚本共用激活和停止快捷键，这样可以同时打开（其实就是相当于双线程，我懒得重新命名变量所以偷懒做成2个脚本）
成品效果如下：
如果需要截取宝箱掉落和幻境的，自己在代码基础上修改就行了。