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

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

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

[@main]
    <color=green 即日起至12月31日中午12点>，七星传世护符升级活动\
火热进行！所有勇士可通过多种途径<收集七星卷章/@collect>！成绩\
优异者还可获得直升七星传世护符、纪念版猛虎神佑融合\
七星传世护符等<超级奖励/@查看奖励>！\
    <免费领取传世护符/@领取传世护符>             <七星传世护符属性说明/@七星护符属性说明>\     
    <上交七星卷章/@上交七星卷章>                 <使用剩余的七星卷章/@升级七星卷章>\
    <五色晶石兑换七星卷章/@兑换七星卷章>         <查看我的成绩/@查看我的成绩>\
    <查看今日排名/@查看今日排行>                 <查看昨日排名/@查看昨日排行>\
    <领取昨日奖励/@领取昨日奖励>                 <点击察看活动奖励说明/@查看奖励>

[@查看昨日排行]
<$GLOBAL(排行一页我)>

[@nextPage1]
<$GLOBAL(排行二页我)>

[@领取传世护符]
#IF
CHECKNAMELIST ..\QuestDiary\数据文件\七星卷章\领取护符名单.txt
#ACT
BREAK
#SAY
你已经领取过了！！！
#ELSEACT
ADDNAMELIST ..\QuestDiary\数据文件\七星卷章\领取护符名单.txt
give 传世护符 1
break

[@七星护符属性说明]
    <color=orange 一星传世护符属性>：攻击1-1、魔法1-1、道术1-1、\
防御1-1、魔防1-1、生命+25点。\
    <color=orange 二星传世护符属性>：攻击1-2、魔法1-2、道术1-2、\
防御1-2、魔防1-2、生命+50点\
    <color=orange 三星传世护符属性>：攻击1-3、魔法1-3、道术1-3、\
防御1-3、魔防1-3、生命+75点\
    <color=orange 四星传世护符属性>：攻击2-4、魔法2-4、道术2-4、\
防御2-4、魔防2-4、生命+100点\
    <下一页/@七星护符属性说明1>          <返回/@main>\

[@七星护符属性说明1]
    <color=orange 五星传世护符属性>：攻击2-6、魔法2-6、道术2-6、\
防御2-6、魔防2-6、生命+150点，并且额外<color=red 附有1%机率暴击。>\\
    <color=orange 六星传世护符属性>：攻击2-8、魔法2-8、道术2-8、\
防御2-8、魔防2-8、生命+200点，并且额外<color=red 附有2%机率暴击。>\\
    <color=orange 七星传世护符属性>：攻击3-10、魔法3-10、道术3-10、\
防御3-10、魔防3-10、生命+300点，并且额外<color=red 附有5%机率暴击。>\
    <上一页/@七星护符属性说明>      <返回/@main>

[@上交七星卷章]
   活动期间，勇士可通过多种方式收集七星卷章，每上交\
1个七星卷章都可获得<color=green 2000万经验>，每次上交我都将<color=green 直接收取>\
<color=green 您包裹中所有的七星卷章>，请仔细确认后再交给我！\\
　　<上交卷章/@上交卷章>\

[@上交卷章]
#IF
!CHECKBAGSIZE 2
#ACT
break
#SAY
　　请将包裹保留2个空位\
\
　　<离开/@exit>

#IF
checkitemUPBOX
#ELSEACT
SENDMSG 5 升级框中的物品不存在或者是复制物品！
break
#IF
POS $CHECKBOXITEM.NAME 七星卷章
#ACT
TAKEID $CHECKBOXITEM.ItemExD
#IF
checkitem 七星卷章 1
#ACT
take 七星卷章 1
CALCVAR HUMAN 七星卷章 + 1
SAVEVAR HUMAN 七星卷章 ..\QUESTDIARY\数据文件\七星卷章\七星卷章.txt
CALCVAR HUMAN 可用七星卷章 + 1
SAVEVAR HUMAN 可用七星卷章 ..\QUESTDIARY\数据文件\个人变量\个人变量.txt
CALCVAR HUMAN 今日七星卷章 + 1
SAVEVAR HUMAN 今日七星卷章 ..\QuestDiary\数据文件\七星卷章\今日七星卷章.txt
MOV P0 0
goto @今日排行榜
goto @全服排行榜
MOV P1 1
INC P1 1
MUL P1 10000000
CHANGEEXP + $STR(P1)
SENDMSG 8 恭喜{$USERNAME}上交七星卷章时,获得2000W经验奖励
SENDMSG 15 恭喜{$USERNAME}上交七星卷章时,获得2000W经验奖励
break
#ELSESAY
　　这个道具不是七星卷章，无法上交！\\
　　<啊，给错了？我再找找/@exit>

[@今日排行榜]
#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 @今日排行榜