QM脚本

[@Startup]
#IF
EQUAL A10
#ACT
MOV A10 <$MONTH>0<$DAY>

#IF
NOT CHECKTEXTLIST ..\..\..\..\通区捐献\用心网络\检测是否已经创建目录.txt 已创建目录
#act
ForceDirectories  ..\..\..\..\通区捐献\
ForceDirectories  ..\..\..\..\通区捐献\用心网络\
CreateFile ..\..\..\..\通区捐献\用心网络\检测是否已经创建目录.txt
AddTextListEx ..\..\..\..\通区捐献\用心网络\检测是否已经创建目录.txt 已创建目录 0
CreateFile ..\..\..\..\通区捐献\用心网络\雷霆01区.txt
CreateFile ..\..\..\..\通区捐献\用心网络\雷霆02区.txt
CreateFile ..\..\..\..\通区捐献\用心网络\雷霆03区.txt
CreateFile ..\..\..\..\通区捐献\用心网络\雷霆04区.txt
CreateFile ..\..\..\..\通区捐献\用心网络\雷霆05区.txt
AddTextListEx ..\..\..\..\通区捐献\用心网络\雷霆01区.txt 雷霆一区:0 0
AddTextListEx ..\..\..\..\通区捐献\用心网络\雷霆02区.txt 雷霆二区:0 0
AddTextListEx ..\..\..\..\通区捐献\用心网络\雷霆03区.txt 雷霆三区:0 0
AddTextListEx ..\..\..\..\通区捐献\用心网络\雷霆04区.txt 雷霆四区:0 0
AddTextListEx ..\..\..\..\通区捐献\用心网络\雷霆05区.txt 雷霆五区:0 0

NPC脚本

[@main]
#IF
#act
OPENMERCHANTBIGDLG 8 108 1 4 -30 -100 0 430 20
GetListString ..\..\..\..\通区捐献\用心网络\雷霆01区.txt 0 S$雷霆一区 S$捐献金额0
GetListString ..\..\..\..\通区捐献\用心网络\雷霆02区.txt 0 S$雷霆二区 S$捐献金额1
GetListString ..\..\..\..\通区捐献\用心网络\雷霆03区.txt 0 S$雷霆三区 S$捐献金额2
GetListString ..\..\..\..\通区捐献\用心网络\雷霆04区.txt 0 S$雷霆四区 S$捐献金额3
GetListString ..\..\..\..\通区捐献\用心网络\雷霆05区.txt 0 S$雷霆五区 S$捐献金额4
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)>
SetStringBlank S$雷霆一区 15 1
SetStringBlank S$雷霆二区 15 1
SetStringBlank S$雷霆三区 15 1
SetStringBlank S$雷霆四区 15 1
SetStringBlank S$雷霆五区 15 1

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

#SAY
<ImgEx:8:113:114:115:600:-15/@EXIT>\ \ \ \ \
　<New-⊙⊿你当前元宝为/SCOLOR=215> {<$GAMEGOLD> 元/SCOLOR=254} <沙巴克沙城奖池系统，每人限一次！合区后关闭激活页面！/SCOLOR=241>\
　<>\
　<New-⊙⊿/SCOLOR=251> <激活说明:本次捐献为公益捐献所有捐献作为沙城奖励，只需要30元宝即可获得属性！/SCOLOR=253>\
　<New-⊙⊿/SCOLOR=251> <[激活] 可以根据客户需求激活属性，攻魔道10-10。====/SCOLOR=70>\
　<New-⊙⊿/SCOLOR=215>    {<$STR(S$雷霆一区)>/FCOLOR=215}<已经累计沙城奖励  [金额]⊙⊿/SCOLOR=215> {<$STR(S$捐献金额0)>/FCOLOR=254} <元/FCOLOR=58>\
　<New-⊙⊿/SCOLOR=215>    {<$STR(S$雷霆二区)>/FCOLOR=215}<已经累计沙城奖励  [金额]⊙⊿/SCOLOR=215> {<$STR(S$捐献金额1)>/FCOLOR=254} <元/FCOLOR=58>\
;　<New-⊙⊿/SCOLOR=215>    {<$STR(S$雷霆三区)>/FCOLOR=215}<已经累计沙城奖励  [金额]⊙⊿/SCOLOR=215> {<$STR(S$捐献金额2)>/FCOLOR=254} <元/FCOLOR=58>\
;　<New-⊙⊿/SCOLOR=215>    {<$STR(S$雷霆四区)>/FCOLOR=215}<已经累计沙城奖励  [金额]⊙⊿/SCOLOR=215> {<$STR(S$捐献金额3)>/FCOLOR=254} <元/FCOLOR=58>\
;　<New-⊙⊿/SCOLOR=215>    {<$STR(S$雷霆五区)>/FCOLOR=215}<已经累计沙城奖励  [金额]⊙⊿/SCOLOR=215> {<$STR(S$捐献金额4)>/FCOLOR=254} <元/FCOLOR=58>\
　                                                         <[捐献获得永久属性加成]/@开始捐献>\
　                              <New-⊙⊿[当天]沙城池总累计奖金！/SCOLOR=58> {<$STR(N$总金额)>/SCOLOR=254} <元/SCOLOR=58>\
　<>\
　<New-⊙⊿ [沙巴克奖池] 沙城胜利行会获得沙城奖池佣金的60%,失败方获得40%扣除百15%管理费！/SCOLOR=242>

[@开始捐献]

;#IF
;CHECKTEXTLIST ..\QuestDiary\数据文件\合区检测.txt 测试
;#ACT
;MESSAGEBOX 当前还是测试区无法捐献！
;break

;#IF
;CHECKTEXTLIST ..\QuestDiary\数据文件\合区检测.txt 合区
;#ACT
;MESSAGEBOX 当前区已经合区了，捐献通道已关闭，务必合区前开通!
;break