风云传奇1.76装免费传奇私服备鉴定随机属性切割

zhaosf为广大传奇玩家每天提供最新风云传奇1.76装备鉴定随机属性切割信息,找风云传奇1.76装备鉴定随机属性切割不再东奔西走,每日风云传奇1.76装备鉴定随机属性切割发布网应有尽有!

[@main]

#IF
CHECKLEVELEX 0
#ACT
ReturnBoxItem 1
GOTO @装备鉴定
BREAK

[@装备鉴定]
#IF
#ACT
OPENMERCHANTBIGDLG 90 629 1 4 0 0 0
#SAY
ImgEx:90:601:602:600:315:-20/@exit 【切割鉴定:随机鉴定切割属性】/SCOLOR=70\ \
{等阶:/SCOLOR=116}一级、二级、三级、四级、五级、六级、七级、八级、九级/SCOLOR=250\
{数值:/SCOLOR=116}10万、20万、30万、40万、50万、60万、70万、80万、100万/SCOLOR=245\ \
放入需要鉴定的装备/SCOLOR=254 放入需要鉴定的装备/SCOLOR=254\
放入需要鉴定的装备/SCOLOR=254 放入需要鉴定的装备/SCOLOR=254\
征途sf发布网 放入需要鉴定的装备/SCOLOR=254 放入需要鉴定的装备/SCOLOR=254\
ITEMBOX:1:63:236:125:-65:76:76:64,62,22,24:250#允许鉴定：手镯、戒指、鞋子、腰带\
{第一次鉴定免费，重复鉴定收取38888元宝费用！/SCOLOR=249}\ \
***我要鉴定***|250#允许鉴定：手镯、戒指、鞋子、腰带/@确定鉴定\


[@确定鉴定]
#IF
EQUAL $BOXITEM[1].NAME
#ACT
MESSAGEBOX 你要鉴定什么装备？？
BREAK
#ELSEACT

#IF
CHECKLEVELEX 0
#ACT
SetUpgradeItem 1
MOV N$鉴定费用 38888
MOV S$鉴定路径 鉴定等阶

#IF
CHECKCUSTOMITEMVALUE -1 0 = 0
#ACT
MOV N$鉴定费用 0
MOV S$鉴定路径 鉴定等阶1

#IF
C电信传奇私服发布网HECKGAMEGOLD ? $STR(N$鉴定费用)
#ACT
GAMEGOLD - $STR(N$鉴定费用)
MOV N$攻击计算 $BOXITEM[1].HDC
MOV N$魔法计算 $BOXITEM[1].HMC
MOV N$道术计算 $BOXITEM[1].HSC
GETRANDOMLINETEXT ..\QuestDiary\神秘传奇\拾取鉴定\$STR(S$鉴定路径).txt $STR(S$鉴定品质)
GetStringPos ..\QuestDiary\神秘传奇\拾取鉴定\鉴定参数.txt 颜色属性$STR(S$鉴定品质)
INC N0 1
GetListString ..\QuestDiary\神秘传奇\拾取鉴定\鉴定参数.txt $STR(N0) N$鉴定颜色 N$鉴定属性计算
GetStringPos ..\QuestDiary\神秘传奇\拾取鉴定\鉴定参数.txt 切割属性$STR(S$鉴定品质)
INC N0 1
GetListString ..\QuestDiary\神秘传奇\拾取鉴定\鉴定参数.txt $STR(N0) N$切割下限 N$切割上限
CHANGECUSTOMITEMTEXT -1 [$STR(S$鉴定品质)]
CHANGECUSTOMITEMTEXTCOLOR -1 $STR(N$鉴定颜c传奇私服色)
SetUpgradeItem 1
#ELSEACT
UpDateBoxItem 1
MESSAGEBOX 元宝不足，无法鉴定！！
BREAK


#IF
CHECKLEVELEX 0
#ACT
MOV N$属性位置一 0
INC N$切割上限 1
MOVR N$切割计算 $STR(N$切割下限) $STR(N$切割上限)
CHANGECUSTOMITEMABIL -1 $STR(N$属性位置一) 0 250
CHANGECUSTOMITEMABIL -1 $STR(N$属性位置一) 1 8
CHANGECUSTOMITEMABIL -1 $STR(N$属性位置一) 2 $STR(N$属性位置一)
CHANGECUSTOMITEMABIL -1 $STR(N$属性位置一) 3 0
CHANGECUSTOMITEMVALUE -1 $STR(N$属性位置一) = $STR(N$切割计算)

#IF
CHECKLEVELEX 0
#ACT
UpDateBoxItem 1
GuildNoticeMsg 253 0 恭喜你鉴定到一件≮[$STR(S$鉴定品质)]≯品质$BOXITEM[1].NAME！！ self

#IF
EQUAL S$鉴定品质 切割十级
#ACT
SENDMOVEMSG 0 253 255 200 1 【$USERNAME】鉴定了一件≮[$STR(S$鉴定品质)]≯品质$BOXITEM[1].NAME！！

[@ItemIntoBox1]
#ACT
BREAK

[@ItemOutBox1]
#ACT
BREAK

标签：一一首战首区一一9pk zhaosf 945找大极品传奇sfsf1234今日新开传奇yy主播带队玩传奇私服网站jjj改成什么了热血传奇裂石腰带迷失之王无限热血传奇logo新开超变65535