[@main]
#IF
#ACT
MOV N1 0
MOV N2 0
MOV N8 0
MOV N30 0
MOV N31 0
MOV N32 0
MOV N33 0
MOV N34 0
MOV N35 0
MOV N12 0
MOV N40 1
MOV N41 1
MOV N42 1
MOV N43 1
MOV N44 1
OpenBigDialogBox 2
#SAY
\
【独家装备精洗】/AUTOCOLOR=245,250,100,180 \ \
至/AUTOCOLOR=245,250,100,180 尊/AUTOCOLOR=245,250,100,180 玛/AUTOCOLOR=245,250,100,180 法/AUTOCOLOR=245,250,100,180 精/AUTOCOLOR=245,250,100,180 益/AUTOCOLOR=245,250,100,180 求/AUTOCOLOR=245,250,100,180 精/AUTOCOLOR=245,250,100,180\ \
5点极品属性有%1几率洗成6点极品属性.6/SCOLOR=250点属性为 2 2 2/SCOLOR=21\
6点极品属性有%1几率洗成7点极品属性.7/SCOLOR=250点属性为 2 2 3/SCOLOR=21\
7点极品属性有%1几率洗成8点极品属性.8/SCOLOR=250点属性为 3 3 2/SCOLOR=21\
洗装备后如果不满意请点重新分配/SCOLOR=70每次10000元宝/SCOLOR=146.或者取消\
精洗装备时请不要更换装备.当前页面更换装备将自动关闭\
目前武器支持10点属性精洗.首饰支持8点极品装备属性精洗\ \
只支持装备极品超/SCOLOR=70 精洗武器/@武器 精洗衣服/@衣服 精洗头盔/@头盔 精洗项链/@项链\
过５点的装备进行/SCOLOR=70\
精洗,请玩家加星/SCOLOR=70 精洗勋章/@勋章 精洗左手/@左手镯 精洗右手/@右手镯 精洗左戒/@左戒指\
之后前来精洗/SCOLOR=70\
装备加星/@sj 精洗右戒/@右戒指 精洗靴子/@靴子 精洗腰带/@腰带 精洗戰鼓/@宝石\
材料商铺限量购买/SCOLOR=250\
[@sj]
#ACT
OpenUpgradeDialog
[@武器]
#IF
CHECKUSEITEM 1
#ACT
MOV S1 $WEAPON
MOV S2 1
goto @检测武器攻击
#ELSEACT
MESSAGEBOX [提示]：请穿戴好武器在来进行精洗。
[@检测武器攻击]
#IF
CheckItemAddValue $STR(S2) 0 = 0
CheckItemAddValue $STR(S2) 1 = 0
CheckItemAddValue $STR(S2) 2 = 0
#say
【独家装备精洗】/AUTOCOLOR=245,250,100,180 \ \
至/AUTOCOLOR=245,250,100,180 尊/AUTOCOLOR=245,250,100,180 玛/AUTOCOLOR=245,250,100,180 法/AUTOCOLOR=245,250,100,180 精/AUTOCOLOR=245,250,100,180 益/AUTOCOLOR=245,250,100,180 求/AUTOCOLOR=245,250,100,180 精/AUTOCOLOR=245,250,100,180\ \
此装备没有极品属性！
#ELSEACT
goto @检测武器攻击A
[@检测武器攻击A]
#IF
small N1 256
CheckItemAddValue $STR(S2) 0 = $STR(N1)
#act
INC N2 $STR(N1)
MOV N38 $STR(N2)
MOV N1 0
goto @检测武器魔法
#SAY
【独家装备精洗】/AUTOCOLOR=245,250,100,180 \ \
至/AUTOCOLOR=245,250,100,180 尊/AUTOCOLOR=245,250,100,180 玛/AUTOCOLOR=245,250,100,180 法/AUTOCOLOR=245,250,100,180 精/AUTOCOLOR=245,250,100,180 益/AUTOCOLOR=245,250,100,180 求/AUTOCOLOR=245,250,100,180 精/AUTOCOLOR=245,250,100,180\ \
是否随机分配极品属性？\
是的,我需要/@YES分配武器 NO,我没元宝不需要/@exit
#ELSEACT
INC N1 1
goto @检测武器攻击A
[@检测武器魔法]
#IF
small N1 256
CheckItemAddValue $STR(S2) 1 = $STR(N1)
#act
INC N2 $STR(N1)
MOV N38 $STR(N2)
MOV N1 0
goto @检测武器道术
#SAY
【独家装备精洗】/AUTOCOLOR=245,250,100,180 \ \
至/AUTOCOLOR=245,250,100,180 尊/AUTOCOLOR=24传奇私服1805,250,100,180 玛/AUTOCOLOR=245,250,100,180 法/AUTOCOLOR=245,250,100,180 精/AUTOCOLOR=245,250,100,180 益/AUTOCOLOR=245,250,100,180 求/AUTOCOLOR=245,250,100,180 精/AUTOCOLOR=245,250,100,180\ \
是否随机分配极品属性？\
是的,我需要/@YES分配武器 NO,我没元宝不需要/@exit
#ELSEACT
INC N1 1
goto @检测武器魔法
[@检测武器道术]
#IF
small N1 256
CheckItemAddValue $STR(S2) 2 = $STR(N1)
#act
INC N2 $STR(N1)
MOV N38 $STR(N2)
MOV N1 0
#SAY
【独家装备精洗】/AUTOCOLOR=245,250,100,180 \ \
至/AUTOCOLOR=245,250,100,180 尊/AUTOCOLOR=245,250,100,180 玛/AUTOCOLOR=245,250,100,180 法/AUTOCOLOR=245,250,100,180 精/AUTOCOLOR=245,250,100,180 益/AUTOCOLOR=245,250,100,180 求/AUTOCOLOR=245,250,100,180 精/AUTOCOLOR=245,250,100,180\ \
是否随机分配极品属性？\
是的,我需要/@YES分配武器 NO,我没元宝不需要/@exit
#ELSEACT
INC N1 1
goto @检测武器道术
[@YES分配武器]
#IF
CheckItemAddValue $STR(S2) 0 = 0
#ACT
DEC N2 1
#IF
CheckItemAddValue $STR(S2) 1 = 0
#ACT
DEC N2 1
#IF
CheckItemAddValue $STR(S2) 2 = 0
#ACT
DEC N2 1
#IF
large N2 4
#SAY
【独家装备精洗】/AUTOCOLOR=245,250,100,180 \ \
至/AUTOCOLOR=245,250,100,180 尊/AUTOCOLOR=245,250,100,180 玛/AUTOCOLOR=245,250,100,180 法/AUTOCOLOR=245,250,100,180 精/AUTOCOLOR=245,250,100,180 益/AUTOCOLOR=245,250,100,180 求/AUTOCOLOR=245,250,100,180 精/AUTOCOLOR=245,250,100,180\ \
您的【$STR(S1)】共有极品属性{【$STR(N2)】/SCOLOR=215}点,系统将进行随机分配\
\ \
是的,我需要/@YES分配武器A NO,我没元宝不需要/@exit
#ELSEsay
【独家装备精洗】/AUTOCOLOR=245,250,100,180 \ \
至/AUTOCOLOR=245,250,100,180 尊/AUTOCOLOR=245,250,100,180 玛/AUTOCOLOR=245,250,100,180 法/AUTOCOLOR=245,250,100,180 精/AUTOCOLOR=245,250,100,180 益/AUTOCOLOR=245,250,100,180 求/AUTOCOLOR=245,250,100,180 精/AUTOCOLOR=245,250,100,180\ \
属性低于5点不予分配！
[@YES分配武器A]
#IF
large N2 10
#ACT
messagebox 属性超额,不予分配！
break
#IF
CHECKGAMEGOLD 10000
#ACT
messagebox 你的元宝不够10000了哦，分配一次需要花费元宝10000个！
break
#IF
equal N2 5
#ACT
MOVR N3 100
INC N3 1
GetRandomText .\QuestDiary\小雨方案\5点方案\5点道士.txt S10 $STR(N3)
GetRandomText .\QuestDiary\小雨方案\5点方案\5点攻击.txt S11 $STR(N3)
GetRandomText .\QuestDiary\小雨方案\5点方案\5点魔法.txt S12 $STR(N3)
MOV N30 $STR(S10)
MOV N31 $STR(S11)
MOV N32 $STR(S12)
GAMEGOLD - 10000
goto @确认增加A
#IF
equal N2 6
#ACT
MOVR N3 113
INC N3 1
GetRandomText .\QuestDiary\小雨方案\6点方案\6点道士.txt S10 $STR(N3)
GetRandomText .\QuestDiary\小雨方案\6点方案\6点攻击.txt S11 $STR(N3)
GetRandomText .\QuestDiary\小雨方案\6点方案\6点魔法.txt S12 $STR(N3)
MOV N30 $STR(S10)
MOV N31 $STR(S11)
MOV N32 $STR(S12)
GAMEGOLD - 10000
goto @确认增加A
#IF
equal N2 7
#ACT
MOVR N3 154
INC N3 1
GetRandomText .\QuestDiary\小雨方案\7点方案\7点道士.txt S10 $STR(N3)
GetRandomText .\QuestDiary\小雨方案\7点方案\7点攻击.txt S11 $STR(N3)
GetRandomText .\QuestDiary\小雨方案\7点方案\7点魔法.txt S12 $STR(N3)
MOV N30 $STR(S10)
MOV N31 $STR(S11)
MOV N32 $STR(S12)
GAMEGOLD - 10000
goto @确认增加A
#IF
equal N2 8
#ACT
MOVR N3 183
INC N3 1
GetRandomText .\QuestDiary\小雨方案\8点方案\8点道士.txt S10 $STR(N3)
GetRandomText .\QuestDiary\小雨方案\8点方案\8点攻击.txt S11 $STR(N3)
GetRandomText .\QuestDiary\小雨方案\8点方案\8点魔法.txt S12 $STR(N3)
MOV N30 $STR(S10)
MOV N31 $STR(S11)
MOV N32 $STR(S12)
GAMEGOLD - 10000
goto @确认增加A
#IF
equal N2 9
#ACT
MOVR N3 159
INC N3 1
GetRandomText .\QuestDiary\小雨方案\9点方案\9点道士.txt S10 $STR(N3)
GetRandomText .\QuestDiary\小雨方案\9点方案\9点攻击.txt S11 $STR(N3)
GetRandomText .\QuestDiary\小雨方案\9点方案\9点魔法.txt S12 $STR(N3)
MOV N30 $STR(S10)
MOV N31 $STR(S11)
MOV N32 $STR(S12)
GAMEGOLD - 10000
goto @确认增加A
#IF
equal N2 10
#ACT
MOVR N3 207
INC N3 1
GetRandomText .\QuestDiary\小雨方案\10点方案\10点道士.txt S10 $STR(N3)
GetRandomText .\QuestDiary\小雨方案\10点方案\10点攻击.txt S11 $STR(N3)
GetRandomText .\QuestDiary\小雨方案\10点方案\10点魔法.txt S12 $STR(N3)
MOV N30 $STR(S10)
MOV N31 $STR(S11)
MOV N32 $STR(S12)
GAMEGOLD - 10000
goto @确认增加A
[@确认增加A]
【独家装备精洗】/AUTOCOLOR=245,250,100,180 \ \
至/AUTOCOLOR=245,250,100,180 尊/AUTOCOLOR=245,250,100,180 玛/AUTOCOLOR=245,250,100,180 法/AUTOCOLOR=245,250,100,180 精/AUTOCOLOR=245,250,100,180 益/AUTOCOLOR=245,250,100,180 求/AUTOCOLOR=245,250,100,180 精/AUTOCOLOR=245,250,100,180\ \
重新分配的属性如下:\
攻击 {$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=245,250,100,180 \ \
至/AUTOCOLOR=245,250,100,180 尊/AUTOCOLOR=245,250,100,180 玛/AUTOCOLOR=245,250,100,180 法/AUTOCOLOR=245,250,100,180 精/AUTOCOLOR=245,250,100,180 益/AUTOCOLOR=245,250,100,180 求/AUTOCOLOR=245,250,100,180 精/AUTOCOLOR=245,250,100,180\ \
属性分配成功！
;=============================================
[@衣服]
#IF
CHECKUSEITEM 0
#ACT
MOV S1 $DRESS
MOV S2 0
goto @检测防御
#ELSEACT
MESSAGEBOX [提示]：请穿戴好衣服在来进行精洗。
[@勋章]
#IF
CHECKUSEITEM 2
#ACT
MOV S1 $RIGHTHAND
MOV S2 2
goto @检测防御
#ELSEACT
MESSAGEBOX [提示]：请穿戴好勋章在来进行精洗。
[@项链]
#IF
CHECKUSEITEM 3
#ACT
MOV S1 $NECKLACE
MOV S2 3
goto @检测防御
#ELSEACT
MESSAGEBOX [提示]：请穿戴好项链在来进行精洗。
[@头盔]
#IF
CHECKUSEITEM 4
#ACT
MOV S1 $HELMET
MOV S2 4
goto @检测防御
#ELSEACT
MESSAGEBOX [提示]：请穿戴好头盔在来进行精洗。
[@右手镯]
#IF
CHECKUSEITEM 5
#ACT
MOV S1 $ARMRING_R
MOV S2 5
goto @检测防御
#ELSEACT
MESSAGEBOX [提示]：请穿戴好右手镯在来进行精洗。
[@左手镯]
#IF
CHECKUSEITEM 6
#ACT
MOV S1 $ARMRING_L
MOV S2 6
goto @检测防御
#ELSEACT
MESSAGEBOX [提示]：请穿戴好左手镯在来进行精洗。
[@右戒指]
#IF
CHECKUSEITEM 7
#ACT
MOV S1 $RING_R
MOV S2 7
goto @检测防御
#ELSEACT
MESSAGEBOX [提示]：请穿戴好右戒指在来进行精洗。
[@左戒指]
#IF
CHECKUSEITEM 8
#ACT
MOV S1 $RING_L
MOV S2 8
goto @检测防御
#ELSEACT
MESSAGEBOX [提示]：请穿戴好左戒指在来进行精洗。
[@腰带]
#IF
CHECKUSEITEM 10
#ACT
MOV S1 $BELT
MOV S2 10
goto @检测防御
#ELSEACT
MESSAGEBOX [提示]：请穿戴好腰带在来进行精洗。
[@靴子]
#IF
CHECKUSEITEM 11
#ACT
MOV S1 $BOOTS
MOV S2 11
goto @检测防御
#ELSEACT
MESSAGEBOX [提示]：请穿戴好靴子在来进行精洗。
[@宝石]
#IF
CHECKUSEITEM 12
#ACT
MOV S1 $CHARM
MOV S2 12
goto @检测防御
#ELSEACT
MESSAGEBOX [提示]：请穿戴好宝石在来进行精洗。
[@检测防御]
#IF
CheckItemAddValue $STR(S2) 2 = 0
CheckItemAddValue $STR(S2) 3 = 0
CheckItemAddValue $STR(S2) 4 = 0
#say
【独家装备精洗】/AUTOCOLOR=245,250,100,180 \ \
至/AUTOCOLOR=245,250,100,180 尊/AUTOCOLOR=245,250,100,180 玛/AUTOCOLOR=245,250,100,180 法/AUTOCOLOR=245,250,100,180 精/AUTOCOLOR=245,250,100,180 益/AUTOCOLOR=245,250,100,180 求/AUTOCOLOR=245,250,100,180 精/AUTOCOLOR=245,250,100,180\ \
此装备没有极品属性！
#ELSEACT
goto @检测攻击
[@检测攻击]
#IF
small N1 256
CheckItemAddValue $STR(S2) 2 = $STR(N1)
#act
INC N2 $STR(N1)
MOV N38 $STR(N2)
MOV N1 0
goto @检测魔法
#SAY
【独家装备精洗】/AUTOCOLOR=245,250,100,180 \ \
至/AUTOCOLOR=245,250,100,180 尊/AUTOCOLOR=245,250,100,180 玛/AUTOCOLOR=245,250,100,180 法/AUTOCOLOR=245,250,100,180 精/AUTOCOLOR=245,250,100,180 益/AUTOCOLOR=245,250,100,180 求/AUTOCOLOR=245,250,100,180 精/AUTOCOLOR=245,250,100,180\ \
是否随机分配极品属性？\
是的,我需要/@YES分配 NO,我没元宝不需要/@exit\
#ELSEACT
INC N1 1
goto @检测攻击
[@检测魔法]
#IF
small N1 256
CheckItemAddValue $STR(S2) 3 = $STR(N1)
#act
INC N2 $STR(N1)
MOV N38 $STR(N2)
MOV N1 0
goto @检测道术
#SAY
【独家装备精洗】/AUTOCOLOR=245,250,100,180 \ \
至/AUTOCOLOR=245,250,100,180 尊/AUTOCOLOR=245,250,100,180 玛/AUTOCOLOR=245,250,100,180 法/AUTOCOLOR=245,250,100,180 精/AUTOCOLOR=245,250,100,180 益/AUTOCOLOR=245,250,100,180 求/AUTOCOLOR=245,250,100,180 精/AUTOCOLOR=245,250,100,180\ \
是否随机分配极品属性？\
是的,我需要/@YES分配 NO,我没元宝不需要/@exit\
#ELSEACT
INC N1 1
goto @检测魔法
[@检测道术]
#IF
small N1 256
CheckItemAddValue $STR(S2) 4 = $STR(N1)
#act
INC N2 $STR(N1)
MOV N1 0
MOV N38 $STR(N2)
#SAY
【独家装备精洗】/AUTOCOLOR=245,250,100,180 \ \
至/AUTOCOLOR=245,250,100,180 尊/AUTOCOLOR=245,250,100,180 玛/AUTOCOLOR=245,250,100,180 法/AUTOCOLOR=245,250,100,180 精/AUTOCOLOR=245,250,100,180 益/AUTOCOLOR=245,250,100,180 求/AUTOCOLOR=245,250,100,180 精/AUTOCOLOR=245,250,100,180\ \
是否随机分配极品属性？\
是的,我需要/@YES分配 NO,我没元宝不需要/@exit\
#ELSEACT
INC N1 1
goto @检测道术
[@YES分配]
#IF
CheckItemAddValue $STR(S2) 2 = 0
#ACT
DEC传奇怀旧私服 N2 1
#IF
CheckItemAddValue $STR(S2) 3 = 0
#ACT
DEC N2 1
#IF
Chec传奇行会封号kItemAddValue $STR(S2) 4 = 0
#ACT
DEC N2 1
#IF
large N2 4
#SAY
【独家装备精洗】/AUTOCOLOR=245,250,100,180 \ \
至/AUTOCOLOR=245,250,100,180 尊/AUTOCOLOR=245,250,100,180 玛/AUTOCOLOR=245,250,100,180 法/AUTOCOLOR=245,250,100,180 精/AUTOCOLOR=245,250,100,180 益/AUTOCOLOR=245,250,100,180 求/AUTOCOLOR=245,250,100,180 精/AUTOCOLOR=245,250,100,180\ \
您的【$STR(S1)】共有极品属性{【$STR(N2)】/SCOLOR=215}点,系统将进行随机分配\
\ \
是的,我需要/@YES分配A NO,我没元宝不需要/@exit
#ELSEsay
【独家装备精洗】/AUTOCOLOR=245,250,100,180 \ \
至/AUTOCOLOR=245,250,100,180 尊/AUTOCOLOR=245,250,100,180 玛/AUTOCOLOR=245,250,100,180 法/AUTOCOLOR=245,250,100,180 精/AUTOCOLOR=245,250,100,180 益/AUTOCOLOR=245,250,100,180 求/AUTOCOLOR=245,250,100,180 精/AUTOCOLOR=245,250,100,180\ \
属性低于5点不予分配！
[@YES分配A]
#IF
large N2 8
#ACT
messagebox 属性超额,不予分配！
break
#IF
CHECKGAMEGOLD 10000
#ACT
messagebox 你的元宝不够10000了哦，分配一次需要花费元宝10000个！
break
#IF
equal N2 5
#ACT
MOVR N3 100
INC N3 1
GetRandomText .\QuestDiary\小雨方案\5点方案\5点道士.txt S10 $STR(N3)
GetRandomText .\QuestDiary\小雨方案\5点方案\5点攻击.txt S11 $STR(N3)
GetRandomText .\QuestDiary\小雨方案\5点方案\5点魔法.txt S12 $STR(N3)
MOV N30 $STR(S10)
MOV N31 $STR(S11)
MOV N32 $STR(S12)
GAMEGOLD - 10000
goto @确认增加
#IF
equal N2 6
#ACT
MOVR N3 113
INC N3 1
GetRandomText .\QuestDiary\小雨方案\6点方案\6点道士.txt S10 $STR(N3)
GetRandomText .\QuestDiary\小雨方案\6点方案\6点攻击.txt S11 $STR(N3)
GetRandomText .\QuestDiary\小雨方案\6点方案\6点魔法.txt S12 $STR(N3)
MOV N30 $STR(S10)
MOV N31 $STR(S11)
MOV N32 $STR(S12)
GAMEGOLD - 10000
goto @确认增加
#IF
equal N2 7
#ACT
MOVR N3 154
INC N3 1
GetRandomText .\QuestDiary\小雨方案\7点方案\7点道士.txt S10 $STR(N3)
GetRandomText .\QuestDiary\小雨方案\7点方案\7点攻击.txt S11 $STR(N3)
GetRandomText .\QuestDiary\小雨方案\7点方案\7点魔法.txt S12 $STR(N3)
MOV N30 $STR(S10)
MOV N31 $STR(S11)
MOV N32 $STR(S12)
GAMEGOLD - 10000
goto @确认增加
#IF
equal N2 8
#ACT
MOVR N3 183
INC N3 1
GetRandomText .\QuestDiary\小雨方案\8点方案\8点道士.txt S10 $STR(N3)
GetRandomText .\QuestDiary\小雨方案\8点方案\8点攻击.txt S11 $STR(N3)
GetRandomText .\QuestDiary\小雨方案\8点方案\8点魔法.txt S12 $STR(N3)
MOV N30 $STR(S10)
MOV N31 $STR(S11)
MOV N32 $STR(S12)
GAMEGOLD - 10000
goto @确认增加
[@确认增加]
【独家装备精洗】/AUTOCOLOR=245,250,100,180 \ \
至/AUTOCOLOR=245,250,100,180 尊/AUTOCOLOR=245,250,100,180 玛/AUTOCOLOR=245,250,100,180 法/AUTOCOLOR=245,250,100,180 精/AUTOCOLOR=245,250,100,180 益/AUTOCOLOR=245,250,100,180 求/AUTOCOLOR=245,250,100,180 精/AUTOCOLOR=245,250,100,180\ \
重新分配的属性如下:\
攻击 {$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=245,250,100,180 \ \
至/AUTOCOLOR=245,250,100,180 尊/AUTOCOLOR=245,250,100,180 玛/AUTOCOLOR=245,250,100,180 法/AUTOCOLOR=245,250,100,180 精/AUTOCOLOR=245,250,100,180 益/AUTOCOLOR=245,250,100,180 求/AUTOCOLOR=245,250,100,180 精/AUTOCOLOR=245,250,100,180\ \
属性分配成功！