行会自动招人,行会自助收人脚本
在100%仿盛大传奇中行会是每个玩家都要加入的，只有加入了行会才能参加沙巴克的攻城战，传统的行会收人是要行会老大手动打字才能成功入会的，不仅速度慢，而且还必须要行会老大在线的时候才能入会，效率很低下。为此我们特意编写了这套能够自动24小时收人的脚本，玩家只要点击NPC即可自动加入行会，方便快捷，是新区里行会快速发展的好帮手，现在就把脚本免费分享给大家。
为了方便大家此脚本还特意设置了招人的开关，当不想招人的时候可以随时关闭招人，非常人性化，以下是是脚本。
行会自动招人系统
(@@InPutString)
[@MAIN]
< ━━━━━━━━行会自助※招人系统━━━━━━━/FCOLOR=180>\ \
\ <①行会/FCOLOR=249>【<$STR(A31)>】<$STR(A5)>，<加入此行会/@加入1号>\
\ <②行会/FCOLOR=253>【<$STR(A32)>】<$STR(A7)>，<加入此行会/@加入2号>\ \
①行会价位<$STR(G30)>元宝，<[每次加价]：1千元宝/FCOLOR=249> <竞价发布/@发布1号> <开关设置/@1号开关> \
②行会价位<$STR(G29)>元宝，<[每次加价]：1千元宝/FCOLOR=249> <竞价发布/@发布2号> <开关设置/@2号开关> \ \
<官方网站：/FCOLOR=222><www.nnbbk.com/FCOLOR=253> <[仿盛大传奇 打造经典百区服]/FCOLOR=254>\
[@2号开关]
#IF
ISGUILDMASTER
#ACT
GOTO @设置2号开关
#ELSEACT
MESSAGEBOX [失败]:你不是会长，无法设置！
[@设置2号开关]
#IF
CHECKGUILDLIST ..\QuestDiary\游戏服务\2行会竞价名单.txt
#SAY
提示：关闭行会招人后别人就无法通过NPC加入本行会了\
当前你的行会自动招人开关状态为：<$STR(A7)>\ \
<关闭行会招人/@关闭2号>\ \
<开启行会招人/@开启2号>\
#ELSEACT
MESSAGEBOX [失败]:你的行会并没有参与竞价，无法设置！
BREAK
[@开启2号]
#ACT
MOV A7 正在招人
GOTO @设置2号开关
MESSAGEBOX [设置成功]:当前②行会已经开启招人！
BREAK
[@关闭2号]
#ACT
MOV A7 暂不招人
GOTO @设置2号开关
MESSAGEBOX [设置成功]:当前②行会已经关闭招人！
BREAK
[@1号开关]
#IF
ISGUILDMASTER
#ACT
GOTO @设置1号开关
#ELSEACT
MESSAGEBOX [失败]:你不是会长，无法设置！
[@设置1号开关]
#IF
CHECKGUILDLIST ..\QuestDiary\游戏服务\1行会竞价名单.txt
#SAY
提示：关闭行会招人后别人就无法通过NPC加入本行会了\
当前你的行会自动招人开关状态为：<$STR(A5)>\ \
<关闭行会招人/@关闭1号>\ \
<开启行会招人/@开启1号>\
#ELSEACT
MESSAGEBOX [失败]:你的行会并没有参与竞价，无法设置！
BREAK
[@开启1号]
#ACT
MOV A5 正在招人
GOTO @设置1号开关
MESSAGEBOX [设置成功]:当前①行会已经开启招人！
BREAK
[@关闭1号]
#ACT
MOV A5 暂不招人
GOTO @设置1号开关
MESSAGEBOX [设置成功]:当前①行会已经关闭招人！
BREAK
[@加入2号]
#IF
equal A7 正在招人
#ACT
DELAYGOTO 20 @可以进2号
BREAK
#ELSEACT
Messagebox [失败]：当前【<$STR(A32)>】行会已经不招人了，你无法加入！
BREAK
[@可以进2号]
#IF
equal <$STR(A32)> 暂无
#ACT
MESSAGEBOX [失败]:目前没有行会竞得行会竞价板
#ELSEACT
DELAYGOTO 20 @加入2号1
BREAK
[@加入2号1]
#IF
HAVEGUILD
#ACT
MESSAGEBOX [失败]:您已经有行会了。无法申请!
#ELSEACT
DELAYGOTO 20 @加入2号2
BREAK
[@加入2号2]
#IF
equal G32 1
#ACT
AddGuildMember <$STR(A32)> <$USERNAME>
Messagebox [成功]：恭喜【<$USERNAME>】加入了行会【<$STR(A32)>】。
BREAK
[@发布1号]
#IF
ISGUILDMASTER
CHECKGAMEGOLD > <$STR(G30)>
#ACT
INC G30 1000
GAMEGOLD - <$STR(G30)>
mov A31 <$GUILDNAME>
mov G31 1
mov A5 正在招人
CLEARNAMELIST ..\QuestDiary\游戏服务\1行会竞价名单.txt
ADDGUILDLIST ..\QuestDiary\游戏服务\1行会竞价名单.txt
Messagebox [成功]：你在行会竞价板上花了【<$STR(G30)>】个元宝竞得。
SENDMSG 0 [<$STR(A31)>]在土城老兵收人啦,赶快来加入这个行会吧 255 253
SENDMSG 0 [<$STR(A31)>]在土城老兵收人啦,赶快来加入这个行会吧 255 253
SENDMSG 0 [<$STR(A31)>]在土城老兵收人啦,赶快来加入这个行会吧 255 253
GOTO @MAIN
BREAK
#ELSEACT
Messagebox [失败]：你的元宝不足或者你不是行会掌门
[@发布2号]
#IF
ISGUILDMASTER
CHECKGAMEGOLD > <$STR(G29)>
#ACT
INC G29 1000
GAMEGOLD - <$STR(G29)>
mov A32 <$GUILDNAME>
mov G32 1
mov A7 正在招人
CLEARNAMELIST ..\QuestDiary\游戏服务\2行会竞价名单.txt
ADDGUILDLIST ..\QuestDiary\游戏服务\2行会竞价名单.txt
Messagebox [成功]：你在行会竞价板上花了【<$STR(G29)>】个元宝竞得。
SENDMSG 0 [<$STR(A32)>]在土城老兵收人啦,赶快来加入这个行会吧 255 253
SENDMSG 0 [<$STR(A32)>]在土城老兵收人啦,赶快来加入这个行会吧 255 253
SENDMSG 0 [<$STR(A32)>]在土城老兵收人啦,赶快来加入这个行会吧 255 253
GOTO @MAIN
BREAK
#ELSEACT
Messagebox [失败]：你的元宝不足或者你不是行会掌门
[@加入1号]
#IF
equal A5 正在招人
#ACT
DELAYGOTO 20 @可以进1号
BREAK
#ELSEACT
Messagebox [失败]：当前【<$STR(A31)>】行会已经不招人了，你无法加入！
BREAK
[@可以进1号]
#IF
equal <$STR(A31)> 暂无
#ACT
MESSAGEBOX [失败]:目前没有行会竞得行会竞价板
#ELSEACT
DELAYGOTO 20 @加入1号1
BREAK
[@加入1号1]
#IF
HAVEGUILD
#ACT
MESSAGEBOX [失败]:您已经有行会了。无法申请!
#ELSEACT
DELAYGOTO 20 @加入1号2
BREAK
[@加入1号2]
#IF
equal G31 1
#ACT
AddGuildMember <$STR(A31)> <$USERNAME>
Messagebox [成功]：恭喜【<$USERNAME>】加入了行会【<$STR(A31)>】。
BREAK
[@IsInFilterList]
#IF
#ACT
MESSAGEBOX [提示]：输入数据中包含了非法字符，请重新编辑！
BREAK
大家在添加此脚本的时候要主要两个A变量A5、A7如果和自己版本里面有冲突自行修改成即可，另外每次竞价发布的价格也能修改，具体可以按照自己区服的元宝比例来调整，修改G30、G29即是元宝价格。