1:本脚本用的全服触发命令为： Gmexecute 开始提问 请按照自己端的全服触发命令进行修改
2:查看本脚本使用的临时变量和自定义变量，最好不要和其它脚本重复使用
3.王者大使，烽火台，杀人排行的将陆续进行修复
4.修复英雄上线没有给予属性的BUG
==============NPC脚本===========
==============NPC脚本===========
[@MAIN]
#If
CheckVar Human 捐献数 =
#ACT
CalcVar Human 捐献数 = 0
SAVEVAR HUMAN 捐献数 ..\QuestDiary\捐献系统\捐献数.txt
delaygoto 1 @主要对话
#ELSEACT
goto @主要对话
[@主要对话]
#IF
#ACT
OPENMERCHANTDLG 6005|63|1|742|474|0|0|0|1|410|5
mov <$S(捐献1)> 虚拟以待
mov <$S(捐献3)> 虚拟以待
mov <$S(捐献5)> 虚拟以待
mov <$S(捐献7)> 虚拟以待
mov <$S(捐献9)> 虚拟以待
mov <$S(捐献2)> 0
mov <$S(捐献4)> 0
mov <$S(捐献6)> 0
mov <$S(捐献8)> 0
mov <$S(捐献10)> 0
GetFileToVar \QuestDiary\捐献系统\捐献排行名单.txt 1 <$S(捐献1)> <$S(捐献2)>
GetFileToVar \QuestDiary\捐献系统\捐献排行名单.txt 2 <$S(捐献3)> <$S(捐献4)>
GetFileToVar \QuestDiary\捐献系统\捐献排行名单.txt 3 <$S(捐献5)> <$S(捐献6)>
GetFileToVar \QuestDiary\捐献系统\捐献排行名单.txt 4 <$S(捐献7)> <$S(捐献8)>
GetFileToVar \QuestDiary\捐献系统\捐献排行名单.txt 5 <$S(捐献9)> <$S(捐献10)>
#SAY
\ \
<{s=称 号：;x=80;y=38;fc=103;bold=1}><{s=苍月王者;x=130;y=38;fc=70;bold=1}>\
<{s=玩家名：;x=80;y=55;fc=103;bold=1}><{s=<$S(捐献1)>;x=130;y=55;fc=151;bold=1}>\
<{s=捐赠值：;x=80;y=72;fc=103;bold=1}><{s=<$S(捐献2)>;x=130;y=72;fc=151;bold=1}>\
<{s=称 号：;x=80;y=100;fc=103;bold=1}><{s=星耀至尊;x=130;y=100;fc=9;bold=1}>\
<{s=玩家名：;x=80;y=117;fc=103;bold=1}><{s=<$S(捐献3)>;x=130;y=117;fc=151;bold=1}>\
<{s=捐赠值：;x=80;y=135;fc=103;bold=1}><{s=<$S(捐献4)>;x=130;y=135;fc=151;bold=1}>\
<{s=称 号：;x=80;y=160;fc=103;bold=1}><{s=乾坤霸主;x=130;y=160;fc=253;bold=1}>\
<{s=玩家名：;x=80;y=180;fc=103;bold=1}><{s=<$S(捐献5)>;x=130;y=180;fc=151;bold=1}>\
<{s=捐赠值：;x=80;y=200;fc=103;bold=1}><{s=<$S(捐献6)>;x=130;y=200;fc=151;bold=1}>\
<{s=称 号：;x=80;y=225;fc=103;bold=1}><{s=乱世斗者;x=130;y=225;fc=146;bold=1}>\
<{s=玩家名：;x=80;y=243;fc=103;bold=1}><{s=<$S(捐献7)>;x=130;y=243;fc=151;bold=1}>\
<{s=捐赠值：;x=80;y=263;fc=103;bold=1}><{s=<$S(捐献8)>;x=130;y=263;fc=151;bold=1}>\
<{s=称 号：;x=80;y=290;fc=103;bold=1}><{s=江湖小侠;x=130;y=290;fc=218;bold=1}>\
<{s=玩家名：;x=80;y=308;fc=103;bold=1}><{s=<$S(捐献9)>;x=130;y=308;fc=151;bold=1}>\
<{s=捐赠值：;x=80;y=325;fc=103;bold=1}><{s=<$S(捐献10)>;x=130;y=325;fc=151;bold=1}>\
<{s=王者：;bold=1;f.se=10;fc=103;x=255;y=65}> <{s=物防 + 20 魔防 + 15;bold=1;f.se=10;fc=210;x=300;y=65}>
<{s=至尊：;bold=1;f.se=10;fc=103;x=255;y=85}> <{s=物防 + 15 魔防 + 13;bold=1;f.se=10;fc=210;x=300;y=85}>
<{s=霸主：;bold=1;f.se=10;fc=103;x=255;y=105}> <{s=物防 + 12 魔防 + 10;bold=1;f.se=10;fc=210;x=300;y=105}>
<{s=斗者：;bold=1;f.se=10;fc=103;x=255;y=125}> <{s=物防 + 9 魔防 + 7;bold=1;f.se=10;fc=210;x=300;y=125}>
<{s=小侠：;bold=1;f.se=10;fc=103;x=255;y=145}> <{s=物防 + 6 魔防 + 4;bold=1;f.se=10;fc=210;x=300;y=145}>
<{s=1.单次捐款最低10000元宝起;bold=1;f.se=10;fc=100;x=255;y=195}>
<{s=2.按捐赠元宝数高低依次排行;bold=1;f.se=10;fc=100;x=255;y=215}>
<{s=3.每日00:00整重置爵位捐献;bold=1;f.se=10;fc=100;x=255;y=235}>
<{s=<$GAMEGOLD>;bold=1;f.se=10;fc=103;x=355;y=260}>\
<{s=<$HUMAN(捐献数)>;bold=1;f.se=10;fc=103;x=355;y=288}>
<{S=我要捐款;li=6005;i=1;ih=2;id=3;fc=151;ch=151;cd=151;x=300;y=315}/@@InPutInteger99|Title=请输入大于10000的数字>\
[@InPutInteger99]
#IF
#ACT
MOV <$N(捐献金额)> <$STR(N99)>
#IF
SMALL <$N(捐献金额)> 10000
#ACT
MESSAGEBOX [捐献失败]：\ \ 请输入大于10000的数值！
goto @主要对话
BREAK
#IF
LARGE <$N(捐献金额)> 9999
CHECKGAMEGOLD ? <$N(捐献金额)>
#ACT
GAMEGOLD - <$N(捐献金额)>
CALCVAR HUMAN 捐献数 + <$N(捐献金额)>
SAVEVAR HUMAN 捐献数 ..\QuestDiary\捐献系统\捐献数.txt
SortHumVarToFile 捐献数 ..\QuestDiary\捐献系统\捐献数.txt 1 ..\QuestDiary\捐献系统\捐献排行名单.txt 0
MESSAGEBOX [贡献信息]：\捐赠成功，你本次捐增了<$N(捐献金额)>元宝!\您当前捐献值为：<$HUMAN(捐献数)>点!\感谢您对本服大力支持，您现在可以享受俸禄待遇了!
goto @主要对话
delaygoto 10 @执行其它
#ELSEACT
MESSAGEBOX [贡献失败]：你没元宝或者输入有误,功勋捐献最少10000元宝起步！
BREAK
[@执行其它]
#ACT
GetFileToVar \QuestDiary\捐献系统\捐献排行名单.txt 1 <$S(捐献1)> <$S(捐献2)>
GetFileToVar \QuestDiary\捐献系统\捐献排行名单.txt 2 <$S(捐献3)> <$S(捐献4)>
GetFileToVar \QuestDiary\捐献系统\捐献排行名单.txt 3 <$S(捐献5)> <$S(捐献6)>
GetFileToVar \QuestDiary\捐献系统\捐献排行名单.txt 4 <$S(捐献7)> <$S(捐献8)>
GetFileToVar \QuestDiary\捐献系统\捐献排行名单.txt 5 <$S(捐献9)> <$S(捐献10)>
#CALL [\捐献系统\角色称号.txt] @角色称号
BREAK
======QM脚本========
======QM脚本========
[@Login]
#IF
CHECKLEVELEX > 0
#ACT
#CALL [\游戏登陆\个人变量.txt] @个人变量
#CALL [\捐献系统\主号上线给予.txt] @主号上线给予
break
[@Herologin]
#if
#ACT
#CALL [\捐献系统\英雄上线给予.txt] @英雄上线给予
break
[@捐献去掉其它人称号]
#IF
#ACT
GetFileToVar \QuestDiary\捐献系统\捐献排行名单.txt 1 <$S(捐献1)> <$S(捐献2)>
GetFileToVar \QuestDiary\捐献系统\捐献排行名单.txt 2 <$S(捐献3)> <$S(捐献4)>
GetFileToVar \QuestDiary\捐献系统\捐献排行名单.txt 3 <$S(捐献5)> <$S(捐献6)>
GetFileToVar \QuestDiary\捐献系统\捐献排行名单.txt 4 <$S(捐献7)> <$S(捐献8)>
GetFileToVar \QuestDiary\捐献系统\捐献排行名单.txt 5 <$S(捐献9)> <$S(捐献10)>
#IF
EQUAL <$S(捐献1)> <$USERNAME>
#ACT
SETICON 0 -1
SetIcon 0 7
#IF
EQUAL <$S(捐献3)> <$USERNAME>
#ACT
SETICON 0 -1
SetIcon 0 6
#IF
EQUAL <$S(捐献5)> <$USERNAME>
#ACT
SETICON 0 -1
SetIcon 0 5
#IF
EQUAL <$S(捐献7)> <$USERNAME>
#ACT
SETICON 0 -1
SetIcon 0 4
#IF
EQUAL <$S(捐献9)> <$USERNAME>
#ACT
SETICON 0 -1
SetIcon 0 3
#IF
not EQUAL <$S(捐献1)> <$USERNAME>
not EQUAL <$S(捐献3)> <$USERNAME>
not EQUAL <$S(捐献5)> <$USERNAME>
not EQUAL <$S(捐献7)> <$USERNAME>
not EQUAL <$S(捐献9)> <$USERNAME>
#ACT
SETICON 0 -1
[@捐献系统初始化]
#IF
#ACT
LOADVAR HUMAN 捐献数 ..\QuestDiary\捐献系统\捐献数.txt
delaygoto 3000 @初始顶戴
[@初始顶戴]
#IF
not EQUAL <$S(捐献1)> <$USERNAME>
not EQUAL <$S(捐献3)> <$USERNAME>
not EQUAL <$S(捐献5)> <$USERNAME>
not EQUAL <$S(捐献7)> <$USERNAME>
not EQUAL <$S(捐献9)> <$USERNAME>
#ACT
SETICON 0 -1
