几个技巧添加随身传奇粉碎炉功能
[@MAIN]
#ACT
GetRandomText..\QuestDiary\数据文件\强化\<$USERNAME>\便携式粉碎炉.txt<$STR(S$便炉)>
#IF
CompareText<$STR(S$便炉)><$USERNAME>的炉子在<$MAP>
#ACT
OPENMERCHANTBIGDLG17380108060
#SAY
粉碎炉：\
当您有不需要的装备时可以在粉碎炉里进行粉\
碎粉碎能获得各种碎块用来强化装备。当您使用本\
功能前请仔细阅读<使用说明/@说明>\\
<○/FCOLOR=103><开始粉碎/@粉碎>\
<○/FCOLOR=103><使用说明/@说明>\
<○/FCOLOR=103><离开/@EXIT>
#ELSESAY
这是别人的粉碎炉！~\
<○/FCOLOR=103><离开/@EXIT>\
[@说明]
#ACT
OPENMERCHANTBIGDLG17380108060
#SAY
粉碎炉：\
请仔细阅读下面的几条说明\
1、放入必须是装备，攻城兵器之类的是不能粉碎\\
2、放入的装备属性若包含攻魔道那么粉碎获得后\
的碎块就是攻魔道中随机一种\\
3、放入的装备颜色是什么颜色，粉碎就能获得一\
样的颜色品质。\\
4、未鉴定的装备粉碎时获得的碎块乃是随机鉴定\
后获得的品质\\
5、归类：碎块类别包含武器、头盔、衣服。剩余\
的皆为首饰。\\
6、例子：比如我放入一件红色的武器，武器属性\
只有攻击属性，不包含法术和道术。那么我粉\
碎获得的碎块就是红色品质的攻击碎块若我的\
武器是50-59级的那么碎块等级就是50级碎块\\
<○/FCOLOR=103><开始粉碎/@粉碎>\
<○/FCOLOR=103><返回/@MAIN>\
<○/FCOLOR=103><离开/@EXIT>
[@粉碎]
#ACT
OPENMERCHANTBIGDLG17380108060
ReturnBoxItem0
ReturnBoxItem1
ReturnBoxItem2
ReturnBoxItem3
ReturnBoxItem4
ReturnBoxItem5
ReturnBoxItem6
ReturnBoxItem7
GetRandomText..\QuestDiary\数据库\商店数据\拆解.txt<$STR(S$售货0)>1
#SAY
<Img:55:4:248:-27/@EXIT>
<Img:388:17:28:-24>
<Img:387:17:-206:-40>\\
;商品区---第一排
<$STR(S$售货0)>\
\\\\\\\\\\\\\\\\
;粉碎页第一排
<ITEMBOX:0:-1:0:-1:-41:33:30:56101115161920212223242630485254626465>
<ITEMBOX:1:-1:0:5:-41:33:30:56101115161920212223242630485254626465>
<ITEMBOX:2:-1:0:11:-41:33:30:56101115161920212223242630485254626465>
<ITEMBOX:3:-1:0:17:-41:33:30:56101115161920212223242630485254626465>\
;粉碎页第二排
<ITEMBOX:4:-1:0:-1:-21:33:30:56101115161920212223242630485254626465>
<ITEMBOX:5:-1:0:5:-21:33:30:56101115161920212223242630485254626465>
<ITEMBOX:6:-1:0:11:-21:33:30:56101115161920212223242630485254626465>
<ITEMBOX:7:-1:0:17:-21:33:30:56101115161920212223242630485254626465>\
<粉碎费用：[/FCOLOR=255>{免费/FCOLOR=222}<]/FCOLOR=255>\
<○/FCOLOR=103><开始粉碎/FCOLOR=230>\
<○/FCOLOR=103><返回/@MAIN>\
#ELSESAY
这是别人的粉碎炉！~\
<○/FCOLOR=103><离开/@EXIT>\
[@购物0]
#IF
CHECKBAGSIZE1
#ELSEACT
MESSAGEBOX错误提示：\ \背包空位不足1格，无法购买！
break
#IF
CHECKGAMEGOLD>0
#ACT
GAMEGOLD-1
GIVE回城卷1
#ELSEACT
MESSAGEBOX错误提示：\ \元宝不足1个，不能进行购买！
break
;-----------------------------------------------------------托盘0号
[@ItemIntoBox0]
#IF
EQUAL<$BOXITEM[0].COLOR>230
#ACT
UNALLOWITEMINTOBOX
SENDMSG5该道具不能进行分解粉碎！
break
#IF
EQUAL<$BOXITEM[0].COLOR>254
#ACT
UNALLOWITEMINTOBOX
SENDMSG5该道具不能进行分解粉碎！
break
#IF
#ACT
MOVN$拆几率0100
MOVS$拆结果0
MOVS$比对数0D·M·S
#IF
CHECKTEXTLIST..\QuestDiary\数据库\拆解\40级表.txt<$BOXITEM[0].NAME>
#ACT
MOVS$拆解类040级
DECN$拆几率010
#IF
CHECKTEXTLIST..\QuestDiary\数据库\拆解\50级表.txt<$BOXITEM[0].NAME>
#ACT
MOVS$拆解类050级
DECN$拆几率012
#IF
CHECKTEXTLIST..\QuestDiary\数据库\拆解\60级表.txt<$BOXITEM[0].NAME>
#ACT
MOVS$拆解类060级
DECN$拆几率013
#IF
CHECKTEXTLIST..\QuestDiary\数据库\拆解\70级表.txt<$BOXITEM[0].NAME>
#ACT
MOVS$拆解类070级
DECN$拆几率014
#IF
CHECKTEXTLIST..\QuestDiary\数据库\拆解\80级表.txt<$BOXITEM[0].NAME>
#ACT
MOVS$拆解类080级
DECN$拆几率015
#IF
CHECKTEXTLIST..\QuestDiary\数据库\拆解\90级表.txt<$BOXITEM[0].NAME>
#ACT
MOVS$拆解类090级
DECN$拆几率017
#IF
CHECKTEXTLIST..\QuestDiary\数据库\拆解\100级表.txt<$BOXITEM[0].NAME>
#ACT
MOVS$拆解类0100级
DECN$拆几率020
#OR
EQUAL<$BOXITEM[0].STDMODE>5
EQUAL<$BOXITEM[0].STDMODE>6
#ACT
INCS$拆解类0武器
#OR
EQUAL<$BOXITEM[0].STDMODE>10
EQUAL<$BOXITEM[0].STDMODE>11
#ACT
INCS$拆解类0衣服
#OR
EQUAL<$BOXITEM[0].STDMODE>15
EQUAL<$BOXITEM[0].STDMODE>16
#ACT
INCS$拆解类0头盔
#OR
EQUAL<$BOXITEM[0].STDMODE>19
EQUAL<$BOXITEM[0].STDMODE>20
EQUAL<$BOXITEM[0].STDMODE>21
EQUAL<$BOXITEM[0].STDMODE>22
EQUAL<$BOXITEM[0].STDMODE>23
EQUAL<$BOXITEM[0].STDMODE>24
EQUAL<$BOXITEM[0].STDMODE>26
EQUAL<$BOXITEM[0].STDMODE>28
EQUAL<$BOXITEM[0].STDMODE>30
EQUAL<$BOXITEM[0].STDMODE>52
EQUAL<$BOXITEM[0].STDMODE>54
EQUAL<$BOXITEM[0].STDMODE>62
EQUAL<$BOXITEM[0].STDMODE>64
EQUAL<$BOXITEM[0].STDMODE>65
#ACT
INCS$拆解类0首饰
#IF
EQUAL<$BOXITEM[0].HDC>0
#ACT
ANSIREPLACETEXT<$STR(S$比对数0)>D0
#IF
EQUAL<$BOXITEM[0].HMC>0
#ACT
ANSIREPLACETEXT<$STR(S$比对数0)>M0
#IF
EQUAL<$BOXITEM[0].HSC>0
#ACT
ANSIREPLACETEXT<$STR(S$比对数0)>S0
#IF
EQUALS$比对数0D·M·S
CHECKTEXTLIST..\QuestDiary\数据库\拆解\防御.txt<$BOXITEM[0].STDMODE>
#ACT
GetRandomText..\QuestDiary\数据库\拆解\防均衡.txt<$STR(S$拆结果0)>
MOVS$二拆0防均衡
#IF
EQUALS$比对数00·M·S
CHECKTEXTLIST..\QuestDiary\数据库\拆解\防御.txt<$BOXITEM[0].STDMODE>
#ACT
GetRandomText..\QuestDiary\数据库\拆解\防魔道.txt<$STR(S$拆结果0)>
MOVS$二拆0防魔道
#IF
EQUALS$比对数0D·0·S
CHECKTEXTLIST..\QuestDiary\数据库\拆解\防御.txt<$BOXITEM[0].STDMODE>
#ACT
GetRandomText..\QuestDiary\数据库\拆解\防攻道.txt<$STR(S$拆结果0)>
MOVS$二拆0防攻道
#IF
EQUALS$比对数0D·M·0
CHECKTEXTLIST..\QuestDiary\数据库\拆解\防御.txt<$BOXITEM[0].STDMODE>
#ACT
GetRandomText..\QuestDiary\数据库\拆解\防攻魔.txt<$STR(S$拆结果0)>
MOVS$二拆0防攻魔
#IF
EQUALS$比对数0D·0·0
CHECKTEXTLIST..\QuestDiary\数据库\拆解\防御.txt<$BOXITEM[0].STDMODE>
#ACT
GetRandomText..\QuestDiary\数据库\拆解\防攻.txt<$STR(S$拆结果0)>
MOVS$二拆0防攻
#IF
EQUALS$比对数00·M·0
CHECKTEXTLIST..\QuestDiary\数据库\拆解\防御.txt<$BOXITEM[0].STDMODE>
#ACT
GetRandomText..\QuestDiary\数据库\拆解\防魔.txt<$STR(S$拆结果0)>
MOVS$二拆0防魔
#IF
EQUALS$比对数00·0·S
CHECKTEXTLIST..\QuestDiary\数据库\拆解\防御.txt<$BOXITEM[0].STDMODE>
#ACT
GetRandomText..\QuestDiary\数据库\拆解\防道.txt<$STR(S$拆结果0)>
MOVS$二拆0防道
#IF
EQUALS$比对数0D·M·S
EQUALS$拆结果0
#ACT
GetRandomText..\QuestDiary\数据库\拆解\均衡.txt<$STR(S$拆结果0)>
MOVS$二拆0均衡
#IF
EQUALS$比对数0D·M·0
EQUALS$拆结果0
#ACT
GetRandomText..\QuestDiary\数据库\拆解\攻魔.txt<$STR(S$拆结果0)>
MOVS$二拆0攻魔
#IF
EQUALS$比对数0D·0·S
EQUALS$拆结果0
#ACT
GetRandomText..\QuestDiary\数据库\拆解\攻道.txt<$STR(S$拆结果0)>
MOVS$二拆0攻道
#IF
EQUALS$比对数00·M·S
EQUALS$拆结果0
#ACT
GetRandomText..\QuestDiary\数据库\拆解\魔道.txt<$STR(S$拆结果0)>
MOVS$二拆0魔道
#IF
EQUALS$比对数0D·0·0
EQUALS$拆结果0
#ACT
GetRandomText..\QuestDiary\数据库\拆解\攻.txt<$STR(S$拆结果0)>
MOVS$二拆0攻
#IF
EQUALS$比对数00·M·0
EQUALS$拆结果0
#ACT
GetRandomText..\QuestDiary\数据库\拆解\魔.txt<$STR(S$拆结果0)>
MOVS$二拆0魔
#IF
EQUALS$比对数00·0·S
EQUALS$拆结果0
#ACT
GetRandomText..\QuestDiary\数据库\拆解\道.txt<$STR(S$拆结果0)>
MOVS$二拆0道
#IF
EQUAL<$BOXITEM[0].COLOR>150
#ACT
GetRandomText..\QuestDiary\数据库\拆解\未鉴定碎块.txtS$拆解色0
#ELSEACT
GetRandomText..\QuestDiary\数据库\拆解\取色表.txtS$拆解色0<$BOXITEM[0].COLOR>
#IF
EQUALS$拆解色0(普通)
#ACT
DECN$拆几率05
MOVN$拆解色0255
#IF
EQUALS$拆解色0(精良)
#ACT
DECN$拆几率010
MOVN$拆解色0250
#IF
EQUALS$拆解色0(稀有)
#ACT
DECN$拆几率015
MOVN$拆解色0154
#IF
EQUALS$拆解色0(罕有)
#ACT
DECN$拆几率026
MOVN$拆解色0243
#IF
EQUALS$拆解色0(远古)
#ACT
DECN$拆几率035
MOVN$拆解色0253
#IF
EQUALS$拆解色0(传说)
#ACT
DECN$拆几率050
MOVN$拆解色058
#IF
#ACT
MOVS$粉碎按钮<开始粉碎/@开始粉碎>
DELAYGOTO20@综合
[@ItemOutBox0]
#ACT
MOVS$拆解类0
#IF
EQUAL<$BOXITEM[1].NAME>
EQUAL<$BOXITEM[2].NAME>
EQUAL<$BOXITEM[3].NAME>
EQUAL<$BOXITEM[4].NAME>
EQUAL<$BOXITEM[5].NAME>
EQUAL<$BOXITEM[6].NAME>
EQUAL<$BOXITEM[7].NAME>
#ACT
MOVS$粉碎按钮<开始粉碎/FCOLOR=230>
DELAYGOTO20@综合
;-----------------------------------------------------------托盘1号
[@ItemIntoBox1]
#IF
EQUAL<$BOXITEM[1].COLOR>230
#ACT
UNALLOWITEMINTOBOX
SENDMSG5该道具不能进行分解粉碎！
break
#elseact
MOVN$拆几率1100
MOVS$拆结果1
MOVS$比对数1D·M·S
#IF
CHECKTEXTLIST..\QuestDiary\数据库\拆解\40级表.txt<$BOXITEM[1].NAME>
#ACT
MOVS$拆解类140级
DECN$拆几率110
#IF
CHECKTEXTLIST..\QuestDiary\数据库\拆解\50级表.txt<$BOXITEM[1].NAME>
#ACT
MOVS$拆解类150级
DECN$拆几率112
#IF
CHECKTEXTLIST..\QuestDiary\数据库\拆解\60级表.txt<$BOXITEM[1].NAME>
#ACT
MOVS$拆解类160级
DECN$拆几率113
#IF
CHECKTEXTLIST..\QuestDiary\数据库\拆解\70级表.txt<$BOXITEM[1].NAME>
#ACT
MOVS$拆解类170级
DECN$拆几率114
#IF
CHECKTEXTLIST..\QuestDiary\数据库\拆解\80级表.txt<$BOXITEM[1].NAME>
#ACT
MOVS$拆解类180级
DECN$拆几率115
#IF
CHECKTEXTLIST..\QuestDiary\数据库\拆解\90级表.txt<$BOXITEM[1].NAME>
#ACT
MOVS$拆解类190级
DECN$拆几率117
#IF
CHECKTEXTLIST..\QuestDiary\数据库\拆解\100级表.txt<$BOXITEM[1].NAME>
#ACT
MOVS$拆解类1100级
DECN$拆几率120
#OR
EQUAL<$BOXITEM[1].STDMODE>5
EQUAL<$BOXITEM[1].STDMODE>6
#ACT
INCS$拆解类1武器
#OR
EQUAL<$BOXITEM[1].STDMODE>10
EQUAL<$BOXITEM[1].STDMODE>11
#ACT
INCS$拆解类1衣服
#OR
EQUAL<$BOXITEM[1].STDMODE>15
EQUAL<$BOXITEM[1].STDMODE>16
#ACT
INCS$拆解类1头盔
#OR
EQUAL<$BOXITEM[1].STDMODE>19
EQUAL<$BOXITEM[1].STDMODE>20
EQUAL<$BOXITEM[1].STDMODE>21
EQUAL<$BOXITEM[1].STDMODE>22
EQUAL<$BOXITEM[1].STDMODE>23
EQUAL<$BOXITEM[1].STDMODE>24
EQUAL<$BOXITEM[1].STDMODE>26
EQUAL<$BOXITEM[1].STDMODE>28
EQUAL<$BOXITEM[1].STDMODE>30
EQUAL<$BOXITEM[1].STDMODE>52
EQUAL<$BOXITEM[1].STDMODE>54
EQUAL<$BOXITEM[1].STDMODE>62
EQUAL<$BOXITEM[1].STDMODE>64
EQUAL<$BOXITEM[1].STDMODE>65
#ACT
INCS$拆解类1首饰
#IF
EQUAL<$BOXITEM[1].HDC>0
#ACT
ANSIREPLACETEXT<$STR(S$比对数1)>D0
#IF
EQUAL<$BOXITEM[1].HMC>0
#ACT
ANSIREPLACETEXT<$STR(S$比对数1)>M0
#IF
EQUAL<$BOXITEM[1].HSC>0
#ACT
ANSIREPLACETEXT<$STR(S$比对数1)>S0
#IF
EQUALS$比对数1D·M·S
CHECKTEXTLIST..\QuestDiary\数据库\拆解\防御.txt<$BOXITEM[1].STDMODE>
#ACT
GetRandomText..\QuestDiary\数据库\拆解\防均衡.txt<$STR(S$拆结果1)>
MOVS$二拆0防均衡
#IF
EQUALS$比对数10·M·S
CHECKTEXTLIST..\QuestDiary\数据库\拆解\防御.txt<$BOXITEM[1].STDMODE>
#ACT
GetRandomText..\QuestDiary\数据库\拆解\防魔道.txt<$STR(S$拆结果1)>
MOVS$二拆0防魔道
#IF
EQUALS$比对数1D·0·S
CHECKTEXTLIST..\QuestDiary\数据库\拆解\防御.txt<$BOXITEM[1].STDMODE>
#ACT
GetRandomText..\QuestDiary\数据库\拆解\防攻道.txt<$STR(S$拆结果1)>
MOVS$二拆0防攻道
#IF
EQUALS$比对数1D·M·0
CHECKTEXTLIST..\QuestDiary\数据库\拆解\防御.txt<$BOXITEM[1].STDMODE>
#ACT
GetRandomText..\QuestDiary\数据库\拆解\防攻魔.txt<$STR(S$拆结果1)>
MOVS$二拆0防攻魔
#IF
EQUALS$比对数1D·0·0
CHECKTEXTLIST..\QuestDiary\数据库\拆解\防御.txt<$BOXITEM[1].STDMODE>
#ACT
GetRandomText..\QuestDiary\数据库\拆解\防攻.txt<$STR(S$拆结果1)>
MOVS$二拆0防攻
#IF
EQUALS$比对数10·M·0
CHECKTEXTLIST..\QuestDiary\数据库\拆解\防御.txt<$BOXITEM[1].STDMODE>
#ACT
GetRandomText..\QuestDiary\数据库\拆解\防魔.txt<$STR(S$拆结果1)>
MOVS$二拆0防魔
#IF
EQUALS$比对数10·0·S
CHECKTEXTLIST..\QuestDiary\数据库\拆解\防御.txt<$BOXITEM[1].STDMODE>
#ACT
GetRandomText..\QuestDiary\数据库\拆解\防道.txt<$STR(S$拆结果1)>
MOVS$二拆0防道
#IF
EQUALS$比对数1D·M·S
EQUALS$拆结果1
#ACT
GetRandomText..\QuestDiary\数据库\拆解\均衡.txt<$STR(S$拆结果1)>
MOVS$二拆0均衡
#IF
EQUALS$比对数1D·M·0
EQUALS$拆结果1
#ACT
GetRandomText..\QuestDiary\数据库\拆解\攻魔.txt<$STR(S$拆结果1)>
MOVS$二拆0攻魔
#IF
EQUALS$比对数1D·0·S
EQUALS$拆结果1
#ACT
GetRandomText..\QuestDiary\数据库\拆解\攻道.txt<$STR(S$拆结果1)>
MOVS$二拆0攻道
#IF
EQUALS$比对数10·M·S
EQUALS$拆结果1
#ACT
GetRandomText..\QuestDiary\数据库\拆解\魔道.txt<$STR(S$拆结果1)>
MOVS$二拆0魔道
#IF
EQUALS$比对数1D·0·0
EQUALS$拆结果1
#ACT
GetRandomText..\QuestDiary\数据库\拆解\攻.txt<$STR(S$拆结果1)>
MOVS$二拆0攻
#IF
EQUALS$比对数10·M·0
EQUALS$拆结果1
#ACT
GetRandomText..\QuestDiary\数据库\拆解\魔.txt<$STR(S$拆结果1)>
MOVS$二拆0魔
#IF
EQUALS$比对数10·0·S
EQUALS$拆结果1
#ACT
GetRandomText..\QuestDiary\数据库\拆解\道.txt<$STR(S$拆结果1)>
MOVS$二拆0道
#IF
EQUAL<$BOXITEM[1].COLOR>150
#ACT
GetRandomText..\QuestDiary\数据库\拆解\未鉴定碎块.txtS$拆解色1
#ELSEACT
GetRandomText..\QuestDiary\数据库\拆解\取色表.txtS$拆解色1<$BOXITEM[1].COLOR>
#IF
EQUALS$拆解色1(普通)
#ACT
DECN$拆几率15
MOVN$拆解色1255
#IF
EQUALS$拆解色1(精良)
#ACT
DECN$拆几率110
MOVN$拆解色1250
#IF
EQUALS$拆解色1(稀有)
#ACT
DECN$拆几率115
MOVN$拆解色1154
#IF
EQUALS$拆解色1(罕有)
#ACT
DECN$拆几率126
MOVN$拆解色1243
#IF
EQUALS$拆解色1(远古)
#ACT
DECN$拆几率135
MOVN$拆解色1253
#IF
EQUALS$拆解色1(传说)
#ACT
DECN$拆几率150
MOVN$拆解色158
#IF
#ACT
MOVS$粉碎按钮<开始粉碎/@开始粉碎>
DELAYGOTO20@综合
[@ItemOutBox1]
#ACT
MOVS$拆解类1
#IF
EQUAL<$BOXITEM[0].NAME>
EQUAL<$BOXITEM[2].NAME>
EQUAL<$BOXITEM[3].NAME>
EQUAL<$BOXITEM[4].NAME>
EQUAL<$BOXITEM[5].NAME>
EQUAL<$BOXITEM[6].NAME>
EQUAL<$BOXITEM[7].NAME>
#ACT
MOVS$粉碎按钮<开始粉碎/FCOLOR=230>
DELAYGOTO20@综合
;-----------------------------------------------------------托盘2号
[@ItemIntoBox2]
#IF
EQUAL<$BOXITEM[2].COLOR>230
#ACT
UNALLOWITEMINTOBOX
SENDMSG5该道具不能进行分解粉碎！
break
#elseact
MOVN$拆几率2100
MOVS$拆结果2
MOVS$比对数2D·M·S
;---------类2
;---------色2
#IF
CHECKTEXTLIST..\QuestDiary\数据库\拆解\40级表.txt<$BOXITEM[2].NAME>
#ACT
MOVS$拆解类240级
DECN$拆几率210
#IF
CHECKTEXTLIST..\QuestDiary\数据库\拆解\50级表.txt<$BOXITEM[2].NAME>
#ACT
MOVS$拆解类250级
DECN$拆几率212
#IF
CHECKTEXTLIST..\QuestDiary\数据库\拆解\60级表.txt<$BOXITEM[2].NAME>
#ACT
MOVS$拆解类260级
DECN$拆几率213
#IF
CHECKTEXTLIST..\QuestDiary\数据库\拆解\70级表.txt<$BOXITEM[2].NAME>
#ACT
MOVS$拆解类270级
DECN$拆几率214
#IF
CHECKTEXTLIST..\QuestDiary\数据库\拆解\80级表.txt<$BOXITEM[2].NAME>
#ACT
MOVS$拆解类280级
DECN$拆几率215
#IF
CHECKTEXTLIST..\QuestDiary\数据库\拆解\90级表.txt<$BOXITEM[2].NAME>
#ACT
MOVS$拆解类290级
DECN$拆几率217
#IF
CHECKTEXTLIST..\QuestDiary\数据库\拆解\100级表.txt<$BOXITEM[2].NAME>
#ACT
MOVS$拆解类2100级
DECN$拆几率220
#OR
EQUAL<$BOXITEM[2].STDMODE>5
EQUAL<$BOXITEM[2].STDMODE>6
#ACT
INCS$拆解类2武器
#OR
EQUAL<$BOXITEM[2].STDMODE>10
EQUAL<$BOXITEM[2].STDMODE>11
#ACT
INCS$拆解类2衣服
#OR
EQUAL<$BOXITEM[2].STDMODE>15
EQUAL<$BOXITEM[2].STDMODE>16
#ACT
INCS$拆解类2头盔
#OR
EQUAL<$BOXITEM[2].STDMODE>19
EQUAL<$BOXITEM[2].STDMODE>20
EQUAL<$BOXITEM[2].STDMODE>21
EQUAL<$BOXITEM[2].STDMODE>22
EQUAL<$BOXITEM[2].STDMODE>23
EQUAL<$BOXITEM[2].STDMODE>24
EQUAL<$BOXITEM[2].STDMODE>26
EQUAL<$BOXITEM[2].STDMODE>28
EQUAL<$BOXITEM[2].STDMODE>30
EQUAL<$BOXITEM[2].STDMODE>52
EQUAL<$BOXITEM[2].STDMODE>54
EQUAL<$BOXITEM[2].STDMODE>62
EQUAL<$BOXITEM[2].STDMODE>64
EQUAL<$BOXITEM[2].STDMODE>65
#ACT
INCS$拆解类2首饰
#IF
EQUAL<$BOXITEM[2].HDC>0
#ACT
ANSIREPLACETEXT<$STR(S$比对数2)>D0
#IF
EQUAL<$BOXITEM[2].HMC>0
#ACT
ANSIREPLACETEXT<$STR(S$比对数2)>M0
#IF
EQUAL<$BOXITEM[2].HSC>0
#ACT
ANSIREPLACETEXT<$STR(S$比对数2)>S0
#IF
EQUALS$比对数2D·M·S
CHECKTEXTLIST..\QuestDiary\数据库\拆解\防御.txt<$BOXITEM[2].STDMODE>
#ACT
GetRandomText..\QuestDiary\数据库\拆解\防均衡.txt<$STR(S$拆结果2)>
MOVS$二拆0防均衡
#IF
EQUALS$比对数20·M·S
CHECKTEXTLIST..\QuestDiary\数据库\拆解\防御.txt<$BOXITEM[2].STDMODE>
#ACT
GetRandomText..\QuestDiary\数据库\拆解\防魔道.txt<$STR(S$拆结果2)>
MOVS$二拆0防魔道
#IF
EQUALS$比对数2D·0·S
CHECKTEXTLIST..\QuestDiary\数据库\拆解\防御.txt<$BOXITEM[2].STDMODE>
#ACT
GetRandomText..\QuestDiary\数据库\拆解\防攻道.txt<$STR(S$拆结果2)>
MOVS$二拆0防攻道
#IF
EQUALS$比对数2D·M·0
CHECKTEXTLIST..\QuestDiary\数据库\拆解\防御.txt<$BOXITEM[2].STDMODE>
#ACT
GetRandomText..\QuestDiary\数据库\拆解\防攻魔.txt<$STR(S$拆结果2)>
MOVS$二拆0防攻魔
#IF
EQUALS$比对数2D·0·0
CHECKTEXTLIST..\QuestDiary\数据库\拆解\防御.txt<$BOXITEM[2].STDMODE>
#ACT
GetRandomText..\QuestDiary\数据库\拆解\防攻.txt<$STR(S$拆结果2)>
MOVS$二拆0防攻
#IF
EQUALS$比对数20·M·0
CHECKTEXTLIST..\QuestDiary\数据库\拆解\防御.txt<$BOXITEM[2].STDMODE>
#ACT
GetRandomText..\QuestDiary\数据库\拆解\防魔.txt<$STR(S$拆结果2)>
MOVS$二拆0防魔
#IF
EQUALS$比对数20·0·S
CHECKTEXTLIST..\QuestDiary\数据库\拆解\防御.txt<$BOXITEM[2].STDMODE>
#ACT
GetRandomText..\QuestDiary\数据库\拆解\防道.txt<$STR(S$拆结果2)>
MOVS$二拆0防道
#IF
EQUALS$比对数2D·M·S
EQUALS$拆结果2
#ACT
GetRandomText..\QuestDiary\数据库\拆解\均衡.txt<$STR(S$拆结果2)>
MOVS$二拆0均衡
#IF
EQUALS$比对数2D·M·0
EQUALS$拆结果2
#ACT
GetRandomText..\QuestDiary\数据库\拆解\攻魔.txt<$STR(S$拆结果2)>
MOVS$二拆0攻魔
#IF
EQUALS$比对数2D·0·S
EQUALS$拆结果2
#ACT
GetRandomText..\QuestDiary\数据库\拆解\攻道.txt<$STR(S$拆结果2)>
MOVS$二拆0攻道
#IF
EQUALS$比对数20·M·S
EQUALS$拆结果2
#ACT
GetRandomText..\QuestDiary\数据库\拆解\魔道.txt<$STR(S$拆结果2)>
MOVS$二拆0魔道
#IF
EQUALS$比对数2D·0·0
EQUALS$拆结果2
#ACT
GetRandomText..\QuestDiary\数据库\拆解\攻.txt<$STR(S$拆结果2)>
MOVS$二拆0攻
#IF
EQUALS$比对数20·M·0
EQUALS$拆结果2
#ACT
GetRandomText..\QuestDiary\数据库\拆解\魔.txt<$STR(S$拆结果2)>
MOVS$二拆0魔
#IF
EQUALS$比对数20·0·S
EQUALS$拆结果2
#ACT
GetRandomText..\QuestDiary\数据库\拆解\道.txt<$STR(S$拆结果2)>
MOVS$二拆0道
#IF
EQUAL<$BOXITEM[2].COLOR>150
#ACT
GetRandomText..\QuestDiary\数据库\拆解\未鉴定碎块.txtS$拆解色2
#ELSEACT
GetRandomText..\QuestDiary\数据库\拆解\取色表.txtS$拆解色2<$BOXITEM[2].COLOR>
#IF
EQUALS$拆解色2(普通)
#ACT
DECN$拆几率25
MOVN$拆解色2255
#IF
EQUALS$拆解色2(精良)
#ACT
DECN$拆几率210
MOVN$拆解色2250
#IF
EQUALS$拆解色2(稀有)
#ACT
DECN$拆几率215
MOVN$拆解色2154
#IF
EQUALS$拆解色2(罕有)
#ACT
DECN$拆几率226
MOVN$拆解色2243
#IF
EQUALS$拆解色2(远古)
#ACT
DECN$拆几率235
MOVN$拆解色2253
#IF
EQUALS$拆解色2(传说)
#ACT
DECN$拆几率250
MOVN$拆解色258
#IF
#ACT
MOVS$粉碎按钮<开始粉碎/@开始粉碎>
DELAYGOTO20@综合
[@ItemOutBox2]
#ACT
MOVS$拆解类2
#IF
EQUAL<$BOXITEM[0].NAME>
EQUAL<$BOXITEM[1].NAME>
EQUAL<$BOXITEM[3].NAME>
EQUAL<$BOXITEM[4].NAME>
EQUAL<$BOXITEM[5].NAME>
EQUAL<$BOXITEM[6].NAME>
EQUAL<$BOXITEM[7].NAME>
#ACT
MOVS$粉碎按钮<开始粉碎/FCOLOR=230>
DELAYGOTO20@综合
;-----------------------------------------------------------托盘3号
[@ItemIntoBox3]
#IF
EQUAL<$BOXITEM[3].COLOR>230
#ACT
UNALLOWITEMINTOBOX
SENDMSG5该道具不能进行分解粉碎！
break
#elseact
MOVN$拆几率3100
MOVS$拆结果3
MOVS$比对数3D·M·S
;---------类3
#IF
CHECKTEXTLIST..\QuestDiary\数据库\拆解\40级表.txt<$BOXITEM[3].NAME>
#ACT
MOVS$拆解类340级
DECN$拆几率310
#IF
CHECKTEXTLIST..\QuestDiary\数据库\拆解\50级表.txt<$BOXITEM[3].NAME>
#ACT
MOVS$拆解类350级
DECN$拆几率312
#IF
CHECKTEXTLIST..\QuestDiary\数据库\拆解\60级表.txt<$BOXITEM[3].NAME>
#ACT
MOVS$拆解类360级
DECN$拆几率313
#IF
CHECKTEXTLIST..\QuestDiary\数据库\拆解\70级表.txt<$BOXITEM[3].NAME>
#ACT
MOVS$拆解类370级
DECN$拆几率314
#IF
CHECKTEXTLIST..\QuestDiary\数据库\拆解\80级表.txt<$BOXITEM[3].NAME>
#ACT
MOVS$拆解类380级
DECN$拆几率315
#IF
CHECKTEXTLIST..\QuestDiary\数据库\拆解\90级表.txt<$BOXITEM[3].NAME>
#ACT
MOVS$拆解类390级
DECN$拆几率317
#IF
CHECKTEXTLIST..\QuestDiary\数据库\拆解\100级表.txt<$BOXITEM[3].NAME>
#ACT
MOVS$拆解类3100级
DECN$拆几率320
#OR
EQUAL<$BOXITEM[3].STDMODE>5
EQUAL<$BOXITEM[3].STDMODE>6
#ACT
INCS$拆解类3武器
#OR
EQUAL<$BOXITEM[3].STDMODE>10
EQUAL<$BOXITEM[3].STDMODE>11
#ACT
INCS$拆解类3衣服
#OR
EQUAL<$BOXITEM[3].STDMODE>15
EQUAL<$BOXITEM[3].STDMODE>16
#ACT
INCS$拆解类3头盔
#OR
EQUAL<$BOXITEM[3].STDMODE>19
EQUAL<$BOXITEM[3].STDMODE>20
EQUAL<$BOXITEM[3].STDMODE>21
EQUAL<$BOXITEM[3].STDMODE>22
EQUAL<$BOXITEM[3].STDMODE>23
EQUAL<$BOXITEM[3].STDMODE>24
EQUAL<$BOXITEM[3].STDMODE>26
EQUAL<$BOXITEM[3].STDMODE>28
EQUAL<$BOXITEM[3].STDMODE>30
EQUAL<$BOXITEM[3].STDMODE>52
EQUAL<$BOXITEM[3].STDMODE>54
EQUAL<$BOXITEM[3].STDMODE>62
EQUAL<$BOXITEM[3].STDMODE>64
EQUAL<$BOXITEM[3].STDMODE>65
#ACT
INCS$拆解类3首饰
#IF
EQUAL<$BOXITEM[3].HDC>0
#ACT
ANSIREPLACETEXT<$STR(S$比对数3)>D0
#IF
EQUAL<$BOXITEM[3].HMC>0
#ACT
ANSIREPLACETEXT<$STR(S$比对数3)>M0
#IF
EQUAL<$BOXITEM[3].HSC>0
#ACT
ANSIREPLACETEXT<$STR(S$比对数3)>S0
#IF
EQUALS$比对数3D·M·S
CHECKTEXTLIST..\QuestDiary\数据库\拆解\防御.txt<$BOXITEM[3].STDMODE>
#ACT
GetRandomText..\QuestDiary\数据库\拆解\防均衡.txt<$STR(S$拆结果3)>
MOVS$二拆0防均衡
#IF
EQUALS$比对数30·M·S
CHECKTEXTLIST..\QuestDiary\数据库\拆解\防御.txt<$BOXITEM[3].STDMODE>
#ACT
GetRandomText..\QuestDiary\数据库\拆解\防魔道.txt<$STR(S$拆结果3)>
MOVS$二拆0防魔道
#IF
EQUALS$比对数3D·0·S
CHECKTEXTLIST..\QuestDiary\数据库\拆解\防御.txt<$BOXITEM[3].STDMODE>
#ACT
GetRandomText..\QuestDiary\数据库\拆解\防攻道.txt<$STR(S$拆结果3)>
MOVS$二拆0防攻道
#IF
EQUALS$比对数3D·M·0
CHECKTEXTLIST..\QuestDiary\数据库\拆解\防御.txt<$BOXITEM[3].STDMODE>
#ACT
GetRandomText..\QuestDiary\数据库\拆解\防攻魔.txt<$STR(S$拆结果3)>
MOVS$二拆0防攻魔
#IF
EQUALS$比对数3D·0·0
CHECKTEXTLIST..\QuestDiary\数据库\拆解\防御.txt<$BOXITEM[3].STDMODE>
#ACT
GetRandomText..\QuestDiary\数据库\拆解\防攻.txt<$STR(S$拆结果3)>
MOVS$二拆0防攻
#IF
EQUALS$比对数30·M·0
CHECKTEXTLIST..\QuestDiary\数据库\拆解\防御.txt<$BOXITEM[3].STDMODE>
#ACT
GetRandomText..\QuestDiary\数据库\拆解\防魔.txt<$STR(S$拆结果3)>
MOVS$二拆0防魔
#IF
EQUALS$比对数30·0·S
CHECKTEXTLIST..\QuestDiary\数据库\拆解\防御.txt<$BOXITEM[3].STDMODE>
#ACT
GetRandomText..\QuestDiary\数据库\拆解\防道.txt<$STR(S$拆结果3)>
MOVS$二拆0防道
#IF
EQUALS$比对数3D·M·S
EQUALS$拆结果3
#ACT
GetRandomText..\QuestDiary\数据库\拆解\均衡.txt<$STR(S$拆结果3)>
MOVS$二拆0均衡
#IF
EQUALS$比对数3D·M·0
EQUALS$拆结果3
#ACT
GetRandomText..\QuestDiary\数据库\拆解\攻魔.txt<$STR(S$拆结果3)>
MOVS$二拆0攻魔
#IF
EQUALS$比对数3D·0·S
EQUALS$拆结果3
#ACT
GetRandomText..\QuestDiary\数据库\拆解\攻道.txt<$STR(S$拆结果3)>
MOVS$二拆0攻道
#IF
EQUALS$比对数30·M·S
EQUALS$拆结果3
#ACT
GetRandomText..\QuestDiary\数据库\拆解\魔道.txt<$STR(S$拆结果3)>
MOVS$二拆0魔道
#IF
EQUALS$比对数3D·0·0
EQUALS$拆结果3
#ACT
GetRandomText..\QuestDiary\数据库\拆解\攻.txt<$STR(S$拆结果3)>
MOVS$二拆0攻
#IF
EQUALS$比对数30·M·0
EQUALS$拆结果3
#ACT
GetRandomText..\QuestDiary\数据库\拆解\魔.txt<$STR(S$拆结果3)>
MOVS$二拆0魔
#IF
EQUALS$比对数30·0·S
EQUALS$拆结果3
#ACT
GetRandomText..\QuestDiary\数据库\拆解\道.txt<$STR(S$拆结果3)>
MOVS$二拆0道
#IF
EQUAL<$BOXITEM[3].COLOR>150
#ACT
GetRandomText..\QuestDiary\数据库\拆解\未鉴定碎块.txtS$拆解色3
#ELSEACT
GetRandomText..\QuestDiary\数据库\拆解\取色表.txtS$拆解色3<$BOXITEM[3].COLOR>
#IF
EQUALS$拆解色3(普通)
#ACT
DECN$拆几率35
MOVN$拆解色3255
#IF
EQUALS$拆解色3(精良)
#ACT
DECN$拆几率310
MOVN$拆解色3250
#IF
EQUALS$拆解色3(稀有)
#ACT
DECN$拆几率315
MOVN$拆解色3154
#IF
EQUALS$拆解色3(罕有)
#ACT
DECN$拆几率326
MOVN$拆解色3243
#IF
EQUALS$拆解色3(远古)
#ACT
DECN$拆几率335
MOVN$拆解色3253
#IF
EQUALS$拆解色3(传说)
#ACT
DECN$拆几率350
MOVN$拆解色358
#IF
#ACT
MOVS$粉碎按钮<开始粉碎/@开始粉碎>
DELAYGOTO20@综合
[@ItemOutBox3]
#ACT
MOVS$拆解类3
#IF
EQUAL<$BOXITEM[0].NAME>
EQUAL<$BOXITEM[1].NAME>
EQUAL<$BOXITEM[2].NAME>
EQUAL<$BOXITEM[4].NAME>
EQUAL<$BOXITEM[5].NAME>
EQUAL<$BOXITEM[6].NAME>
EQUAL<$BOXITEM[7].NAME>
#ACT
MOVS$粉碎按钮<开始粉碎/FCOLOR=230>
DELAYGOTO20@综合
;-----------------------------------------------------------托盘4号
[@ItemIntoBox4]
#IF
EQUAL<$BOXITEM[4].COLOR>230
#ACT
UNALLOWITEMINTOBOX
SENDMSG5该道具不能进行分解粉碎！
break
#elseact
MOVN$拆几率4100
MOVS$拆结果4
MOVS$比对数4D·M·S
;---------类4
#IF
CHECKTEXTLIST..\QuestDiary\数据库\拆解\40级表.txt<$BOXITEM[4].NAME>
#ACT
MOVS$拆解类440级
DECN$拆几率410
#IF
CHECKTEXTLIST..\QuestDiary\数据库\拆解\50级表.txt<$BOXITEM[4].NAME>
#ACT
MOVS$拆解类450级
DECN$拆几率412
#IF
CHECKTEXTLIST..\QuestDiary\数据库\拆解\60级表.txt<$BOXITEM[4].NAME>
#ACT
MOVS$拆解类460级
DECN$拆几率413
#IF
CHECKTEXTLIST..\QuestDiary\数据库\拆解\70级表.txt<$BOXITEM[4].NAME>
#ACT
MOVS$拆解类470级
DECN$拆几率414
#IF
CHECKTEXTLIST..\QuestDiary\数据库\拆解\80级表.txt<$BOXITEM[4].NAME>
#ACT
MOVS$拆解类480级
DECN$拆几率415
#IF
CHECKTEXTLIST..\QuestDiary\数据库\拆解\90级表.txt<$BOXITEM[4].NAME>
#ACT
MOVS$拆解类490级
DECN$拆几率417
#IF
CHECKTEXTLIST..\QuestDiary\数据库\拆解\100级表.txt<$BOXITEM[4].NAME>
#ACT
MOVS$拆解类4100级
DECN$拆几率420
#OR
EQUAL<$BOXITEM[4].STDMODE>5
EQUAL<$BOXITEM[4].STDMODE>6
#ACT
INCS$拆解类4武器
#OR
EQUAL<$BOXITEM[4].STDMODE>10
EQUAL<$BOXITEM[4].STDMODE>11
#ACT
INCS$拆解类4衣服
#OR
EQUAL<$BOXITEM[4].STDMODE>15
EQUAL<$BOXITEM[4].STDMODE>16
#ACT
INCS$拆解类4头盔
#OR
EQUAL<$BOXITEM[4].STDMODE>19
EQUAL<$BOXITEM[4].STDMODE>20
EQUAL<$BOXITEM[4].STDMODE>21
EQUAL<$BOXITEM[4].STDMODE>22
EQUAL<$BOXITEM[4].STDMODE>23
EQUAL<$BOXITEM[4].STDMODE>24
EQUAL<$BOXITEM[4].STDMODE>26
EQUAL<$BOXITEM[4].STDMODE>28
EQUAL<$BOXITEM[4].STDMODE>30
EQUAL<$BOXITEM[4].STDMODE>52
EQUAL<$BOXITEM[4].STDMODE>54
EQUAL<$BOXITEM[4].STDMODE>62
EQUAL<$BOXITEM[4].STDMODE>64
EQUAL<$BOXITEM[4].STDMODE>65
#ACT
INCS$拆解类4首饰
#IF
EQUAL<$BOXITEM[4].HDC>0
#ACT
ANSIREPLACETEXT<$STR(S$比对数4)>D0
#IF
EQUAL<$BOXITEM[4].HMC>0
#ACT
ANSIREPLACETEXT<$STR(S$比对数4)>M0
#IF
EQUAL<$BOXITEM[4].HSC>0
#ACT
ANSIREPLACETEXT<$STR(S$比对数4)>S0
#IF
EQUALS$比对数4D·M·S
CHECKTEXTLIST..\QuestDiary\数据库\拆解\防御.txt<$BOXITEM[4].STDMODE>
#ACT
GetRandomText..\QuestDiary\数据库\拆解\防均衡.txt<$STR(S$拆结果4)>
MOVS$二拆0防均衡
#IF
EQUALS$比对数40·M·S
CHECKTEXTLIST..\QuestDiary\数据库\拆解\防御.txt<$BOXITEM[4].STDMODE>
#ACT
GetRandomText..\QuestDiary\数据库\拆解\防魔道.txt<$STR(S$拆结果4)>
MOVS$二拆0防魔道
#IF
EQUALS$比对数4D·0·S
CHECKTEXTLIST..\QuestDiary\数据库\拆解\防御.txt<$BOXITEM[4].STDMODE>
#ACT
GetRandomText..\QuestDiary\数据库\拆解\防攻道.txt<$STR(S$拆结果4)>
MOVS$二拆0防攻道
#IF
EQUALS$比对数4D·M·0
CHECKTEXTLIST..\QuestDiary\数据库\拆解\防御.txt<$BOXITEM[4].STDMODE>
#ACT
GetRandomText..\QuestDiary\数据库\拆解\防攻魔.txt<$STR(S$拆结果4)>
MOVS$二拆0防攻魔
#IF
EQUALS$比对数4D·0·0
CHECKTEXTLIST..\QuestDiary\数据库\拆解\防御.txt<$BOXITEM[4].STDMODE>
#ACT
GetRandomText..\QuestDiary\数据库\拆解\防攻.txt<$STR(S$拆结果4)>
MOVS$二拆0防攻
#IF
EQUALS$比对数40·M·0
CHECKTEXTLIST..\QuestDiary\数据库\拆解\防御.txt<$BOXITEM[4].STDMODE>
#ACT
GetRandomText..\QuestDiary\数据库\拆解\防魔.txt<$STR(S$拆结果4)>
MOVS$二拆0防魔
#IF
EQUALS$比对数40·0·S
CHECKTEXTLIST..\QuestDiary\数据库\拆解\防御.txt<$BOXITEM[4].STDMODE>
#ACT
GetRandomText..\QuestDiary\数据库\拆解\防道.txt<$STR(S$拆结果4)>
MOVS$二拆0防道
#IF
EQUALS$比对数4D·M·S
EQUALS$拆结果4
#ACT
GetRandomText..\QuestDiary\数据库\拆解\均衡.txt<$STR(S$拆结果4)>
MOVS$二拆0均衡
#IF
EQUALS$比对数4D·M·0
EQUALS$拆结果4
#ACT
GetRandomText..\QuestDiary\数据库\拆解\攻魔.txt<$STR(S$拆结果4)>
MOVS$二拆0攻魔
#IF
EQUALS$比对数4D·0·S
EQUALS$拆结果4
#ACT
GetRandomText..\QuestDiary\数据库\拆解\攻道.txt<$STR(S$拆结果4)>
MOVS$二拆0攻道
#IF
EQUALS$比对数40·M·S
EQUALS$拆结果4
#ACT
GetRandomText..\QuestDiary\数据库\拆解\魔道.txt<$STR(S$拆结果4)>
MOVS$二拆0魔道
#IF
EQUALS$比对数4D·0·0
EQUALS$拆结果4
#ACT
GetRandomText..\QuestDiary\数据库\拆解\攻.txt<$STR(S$拆结果4)>
MOVS$二拆0攻
#IF
EQUALS$比对数40·M·0
EQUALS$拆结果4
#ACT
GetRandomText..\QuestDiary\数据库\拆解\魔.txt<$STR(S$拆结果4)>
MOVS$二拆0魔
#IF
EQUALS$比对数40·0·S
EQUALS$拆结果4
#ACT
GetRandomText..\QuestDiary\数据库\拆解\道.txt<$STR(S$拆结果4)>
MOVS$二拆0道
#IF
EQUAL<$BOXITEM[4].COLOR>150
#ACT
GetRandomText..\QuestDiary\数据库\拆解\未鉴定碎块.txtS$拆解色4
#ELSEACT
GetRandomText..\QuestDiary\数据库\拆解\取色表.txtS$拆解色4<$BOXITEM[4].COLOR>
#IF
EQUALS$拆解色4(普通)
#ACT
DECN$拆几率45
MOVN$拆解色4255
#IF
EQUALS$拆解色4(精良)
#ACT
DECN$拆几率410
MOVN$拆解色4250
#IF
EQUALS$拆解色4(稀有)
#ACT
DECN$拆几率415
MOVN$拆解色4154
#IF
EQUALS$拆解色4(罕有)
#ACT
DECN$拆几率426
MOVN$拆解色4243
#IF
EQUALS$拆解色4(远古)
#ACT
DECN$拆几率435
MOVN$拆解色4253
#IF
EQUALS$拆解色4(传说)
#ACT
DECN$拆几率450
MOVN$拆解色458
#IF
#ACT
MOVS$粉碎按钮<开始粉碎/@开始粉碎>
DELAYGOTO20@综合
[@ItemOutBox4]
#ACT
MOVS$拆解类4
#IF
EQUAL<$BOXITEM[0].NAME>
EQUAL<$BOXITEM[1].NAME>
EQUAL<$BOXITEM[2].NAME>
EQUAL<$BOXITEM[3].NAME>
EQUAL<$BOXITEM[5].NAME>
EQUAL<$BOXITEM[6].NAME>
EQUAL<$BOXITEM[7].NAME>
#ACT
MOVS$粉碎按钮<开始粉碎/FCOLOR=230>
DELAYGOTO20@综合
;-----------------------------------------------------------托盘5号
[@ItemIntoBox5]
#IF
EQUAL<$BOXITEM[5].COLOR>230
#ACT
UNALLOWITEMINTOBOX
SENDMSG5该道具不能进行分解粉碎！
break
#elseact
MOVN$拆几率5100
MOVS$拆结果5
MOVS$比对数5D·M·S
;---------类5
#IF
CHECKTEXTLIST..\QuestDiary\数据库\拆解\40级表.txt<$BOXITEM[5].NAME>
#ACT
MOVS$拆解类540级
DECN$拆几率510
#IF
CHECKTEXTLIST..\QuestDiary\数据库\拆解\50级表.txt<$BOXITEM[5].NAME>
#ACT
MOVS$拆解类550级
DECN$拆几率512
#IF
CHECKTEXTLIST..\QuestDiary\数据库\拆解\60级表.txt<$BOXITEM[5].NAME>
#ACT
MOVS$拆解类560级
DECN$拆几率513
#IF
CHECKTEXTLIST..\QuestDiary\数据库\拆解\70级表.txt<$BOXITEM[5].NAME>
#ACT
MOVS$拆解类570级
DECN$拆几率514
#IF
CHECKTEXTLIST..\QuestDiary\数据库\拆解\80级表.txt<$BOXITEM[5].NAME>
#ACT
MOVS$拆解类580级
DECN$拆几率515
#IF
CHECKTEXTLIST..\QuestDiary\数据库\拆解\90级表.txt<$BOXITEM[5].NAME>
#ACT
MOVS$拆解类590级
DECN$拆几率517
#IF
CHECKTEXTLIST..\QuestDiary\数据库\拆解\100级表.txt<$BOXITEM[5].NAME>
#ACT
MOVS$拆解类5100级
DECN$拆几率520
#OR
EQUAL<$BOXITEM[5].STDMODE>5
EQUAL<$BOXITEM[5].STDMODE>6
#ACT
INCS$拆解类5武器
#OR
EQUAL<$BOXITEM[5].STDMODE>10
EQUAL<$BOXITEM[5].STDMODE>11
#ACT
INCS$拆解类5衣服
#OR
EQUAL<$BOXITEM[5].STDMODE>15
EQUAL<$BOXITEM[5].STDMODE>16
#ACT
INCS$拆解类5头盔
#OR
EQUAL<$BOXITEM[5].STDMODE>19
EQUAL<$BOXITEM[5].STDMODE>20
EQUAL<$BOXITEM[5].STDMODE>21
EQUAL<$BOXITEM[5].STDMODE>22
EQUAL<$BOXITEM[5].STDMODE>23
EQUAL<$BOXITEM[5].STDMODE>24
EQUAL<$BOXITEM[5].STDMODE>26
EQUAL<$BOXITEM[5].STDMODE>28
EQUAL<$BOXITEM[5].STDMODE>30
EQUAL<$BOXITEM[5].STDMODE>52
EQUAL<$BOXITEM[5].STDMODE>54
EQUAL<$BOXITEM[5].STDMODE>62
EQUAL<$BOXITEM[5].STDMODE>64
EQUAL<$BOXITEM[5].STDMODE>65
#ACT
INCS$拆解类5首饰
#IF
EQUAL<$BOXITEM[5].HDC>0
#ACT
ANSIREPLACETEXT<$STR(S$比对数5)>D0
#IF
EQUAL<$BOXITEM[5].HMC>0
#ACT
ANSIREPLACETEXT<$STR(S$比对数5)>M0
#IF
EQUAL<$BOXITEM[5].HSC>0
#ACT
ANSIREPLACETEXT<$STR(S$比对数5)>S0
#IF
EQUALS$比对数5D·M·S
CHECKTEXTLIST..\QuestDiary\数据库\拆解\防御.txt<$BOXITEM[5].STDMODE>
#ACT
GetRandomText..\QuestDiary\数据库\拆解\防均衡.txt<$STR(S$拆结果5)>
MOVS$二拆0防均衡
#IF
EQUALS$比对数50·M·S
CHECKTEXTLIST..\QuestDiary\数据库\拆解\防御.txt<$BOXITEM[5].STDMODE>
#ACT
GetRandomText..\QuestDiary\数据库\拆解\防魔道.txt<$STR(S$拆结果5)>
MOVS$二拆0防魔道
#IF
EQUALS$比对数5D·0·S
CHECKTEXTLIST..\QuestDiary\数据库\拆解\防御.txt<$BOXITEM[5].STDMODE>
#ACT
GetRandomText..\QuestDiary\数据库\拆解\防攻道.txt<$STR(S$拆结果5)>
MOVS$二拆0防攻道
#IF
EQUALS$比对数5D·M·0
CHECKTEXTLIST..\QuestDiary\数据库\拆解\防御.txt<$BOXITEM[5].STDMODE>
#ACT
GetRandomText..\QuestDiary\数据库\拆解\防攻魔.txt<$STR(S$拆结果5)>
MOVS$二拆0防攻魔
#IF
EQUALS$比对数5D·0·0
CHECKTEXTLIST..\QuestDiary\数据库\拆解\防御.txt<$BOXITEM[5].STDMODE>
#ACT
GetRandomText..\QuestDiary\数据库\拆解\防攻.txt<$STR(S$拆结果5)>
MOVS$二拆0防攻
#IF
EQUALS$比对数50·M·0
CHECKTEXTLIST..\QuestDiary\数据库\拆解\防御.txt<$BOXITEM[5].STDMODE>
#ACT
GetRandomText..\QuestDiary\数据库\拆解\防魔.txt<$STR(S$拆结果5)>
MOVS$二拆0防魔
#IF
EQUALS$比对数50·0·S
CHECKTEXTLIST..\QuestDiary\数据库\拆解\防御.txt<$BOXITEM[5].STDMODE>
#ACT
GetRandomText..\QuestDiary\数据库\拆解\防道.txt<$STR(S$拆结果5)>
MOVS$二拆0防道
#IF
EQUALS$比对数5D·M·S
EQUALS$拆结果5
#ACT
GetRandomText..\QuestDiary\数据库\拆解\均衡.txt<$STR(S$拆结果5)>
MOVS$二拆0均衡
#IF
EQUALS$比对数5D·M·0
EQUALS$拆结果5
#ACT
GetRandomText..\QuestDiary\数据库\拆解\攻魔.txt<$STR(S$拆结果5)>
MOVS$二拆0攻魔
#IF
EQUALS$比对数5D·0·S
EQUALS$拆结果5
#ACT
GetRandomText..\QuestDiary\数据库\拆解\攻道.txt<$STR(S$拆结果5)>
MOVS$二拆0攻道
#IF
EQUALS$比对数50·M·S
EQUALS$拆结果5
#ACT
GetRandomText..\QuestDiary\数据库\拆解\魔道.txt<$STR(S$拆结果5)>
MOVS$二拆0魔道
#IF
EQUALS$比对数5D·0·0
EQUALS$拆结果5
#ACT
GetRandomText..\QuestDiary\数据库\拆解\攻.txt<$STR(S$拆结果5)>
MOVS$二拆0攻
#IF
EQUALS$比对数50·M·0
EQUALS$拆结果5
#ACT
GetRandomText..\QuestDiary\数据库\拆解\魔.txt<$STR(S$拆结果5)>
MOVS$二拆0魔
#IF
EQUALS$比对数50·0·S
EQUALS$拆结果5
#ACT
GetRandomText..\QuestDiary\数据库\拆解\道.txt<$STR(S$拆结果5)>
MOVS$二拆0道
#IF
EQUAL<$BOXITEM[5].COLOR>150
#ACT
GetRandomText..\QuestDiary\数据库\拆解\未鉴定碎块.txtS$拆解色5
#ELSEACT
GetRandomText..\QuestDiary\数据库\拆解\取色表.txtS$拆解色5<$BOXITEM[5].COLOR>
#IF
EQUALS$拆解色5(普通)
#ACT
DECN$拆几率55
MOVN$拆解色5255
#IF
EQUALS$拆解色5(精良)
#ACT
DECN$拆几率510
MOVN$拆解色5250
#IF
EQUALS$拆解色5(稀有)
#ACT
DECN$拆几率515
MOVN$拆解色5154
#IF
EQUALS$拆解色5(罕有)
#ACT
DECN$拆几率526
MOVN$拆解色5243
#IF
EQUALS$拆解色5(远古)
#ACT
DECN$拆几率535
MOVN$拆解色5253
#IF
EQUALS$拆解色5(传说)
#ACT
DECN$拆几率550
MOVN$拆解色558
#IF
#ACT
MOVS$粉碎按钮<开始粉碎/@开始粉碎>
DELAYGOTO20@综合
[@ItemOutBox5]
#ACT
MOVS$拆解类5
#IF
EQUAL<$BOXITEM[0].NAME>
EQUAL<$BOXITEM[1].NAME>
EQUAL<$BOXITEM[2].NAME>
EQUAL<$BOXITEM[3].NAME>
EQUAL<$BOXITEM[4].NAME>
EQUAL<$BOXITEM[6].NAME>
EQUAL<$BOXITEM[7].NAME>
#ACT
MOVS$粉碎按钮<开始粉碎/FCOLOR=230>
DELAYGOTO20@综合
;-----------------------------------------------------------托盘6号
[@ItemIntoBox6]
#IF
EQUAL<$BOXITEM[6].COLOR>230
#ACT
UNALLOWITEMINTOBOX
SENDMSG5该道具不能进行分解粉碎！
break
#elseact
MOVN$拆几率6100
MOVS$拆结果6
MOVS$比对数6D·M·S
;---------类6
;---------色6
#IF
CHECKTEXTLIST..\QuestDiary\数据库\拆解\40级表.txt<$BOXITEM[6].NAME>
#ACT
MOVS$拆解类640级
DECN$拆几率610
#IF
CHECKTEXTLIST..\QuestDiary\数据库\拆解\50级表.txt<$BOXITEM[6].NAME>
#ACT
MOVS$拆解类650级
DECN$拆几率612
#IF
CHECKTEXTLIST..\QuestDiary\数据库\拆解\60级表.txt<$BOXITEM[6].NAME>
#ACT
MOVS$拆解类660级
DECN$拆几率613
#IF
CHECKTEXTLIST..\QuestDiary\数据库\拆解\70级表.txt<$BOXITEM[6].NAME>
#ACT
MOVS$拆解类670级
DECN$拆几率614
#IF
CHECKTEXTLIST..\QuestDiary\数据库\拆解\80级表.txt<$BOXITEM[6].NAME>
#ACT
MOVS$拆解类680级
DECN$拆几率615
#IF
CHECKTEXTLIST..\QuestDiary\数据库\拆解\90级表.txt<$BOXITEM[6].NAME>
#ACT
MOVS$拆解类690级
DECN$拆几率617
#IF
CHECKTEXTLIST..\QuestDiary\数据库\拆解\100级表.txt<$BOXITEM[6].NAME>
#ACT
MOVS$拆解类6100级
DECN$拆几率620
#OR
EQUAL<$BOXITEM[6].STDMODE>5
EQUAL<$BOXITEM[6].STDMODE>6
#ACT
INCS$拆解类6武器
#OR
EQUAL<$BOXITEM[6].STDMODE>10
EQUAL<$BOXITEM[6].STDMODE>11
#ACT
INCS$拆解类6衣服
#OR
EQUAL<$BOXITEM[6].STDMODE>15
EQUAL<$BOXITEM[6].STDMODE>16
#ACT
INCS$拆解类6头盔
#OR
EQUAL<$BOXITEM[6].STDMODE>19
EQUAL<$BOXITEM[6].STDMODE>20
EQUAL<$BOXITEM[6].STDMODE>21
EQUAL<$BOXITEM[6].STDMODE>22
EQUAL<$BOXITEM[6].STDMODE>23
EQUAL<$BOXITEM[6].STDMODE>24
EQUAL<$BOXITEM[6].STDMODE>26
EQUAL<$BOXITEM[6].STDMODE>28
EQUAL<$BOXITEM[6].STDMODE>30
EQUAL<$BOXITEM[6].STDMODE>52
EQUAL<$BOXITEM[6].STDMODE>54
EQUAL<$BOXITEM[6].STDMODE>62
EQUAL<$BOXITEM[6].STDMODE>64
EQUAL<$BOXITEM[6].STDMODE>65
#ACT
INCS$拆解类6首饰
#IF
EQUAL<$BOXITEM[6].HDC>0
#ACT
ANSIREPLACETEXT<$STR(S$比对数6)>D0
#IF
EQUAL<$BOXITEM[6].HMC>0
#ACT
ANSIREPLACETEXT<$STR(S$比对数6)>M0
#IF
EQUAL<$BOXITEM[6].HSC>0
#ACT
ANSIREPLACETEXT<$STR(S$比对数6)>S0
#IF
EQUALS$比对数6D·M·S
CHECKTEXTLIST..\QuestDiary\数据库\拆解\防御.txt<$BOXITEM[6].STDMODE>
#ACT
GetRandomText..\QuestDiary\数据库\拆解\防均衡.txt<$STR(S$拆结果6)>
MOVS$二拆0防均衡
#IF
EQUALS$比对数60·M·S
CHECKTEXTLIST..\QuestDiary\数据库\拆解\防御.txt<$BOXITEM[6].STDMODE>
#ACT
GetRandomText..\QuestDiary\数据库\拆解\防魔道.txt<$STR(S$拆结果6)>
MOVS$二拆0防魔道
#IF
EQUALS$比对数6D·0·S
CHECKTEXTLIST..\QuestDiary\数据库\拆解\防御.txt<$BOXITEM[6].STDMODE>
#ACT
GetRandomText..\QuestDiary\数据库\拆解\防攻道.txt<$STR(S$拆结果6)>
MOVS$二拆0防攻道
#IF
EQUALS$比对数6D·M·0
CHECKTEXTLIST..\QuestDiary\数据库\拆解\防御.txt<$BOXITEM[6].STDMODE>
#ACT
GetRandomText..\QuestDiary\数据库\拆解\防攻魔.txt<$STR(S$拆结果6)>
MOVS$二拆0防攻魔
#IF
EQUALS$比对数6D·0·0
CHECKTEXTLIST..\QuestDiary\数据库\拆解\防御.txt<$BOXITEM[6].STDMODE>
#ACT
GetRandomText..\QuestDiary\数据库\拆解\防攻.txt<$STR(S$拆结果6)>
MOVS$二拆0防攻
#IF
EQUALS$比对数60·M·0
CHECKTEXTLIST..\QuestDiary\数据库\拆解\防御.txt<$BOXITEM[6].STDMODE>
#ACT
GetRandomText..\QuestDiary\数据库\拆解\防魔.txt<$STR(S$拆结果6)>
MOVS$二拆0防魔
#IF
EQUALS$比对数60·0·S
CHECKTEXTLIST..\QuestDiary\数据库\拆解\防御.txt<$BOXITEM[6].STDMODE>
#ACT
GetRandomText..\QuestDiary\数据库\拆解\防道.txt<$STR(S$拆结果6)>
MOVS$二拆0防道
#IF
EQUALS$比对数6D·M·S
EQUALS$拆结果6
#ACT
GetRandomText..\QuestDiary\数据库\拆解\均衡.txt<$STR(S$拆结果6)>
MOVS$二拆0均衡
#IF
EQUALS$比对数6D·M·0
EQUALS$拆结果6
#ACT
GetRandomText..\QuestDiary\数据库\拆解\攻魔.txt<$STR(S$拆结果6)>
MOVS$二拆0攻魔
#IF
EQUALS$比对数6D·0·S
EQUALS$拆结果6
#ACT
GetRandomText..\QuestDiary\数据库\拆解\攻道.txt<$STR(S$拆结果6)>
MOVS$二拆0攻道
#IF
EQUALS$比对数60·M·S
EQUALS$拆结果6
#ACT
GetRandomText..\QuestDiary\数据库\拆解\魔道.txt<$STR(S$拆结果6)>
MOVS$二拆0魔道
#IF
EQUALS$比对数6D·0·0
EQUALS$拆结果6
#ACT
GetRandomText..\QuestDiary\数据库\拆解\攻.txt<$STR(S$拆结果6)>
MOVS$二拆0攻
#IF
EQUALS$比对数60·M·0
EQUALS$拆结果6
#ACT
GetRandomText..\QuestDiary\数据库\拆解\魔.txt<$STR(S$拆结果6)>
MOVS$二拆0魔
#IF
EQUALS$比对数60·0·S
EQUALS$拆结果6
#ACT
GetRandomText..\QuestDiary\数据库\拆解\道.txt<$STR(S$拆结果6)>
MOVS$二拆0道
#IF
EQUAL<$BOXITEM[6].COLOR>150
#ACT
GetRandomText..\QuestDiary\数据库\拆解\未鉴定碎块.txtS$拆解色6
#ELSEACT
GetRandomText..\QuestDiary\数据库\拆解\取色表.txtS$拆解色6<$BOXITEM[6].COLOR>
#IF
EQUALS$拆解色6(普通)
#ACT
DECN$拆几率65
MOVN$拆解色6255
#IF
EQUALS$拆解色6(精良)
#ACT
DECN$拆几率610
MOVN$拆解色6250
#IF
EQUALS$拆解色6(稀有)
#ACT
DECN$拆几率615
MOVN$拆解色6154
#IF
EQUALS$拆解色6(罕有)
#ACT
DECN$拆几率626
MOVN$拆解色6243
#IF
EQUALS$拆解色6(远古)
#ACT
DECN$拆几率635
MOVN$拆解色6253
#IF
EQUALS$拆解色6(传说)
#ACT
DECN$拆几率650
MOVN$拆解色658
#IF
#ACT
MOVS$粉碎按钮<开始粉碎/@开始粉碎>
DELAYGOTO20@综合
[@ItemOutBox6]
#ACT
MOVS$拆解类6
#IF
EQUAL<$BOXITEM[0].NAME>
EQUAL<$BOXITEM[1].NAME>
EQUAL<$BOXITEM[2].NAME>
EQUAL<$BOXITEM[3].NAME>
EQUAL<$BOXITEM[4].NAME>
EQUAL<$BOXITEM[5].NAME>
EQUAL<$BOXITEM[7].NAME>
#ACT
MOVS$粉碎按钮<开始粉碎/FCOLOR=230>
DELAYGOTO20@综合
;-----------------------------------------------------------托盘7号
[@ItemIntoBox7]
#IF
EQUAL<$BOXITEM[7].COLOR>230
#ACT
UNALLOWITEMINTOBOX
SENDMSG5该道具不能进行分解粉碎！
break
#elseact
MOVN$拆几率7100
MOVS$拆结果7
MOVS$比对数7D·M·S
;---------类7
;---------色7
#IF
CHECKTEXTLIST..\QuestDiary\数据库\拆解\40级表.txt<$BOXITEM[7].NAME>
#ACT
MOVS$拆解类740级
DECN$拆几率710
#IF
CHECKTEXTLIST..\QuestDiary\数据库\拆解\50级表.txt<$BOXITEM[7].NAME>
#ACT
MOVS$拆解类750级
DECN$拆几率712
#IF
CHECKTEXTLIST..\QuestDiary\数据库\拆解\60级表.txt<$BOXITEM[7].NAME>
#ACT
MOVS$拆解类760级
DECN$拆几率713
#IF
CHECKTEXTLIST..\QuestDiary\数据库\拆解\70级表.txt<$BOXITEM[7].NAME>
#ACT
MOVS$拆解类770级
DECN$拆几率714
#IF
CHECKTEXTLIST..\QuestDiary\数据库\拆解\80级表.txt<$BOXITEM[7].NAME>
#ACT
MOVS$拆解类780级
DECN$拆几率715
#IF
CHECKTEXTLIST..\QuestDiary\数据库\拆解\90级表.txt<$BOXITEM[7].NAME>
#ACT
MOVS$拆解类790级
DECN$拆几率717
#IF
CHECKTEXTLIST..\QuestDiary\数据库\拆解\100级表.txt<$BOXITEM[7].NAME>
#ACT
MOVS$拆解类7100级
DECN$拆几率720
#OR
EQUAL<$BOXITEM[7].STDMODE>5
EQUAL<$BOXITEM[7].STDMODE>6
#ACT
INCS$拆解类7武器
#OR
EQUAL<$BOXITEM[7].STDMODE>10
EQUAL<$BOXITEM[7].STDMODE>11
#ACT
INCS$拆解类7衣服
#OR
EQUAL<$BOXITEM[7].STDMODE>15
EQUAL<$BOXITEM[7].STDMODE>16
#ACT
INCS$拆解类7头盔
#OR
EQUAL<$BOXITEM[7].STDMODE>19
EQUAL<$BOXITEM[7].STDMODE>20
EQUAL<$BOXITEM[7].STDMODE>21
EQUAL<$BOXITEM[7].STDMODE>22
EQUAL<$BOXITEM[7].STDMODE>23
EQUAL<$BOXITEM[7].STDMODE>24
EQUAL<$BOXITEM[7].STDMODE>26
EQUAL<$BOXITEM[7].STDMODE>28
EQUAL<$BOXITEM[7].STDMODE>30
EQUAL<$BOXITEM[7].STDMODE>52
EQUAL<$BOXITEM[7].STDMODE>54
EQUAL<$BOXITEM[7].STDMODE>62
EQUAL<$BOXITEM[7].STDMODE>64
EQUAL<$BOXITEM[7].STDMODE>65
#ACT
INCS$拆解类7首饰
#IF
EQUAL<$BOXITEM[7].HDC>0
#ACT
ANSIREPLACETEXT<$STR(S$比对数7)>D0
#IF
EQUAL<$BOXITEM[7].HMC>0
#ACT
ANSIREPLACETEXT<$STR(S$比对数7)>M0
#IF
EQUAL<$BOXITEM[7].HSC>0
#ACT
ANSIREPLACETEXT<$STR(S$比对数7)>S0
#IF
EQUALS$比对数7D·M·S
CHECKTEXTLIST..\QuestDiary\数据库\拆解\防御.txt<$BOXITEM[7].STDMODE>
#ACT
GetRandomText..\QuestDiary\数据库\拆解\防均衡.txt<$STR(S$拆结果7)>
MOVS$二拆0防均衡
#IF
EQUALS$比对数70·M·S
CHECKTEXTLIST..\QuestDiary\数据库\拆解\防御.txt<$BOXITEM[7].STDMODE>
#ACT
GetRandomText..\QuestDiary\数据库\拆解\防魔道.txt<$STR(S$拆结果7)>
MOVS$二拆0防魔道
#IF
EQUALS$比对数7D·0·S
CHECKTEXTLIST..\QuestDiary\数据库\拆解\防御.txt<$BOXITEM[7].STDMODE>
#ACT
GetRandomText..\QuestDiary\数据库\拆解\防攻道.txt<$STR(S$拆结果7)>
MOVS$二拆0防攻道
#IF
EQUALS$比对数7D·M·0
CHECKTEXTLIST..\QuestDiary\数据库\拆解\防御.txt<$BOXITEM[7].STDMODE>
#ACT
GetRandomText..\QuestDiary\数据库\拆解\防攻魔.txt<$STR(S$拆结果7)>
MOVS$二拆0防攻魔
#IF
EQUALS$比对数7D·0·0
CHECKTEXTLIST..\QuestDiary\数据库\拆解\防御.txt<$BOXITEM[7].STDMODE>
#ACT
GetRandomText..\QuestDiary\数据库\拆解\防攻.txt<$STR(S$拆结果7)>
MOVS$二拆0防攻
#IF
EQUALS$比对数70·M·0
CHECKTEXTLIST..\QuestDiary\数据库\拆解\防御.txt<$BOXITEM[7].STDMODE>
#ACT
GetRandomText..\QuestDiary\数据库\拆解\防魔.txt<$STR(S$拆结果7)>
MOVS$二拆0防魔
#IF
EQUALS$比对数70·0·S
CHECKTEXTLIST..\QuestDiary\数据库\拆解\防御.txt<$BOXITEM[7].STDMODE>
#ACT
GetRandomText..\QuestDiary\数据库\拆解\防道.txt<$STR(S$拆结果7)>
MOVS$二拆0防道
#IF
EQUALS$比对数7D·M·S
EQUALS$拆结果7
#ACT
GetRandomText..\QuestDiary\数据库\拆解\均衡.txt<$STR(S$拆结果7)>
MOVS$二拆0均衡
#IF
EQUALS$比对数7D·M·0
EQUALS$拆结果7
#ACT
GetRandomText..\QuestDiary\数据库\拆解\攻魔.txt<$STR(S$拆结果7)>
MOVS$二拆0攻魔
#IF
EQUALS$比对数7D·0·S
EQUALS$拆结果7
#ACT
GetRandomText..\QuestDiary\数据库\拆解\攻道.txt<$STR(S$拆结果7)>
MOVS$二拆0攻道
#IF
EQUALS$比对数70·M·S
EQUALS$拆结果7
#ACT
GetRandomText..\QuestDiary\数据库\拆解\魔道.txt<$STR(S$拆结果7)>
MOVS$二拆0魔道
#IF
EQUALS$比对数7D·0·0
EQUALS$拆结果7
#ACT
GetRandomText..\QuestDiary\数据库\拆解\攻.txt<$STR(S$拆结果7)>
MOVS$二拆0攻
#IF
EQUALS$比对数70·M·0
EQUALS$拆结果7
#ACT
GetRandomText..\QuestDiary\数据库\拆解\魔.txt<$STR(S$拆结果7)>
MOVS$二拆0魔
#IF
EQUALS$比对数70·0·S
EQUALS$拆结果7
#ACT
GetRandomText..\QuestDiary\数据库\拆解\道.txt<$STR(S$拆结果7)>
MOVS$二拆0道
#IF
EQUAL<$BOXITEM[7].COLOR>150
#ACT
GetRandomText..\QuestDiary\数据库\拆解\未鉴定碎块.txtS$拆解色7
#ELSEACT
GetRandomText..\QuestDiary\数据库\拆解\取色表.txtS$拆解色7<$BOXITEM[7].COLOR>
#IF
EQUALS$拆解色7(普通)
#ACT
DECN$拆几率75
MOVN$拆解色7255
#IF
EQUALS$拆解色7(精良)
#ACT
DECN$拆几率710
MOVN$拆解色7250
#IF
EQUALS$拆解色7(稀有)
#ACT
DECN$拆几率715
MOVN$拆解色7154
#IF
EQUALS$拆解色7(罕有)
#ACT
DECN$拆几率726
MOVN$拆解色7243
#IF
EQUALS$拆解色7(远古)
#ACT
DECN$拆几率735
MOVN$拆解色7253
#IF
EQUALS$拆解色7(传说)
#ACT
DECN$拆几率750
MOVN$拆解色758
#IF
#ACT
MOVS$粉碎按钮<开始粉碎/@开始粉碎>
DELAYGOTO20@综合
[@ItemOutBox7]
#ACT
MOVS$拆解类7
#IF
EQUAL<$BOXITEM[0].NAME>
EQUAL<$BOXITEM[1].NAME>
EQUAL<$BOXITEM[2].NAME>
EQUAL<$BOXITEM[3].NAME>
EQUAL<$BOXITEM[4].NAME>
EQUAL<$BOXITEM[5].NAME>
EQUAL<$BOXITEM[6].NAME>
#ACT
MOVS$粉碎按钮<开始粉碎/FCOLOR=230>
DELAYGOTO20@综合
[@综合]
#ACT
OPENMERCHANTBIGDLG17380108060
#SAY
<Img:55:4:248:-27/@EXIT>
<Img:388:17:28:-24>
<Img:387:17:-206:-40>\\
;商品区---第一排
<$STR(S$售货0)>\
\\\\\\\\\\\\\\\\
;粉碎页第一排
<ITEMBOX:0:-1:0:-1:-41:33:30:56101115161920212223242630485254626465>
<ITEMBOX:1:-1:0:5:-41:33:30:56101115161920212223242630485254626465>
<ITEMBOX:2:-1:0:11:-41:33:30:56101115161920212223242630485254626465>
<ITEMBOX:3:-1:0:17:-41:33:30:56101115161920212223242630485254626465>\
;粉碎页第二排
<ITEMBOX:4:-1:0:-1:-21:33:30:56101115161920212223242630485254626465>
<ITEMBOX:5:-1:0:5:-21:33:30:56101115161920212223242630485254626465>
<ITEMBOX:6:-1:0:11:-21:33:30:56101115161920212223242630485254626465>
<ITEMBOX:7:-1:0:17:-21:33:30:56101115161920212223242630485254626465>\
<粉碎费用：[/FCOLOR=255>{免费/FCOLOR=222}<]/FCOLOR=255>\
<○/FCOLOR=103><$STR(S$粉碎按钮)>\
<○/FCOLOR=103><返回/@MAIN>\
[@开始粉碎]
#IF
NOTEQUAL<$BOXITEM[0].NAME>
#ACT
MOVRN$拆率0101
#IF
NOTEQUAL<$BOXITEM[1].NAME>
#ACT
MOVRN$拆率1101
#IF
NOTEQUAL<$BOXITEM[2].NAME>
#ACT
MOVRN$拆率2101
#IF
NOTEQUAL<$BOXITEM[3].NAME>
#ACT
MOVRN$拆率3101
#IF
NOTEQUAL<$BOXITEM[4].NAME>
#ACT
MOVRN$拆率4101
#IF
NOTEQUAL<$BOXITEM[5].NAME>
#ACT
MOVRN$拆率5101
#IF
NOTEQUAL<$BOXITEM[6].NAME>
#ACT
MOVRN$拆率6101
#IF
NOTEQUAL<$BOXITEM[6].NAME>
#ACT
MOVRN$拆率7101
#IF
NOTEQUAL<$BOXITEM[0].NAME>
SMALLN$拆率0<$STR(N$拆几率0)>
RANDOM50
#ACT
GetRandomText..\QuestDiary\数据库\拆解\<$STR(S$二拆0)>.txt<$STR(S$拆结果0)>
GIVE<$STR(S$拆解类0)><$STR(S$拆结果0)>碎块<$STR(S$拆解色0)>1
SENDMSG6[拆解]：粉碎[{<$BOXITEM[0].NAME>|<$BOXITEM[0].COLOR>:0:1}]获得了[{<$STR(S$拆解类0)><$STR(S$拆结果0)>碎块<$STR(S$拆解色0)>|<$STR(N$拆解色0)>:0:1}]。
INCN$拆解最后结果1
#IF
NOTEQUAL<$BOXITEM[0].NAME>
SMALLN$拆率0<$STR(N$拆几率0)>
RANDOM20
#ACT
GetRandomText..\QuestDiary\数据库\拆解\<$STR(S$二拆0)>.txt<$STR(S$拆结果0)>
GIVE<$STR(S$拆解类0)><$STR(S$拆结果0)>碎块<$STR(S$拆解色0)>1
SENDMSG6[拆解]：粉碎[{<$BOXITEM[0].NAME>|<$BOXITEM[0].COLOR>:0:1}]获得了[{<$STR(S$拆解类0)><$STR(S$拆结果0)>碎块<$STR(S$拆解色0)>|<$STR(N$拆解色0)>:0:1}]。
INCN$拆解最后结果1
#IF
NOTEQUAL<$BOXITEM[0].NAME>
SMALLN$拆率0<$STR(N$拆几率0)>
#ACT
GIVE<$STR(S$拆解类0)><$STR(S$拆结果0)>碎块<$STR(S$拆解色0)>1
SENDMSG6[拆解]：粉碎[{<$BOXITEM[0].NAME>|<$BOXITEM[0].COLOR>:0:1}]获得了[{<$STR(S$拆解类0)><$STR(S$拆结果0)>碎块<$STR(S$拆解色0)>|<$STR(N$拆解色0)>:0:1}]。
INCN$拆解最后结果1
DELBOXITEM0
UpDateBoxItem0
#IF
NOTEQUAL<$BOXITEM[1].NAME>
SMALLN$拆率1<$STR(N$拆几率1)>
RANDOM50
#ACT
GetRandomText..\QuestDiary\数据库\拆解\<$STR(S$二拆1)>.txt<$STR(S$拆结果1)>
GIVE<$STR(S$拆解类1)><$STR(S$拆结果1)>碎块<$STR(S$拆解色1)>1
SENDMSG6[拆解]：粉碎[{<$BOXITEM[1].NAME>|<$BOXITEM[1].COLOR>:0:1}]获得了[{<$STR(S$拆解类1)><$STR(S$拆结果1)>碎块<$STR(S$拆解色1)>|<$STR(N$拆解色1)>:0:1}]。
INCN$拆解最后结果1
#IF
NOTEQUAL<$BOXITEM[1].NAME>
SMALLN$拆率1<$STR(N$拆几率1)>
RANDOM20
#ACT
GetRandomText..\QuestDiary\数据库\拆解\<$STR(S$二拆0)>.txt<$STR(S$拆结果1)>
GIVE<$STR(S$拆解类1)><$STR(S$拆结果1)>碎块<$STR(S$拆解色1)>1
SENDMSG6[拆解]：粉碎[{<$BOXITEM[1].NAME>|<$BOXITEM[1].COLOR>:0:1}]获得了[{<$STR(S$拆解类1)><$STR(S$拆结果1)>碎块<$STR(S$拆解色1)>|<$STR(N$拆解色1)>:0:1}]。
INCN$拆解最后结果1
#IF
NOTEQUAL<$BOXITEM[1].NAME>
SMALLN$拆率1<$STR(N$拆几率1)>
#ACT
GIVE<$STR(S$拆解类1)><$STR(S$拆结果1)>碎块<$STR(S$拆解色1)>1
SENDMSG6[拆解]：粉碎[{<$BOXITEM[1].NAME>|<$BOXITEM[1].COLOR>:0:1}]获得了[{<$STR(S$拆解类1)><$STR(S$拆结果1)>碎块<$STR(S$拆解色1)>|<$STR(N$拆解色1)>:0:1}]。
INCN$拆解最后结果1
DELBOXITEM1
UpDateBoxItem1
#IF
NOTEQUAL<$BOXITEM[2].NAME>
SMALLN$拆率2<$STR(N$拆几率2)>
RANDOM50
#ACT
GetRandomText..\QuestDiary\数据库\拆解\<$STR(S$二拆2)>.txt<$STR(S$拆结果2)>
GIVE<$STR(S$拆解类2)><$STR(S$拆结果2)>碎块<$STR(S$拆解色2)>1
SENDMSG6[拆解]：粉碎[{<$BOXITEM[2].NAME>|<$BOXITEM[2].COLOR>:0:1}]获得了[{<$STR(S$拆解类2)><$STR(S$拆结果2)>碎块<$STR(S$拆解色2)>|<$STR(N$拆解色2)>:0:1}]。
INCN$拆解最后结果1
#IF
NOTEQUAL<$BOXITEM[2].NAME>
SMALLN$拆率2<$STR(N$拆几率2)>
RANDOM20
#ACT
GetRandomText..\QuestDiary\数据库\拆解\<$STR(S$二拆0)>.txt<$STR(S$拆结果2)>
GIVE<$STR(S$拆解类2)><$STR(S$拆结果2)>碎块<$STR(S$拆解色2)>1
SENDMSG6[拆解]：粉碎[{<$BOXITEM[2].NAME>|<$BOXITEM[2].COLOR>:0:1}]获得了[{<$STR(S$拆解类2)><$STR(S$拆结果2)>碎块<$STR(S$拆解色2)>|<$STR(N$拆解色2)>:0:1}]。
INCN$拆解最后结果1
#IF
NOTEQUAL<$BOXITEM[2].NAME>
SMALLN$拆率2<$STR(N$拆几率2)>
#ACT
GIVE<$STR(S$拆解类2)><$STR(S$拆结果2)>碎块<$STR(S$拆解色2)>1
SENDMSG6[拆解]：粉碎[{<$BOXITEM[2].NAME>|<$BOXITEM[2].COLOR>:0:1}]获得了[{<$STR(S$拆解类2)><$STR(S$拆结果2)>碎块<$STR(S$拆解色2)>|<$STR(N$拆解色2)>:0:1}]。
INCN$拆解最后结果1
DELBOXITEM2
UpDateBoxItem2
#IF
NOTEQUAL<$BOXITEM[3].NAME>
SMALLN$拆率3<$STR(N$拆几率3)>
RANDOM50
#ACT
GetRandomText..\QuestDiary\数据库\拆解\<$STR(S$二拆3)>.txt<$STR(S$拆结果3)>
GIVE<$STR(S$拆解类3)><$STR(S$拆结果3)>碎块<$STR(S$拆解色3)>1
SENDMSG6[拆解]：粉碎[{<$BOXITEM[3].NAME>|<$BOXITEM[3].COLOR>:0:1}]获得了[{<$STR(S$拆解类3)><$STR(S$拆结果3)>碎块<$STR(S$拆解色3)>|<$STR(N$拆解色3)>:0:1}]。
INCN$拆解最后结果1
#IF
NOTEQUAL<$BOXITEM[3].NAME>
SMALLN$拆率3<$STR(N$拆几率3)>
RANDOM20
#ACT
GetRandomText..\QuestDiary\数据库\拆解\<$STR(S$二拆0)>.txt<$STR(S$拆结果3)>
GIVE<$STR(S$拆解类3)><$STR(S$拆结果3)>碎块<$STR(S$拆解色3)>1
SENDMSG6[拆解]：粉碎[{<$BOXITEM[3].NAME>|<$BOXITEM[3].COLOR>:0:1}]获得了[{<$STR(S$拆解类3)><$STR(S$拆结果3)>碎块<$STR(S$拆解色3)>|<$STR(N$拆解色3)>:0:1}]。
INCN$拆解最后结果1
#IF
NOTEQUAL<$BOXITEM[3].NAME>
SMALLN$拆率3<$STR(N$拆几率3)>
#ACT
GIVE<$STR(S$拆解类3)><$STR(S$拆结果3)>碎块<$STR(S$拆解色3)>1
SENDMSG6[拆解]：粉碎[{<$BOXITEM[3].NAME>|<$BOXITEM[3].COLOR>:0:1}]获得了[{<$STR(S$拆解类3)><$STR(S$拆结果3)>碎块<$STR(S$拆解色3)>|<$STR(N$拆解色3)>:0:1}]。
INCN$拆解最后结果1
DELBOXITEM3
UpDateBoxItem3
#IF
NOTEQUAL<$BOXITEM[4].NAME>
SMALLN$拆率4<$STR(N$拆几率4)>
RANDOM50
#ACT
GetRandomText..\QuestDiary\数据库\拆解\<$STR(S$二拆4)>.txt<$STR(S$拆结果4)>
GIVE<$STR(S$拆解类4)><$STR(S$拆结果4)>碎块<$STR(S$拆解色4)>1
SENDMSG6[拆解]：粉碎[{<$BOXITEM[4].NAME>|<$BOXITEM[4].COLOR>:0:1}]获得了[{<$STR(S$拆解类4)><$STR(S$拆结果4)>碎块<$STR(S$拆解色4)>|<$STR(N$拆解色4)>:0:1}]。
INCN$拆解最后结果1
#IF
NOTEQUAL<$BOXITEM[4].NAME>
SMALLN$拆率4<$STR(N$拆几率4)>
RANDOM20
#ACT
GetRandomText..\QuestDiary\数据库\拆解\<$STR(S$二拆0)>.txt<$STR(S$拆结果4)>
GIVE<$STR(S$拆解类4)><$STR(S$拆结果4)>碎块<$STR(S$拆解色4)>1
SENDMSG6[拆解]：粉碎[{<$BOXITEM[4].NAME>|<$BOXITEM[4].COLOR>:0:1}]获得了[{<$STR(S$拆解类4)><$STR(S$拆结果4)>碎块<$STR(S$拆解色4)>|<$STR(N$拆解色4)>:0:1}]。
INCN$拆解最后结果1
#IF
NOTEQUAL<$BOXITEM[4].NAME>
SMALLN$拆率4<$STR(N$拆几率4)>
#ACT
GIVE<$STR(S$拆解类4)><$STR(S$拆结果4)>碎块<$STR(S$拆解色4)>1
SENDMSG6[拆解]：粉碎[{<$BOXITEM[4].NAME>|<$BOXITEM[4].COLOR>:0:1}]获得了[{<$STR(S$拆解类4)><$STR(S$拆结果4)>碎块<$STR(S$拆解色4)>|<$STR(N$拆解色4)>:0:1}]。
INCN$拆解最后结果1
DELBOXITEM4
UpDateBoxItem4
#IF
NOTEQUAL<$BOXITEM[5].NAME>
SMALLN$拆率5<$STR(N$拆几率5)>
RANDOM50
#ACT
GetRandomText..\QuestDiary\数据库\拆解\<$STR(S$二拆5)>.txt<$STR(S$拆结果5)>
GIVE<$STR(S$拆解类5)><$STR(S$拆结果5)>碎块<$STR(S$拆解色5)>1
SENDMSG6[拆解]：粉碎[{<$BOXITEM[5].NAME>|<$BOXITEM[5].COLOR>:0:1}]获得了[{<$STR(S$拆解类5)><$STR(S$拆结果5)>碎块<$STR(S$拆解色5)>|<$STR(N$拆解色5)>:0:1}]。
INCN$拆解最后结果1
#IF
NOTEQUAL<$BOXITEM[5].NAME>
SMALLN$拆率5<$STR(N$拆几率5)>
RANDOM20
#ACT
GetRandomText..\QuestDiary\数据库\拆解\<$STR(S$二拆0)>.txt<$STR(S$拆结果5)>
GIVE<$STR(S$拆解类5)><$STR(S$拆结果5)>碎块<$STR(S$拆解色5)>1
SENDMSG6[拆解]：粉碎[{<$BOXITEM[5].NAME>|<$BOXITEM[5].COLOR>:0:1}]获得了[{<$STR(S$拆解类5)><$STR(S$拆结果5)>碎块<$STR(S$拆解色5)>|<$STR(N$拆解色5)>:0:1}]。
INCN$拆解最后结果1
#IF
NOTEQUAL<$BOXITEM[5].NAME>
SMALLN$拆率5<$STR(N$拆几率5)>
#ACT
GIVE<$STR(S$拆解类5)><$STR(S$拆结果5)>碎块<$STR(S$拆解色5)>1
SENDMSG6[拆解]：粉碎[{<$BOXITEM[5].NAME>|<$BOXITEM[5].COLOR>:0:1}]获得了[{<$STR(S$拆解类5)><$STR(S$拆结果5)>碎块<$STR(S$拆解色5)>|<$STR(N$拆解色5)>:0:1}]。
INCN$拆解最后结果1
DELBOXITEM5
UpDateBoxItem5
#IF
NOTEQUAL<$BOXITEM[6].NAME>
SMALLN$拆率6<$STR(N$拆几率6)>
RANDOM50
#ACT
GetRandomText..\QuestDiary\数据库\拆解\<$STR(S$二拆6)>.txt<$STR(S$拆结果6)>
GIVE<$STR(S$拆解类6)><$STR(S$拆结果6)>碎块<$STR(S$拆解色6)>1
SENDMSG6[拆解]：粉碎[{<$BOXITEM[6].NAME>|<$BOXITEM[6].COLOR>:0:1}]获得了[{<$STR(S$拆解类6)><$STR(S$拆结果6)>碎块<$STR(S$拆解色6)>|<$STR(N$拆解色6)>:0:1}]。
INCN$拆解最后结果1
#IF
NOTEQUAL<$BOXITEM[6].NAME>
SMALLN$拆率6<$STR(N$拆几率6)>
RANDOM20
#ACT
GetRandomText..\QuestDiary\数据库\拆解\<$STR(S$二拆0)>.txt<$STR(S$拆结果6)>
GIVE<$STR(S$拆解类6)><$STR(S$拆结果6)>碎块<$STR(S$拆解色6)>1
SENDMSG6[拆解]：粉碎[{<$BOXITEM[6].NAME>|<$BOXITEM[6].COLOR>:0:1}]获得了[{<$STR(S$拆解类6)><$STR(S$拆结果6)>碎块<$STR(S$拆解色6)>|<$STR(N$拆解色6)>:0:1}]。
INCN$拆解最后结果1
#IF
NOTEQUAL<$BOXITEM[6].NAME>
SMALLN$拆率6<$STR(N$拆几率6)>
#ACT
GIVE<$STR(S$拆解类6)><$STR(S$拆结果6)>碎块<$STR(S$拆解色6)>1
SENDMSG6[拆解]：粉碎[{<$BOXITEM[6].NAME>|<$BOXITEM[6].COLOR>:0:1}]获得了[{<$STR(S$拆解类6)><$STR(S$拆结果6)>碎块<$STR(S$拆解色6)>|<$STR(N$拆解色6)>:0:1}]。
INCN$拆解最后结果1
DELBOXITEM6
UpDateBoxItem6
#IF
NOTEQUAL<$BOXITEM[7].NAME>
SMALLN$拆率7<$STR(N$拆几率7)>
RANDOM50
#ACT
GetRandomText..\QuestDiary\数据库\拆解\<$STR(S$二拆7)>.txt<$STR(S$拆结果7)>
GIVE<$STR(S$拆解类7)><$STR(S$拆结果7)>碎块<$STR(S$拆解色7)>1
SENDMSG6[拆解]：粉碎[{<$BOXITEM[7].NAME>|<$BOXITEM[7].COLOR>:0:1}]获得了[{<$STR(S$拆解类7)><$STR(S$拆结果7)>碎块<$STR(S$拆解色7)>|<$STR(N$拆解色7)>:0:1}]。
INCN$拆解最后结果1
#IF
NOTEQUAL<$BOXITEM[7].NAME>
SMALLN$拆率7<$STR(N$拆几率7)>
RANDOM20
#ACT
GetRandomText..\QuestDiary\数据库\拆解\<$STR(S$二拆0)>.txt<$STR(S$拆结果7)>
GIVE<$STR(S$拆解类7)><$STR(S$拆结果7)>碎块<$STR(S$拆解色7)>1
SENDMSG6[拆解]：粉碎[{<$BOXITEM[7].NAME>|<$BOXITEM[7].COLOR>:0:1}]获得了[{<$STR(S$拆解类7)><$STR(S$拆结果7)>碎块<$STR(S$拆解色7)>|<$STR(N$拆解色7)>:0:1}]。
INCN$拆解最后结果1
#IF
NOTEQUAL<$BOXITEM[7].NAME>
SMALLN$拆率7<$STR(N$拆几率7)>
#ACT
GIVE<$STR(S$拆解类7)><$STR(S$拆结果7)>碎块<$STR(S$拆解色7)>1
SENDMSG6[拆解]：粉碎[{<$BOXITEM[7].NAME>|<$BOXITEM[7].COLOR>:0:1}]获得了[{<$STR(S$拆解类7)><$STR(S$拆结果7)>碎块<$STR(S$拆解色7)>|<$STR(N$拆解色7)>:0:1}]。
INCN$拆解最后结果1
DELBOXITEM7
UpDateBoxItem7
#IF
EQUALN$拆解最后结果0
#ACT
SENDMSG6[拆解]：本次拆解未获得任何东西！~
#IF
#ACT
DELBOXITEM0
DELBOXITEM1
DELBOXITEM2
DELBOXITEM3
DELBOXITEM4
DELBOXITEM5
DELBOXITEM6
DELBOXITEM7
MOVN$拆解最后结果0
GOTO@MAIN
[@MAIN]
#ACT
GetRandomText..\QuestDiary\数据文件\强化\<$USERNAME>\便携式粉碎炉.txt<$STR(S$便炉)>
#IF
CompareText<$STR(S$便炉)><$USERNAME>的炉子在<$MAP>
#ACT
OPENMERCHANTBIGDLG17380108060
#SAY
粉碎炉：\
当您有不需要的装备时可以在粉碎炉里进行粉\
碎粉碎能获得各种碎块用来强化装备。当您使用本\
功能前请仔细阅读<使用说明/@说明>\\
<○/FCOLOR=103><开始粉碎/@粉碎>\
<○/FCOLOR=103><使用说明/@说明>\
<○/FCOLOR=103><离开/@EXIT>
#ELSESAY
这是别人的粉碎炉！~\
<○/FCOLOR=103><离开/@EXIT>\
[@说明]
#ACT
OPENMERCHANTBIGDLG17380108060
#SAY
粉碎炉：\
请仔细阅读下面的几条说明\
1、放入必须是装备，攻城兵器之类的是不能粉碎\\
2、放入的装备属性若包含攻魔道那么粉碎获得后\
的碎块就是攻魔道中随机一种\\
3、放入的装备颜色是什么颜色，粉碎就能获得一\
样的颜色品质。\\
4、未鉴定的装备粉碎时获得的碎块乃是随机鉴定\
后获得的品质\\
5、归类：碎块类别包含武器、头盔、衣服。剩余\
的皆为首饰。\\
6、例子：比如我放入一件红色的武器，武器属性\
只有攻击属性，不包含法术和道术。那么我粉\
碎获得的碎块就是红色品质的攻击碎块若我的\
武器是50-59级的那么碎块等级就是50级碎块\\
<○/FCOLOR=103><开始粉碎/@粉碎>\
<○/FCOLOR=103><返回/@MAIN>\
<○/FCOLOR=103><离开/@EXIT>
[@粉碎]
#ACT
OPENMERCHANTBIGDLG17380108060
ReturnBoxItem0
ReturnBoxItem1
ReturnBoxItem2
ReturnBoxItem3
ReturnBoxItem4
ReturnBoxItem5
ReturnBoxItem6
ReturnBoxItem7
GetRandomText..\QuestDiary\数据库\商店数据\拆解.txt<$STR(S$售货0)>1
#SAY
<Img:55:4:248:-27/@EXIT>
<Img:388:17:28:-24>
<Img:387:17:-206:-40>\\
;商品区---第一排
<$STR(S$售货0)>\
\\\\\\\\\\\\\\\\
;粉碎页第一排
<ITEMBOX:0:-1:0:-1:-41:33:30:56101115161920212223242630485254626465>
<ITEMBOX:1:-1:0:5:-41:33:30:56101115161920212223242630485254626465>
<ITEMBOX:2:-1:0:11:-41:33:30:56101115161920212223242630485254626465>
<ITEMBOX:3:-1:0:17:-41:33:30:56101115161920212223242630485254626465>\
;粉碎页第二排
<ITEMBOX:4:-1:0:-1:-21:33:30:56101115161920212223242630485254626465>
<ITEMBOX:5:-1:0:5:-21:33:30:56101115161920212223242630485254626465>
<ITEMBOX:6:-1:0:11:-21:33:30:56101115161920212223242630485254626465>
<ITEMBOX:7:-1:0:17:-21:33:30:56101115161920212223242630485254626465>\
<粉碎费用：[/FCOLOR=255>{免费/FCOLOR=222}<]/FCOLOR=255>\
<○/FCOLOR=103><开始粉碎/FCOLOR=230>\
<○/FCOLOR=103><返回/@MAIN>\
#ELSESAY
这是别人的粉碎炉！~\
<○/FCOLOR=103><离开/@EXIT>\
[@购物0]
#IF
CHECKBAGSIZE1
#ELSEACT
MESSAGEBOX错误提示：\ \背包空位不足1格，无法购买！
break
#IF
CHECKGAMEGOLD>0
#ACT
GAMEGOLD-1
GIVE回城卷1
#ELSEACT
MESSAGEBOX错误提示：\ \元宝不足1个，不能进行购买！
break
;-----------------------------------------------------------托盘0号
[@ItemIntoBox0]
#IF
EQUAL<$BOXITEM[0].COLOR>230
#ACT
UNALLOWITEMINTOBOX
SENDMSG5该道具不能进行分解粉碎！
break
#IF
EQUAL<$BOXITEM[0].COLOR>254
#ACT
UNALLOWITEMINTOBOX
SENDMSG5该道具不能进行分解粉碎！
break
#IF
#ACT
MOVN$拆几率0100
MOVS$拆结果0
MOVS$比对数0D·M·S
#IF
CHECKTEXTLIST..\QuestDiary\数据库\拆解\40级表.txt<$BOXITEM[0].NAME>
#ACT
MOVS$拆解类040级
DECN$拆几率010
#IF
CHECKTEXTLIST..\QuestDiary\数据库\拆解\50级表.txt<$BOXITEM[0].NAME>
#ACT
MOVS$拆解类050级
DECN$拆几率012
#IF
CHECKTEXTLIST..\QuestDiary\数据库\拆解\60级表.txt<$BOXITEM[0].NAME>
#ACT
MOVS$拆解类060级
DECN$拆几率013
#IF
CHECKTEXTLIST..\QuestDiary\数据库\拆解\70级表.txt<$BOXITEM[0].NAME>
#ACT
MOVS$拆解类070级
DECN$拆几率014
#IF
CHECKTEXTLIST..\QuestDiary\数据库\拆解\80级表.txt<$BOXITEM[0].NAME>
#ACT
MOVS$拆解类080级
DECN$拆几率015
#IF
CHECKTEXTLIST..\QuestDiary\数据库\拆解\90级表.txt<$BOXITEM[0].NAME>
#ACT
MOVS$拆解类090级
DECN$拆几率017
#IF
CHECKTEXTLIST..\QuestDiary\数据库\拆解\100级表.txt<$BOXITEM[0].NAME>
#ACT
MOVS$拆解类0100级
DECN$拆几率020
#OR
EQUAL<$BOXITEM[0].STDMODE>5
EQUAL<$BOXITEM[0].STDMODE>6
#ACT
INCS$拆解类0武器
#OR
EQUAL<$BOXITEM[0].STDMODE>10
EQUAL<$BOXITEM[0].STDMODE>11
#ACT
INCS$拆解类0衣服
#OR
EQUAL<$BOXITEM[0].STDMODE>15
EQUAL<$BOXITEM[0].STDMODE>16
#ACT
INCS$拆解类0头盔
#OR
EQUAL<$BOXITEM[0].STDMODE>19
EQUAL<$BOXITEM[0].STDMODE>20
EQUAL<$BOXITEM[0].STDMODE>21
EQUAL<$BOXITEM[0].STDMODE>22
EQUAL<$BOXITEM[0].STDMODE>23
EQUAL<$BOXITEM[0].STDMODE>24
EQUAL<$BOXITEM[0].STDMODE>26
EQUAL<$BOXITEM[0].STDMODE>28
EQUAL<$BOXITEM[0].STDMODE>30
EQUAL<$BOXITEM[0].STDMODE>52
EQUAL<$BOXITEM[0].STDMODE>54
EQUAL<$BOXITEM[0].STDMODE>62
EQUAL<$BOXITEM[0].STDMODE>64
EQUAL<$BOXITEM[0].STDMODE>65
#ACT
INCS$拆解类0首饰
#IF
EQUAL<$BOXITEM[0].HDC>0
#ACT
ANSIREPLACETEXT<$STR(S$比对数0)>D0
#IF
EQUAL<$BOXITEM[0].HMC>0
#ACT
ANSIREPLACETEXT<$STR(S$比对数0)>M0
#IF
EQUAL<$BOXITEM[0].HSC>0
#ACT
ANSIREPLACETEXT<$STR(S$比对数0)>S0
#IF
EQUALS$比对数0D·M·S
CHECKTEXTLIST..\QuestDiary\数据库\拆解\防御.txt<$BOXITEM[0].STDMODE>
#ACT
GetRandomText..\QuestDiary\数据库\拆解\防均衡.txt<$STR(S$拆结果0)>
MOVS$二拆0防均衡
#IF
EQUALS$比对数00·M·S
CHECKTEXTLIST..\QuestDiary\数据库\拆解\防御.txt<$BOXITEM[0].STDMODE>
#ACT
GetRandomText..\QuestDiary\数据库\拆解\防魔道.txt<$STR(S$拆结果0)>
MOVS$二拆0防魔道
#IF
EQUALS$比对数0D·0·S
CHECKTEXTLIST..\QuestDiary\数据库\拆解\防御.txt<$BOXITEM[0].STDMODE>
#ACT
GetRandomText..\QuestDiary\数据库\拆解\防攻道.txt<$STR(S$拆结果0)>
MOVS$二拆0防攻道
#IF
EQUALS$比对数0D·M·0
CHECKTEXTLIST..\QuestDiary\数据库\拆解\防御.txt<$BOXITEM[0].STDMODE>
#ACT
GetRandomText..\QuestDiary\数据库\拆解\防攻魔.txt<$STR(S$拆结果0)>
MOVS$二拆0防攻魔
#IF
EQUALS$比对数0D·0·0
CHECKTEXTLIST..\QuestDiary\数据库\拆解\防御.txt<$BOXITEM[0].STDMODE>
#ACT
GetRandomText..\QuestDiary\数据库\拆解\防攻.txt<$STR(S$拆结果0)>
MOVS$二拆0防攻
#IF
EQUALS$比对数00·M·0
CHECKTEXTLIST..\QuestDiary\数据库\拆解\防御.txt<$BOXITEM[0].STDMODE>
#ACT
GetRandomText..\QuestDiary\数据库\拆解\防魔.txt<$STR(S$拆结果0)>
MOVS$二拆0防魔
#IF
EQUALS$比对数00·0·S
CHECKTEXTLIST..\QuestDiary\数据库\拆解\防御.txt<$BOXITEM[0].STDMODE>
#ACT
GetRandomText..\QuestDiary\数据库\拆解\防道.txt<$STR(S$拆结果0)>
MOVS$二拆0防道
#IF
EQUALS$比对数0D·M·S
EQUALS$拆结果0
#ACT
GetRandomText..\QuestDiary\数据库\拆解\均衡.txt<$STR(S$拆结果0)>
MOVS$二拆0均衡
#IF
EQUALS$比对数0D·M·0
EQUALS$拆结果0
#ACT
GetRandomText..\QuestDiary\数据库\拆解\攻魔.txt<$STR(S$拆结果0)>
MOVS$二拆0攻魔
#IF
EQUALS$比对数0D·0·S
EQUALS$拆结果0
#ACT
GetRandomText..\QuestDiary\数据库\拆解\攻道.txt<$STR(S$拆结果0)>
MOVS$二拆0攻道
#IF
EQUALS$比对数00·M·S
EQUALS$拆结果0
#ACT
GetRandomText..\QuestDiary\数据库\拆解\魔道.txt<$STR(S$拆结果0)>
MOVS$二拆0魔道
#IF
EQUALS$比对数0D·0·0
EQUALS$拆结果0
#ACT
GetRandomText..\QuestDiary\数据库\拆解\攻.txt<$STR(S$拆结果0)>
MOVS$二拆0攻
#IF
EQUALS$比对数00·M·0
EQUALS$拆结果0
#ACT
GetRandomText..\QuestDiary\数据库\拆解\魔.txt<$STR(S$拆结果0)>
MOVS$二拆0魔
#IF
EQUALS$比对数00·0·S
EQUALS$拆结果0
#ACT
GetRandomText..\QuestDiary\数据库\拆解\道.txt<$STR(S$拆结果0)>
MOVS$二拆0道
#IF
EQUAL<$BOXITEM[0].COLOR>150
#ACT
GetRandomText..\QuestDiary\数据库\拆解\未鉴定碎块.txtS$拆解色0
#ELSEACT
GetRandomText..\QuestDiary\数据库\拆解\取色表.txtS$拆解色0<$BOXITEM[0].COLOR>
#IF
EQUALS$拆解色0(普通)
#ACT
DECN$拆几率05
MOVN$拆解色0255
#IF
EQUALS$拆解色0(精良)
#ACT
DECN$拆几率010
MOVN$拆解色0250
#IF
EQUALS$拆解色0(稀有)
#ACT
DECN$拆几率015
MOVN$拆解色0154
#IF
EQUALS$拆解色0(罕有)
#ACT
DECN$拆几率026
MOVN$拆解色0243
#IF
EQUALS$拆解色0(远古)
#ACT
DECN$拆几率035
MOVN$拆解色0253
#IF
EQUALS$拆解色0(传说)
#ACT
DECN$拆几率050
MOVN$拆解色058
#IF
#ACT
MOVS$粉碎按钮<开始粉碎/@开始粉碎>
DELAYGOTO20@综合
[@ItemOutBox0]
#ACT
MOVS$拆解类0
#IF
EQUAL<$BOXITEM[1].NAME>
EQUAL<$BOXITEM[2].NAME>
EQUAL<$BOXITEM[3].NAME>
EQUAL<$BOXITEM[4].NAME>
EQUAL<$BOXITEM[5].NAME>
EQUAL<$BOXITEM[6].NAME>
EQUAL<$BOXITEM[7].NAME>
#ACT
MOVS$粉碎按钮<开始粉碎/FCOLOR=230>
DELAYGOTO20@综合
;-----------------------------------------------------------托盘1号
[@ItemIntoBox1]
#IF
EQUAL<$BOXITEM[1].COLOR>230
#ACT
UNALLOWITEMINTOBOX
SENDMSG5该道具不能进行分解粉碎！
break
#elseact
MOVN$拆几率1100
MOVS$拆结果1
MOVS$比对数1D·M·S
#IF
CHECKTEXTLIST..\QuestDiary\数据库\拆解\40级表.txt<$BOXITEM[1].NAME>
#ACT
MOVS$拆解类140级
DECN$拆几率110
#IF
CHECKTEXTLIST..\QuestDiary\数据库\拆解\50级表.txt<$BOXITEM[1].NAME>
#ACT
MOVS$拆解类150级
DECN$拆几率112
#IF
CHECKTEXTLIST..\QuestDiary\数据库\拆解\60级表.txt<$BOXITEM[1].NAME>
#ACT
MOVS$拆解类160级
DECN$拆几率113
#IF
CHECKTEXTLIST..\QuestDiary\数据库\拆解\70级表.txt<$BOXITEM[1].NAME>
#ACT
MOVS$拆解类170级
DECN$拆几率114
#IF
CHECKTEXTLIST..\QuestDiary\数据库\拆解\80级表.txt<$BOXITEM[1].NAME>
#ACT
MOVS$拆解类180级
DECN$拆几率115
#IF
CHECKTEXTLIST..\QuestDiary\数据库\拆解\90级表.txt<$BOXITEM[1].NAME>
#ACT
MOVS$拆解类190级
DECN$拆几率117
#IF
CHECKTEXTLIST..\QuestDiary\数据库\拆解\100级表.txt<$BOXITEM[1].NAME>
#ACT
MOVS$拆解类1100级
DECN$拆几率120
#OR
EQUAL<$BOXITEM[1].STDMODE>5
EQUAL<$BOXITEM[1].STDMODE>6
#ACT
INCS$拆解类1武器
#OR
EQUAL<$BOXITEM[1].STDMODE>10
EQUAL<$BOXITEM[1].STDMODE>11
#ACT
INCS$拆解类1衣服
#OR
EQUAL<$BOXITEM[1].STDMODE>15
EQUAL<$BOXITEM[1].STDMODE>16
#ACT
INCS$拆解类1头盔
#OR
EQUAL<$BOXITEM[1].STDMODE>19
EQUAL<$BOXITEM[1].STDMODE>20
EQUAL<$BOXITEM[1].STDMODE>21
EQUAL<$BOXITEM[1].STDMODE>22
EQUAL<$BOXITEM[1].STDMODE>23
EQUAL<$BOXITEM[1].STDMODE>24
EQUAL<$BOXITEM[1].STDMODE>26
EQUAL<$BOXITEM[1].STDMODE>28
EQUAL<$BOXITEM[1].STDMODE>30
EQUAL<$BOXITEM[1].STDMODE>52
EQUAL<$BOXITEM[1].STDMODE>54
EQUAL<$BOXITEM[1].STDMODE>62
EQUAL<$BOXITEM[1].STDMODE>64
EQUAL<$BOXITEM[1].STDMODE>65
#ACT
INCS$拆解类1首饰
#IF
EQUAL<$BOXITEM[1].HDC>0
#ACT
ANSIREPLACETEXT<$STR(S$比对数1)>D0
#IF
EQUAL<$BOXITEM[1].HMC>0
#ACT
ANSIREPLACETEXT<$STR(S$比对数1)>M0
#IF
EQUAL<$BOXITEM[1].HSC>0
#ACT
ANSIREPLACETEXT<$STR(S$比对数1)>S0
#IF
EQUALS$比对数1D·M·S
CHECKTEXTLIST..\QuestDiary\数据库\拆解\防御.txt<$BOXITEM[1].STDMODE>
#ACT
GetRandomText..\QuestDiary\数据库\拆解\防均衡.txt<$STR(S$拆结果1)>
MOVS$二拆0防均衡
#IF
EQUALS$比对数10·M·S
CHECKTEXTLIST..\QuestDiary\数据库\拆解\防御.txt<$BOXITEM[1].STDMODE>
#ACT
GetRandomText..\QuestDiary\数据库\拆解\防魔道.txt<$STR(S$拆结果1)>
MOVS$二拆0防魔道
#IF
EQUALS$比对数1D·0·S
CHECKTEXTLIST..\QuestDiary\数据库\拆解\防御.txt<$BOXITEM[1].STDMODE>
#ACT
GetRandomText..\QuestDiary\数据库\拆解\防攻道.txt<$STR(S$拆结果1)>
MOVS$二拆0防攻道
#IF
EQUALS$比对数1D·M·0
CHECKTEXTLIST..\QuestDiary\数据库\拆解\防御.txt<$BOXITEM[1].STDMODE>
#ACT
GetRandomText..\QuestDiary\数据库\拆解\防攻魔.txt<$STR(S$拆结果1)>
MOVS$二拆0防攻魔
#IF
EQUALS$比对数1D·0·0
CHECKTEXTLIST..\QuestDiary\数据库\拆解\防御.txt<$BOXITEM[1].STDMODE>
#ACT
GetRandomText..\QuestDiary\数据库\拆解\防攻.txt<$STR(S$拆结果1)>
MOVS$二拆0防攻
#IF
EQUALS$比对数10·M·0
CHECKTEXTLIST..\QuestDiary\数据库\拆解\防御.txt<$BOXITEM[1].STDMODE>
#ACT
GetRandomText..\QuestDiary\数据库\拆解\防魔.txt<$STR(S$拆结果1)>
MOVS$二拆0防魔
#IF
EQUALS$比对数10·0·S
CHECKTEXTLIST..\QuestDiary\数据库\拆解\防御.txt<$BOXITEM[1].STDMODE>
#ACT
GetRandomText..\QuestDiary\数据库\拆解\防道.txt<$STR(S$拆结果1)>
MOVS$二拆0防道
#IF
EQUALS$比对数1D·M·S
EQUALS$拆结果1
#ACT
GetRandomText..\QuestDiary\数据库\拆解\均衡.txt<$STR(S$拆结果1)>
MOVS$二拆0均衡
#IF
EQUALS$比对数1D·M·0
EQUALS$拆结果1
#ACT
GetRandomText..\QuestDiary\数据库\拆解\攻魔.txt<$STR(S$拆结果1)>
MOVS$二拆0攻魔
#IF
EQUALS$比对数1D·0·S
EQUALS$拆结果1
#ACT
GetRandomText..\QuestDiary\数据库\拆解\攻道.txt<$STR(S$拆结果1)>
MOVS$二拆0攻道
#IF
EQUALS$比对数10·M·S
EQUALS$拆结果1
#ACT
GetRandomText..\QuestDiary\数据库\拆解\魔道.txt<$STR(S$拆结果1)>
MOVS$二拆0魔道
#IF
EQUALS$比对数1D·0·0
EQUALS$拆结果1
#ACT
GetRandomText..\QuestDiary\数据库\拆解\攻.txt<$STR(S$拆结果1)>
MOVS$二拆0攻
#IF
EQUALS$比对数10·M·0
EQUALS$拆结果1
#ACT
GetRandomText..\QuestDiary\数据库\拆解\魔.txt<$STR(S$拆结果1)>
MOVS$二拆0魔
#IF
EQUALS$比对数10·0·S
EQUALS$拆结果1
#ACT
GetRandomText..\QuestDiary\数据库\拆解\道.txt<$STR(S$拆结果1)>
MOVS$二拆0道
#IF
EQUAL<$BOXITEM[1].COLOR>150
#ACT
GetRandomText..\QuestDiary\数据库\拆解\未鉴定碎块.txtS$拆解色1
#ELSEACT
GetRandomText..\QuestDiary\数据库\拆解\取色表.txtS$拆解色1<$BOXITEM[1].COLOR>
#IF
EQUALS$拆解色1(普通)
#ACT
DECN$拆几率15
MOVN$拆解色1255
#IF
EQUALS$拆解色1(精良)
#ACT
DECN$拆几率110
MOVN$拆解色1250
#IF
EQUALS$拆解色1(稀有)
#ACT
DECN$拆几率115
MOVN$拆解色1154
#IF
EQUALS$拆解色1(罕有)
#ACT
DECN$拆几率126
MOVN$拆解色1243
#IF
EQUALS$拆解色1(远古)
#ACT
DECN$拆几率135
MOVN$拆解色1253
#IF
EQUALS$拆解色1(传说)
#ACT
DECN$拆几率150
MOVN$拆解色158
#IF
#ACT
MOVS$粉碎按钮<开始粉碎/@开始粉碎>
DELAYGOTO20@综合
[@ItemOutBox1]
#ACT
MOVS$拆解类1
#IF
EQUAL<$BOXITEM[0].NAME>
EQUAL<$BOXITEM[2].NAME>
EQUAL<$BOXITEM[3].NAME>
EQUAL<$BOXITEM[4].NAME>
EQUAL<$BOXITEM[5].NAME>
EQUAL<$BOXITEM[6].NAME>
EQUAL<$BOXITEM[7].NAME>
#ACT
MOVS$粉碎按钮<开始粉碎/FCOLOR=230>
DELAYGOTO20@综合
;-----------------------------------------------------------托盘2号
[@ItemIntoBox2]
#IF
EQUAL<$BOXITEM[2].COLOR>230
#ACT
UNALLOWITEMINTOBOX
SENDMSG5该道具不能进行分解粉碎！
break
#elseact
MOVN$拆几率2100
MOVS$拆结果2
MOVS$比对数2D·M·S
;---------类2
;---------色2
#IF
CHECKTEXTLIST..\QuestDiary\数据库\拆解\40级表.txt<$BOXITEM[2].NAME>
#ACT
MOVS$拆解类240级
DECN$拆几率210
#IF
CHECKTEXTLIST..\QuestDiary\数据库\拆解\50级表.txt<$BOXITEM[2].NAME>
#ACT
MOVS$拆解类250级
DECN$拆几率212
#IF
CHECKTEXTLIST..\QuestDiary\数据库\拆解\60级表.txt<$BOXITEM[2].NAME>
#ACT
MOVS$拆解类260级
DECN$拆几率213
#IF
CHECKTEXTLIST..\QuestDiary\数据库\拆解\70级表.txt<$BOXITEM[2].NAME>
#ACT
MOVS$拆解类270级
DECN$拆几率214
#IF
CHECKTEXTLIST..\QuestDiary\数据库\拆解\80级表.txt<$BOXITEM[2].NAME>
#ACT
MOVS$拆解类280级
DECN$拆几率215
#IF
CHECKTEXTLIST..\QuestDiary\数据库\拆解\90级表.txt<$BOXITEM[2].NAME>
#ACT
MOVS$拆解类290级
DECN$拆几率217
#IF
CHECKTEXTLIST..\QuestDiary\数据库\拆解\100级表.txt<$BOXITEM[2].NAME>
#ACT
MOVS$拆解类2100级
DECN$拆几率220
#OR
EQUAL<$BOXITEM[2].STDMODE>5
EQUAL<$BOXITEM[2].STDMODE>6
#ACT
INCS$拆解类2武器
#OR
EQUAL<$BOXITEM[2].STDMODE>10
EQUAL<$BOXITEM[2].STDMODE>11
#ACT
INCS$拆解类2衣服
#OR
EQUAL<$BOXITEM[2].STDMODE>15
EQUAL<$BOXITEM[2].STDMODE>16
#ACT
INCS$拆解类2头盔
#OR
EQUAL<$BOXITEM[2].STDMODE>19
EQUAL<$BOXITEM[2].STDMODE>20
EQUAL<$BOXITEM[2].STDMODE>21
EQUAL<$BOXITEM[2].STDMODE>22
EQUAL<$BOXITEM[2].STDMODE>23
EQUAL<$BOXITEM[2].STDMODE>24
EQUAL<$BOXITEM[2].STDMODE>26
EQUAL<$BOXITEM[2].STDMODE>28
EQUAL<$BOXITEM[2].STDMODE>30
EQUAL<$BOXITEM[2].STDMODE>52
EQUAL<$BOXITEM[2].STDMODE>54
EQUAL<$BOXITEM[2].STDMODE>62
EQUAL<$BOXITEM[2].STDMODE>64
EQUAL<$BOXITEM[2].STDMODE>65
#ACT
INCS$拆解类2首饰
#IF
EQUAL<$BOXITEM[2].HDC>0
#ACT
ANSIREPLACETEXT<$STR(S$比对数2)>D0
#IF
EQUAL<$BOXITEM[2].HMC>0
#ACT
ANSIREPLACETEXT<$STR(S$比对数2)>M0
#IF
EQUAL<$BOXITEM[2].HSC>0
#ACT
ANSIREPLACETEXT<$STR(S$比对数2)>S0
#IF
EQUALS$比对数2D·M·S
CHECKTEXTLIST..\QuestDiary\数据库\拆解\防御.txt<$BOXITEM[2].STDMODE>
#ACT
GetRandomText..\QuestDiary\数据库\拆解\防均衡.txt<$STR(S$拆结果2)>
MOVS$二拆0防均衡
#IF
EQUALS$比对数20·M·S
CHECKTEXTLIST..\QuestDiary\数据库\拆解\防御.txt<$BOXITEM[2].STDMODE>
#ACT
GetRandomText..\QuestDiary\数据库\拆解\防魔道.txt<$STR(S$拆结果2)>
MOVS$二拆0防魔道
#IF
EQUALS$比对数2D·0·S
CHECKTEXTLIST..\QuestDiary\数据库\拆解\防御.txt<$BOXITEM[2].STDMODE>
#ACT
GetRandomText..\QuestDiary\数据库\拆解\防攻道.txt<$STR(S$拆结果2)>
MOVS$二拆0防攻道
#IF
EQUALS$比对数2D·M·0
CHECKTEXTLIST..\QuestDiary\数据库\拆解\防御.txt<$BOXITEM[2].STDMODE>
#ACT
GetRandomText..\QuestDiary\数据库\拆解\防攻魔.txt<$STR(S$拆结果2)>
MOVS$二拆0防攻魔
#IF
EQUALS$比对数2D·0·0
CHECKTEXTLIST..\QuestDiary\数据库\拆解\防御.txt<$BOXITEM[2].STDMODE>
#ACT
GetRandomText..\QuestDiary\数据库\拆解\防攻.txt<$STR(S$拆结果2)>
MOVS$二拆0防攻
#IF
EQUALS$比对数20·M·0
CHECKTEXTLIST..\QuestDiary\数据库\拆解\防御.txt<$BOXITEM[2].STDMODE>
#ACT
GetRandomText..\QuestDiary\数据库\拆解\防魔.txt<$STR(S$拆结果2)>
MOVS$二拆0防魔
#IF
EQUALS$比对数20·0·S
CHECKTEXTLIST..\QuestDiary\数据库\拆解\防御.txt<$BOXITEM[2].STDMODE>
#ACT
GetRandomText..\QuestDiary\数据库\拆解\防道.txt<$STR(S$拆结果2)>
MOVS$二拆0防道
#IF
EQUALS$比对数2D·M·S
EQUALS$拆结果2
#ACT
GetRandomText..\QuestDiary\数据库\拆解\均衡.txt<$STR(S$拆结果2)>
MOVS$二拆0均衡
#IF
EQUALS$比对数2D·M·0
EQUALS$拆结果2
#ACT
GetRandomText..\QuestDiary\数据库\拆解\攻魔.txt<$STR(S$拆结果2)>
MOVS$二拆0攻魔
#IF
EQUALS$比对数2D·0·S
EQUALS$拆结果2
#ACT
GetRandomText..\QuestDiary\数据库\拆解\攻道.txt<$STR(S$拆结果2)>
MOVS$二拆0攻道
#IF
EQUALS$比对数20·M·S
EQUALS$拆结果2
#ACT
GetRandomText..\QuestDiary\数据库\拆解\魔道.txt<$STR(S$拆结果2)>
MOVS$二拆0魔道
#IF
EQUALS$比对数2D·0·0
EQUALS$拆结果2
#ACT
GetRandomText..\QuestDiary\数据库\拆解\攻.txt<$STR(S$拆结果2)>
MOVS$二拆0攻
#IF
EQUALS$比对数20·M·0
EQUALS$拆结果2
#ACT
GetRandomText..\QuestDiary\数据库\拆解\魔.txt<$STR(S$拆结果2)>
MOVS$二拆0魔
#IF
EQUALS$比对数20·0·S
EQUALS$拆结果2
#ACT
GetRandomText..\QuestDiary\数据库\拆解\道.txt<$STR(S$拆结果2)>
MOVS$二拆0道
#IF
EQUAL<$BOXITEM[2].COLOR>150
#ACT
GetRandomText..\QuestDiary\数据库\拆解\未鉴定碎块.txtS$拆解色2
#ELSEACT
GetRandomText..\QuestDiary\数据库\拆解\取色表.txtS$拆解色2<$BOXITEM[2].COLOR>
#IF
EQUALS$拆解色2(普通)
#ACT
DECN$拆几率25
MOVN$拆解色2255
#IF
EQUALS$拆解色2(精良)
#ACT
DECN$拆几率210
MOVN$拆解色2250
#IF
EQUALS$拆解色2(稀有)
#ACT
DECN$拆几率215
MOVN$拆解色2154
#IF
EQUALS$拆解色2(罕有)
#ACT
DECN$拆几率226
MOVN$拆解色2243
#IF
EQUALS$拆解色2(远古)
#ACT
DECN$拆几率235
MOVN$拆解色2253
#IF
EQUALS$拆解色2(传说)
#ACT
DECN$拆几率250
MOVN$拆解色258
#IF
#ACT
MOVS$粉碎按钮<开始粉碎/@开始粉碎>
DELAYGOTO20@综合
[@ItemOutBox2]
#ACT
MOVS$拆解类2
#IF
EQUAL<$BOXITEM[0].NAME>
EQUAL<$BOXITEM[1].NAME>
EQUAL<$BOXITEM[3].NAME>
EQUAL<$BOXITEM[4].NAME>
EQUAL<$BOXITEM[5].NAME>
EQUAL<$BOXITEM[6].NAME>
EQUAL<$BOXITEM[7].NAME>
#ACT
MOVS$粉碎按钮<开始粉碎/FCOLOR=230>
DELAYGOTO20@综合
;-----------------------------------------------------------托盘3号
[@ItemIntoBox3]
#IF
EQUAL<$BOXITEM[3].COLOR>230
#ACT
UNALLOWITEMINTOBOX
SENDMSG5该道具不能进行分解粉碎！
break
#elseact
MOVN$拆几率3100
MOVS$拆结果3
MOVS$比对数3D·M·S
;---------类3
#IF
CHECKTEXTLIST..\QuestDiary\数据库\拆解\40级表.txt<$BOXITEM[3].NAME>
#ACT
MOVS$拆解类340级
DECN$拆几率310
#IF
CHECKTEXTLIST..\QuestDiary\数据库\拆解\50级表.txt<$BOXITEM[3].NAME>
#ACT
MOVS$拆解类350级
DECN$拆几率312
#IF
CHECKTEXTLIST..\QuestDiary\数据库\拆解\60级表.txt<$BOXITEM[3].NAME>
#ACT
MOVS$拆解类360级
DECN$拆几率313
#IF
CHECKTEXTLIST..\QuestDiary\数据库\拆解\70级表.txt<$BOXITEM[3].NAME>
#ACT
MOVS$拆解类370级
DECN$拆几率314
#IF
CHECKTEXTLIST..\QuestDiary\数据库\拆解\80级表.txt<$BOXITEM[3].NAME>
#ACT
MOVS$拆解类380级
DECN$拆几率315
#IF
CHECKTEXTLIST..\QuestDiary\数据库\拆解\90级表.txt<$BOXITEM[3].NAME>
#ACT
MOVS$拆解类390级
DECN$拆几率317
#IF
CHECKTEXTLIST..\QuestDiary\数据库\拆解\100级表.txt<$BOXITEM[3].NAME>
#ACT
MOVS$拆解类3100级
DECN$拆几率320
#OR
EQUAL<$BOXITEM[3].STDMODE>5
EQUAL<$BOXITEM[3].STDMODE>6
#ACT
INCS$拆解类3武器
#OR
EQUAL<$BOXITEM[3].STDMODE>10
EQUAL<$BOXITEM[3].STDMODE>11
#ACT
INCS$拆解类3衣服
#OR
EQUAL<$BOXITEM[3].STDMODE>15
EQUAL<$BOXITEM[3].STDMODE>16
#ACT
INCS$拆解类3头盔
#OR
EQUAL<$BOXITEM[3].STDMODE>19
EQUAL<$BOXITEM[3].STDMODE>20
EQUAL<$BOXITEM[3].STDMODE>21
EQUAL<$BOXITEM[3].STDMODE>22
EQUAL<$BOXITEM[3].STDMODE>23
EQUAL<$BOXITEM[3].STDMODE>24
EQUAL<$BOXITEM[3].STDMODE>26
EQUAL<$BOXITEM[3].STDMODE>28
EQUAL<$BOXITEM[3].STDMODE>30
EQUAL<$BOXITEM[3].STDMODE>52
EQUAL<$BOXITEM[3].STDMODE>54
EQUAL<$BOXITEM[3].STDMODE>62
EQUAL<$BOXITEM[3].STDMODE>64
EQUAL<$BOXITEM[3].STDMODE>65
#ACT
INCS$拆解类3首饰
#IF
EQUAL<$BOXITEM[3].HDC>0
#ACT
ANSIREPLACETEXT<$STR(S$比对数3)>D0
#IF
EQUAL<$BOXITEM[3].HMC>0
#ACT
ANSIREPLACETEXT<$STR(S$比对数3)>M0
#IF
EQUAL<$BOXITEM[3].HSC>0
#ACT
ANSIREPLACETEXT<$STR(S$比对数3)>S0
#IF
EQUALS$比对数3D·M·S
CHECKTEXTLIST..\QuestDiary\数据库\拆解\防御.txt<$BOXITEM[3].STDMODE>
#ACT
GetRandomText..\QuestDiary\数据库\拆解\防均衡.txt<$STR(S$拆结果3)>
MOVS$二拆0防均衡
#IF
EQUALS$比对数30·M·S
CHECKTEXTLIST..\QuestDiary\数据库\拆解\防御.txt<$BOXITEM[3].STDMODE>
#ACT
GetRandomText..\QuestDiary\数据库\拆解\防魔道.txt<$STR(S$拆结果3)>
MOVS$二拆0防魔道
#IF
EQUALS$比对数3D·0·S
CHECKTEXTLIST..\QuestDiary\数据库\拆解\防御.txt<$BOXITEM[3].STDMODE>
#ACT
GetRandomText..\QuestDiary\数据库\拆解\防攻道.txt<$STR(S$拆结果3)>
MOVS$二拆0防攻道
#IF
EQUALS$比对数3D·M·0
CHECKTEXTLIST..\QuestDiary\数据库\拆解\防御.txt<$BOXITEM[3].STDMODE>
#ACT
GetRandomText..\QuestDiary\数据库\拆解\防攻魔.txt<$STR(S$拆结果3)>
MOVS$二拆0防攻魔
#IF
EQUALS$比对数3D·0·0
CHECKTEXTLIST..\QuestDiary\数据库\拆解\防御.txt<$BOXITEM[3].STDMODE>
#ACT
GetRandomText..\QuestDiary\数据库\拆解\防攻.txt<$STR(S$拆结果3)>
MOVS$二拆0防攻
#IF
EQUALS$比对数30·M·0
CHECKTEXTLIST..\QuestDiary\数据库\拆解\防御.txt<$BOXITEM[3].STDMODE>
#ACT
GetRandomText..\QuestDiary\数据库\拆解\防魔.txt<$STR(S$拆结果3)>
MOVS$二拆0防魔
#IF
EQUALS$比对数30·0·S
CHECKTEXTLIST..\QuestDiary\数据库\拆解\防御.txt<$BOXITEM[3].STDMODE>
#ACT
GetRandomText..\QuestDiary\数据库\拆解\防道.txt<$STR(S$拆结果3)>
MOVS$二拆0防道
#IF
EQUALS$比对数3D·M·S
EQUALS$拆结果3
#ACT
GetRandomText..\QuestDiary\数据库\拆解\均衡.txt<$STR(S$拆结果3)>
MOVS$二拆0均衡
#IF
EQUALS$比对数3D·M·0
EQUALS$拆结果3
#ACT
GetRandomText..\QuestDiary\数据库\拆解\攻魔.txt<$STR(S$拆结果3)>
MOVS$二拆0攻魔
#IF
EQUALS$比对数3D·0·S
EQUALS$拆结果3
#ACT
GetRandomText..\QuestDiary\数据库\拆解\攻道.txt<$STR(S$拆结果3)>
MOVS$二拆0攻道
#IF
EQUALS$比对数30·M·S
EQUALS$拆结果3
#ACT
GetRandomText..\QuestDiary\数据库\拆解\魔道.txt<$STR(S$拆结果3)>
MOVS$二拆0魔道
#IF
EQUALS$比对数3D·0·0
EQUALS$拆结果3
#ACT
GetRandomText..\QuestDiary\数据库\拆解\攻.txt<$STR(S$拆结果3)>
MOVS$二拆0攻
#IF
EQUALS$比对数30·M·0
EQUALS$拆结果3
#ACT
GetRandomText..\QuestDiary\数据库\拆解\魔.txt<$STR(S$拆结果3)>
MOVS$二拆0魔
#IF
EQUALS$比对数30·0·S
EQUALS$拆结果3
#ACT
GetRandomText..\QuestDiary\数据库\拆解\道.txt<$STR(S$拆结果3)>
MOVS$二拆0道
#IF
EQUAL<$BOXITEM[3].COLOR>150
#ACT
GetRandomText..\QuestDiary\数据库\拆解\未鉴定碎块.txtS$拆解色3
#ELSEACT
GetRandomText..\QuestDiary\数据库\拆解\取色表.txtS$拆解色3<$BOXITEM[3].COLOR>
#IF
EQUALS$拆解色3(普通)
#ACT
DECN$拆几率35
MOVN$拆解色3255
#IF
EQUALS$拆解色3(精良)
#ACT
DECN$拆几率310
MOVN$拆解色3250
#IF
EQUALS$拆解色3(稀有)
#ACT
DECN$拆几率315
MOVN$拆解色3154
#IF
EQUALS$拆解色3(罕有)
#ACT
DECN$拆几率326
MOVN$拆解色3243
#IF
EQUALS$拆解色3(远古)
#ACT
DECN$拆几率335
MOVN$拆解色3253
#IF
EQUALS$拆解色3(传说)
#ACT
DECN$拆几率350
MOVN$拆解色358
#IF
#ACT
MOVS$粉碎按钮<开始粉碎/@开始粉碎>
DELAYGOTO20@综合
[@ItemOutBox3]
#ACT
MOVS$拆解类3
#IF
EQUAL<$BOXITEM[0].NAME>
EQUAL<$BOXITEM[1].NAME>
EQUAL<$BOXITEM[2].NAME>
EQUAL<$BOXITEM[4].NAME>
EQUAL<$BOXITEM[5].NAME>
EQUAL<$BOXITEM[6].NAME>
EQUAL<$BOXITEM[7].NAME>
#ACT
MOVS$粉碎按钮<开始粉碎/FCOLOR=230>
DELAYGOTO20@综合
;-----------------------------------------------------------托盘4号
[@ItemIntoBox4]
#IF
EQUAL<$BOXITEM[4].COLOR>230
#ACT
UNALLOWITEMINTOBOX
SENDMSG5该道具不能进行分解粉碎！
break
#elseact
MOVN$拆几率4100
MOVS$拆结果4
MOVS$比对数4D·M·S
;---------类4
#IF
CHECKTEXTLIST..\QuestDiary\数据库\拆解\40级表.txt<$BOXITEM[4].NAME>
#ACT
MOVS$拆解类440级
DECN$拆几率410
#IF
CHECKTEXTLIST..\QuestDiary\数据库\拆解\50级表.txt<$BOXITEM[4].NAME>
#ACT
MOVS$拆解类450级
DECN$拆几率412
#IF
CHECKTEXTLIST..\QuestDiary\数据库\拆解\60级表.txt<$BOXITEM[4].NAME>
#ACT
MOVS$拆解类460级
DECN$拆几率413
#IF
CHECKTEXTLIST..\QuestDiary\数据库\拆解\70级表.txt<$BOXITEM[4].NAME>
#ACT
MOVS$拆解类470级
DECN$拆几率414
#IF
CHECKTEXTLIST..\QuestDiary\数据库\拆解\80级表.txt<$BOXITEM[4].NAME>
#ACT
MOVS$拆解类480级
DECN$拆几率415
#IF
CHECKTEXTLIST..\QuestDiary\数据库\拆解\90级表.txt<$BOXITEM[4].NAME>
#ACT
MOVS$拆解类490级
DECN$拆几率417
#IF
CHECKTEXTLIST..\QuestDiary\数据库\拆解\100级表.txt<$BOXITEM[4].NAME>
#ACT
MOVS$拆解类4100级
DECN$拆几率420
#OR
EQUAL<$BOXITEM[4].STDMODE>5
EQUAL<$BOXITEM[4].STDMODE>6
#ACT
INCS$拆解类4武器
#OR
EQUAL<$BOXITEM[4].STDMODE>10
EQUAL<$BOXITEM[4].STDMODE>11
#ACT
INCS$拆解类4衣服
#OR
EQUAL<$BOXITEM[4].STDMODE>15
EQUAL<$BOXITEM[4].STDMODE>16
#ACT
INCS$拆解类4头盔
#OR
EQUAL<$BOXITEM[4].STDMODE>19
EQUAL<$BOXITEM[4].STDMODE>20
EQUAL<$BOXITEM[4].STDMODE>21
EQUAL<$BOXITEM[4].STDMODE>22
EQUAL<$BOXITEM[4].STDMODE>23
EQUAL<$BOXITEM[4].STDMODE>24
EQUAL<$BOXITEM[4].STDMODE>26
EQUAL<$BOXITEM[4].STDMODE>28
EQUAL<$BOXITEM[4].STDMODE>30
EQUAL<$BOXITEM[4].STDMODE>52
EQUAL<$BOXITEM[4].STDMODE>54
EQUAL<$BOXITEM[4].STDMODE>62
EQUAL<$BOXITEM[4].STDMODE>64
EQUAL<$BOXITEM[4].STDMODE>65
#ACT
INCS$拆解类4首饰
#IF
EQUAL<$BOXITEM[4].HDC>0
#ACT
ANSIREPLACETEXT<$STR(S$比对数4)>D0
#IF
EQUAL<$BOXITEM[4].HMC>0
#ACT
ANSIREPLACETEXT<$STR(S$比对数4)>M0
#IF
EQUAL<$BOXITEM[4].HSC>0
#ACT
ANSIREPLACETEXT<$STR(S$比对数4)>S0
#IF
EQUALS$比对数4D·M·S
CHECKTEXTLIST..\QuestDiary\数据库\拆解\防御.txt<$BOXITEM[4].STDMODE>
#ACT
GetRandomText..\QuestDiary\数据库\拆解\防均衡.txt<$STR(S$拆结果4)>
MOVS$二拆0防均衡
#IF
EQUALS$比对数40·M·S
CHECKTEXTLIST..\QuestDiary\数据库\拆解\防御.txt<$BOXITEM[4].STDMODE>
#ACT
GetRandomText..\QuestDiary\数据库\拆解\防魔道.txt<$STR(S$拆结果4)>
MOVS$二拆0防魔道
#IF
EQUALS$比对数4D·0·S
CHECKTEXTLIST..\QuestDiary\数据库\拆解\防御.txt<$BOXITEM[4].STDMODE>
#ACT
GetRandomText..\QuestDiary\数据库\拆解\防攻道.txt<$STR(S$拆结果4)>
MOVS$二拆0防攻道
#IF
EQUALS$比对数4D·M·0
CHECKTEXTLIST..\QuestDiary\数据库\拆解\防御.txt<$BOXITEM[4].STDMODE>
#ACT
GetRandomText..\QuestDiary\数据库\拆解\防攻魔.txt<$STR(S$拆结果4)>
MOVS$二拆0防攻魔
#IF
EQUALS$比对数4D·0·0
CHECKTEXTLIST..\QuestDiary\数据库\拆解\防御.txt<$BOXITEM[4].STDMODE>
#ACT
GetRandomText..\QuestDiary\数据库\拆解\防攻.txt<$STR(S$拆结果4)>
MOVS$二拆0防攻
#IF
EQUALS$比对数40·M·0
CHECKTEXTLIST..\QuestDiary\数据库\拆解\防御.txt<$BOXITEM[4].STDMODE>
#ACT
GetRandomText..\QuestDiary\数据库\拆解\防魔.txt<$STR(S$拆结果4)>
MOVS$二拆0防魔
#IF
EQUALS$比对数40·0·S
CHECKTEXTLIST..\QuestDiary\数据库\拆解\防御.txt<$BOXITEM[4].STDMODE>
#ACT
GetRandomText..\QuestDiary\数据库\拆解\防道.txt<$STR(S$拆结果4)>
MOVS$二拆0防道
#IF
EQUALS$比对数4D·M·S
EQUALS$拆结果4
#ACT
GetRandomText..\QuestDiary\数据库\拆解\均衡.txt<$STR(S$拆结果4)>
MOVS$二拆0均衡
#IF
EQUALS$比对数4D·M·0
EQUALS$拆结果4
#ACT
GetRandomText..\QuestDiary\数据库\拆解\攻魔.txt<$STR(S$拆结果4)>
MOVS$二拆0攻魔
#IF
EQUALS$比对数4D·0·S
EQUALS$拆结果4
#ACT
GetRandomText..\QuestDiary\数据库\拆解\攻道.txt<$STR(S$拆结果4)>
MOVS$二拆0攻道
#IF
EQUALS$比对数40·M·S
EQUALS$拆结果4
#ACT
GetRandomText..\QuestDiary\数据库\拆解\魔道.txt<$STR(S$拆结果4)>
MOVS$二拆0魔道
#IF
EQUALS$比对数4D·0·0
EQUALS$拆结果4
#ACT
GetRandomText..\QuestDiary\数据库\拆解\攻.txt<$STR(S$拆结果4)>
MOVS$二拆0攻
#IF
EQUALS$比对数40·M·0
EQUALS$拆结果4
#ACT
GetRandomText..\QuestDiary\数据库\拆解\魔.txt<$STR(S$拆结果4)>
MOVS$二拆0魔
#IF
EQUALS$比对数40·0·S
EQUALS$拆结果4
#ACT
GetRandomText..\QuestDiary\数据库\拆解\道.txt<$STR(S$拆结果4)>
MOVS$二拆0道
#IF
EQUAL<$BOXITEM[4].COLOR>150
#ACT
GetRandomText..\QuestDiary\数据库\拆解\未鉴定碎块.txtS$拆解色4
#ELSEACT
GetRandomText..\QuestDiary\数据库\拆解\取色表.txtS$拆解色4<$BOXITEM[4].COLOR>
#IF
EQUALS$拆解色4(普通)
#ACT
DECN$拆几率45
MOVN$拆解色4255
#IF
EQUALS$拆解色4(精良)
#ACT
DECN$拆几率410
MOVN$拆解色4250
#IF
EQUALS$拆解色4(稀有)
#ACT
DECN$拆几率415
MOVN$拆解色4154
#IF
EQUALS$拆解色4(罕有)
#ACT
DECN$拆几率426
MOVN$拆解色4243
#IF
EQUALS$拆解色4(远古)
#ACT
DECN$拆几率435
MOVN$拆解色4253
#IF
EQUALS$拆解色4(传说)
#ACT
DECN$拆几率450
MOVN$拆解色458
#IF
#ACT
MOVS$粉碎按钮<开始粉碎/@开始粉碎>
DELAYGOTO20@综合
[@ItemOutBox4]
#ACT
MOVS$拆解类4
#IF
EQUAL<$BOXITEM[0].NAME>
EQUAL<$BOXITEM[1].NAME>
EQUAL<$BOXITEM[2].NAME>
EQUAL<$BOXITEM[3].NAME>
EQUAL<$BOXITEM[5].NAME>
EQUAL<$BOXITEM[6].NAME>
EQUAL<$BOXITEM[7].NAME>
#ACT
MOVS$粉碎按钮<开始粉碎/FCOLOR=230>
DELAYGOTO20@综合
;-----------------------------------------------------------托盘5号
[@ItemIntoBox5]
#IF
EQUAL<$BOXITEM[5].COLOR>230
#ACT
UNALLOWITEMINTOBOX
SENDMSG5该道具不能进行分解粉碎！
break
#elseact
MOVN$拆几率5100
MOVS$拆结果5
MOVS$比对数5D·M·S
;---------类5
#IF
CHECKTEXTLIST..\QuestDiary\数据库\拆解\40级表.txt<$BOXITEM[5].NAME>
#ACT
MOVS$拆解类540级
DECN$拆几率510
#IF
CHECKTEXTLIST..\QuestDiary\数据库\拆解\50级表.txt<$BOXITEM[5].NAME>
#ACT
MOVS$拆解类550级
DECN$拆几率512
#IF
CHECKTEXTLIST..\QuestDiary\数据库\拆解\60级表.txt<$BOXITEM[5].NAME>
#ACT
MOVS$拆解类560级
DECN$拆几率513
#IF
CHECKTEXTLIST..\QuestDiary\数据库\拆解\70级表.txt<$BOXITEM[5].NAME>
#ACT
MOVS$拆解类570级
DECN$拆几率514
#IF
CHECKTEXTLIST..\QuestDiary\数据库\拆解\80级表.txt<$BOXITEM[5].NAME>
#ACT
MOVS$拆解类580级
DECN$拆几率515
#IF
CHECKTEXTLIST..\QuestDiary\数据库\拆解\90级表.txt<$BOXITEM[5].NAME>
#ACT
MOVS$拆解类590级
DECN$拆几率517
#IF
CHECKTEXTLIST..\QuestDiary\数据库\拆解\100级表.txt<$BOXITEM[5].NAME>
#ACT
MOVS$拆解类5100级
DECN$拆几率520
#OR
EQUAL<$BOXITEM[5].STDMODE>5
EQUAL<$BOXITEM[5].STDMODE>6
#ACT
INCS$拆解类5武器
#OR
EQUAL<$BOXITEM[5].STDMODE>10
EQUAL<$BOXITEM[5].STDMODE>11
#ACT
INCS$拆解类5衣服
#OR
EQUAL<$BOXITEM[5].STDMODE>15
EQUAL<$BOXITEM[5].STDMODE>16
#ACT
INCS$拆解类5头盔
#OR
EQUAL<$BOXITEM[5].STDMODE>19
EQUAL<$BOXITEM[5].STDMODE>20
EQUAL<$BOXITEM[5].STDMODE>21
EQUAL<$BOXITEM[5].STDMODE>22
EQUAL<$BOXITEM[5].STDMODE>23
EQUAL<$BOXITEM[5].STDMODE>24
EQUAL<$BOXITEM[5].STDMODE>26
EQUAL<$BOXITEM[5].STDMODE>28
EQUAL<$BOXITEM[5].STDMODE>30
EQUAL<$BOXITEM[5].STDMODE>52
EQUAL<$BOXITEM[5].STDMODE>54
EQUAL<$BOXITEM[5].STDMODE>62
EQUAL<$BOXITEM[5].STDMODE>64
EQUAL<$BOXITEM[5].STDMODE>65
#ACT
INCS$拆解类5首饰
#IF
EQUAL<$BOXITEM[5].HDC>0
#ACT
ANSIREPLACETEXT<$STR(S$比对数5)>D0
#IF
EQUAL<$BOXITEM[5].HMC>0
#ACT
ANSIREPLACETEXT<$STR(S$比对数5)>M0
#IF
EQUAL<$BOXITEM[5].HSC>0
#ACT
ANSIREPLACETEXT<$STR(S$比对数5)>S0
#IF
EQUALS$比对数5D·M·S
CHECKTEXTLIST..\QuestDiary\数据库\拆解\防御.txt<$BOXITEM[5].STDMODE>
#ACT
GetRandomText..\QuestDiary\数据库\拆解\防均衡.txt<$STR(S$拆结果5)>
MOVS$二拆0防均衡
#IF
EQUALS$比对数50·M·S
CHECKTEXTLIST..\QuestDiary\数据库\拆解\防御.txt<$BOXITEM[5].STDMODE>
#ACT
GetRandomText..\QuestDiary\数据库\拆解\防魔道.txt<$STR(S$拆结果5)>
MOVS$二拆0防魔道
#IF
EQUALS$比对数5D·0·S
CHECKTEXTLIST..\QuestDiary\数据库\拆解\防御.txt<$BOXITEM[5].STDMODE>
#ACT
GetRandomText..\QuestDiary\数据库\拆解\防攻道.txt<$STR(S$拆结果5)>
MOVS$二拆0防攻道
#IF
EQUALS$比对数5D·M·0
CHECKTEXTLIST..\QuestDiary\数据库\拆解\防御.txt<$BOXITEM[5].STDMODE>
#ACT
GetRandomText..\QuestDiary\数据库\拆解\防攻魔.txt<$STR(S$拆结果5)>
MOVS$二拆0防攻魔
#IF
EQUALS$比对数5D·0·0
CHECKTEXTLIST..\QuestDiary\数据库\拆解\防御.txt<$BOXITEM[5].STDMODE>
#ACT
GetRandomText..\QuestDiary\数据库\拆解\防攻.txt<$STR(S$拆结果5)>
MOVS$二拆0防攻
#IF
EQUALS$比对数50·M·0
CHECKTEXTLIST..\QuestDiary\数据库\拆解\防御.txt<$BOXITEM[5].STDMODE>
#ACT
GetRandomText..\QuestDiary\数据库\拆解\防魔.txt<$STR(S$拆结果5)>
MOVS$二拆0防魔
#IF
EQUALS$比对数50·0·S
CHECKTEXTLIST..\QuestDiary\数据库\拆解\防御.txt<$BOXITEM[5].STDMODE>
#ACT
GetRandomText..\QuestDiary\数据库\拆解\防道.txt<$STR(S$拆结果5)>
MOVS$二拆0防道
#IF
EQUALS$比对数5D·M·S
EQUALS$拆结果5
#ACT
GetRandomText..\QuestDiary\数据库\拆解\均衡.txt<$STR(S$拆结果5)>
MOVS$二拆0均衡
#IF
EQUALS$比对数5D·M·0
EQUALS$拆结果5
#ACT
GetRandomText..\QuestDiary\数据库\拆解\攻魔.txt<$STR(S$拆结果5)>
MOVS$二拆0攻魔
#IF
EQUALS$比对数5D·0·S
EQUALS$拆结果5
#ACT
GetRandomText..\QuestDiary\数据库\拆解\攻道.txt<$STR(S$拆结果5)>
MOVS$二拆0攻道
#IF
EQUALS$比对数50·M·S
EQUALS$拆结果5
#ACT
GetRandomText..\QuestDiary\数据库\拆解\魔道.txt<$STR(S$拆结果5)>
MOVS$二拆0魔道
#IF
EQUALS$比对数5D·0·0
EQUALS$拆结果5
#ACT
GetRandomText..\QuestDiary\数据库\拆解\攻.txt<$STR(S$拆结果5)>
MOVS$二拆0攻
#IF
EQUALS$比对数50·M·0
EQUALS$拆结果5
#ACT
GetRandomText..\QuestDiary\数据库\拆解\魔.txt<$STR(S$拆结果5)>
MOVS$二拆0魔
#IF
EQUALS$比对数50·0·S
EQUALS$拆结果5
#ACT
GetRandomText..\QuestDiary\数据库\拆解\道.txt<$STR(S$拆结果5)>
MOVS$二拆0道
#IF
EQUAL<$BOXITEM[5].COLOR>150
#ACT
GetRandomText..\QuestDiary\数据库\拆解\未鉴定碎块.txtS$拆解色5
#ELSEACT
GetRandomText..\QuestDiary\数据库\拆解\取色表.txtS$拆解色5<$BOXITEM[5].COLOR>
#IF
EQUALS$拆解色5(普通)
#ACT
DECN$拆几率55
MOVN$拆解色5255
#IF
EQUALS$拆解色5(精良)
#ACT
DECN$拆几率510
MOVN$拆解色5250
#IF
EQUALS$拆解色5(稀有)
#ACT
DECN$拆几率515
MOVN$拆解色5154
#IF
EQUALS$拆解色5(罕有)
#ACT
DECN$拆几率526
MOVN$拆解色5243
#IF
EQUALS$拆解色5(远古)
#ACT
DECN$拆几率535
MOVN$拆解色5253
#IF
EQUALS$拆解色5(传说)
#ACT
DECN$拆几率550
MOVN$拆解色558
#IF
#ACT
MOVS$粉碎按钮<开始粉碎/@开始粉碎>
DELAYGOTO20@综合
[@ItemOutBox5]
#ACT
MOVS$拆解类5
#IF
EQUAL<$BOXITEM[0].NAME>
EQUAL<$BOXITEM[1].NAME>
EQUAL<$BOXITEM[2].NAME>
EQUAL<$BOXITEM[3].NAME>
EQUAL<$BOXITEM[4].NAME>
EQUAL<$BOXITEM[6].NAME>
EQUAL<$BOXITEM[7].NAME>
#ACT
MOVS$粉碎按钮<开始粉碎/FCOLOR=230>
DELAYGOTO20@综合
;-----------------------------------------------------------托盘6号
[@ItemIntoBox6]
#IF
EQUAL<$BOXITEM[6].COLOR>230
#ACT
UNALLOWITEMINTOBOX
SENDMSG5该道具不能进行分解粉碎！
break
#elseact
MOVN$拆几率6100
MOVS$拆结果6
MOVS$比对数6D·M·S
;---------类6
;---------色6
#IF
CHECKTEXTLIST..\QuestDiary\数据库\拆解\40级表.txt<$BOXITEM[6].NAME>
#ACT
MOVS$拆解类640级
DECN$拆几率610
#IF
CHECKTEXTLIST..\QuestDiary\数据库\拆解\50级表.txt<$BOXITEM[6].NAME>
#ACT
MOVS$拆解类650级
DECN$拆几率612
#IF
CHECKTEXTLIST..\QuestDiary\数据库\拆解\60级表.txt<$BOXITEM[6].NAME>
#ACT
MOVS$拆解类660级
DECN$拆几率613
#IF
CHECKTEXTLIST..\QuestDiary\数据库\拆解\70级表.txt<$BOXITEM[6].NAME>
#ACT
MOVS$拆解类670级
DECN$拆几率614
#IF
CHECKTEXTLIST..\QuestDiary\数据库\拆解\80级表.txt<$BOXITEM[6].NAME>
#ACT
MOVS$拆解类680级
DECN$拆几率615
#IF
CHECKTEXTLIST..\QuestDiary\数据库\拆解\90级表.txt<$BOXITEM[6].NAME>
#ACT
MOVS$拆解类690级
DECN$拆几率617
#IF
CHECKTEXTLIST..\QuestDiary\数据库\拆解\100级表.txt<$BOXITEM[6].NAME>
#ACT
MOVS$拆解类6100级
DECN$拆几率620
#OR
EQUAL<$BOXITEM[6].STDMODE>5
EQUAL<$BOXITEM[6].STDMODE>6
#ACT
INCS$拆解类6武器
#OR
EQUAL<$BOXITEM[6].STDMODE>10
EQUAL<$BOXITEM[6].STDMODE>11
#ACT
INCS$拆解类6衣服
#OR
EQUAL<$BOXITEM[6].STDMODE>15
EQUAL<$BOXITEM[6].STDMODE>16
#ACT
INCS$拆解类6头盔
#OR
EQUAL<$BOXITEM[6].STDMODE>19
EQUAL<$BOXITEM[6].STDMODE>20
EQUAL<$BOXITEM[6].STDMODE>21
EQUAL<$BOXITEM[6].STDMODE>22
EQUAL<$BOXITEM[6].STDMODE>23
EQUAL<$BOXITEM[6].STDMODE>24
EQUAL<$BOXITEM[6].STDMODE>26
EQUAL<$BOXITEM[6].STDMODE>28
EQUAL<$BOXITEM[6].STDMODE>30
EQUAL<$BOXITEM[6].STDMODE>52
EQUAL<$BOXITEM[6].STDMODE>54
EQUAL<$BOXITEM[6].STDMODE>62
EQUAL<$BOXITEM[6].STDMODE>64
EQUAL<$BOXITEM[6].STDMODE>65
#ACT
INCS$拆解类6首饰
#IF
EQUAL<$BOXITEM[6].HDC>0
#ACT
ANSIREPLACETEXT<$STR(S$比对数6)>D0
#IF
EQUAL<$BOXITEM[6].HMC>0
#ACT
ANSIREPLACETEXT<$STR(S$比对数6)>M0
#IF
EQUAL<$BOXITEM[6].HSC>0
#ACT
ANSIREPLACETEXT<$STR(S$比对数6)>S0
#IF
EQUALS$比对数6D·M·S
CHECKTEXTLIST..\QuestDiary\数据库\拆解\防御.txt<$BOXITEM[6].STDMODE>
#ACT
GetRandomText..\QuestDiary\数据库\拆解\防均衡.txt<$STR(S$拆结果6)>
MOVS$二拆0防均衡
#IF
EQUALS$比对数60·M·S
CHECKTEXTLIST..\QuestDiary\数据库\拆解\防御.txt<$BOXITEM[6].STDMODE>
#ACT
GetRandomText..\QuestDiary\数据库\拆解\防魔道.txt<$STR(S$拆结果6)>
MOVS$二拆0防魔道
#IF
EQUALS$比对数6D·0·S
CHECKTEXTLIST..\QuestDiary\数据库\拆解\防御.txt<$BOXITEM[6].STDMODE>
#ACT
GetRandomText..\QuestDiary\数据库\拆解\防攻道.txt<$STR(S$拆结果6)>
MOVS$二拆0防攻道
#IF
EQUALS$比对数6D·M·0
CHECKTEXTLIST..\QuestDiary\数据库\拆解\防御.txt<$BOXITEM[6].STDMODE>
#ACT
GetRandomText..\QuestDiary\数据库\拆解\防攻魔.txt<$STR(S$拆结果6)>
MOVS$二拆0防攻魔
#IF
EQUALS$比对数6D·0·0
CHECKTEXTLIST..\QuestDiary\数据库\拆解\防御.txt<$BOXITEM[6].STDMODE>
#ACT
GetRandomText..\QuestDiary\数据库\拆解\防攻.txt<$STR(S$拆结果6)>
MOVS$二拆0防攻
#IF
EQUALS$比对数60·M·0
CHECKTEXTLIST..\QuestDiary\数据库\拆解\防御.txt<$BOXITEM[6].STDMODE>
#ACT
GetRandomText..\QuestDiary\数据库\拆解\防魔.txt<$STR(S$拆结果6)>
MOVS$二拆0防魔
#IF
EQUALS$比对数60·0·S
CHECKTEXTLIST..\QuestDiary\数据库\拆解\防御.txt<$BOXITEM[6].STDMODE>
#ACT
GetRandomText..\QuestDiary\数据库\拆解\防道.txt<$STR(S$拆结果6)>
MOVS$二拆0防道
#IF
EQUALS$比对数6D·M·S
EQUALS$拆结果6
#ACT
GetRandomText..\QuestDiary\数据库\拆解\均衡.txt<$STR(S$拆结果6)>
MOVS$二拆0均衡
#IF
EQUALS$比对数6D·M·0
EQUALS$拆结果6
#ACT
GetRandomText..\QuestDiary\数据库\拆解\攻魔.txt<$STR(S$拆结果6)>
MOVS$二拆0攻魔
#IF
EQUALS$比对数6D·0·S
EQUALS$拆结果6
#ACT
GetRandomText..\QuestDiary\数据库\拆解\攻道.txt<$STR(S$拆结果6)>
MOVS$二拆0攻道
#IF
EQUALS$比对数60·M·S
EQUALS$拆结果6
#ACT
GetRandomText..\QuestDiary\数据库\拆解\魔道.txt<$STR(S$拆结果6)>
MOVS$二拆0魔道
#IF
EQUALS$比对数6D·0·0
EQUALS$拆结果6
#ACT
GetRandomText..\QuestDiary\数据库\拆解\攻.txt<$STR(S$拆结果6)>
MOVS$二拆0攻
#IF
EQUALS$比对数60·M·0
EQUALS$拆结果6
#ACT
GetRandomText..\QuestDiary\数据库\拆解\魔.txt<$STR(S$拆结果6)>
MOVS$二拆0魔
#IF
EQUALS$比对数60·0·S
EQUALS$拆结果6
#ACT
GetRandomText..\QuestDiary\数据库\拆解\道.txt<$STR(S$拆结果6)>
MOVS$二拆0道
#IF
EQUAL<$BOXITEM[6].COLOR>150
#ACT
GetRandomText..\QuestDiary\数据库\拆解\未鉴定碎块.txtS$拆解色6
#ELSEACT
GetRandomText..\QuestDiary\数据库\拆解\取色表.txtS$拆解色6<$BOXITEM[6].COLOR>
#IF
EQUALS$拆解色6(普通)
#ACT
DECN$拆几率65
MOVN$拆解色6255
#IF
EQUALS$拆解色6(精良)
#ACT
DECN$拆几率610
MOVN$拆解色6250
#IF
EQUALS$拆解色6(稀有)
#ACT
DECN$拆几率615
MOVN$拆解色6154
#IF
EQUALS$拆解色6(罕有)
#ACT
DECN$拆几率626
MOVN$拆解色6243
#IF
EQUALS$拆解色6(远古)
#ACT
DECN$拆几率635
MOVN$拆解色6253
#IF
EQUALS$拆解色6(传说)
#ACT
DECN$拆几率650
MOVN$拆解色658
#IF
#ACT
MOVS$粉碎按钮<开始粉碎/@开始粉碎>
DELAYGOTO20@综合
[@ItemOutBox6]
#ACT
MOVS$拆解类6
#IF
EQUAL<$BOXITEM[0].NAME>
EQUAL<$BOXITEM[1].NAME>
EQUAL<$BOXITEM[2].NAME>
EQUAL<$BOXITEM[3].NAME>
EQUAL<$BOXITEM[4].NAME>
EQUAL<$BOXITEM[5].NAME>
EQUAL<$BOXITEM[7].NAME>
#ACT
MOVS$粉碎按钮<开始粉碎/FCOLOR=230>
DELAYGOTO20@综合
;-----------------------------------------------------------托盘7号
[@ItemIntoBox7]
#IF
EQUAL<$BOXITEM[7].COLOR>230
#ACT
UNALLOWITEMINTOBOX
SENDMSG5该道具不能进行分解粉碎！
break
#elseact
MOVN$拆几率7100
MOVS$拆结果7
MOVS$比对数7D·M·S
;---------类7
;---------色7
#IF
CHECKTEXTLIST..\QuestDiary\数据库\拆解\40级表.txt<$BOXITEM[7].NAME>
#ACT
MOVS$拆解类740级
DECN$拆几率710
#IF
CHECKTEXTLIST..\QuestDiary\数据库\拆解\50级表.txt<$BOXITEM[7].NAME>
#ACT
MOVS$拆解类750级
DECN$拆几率712
#IF
CHECKTEXTLIST..\QuestDiary\数据库\拆解\60级表.txt<$BOXITEM[7].NAME>
#ACT
MOVS$拆解类760级
DECN$拆几率713
#IF
CHECKTEXTLIST..\QuestDiary\数据库\拆解\70级表.txt<$BOXITEM[7].NAME>
#ACT
MOVS$拆解类770级
DECN$拆几率714
#IF
CHECKTEXTLIST..\QuestDiary\数据库\拆解\80级表.txt<$BOXITEM[7].NAME>
#ACT
MOVS$拆解类780级
DECN$拆几率715
#IF
CHECKTEXTLIST..\QuestDiary\数据库\拆解\90级表.txt<$BOXITEM[7].NAME>
#ACT
MOVS$拆解类790级
DECN$拆几率717
#IF
CHECKTEXTLIST..\QuestDiary\数据库\拆解\100级表.txt<$BOXITEM[7].NAME>
#ACT
MOVS$拆解类7100级
DECN$拆几率720
#OR
EQUAL<$BOXITEM[7].STDMODE>5
EQUAL<$BOXITEM[7].STDMODE>6
#ACT
INCS$拆解类7武器
#OR
EQUAL<$BOXITEM[7].STDMODE>10
EQUAL<$BOXITEM[7].STDMODE>11
#ACT
INCS$拆解类7衣服
#OR
EQUAL<$BOXITEM[7].STDMODE>15
EQUAL<$BOXITEM[7].STDMODE>16
#ACT
INCS$拆解类7头盔
#OR
EQUAL<$BOXITEM[7].STDMODE>19
EQUAL<$BOXITEM[7].STDMODE>20
EQUAL<$BOXITEM[7].STDMODE>21
EQUAL<$BOXITEM[7].STDMODE>22
EQUAL<$BOXITEM[7].STDMODE>23
EQUAL<$BOXITEM[7].STDMODE>24
EQUAL<$BOXITEM[7].STDMODE>26
EQUAL<$BOXITEM[7].STDMODE>28
EQUAL<$BOXITEM[7].STDMODE>30
EQUAL<$BOXITEM[7].STDMODE>52
EQUAL<$BOXITEM[7].STDMODE>54
EQUAL<$BOXITEM[7].STDMODE>62
EQUAL<$BOXITEM[7].STDMODE>64
EQUAL<$BOXITEM[7].STDMODE>65
#ACT
INCS$拆解类7首饰
#IF
EQUAL<$BOXITEM[7].HDC>0
#ACT
ANSIREPLACETEXT<$STR(S$比对数7)>D0
#IF
EQUAL<$BOXITEM[7].HMC>0
#ACT
ANSIREPLACETEXT<$STR(S$比对数7)>M0
#IF
EQUAL<$BOXITEM[7].HSC>0
#ACT
ANSIREPLACETEXT<$STR(S$比对数7)>S0
#IF
EQUALS$比对数7D·M·S
CHECKTEXTLIST..\QuestDiary\数据库\拆解\防御.txt<$BOXITEM[7].STDMODE>
#ACT
GetRandomText..\QuestDiary\数据库\拆解\防均衡.txt<$STR(S$拆结果7)>
MOVS$二拆0防均衡
#IF
EQUALS$比对数70·M·S
CHECKTEXTLIST..\QuestDiary\数据库\拆解\防御.txt<$BOXITEM[7].STDMODE>
#ACT
GetRandomText..\QuestDiary\数据库\拆解\防魔道.txt<$STR(S$拆结果7)>
MOVS$二拆0防魔道
#IF
EQUALS$比对数7D·0·S
CHECKTEXTLIST..\QuestDiary\数据库\拆解\防御.txt<$BOXITEM[7].STDMODE>
#ACT
GetRandomText..\QuestDiary\数据库\拆解\防攻道.txt<$STR(S$拆结果7)>
MOVS$二拆0防攻道
#IF
EQUALS$比对数7D·M·0
CHECKTEXTLIST..\QuestDiary\数据库\拆解\防御.txt<$BOXITEM[7].STDMODE>
#ACT
GetRandomText..\QuestDiary\数据库\拆解\防攻魔.txt<$STR(S$拆结果7)>
MOVS$二拆0防攻魔
#IF
EQUALS$比对数7D·0·0
CHECKTEXTLIST..\QuestDiary\数据库\拆解\防御.txt<$BOXITEM[7].STDMODE>
#ACT
GetRandomText..\QuestDiary\数据库\拆解\防攻.txt<$STR(S$拆结果7)>
MOVS$二拆0防攻
#IF
EQUALS$比对数70·M·0
CHECKTEXTLIST..\QuestDiary\数据库\拆解\防御.txt<$BOXITEM[7].STDMODE>
#ACT
GetRandomText..\QuestDiary\数据库\拆解\防魔.txt<$STR(S$拆结果7)>
MOVS$二拆0防魔
#IF
EQUALS$比对数70·0·S
CHECKTEXTLIST..\QuestDiary\数据库\拆解\防御.txt<$BOXITEM[7].STDMODE>
#ACT
GetRandomText..\QuestDiary\数据库\拆解\防道.txt<$STR(S$拆结果7)>
MOVS$二拆0防道
#IF
EQUALS$比对数7D·M·S
EQUALS$拆结果7
#ACT
GetRandomText..\QuestDiary\数据库\拆解\均衡.txt<$STR(S$拆结果7)>
MOVS$二拆0均衡
#IF
EQUALS$比对数7D·M·0
EQUALS$拆结果7
#ACT
GetRandomText..\QuestDiary\数据库\拆解\攻魔.txt<$STR(S$拆结果7)>
MOVS$二拆0攻魔
#IF
EQUALS$比对数7D·0·S
EQUALS$拆结果7
#ACT
GetRandomText..\QuestDiary\数据库\拆解\攻道.txt<$STR(S$拆结果7)>
MOVS$二拆0攻道
#IF
EQUALS$比对数70·M·S
EQUALS$拆结果7
#ACT
GetRandomText..\QuestDiary\数据库\拆解\魔道.txt<$STR(S$拆结果7)>
MOVS$二拆0魔道
#IF
EQUALS$比对数7D·0·0
EQUALS$拆结果7
#ACT
GetRandomText..\QuestDiary\数据库\拆解\攻.txt<$STR(S$拆结果7)>
MOVS$二拆0攻
#IF
EQUALS$比对数70·M·0
EQUALS$拆结果7
#ACT
GetRandomText..\QuestDiary\数据库\拆解\魔.txt<$STR(S$拆结果7)>
MOVS$二拆0魔
#IF
EQUALS$比对数70·0·S
EQUALS$拆结果7
#ACT
GetRandomText..\QuestDiary\数据库\拆解\道.txt<$STR(S$拆结果7)>
MOVS$二拆0道
#IF
EQUAL<$BOXITEM[7].COLOR>150
#ACT
GetRandomText..\QuestDiary\数据库\拆解\未鉴定碎块.txtS$拆解色7
#ELSEACT
GetRandomText..\QuestDiary\数据库\拆解\取色表.txtS$拆解色7<$BOXITEM[7].COLOR>
#IF
EQUALS$拆解色7(普通)
#ACT
DECN$拆几率75
MOVN$拆解色7255
#IF
EQUALS$拆解色7(精良)
#ACT
DECN$拆几率710
MOVN$拆解色7250
#IF
EQUALS$拆解色7(稀有)
#ACT
DECN$拆几率715
MOVN$拆解色7154
#IF
EQUALS$拆解色7(罕有)
#ACT
DECN$拆几率726
MOVN$拆解色7243
#IF
EQUALS$拆解色7(远古)
#ACT
DECN$拆几率735
MOVN$拆解色7253
#IF
EQUALS$拆解色7(传说)
#ACT
DECN$拆几率750
MOVN$拆解色758
#IF
#ACT
MOVS$粉碎按钮<开始粉碎/@开始粉碎>
DELAYGOTO20@综合
[@ItemOutBox7]
#ACT
MOVS$拆解类7
#IF
EQUAL<$BOXITEM[0].NAME>
EQUAL<$BOXITEM[1].NAME>
EQUAL<$BOXITEM[2].NAME>
EQUAL<$BOXITEM[3].NAME>
EQUAL<$BOXITEM[4].NAME>
EQUAL<$BOXITEM[5].NAME>
EQUAL<$BOXITEM[6].NAME>
#ACT
MOVS$粉碎按钮<开始粉碎/FCOLOR=230>
DELAYGOTO20@综合
[@综合]
#ACT
OPENMERCHANTBIGDLG17380108060
#SAY
<Img:55:4:248:-27/@EXIT>
<Img:388:17:28:-24>
<Img:387:17:-206:-40>\\
;商品区---第一排
<$STR(S$售货0)>\
\\\\\\\\\\\\\\\\
;粉碎页第一排
<ITEMBOX:0:-1:0:-1:-41:33:30:56101115161920212223242630485254626465>
<ITEMBOX:1:-1:0:5:-41:33:30:56101115161920212223242630485254626465>
<ITEMBOX:2:-1:0:11:-41:33:30:56101115161920212223242630485254626465>
<ITEMBOX:3:-1:0:17:-41:33:30:56101115161920212223242630485254626465>\
;粉碎页第二排
<ITEMBOX:4:-1:0:-1:-21:33:30:56101115161920212223242630485254626465>
<ITEMBOX:5:-1:0:5:-21:33:30:56101115161920212223242630485254626465>
<ITEMBOX:6:-1:0:11:-21:33:30:56101115161920212223242630485254626465>
<ITEMBOX:7:-1:0:17:-21:33:30:56101115161920212223242630485254626465>\
<粉碎费用：[/FCOLOR=255>{免费/FCOLOR=222}<]/FCOLOR=255>\
<○/FCOLOR=103><$STR(S$粉碎按钮)>\
<○/FCOLOR=103><返回/@MAIN>\
[@开始粉碎]
#IF
NOTEQUAL<$BOXITEM[0].NAME>
#ACT
MOVRN$拆率0101
#IF
NOTEQUAL<$BOXITEM[1].NAME>
#ACT
MOVRN$拆率1101
#IF
NOTEQUAL<$BOXITEM[2].NAME>
#ACT
MOVRN$拆率2101
#IF
NOTEQUAL<$BOXITEM[3].NAME>
#ACT
MOVRN$拆率3101
#IF
NOTEQUAL<$BOXITEM[4].NAME>
#ACT
MOVRN$拆率4101
#IF
NOTEQUAL<$BOXITEM[5].NAME>
#ACT
MOVRN$拆率5101
#IF
NOTEQUAL<$BOXITEM[6].NAME>
#ACT
MOVRN$拆率6101
#IF
NOTEQUAL<$BOXITEM[6].NAME>
#ACT
MOVRN$拆率7101
#IF
NOTEQUAL<$BOXITEM[0].NAME>
SMALLN$拆率0<$STR(N$拆几率0)>
RANDOM50
#ACT
GetRandomText..\QuestDiary\数据库\拆解\<$STR(S$二拆0)>.txt<$STR(S$拆结果0)>
GIVE<$STR(S$拆解类0)><$STR(S$拆结果0)>碎块<$STR(S$拆解色0)>1
SENDMSG6[拆解]：粉碎[{<$BOXITEM[0].NAME>|<$BOXITEM[0].COLOR>:0:1}]获得了[{<$STR(S$拆解类0)><$STR(S$拆结果0)>碎块<$STR(S$拆解色0)>|<$STR(N$拆解色0)>:0:1}]。
INCN$拆解最后结果1
#IF
NOTEQUAL<$BOXITEM[0].NAME>
SMALLN$拆率0<$STR(N$拆几率0)>
RANDOM20
#ACT
GetRandomText..\QuestDiary\数据库\拆解\<$STR(S$二拆0)>.txt<$STR(S$拆结果0)>
GIVE<$STR(S$拆解类0)><$STR(S$拆结果0)>碎块<$STR(S$拆解色0)>1
SENDMSG6[拆解]：粉碎[{<$BOXITEM[0].NAME>|<$BOXITEM[0].COLOR>:0:1}]获得了[{<$STR(S$拆解类0)><$STR(S$拆结果0)>碎块<$STR(S$拆解色0)>|<$STR(N$拆解色0)>:0:1}]。
INCN$拆解最后结果1
#IF
NOTEQUAL<$BOXITEM[0].NAME>
SMALLN$拆率0<$STR(N$拆几率0)>
#ACT
GIVE<$STR(S$拆解类0)><$STR(S$拆结果0)>碎块<$STR(S$拆解色0)>1
SENDMSG6[拆解]：粉碎[{<$BOXITEM[0].NAME>|<$BOXITEM[0].COLOR>:0:1}]获得了[{<$STR(S$拆解类0)><$STR(S$拆结果0)>碎块<$STR(S$拆解色0)>|<$STR(N$拆解色0)>:0:1}]。
INCN$拆解最后结果1
DELBOXITEM0
UpDateBoxItem0
#IF
NOTEQUAL<$BOXITEM[1].NAME>
SMALLN$拆率1<$STR(N$拆几率1)>
RANDOM50
#ACT
GetRandomText..\QuestDiary\数据库\拆解\<$STR(S$二拆1)>.txt<$STR(S$拆结果1)>
GIVE<$STR(S$拆解类1)><$STR(S$拆结果1)>碎块<$STR(S$拆解色1)>1
SENDMSG6[拆解]：粉碎[{<$BOXITEM[1].NAME>|<$BOXITEM[1].COLOR>:0:1}]获得了[{<$STR(S$拆解类1)><$STR(S$拆结果1)>碎块<$STR(S$拆解色1)>|<$STR(N$拆解色1)>:0:1}]。
INCN$拆解最后结果1
#IF
NOTEQUAL<$BOXITEM[1].NAME>
SMALLN$拆率1<$STR(N$拆几率1)>
RANDOM20
#ACT
GetRandomText..\QuestDiary\数据库\拆解\<$STR(S$二拆0)>.txt<$STR(S$拆结果1)>
GIVE<$STR(S$拆解类1)><$STR(S$拆结果1)>碎块<$STR(S$拆解色1)>1
SENDMSG6[拆解]：粉碎[{<$BOXITEM[1].NAME>|<$BOXITEM[1].COLOR>:0:1}]获得了[{<$STR(S$拆解类1)><$STR(S$拆结果1)>碎块<$STR(S$拆解色1)>|<$STR(N$拆解色1)>:0:1}]。
INCN$拆解最后结果1
#IF
NOTEQUAL<$BOXITEM[1].NAME>
SMALLN$拆率1<$STR(N$拆几率1)>
#ACT
GIVE<$STR(S$拆解类1)><$STR(S$拆结果1)>碎块<$STR(S$拆解色1)>1
SENDMSG6[拆解]：粉碎[{<$BOXITEM[1].NAME>|<$BOXITEM[1].COLOR>:0:1}]获得了[{<$STR(S$拆解类1)><$STR(S$拆结果1)>碎块<$STR(S$拆解色1)>|<$STR(N$拆解色1)>:0:1}]。
INCN$拆解最后结果1
DELBOXITEM1
UpDateBoxItem1
#IF
NOTEQUAL<$BOXITEM[2].NAME>
SMALLN$拆率2<$STR(N$拆几率2)>
RANDOM50
#ACT
GetRandomText..\QuestDiary\数据库\拆解\<$STR(S$二拆2)>.txt<$STR(S$拆结果2)>
GIVE<$STR(S$拆解类2)><$STR(S$拆结果2)>碎块<$STR(S$拆解色2)>1
SENDMSG6[拆解]：粉碎[{<$BOXITEM[2].NAME>|<$BOXITEM[2].COLOR>:0:1}]获得了[{<$STR(S$拆解类2)><$STR(S$拆结果2)>碎块<$STR(S$拆解色2)>|<$STR(N$拆解色2)>:0:1}]。
INCN$拆解最后结果1
#IF
NOTEQUAL<$BOXITEM[2].NAME>
SMALLN$拆率2<$STR(N$拆几率2)>
RANDOM20
#ACT
GetRandomText..\QuestDiary\数据库\拆解\<$STR(S$二拆0)>.txt<$STR(S$拆结果2)>
GIVE<$STR(S$拆解类2)><$STR(S$拆结果2)>碎块<$STR(S$拆解色2)>1
SENDMSG6[拆解]：粉碎[{<$BOXITEM[2].NAME>|<$BOXITEM[2].COLOR>:0:1}]获得了[{<$STR(S$拆解类2)><$STR(S$拆结果2)>碎块<$STR(S$拆解色2)>|<$STR(N$拆解色2)>:0:1}]。
INCN$拆解最后结果1
#IF
NOTEQUAL<$BOXITEM[2].NAME>
SMALLN$拆率2<$STR(N$拆几率2)>
#ACT
GIVE<$STR(S$拆解类2)><$STR(S$拆结果2)>碎块<$STR(S$拆解色2)>1
SENDMSG6[拆解]：粉碎[{<$BOXITEM[2].NAME>|<$BOXITEM[2].COLOR>:0:1}]获得了[{<$STR(S$拆解类2)><$STR(S$拆结果2)>碎块<$STR(S$拆解色2)>|<$STR(N$拆解色2)>:0:1}]。
INCN$拆解最后结果1
DELBOXITEM2
UpDateBoxItem2
#IF
NOTEQUAL<$BOXITEM[3].NAME>
SMALLN$拆率3<$STR(N$拆几率3)>
RANDOM50
#ACT
GetRandomText..\QuestDiary\数据库\拆解\<$STR(S$二拆3)>.txt<$STR(S$拆结果3)>
GIVE<$STR(S$拆解类3)><$STR(S$拆结果3)>碎块<$STR(S$拆解色3)>1
SENDMSG6[拆解]：粉碎[{<$BOXITEM[3].NAME>|<$BOXITEM[3].COLOR>:0:1}]获得了[{<$STR(S$拆解类3)><$STR(S$拆结果3)>碎块<$STR(S$拆解色3)>|<$STR(N$拆解色3)>:0:1}]。
INCN$拆解最后结果1
#IF
NOTEQUAL<$BOXITEM[3].NAME>
SMALLN$拆率3<$STR(N$拆几率3)>
RANDOM20
#ACT
GetRandomText..\QuestDiary\数据库\拆解\<$STR(S$二拆0)>.txt<$STR(S$拆结果3)>
GIVE<$STR(S$拆解类3)><$STR(S$拆结果3)>碎块<$STR(S$拆解色3)>1
SENDMSG6[拆解]：粉碎[{<$BOXITEM[3].NAME>|<$BOXITEM[3].COLOR>:0:1}]获得了[{<$STR(S$拆解类3)><$STR(S$拆结果3)>碎块<$STR(S$拆解色3)>|<$STR(N$拆解色3)>:0:1}]。
INCN$拆解最后结果1
#IF
NOTEQUAL<$BOXITEM[3].NAME>
SMALLN$拆率3<$STR(N$拆几率3)>
#ACT
GIVE<$STR(S$拆解类3)><$STR(S$拆结果3)>碎块<$STR(S$拆解色3)>1
SENDMSG6[拆解]：粉碎[{<$BOXITEM[3].NAME>|<$BOXITEM[3].COLOR>:0:1}]获得了[{<$STR(S$拆解类3)><$STR(S$拆结果3)>碎块<$STR(S$拆解色3)>|<$STR(N$拆解色3)>:0:1}]。
INCN$拆解最后结果1
DELBOXITEM3
UpDateBoxItem3
#IF
NOTEQUAL<$BOXITEM[4].NAME>
SMALLN$拆率4<$STR(N$拆几率4)>
RANDOM50
#ACT
GetRandomText..\QuestDiary\数据库\拆解\<$STR(S$二拆4)>.txt<$STR(S$拆结果4)>
GIVE<$STR(S$拆解类4)><$STR(S$拆结果4)>碎块<$STR(S$拆解色4)>1
SENDMSG6[拆解]：粉碎[{<$BOXITEM[4].NAME>|<$BOXITEM[4].COLOR>:0:1}]获得了[{<$STR(S$拆解类4)><$STR(S$拆结果4)>碎块<$STR(S$拆解色4)>|<$STR(N$拆解色4)>:0:1}]。
INCN$拆解最后结果1
#IF
NOTEQUAL<$BOXITEM[4].NAME>
SMALLN$拆率4<$STR(N$拆几率4)>
RANDOM20
#ACT
GetRandomText..\QuestDiary\数据库\拆解\<$STR(S$二拆0)>.txt<$STR(S$拆结果4)>
GIVE<$STR(S$拆解类4)><$STR(S$拆结果4)>碎块<$STR(S$拆解色4)>1
SENDMSG6[拆解]：粉碎[{<$BOXITEM[4].NAME>|<$BOXITEM[4].COLOR>:0:1}]获得了[{<$STR(S$拆解类4)><$STR(S$拆结果4)>碎块<$STR(S$拆解色4)>|<$STR(N$拆解色4)>:0:1}]。
INCN$拆解最后结果1
#IF
NOTEQUAL<$BOXITEM[4].NAME>
SMALLN$拆率4<$STR(N$拆几率4)>
#ACT
GIVE<$STR(S$拆解类4)><$STR(S$拆结果4)>碎块<$STR(S$拆解色4)>1
SENDMSG6[拆解]：粉碎[{<$BOXITEM[4].NAME>|<$BOXITEM[4].COLOR>:0:1}]获得了[{<$STR(S$拆解类4)><$STR(S$拆结果4)>碎块<$STR(S$拆解色4)>|<$STR(N$拆解色4)>:0:1}]。
INCN$拆解最后结果1
DELBOXITEM4
UpDateBoxItem4
#IF
NOTEQUAL<$BOXITEM[5].NAME>
SMALLN$拆率5<$STR(N$拆几率5)>
RANDOM50
#ACT
GetRandomText..\QuestDiary\数据库\拆解\<$STR(S$二拆5)>.txt<$STR(S$拆结果5)>
GIVE<$STR(S$拆解类5)><$STR(S$拆结果5)>碎块<$STR(S$拆解色5)>1
SENDMSG6[拆解]：粉碎[{<$BOXITEM[5].NAME>|<$BOXITEM[5].COLOR>:0:1}]获得了[{<$STR(S$拆解类5)><$STR(S$拆结果5)>碎块<$STR(S$拆解色5)>|<$STR(N$拆解色5)>:0:1}]。
INCN$拆解最后结果1
#IF
NOTEQUAL<$BOXITEM[5].NAME>
SMALLN$拆率5<$STR(N$拆几率5)>
RANDOM20
#ACT
GetRandomText..\QuestDiary\数据库\拆解\<$STR(S$二拆0)>.txt<$STR(S$拆结果5)>
GIVE<$STR(S$拆解类5)><$STR(S$拆结果5)>碎块<$STR(S$拆解色5)>1
SENDMSG6[拆解]：粉碎[{<$BOXITEM[5].NAME>|<$BOXITEM[5].COLOR>:0:1}]获得了[{<$STR(S$拆解类5)><$STR(S$拆结果5)>碎块<$STR(S$拆解色5)>|<$STR(N$拆解色5)>:0:1}]。
INCN$拆解最后结果1
#IF
NOTEQUAL<$BOXITEM[5].NAME>
SMALLN$拆率5<$STR(N$拆几率5)>
#ACT
GIVE<$STR(S$拆解类5)><$STR(S$拆结果5)>碎块<$STR(S$拆解色5)>1
SENDMSG6[拆解]：粉碎[{<$BOXITEM[5].NAME>|<$BOXITEM[5].COLOR>:0:1}]获得了[{<$STR(S$拆解类5)><$STR(S$拆结果5)>碎块<$STR(S$拆解色5)>|<$STR(N$拆解色5)>:0:1}]。
INCN$拆解最后结果1
DELBOXITEM5
UpDateBoxItem5
#IF
NOTEQUAL<$BOXITEM[6].NAME>
SMALLN$拆率6<$STR(N$拆几率6)>
RANDOM50
#ACT
GetRandomText..\QuestDiary\数据库\拆解\<$STR(S$二拆6)>.txt<$STR(S$拆结果6)>
GIVE<$STR(S$拆解类6)><$STR(S$拆结果6)>碎块<$STR(S$拆解色6)>1
SENDMSG6[拆解]：粉碎[{<$BOXITEM[6].NAME>|<$BOXITEM[6].COLOR>:0:1}]获得了[{<$STR(S$拆解类6)><$STR(S$拆结果6)>碎块<$STR(S$拆解色6)>|<$STR(N$拆解色6)>:0:1}]。
INCN$拆解最后结果1
#IF
NOTEQUAL<$BOXITEM[6].NAME>
SMALLN$拆率6<$STR(N$拆几率6)>
RANDOM20
#ACT
GetRandomText..\QuestDiary\数据库\拆解\<$STR(S$二拆0)>.txt<$STR(S$拆结果6)>
GIVE<$STR(S$拆解类6)><$STR(S$拆结果6)>碎块<$STR(S$拆解色6)>1
SENDMSG6[拆解]：粉碎[{<$BOXITEM[6].NAME>|<$BOXITEM[6].COLOR>:0:1}]获得了[{<$STR(S$拆解类6)><$STR(S$拆结果6)>碎块<$STR(S$拆解色6)>|<$STR(N$拆解色6)>:0:1}]。
INCN$拆解最后结果1
#IF
NOTEQUAL<$BOXITEM[6].NAME>
SMALLN$拆率6<$STR(N$拆几率6)>
#ACT
GIVE<$STR(S$拆解类6)><$STR(S$拆结果6)>碎块<$STR(S$拆解色6)>1
SENDMSG6[拆解]：粉碎[{<$BOXITEM[6].NAME>|<$BOXITEM[6].COLOR>:0:1}]获得了[{<$STR(S$拆解类6)><$STR(S$拆结果6)>碎块<$STR(S$拆解色6)>|<$STR(N$拆解色6)>:0:1}]。
INCN$拆解最后结果1
DELBOXITEM6
UpDateBoxItem6
#IF
NOTEQUAL<$BOXITEM[7].NAME>
SMALLN$拆率7<$STR(N$拆几率7)>
RANDOM50
#ACT
GetRandomText..\QuestDiary\数据库\拆解\<$STR(S$二拆7)>.txt<$STR(S$拆结果7)>
GIVE<$STR(S$拆解类7)><$STR(S$拆结果7)>碎块<$STR(S$拆解色7)>1
SENDMSG6[拆解]：粉碎[{<$BOXITEM[7].NAME>|<$BOXITEM[7].COLOR>:0:1}]获得了[{<$STR(S$拆解类7)><$STR(S$拆结果7)>碎块<$STR(S$拆解色7)>|<$STR(N$拆解色7)>:0:1}]。
INCN$拆解最后结果1
#IF
NOTEQUAL<$BOXITEM[7].NAME>
SMALLN$拆率7<$STR(N$拆几率7)>
RANDOM20
#ACT
GetRandomText..\QuestDiary\数据库\拆解\<$STR(S$二拆0)>.txt<$STR(S$拆结果7)>
GIVE<$STR(S$拆解类7)><$STR(S$拆结果7)>碎块<$STR(S$拆解色7)>1
SENDMSG6[拆解]：粉碎[{<$BOXITEM[7].NAME>|<$BOXITEM[7].COLOR>:0:1}]获得了[{<$STR(S$拆解类7)><$STR(S$拆结果7)>碎块<$STR(S$拆解色7)>|<$STR(N$拆解色7)>:0:1}]。
INCN$拆解最后结果1
#IF
NOTEQUAL<$BOXITEM[7].NAME>
SMALLN$拆率7<$STR(N$拆几率7)>
#ACT
GIVE<$STR(S$拆解类7)><$STR(S$拆结果7)>碎块<$STR(S$拆解色7)>1
SENDMSG6[拆解]：粉碎[{<$BOXITEM[7].NAME>|<$BOXITEM[7].COLOR>:0:1}]获得了[{<$STR(S$拆解类7)><$STR(S$拆结果7)>碎块<$STR(S$拆解色7)>|<$STR(N$拆解色7)>:0:1}]。
INCN$拆解最后结果1
DELBOXITEM7
UpDateBoxItem7
#IF
EQUALN$拆解最后结果0
#ACT
SENDMSG6[拆解]：本次拆解未获得任何东西！~
#IF
#ACT
DELBOXITEM0
DELBOXITEM1
DELBOXITEM2
DELBOXITEM3
DELBOXITEM4
DELBOXITEM5
DELBOXITEM6
DELBOXITEM7
MOVN$拆解最后结果0
GOTO@MAIN