新开传奇属性重陶脚本新开版本分享
[@main]
#IF
#ACT
MOVN10
MOVN20
MOVN80
MOVN300
MOVN310
MOVN320
MOVN330
MOVN340
MOVN350
MOVN120
MOVN401
MOVN411
MOVN421
MOVN431
MOVN441
OpenBigDialogBox2
#SAY
\
<><【独家装备精洗】/AUTOCOLOR=245250100180>\\
<><至/AUTOCOLOR=245250100180><尊/AUTOCOLOR=245250100180><玛/AUTOCOLOR=245250100180><法/AUTOCOLOR=245250100180><精/AUTOCOLOR=245250100180><益/AUTOCOLOR=245250100180><求/AUTOCOLOR=245250100180><精/AUTOCOLOR=245250100180>\\
<>5点极品属性有%1几率洗成6点极品属性.<6/SCOLOR=250>点属性为<222/SCOLOR=21>\
<>6点极品属性有%1几率洗成7点极品属性.<7/SCOLOR=250>点属性为<223/SCOLOR=21>\
<>7点极品属性有%1几率洗成8点极品属性.<8/SCOLOR=250>点属性为<332/SCOLOR=21>\
<>洗装备后如果不满意请点<重新分配/SCOLOR=70>每次<10000元宝/SCOLOR=146>.或者取消\
<>精洗装备时请不要更换装备.当前页面更换装备将自动关闭\
<>目前武器支持10点属性精洗.首饰支持8点极品装备属性精洗\\
<只支持装备极品超/SCOLOR=70><精洗武器/@武器><精洗衣服/@衣服><精洗头盔/@头盔><精洗项链/@项链>\
<过５点的装备进行/SCOLOR=70>\
<精洗请玩家加星/SCOLOR=70><精洗勋章/@勋章><精洗左手/@左手镯><精洗右手/@右手镯><精洗左戒/@左戒指>\
<之后前来精洗/SCOLOR=70>\
<><装备加星/@sj><精洗右戒/@右戒指><精洗靴子/@靴子><精洗腰带/@腰带><精洗戰鼓/@宝石>\
<材料商铺限量购买/SCOLOR=250>\
[@sj]
#ACT
OpenUpgradeDialog
[@武器]
#IF
CHECKUSEITEM1
#ACT
MOVS1<$WEAPON>
MOVS21
goto@检测武器攻击
#ELSEACT
MESSAGEBOX[提示]：请穿戴好武器在来进行精洗。
[@检测武器攻击]
#IF
CheckItemAddValue<$STR(S2)>0=0
CheckItemAddValue<$STR(S2)>1=0
CheckItemAddValue<$STR(S2)>2=0
#say
<><【独家装备精洗】/AUTOCOLOR=245250100180>\\
<><至/AUTOCOLOR=245250100180><尊/AUTOCOLOR=245250100180><玛/AUTOCOLOR=245250100180><法/AUTOCOLOR=245250100180><精/AUTOCOLOR=245250100180><益/AUTOCOLOR=245250100180><求/AUTOCOLOR=245250100180><精/AUTOCOLOR=245250100180>\\
<>此装备没有极品属性！
#ELSEACT
goto@检测武器攻击A
[@检测武器攻击A]
#IF
smallN1256
CheckItemAddValue<$STR(S2)>0=<$STR(N1)>
#act
INCN2<$STR(N1)>
MOVN38<$STR(N2)>
MOVN10
goto@检测武器魔法
#SAY
<><【独家装备精洗】/AUTOCOLOR=245250100180>\\
<><至/AUTOCOLOR=245250100180><尊/AUTOCOLOR=245250100180><玛/AUTOCOLOR=245250100180><法/AUTOCOLOR=245250100180><精/AUTOCOLOR=245250100180><益/AUTOCOLOR=245250100180><求/AUTOCOLOR=245250100180><精/AUTOCOLOR=245250100180>\\
<>是否随机分配极品属性？\
<><是的我需要/@YES分配武器><NO我没元宝不需要/@exit>
#ELSEACT
INCN11
goto@检测武器攻击A
[@检测武器魔法]
#IF
smallN1256
CheckItemAddValue<$STR(S2)>1=<$STR(N1)>
#act
INCN2<$STR(N1)>
MOVN38<$STR(N2)>
MOVN10
goto@检测武器道术
#SAY
<><【独家装备精洗】/AUTOCOLOR=245250100180>\\
<><至/AUTOCOLOR=245250100180><尊/AUTOCOLOR=245250100180><玛/AUTOCOLOR=245250100180><法/AUTOCOLOR=245250100180><精/AUTOCOLOR=245250100180><益/AUTOCOLOR=245250100180><求/AUTOCOLOR=245250100180><精/AUTOCOLOR=245250100180>\\
<>是否随机分配极品属性？\
<><是的我需要/@YES分配武器><NO我没元宝不需要/@exit>
#ELSEACT
INCN11
goto@检测武器魔法
[@检测武器道术]
#IF
smallN1256
CheckItemAddValue<$STR(S2)>2=<$STR(N1)>
#act
INCN2<$STR(N1)>
MOVN38<$STR(N2)>
MOVN10
#SAY
<><【独家装备精洗】/AUTOCOLOR=245250100180>\\
<><至/AUTOCOLOR=245250100180><尊/AUTOCOLOR=245250100180><玛/AUTOCOLOR=245250100180><法/AUTOCOLOR=245250100180><精/AUTOCOLOR=245250100180><益/AUTOCOLOR=245250100180><求/AUTOCOLOR=245250100180><精/AUTOCOLOR=245250100180>\\
<>是否随机分配极品属性？\
<><是的我需要/@YES分配武器><NO我没元宝不需要/@exit>
#ELSEACT
INCN11
goto@检测武器道术
[@YES分配武器]
#IF
CheckItemAddValue<$STR(S2)>0=0
#ACT
DECN21
#IF
CheckItemAddValue<$STR(S2)>1=0
#ACT
DECN21
#IF
CheckItemAddValue<$STR(S2)>2=0
#ACT
DECN21
#IF
largeN24
#SAY
<><【独家装备精洗】/AUTOCOLOR=245250100180>\\
<><至/AUTOCOLOR=245250100180><尊/AUTOCOLOR=245250100180><玛/AUTOCOLOR=245250100180><法/AUTOCOLOR=245250100180><精/AUTOCOLOR=245250100180><益/AUTOCOLOR=245250100180><求/AUTOCOLOR=245250100180><精/AUTOCOLOR=245250100180>\\
<>您的【<$STR(S1)>】共有极品属性{【<$STR(N2)>】/SCOLOR=215}点系统将进行随机分配\
\\
<><是的我需要/@YES分配武器A><NO我没元宝不需要/@exit>
#ELSEsay
<><【独家装备精洗】/AUTOCOLOR=245250100180>\\
<><至/AUTOCOLOR=245250100180><尊/AUTOCOLOR=245250100180><玛/AUTOCOLOR=245250100180><法/AUTOCOLOR=245250100180><精/AUTOCOLOR=245250100180><益/AUTOCOLOR=245250100180><求/AUTOCOLOR=245250100180><精/AUTOCOLOR=245250100180>\\
<>属性低于5点不予分配！
[@YES分配武器A]
#IF
largeN210
#ACT
messagebox属性超额不予分配！
break
#IF
CHECKGAMEGOLD<10000
#ACT
messagebox你的元宝不够10000了哦，分配一次需要花费元宝10000个！
break
#IF
equalN25
#ACT
MOVRN3100
INCN31
GetRandomText.\QuestDiary\小雨方案\5点方案\5点道士.txtS10<$STR(N3)>
GetRandomText.\QuestDiary\小雨方案\5点方案\5点攻击.txtS11<$STR(N3)>
GetRandomText.\QuestDiary\小雨方案\5点方案\5点魔法.txtS12<$STR(N3)>
MOVN30<$STR(S10)>
MOVN31<$STR(S11)>
MOVN32<$STR(S12)>
GAMEGOLD-10000
goto@确认增加A
#IF
equalN26
#ACT
MOVRN3113
INCN31
GetRandomText.\QuestDiary\小雨方案\6点方案\6点道士.txtS10<$STR(N3)>
GetRandomText.\QuestDiary\小雨方案\6点方案\6点攻击.txtS11<$STR(N3)>
GetRandomText.\QuestDiary\小雨方案\6点方案\6点魔法.txtS12<$STR(N3)>
MOVN30<$STR(S10)>
MOVN31<$STR(S11)>
MOVN32<$STR(S12)>
GAMEGOLD-10000
goto@确认增加A
#IF
equalN27
#ACT
MOVRN3154
INCN31
GetRandomText.\QuestDiary\小雨方案\7点方案\7点道士.txtS10<$STR(N3)>
GetRandomText.\QuestDiary\小雨方案\7点方案\7点攻击.txtS11<$STR(N3)>
GetRandomText.\QuestDiary\小雨方案\7点方案\7点魔法.txtS12<$STR(N3)>
MOVN30<$STR(S10)>
MOVN31<$STR(S11)>
MOVN32<$STR(S12)>
GAMEGOLD-10000
goto@确认增加A
#IF
equalN28
#ACT
MOVRN3183
INCN31
GetRandomText.\QuestDiary\小雨方案\8点方案\8点道士.txtS10<$STR(N3)>
GetRandomText.\QuestDiary\小雨方案\8点方案\8点攻击.txtS11<$STR(N3)>
GetRandomText.\QuestDiary\小雨方案\8点方案\8点魔法.txtS12<$STR(N3)>
MOVN30<$STR(S10)>
MOVN31<$STR(S11)>
MOVN32<$STR(S12)>
GAMEGOLD-10000
goto@确认增加A
#IF
equalN29
#ACT
MOVRN3159
INCN31
GetRandomText.\QuestDiary\小雨方案\9点方案\9点道士.txtS10<$STR(N3)>
GetRandomText.\QuestDiary\小雨方案\9点方案\9点攻击.txtS11<$STR(N3)>
GetRandomText.\QuestDiary\小雨方案\9点方案\9点魔法.txtS12<$STR(N3)>
MOVN30<$STR(S10)>
MOVN31<$STR(S11)>
MOVN32<$STR(S12)>
GAMEGOLD-10000
goto@确认增加A
#IF
equalN210
#ACT
MOVRN3207
INCN31
GetRandomText.\QuestDiary\小雨方案\10点方案\10点道士.txtS10<$STR(N3)>
GetRandomText.\QuestDiary\小雨方案\10点方案\10点攻击.txtS11<$STR(N3)>
GetRandomText.\QuestDiary\小雨方案\10点方案\10点魔法.txtS12<$STR(N3)>
MOVN30<$STR(S10)>
MOVN31<$STR(S11)>
MOVN32<$STR(S12)>
GAMEGOLD-10000
goto@确认增加A
[@确认增加A]
<><【独家装备精洗】/AUTOCOLOR=245250100180>\\
<><至/AUTOCOLOR=245250100180><尊/AUTOCOLOR=245250100180><玛/AUTOCOLOR=245250100180><法/AUTOCOLOR=245250100180><精/AUTOCOLOR=245250100180><益/AUTOCOLOR=245250100180><求/AUTOCOLOR=245250100180><精/AUTOCOLOR=245250100180>\\
<>重新分配的属性如下:\
<>攻击→{<$STR(N30)>/SCOLOR=250}(清洗后额外增加的攻击属性)\
<>魔法→{<$STR(N31)>/SCOLOR=250}(清洗后额外增加的魔法属性)\
<>道术→{<$STR(N32)>/SCOLOR=250}(清洗后额外增加的道术属性)\
<><>\
<><确定分配/@确定分配属性A><重新分配/@YES分配武器A>←分配一次需要收费元宝<10000/SCOLOR=70>个\\
<>\
<><取消分配/@exit>
[@确定分配属性A]
#ACT
GMEXECUTE改属性<$STR(S2)>0<$STR(N30)>
GMEXECUTE改属性<$STR(S2)>1<$STR(N31)>
GMEXECUTE改属性<$STR(S2)>2<$STR(N32)>
#SAY
<><【独家装备精洗】/AUTOCOLOR=245250100180>\\
<><至/AUTOCOLOR=245250100180><尊/AUTOCOLOR=245250100180><玛/AUTOCOLOR=245250100180><法/AUTOCOLOR=245250100180><精/AUTOCOLOR=245250100180><益/AUTOCOLOR=245250100180><求/AUTOCOLOR=245250100180><精/AUTOCOLOR=245250100180>\\
<>属性分配成功！
;=============================================
[@衣服]
#IF
CHECKUSEITEM0
#ACT
MOVS1<$DRESS>
MOVS20
goto@检测防御
#ELSEACT
MESSAGEBOX[提示]：请穿戴好衣服在来进行精洗。
[@勋章]
#IF
CHECKUSEITEM2
#ACT
MOVS1<$RIGHTHAND>
MOVS22
goto@检测防御
#ELSEACT
MESSAGEBOX[提示]：请穿戴好勋章在来进行精洗。
[@项链]
#IF
CHECKUSEITEM3
#ACT
MOVS1<$NECKLACE>
MOVS23
goto@检测防御
#ELSEACT
MESSAGEBOX[提示]：请穿戴好项链在来进行精洗。
[@头盔]
#IF
CHECKUSEITEM4
#ACT
MOVS1<$HELMET>
MOVS24
goto@检测防御
#ELSEACT
MESSAGEBOX[提示]：请穿戴好头盔在来进行精洗。
[@右手镯]
#IF
CHECKUSEITEM5
#ACT
MOVS1<$ARMRING_R>
MOVS25
goto@检测防御
#ELSEACT
MESSAGEBOX[提示]：请穿戴好右手镯在来进行精洗。
[@左手镯]
#IF
CHECKUSEITEM6
#ACT
MOVS1<$ARMRING_L>
MOVS26
goto@检测防御
#ELSEACT
MESSAGEBOX[提示]：请穿戴好左手镯在来进行精洗。
[@右戒指]
#IF
CHECKUSEITEM7
#ACT
MOVS1<$RING_R>
MOVS27
goto@检测防御
#ELSEACT
MESSAGEBOX[提示]：请穿戴好右戒指在来进行精洗。
[@左戒指]
#IF
CHECKUSEITEM8
#ACT
MOVS1<$RING_L>
MOVS28
goto@检测防御
#ELSEACT
MESSAGEBOX[提示]：请穿戴好左戒指在来进行精洗。
[@腰带]
#IF
CHECKUSEITEM10
#ACT
MOVS1<$BELT>
MOVS210
goto@检测防御
#ELSEACT
MESSAGEBOX[提示]：请穿戴好腰带在来进行精洗。
[@靴子]
#IF
CHECKUSEITEM11
#ACT
MOVS1<$BOOTS>
MOVS211
goto@检测防御
#ELSEACT
MESSAGEBOX[提示]：请穿戴好靴子在来进行精洗。
[@宝石]
#IF
CHECKUSEITEM12
#ACT
MOVS1<$CHARM>
MOVS212
goto@检测防御
#ELSEACT
MESSAGEBOX[提示]：请穿戴好宝石在来进行精洗。
[@检测防御]
#IF
CheckItemAddValue<$STR(S2)>2=0
CheckItemAddValue<$STR(S2)>3=0
CheckItemAddValue<$STR(S2)>4=0
#say
<><【独家装备精洗】/AUTOCOLOR=245250100180>\\
<><至/AUTOCOLOR=245250100180><尊/AUTOCOLOR=245250100180><玛/AUTOCOLOR=245250100180><法/AUTOCOLOR=245250100180><精/AUTOCOLOR=245250100180><益/AUTOCOLOR=245250100180><求/AUTOCOLOR=245250100180><精/AUTOCOLOR=245250100180>\\
<>此装备没有极品属性！
#ELSEACT
goto@检测攻击
[@检测攻击]
#IF
smallN1256
CheckItemAddValue<$STR(S2)>2=<$STR(N1)>
#act
INCN2<$STR(N1)>
MOVN38<$STR(N2)>
MOVN10
goto@检测魔法
#SAY
<><【独家装备精洗】/AUTOCOLOR=245250100180>\\
<><至/AUTOCOLOR=245250100180><尊/AUTOCOLOR=245250100180><玛/AUTOCOLOR=245250100180><法/AUTOCOLOR=245250100180><精/AUTOCOLOR=245250100180><益/AUTOCOLOR=245250100180><求/AUTOCOLOR=245250100180><精/AUTOCOLOR=245250100180>\\
<>是否随机分配极品属性？\
<><是的我需要/@YES分配><NO我没元宝不需要/@exit>\
#ELSEACT
INCN11
goto@检测攻击
[@检测魔法]
#IF
smallN1256
CheckItemAddValue<$STR(S2)>3=<$STR(N1)>
#act
INCN2<$STR(N1)>
MOVN38<$STR(N2)>
MOVN10
goto@检测道术
#SAY
<><【独家装备精洗】/AUTOCOLOR=245250100180>\\
<><至/AUTOCOLOR=245250100180><尊/AUTOCOLOR=245250100180><玛/AUTOCOLOR=245250100180><法/AUTOCOLOR=245250100180><精/AUTOCOLOR=245250100180><益/AUTOCOLOR=245250100180><求/AUTOCOLOR=245250100180><精/AUTOCOLOR=245250100180>\\
<>是否随机分配极品属性？\
<><是的我需要/@YES分配><NO我没元宝不需要/@exit>\
#ELSEACT
INCN11
goto@检测魔法
[@检测道术]
#IF
smallN1256
CheckItemAddValue<$STR(S2)>4=<$STR(N1)>
#act
INCN2<$STR(N1)>
MOVN10
MOVN38<$STR(N2)>
#SAY
<><【独家装备精洗】/AUTOCOLOR=245250100180>\\
<><至/AUTOCOLOR=245250100180><尊/AUTOCOLOR=245250100180><玛/AUTOCOLOR=245250100180><法/AUTOCOLOR=245250100180><精/AUTOCOLOR=245250100180><益/AUTOCOLOR=245250100180><求/AUTOCOLOR=245250100180><精/AUTOCOLOR=245250100180>\\
<>是否随机分配极品属性？\
<><是的我需要/@YES分配><NO我没元宝不需要/@exit>\
#ELSEACT
INCN11
goto@检测道术
[@YES分配]
#IF
CheckItemAddValue<$STR(S2)>2=0
#ACT
DECN21
#IF
CheckItemAddValue<$STR(S2)>3=0
#ACT
DECN21
#IF
CheckItemAddValue<$STR(S2)>4=0
#ACT
DECN21
#IF
largeN24
#SAY
<><【独家装备精洗】/AUTOCOLOR=245250100180>\\
<><至/AUTOCOLOR=245250100180><尊/AUTOCOLOR=245250100180><玛/AUTOCOLOR=245250100180><法/AUTOCOLOR=245250100180><精/AUTOCOLOR=245250100180><益/AUTOCOLOR=245250100180><求/AUTOCOLOR=245250100180><精/AUTOCOLOR=245250100180>\\
<>您的【<$STR(S1)>】共有极品属性{【<$STR(N2)>】/SCOLOR=215}点系统将进行随机分配\
\\
<><是的我需要/@YES分配A><NO我没元宝不需要/@exit>
#ELSEsay
<><【独家装备精洗】/AUTOCOLOR=245250100180>\\
<><至/AUTOCOLOR=245250100180><尊/AUTOCOLOR=245250100180><玛/AUTOCOLOR=245250100180><法/AUTOCOLOR=245250100180><精/AUTOCOLOR=245250100180><益/AUTOCOLOR=245250100180><求/AUTOCOLOR=245250100180><精/AUTOCOLOR=245250100180>\\
<>属性低于5点不予分配！
[@YES分配A]
#IF
largeN28
#ACT
messagebox属性超额不予分配！
break
#IF
CHECKGAMEGOLD<10000
#ACT
messagebox你的元宝不够10000了哦，分配一次需要花费元宝10000个！
break
#IF
equalN25
#ACT
MOVRN3100
INCN31
GetRandomText.\QuestDiary\小雨方案\5点方案\5点道士.txtS10<$STR(N3)>
GetRandomText.\QuestDiary\小雨方案\5点方案\5点攻击.txtS11<$STR(N3)>
GetRandomText.\QuestDiary\小雨方案\5点方案\5点魔法.txtS12<$STR(N3)>
MOVN30<$STR(S10)>
MOVN31<$STR(S11)>
MOVN32<$STR(S12)>
GAMEGOLD-10000
goto@确认增加
#IF
equalN26
#ACT
MOVRN3113
INCN31
GetRandomText.\QuestDiary\小雨方案\6点方案\6点道士.txtS10<$STR(N3)>
GetRandomText.\QuestDiary\小雨方案\6点方案\6点攻击.txtS11<$STR(N3)>
GetRandomText.\QuestDiary\小雨方案\6点方案\6点魔法.txtS12<$STR(N3)>
MOVN30<$STR(S10)>
MOVN31<$STR(S11)>
MOVN32<$STR(S12)>
GAMEGOLD-10000
goto@确认增加
#IF
equalN27
#ACT
MOVRN3154
INCN31
GetRandomText.\QuestDiary\小雨方案\7点方案\7点道士.txtS10<$STR(N3)>
GetRandomText.\QuestDiary\小雨方案\7点方案\7点攻击.txtS11<$STR(N3)>
GetRandomText.\QuestDiary\小雨方案\7点方案\7点魔法.txtS12<$STR(N3)>
MOVN30<$STR(S10)>
MOVN31<$STR(S11)>
MOVN32<$STR(S12)>
GAMEGOLD-10000
goto@确认增加
#IF
equalN28
#ACT
MOVRN3183
INCN31
GetRandomText.\QuestDiary\小雨方案\8点方案\8点道士.txtS10<$STR(N3)>
GetRandomText.\QuestDiary\小雨方案\8点方案\8点攻击.txtS11<$STR(N3)>
GetRandomText.\QuestDiary\小雨方案\8点方案\8点魔法.txtS12<$STR(N3)>
MOVN30<$STR(S10)>
MOVN31<$STR(S11)>
MOVN32<$STR(S12)>
GAMEGOLD-10000
goto@确认增加
[@确认增加]
<><【独家装备精洗】/AUTOCOLOR=245250100180>\\
<><至/AUTOCOLOR=245250100180><尊/AUTOCOLOR=245250100180><玛/AUTOCOLOR=245250100180><法/AUTOCOLOR=245250100180><精/AUTOCOLOR=245250100180><益/AUTOCOLOR=245250100180><求/AUTOCOLOR=245250100180><精/AUTOCOLOR=245250100180>\\
<>重新分配的属性如下:\
<>攻击→{<$STR(N30)>/SCOLOR=250}(清洗后额外增加的攻击属性)\
<>魔法→{<$STR(N31)>/SCOLOR=250}(清洗后额外增加的魔法属性)\
<>道术→{<$STR(N32)>/SCOLOR=250}(清洗后额外增加的道术属性)\
<><>\
<><确定分配/@确定分配属性><重新分配/@YES分配A>←分配一次需要收费元宝<10000/SCOLOR=70>个\\
<>\
<><取消分配/@exit>
[@确定分配属性]
#ACT
GMEXECUTE改属性<$STR(S2)>2<$STR(N30)>
GMEXECUTE改属性<$STR(S2)>3<$STR(N31)>
GMEXECUTE改属性<$STR(S2)>4<$STR(N32)>
#SAY
<><【独家装备精洗】/AUTOCOLOR=245250100180>\\
<><至/AUTOCOLOR=245250100180><尊/AUTOCOLOR=245250100180><玛/AUTOCOLOR=245250100180><法/AUTOCOLOR=245250100180><精/AUTOCOLOR=245250100180><益/AUTOCOLOR=245250100180><求/AUTOCOLOR=245250100180><精/AUTOCOLOR=245250100180>\\
<>属性分配成功！