GOM引擎传奇行会捐献脚本，传奇版本库开区时添加行会捐献排名教程。

admin

                               
登录/注册后可看大图

[@main]
#if
CHECKLEVELEX > 0
#act
#CALL [\子木脚本库\行会捐献系统\【常量设置】.INI] @常量设置
MOV S89 【】
SetStringBlank S89 20 1
CALCVAR HUMAN HHJX-行会捐献第1名显示 =

MOV S89 【】
SetStringBlank S89 20 1
CALCVAR HUMAN HHJX-行会捐献第2名显示 =


#IF
HAVEGUILD
#ACT
GOTO @加载行会变量
#SAY
    \
\
-- 【】\
-- 【】\
\
\
\
\
  \
#ELSESAY
    \
\
-- 【】\
-- 【】\
\
\
\
0 \
  \










[@InPutInteger82]
#IF
HAVEGUILD
#ACT
GOTO @加载行会变量
#ELSEACT
messagebox 你没有行会,不能进行行会捐献！
BREAK
#IF
SMALL N82 $(捐献最低金额)
#ACT
messagebox 请输入$(捐献最低金额)~$(捐献最高金额)元宝以内的金额！
BREAK
#IF
LARGE N82 $(捐献最高金额)
#ACT
messagebox 请输入$(捐献最低金额)~$(捐献最高金额)元宝以内的金额！
BREAK
#IF
CHECKLEVELEX > 0
#ACT
MOV P61
INC P61
#IF
LARGE P61 0
#ELSEACT
messagebox 你当前所捐献的金额,累计到你们行会总额里后超出系统上限,请重新输入！\(最高累计金额21.47亿)
BREAK




#IF
CHECKGAMEGOLD <
#ACT
messagebox 你没有元宝,拿什么捐献？
BREAK
#ELSEACT
gamegold -
CALCVAR GUILD HHJX-行会捐献金额 +
SAVEVAR GUILD HHJX-行会捐献金额 ..\QuestDiary\子木脚本库\行会捐献系统\行会捐献数据.txt
GuildNoticeMsg 254 0 【行会捐献提示】：[]为他的行会[]
GuildNoticeMsg 254 0 　　　　　　　　　捐献了[]元宝！
GuildNoticeMsg 254 0 　　　　　　　　　其他本行会成员,也来出点力吧！
GOTO @开始行会排名
GOTO @行会捐献系统















[@开始行会排名]
#IF
CHECKLEVELEX > 0
#ACT
SortHumVarToListEx HHJX-行会捐献金额 ..\QuestDiary\子木脚本库\行会捐献系统\行会捐献数据.txt 1 ..\QuestDiary\子木脚本库\行会捐献系统\行会捐献排名.txt 1
AddTextList ..\QuestDiary\子木脚本库\行会捐献系统\行会捐献排名.txt 　:0
AddTextList ..\QuestDiary\子木脚本库\行会捐献系统\行会捐献排名.txt 　:0
#IF
CHECKLEVELEX > 0
#ACT
GetListString ..\QuestDiary\子木脚本库\行会捐献系统\行会捐献排名.txt 0 s90 N90
#IF
LARGE N90 0
#ACT
CALCVAR GLOBAL HHJX-行会捐献第1名 =
SAVEVAR GLOBAL HHJX-行会捐献第1名 ..\QuestDiary\子木脚本库\行会捐献系统\行会捐献数据.txt
CALCVAR GLOBAL HHJX-行会捐献第1数 =
SAVEVAR GLOBAL HHJX-行会捐献第1数 ..\QuestDiary\子木脚本库\行会捐献系统\行会捐献数据.txt
#IF
CHECKLEVELEX > 0
#ACT
GetListString ..\QuestDiary\子木脚本库\行会捐献系统\行会捐献排名.txt 1 s90 N90
#IF
LARGE N90 0
#ACT
CALCVAR GLOBAL HHJX-行会捐献第2名 =
SAVEVAR GLOBAL HHJX-行会捐献第2名 ..\QuestDiary\子木脚本库\行会捐献系统\行会捐献数据.txt
CALCVAR GLOBAL HHJX-行会捐献第2数 =
SAVEVAR GLOBAL HHJX-行会捐献第2数 ..\QuestDiary\子木脚本库\行会捐献系统\行会捐献数据.txt

#IF
CHECKVAR GLOBAL HHJX-上次排名第1名 =
#ELSEACT
GuildNoticeMsg 250 0 【行会捐献排名提示】:[]行会晋升到第1名
GuildNoticeMsg 250 0 　　　　　　　　　　:[]本行会所有成员HP+$(捐献排名1属性)攻魔道+$(捐献排名3属性)

#IF
CHECKVAR GLOBAL HHJX-上次排名第2名 =
#ACT
BREAK

#IF
CHECKVAR GLOBAL HHJX-上次排名第1名 =
#ACT
GuildNoticeMsg 248 0 【行会捐献排名提示】:[]行会降级到第2名
GuildNoticeMsg 248 0 　　　　　　　　　　:[]本行会所有成员HP+$(捐献排名2属性)攻魔道+$(捐献排名4属性)
#ELSEACT
GuildNoticeMsg 242 0 【行会捐献排名提示】:[]行会晋升到第2名
GuildNoticeMsg 242 0 　　　　　　　　　　:[]本行会所有成员HP+$(捐献排名2属性)攻魔道+$(捐献排名4属性)

#IF
CHECKLEVELEX > 0
#ACT
GMEXECUTE 开始提问 @行会捐献属性刷新
CALCVAR GLOBAL HHJX-上次排名第1名 =
CALCVAR GLOBAL HHJX-上次排名第2名 =

[@加载行会变量]
#IF
CheckTextList ..\QuestDiary\子木脚本库\行会捐献系统\行会变量加载名单.txt
#ACT
BREAK
#if
CHECKLEVELEX > 0
#act
#CALL [\子木脚本库\行会捐献系统\行会捐献数据QM触发.txt] @开始加载行会变量

[@查看行会附加属性]
#ACT
messagebox 捐献第一名行会成员HP+$(捐献排名1属性)攻魔道+$(捐献排名3属性)\捐献第二名行会成员HP+$(捐献排名2属性)攻魔道+$(捐献排名4属性)\（附加属性随着排名高低实时增加减少）


来源：网络
免责声明：如果侵犯了您的权益，请联系站长，我们会及时删除侵权内容，谢谢合作！