传奇灵魂出窍脚本

注意：脚本来自互联网，需要的自己拿去测试参考

[@CollectMon99]
#IF
CO.CHECKHPPER > 0
#ACT
MOV S$开馆MAP <$map>
MOV N$开馆X坐标 <$ATTACKMONSTER_XEX>
MOV N$开馆Y坐标 <$ATTACKMONSTER_YEX>
SHOWPROGRESSBARDLG 5 @怪物采集成功 开启石棺[%d%] 1 @怪物采集中断

[@召唤怪物]
#IF
#ACT
MONGENEX <$CONST(<$STR(S$开馆MAP)>)> <$STR(N$开馆X坐标)> <$STR(N$开馆Y坐标)> 飞燕族首领 0 1

[@清除怪物]
#IF
#ACT
KillMapMon <$CONST(<$STR(S$开馆MAP)>)> <$STR(N$开馆X坐标)> <$STR(N$开馆Y坐标)> 5 * 1 0

[@怪物采集成功]
#IF
CO.CHECKHPPER > 0
#ACT
DELAYGOTO 9200 @清除怪物
CO.KILL
MAPEFFECT <$CONST(<$STR(S$开馆MAP)>)> <$STR(N$开馆X坐标)> <$STR(N$开馆Y坐标)> 28 0 155 1 200 0 0
DELAYGOTO 31000 @召唤怪物
GOTOLABEL 7 @强制中断采集 3
#ELSEACT
MESSAGEBOX 别人已经捷足先登了

[@怪物采集中断]
#ACT
Sendmsg 5 开馆中断

[@强制中断采集]
#IF
CO.CHECKHPPER = 0
#ACT
StopCollect
BREAK