仅适用老版GOM引擎-其他引擎自行测试–文件自带素材
功能：
上交指定物品，可以随机获得元宝奖励【也可以修改成别的】，有几率额外获得物品奖励
全服达到300，会刷新一只超级BOSS
图片演示：
部分：
[@main]
#IF
#ACT
mov S$额外奖励
#if
#act
#say
\ \
<[圣·诞·树]/FCOLOR=253> \
<> <[物品奖励查看]|95#+7强化卷轴^-^95#+8强化卷轴^-^95#+9强化卷轴^-^95#+10强化卷轴^-^95#+11强化卷轴^-^95#魔法盾[封]^-^95#护体神盾[封]^-^95#群体施毒术[封]^-^95#半月弯刀[封]^-^95#十步一杀[封]^-^95#天道石^-^95#上古卷轴^-^95#魔界金币^-^95#魔戒充能石/FCOLOR=249> \
<> <每使用一个圣诞礼包可获得数量不等的元宝/FCOLOR=95> \
<> <并且有机会获得珍贵材料!/FCOLOR=95> \
<> <当全服使用达到300个时可召唤[圣诞大魔王].打死获得大量元宝/FCOLOR=151> \ \
<> <〖使用一个〗/@1> <〖使用十个〗/@10> <当前进度:/FCOLOR=250>< <$STR(g135)>/FCOLOR=95>/<300/FCOLOR=95>\
[@1]
#if
checkitem 圣诞福袋 1
#act
take 圣诞福袋 1
MOVR N$奖励元宝 1 20
GAMEGOLD + <$STR(N$奖励元宝)>
inc G135 1
goto @main
#ELSEACT
MESSAGEBOX 对不起,你的圣诞福袋不足…
break
#if
random 5
#act
GETRANDOMLINETEXT ..\QuestDiary\抽奖文件\抽奖列表.txt S$额外奖励
give <$STR(S$额外奖励)> 1
#if
large G135 299
#act
DEC G135 300
MonGenEx zc 151 156 圣诞大魔王 0 1 0 253
SENDMOVEMSG 0 243 0 130 1 {日常活动:/SCOLOR=250}土城已经刷新{[圣诞大魔王]/SCOLOR=254}活动，请各位玩家回到土城在151 156击杀BOSS 11 30 0
#if
#act
SENDMSG 0 95 15 玩家:{<$USERNAME>|253:15}成功上交一个“圣诞福袋”*1,获得元宝{<$STR(N$奖励元宝)>|253:15},额外获得物品{<$STR(S$额外奖励)>|253:15}..当前召唤进度为{<$STR(g135)>/300|253:15}
[@10]
#if
checkitem 圣诞福袋 10
#act
take 圣诞福袋 10
MOVR N$奖励元宝 50 200
GAMEGOLD + <$STR(N$奖励元宝)>
inc G135 10
goto @main
#ELSEACT
MESSAGEBOX 对不起,你的圣诞福袋不足…
break
#if
random 6
#act
GETRANDOMLINETEXT ..\QuestDiary\抽奖文件\抽奖列表.txt S$额外奖励
give <$STR(S$额外奖励)> 1
#if
random 6
#act
GETRANDOMLINETEXT ..\QuestDiary\抽奖文件\抽奖列表.txt S$额外奖励
give <$STR(S$额外奖励)> 1
#if
random 6
#act
GETRANDOMLINETEXT ..\QuestDiary\抽奖文件\抽奖列表.txt S$额外奖励
give <$STR(S$额外奖励)> 1
#if
random 6
#act
GETRANDOMLINETEXT ..\QuestDiary\抽奖文件\抽奖列表.txt S$额外奖励
give <$STR(S$额外奖励)> 1
#if
random 6
#act
GETRANDOMLINETEXT ..\QuestDiary\抽奖文件\抽奖列表.txt S$额外奖励
give <$STR(S$额外奖励)> 1
#if
random 6
#act
GETRANDOMLINETEXT ..\QuestDiary\抽奖文件\抽奖列表.txt S$额外奖励
give <$STR(S$额外奖励)> 1
#if
random 6
#act
GETRANDOMLINETEXT ..\QuestDiary\抽奖文件\抽奖列表.txt S$额外奖励
give <$STR(S$额外奖励)> 1
#if
random 6
#act
GETRANDOMLINETEXT ..\QuestDiary\抽奖文件\抽奖列表.txt S$额外奖励
give <$STR(S$额外奖励)> 1
#if
random 6
#act
GETRANDOMLINETEXT ..\QuestDiary\抽奖文件\抽奖列表.txt S$额外奖励
give <$STR(S$额外奖励)> 1
#if
random 6
#act
GETRANDOMLINETEXT ..\QuestDiary\抽奖文件\抽奖列表.txt S$额外奖励
give <$STR(S$额外奖励)> 1
#if
large G135 299
#act
DEC G135 300
MonGenEx zc 151 156 圣诞大魔王 0 1 0 253
SENDMOVEMSG 0 243 0 130 1 {日常活动:/SCOLOR=250}土城已经刷新{[圣诞大魔王]/SCOLOR=254}活动，请各位玩家回到土城在151 156击杀BOSS 11 30 0
#if
#act
SENDMSG 0 95 15 玩家:{<$USERNAME>|253:15}成功上交一个“圣诞福袋”*10,获得元宝{<$STR(N$奖励元宝)>|253:15},额外获得大量物品..当前召唤进度为{<$STR(g135)>/300|253:15}
