传奇脚本：行会招募-3

一一素材

(@@InPutString @@InPutInteger )
[@main]
<【行会名称】/SCOLOR=154><$STR(A109)>\
<【竞标时间】/SCOLOR=154><$STR(A110)>\
<【行会掌门】/SCOLOR=154><$STR(A121)>\
<【行会公告】/SCOLOR=154><$STR(A119)>\
<━━━━━━━━━━━━━━━━━━━━━━━━━━━━━/SCOLOR=69>\
<本行会现在公开向全服招贤纳士，欢迎各路英雄豪杰加入到本行会/SCOLOR=250>\
<→/AUTOCOLOR=254,251,168,191,250,70,245,249,253>[<加入该行会/@加入>]<←/AUTOCOLOR=254,251,168,191,250,70,245,249,253>最低等级要求为<$STR(G108)>级\
<━━━━━━━━━━━━━━━━━━━━━━━━━━━━━/SCOLOR=69>\
[<我要竞标/@我也要竞标>]                            [<管理选项/@竞标台管理>]

[@我也要竞标]
<请在边上的竞标员处选择竞标！！/SCOLOR=250>

[@加入]
#if
equal A109
#act
SENDMSG 6 [对不起,暂时还没有行会在此竞标呢.....]
goto @main
break
#if
equal g109 1
#act
messagebox 对不起，本行会暂时不收人
break
#IF
HAVEGUILD
#ACT
MESSAGEBOX [失败]:您已经有行会了。无法申请!\请先退出你当前的行会！
break
#if
CHECKLEVELEX < <$STR(g108)>
#act
messagebox 等级不够！
break
#if
#act
AddGuildMember <$STR(A109)> <$USERNAME>
messagebox 恭喜你已经成功加入到<$STR(A109)>
goto @main

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

[@竞标台管理2]
#if
equal g109 0
#act
mov s1 <开启/SCOLOR=250>
#if
equal g109 1
#act
mov s1 <关闭>
#if
equal g110 0
#act
mov s2 <允许/SCOLOR=250>
#if
equal g110 1
#act
mov s2 <禁止>
#if
#say
\
→<修改公告内容/@@InPutString11>  当前公告内容:<$STR(A119)>\
→<修改等级要求/@@InPutInteger71>  当前等级要求:<$STR(G108)>级\ \
→<行会收人状态/SCOLOR=254>  当前状态为：<$STR(s1)>  [<更改/@gg1>]\ \
→<返回/@main>

[@gg1]
#if
equal g109 0
#act
mov g109 1
messagebox 行会收人状态→关闭
goto @竞标台管理
break
#if
equal g109 1
#act
mov g109 0
messagebox 行会收人状态→开放
goto @竞标台管理
break

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

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