GOM引擎传奇服务端沙城捐献脚本的制作教程

第一步：在QM[@STARTUP]字段下方加入以下脚本



[@STARTUP]
#IF
EQUAL A101
#ACT
MOV A101 <$MONTH>0<$DAY>


#IF
NOT CHECKTEXTLIST ..\..\..\..\虞姬传奇捐献\<$STR(A101)>\检测是否已经创建目录.txt 已创建目录
#act
ForceDirectories  ..\..\..\..\虞姬传奇捐献\
ForceDirectories  ..\..\..\..\虞姬传奇捐献\<$MONTH>0<$DAY>\
CreateFile ..\..\..\..\虞姬传奇捐献\<$STR(A101)>\检测是否已经创建目录.txt
AddTextListEx ..\..\..\..\虞姬传奇捐献\<$STR(A101)>\检测是否已经创建目录.txt 已创建目录 0
CreateFile ..\..\..\..\虞姬传奇捐献\<$STR(A101)>\今日01区.txt
CreateFile ..\..\..\..\虞姬传奇捐献\<$STR(A101)>\今日02区.txt
CreateFile ..\..\..\..\虞姬传奇捐献\<$STR(A101)>\今日03区.txt
CreateFile ..\..\..\..\虞姬传奇捐献\<$STR(A101)>\今日04区.txt
CreateFile ..\..\..\..\虞姬传奇捐献\<$STR(A101)>\今日05区.txt
CreateFile ..\..\..\..\虞姬传奇捐献\<$STR(A101)>\今日通宵区.txt
AddTextListEx ..\..\..\..\虞姬传奇捐献\<$STR(A101)>\今日01区.txt 今日一区:0 0
AddTextListEx ..\..\..\..\虞姬传奇捐献\<$STR(A101)>\今日02区.txt 今日二区:0 0
AddTextListEx ..\..\..\..\虞姬传奇捐献\<$STR(A101)>\今日03区.txt 今日三区:0 0
AddTextListEx ..\..\..\..\虞姬传奇捐献\<$STR(A101)>\今日04区.txt 今日四区:0 0
AddTextListEx ..\..\..\..\虞姬传奇捐献\<$STR(A101)>\今日05区.txt 今日五区:0 0
AddTextListEx ..\..\..\..\虞姬传奇捐献\<$STR(A101)>\今日通宵区.txt 今日通宵区:0 0



第二步：直接复制NPC脚本即可，脚本可以直接使用，但属性需要根据脚本自己写，脚本如下



