传奇一条龙开区时捐献排行榜脚本有必要添加吗？捐献脚本教程分享

大家都知道，现在的传奇版本里大都有捐献排行这个功能，如果你不添加的话就感觉版本总少点什么东西，因为玩家已经玩习惯了，所以捐献排行脚本在传奇一条龙开区时是有必要添加的，今天给大家发布一个简单的捐献排行脚本。

[@Main]
#IF
#ACT
OPENMERCHANTBIGDLG 33 840 1 0 0 0 1 455 5
LOADVAR HUMAN 捐献游戏点 ..\QuestDiary\随意数据\捐献游戏点.txt
SortHumVarToListEx 捐献游戏点 ..\QuestDiary\随意数据\捐献游戏点.txt 1 ..\QuestDiary\随意数据\捐献游戏点A.txt 1
GetListString ..\QuestDiary\随意数据\捐献游戏点A.txt   0   A441   G441
GetListString ..\QuestDiary\随意数据\捐献游戏点A.txt   1   A442   G442
GetListString ..\QuestDiary\随意数据\捐献游戏点A.txt   2   A443   G443
#SAY
\ \
<>                 <特种兵:/FCOLOR=250> <欢迎你,你当前拥有:<$CREDITPOINT>捐献点/FCOLOR=95>  \
<><--------------------------------------------------------------------/FCOLOR=71>\
<>               <前三名可以获得对应属性，当前捐献<$HUMAN(捐献游戏点)>点/FCOLOR=125>\
<>        <捐献排行榜：每次不低于5捐献点，捐献奖励累计到沙巴克,拿沙结束清空!/FCOLOR=9>\
<><--------------------------------------------------------------------/FCOLOR=71>\
<>        <第一名:<$STR(A441)>/FCOLOR=251>            <捐献数量:<$STR(G441)>/FCOLOR=254> \
<>        <捐献加层:HP + 30% 攻击力提升1.4倍 爆率提升300%  50%触发刀刀切割1%/FCOLOR=253>\
<><--------------------------------------------------------------------/FCOLOR=35>\
<>        <第二名:<$STR(A442)>/FCOLOR=250>            <捐献数量:<$STR(G442)>/FCOLOR=254> \
<>        <捐献加层:HP + 20% 攻击力提升1.3倍 爆率提升200%  20%触发刀刀切割1%/FCOLOR=253>\
<><--------------------------------------------------------------------/FCOLOR=35>\
<>        <第三名:<$STR(A443)>/FCOLOR=242>            <捐献数量:<$STR(G443)>/FCOLOR=254> \
<>        <捐献加层:HP + 10%  攻击力提升1.2倍 爆率提升100%/FCOLOR=253>\
<><--------------------------------------------------------------------/FCOLOR=35>\

<>                              <→我要捐献←/@@InPutString22>     \
<>    <捐献总额度的50%作为拿沙奖励，红包发放！/FCOLOR=250> {当前沙奖池总额：<$STR(G5)>捐献点/FCOLOR=249}




[@InPutString22]
#IF
CheckCREDITPOINT < 5
#ACT
MESSAGEBOX 对不起,你连5点捐献点都没有，无法捐献。
BREAK

#IF
SMALL S22  5
#ACT
MESSAGEBOX 对不起,至少每次需要捐献5点以上。
BREAK

#IF
NOT CheckCREDITPOINT  <  <$STR(S22)>
#ACT
CREDITPOINT - <$STR(S22)>
DIV <$STR(S22)> 2
inc G5 <$STR(S22)>
CALCVAR HUMAN 捐献游戏点 + <$STR(S22)>
SAVEVAR HUMAN 捐献游戏点 ..\QuestDiary\随意数据\捐献游戏点.txt
Gmexecute 开始提问 @更新捐献排行榜
GOTO @MAIN
#ELSEACT
MESSAGEBOX 对不起,你的捐献点不够支付当前输入金额。
BREAK