herom2引擎行会自助招人脚本

完备复制以下剧本到服务端中即可，无其它联系关系剧本，可正常使用。

(@@InPutString @@InPutInteger)
[@main]
<★━━━━★/SCOLOR=250>　　━━━ 行会【<$$STR(A30)>】自助招人体系 ━━━\
<┃/SCOLOR=250>行 <■/AUTOCOLOR=254,250,253,241> 竞<┃/SCOLOR=250>　　<参加该行会的最低级别要求是：/AUTOCOLOR=249><$$STR(G108)>级以上\
<┃/SCOLOR=250> <■/AUTOCOLOR=250,251,241,254>板<■/AUTOCOLOR=241,250,253,254> <┃/SCOLOR=250> 　　[<参加行会/@jrxh>]　[<加入竞价/@cyjj>]　[<治理选项/@竞标台治理>]\
<┃/SCOLOR=250>会 <■/AUTOCOLOR=250,253,254,241> 价<┃/SCOLOR=250>　　\
<★━━━━★/SCOLOR=250>　　━━━━━━━━━━━━━━━━━━━━━━━\
\　　　　　　　　　　<【行会名称】/SCOLOR=154>：【<$$STR(A30)>】<行会掌门：/SCOLOR=154>【<$$STR(A31)>】\
\　　　　　　　　　　<【竞标价钱】/SCOLOR=154>：【<$$STR(G88)>】\
\　　　　　　　　　　<【掌门致辞】/SCOLOR=154>：【<$$STR(A5)>】\
\　　　　　　　　　　<【行会奖励】/SCOLOR=154>：【<领取1.2倍神力属性/@领取1.2倍神力属性>】\
<您付出比今朝竞价多500个元宝，即可让你建的行会成为[世界第一行会]/AUTOCOLOR=250,253,254,241>\
<竞标第一行会的全部成员可以免费领取1.2倍神力属性！/SCOLOR=254>\
<竞标第一行会的全部成员可以免费领取1.2倍神力属性！/SCOLOR=254>\
<竞标第一行会的全部成员可以免费领取1.2倍神力属性！/SCOLOR=254>\
<竞标第一行会的全部成员可以免费领取1.2倍神力属性！/SCOLOR=254>\
<竞标第一行会的全部成员可以免费领取1.2倍神力属性！/SCOLOR=254>\

[@领取1.2倍神力属性]
#IF
CheckGuildMember <$$STR(A30)>
#ACT
#SAY
{尊重的【<$$STR(A30)>】成员您好！你可以免费享受1.2倍神力属性！/SCOLOR=254}\
<每次领取可以连续享受1小时，时候到后必需来此从新领取！/SCOLOR=253>\
<殒命或者下线后神力消散，也必需来此从新领取！/SCOLOR=250>\
　\
<领取1.2倍神力属性/@领取1.2倍神力属性2>
#elseSAY
对不起，您还不是<$$STR(A30)>成员，不克不及领取1.2倍神力属性！\

[@领取1.2倍神力属性2]
#IF
#ACT
POWERRATE 120 3600
SendMsg 7 恭喜您得到1.2倍神力属性！

[@cyjj]
#IF
HAVEGUILD
ISGUILDMASTER
CHECKGAMEGOLD > <$$STR(G88)>
#ACT
INC G88 500
GAMEGOLD - <$$STR(G88)>
mov A30 <$$GUILDNAME>
mov A31 <$$USERNAME>
set [198] 1
Messagebox [胜利]：您在行会竞价板上花了【<$$STR(G88)>】个元宝竞得。
SENDMSG 0 【<$$USERNAME>】在行会竞价板为行会【<$$STR(A30)>】竞得，年夜家从速来参加这个有实力的行会吧!
SENDMSG 0 【<$$USERNAME>】在行会竞价板为行会【<$$STR(A30)>】竞得，年夜家从速来参加这个有实力的行会吧!
SENDMSG 0 【<$$USERNAME>】在行会竞价板为行会【<$$STR(A30)>】竞得，年夜家从速来参加这个有实力的行会吧!
SENDMSG 0 【<$$USERNAME>】在行会竞价板为行会【<$$STR(A30)>】竞得，年夜家从速来参加这个有实力的行会吧!
SENDMSG 0 【<$$USERNAME>】在行会竞价板为行会【<$$STR(A30)>】竞得，年夜家从速来参加这个有实力的行会吧!
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 A30 <$$GUILDNAME>
#ACT
Messagebox [失败]：您如今已经是【<$$STR(A30)>】的行会成员了！！
break
#ELSEACT
goto @jrxh3

[@jrxh3]
#IF
HAVEGUILD
#ACT
Gmexecute 退出行会
DELAYGOTO 3 @jrxh4
#ELSEACT
goto @jrxh4

[@jrxh4]
#IF
equal A30
#ACT
Messagebox [失败]：如今还没行会竟价钱
#ELSEACT
AddGuildMember <$$STR(A30)>
set [198] 1
SENDMSG 0 恭喜【<$$USERNAME>】经由过程【世界第一行会】NPC参加了行会【<$$STR(A30)>】
SENDMSG 0 恭喜【<$$USERNAME>】经由过程【世界第一行会】NPC参加了行会【<$$STR(A30)>】
SENDMSG 0 恭喜【<$$USERNAME>】经由过程【世界第一行会】NPC参加了行会【<$$STR(A30)>】
SENDMSG 0 恭喜【<$$USERNAME>】经由过程【世界第一行会】NPC参加了行会【<$$STR(A30)>】
SENDMSG 0 恭喜【<$$USERNAME>】经由过程【世界第一行会】NPC参加了行会【<$$STR(A30)>】
break

[@竞标台治理]
#if
ISGUILDMASTER
equal A30 <$$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
\
→<改动通知布告内容/@@InPutString5> 当前通知布告内容:<$$STR(S5)>\
→<改动级别要求/@@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

[@CallInPutInteger71]
#if
large n71 100
small n71 301
#act
mov g108 <$$STR(n71)>
messagebox 设定胜利，参加你的行会的最低级别要求是<$$STR(n71)>级！
goto @竞标台治理
#elseact
messagebox 【差错提醒】:\　\　　　　　　㈠　请输入一个100－300间的整数！\　\　　　　　　㈡　请输入数字，勿输入其它字符！
goto @竞标台治理

[@CallInPutString5]
#if
#act
mov A5 <$$STR(S5)>
messagebox 改动胜利，通知布告内容为<$$STR(S5)>！
goto @竞标台治理
#elseact
messagebox 【差错提醒】:非法字符，请输入一段文本，勿输入其它字符！
goto @竞标台治理