GOM引擎天下第一会脚本，传奇版本库添加行会自助收人教程。

[@main]

#IF

#ACT

CLOSEMERCHANTBIGDLG

#SAY

<━━━━/SCOLOR=250>　 ━━ 行会【<$STR(A95)>】自助招人系统 ━━\

<┃/SCOLOR=250>行 <■/AUTOCOLOR=254,250,253,241> 竞<┃/SCOLOR=250>\

<┃/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>　 <加入该行会的最低等级要求是：/AUTOCOLOR=249><$STR(g71)>级以上\

<━━━━/SCOLOR=250>　 ━━━━━━━━━━━━━━━━━━━━━\

<【行会名称】/SCOLOR=154>：<$STR(A95)>　　　　　<行会掌门：/SCOLOR=154><$STR(A81)>\

<【竞标价格】/SCOLOR=154>：<$STR(G107)>　　　　　 <收人状态：/SCOLOR=154><$STR(A85)>\

<您支付比目前竞价多1000个元宝，即可让你建的行会成为[天下第一行会]/AUTOCOLOR=250,253,254,241>\

#IF

ISADMIN

#act

#say

<GM清空数据/@qingshuju1>\

[@qingshuju1]

#IF

ISADMIN

#act

mov A95

mov A81

mov G107

mov A85

mov G71

messagebox 行会已经清除!\

[@cyjj]

#IF

HAVEGUILD

ISGUILDMASTER

CHECKGAMEGOLD > <$STR(G107)>

#ACT

INC G107 1000

GAMEGOLD – <$STR(G107)>

mov A95 <$GUILDNAME>

mov A81 <$USERNAME>

Messagebox [成功]：您在行会竞价板上花了【<$STR(G107)>】个元宝竞得。

SendCenterMsg 250 0 【<$USERNAME>】在行会竞价板为行会【<$STR(A95)>】竞得，大家赶快来加入这个有实力的行会吧!

GuildNoticeMsg 250 0 【<$USERNAME>】在行会竞价板为行会【<$STR(A95)>】竞得，大家赶快来加入这个有实力的行会吧!

GuildNoticeMsg 250 0 【<$USERNAME>】在行会竞价板为行会【<$STR(A95)>】竞得，大家赶快来加入这个有实力的行会吧!

GuildNoticeMsg 250 0 【<$USERNAME>】在行会竞价板为行会【<$STR(A95)>】竞得，大家赶快来加入这个有实力的行会吧!

GOTO @main

BREAK

#ELSEACT

Messagebox [失败]：您的元宝不足或者您没有行会

[@jrxh]

#if

equal G109 1

#act

messagebox 对不起，本行会暂时不收人

break

#if

CHECKLEVELEX < <$STR(g71)>

#act

messagebox 等级不够！对方行会掌门设置了【<$STR(G71)>】级才可以加入！

break

#IF

ISGUILDMASTER

#ACT

Messagebox [失败]：您现在是行会掌门不能在加入其他行会！！

break

#IF

equal A95 <$GUILDNAME>

#ACT

Messagebox [失败]：您现在已经是【<$STR(A95)>】的行会成员了！！

break

#ELSEACT

goto @jrxh3

[@jrxh3]

#IF

HAVEGUILD

#ACT

Gmexecute 退出门派

DELAYGOTO 3 @jrxh4

#ELSEACT

goto @jrxh4

[@jrxh4]

#IF

equal A95

#ACT

Messagebox [失败]：现在还没行会竟价格

#ELSEACT

AddGuildMember <$STR(A95)>

SendCenterMsg 250 0 恭喜【<$USERNAME>】通过【天下第一行会】NPC加入了行会【<$STR(A95)>】

GuildNoticeMsg 250 0 恭喜【<$USERNAME>】通过【天下第一行会】NPC加入了行会【<$STR(A95)>】

GuildNoticeMsg 250 0 恭喜【<$USERNAME>】通过【天下第一行会】NPC加入了行会【<$STR(A95)>】

GuildNoticeMsg 250 0 恭喜【<$USERNAME>】通过【天下第一行会】NPC加入了行会【<$STR(A95)>】

break

[@竞标台管理]

#if

ISGUILDMASTER

equal A95 <$GUILDNAME>

#act

goto @竞标台管理2

#elseact

SENDMSG 7 [只有本行会掌门才可以进行管理]

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

?\

→<行会收人状态/SCOLOR=254>  当前状态为：<$STR(s1)>  [<更改/@gg1>]\ \

→<返回/@main>

[@gg1]

#if

equal g109 0

#act

mov g109 1

messagebox 行会收人状态→关闭

mov S10 关闭

mov A85 <$STR(S10)>

goto @竞标台管理

break

#if

equal g109 1

#act

mov g109 0

messagebox 行会收人状态→开放

mov S10 开放

mov A85 <$STR(S10)>

goto @竞标台管理

break

[@InPutInteger71]

#if

LARGE n71 120

#act

messagebox 修改等级要求不得大于120级!

BREAK

#if

#act

mov g71 <$STR(n71)>

goto @竞标台管理

messagebox 修改等级要求成功！

break