[@DS公益捐献]
{
#IF
#ACT
GetListString ..\..\..\..\虞姬传奇捐献\<$STR(A101)>\今日01区.txt 0 S$今日一区 S$捐献金额0
GetListString ..\..\..\..\虞姬传奇捐献\<$STR(A101)>\今日02区.txt 0 S$今日二区 S$捐献金额1
GetListString ..\..\..\..\虞姬传奇捐献\<$STR(A101)>\今日03区.txt 0 S$今日三区 S$捐献金额2
GetListString ..\..\..\..\虞姬传奇捐献\<$STR(A101)>\今日04区.txt 0 S$今日四区 S$捐献金额3
GetListString ..\..\..\..\虞姬传奇捐献\<$STR(A101)>\今日05区.txt 0 S$今日五区 S$捐献金额4
GetListString ..\..\..\..\虞姬传奇捐献\<$STR(A101)>\今日通宵区.txt 0 S$今日通宵区 S$捐献金额5


MOV N$总金额 0
INC N$总金额 <$str(S$捐献金额0)>
INC N$总金额 <$str(S$捐献金额1)>
INC N$总金额 <$str(S$捐献金额2)>
INC N$总金额 <$str(S$捐献金额3)>
INC N$总金额 <$str(S$捐献金额4)>
INC N$总金额 <$str(S$捐献金额5)>
MOV S$总共捐献值 <$STR(N$总捐献)>


SetStringBlank S$今日一区 15 1
SetStringBlank S$今日二区 15 1
SetStringBlank S$今日三区 15 1
SetStringBlank S$今日四区 15 1
SetStringBlank S$今日五区 15 1
SetStringBlank S$今日通宵区 15 1


Mov N$剩余金额奖励 <$STR(N$总金额)>
Div N$剩余金额奖励 10
Mul N$剩余金额奖励 6
Mov N$胜利方奖励 <$STR(N$剩余金额奖励)>
Div N$胜利方奖励 10
Mul N$胜利方奖励 7
Mov N$失败方奖励 <$STR(N$剩余金额奖励)>
Div N$失败方奖励 10
Mul N$失败方奖励 3


SetStringBlank S$捐献金额0 5 1
SetStringBlank S$捐献金额1 5 1
SetStringBlank S$捐献金额2 5 1
SetStringBlank S$捐献金额3 5 1
SetStringBlank S$捐献金额4 5 1
SetStringBlank S$捐献金额5 5 1


#IF
#ACT
OPENMERCHANTBIGDLG 16 130 1 4 0 0 1 590 2
#say
\ \ \
< >              <公益捐献.非强制.拥有快人一步>          <当前今天所有区总捐献> [<$STR(N$总金额)>] <元> \
< >              <Hot~◆》/AUTOCOLOR=253,251,168,191,250,70,245,249,254> <您当前RMB点为/SCOLOR=250>< <$GAMEPOINT> 元/FCOLOR=254> \
< >              <沙城奖池系统 可获得 [永久属性] 死亡不掉 合区不掉 永久生效！>\  \
< >              <Hot~◆》/AUTOCOLOR=253,251,168,191,250,70,245,249,254> {<$STR(S$今日一区)>/FCOLOR=251} <按列表时间开区/FCOLOR=70> <已累计沙城奖励 [金额] 为/FCOLOR=250>< <$STR(S$捐献金额0)> /FCOLOR=254><元/FCOLOR=58>\
< >              <Hot~◆》/AUTOCOLOR=253,251,168,191,250,70,245,249,254> {<$STR(S$今日二区)>/FCOLOR=251} <按列表时间开区/FCOLOR=70> <已累计沙城奖励 [金额] 为/FCOLOR=250>< <$STR(S$捐献金额1)> /FCOLOR=254><元/FCOLOR=58>\
< >              <Hot~◆》/AUTOCOLOR=253,251,168,191,250,70,245,249,254> {<$STR(S$今日三区)>/FCOLOR=251} <按列表时间开区/FCOLOR=70> <已累计沙城奖励 [金额] 为/FCOLOR=250>< <$STR(S$捐献金额2)> /FCOLOR=254><元/FCOLOR=58>\
< >              <Hot~◆》/AUTOCOLOR=253,251,168,191,250,70,245,249,254> {<$STR(S$今日四区)>/FCOLOR=251} <按列表时间开区/FCOLOR=70> <已累计沙城奖励 [金额] 为/FCOLOR=250>< <$STR(S$捐献金额3)> /FCOLOR=254><元/FCOLOR=58>\
< >              <Hot~◆》/AUTOCOLOR=253,251,168,191,250,70,245,249,254> {<$STR(S$今日五区)>/FCOLOR=251} <按列表时间开区/FCOLOR=70> <已累计沙城奖励 [金额] 为/FCOLOR=250>< <$STR(S$捐献金额4)> /FCOLOR=254><元/FCOLOR=58>\
< >              <Hot~◆》/AUTOCOLOR=253,251,168,191,250,70,245,249,254> {<$STR(S$今日通宵区)>/FCOLOR=251} <按列表时间开区/FCOLOR=70> <已累计沙城奖励 [金额] 为/FCOLOR=250>< <$STR(S$捐献金额5)> /FCOLOR=254><元/FCOLOR=58>\ \
< >         <捐献永久获得：/FCOLOR=151> <吸收伤害加20%,增加3.0倍真实爆率,对所有boss伤害提升3倍伤害刀刀切割/FCOLOR=151>\ \
\ \                                  <ImgEx:1:879:879:879:67:-5|250#需４０ＲＭＢ/@KQKBZT>\ \  \
< >                   <红包金额根据当天的捐献作为基数，金额累积到1万奖励追加到80% /SCOLOR=253>\
< >                   <获胜指挥128红包  失败指挥68红包从奖池中扣除/SCOLOR=253>\
< >                   <沙城胜利行会获得奖池70%的金额，失败方奖励为30%的金额，/SCOLOR=253>\
< >                   <只允许有一个失败方  如有2个或2个以上失败方，失败方以捐献号人多为准/SCOLOR=253>\  \
< >              <当天所有区捐献总额用来发放合区攻城奖励.扣除40%用作平台手续剩余:/SCOLOR=254>[<$STR(N$剩余金额奖励)>] <元>\
< >                    <奖励规则：胜利方获得总额的70%/SCOLOR=254>[<$STR(N$胜利方奖励)>] <元>.<失败方获得总额的30%/SCOLOR=254>[<$STR(N$失败方奖励)>] <元>\ \


[@ZSDBDT]
#IF
CHECKTITLE 公益捐献
#ACT
map 沙城专属
SendCenterMsg 250 0 捐献玩家『<$USERNAME>』进入公益捐献地图打宝去了，超级神器等着他！ 1 3
break
#ELSEACT
MESSAGEBOX 进入失败，条件不符！


[@KQKBZT]
#IF
CHECKTITLE 公益捐献
#ACT
MESSAGEBOX 你已经捐献过了，不可重复捐献！
break


#IF
CHECKGAMEPOINT > 39
#act
GAMEPOINT - 40
INC G235 40
INC G43 1
CONFERTITLE 公益使者
CONFERTITLE 公益捐献
#CALL [\游戏登陆\爆率倍数.txt] @爆率倍数
#CALL [\游戏登陆\攻击倍数.txt] @攻击倍数
SENDMOVEMSG 0 253 255 400 1 感谢大佬玩家[<$USERNAME>]对本服的捐献赞助！本服每日捐献狂暴将全部加入沙巴克奖池！保底奖励3888，捐献不够管理来凑！>！
goto @DS公益捐献
#ELSEACT
messagebox 当前RMB点不够,无法开启公益捐献！
BREAK


#IF
CheckContainsText <$SERVERNAME> 01区
#ACT
CLEARNAMELIST ..\..\..\..\虞姬传奇捐献\<$STR(A101)>\今日01区.txt
AddTextListEx ..\..\..\..\虞姬传奇捐献\<$STR(A101)>\今日01区.txt 今日一区:<$STR(G235)> 0
goto @DS公益捐献
break


#IF
CheckContainsText <$SERVERNAME> 02区
#ACT
CLEARNAMELIST ..\..\..\..\虞姬传奇捐献\<$STR(A101)>\今日02区.txt
AddTextListEx ..\..\..\..\虞姬传奇捐献\<$STR(A101)>\今日02区.txt 今日二区:<$STR(G235)> 0
goto @DS公益捐献
break


#IF
CheckContainsText <$SERVERNAME> 03区
#ACT
CLEARNAMELIST ..\..\..\..\虞姬传奇捐献\<$STR(A101)>\今日03区.txt
AddTextListEx ..\..\..\..\虞姬传奇捐献\<$STR(A101)>\今日03区.txt 今日三区:<$STR(G235)> 0
goto @DS公益捐献
break


#IF
CheckContainsText <$SERVERNAME> 04区
#ACT
CLEARNAMELIST ..\..\..\..\虞姬传奇捐献\<$STR(A101)>\今日04区.txt
AddTextListEx ..\..\..\..\虞姬传奇捐献\<$STR(A101)>\今日04区.txt 今日四区:<$STR(G235)> 0
goto @DS公益捐献
break


#IF
CheckContainsText <$SERVERNAME> 05区
#ACT
CLEARNAMELIST ..\..\..\..\虞姬传奇捐献\<$STR(A101)>\今日05区.txt
AddTextListEx ..\..\..\..\虞姬传奇捐献\<$STR(A101)>\今日05区.txt 今日五区:<$STR(G235)> 0
goto @DS公益捐献
break


#IF
CheckContainsText <$SERVERNAME> 通宵区
#ACT
CLEARNAMELIST ..\..\..\..\虞姬传奇捐献\<$STR(A101)>\今日通宵区.txt
AddTextListEx ..\..\..\..\虞姬传奇捐献\<$STR(A101)>\今日通宵区.txt 今日通宵区:<$STR(G235)> 0
goto @DS公益捐献
break
}

好人翊圣平安 嘻嘻