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

[@全服排行榜]
#IF
PosEx $USERNAME .\QuestDiary\数据文件\七星卷章\本服排名.txt S0
#ACT
DELVARLIST $STR(S0) ..\QuestDiary\数据文件\七星卷章\本服排名.txt
#IF
large P0 999
#ACT
break
#IF
random 1
#ACT
ReadRandomStr ..\QuestDiary\数据文件\七星卷章\本服排名.txt S0 $STR(P0)
MOV P1 0
#IF
!equal S0 无
#ACT
GETVALIDSTR $STR(S0) | S0 P1
#IF
CHECKVAR HUMAN 七星卷章 > $STR(P1)
#ACT
FORMATSTR S0 %s|%s <$USERNAME>|<$HUMAN(七星卷章)>
INSERTVARLIST $STR(P0) $STR(S0) .\QuestDiary\数据文件\七星卷章\本服排名.txt
#ELSEACT
INC P0 1
GOTO @全服排行榜

[@升级七星卷章]
你还剩余可用的七星卷章：{Color=green <$HUMAN(七星卷章)>}张\
    <color=green 若当天收集七星卷章数量达到200张>，则可在<color=green 当日>领\
取元神盾牌或升级元神盾牌！\
每次升级装备需要<color=green 传世护符>和<color=green N张剩余的七星卷章>\
<Color=red 升级><一星传世护符/@一星传世护符>          <Color=red 升级><二星传世护符/@二星传世护符>\
<Color=red 升级><三星传世护符/@三星传世护符>          <Color=red 升级><四星传世护符/@四星传世护符>\
<Color=red 升级><五星传世护符/@五星传世护符>          <Color=red 升级><六星传世护符/@六星传世护符>\
<Color=red 升级><七星传世护符/@七星传世护符>          <Color=red 领取><元灵盾牌/@zuoriYSDP>\
<返回/@main>\

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

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

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

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

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

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

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

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

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

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

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

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

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

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