用户登录  |  用户注册
首 页文章管理下载频道发布软件整站程序广告合作
当前位置:传奇服务端文章管理传奇脚本

传世私服最新夺宝奇兵活动脚本

减小字体 增大字体 作者:佚名  来源:本站整理  发布时间:2014-08-08 07:23:06

 [@宝盒的秘密]

{
#IF
TRUE
#SAy
  夺宝奇兵活动举行时间为<color=green 每天14:30、19:30、23:30>,每次\
夺得宝盒后需{COLOR=red 保护<$GLOBAL(BHTIME1)>分钟}为胜。\
  每次参与夺宝活动均会增加夺宝次数,<COLOR=GREEN 夺宝次数越高,每次>\
<COLOR=GREEN 夺宝成功后获得的奖品就越好。>\
  {COLOR=red 现在起每周夺宝奇兵成功次数排名第一且达到10次必获}<COLOR=GREEN 50>\
<COLOR=GREEN 00>{COLOR=red 元宝}\\
  <查看夺宝排行榜/@夺宝排行榜>  <查看上次夺宝奖励/@上次结果>  <领取奖励/@领取奖励>\
  <离开/@exit>
 
[@上次结果]
  <color=green 每天14:30、19:30、23:30>都会定时举行《夺宝奇兵》\
活动,成功守护宝盒<$GLOBAL(BHTIME1)>分钟,就可以获得奖品。\\
  <COLOR=red 最近一次夺宝奇兵开出的宝盒的奖品。>\
  <color=green 开宝时间>:<$STR(A88)>\
  <color=green 持宝人>:<$STR(A89)>\
  <color=green 获得奖品>:<$STR(A90)>\
  <color=green 获得元宝>:300个\
  <离开/@exit>
 
[@领取奖励]
#IF
EQUAL G0 0
#ACT
GOTO @可以开启
break
#ELSESAY
领取失败,原因如下:\\
1、您没有参加夺宝排行活动或已领取奖励。\
2、夺宝排行活动每星期一重新计算积分。\
3、领取时间为正式开区后每星期一。\\
<没事/@exit>
 
[@可以开启]
#IF
checknamelist ..\QuestDiary\数据文件\夺宝排行第一名.txt
#ACT
GAMEGOLD + 5000
FORMATSTR S10 每周夺宝奖励元宝增加%S个,元宝总数量%S,时间:%S 5000|<$GAMEGOLD>|<$DATETIME>
ADDVARLIST $STR(S10) ..\QuestDiary\日志文件\元宝操作\<$USERNAME>.txt
CLEARNAMELIST ..\QuestDiary\数据文件\夺宝排行第一名.txt
SENDMSG 10 恭喜%s夺宝奇兵排名获得第一,获得了5000元宝的奖励!想要获得终极武器只要夺宝奇兵每周排名第一皆可获得5000元宝!
break
#ELSESAY
  你不是第1名,无法领取奖励。\\
  <离开/@exit>\
 
[@检测开奖]
#IF
random 1
#ACT
mov P0 $STR(S2)
#IF
large P0 9
#ACT
MOV S3 <Color=orange#325000元宝>
[@夺宝排行榜]
#ACT
mov S10
mov S11
mov S12
mov S13
mov S14
#IF
random 1
#ACT
ReadRandomStr ..\QuestDiary\无限排行\夺宝排行.txt S0 0
#IF
!equal S0
#ACT
GETVALIDSTR $STR(S0) | S1 S2
MOV S3  
GOTO @检测开奖
FORMATSTR S10 %-10s%-18s%-12s%s\ 第#321名|<$STR(S1)>|<$STR(S2)>|<$STR(S3)>
#IF
random 1
#ACT
ReadRandomStr ..\QuestDiary\无限排行\夺宝排行.txt S0 1
#IF
!equal S0
#ACT
GETVALIDSTR $STR(S0) | S1 S2
FORMATSTR S11 %-10s%-18s%s\ 第#322名|<$STR(S1)>|<$STR(S2)>
#IF
random 1
#ACT
ReadRandomStr ..\QuestDiary\无限排行\夺宝排行.txt S0 2
#IF
!equal S0
#ACT
GETVALIDSTR $STR(S0) | S1 S2
FORMATSTR S12 %-10s%-18s%s\ 第#323名|<$STR(S1)>|<$STR(S2)>
#IF
random 1
#ACT
ReadRandomStr ..\QuestDiary\无限排行\夺宝排行.txt S0 3
#IF
!equal S0
#ACT
GETVALIDSTR $STR(S0) | S1 S2
FORMATSTR S13 %-10s%-18s%s\ 第#324名|<$STR(S1)>|<$STR(S2)>
#IF
random 1
#ACT
ReadRandomStr ..\QuestDiary\无限排行\夺宝排行.txt S0 4
#IF
!equal S0
#ACT
GETVALIDSTR $STR(S0) | S1 S2
FORMATSTR S14 %-10s%-18s%s\ 第#325名|<$STR(S1)>|<$STR(S2)>
#IF
#SAY
你目前夺宝次数:{Color=Green <$HUMAN(夺宝次数)>}次。\
              <Color=Green 本服夺宝排行榜>\
<Color=Green 名次      角色名            夺宝次数        当前奖励>\
<$STR(S10)>
<$STR(S11)>
<$STR(S12)>
<$STR(S13)>
<$STR(S14)>
#IF
random 1
#ACT
ReadRandomStr ..\QuestDiary\无限排行\夺宝排行.txt S0 5
#IF
!equal S0
#SAY
<下一页/@paihang2>  
#IF
random 1
#SAY
<关闭/@exit>
[@paihang2]
#ACT
mov S10
mov S11
mov S12
mov S13
mov S14
#IF
random 1
#ACT
ReadRandomStr ..\QuestDiary\无限排行\夺宝排行.txt S0 5
#IF
!equal S0
#ACT
GETVALIDSTR $STR(S0) | S1 S2
FORMATSTR S10 %-10s%-18s%s\ 第#326名|<$STR(S1)>|<$STR(S2)>
#IF
random 1
#ACT
ReadRandomStr ..\QuestDiary\无限排行\夺宝排行.txt S0 6
#IF
!equal S0
#ACT
GETVALIDSTR $STR(S0) | S1 S2
FORMATSTR S11 %-10s%-18s%s\ 第#327名|<$STR(S1)>|<$STR(S2)>
#IF
random 1
#ACT
ReadRandomStr ..\QuestDiary\无限排行\夺宝排行.txt S0 7
#IF
!equal S0
#ACT
GETVALIDSTR $STR(S0) | S1 S2
FORMATSTR S12 %-10s%-18s%s\ 第#328名|<$STR(S1)>|<$STR(S2)>
#IF
random 1
#ACT
ReadRandomStr ..\QuestDiary\无限排行\夺宝排行.txt S0 8
#IF
!equal S0
#ACT
GETVALIDSTR $STR(S0) | S1 S2
FORMATSTR S13 %-10s%-18s%s\ 第#329名|<$STR(S1)>|<$STR(S2)>
#IF
random 1
#ACT
ReadRandomStr ..\QuestDiary\无限排行\夺宝排行.txt S0 9
#IF
!equal S0
#ACT
GETVALIDSTR $STR(S0) | S1 S2
FORMATSTR S14 %-10s%-18s%s\ 第10名|<$STR(S1)>|<$STR(S2)>
#IF
#SAY
              <Color=Green 本服夺宝排行榜>\
<Color=Green 名次      角色名            夺宝次数        当前奖励>\
<$STR(S10)>
<$STR(S11)>
<$STR(S12)>
<$STR(S13)>
<$STR(S14)>
<关闭/@exit>
 
}

Tags:

作者:佚名

文章管理评论评论内容只代表网友观点,与本站立场无关!

   评论摘要(共 0 条,得分 0 分,平均 0 分) 查看完整评论
【传奇爱好者】www.68kf.com是热血传奇私服发布网站,提供最全面的新开传奇私服游戏开服信息,盛大游戏授权传奇广告发布网,稳定可靠的传奇经典老站,提供最好的经典复古传奇私服,轻变传奇私服,超级变态传奇私服,以及传奇私服合击视频! 沪ICP备09000106号-1