问天引擎全新神龙之魂简洁脚本

问天引擎全新神龙之魂简洁脚本

出处：本站整理作者：佚名发布时间：2012-05-02阅读次数：

今天传奇服务端独家给大家奉献了全新神龙之魂简洁脚本希望大家能喜欢

[@神龙背饰]
{
\
<购买神龙之魂/@神龙1> <color=0X00FFFF 5000元宝，即可购买一个神龙之魂！>\
<升级神龙之魂/@神龙2> <color=0X00FFFF 神龙之魂，分为八个品级，品级越！>\
　　　　　　 <color=0X00FFFF 高，吸血越多，也是您身份的象征！>\
　　　　　　 <color=red 神龙之魂不允许丢弃、交易，也暴不出！>\
　　　　　　 <color=red 升级时候，背包如有两个将不允许升级！>\
　　　　　　 <color=red 神龙之魂，法师魔法与道士道术是隐藏！>\
　　　　　　 <color=red 只有战士的攻击才显示在神龙魂的外观！>\
[@神龙1]
#IF
CHECKGAMEGOLD < 5000
#ACT
MESSAGEBOX 　　　　　　很抱歉，战歌网dj，您的元宝不足5000个，无法购买神龙之魂！
BREAK
#IF
checkjob Warr
#ACT
GAMEGOLD - 5000
GIVE 神龙之魂1 1
SENDMSG 2 <$USERNAME>购买了<神龙之魂>!
MESSAGEBOX 　　　　　　　　　　恭喜，购买神龙之魂成功！
break
#IF
checkjob Wizard
#ACT
GAMEGOLD - 5000
GIVE 神龙之魂2 1
SENDMSG 2 <$USERNAME>购买了<神龙之魂>!
MESSAGEBOX 　　　　　　　　　　恭喜，购买神龙之魂成功！
break
#IF
checkjob Taos
#ACT
GAMEGOLD - 5000
GIVE 神龙之魂3 1
SENDMSG 2 <$USERNAME>购买了<神龙之魂>!
MESSAGEBOX 　　　　　　　　　　恭喜，购买神龙之魂成功！
break

[@神龙2]
#IF
CHECKGAMEGOLD < 5000
#ACT
messagebox 对不起，你没有元宝或者元宝不足，请冲值后升级！
#ELSEACT
goto @神龙大
break
[@神龙大]
#ACT
checkitembox 请放入神龙之魂： 1 201
[@getboxitem201]
#IF
POS $CHECKBOXITEM.NAME 神龙之魂
#ACT
#ELSEACT
SENDMSG 5 您当前放入的不是神龙之魂！
break
close
#IF
checkitem 神龙之魂1 2
#ACT
SENDMSG 5 你背包中有多个神龙之魂不允许升级！
break
close
#IF
checkitem 神龙之魂2 2
#ACT
SENDMSG 5 你背包中有多个神龙之魂不允许升级！
break
close
#IF
checkitem 神龙之魂3 2
#ACT
SENDMSG 5 你背包中有多个神龙之魂不允许升级！
break
close
#IF
CHECKLEVELEX > 1
#ACT
MOV S1 $CHECKBOXITEM.ItemExD
MOV P0 $ItemEx.$STR(S1).6
#IF
SMALL P0 8
#ACT
GAMEGOLD - 5000
UPGRADEITEMSL $PARAM(0) 0 + 1
UPGRADEITEMSL $PARAM(0) 1 + 1
UPGRADEITEMSL $PARAM(0) 2 + 1
UPGRADEITEMSL $PARAM(0) 3 + 1
UPGRADEITEMSL $PARAM(0) 4 + 1
UPGRADEITEMSL $PARAM(0) 5 + 1
UPGRADEITEMSL $PARAM(0) 6 + 1
UPGRADEITEMSL $PARAM(0) 7 + 7
UPGRADEITEMSL $PARAM(0) 8 + 1
UPGRADEITEMSL $PARAM(0) 9 + 150
SENDMSG 5 恭喜您当前神龙之魂品级：<$ItemEx.$STR(S1).6>　　
break
close
#ELSEACT
SENDMSG 5 您的神龙之魂品级已达到8级,不能再升级!
close
}

文章来自于: 网有动力     转载请注明出处！