500pi-GOM公会升级脚本素材

传奇素材脚本 · 发表于 2017-12-16 12:07:18

500pi欢迎广大传奇爱好者提供相关资源、本站力争成为最公益的素材脚本交流站

===========================================================

资源下载：

文件名称:500pi-GOM公会升级脚本素材.zip
下载次数:81 文件大小:21.28 KB 售价:25金钱 [记录]
下载权限: 不限以上或 VIP会员优惠购买 [购买VIP] [充值金币] [发素材赚金币]

安全检测，请放心下载

===========================================================

资源演示：
500pi-GOM公会升级脚本素材9044 作者:传奇素材脚本帖子ID:2919

[@main]
#if
#act
mov A100 <$STR(A220)>
mov A101 <$STR(A221)>
mov A102 <$STR(A222)>
mov A103 <$STR(A223)>
mov A104 <$STR(A224)>
mov A225 <$STR(G220)>个
mov A226 <$STR(G221)>个
mov A227 <$STR(G222)>个
mov A228 <$STR(G223)>个
mov A229 <$STR(G224)>个
SetStringBlank <$STR(A100)> 15 1
SetStringBlank <$STR(A101)> 15 1
SetStringBlank <$STR(A102)> 15 1
SetStringBlank <$STR(A103)> 15 1
SetStringBlank <$STR(A104)> 15 1
SetStringBlank <$STR(A225)> 10 1
SetStringBlank <$STR(A226)> 10 1
SetStringBlank <$STR(A227)> 10 1
SetStringBlank <$STR(A228)> 10 1
SetStringBlank <$STR(A229)> 10 1

GetUserItemName 12 52
SetStringBlank S40 14 0
#say
\  \
<行会捐献排名/SCOLOR=253>  <我要为行会做贡献/@@InPutInteger50> <查看行会附加属性/@查看>\
<--------------------------------------------------------------/SCOLOR=143>\
<行会排名第一名/SCOLOR=254><$STR(A100)> <共捐献元宝/SCOLOR=245>[<$STR(A225)>]\
<行会排名第二名/SCOLOR=254><$STR(A101)> <共捐献元宝/SCOLOR=245>[<$STR(A226)>]\
<行会排名第三名/SCOLOR=254><$STR(A102)> <共捐献元宝/SCOLOR=245>[<$STR(A227)>]\
<--------------------------------------------------------------/SCOLOR=143>\
<提示:当行会有排名,全会成员都将受到属性加成!/SCOLOR=222>\
<合区后排名将会刷新,/SCOLOR=222><“所有人都可以为自己行会捐献”/SCOLOR=249>\
<你目前行会累计捐献为/SCOLOR=245><$GUILD(zgyb)><元宝/SCOLOR=245>\
<最底捐献：10000元宝最高捐献10000000元宝/SCOLOR=242>\

[@查看]
行会全体总和捐献1000000元宝  三级公会增加200血 10-10攻击\
行会全体总和捐献5000000元宝  二级公会增加500血 30-30攻击\
行会全体总和捐献10000000元宝一级公会  增加700血 70-70攻击\

[@InPutInteger50]
#If
CheckLevelEx > 0
#Act
DelayCALL 1 ~InPutInteger50
[~InPutInteger50]
#IF
HAVEGUILD
LARGE N50 9999
CHECKGAMEGOLD > N50 > 9999
#ACT
MOV S10 <$GUILDNAME>
CALCVAR GUILD zgyb + <$STR(N50)>
SAVEVAR GUILD zgyb ..\QuestDiary\行会排名\行会排名Save.txt
GAMEGOLD - <$STR(N50)>
Delaygoto 100 @捐赠排名
MESSAGEBOX [捐赠信息]：\?\捐赠成功，你本次捐增了<$STR(N50)>元宝!\您对[<$GUILDNAME>]共捐赠了<$GUILD(zgyb)>元宝!\感谢您对本服大力支持，您现在可以享受俸禄待遇了!
BREAK
#ELSEACT
MESSAGEBOX [捐赠失败]：你没元宝或者输入有误,元宝捐赠最少10000元宝起步！
MOV N50 0
DelayCall 10 @MAIN
BREAK

[@捐赠排名]
#IF
LARGE <$GUILD(zgyb)> <$STR(G220)>
#ACT
GOTO @BAOCUN
SENDMSG 7  感谢您对本服的支持,目前<$GUILD(zgyb)>排名第一,小退后获得属性！
goto @main
#ELSEACT
GOTO @捐赠排名1
BREAK

[@捐赠排名1]
#IF
LARGE <$GUILD(zgyb)> <$STR(G221)>
#ACT
GOTO @BAOCUN1

SENDMSG 7  感谢您对本服的支持,目前<$GUILD(zgyb)>排名第二,小退后获得属性！
goto @main
#ELSEACT
GOTO @捐赠排名2
BREAK

[@捐赠排名2]
#IF
LARGE <$GUILD(zgyb)> <$STR(G222)>
#ACT
GOTO @BAOCUN2

SENDMSG 7  感谢您对本服的支持,目前<$GUILD(zgyb)>排名第三,小退后获得属性！
goto @main
#ELSEACT
GOTO @捐赠排名3
BREAK

[@捐赠排名3]
#IF
LARGE <$GUILD(zgyb)> <$STR(G223)>
#ACT
GOTO @BAOCUN3

SENDMSG 7  感谢您对本服的支持,目前<$GUILD(zgyb)>排名第四,小退后获得属性！
goto @main
#ELSEACT
GOTO @捐赠排名4
BREAK

[@捐赠排名4]
#IF
LARGE <$GUILD(zgyb)> <$STR(G224)>
#ACT
GOTO @BAOCUN4

SENDMSG 7  感谢您对本服的支持,目前<$GUILD(zgyb)>排名第五,小退后获得属性！
goto @main
BREAK

#if
Large <$GUILD(zgyb)> 9999
#act

SENDMSG 7 [提示]：您元宝捐款成功
BREAK

[@BAOCUN]
#IF
EQUAL A220 <$GUILDNAME>
#ACT
MOV A220 <$GUILDNAME>
MOV G220 <$GUILD(zgyb)>
BREAK
#IF
EQUAL A221 <$GUILDNAME>
#ACT
MOV A221 <$STR(A220)>
MOV G221 <$STR(G220)>
MOV A220 <$GUILDNAME>
MOV G220 <$GUILD(zgyb)>
BREAK
#IF
EQUAL A222 <$GUILDNAME>
#ACT
MOV A222 <$STR(A221)>
MOV G222 <$STR(G221)>
MOV A221 <$STR(A220)>
MOV G221 <$STR(G220)>
MOV A220 <$GUILDNAME>
MOV G220 <$GUILD(zgyb)>

===========================================================

【注：帖子中的资源只显示了部分-如需完整资源请下载附件】