GOM引擎贺岁奖池设置方法，传奇一条龙开区时添加奖池捐献教程。

[@Main]

#IF

EQUAL A1

#act

messagebox 合区后无法开启狂暴.

break

#IF

CheckContainsText <$str(A1)> A

#act

MOV S$分区 A

#IF

CheckContainsText <$str(A1)> B

#act

MOV S$分区 B

#IF

CheckContainsText <$str(A1)> C

#act

MOV S$分区 C

#IF

CheckContainsText <$str(A1)> D

#act

MOV S$分区 D

#IF

CheckContainsText <$str(A1)> E

#act

MOV S$分区 E

#IF

not equal S$分区

#act

getliststring ..\..\..\..\跨服功能\奖池捐献\<$str(S$分区)>\1.txt 0 N$区1

getliststring ..\..\..\..\跨服功能\奖池捐献\<$str(S$分区)>\2.txt 0 N$区2

getliststring ..\..\..\..\跨服功能\奖池捐献\<$str(S$分区)>\3.txt 0 N$区3

getliststring ..\..\..\..\跨服功能\奖池捐献\<$str(S$分区)>\4.txt 0 N$区4

getliststring ..\..\..\..\跨服功能\奖池捐献\<$str(S$分区)>\5.txt 0 N$区5

getliststring ..\..\..\..\跨服功能\奖池捐献\<$str(S$分区)>\总计.txt 0 N$总计

#IF

#Act

CloseBigDialogBox

OPENMERCHANTBIGDLG 1 362 0 0 0 0 1 422 10

#SAY

\　\　\

　<〖捐献NPC〗/FCOLOR=251><Hot~/FCOLOR=249><每个区捐献的70%自动累计到奖池内，分配给攻沙双方行会/FCOLOR=253>\

<Img:168:1:-2:4>\

　<《捐献条件》：/FCOLOR=251><获得“新春贺岁”称号 需要30RMB点/FCOLOR=154>　　 <[查看称号属性]|154#打怪爆率+10%^154#基础血量+500^154#刀刀切割+2000/FCOLOR=249>\

　<《捐献说明》：/FCOLOR=251><新区首次拿沙保底188RMB奖励,攻城期间战地记者在线观察!/FCOLOR=154>\

　<累计的总奖励会根据实际情况分配给攻城双方行会,解释权归官方所有/FCOLOR=229>\

<Img:168:1:-2:4>\

　<《传奇一条龙》/FCOLOR=254><今日一区已经累计奖池金额为：/FCOLOR=218><[/FCOLOR=249><$str(N$区1)><]/FCOLOR=249> <元/FCOLOR=250>\

　<《传奇一条龙》/FCOLOR=254><今日二区已经累计奖池金额为：/FCOLOR=218><[/FCOLOR=249><$str(N$区2)><]/FCOLOR=249> <元/FCOLOR=250>\

　<《传奇一条龙》/FCOLOR=254><今日三区已经累计奖池金额为：/FCOLOR=218><[/FCOLOR=249><$str(N$区3)><]/FCOLOR=249> <元/FCOLOR=250>\

　<《传奇一条龙》/FCOLOR=254><今日四区已经累计奖池金额为：/FCOLOR=218><[/FCOLOR=249><$str(N$区4)><]/FCOLOR=249> <元/FCOLOR=250>\

　<《传奇一条龙》/FCOLOR=254><今日五区已经累计奖池金额为：/FCOLOR=218><[/FCOLOR=249><$str(N$区5)><]/FCOLOR=249> <元/FCOLOR=250>\

　　　　　　　　　　　　<永久使用→/FCOLOR=249><[激活贺岁称号]/@Jhhsch01x>\

<Img:168:1:-2:4>\

　<《累计金额》：/FCOLOR=251><[当天]所有分区累计金额/FCOLOR=154><[/FCOLOR=249><$str(N$总计)><元]/FCOLOR=249><将会用于新区攻沙奖励！/FCOLOR=154>\

[@Jhhsch01x]

#IF

CHECKTITLE 新春贺岁

#ACT

MESSAGEBOX 你已经拥有了新春贺岁，无需再次激活!

break

#IF

checkgamepoint < 30

#ACT

MESSAGEBOX 开启狂暴需要30RMB点

break

#IF

CheckContainsText <$str(A1)> 测试

#ACT

MESSAGEBOX 测试区无法开启狂暴.

break

#IF

EQUAL A1

#act

messagebox 合区后无法开启狂暴.

break

#IF

#ACT

GAMEPOINT – 30

CONFERTITLE 新春贺岁

#CALL [\游戏登陆\爆率倍数.txt] @爆率倍数

#IF

CheckContainsText <$str(A1)> A

#act

MOV S$分区 A

#IF

CheckContainsText <$str(A1)> B

#act

MOV S$分区 B

#IF

CheckContainsText <$str(A1)> C

#act

MOV S$分区 C

#IF

CheckContainsText <$str(A1)> D

#act

MOV S$分区 D

#IF

CheckContainsText <$str(A1)> E

#act

MOV S$分区 E

#IF

CheckContainsText <$str(A1)> 1

#act

MOV N$区号 1

#IF

CheckContainsText <$str(A1)> 2

#act

MOV N$区号 2

#IF

CheckContainsText <$str(A1)> 3

#act

MOV N$区号 3

#IF

CheckContainsText <$str(A1)> 4

#act

MOV N$区号 4

#IF

CheckContainsText <$str(A1)> 5

#act

MOV N$区号 5

#IF

#ACT

getliststring ..\..\..\..\跨服功能\奖池捐献\<$str(S$分区)>\<$str(N$区号)>.txt 0 N$本区

clearnamelist ..\..\..\..\跨服功能\奖池捐献\<$str(S$分区)>\<$str(N$区号)>.txt

INC N$本区 30

addtextlistex ..\..\..\..\跨服功能\奖池捐献\<$str(S$分区)>\<$str(N$区号)>.txt <$str(N$本区)> 0

getliststring ..\..\..\..\跨服功能\奖池捐献\<$str(S$分区)>\总计.txt 0 N$总计

clearnamelist ..\..\..\..\跨服功能\奖池捐献\<$str(S$分区)>\总计.txt

INC N$总计 30

addtextlistex ..\..\..\..\跨服功能\奖池捐献\<$str(S$分区)>\总计.txt <$str(N$总计)> 0

MESSAGEBOX 你已成功开启狂暴属性！

sendmsg 0 玩家[<$username>]开启狂暴获得强力属性！！本区沙奖池金额：<$str(N$本区)>元，今日所有区沙奖池累积金额<$str(N$总计)>元。

goto @main