86S.NET每天不定时提供:zhaosf_找私服_zhaosf.com_www.zhaosf.com_找sf_zhaosf123网站地图zhaosf(www.86s.net)每天更新找私服这里为每个新开合击超级变态传奇爱好者提供传奇新开私服发布网、超变传奇65535等,我们长期提供微变传奇,变态传奇,单职业传奇,超变传奇,宠物传奇,微变传奇,公益传奇,中变传奇,各种版本让玩你一次玩个爽!

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

作者:2020-4-10 22:37:17类型:http://www.86s.net/

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

标签:传奇网客户端去哪