七星传世护符升级活动脚本(3)

[@升级5]
#IF
checkitem 四星传世护符 5
CHECKVAR HUMAN 七星卷章 > 120
#ACT
take 四星传世护符 5
CALCVAR HUMAN 七星卷章 - 120
SAVEVAR HUMAN 七星卷章 ..\QUESTDIARY\数据文件\七星卷章\七星卷章.txt
GIVE 五星传世护符 1
SENDMSG 0 恭喜{<$USERNAME>}用120张剩余的<七星卷章>和5张<四星传世护符>升级成<五星传世护符>
SENDMSG 15 恭喜{<$USERNAME>}用120张剩余的<七星卷章>和5张<四星传世护符>升级成<五星传世护符>
#ELSEACT
SENDMSG 5 你没有<四星传世护符>和120张剩余的<七星卷章>，仔细检查下你的包裹.

[@六星传世护符]
\
<color=green 150张剩余的七星卷章>+<color=green 6张五星传世护符>,可以升级为<color=red 六星传世护符>\\\\

　　　　　　　<确认升级/@升级6>          <返回/@升级七星卷章>\\\\\\\

[@升级6]
#IF
checkitem 五星传世护符 6
CHECKVAR HUMAN 七星卷章 > 150
#ACT
take 五星传世护符 6
CALCVAR HUMAN 七星卷章 - 150
SAVEVAR HUMAN 七星卷章 ..\QUESTDIARY\数据文件\七星卷章\七星卷章.txt
GIVE 六星传世护符 1
SENDMSG 0 恭喜{<$USERNAME>}用150张剩余的<七星卷章>和6张<五星传世护符>升级成<六星传世护符>
SENDMSG 15 恭喜{<$USERNAME>}用150张剩余的<七星卷章>和6张<五星传世护符>升级成<六星传世护符>
#ELSEACT
SENDMSG 5 你没有<五星传世护符>和150张剩余的<七星卷章>，仔细检查下你的包裹.

[@七星传世护符]
\
<color=green 180张剩余的七星卷章>+<color=green 7张六星传世护符>,可以升级为<color=red 七星传世护符>\\\\

　　　　　　　<确认升级/@升级7>          <返回/@升级七星卷章>\\\\\\\

[@升级7]
#IF
checkitem 六星传世护符 7
CHECKVAR HUMAN 七星卷章 > 180
#ACT
take 六星传世护符 7
CALCVAR HUMAN 七星卷章 - 180
SAVEVAR HUMAN 七星卷章 ..\QUESTDIARY\数据文件\七星卷章\七星卷章.txt
GIVE 七星传世护符 1
SENDMSG 0 恭喜{<$USERNAME>}用180张剩余的<七星卷章>和7张<六星传世护符>升级成<七星传世护符>
SENDMSG 15 恭喜{<$USERNAME>}用180张剩余的<七星卷章>和7张<六星传世护符>升级成<七星传世护符>
#ELSEACT
SENDMSG 5 你没有<六星传世护符>和180张剩余的<七星卷章>，仔细检查下你的包裹.

[@zuoriYSDP]
#if
checkvar human 今日七星卷章 < 200
#act
break
#say
你的今日七星卷章不足200。
#if
checknamelist ..\QuestDiary\数据文件\七星卷章\奖励1.txt
#ACT
BREAK
#say
每人每天只可只用一次此功能！
#ELSESAY
<领取元神战盾/@领取盾牌&元灵战盾>\
<领取元神道盾/@领取盾牌&元灵道盾>\
<领取元神法盾/@领取盾牌&元灵法盾>\

[@领取盾牌]
#if
checknamelist ..\QuestDiary\数据文件\七星卷章\奖励1.txt
#ACT
BREAK
#ELSEACT
GIVE $PARAM(0) 1
ADDNAMELIST ..\QuestDiary\数据文件\七星卷章\奖励1.txt
BREAK

[升级13]
#if
checknamelist ..\QuestDiary\数据文件\七星卷章\奖励1.txt
#ACT
BREAK
#ELSEACT
checkitembox 请放入盾牌： 1 505

[@getboxitem505]
#IF
EQUAL $CHECKBOXITEM.STDMODE 12
#ACT
MOV S1 $CHECKBOXITEM.ItemExD
MOV D0 $ItemEx.$STR(S1).7
#ELSEACT
SENDMSG 5 你放入的物品不是盾牌类物品，不能升级！
break
#IF
CHECKLEVELEX > 0
#ACT
#ELSEACT
break
#IF
LARGE D0 9
#ACT
SENDMSG 5 你的盾牌品级已经达到最高10级，不能再升级了！
break
#IF
RANDOM 1
#ACT
CALCVAR HUMAN 可用七星卷章 - 200
SAVEVAR HUMAN 可用七星卷章 ..\QUESTDIARY\数据文件\个人变量\个人变量.txt
ADDNAMELIST ..\QuestDiary\数据文件\七星卷章\奖励1.txt
UpgradeUserItemEx $STR(S1) 0 + 1
UpgradeUserItemEx $STR(S1) 1 + 1
UpgradeUserItemEx $STR(S1) 2 + 1
UpgradeUserItemEx $STR(S1) 3 + 1
UpgradeUserItemEx $STR(S1) 4 + 1
UpgradeUserItemEx $STR(S1) 5 + 1
UpgradeUserItemEx $STR(S1) 6 + 1
UpgradeUserItemEx $STR(S1) 7 + 1
UpgradeUserItemEx $STR(S1) 11 + 5
SENDMSG 5 恭喜你升级成功，盾牌品级和威力提升了
break

[@兑换七星卷章]
　　每人<color=green 每天前50次>使用五色晶石(小)，可兑换<color=red 500万经验>\
    50次之后只可兑换1张<color=red 七星卷章>。\
　　每人<color=green 每天前50次>使用五色晶石，可兑换<color=red 3张七星卷章和>\
<color=red 500W经验+1张传世护符>，50次之后可兑换<color=red 3张七星卷章+1张传世护符>。\
<color=green 当你每天第100次,第200次,第300次,第400次,第500次>上交五色晶石\
时,将引发天地异变,神奇宝物尽归囊中,你将必得一件顶级装备\
　　你今天已经兑换{Color=green <$HUMAN(五色晶石小)>}次五色晶石(小)和{Color=green <$HUMAN(五色晶石大)>}次五色晶石(大)\\
　　　　<兑换五色晶石(小)/@兑换五色晶石小>       <兑换五色晶石/@兑换五色晶石大>\