传奇行会招募牌脚本行会自动收人

(@@InPutString@@InPutInteger)
[@main]

<行会名称，/SCOLOR=154><$STR(A109)>\
<竞标时间，/SCOLOR=154><$STR(A110)>\
<行会掌门，/SCOLOR=154><$STR(A121)>\
<行会公告，/SCOLOR=154><$STR(A119)>\
<，，，，，，，，，，，，，，，，，，，，，，，，，，，，，/SCOLOR=69>\
<本行会现在公开向全服招贤纳士，欢迎各路英雄豪杰加入到本行会/SCOLOR=250>\
<，/AUTOCOLOR=25425116819125070245249253>[<加入该行会/@加入>]<，/AUTOCOLOR=25425116819125070245249253>低等级要求为<$STR(G108)>级\
<，，，，，，，，，，，，，，，，，，，，，，，，，，，，，/SCOLOR=69>\
寧<我要竞标/@我也要竞标>][<管理选项/@竞标台管理>]

[@我也要竞标]
说明，
<土城天下一号行会可以代替掌门招收会员/SCOLOR=125>\
<竞标方式:采用元宝竞标，只要你给出的价格高于上一个行会的竞/SCOLOR=125>\
<标价格，你的行会就可以中标，直到下一位竞争对手出现./SCOLOR=125>\
<┏，，，，，，，，，，，，，，，，，，，，，，，，，，，┓/SCOLOR=250>\
<当前竞标行会:/SCOLOR=154><$STR(A109)><竞标价格:/SCOLOR=154><$STR(G107)><元宝/SCOLOR=154>\
<竞标时间:/SCOLOR=154><$STR(A110)>\
<┗，，，，，，，，，，，，，，，，，，，，，，，，，，，┛/SCOLOR=250>\
寧<我要竞标/@竞标开始>]<，只有行会掌门人才可以参与竞标>[<返回首页/@main>]


[@竞标开始]
#if
ISGUILDMASTER
#act
goto@竞标开始2
#elseact
messagebox对不起，你不是行会掌门
[@竞标开始2]
#if
equala109<$GUILDNAME>
#act
messagebox错误，你所在的行会已经是中标行会！
break
#elsesay
峧\
，<当前竞标价格:/SCOLOR=154><$STR(G107)><元宝/SCOLOR=154>\\
\
，<输入竞标价格/@@InPutInteger70><(只能为整数)>\\
，<返回/@行会服务>


[@InPutInteger70]
#if
largen70<$STR(G107)>
#act
goto@竞标3
#elseact
messagebox对不起，你的出价太低！

[@竞标3]
#if
CHECKGAMEGOLD<<$STR(n70)>
#act
messagebox对不起，你没有那么多元宝！
#elsesay
你给出的价格为<$STR(n70)>元宝请填写完整以下信息：\\
，<输入招收会员的低等级要求/@@InPutInteger71><(10-100)/SCOLOR=253>\
，<输入一段简短公告/@@InPutString11><(在石板上显示)/SCOLOR=253>\
<[公告]/SCOLOR=250><$STR(s11)>\\

，<提交信息/@竞标4>

[@InPutInteger71]
#if
largen7110
smalln71100
#act
messagebox设定成功，加入你的行会的低等级要求是<$STR(n71)>级！
#elseact
messagebox请输入一个10－100间的整数！
goto@竞标3

[@InPutString11]
#act
goto@竞标3

[@竞标4]
#If
smalln7110
#act
messagebox请设定招收会员的低等级要求！
goto@竞标3
#elsesay
<以下是你的大部分信息，前往确定提交信息：/SCOLOR=250>\
<行会名称：/SCOLOR=154><$GUILDNAME>\
<行会掌门：/SCOLOR=154><$USERNAME>\
<竞标价格：/SCOLOR=154><$STR(n70)>元宝\
<竞标时间：/SCOLOR=154><$DATETIME>\
<加入该行会的低等级要求是：/SCOLOR=154><$STR(n71)>级\
<公告内容：/SCOLOR=154><$STR(s11)>\\

，[<确定提交信息/@竞标5>][<返回重新填写/@竞标开始>]


[@竞标5]
#if
CHECKGAMEGOLD><$STR(n70)>
largen70<$STR(G107)>
#act
GAMEGOLD-<$STR(n70)>
mova109<$GUILDNAME>
movg107<$STR(n70)>
mova110<$DATETIME>
movg108<$STR(n71)>
mova119<$STR(s11)>
mova121<$USERNAME>
movg1090
movg1100
SENDMSG0[系统]<$USERNAME>为自己的行会竞标成功，从此风云传奇里又多了一个牛的行会！
close
#elseact
SENDMSG7[超时]
goto@main


[@加入]
#if
equala109暂无
#act
SENDMSG6[非法操作]
goto@main
break
#if
equalg1091
#act
messagebox对不起，本行会暂时不收人
break
#IF
HAVEGUILD
#ACT
MESSAGEBOX[失败]:您已经有行会了。无法申请!\请先退出你当前的行会！
break
#if
CHECKLEVELEX<<$STR(g108)>
#act
messagebox等级不够！
break
#if
#act
AddGuildMember<$STR(A109)><$USERNAME>
messagebox恭喜你已经成功加入到<$STR(A109)>


[@竞标台管理]
#if
ISGUILDMASTER
equala109<$GUILDNAME>
#act
goto@竞标台管理2
#elseact
SENDMSG5[只有本行会掌门才可以进行管理]
goto@main

[@竞标台管理2]
#if
equalg1090
#act
movs1<开启/SCOLOR=250>
#if
equalg1091
#act
movs1<关闭>
#if
equalg1100
#act
movs2<允许/SCOLOR=250>
#if
equalg1101
#act
movs2<禁止>
#if
#say
峧
，<修改公告内容/@@InPutString11>当前公告内容:<$STR(A119)>\
，<修改等级要求/@@InPutInteger71>当前等级要求:<$STR(G108)>级\\
，<行会收人状态/SCOLOR=254>当前状态为：<$STR(s1)>[<更改/@gg1>]\\
，<返回/@main>


[@gg1]
#if
equalg1090
#act
movg1091
messagebox行会收人状态，关闭
goto@竞标台管理
break
#if
equalg1091
#act
movg1090
messagebox行会收人状态，开放
goto@竞标台管理
break



[@InPutInteger71]
#if
largen7110
smalln71100
#act
movg108<$STR(n71)>
messagebox设定成功，加入你的行会的低等级要求是<$STR(n71)>级！
goto@竞标台管理
#elseact
messagebox请输入一个10－100间的整数！
goto@竞标台管理

[@InPutString11]
#if
equals11
#act
messagebox非法字符
#elseact
mova119<$STR(s11)>
messagebox修改成功
goto@竞标台管理



[@沙拿大奖]
　　　　</AUTOCOLOR=525025219115070245249253><抢沙拿大奖/@></AUTOCOLOR=525025219115070245249253>\\
<首次攻沙>:定在开区第2天晚上20点整，大部分会集体抢沙，无须\
交头像！首任沙城主奖<元宝300000个/SCOLOR=254>！合区后天天攻沙，\
城主给予<元宝50000个/SCOLOR=253>，沙城员给予<元宝1000个/SCOLOR=253>\
<领领时间>:<攻城结束后/@>在皇宫内的沙巴克领领使者领取\
<行会老大切记别把掌门乱授他人，否则引起篡位领不到给予后果自负/SCOLOR=250>\\
　　　　　　　　　　　<知道了，3Q，/@exit>\