;;;QQ:67762207
[@EventMainMenu]
{
#IF
#ACT
loadvalue D1 "ParamControl\活动设置.ini" [随机活动] 编号
mov D2 %D1
inc D2 1
#IF
large D2 14
#ACT
mov D2 0

#IF
#SAY
我这里进行的活动都需要50万金币的入场费。。。 \
每天都有一个活动开放，另外每天20-22点将有一个{FCOLOR/1}随机{FCOLOR/12}的活动开放\
地狱幽灵船活动每天晚上8点左右会开启一次.\
活动获胜后会有积分卷和经验的奖励！\\
今日随机活动：\

#IF
EQUAL D1 0
#SAY
<100个封魔石兑换1个宝箱/@itemchange(封魔石,100,宝箱,1)>\
#IF
EQUAL D1 1
#SAY
<200个僵尸骨头兑换1个宝箱/@itemchange(僵尸骨头,200,宝箱,1)>\
#IF
EQUAL D1 2
#SAY
<200个皮兑换1个宝箱/@itemchange(皮,200,宝箱,1)>\
#IF
EQUAL D1 3
#SAY
<200个僵尸骨头兑换1个宝箱/@itemchange(僵尸骨头,200,宝箱,1)>\
#IF
EQUAL D1 4
#SAY
<200个蜘蛛线兑换1个宝箱/@itemchange(蜘蛛线,200,宝箱,1)>\
#IF
EQUAL D1 5
#SAY
<40个遗物兑换1个宝箱/@itemchange(遗物,40,宝箱,1)>\
#IF
EQUAL D1 6
#SAY
<200个蜘蛛线兑换1个宝箱/@itemchange(蜘蛛线,200,宝箱,1)>\
#IF
EQUAL D1 7
#SAY
<200个指甲兑换1个宝箱/@itemchange(指甲,200,宝箱,1)>\
#IF
EQUAL D1 8
#SAY
<200个潘夜之泪兑换1个宝箱/@itemchange(潘夜之泪,200,宝箱,1)>\
#IF
EQUAL D1 9
#SAY
<200个指甲兑换1个宝箱/@itemchange(指甲,200,宝箱,1)>\
#IF
EQUAL D1 10
#SAY
<200个潘夜之泪兑换1个宝箱/@itemchange(潘夜之泪,200,宝箱,1)>\
#IF
EQUAL D1 11
#SAY
<100个震天魔印兑换1个宝箱/@itemchange(震天魔印,100,宝箱,1)>\
#IF
EQUAL D1 12
#SAY
<40个冰凌结晶兑换1个宝箱/@itemchange(冰凌结晶,40,宝箱,1)>\
#IF
EQUAL D1 13
#SAY
<100个封魔石兑换1个宝箱/@itemchange(封魔石,100,宝箱,1)>\
#IF
EQUAL D1 14
#SAY
<20个遗忘之心兑换1个宝箱/@itemchange(遗忘之心,20,宝箱,1)>\



#IF
EQUAL D2 0
#SAY
<100个封魔石兑换1个宝箱/@itemchange(封魔石,100,宝箱,1)>\
#IF
EQUAL D2 1
#SAY
<200个僵尸骨头兑换1个宝箱/@itemchange(僵尸骨头,200,宝箱,1)>\
#IF
EQUAL D2 2
#SAY
<200个皮兑换1个宝箱/@itemchange(皮,200,宝箱,1)>\
#IF
EQUAL D2 3
#SAY
<200个僵尸骨头兑换1个宝箱/@itemchange(僵尸骨头,200,宝箱,1)>\
#IF
EQUAL D2 4
#SAY
<200个蜘蛛线兑换1个宝箱/@itemchange(蜘蛛线,200,宝箱,1)>\
#IF
EQUAL D2 5
#SAY
<40个遗物兑换1个宝箱/@itemchange(遗物,40,宝箱,1)>\
#IF
EQUAL D2 6
#SAY
<200个蜘蛛线兑换1个宝箱/@itemchange(蜘蛛线,200,宝箱,1)>\
#IF
EQUAL D2 7
#SAY
<200个指甲兑换1个宝箱/@itemchange(指甲,200,宝箱,1)>\
#IF
EQUAL D2 8
#SAY
<200个潘夜之泪兑换1个宝箱/@itemchange(潘夜之泪,200,宝箱,1)>\
#IF
EQUAL D2 9
#SAY
<200个指甲兑换1个宝箱/@itemchange(指甲,200,宝箱,1)>\
#IF
EQUAL D2 10
#SAY
<200个潘夜之泪兑换1个宝箱/@itemchange(潘夜之泪,200,宝箱,1)>\
#IF
EQUAL D2 11
#SAY
<100个震天魔印兑换1个宝箱/@itemchange(震天魔印,100,宝箱,1)>\
#IF
EQUAL D2 12
#SAY
<40个冰凌结晶兑换1个宝箱/@itemchange(冰凌结晶,40,宝箱,1)>\
#IF
EQUAL D2 13
#SAY
<100个封魔石兑换1个宝箱/@itemchange(封魔石,100,宝箱,1)>\
#IF
EQUAL D2 14
#SAY
<20个遗忘之心兑换1个宝箱/@itemchange(遗忘之心,20,宝箱,1)>\



#IF
dayofweek Mon
#SAY
<怪物岛组队杀怪挑战赛。(周1晚7点）/@EventSystem_Daebak> \\

#IF
dayofweek Tue
#SAY
<幽灵地狱挑战赛。(周2晚7点）/@EventSystem_Survive> \\

#IF
dayofweek Wed
#SAY
<黄金岛生存大挑战。(周3晚7点）/@EventSystem_Island> \\

#IF
dayofweek Thu
#SAY
<组队PK挑战赛。(周4晚7点）/@EventSystem_TeamWar> \\

#IF
dayofweek Fri
#SAY
<英雄救美。(周5晚7点）/@goyingxjm>\\

#IF
dayofweek Sat
#SAY
//<夺宝奇兵。(周6晚7点）/@DuoBaoQinBingSystem>\\
今日没有活动……\\
#IF
dayofweek Sun
#SAY
<找到啦。(周日晚7点）/@ZhaodaolaSystem>\\

#IF
#SAY
每日活动：\
<混乱PK大赛。（每晚23点）/@混乱PK大赛1>\\
<关  闭/@exit>


[@goyingxjm]
#call [EventSystem\英雄救美\英雄救美.txt] @YinXiongJiuMei

[@EventSystem_Daebak]
#CALL [EventSystem\Daebakmon\DaeBakMonNpc.txt] @DaebakMainMenu

[@EventSystem_Island]
#CALL [EventSystem\IslandGame\IslandGame.txt] @IslandMainMenu

[@EventSystem_Survive]
#CALL [EventSystem\SurviveGame\SurviveGame.txt] @SurviveGameMainMenu

[@EventSystem_TeamWar]
#CALL [EventSystem\TeamWar\TeamWarNPC.txt] @TeamWarEventSystem

;[@DuoBaoQinBingSystem]
;#CALL [EventSystem\夺宝奇兵.txt] @DuoBaoQinBingSystemSay

[@ZhaodaolaSystem]
#CALL [EventSystem\找到啦\找到啦游戏进入.txt]@InYueYeKuangBen

[@混乱PK大赛1]
#CALL [EventSystem\混乱PK大赛.txt] @混乱PK赛


[@itemchange()]
#IF
hour 20 21
#ACT
mov A0 %ARG(1)
mov D3 %ARG(2)
mov A1 %ARG(3)
mov D4 %ARG(4)
#ELSEACT
break
#ELSESAY
请在晚上20-22点之间来兑换。其余时间请准备相应物品。\

#IF
checkitem %A0 %D3
#ACT
take %A0 %D3
give %A1 %D4
#SAY
你使用<$OUTPUT(D3)>个<$OUTPUT(A0)>兑换了<$OUTPUT(D4)>个<$OUTPUT(A1)>。\\
<关闭/@exit>
#ELSEACT
break
#ELSESAY
对不起，你没有<$OUTPUT(D3)>个<$OUTPUT(A0)>\\
<关闭/@exit>
}
;;;QQ:67762207