[@Main]
#IF
#ACT
Mov S$精炼按钮 <最先精炼>
Mov S$精炼主料 暂未提交A
Mov S$精炼副01 暂未提交B
Mov S$精炼副02 暂未提交C
Mov S$精炼幸运 暂未提交D
Mov N$精炼几率 0
CloseBigDialogBox
#SAY
\
<$USERNAME><:你好！请选择你需要的服务/AUTOCOLOR=250>\ \
\ \
<查看精炼说明/@说明>\ \
<我要精炼装备/@精炼> <我要培育装备/@培育>\
<游戏忠言:/AUTOCOLOR=249><切勿妄想小廉价和信托所谓的客服.骗子无处不在/AUTOCOLOR=250>\
<游戏忠言:/AUTOCOLOR=249><关系到你的利益和款项时刻请多长个心眼认准官方唯一充值/AUTOCOLOR=146>\
[@说明]
#IF
#ACT
CloseBigDialogBox
#SAY
<><由于本服装备超级好打,制止装备虚耗,独创/FCOLOR=70><免费精炼/FCOLOR=250><功效!/FCOLOR=70>\
<本服祖玛系列以上装备均可精炼,精炼可增添响应小极品属性!>\
<通俗装备/FCOLOR=250>精炼后物品名后附加<（卓越）/FCOLOR=254> <乐成几率60%/FCOLOR=242> <对应属性+1/FCOLOR=94>\
<卓越装备/FCOLOR=254>精炼后物品名后附加<（传说）/FCOLOR=70> <乐成几率40%/FCOLOR=242> <对应属性+1/FCOLOR=94>\
<传说装备/FCOLOR=70>精炼后物品名后附加<（完善）/FCOLOR=253> <乐成几率20%/FCOLOR=242> <对应属性+2/FCOLOR=94>\
<精炼乐成消耗辅助质料和幸运物品,失败则消耗所有质料!>\
<例如:>精炼<圣战戒指/FCOLOR=250>,<乐成/FCOLOR=253>则变为<圣战戒指（卓越）/FCOLOR=254>,物品其他属性\
稳固（含小极品属性）,仅<攻击属性/FCOLOR=154>提升1点. <返回主页/@Main>\
[@精炼]
#IF
#ACT
CloseBigDialogBox
#SAY
<以下为必须放置项目：/FCOLOR=70> <←精炼物品/FCOLOR=254>\
<当前精炼:/FCOLOR=146>{<$STR（S$精炼主料）>/FCOLOR=250}\
<①号辅料:/FCOLOR=146>{<$STR（S$精炼副01）>/FCOLOR=250}\
<②号辅料:/FCOLOR=146>{<$STR（S$精炼副02）>/FCOLOR=250}\
<√以下为提升几率项目：/FCOLOR=21> <←辅料→/FCOLOR=250>\
<幸运质料:/FCOLOR=253>{<$STR（S$精炼幸运）>/FCOLOR=146}\
<乐成几率:/FCOLOR=253>{<$STR（N$精炼几率）>%/FCOLOR=146}\
<幸运指环可提升10%几率!> <幸运质料→/FCOLOR=253> <$STR（S$精炼按钮）>\
<ITEMBOX:2:6:513:207:-155:76:76:*:250#请放入需要精炼的装备^250#点击最先按钮最先精炼>\
<ITEMBOX:3:6:513:153:-120:76:76:*:250#请放入需要精炼的质料^249#提醒（必须物品）>\
<ITEMBOX:4:6:513:262:-137:76:76:*:250#请放入需要精炼的质料^249#提醒（必须物品）>\
<ITEMBOX:5:6:513:208:-105:76:76:*:253#可放入提升几率的辅料^249#提醒（非必须物品）>\
[@ItemIntoBox2]
#IF
CheckTextList ..\QuestDiary\功效剧本\精炼系统\允许精炼装备.txt <$BOXITEM[2].NAME>
#ACT
Mov S$精炼主料 <$BOXITEM[2].NAME_G>
Sendmsg 7 当前放入物品可精炼.请继续放入其他质料。<$BOXITEM[2].NAME_G>
GOTO @精炼
#ELSEACT
ReturnBoxItem 2
Mov S$精炼主料 暂未提交A
MESSAGEBOX 你提交的物品不相符义务需求!
Break
[@ItemOutBox2]
#IF
#ACT
ReturnBoxItem 3
ReturnBoxItem 4
ReturnBoxItem 5
Mov S$精炼按钮 <最先精炼>
Mov S$精炼主料 暂未提交A
Mov S$精炼副01 暂未提交B
Mov S$精炼副02 暂未提交C
Mov S$精炼幸运 暂未提交D
Mov N$精炼几率 0
GOTO @精炼
Break
[@ItemIntoBox3]
#IF
Equal <$BOXITEM[3].NAME_G> <$STR（S$精炼主料）>
#ACT
Sendmsg 7 您当前要精炼的物品为:<$STR（S$精炼主料）>
MOV S$精炼副01 <$BOXITEM[3].NAME_G>
GOTO @精炼
goto @检测按钮可用
#ELSEACT
ReturnBoxItem 3
Mov S$精炼副01 暂未提交B
MESSAGEBOX 你提交的物品不相符义务需求!
Break
[@ItemOutBox3]
#IF
#ACT
Mov S$精炼按钮 <最先精炼>
Mov S$精炼副01 暂未提交B
Mov N$精炼几率 0
ReturnBoxItem 5
GOTO @精炼
Break
[@ItemIntoBox4]
#IF
Equal <$BOXITEM[4].NAME_G> <$STR（S$精炼主料）>
#ACT
Sendmsg 7 您当前要精炼的物品为:<$STR（S$精炼主料）>
MOV S$精炼副02 <$BOXITEM[4].NAME_G>
GOTO @精炼
goto @检测按钮可用
#ELSEACT
ReturnBoxItem 4
Mov S$精炼副02 暂未提交C
MESSAGEBOX 你提交的物品不相符义务需求!
Break
[@ItemOutBox4]
#IF
#ACT
Mov S$精炼按钮 <最先精炼>
Mov S$精炼副02 暂未提交C
Mov N$精炼几率 0
ReturnBoxItem 5
GOTO @精炼
Break
[@ItemIntoBox5]
#IF
Equal <$BOXITEM[5].NAME> 封印之刃
Equal S$精炼按钮 <最先精炼/@最先精炼>
#ACT
Mov S$精炼幸运 <$BOXITEM[5].NAME>
Sendmsg 7 您提交了幸运物品:<$BOXITEM[5].NAME>,可提升精炼乐成率20%.
GOTO @精炼
goto @检测按钮可用
#ELSEACT
ReturnBoxItem 5
Mov S$精炼幸运 暂未提交D
MESSAGEBOX 请先确定需要精炼物品!相符要求后方可提交幸运质料.
Break
[@ItemOutBox5]
#IF
#ACT
Mov S$精炼幸运 暂未提交D
GOTO @检测按钮可用
Break
[@检测按钮可用]
#IF
#ACT
Mov N$精炼几率 60
#IF
CheckContainsText <$STR（S$精炼主料）> （卓越）
#ACT
Mov N$精炼几率 40
#IF
CheckContainsText <$STR（S$精炼主料）> （传说）
#ACT
Mov N$精炼几率 20
#IF
checkitem 幸运指环 1
#ACT
INC N$精炼几率 10
#IF
Equal S$精炼幸运 封印之刃
#ACT
INC N$精炼几率 20
#IF
Equal S$精炼副02 <$STR（S$精炼副01）>
#ACT
Mov S$精炼按钮 <最先精炼/@最先精炼>
Sendmsg 6 您可以最先精炼物品了!您当前要精炼的物品为:<$STR（S$精炼主料）>
GOTO @精炼
Break
[@最先精炼]
#IF
NOT Equal <$BOXITEM[2].NAME>
NOT Equal <$BOXITEM[3].NAME>
NOT Equal <$BOXITEM[4].NAME>
#act
GOTO @最先精炼1
Break
[@最先精炼1]
#IF
CheckTextList ..\QuestDiary\功效剧本\精炼系统\允许精炼装备.txt <$STR（S$精炼主料）>
#ACT
goto @卓越几率
Break
#IF
CheckContainsText <$STR（S$精炼主料）> （卓越）
#ACT
goto @传说几率
Break
#IF
CheckContainsText <$STR（S$精炼主料）> （传说）
#ACT
goto @完善几率
Break
;===============================================
[@完善几率]
#IF
#ACT
Mov S20
GetRandomText ..\QuestDiary\功效剧本\精炼系统\完善几率\完善几率20.txt S20
#IF
checkitem 幸运指环 1
#ACT
GetRandomText ..\QuestDiary\功效剧本\精炼系统\完善几率\完善几率30.txt S20
#IF
Equal S$精炼幸运 封印之刃
#ACT
GetRandomText ..\QuestDiary\功效剧本\精炼系统\完善几率\完善几率40.txt S20
#IF
checkitem 幸运指环 1
Equal S$精炼幸运 封印之刃
#ACT
GetRandomText ..\QuestDiary\功效剧本\精炼系统\完善几率\完善几率50.txt S20
#IF
checkitem 蓝雨令牌 1
#ACT
Mov S20 乐成
#IF
Equal S20 乐成
#ACT
DELBOXITEM 3
DELBOXITEM 4
DELBOXITEM 5
goto @完善精炼名字调换
#ELSEACT
DELBOXITEM 2
DELBOXITEM 3
DELBOXITEM 4
DELBOXITEM 5
Mov S$精炼按钮 <最先精炼>
Mov S$精炼主料 暂未提交A
Mov S$精炼副01 暂未提交B
Mov S$精炼副02 暂未提交C
Mov S$精炼幸运 暂未提交D
Mov N$精炼几率 0
Mov S20
GOTO @精炼
MESSAGEBOX 很遗憾,精炼失败!请继续起劲.
Break
发表于 2022-3-21 21:05:39
发表于 2022-3-21 21:05:40