[@Bluem2.net_夺宝奇兵私人申明]
{
#IF
CHECKLEVELEX > 0
#act
VAR Integer HUMAN 夺宝奇兵时间
[@夺宝奇兵常量加载]
#CALL [\Bluem2.net_游戏活动配制\夺宝奇兵\夺宝奇兵常量.ini] @夺宝奇兵常量
[@夺宝奇兵全服]
#IF
CHECKITEM 藏宝箱 1
#ELSEACT
BREAK
#IF
ISONMAP PJXA
#ACT
GOTO @检测宝箱
BREAK
#ELSEACT
CALCVAR HUMAN 夺宝奇兵时间 = 0
TAKE 藏宝箱 1
DropItemMap PJXA 23 24 5 藏宝箱 1
SENDMSG 0 藏宝箱拥有者%S想携带【藏宝箱】下线了，宝箱已经重新刷新。
BREAK
[@检测宝箱]
#IF
ISONMAP PJXA
CHECKITEM 藏宝箱 1
CHECK [182] 1
CHECKVAR HUMAN 夺宝奇兵时间 ? $(保护藏宝箱时间)
CHECKVAR GLOBAL 夺宝奇兵名 = <$USERNAME>
#ACT
CALCVAR GLOBAL 夺宝奇兵名 =
SAVEVAR GLOBAL 夺宝奇兵名 ..\QuestDiary\开区清空文本\夺宝奇兵_全局变量.txt
CALCVAR HUMAN 夺宝奇兵时间 = 0
TAKE 藏宝箱 1
SET [182] 0
ReadRandomLine ..\QuestDiary\Bluem2.net_游戏活动配制\夺宝奇兵\奖励-夺宝奇兵.txt S51
GIVE <$STR(S51)> 1
GAMEGOLD + $(夺宝奇兵元宝)
SENDMSG 0 系统提示：<$USERNAME>将藏宝箱双击,获得奖励<$STR(S51)>及元宝$(夺宝奇兵元宝)个 254 253
SENDMSG 0 系统提示：今日《夺宝奇兵》活动到此告一段落!
GMEXECUTE 集体传送 PJXA 3 333 333
BREAK
#IF
ISONMAP PJXA
CHECKITEM 藏宝箱 1
CHECK [182] 1
#ACT
CALCVAR HUMAN 夺宝奇兵时间 + 1
CALCVAR GLOBAL 夺宝奇兵名 = <$USERNAME> ..\QuestDiary\开区清空文本\夺宝奇兵_全局变量.txt
SENDMSG 0 宝箱持有者『<$USERNAME>』当前坚持了【<$HUMAN(夺宝奇兵时间)>】秒！坚持$(保护藏宝箱时间)秒可获得【$(夺宝奇兵元宝)元宝+高级装备】 251 5 1
BREAK
#IF
ISONMAP PJXA
CHECKITEM 藏宝箱 1
CHECK [182] 0
#ACT
SET [182] 1
CALCVAR HUMAN 夺宝奇兵时间 = 0
CALCVAR GLOBAL 夺宝奇兵名 = <$USERNAME> ..\QuestDiary\开区清空文本\夺宝奇兵_全局变量.txt
SENDMSG 0 『<$USERNAME>』在《夺宝奇兵》,已抢到宝箱!坚持$(保护藏宝箱时间)秒可获得【$(夺宝奇兵元宝)元宝+高级装备】当前坚持了【<$HUMAN(夺宝奇兵时间)>】秒！ 251 5 1
BREAK
#IF
ISONMAP PJXA
#ACT
SET [182] 0
CALCVAR HUMAN 夺宝奇兵时间 = 0
BREAK
#ELSEACT
SET [182] 0
CALCVAR HUMAN 夺宝奇兵时间 = 0
BREAK
}
[@Bluem2.net_夺宝奇兵全局申明]
{
#IF
EQUAL I0 0
#ACT
VAR String GLOBAL 夺宝奇兵名
VAR Integer GLOBAL 夺宝奇兵时间
LOADVAR GLOBAL 夺宝奇兵名 ..\QuestDiary\开区清空文本\夺宝奇兵_全局变量.txt
LOADVAR GLOBAL 夺宝奇兵时间 ..\QuestDiary\开区清空文本\夺宝奇兵_全局变量.txt
}
|
