2024-05-07
(@storage @getback )
%100
[@main]
#IF
#ACT
OPENMERCHANTBIGDLG 7 800 0 0 0 0 0
#say
<Img:801:7:360:-12/@EXIT><Img:802:7:-38:16>
<天下一号会/AUTOCOLOR=253>:<$STR(A498)> <行会自助招人/AUTOCOLOR=250>
<您支付比目前竞价多10000个元宝,即可让你行会成为天下一号会./AUTOCOLOR=249>
<一号行会大部分成员攻魔道+10. HP+100---每日0点刷新/AUTOCOLOR=249>
<【行会名称】/AUTOCOLOR=250>：<$STR(A498)> <【收人状态】/AUTOCOLOR=250>：<$STR(A496)>
<【行会掌门】/AUTOCOLOR=250>：<$STR(A497)> <【竞标价格】/AUTOCOLOR=250>：<$STR(G131)>
<加入行会/@jrxh> <参加竞价/@cyjj> <管理选项/@竞标台管理>
[@cyjj]
#IF
HAVEGUILD
ISGUILDMASTER
CHECKGAMEGOLD > <$STR(G131)>
checkgamegold > 9999
#ACT
INC G131 10000
GAMEGOLD - <$STR(G131)>
mov A498 <$GUILDNAME>
mov A497 <$USERNAME>
CLEARNAMELIST ..QuestDiary数据文件行会竞价得主.txt
addGUILDLIST ..QuestDiary数据文件行会竞价得主.txt
Messagebox [成功]：您在行会竞价板上花了【<$STR(G131)>】个元宝竞得。
GuildNoticeMsg 241 161 【<$USERNAME>】在竞价板为行会【<$STR(A498)>】竞得，大家赶快来加入这个有实力的行会吧!
GOTO @Main
BREAK
#ELSEACT
Messagebox [失败]：您的元宝不足或者您没有行会
[@jrxh]
#if
equal G109 1
#act
messagebox 对不起，本行会暂时不收人
break
#if
CHECKLEVELEX < <$STR(G108)>
#act
messagebox 等级不够！
break
#IF
ISGUILDMASTER
#ACT
Messagebox [失败]：您现在是行会掌门不能在加入其他行会！！
break
#IF
equal A498 <$GUILDNAME>
#ACT
Messagebox [失败]：您现在已经是【<$STR(A498)>】的行会成员了！！
break
#ELSEACT
goto @jrxh3
[@jrxh3]
#IF
HAVEGUILD
#ACT
Messagebox [失败]：你已经有行会了，请先出退行会！
#ELSEACT
goto @jrxh4
[@jrxh4]
#IF
equal A498
#ACT
Messagebox [失败]：现在还没行会竟价格
#ELSEACT
AddGuildMember <$STR(A498)>
GuildNoticeMsg 70 161 恭喜【<$USERNAME>】通过【天下一号行会】NPC加入了行会【<$STR(A498)>】
break
[@竞标台管理]
#if
ISGUILDMASTER
equal A498 <$GUILDNAME>
#act
goto @竞标台管理2
#elseact
SENDMSG 7 [你不是一号行会的掌门人,无法管理]
goto @Main
[@竞标台管理2]
#if
equal g109 0
#act
mov S11 <开启/SCOLOR=250>
#if
equal g109 1
#act
mov S11 <关闭>
#if
equal g110 0
#act
mov S12 <允许/SCOLOR=250>
#if
equal g110 1
#act
mov S12 <禁止>
#if
#say
?
→<行会收人状态/SCOLOR=254> 当前状态为：<$STR(S11)> [<更改/@gg1>]
→<返回/@Main>
[@gg1]
#if
equal g109 0
#act
mov g109 1
messagebox 行会收人状态→关闭
mov A496 关闭
goto @竞标台管理
break
#if
equal g109 1
#act
mov g109 0
messagebox 行会收人状态→开放
mov A496 开放
goto @竞标台管理
break
[@InPutString5]
#if
#act
mov S5 <$STR(S5)>
goto @竞标台管理
messagebox 你已修改公告内容！
break
[@InPutInteger71]
#if
#act
goto @竞标台管理
messagebox 修改等级要求成功！
break
上一篇:
传奇火力系统脚本，打怪每刀增加1点攻击力，每100刀攻速*1倍
下一篇:
传奇服务端武器附魔脚本，基础攻魔道加10点 全属性提升3% 全元素
