盛大传奇世界最新骁勇先锋脚本详解

[@_TempXYXFYJ_main]

{
#IF
TRUE
#SAY
    <color=green 勇士如果拥有“骁勇先锋凭证”，并且已经达到天人7>\
<color=green 重，>就可报名加入国王特设的“骁勇先锋营”快速修炼体魄\
。加入骁勇先锋营后，<color=red 勇士每提升一重，即可领取5亿经验>！\
    <color=orange 注：如果勇士主体已报名加入骁勇先锋营，当元神达到>\
<color=orange 飞升期七重后，该元神也可报名加入。主体升级后所获经验>\
<color=orange 将全部给主体，元神升级后所获经验将全部给该元神。>\
    <主体报名加入骁勇先锋营/@_TempXYXFYJ_baommrt1>    <元神报名加入骁勇先锋营/@_TempXYXFYJ_baommrt2>\
    <领取主体骁勇先锋营奖励/@_TempXYXFYJ_getmetprize1>    <领取元神骁勇先锋营奖励/@_TempXYXFYJ_getmetprize2>\
    <如何获取“骁勇先锋凭证”/@get>    <离开/@exit>\

[@get]
#ACT
MESSAGEBOX 在玄铁古炉处使用2000点探魔值兑换。\或者参加游戏里的其他活动(GM超级夺宝等)有几率获得！

;元神领取奖励
[@_TempXYXFYJ_getmetprize2]
#IF
!HASPNEUMA
#ACT
BREAK
#SAY
你还有获得分身，请去寻找魔法祭祀获取元神分身！
#IF
!PNEUMARELEASED
#ACT
BREAK
#SAY
领取骁勇先锋营奖励需要你的元神在线！
#IF
CHECK [200] 1
#ACT
PNEUMACALL @FENGHAO
;SENDMSG 5 ===<$HUMANINFO.$PNEUMANAME.$STR(M11)>====
GOTO @JYSB
#ESLEACT
BREAK
#ELSESAY
    你还未加入骁勇先锋营，不能领取奖励！\
\
    <离开/@exit>\


[@JYSB]
#IF
CHECKVAR HUMAN 元神先锋 = $HUMANINFO[$PNEUMANAME].$STR(M11)
#ACT
BREAK
#SAY
    <COLOR=GREEN 你的元神等级未作任何提升，领取失败！>\
    勇士你的当前等级及以下的经验奖励已经领取过了，暂\
时没有可领取的奖励。请快去提升至下一重再来吧！\
\
    <离开/@exit>\
#IF
CHECKVAR HUMAN 元神先锋 < $HUMANINFO[$PNEUMANAME].$STR(M11)
#ACT
CALCVAR HUMAN 元神先锋 + 1
SAVEVAR HUMAN 元神先锋 ..\QUESTDIARY\数据文件\个人变量.txt
$PNEUMANAME.GETEXP 500000000
sendmsg 14 玩家%S领取骁勇先锋营5亿经验的奖励！
GOTO @_TempXYXFYJ_main
break
#ELSESAY
    <COLOR=GREEN 你的元神等级未作任何提升，领取失败！>\
    勇士你的当前等级及以下的经验奖励已经领取过了，暂\
时没有可领取的奖励。请快去提升至下一重再来吧！\
\
    <离开/@exit>\


;元神加入骁勇先锋营
[@_TempXYXFYJ_baommrt2]
#IF
CHECK [199] 0
#ACT
MESSAGEBOX 你的本体还未加入“骁勇先锋营”
break
#IF
!CHECKITEM 骁勇先锋凭证 1
#ACT
MESSAGEBOX 你没有“骁勇先锋凭证”！
BREAK
#IF
!HASPNEUMA
#ACT
BREAK
#SAY
你还有获得分身，请去寻找魔法祭祀获取元神分身！
#IF
!PNEUMARELEASED
#ACT
BREAK
#SAY
元神加入骁勇先锋营需要你的元神在线！
#IF
SMALL $HUMANINFO[$PNEUMANAME].$AmbitKind 3
#ACT
BREAK
#SAY
    <color=green 勇士如果拥有“骁勇先锋凭证”，并且元神已经达到天人7>\
<color=green 重，>就可报名加入国王特设的“骁勇先锋营”快速修炼体魄\
。加入骁勇先锋营后，<color=red 勇士每提升一重，即可领取5亿经验>！\
      <color=red 元神境界不足！加入失败！>\

#IF
SMALL $HUMANINFO[$PNEUMANAME].$AmbitLevel 7
#ACT
BREAK
#SAY
    <color=green 勇士如果拥有“骁勇先锋凭证”，并且元神已经达到天人7>\
<color=green 重，>就可报名加入国王特设的“骁勇先锋营”快速修炼体魄\
。加入骁勇先锋营后，<color=red 勇士每提升一重，即可领取5亿经验>！\
      <color=red 元神境界不足！加入失败！>\

#IF
CHECK [200] 1
POSinlist $PNEUMANAME ..\QuestDiary\数据文件\骁勇先锋名单.txt S4
#ACT
GETVALIDSTR $STR(S4) | S5 S6
#SAY
　　你的元神已经加入骁勇先锋营了，不需要再报名了！\
    你的元神报名时的等级是：{color=green <$STR(S6)>}！\
    每提升一重，就可以领取5亿经验奖励！\
    <color=orange 注：元神获得的经验奖励将全部给予元神。>\
\
　　<离开/@exit>\
#IF
CHECK [200] 0
CHECKITEM 骁勇先锋凭证 1
#ACT
take 骁勇先锋凭证 1
SET [200] 1
PNEUMACALL @fenghao
FORMATSTR S10 %S|%S <$PNEUMANAME>|<$HUMANINFO[$PNEUMANAME].$STR(S6)>
ADDVARLIST $STR(S10) ..\QuestDiary\数据文件\骁勇先锋名单.txt
CALCVAR HUMAN 元神先锋 = $HUMANINFO.$PNEUMANAME.$STR(M11)
SAVEVAR HUMAN 元神先锋 ..\QUESTDIARY\数据文件\个人变量.txt
#SAY
你的元神成功报名<COLOR=GREEN 骁勇先锋营！>\
    每提升一重，就可以领取5亿经验奖励！\
    <color=orange 注：元神获得的经验奖励将全部给予元神。>\
\
　　<离开/@exit>\





;本体领取骁勇先锋营奖励

[@_TempXYXFYJ_getmetprize1]
#IF
CHECK [199] 1
#ACT
GOTO @FENGHAO
goto @JY2B
;sendmsg 5 =1==<$STR(M11)>==
#ESLEACT
BREAK
#ELSESAY
    你还未加入骁勇先锋营，不能领取奖励！\
\
    <离开/@exit>\


[@JY2B]
#IF
CHECKVAR HUMAN 本体先锋 = $STR(M11)
#ACT
BREAK
#SAY
    <COLOR=GREEN 你等级未作任何提升，领取失败！>\
    勇士你的当前等级及以下的经验奖励已经领取过了，暂\
时没有可领取的奖励。请快去提升至下一重再来吧！\
\
    <离开/@exit>\

#IF
CHECKVAR HUMAN 本体先锋 < $STR(M11)
#ACT
CALCVAR HUMAN 本体先锋 + 1
SAVEVAR HUMAN 本体先锋 ..\QUESTDIARY\数据文件\个人变量.txt
GETEXP 500000000
sendmsg 14 玩家%S领取骁勇先锋营5亿经验的奖励！
GOTO @_TempXYXFYJ_main
break
#ELSEACT
#ELSESAY
    <COLOR=GREEN 你等级未作任何提升，领取失败！>\
    勇士你的当前等级及以下的经验奖励已经领取过了，暂\
时没有可领取的奖励。请快去提升至下一重再来吧！\
\
    <离开/@exit>\


;本体加入骁勇先锋营



[@_TempXYXFYJ_baommrt1]
#IF
!CHECKITEM 骁勇先锋凭证 1
#ACT
MESSAGEBOX 你没有“骁勇先锋凭证”！
BREAK
#IF
SMALL $AmbitKind 5
SMALL $AmbitLevel 7
#ACT
BREAK
#SAY
    <color=green 勇士如果拥有“骁勇先锋凭证”，并且已经达到天人7>\
<color=green 重，>就可报名加入国王特设的“骁勇先锋营”快速修炼体魄\
。加入骁勇先锋营后，<color=red 勇士每提升一重，即可领取5亿经验>！\
<color=red 境界不足！>\
#IF
CHECK [199] 1
POSinlist $USERNAME ..\QuestDiary\数据文件\骁勇先锋名单.txt S4
#ACT
GETVALIDSTR $STR(S4) | S5 S6
#SAY
　　你已经加入骁勇先锋营了，不需要再报名了！\
    你报名时的等级是：{color=green <$STR(S6)>}！\
    每提升一重，就可以领取5亿经验奖励！\
    <color=orange 注：主体获得的经验奖励将全部给予主体。>\
\
　　<离开/@exit>\
#IF
CHECK [199] 0
CHECKITEM 骁勇先锋凭证 1
#ACT
SET [199] 1
TAKE 骁勇先锋凭证 1
goto @fenghao
FORMATSTR S10 %S|%S <$USERNAME>|<$STR(S6)>
ADDVARLIST $STR(S10) ..\QuestDiary\数据文件\骁勇先锋名单.txt
CALCVAR HUMAN 本体先锋 = $STR(M11)
SAVEVAR HUMAN 本体先锋 ..\QUESTDIARY\数据文件\个人变量.txt
#SAY
你成功报名<COLOR=GREEN 骁勇先锋营！>\
    每提升一重，就可以领取5亿经验奖励！\
    <color=orange 注：主体获得的经验奖励将全部给予主体。>\
\
　　<离开/@exit>\


[@FENGHAO] PNEUMA
#IF
LARGE $AmbitKind 2
SMALL $AmbitKind 5
#ACT
MOV M11 71
INC M11 $AmbitLevel
FORMATSTR S6 天人%s重 $NUMTOCHR($AMBITLEVEL)
break
#IF
LARGE $AmbitKind 4
SMALL $AmbitKind 7
#ACT
MOV M11 170
INC M11 $AmbitLevel
FORMATSTR S6 天仙%s重 $NUMTOCHR($AMBITLEVEL)
break
#IF
LARGE $AmbitKind 6
#ACT
MOV M11 269
INC M11 $AmbitLevel
FORMATSTR S6 上仙%s重 $NUMTOCHR($AMBITLEVEL)
break



}

看到这帖子真是高兴！

看到这帖子真是高兴！

看到这帖子真是高兴！

楼主加油，我们都看好你哦。

楼主加油，我们都看好你哦。

我只是路过打酱油的。

激动人心，无法言表！

感恩无私的分享与奉献

真是难得给力的帖子啊。