红蓝方行会

meinvwudi

一。机器人

;--------控制攻沙行会进入开关--------
#AutoRun NPC RUNONDAY 18:00 @红蓝方开启入会
#AutoRun NPC RUNONDAY 20:30 @红蓝方结束入会

[@红蓝方开启入会]
#IF
EQUAL <$HFCOUNT> 1
EQUAL A431 
#ACT
DummyloGon WX 23 25  10 0 2 1 0 
MOV A431 开启
SendCenterMsg 250 0  红蓝方行会系统已开启，玩家现在可以开始入会了。  1   15
SENDMSG 0 红蓝方行会系统已开启，玩家现在可以开始入会了。
SENDMSG 0 红蓝方行会系统已开启，玩家现在可以开始入会了。
SENDMSG 0 红蓝方行会系统已开启，玩家现在可以开始入会了。


[@红蓝方结束入会]
#IF
EQUAL <$HFCOUNT> 1
EQUAL A431 开启
#ACT
MOV A431 结束

meinvwudi

QM创建红蓝方

#IF
ISDUMMY
EQUAL <$USERNAME> 龙语大哥
NOT EQUAL <$GUILDNAME> 红方
#ACT
AddGuild 红方 龙语大哥
ADDGUILDMEMBERCOUNT SELF = 500
DELAYGOTO 30000 @假人自动下线

#IF
ISDUMMY
EQUAL <$USERNAME> 龙语大姐
NOT EQUAL <$GUILDNAME> 蓝方
#ACT
AddGuild 蓝方 龙语大姐
ADDGUILDMEMBERCOUNT SELF = 500
DELAYGOTO 30000 @假人自动下线



[@假人自动下线]
#IF
ISDUMMY
#ACT
KICK
BREAK

meinvwudi

QF，退出行会处理


 
 
[@GuildDelMember]
#IF
NOT EQUAL A437 <$USERNAME>
EQUAL <$GUILDNAME> 红方
LARGE <$LEVEL> 49
SMALL <$LEVEL> 60
#ACT
CALCVAR GLOBAL 红方52人数 - 1
SAVEVAR GLOBAL 红方52人数 
CALCVAR GLOBAL 红方总人数 - 1
SAVEVAR GLOBAL 红方总人数 
AddTextListEx ..\QuestDiary\数据文件\退出行会\退出行会名单.txt <$USERNAME>
SetHumAttackMode 5 1

#IF
NOT EQUAL A437 <$USERNAME>
EQUAL <$GUILDNAME> 红方
LARGE <$LEVEL> 59
SMALL <$LEVEL> 70
#ACT
CALCVAR GLOBAL 红方60人数 - 1
SAVEVAR GLOBAL 红方60人数 
CALCVAR GLOBAL 红方总人数 - 1
SAVEVAR GLOBAL 红方总人数 
AddTextListEx ..\QuestDiary\数据文件\退出行会\退出行会名单.txt <$USERNAME>
SetHumAttackMode 5 1

#IF
NOT EQUAL A437 <$USERNAME>
EQUAL <$GUILDNAME> 红方
EQUAL <$LEVEL> 70
#ACT
CALCVAR GLOBAL 红方70人数 - 1
SAVEVAR GLOBAL 红方70人数 
CALCVAR GLOBAL 红方总人数 - 1
SAVEVAR GLOBAL 红方总人数 
AddTextListEx ..\QuestDiary\数据文件\退出行会\退出行会名单.txt <$USERNAME>
SetHumAttackMode 5 1

#IF
NOT EQUAL A438 <$USERNAME>
EQUAL <$GUILDNAME> 蓝方
LARGE <$LEVEL> 49
SMALL <$LEVEL> 60
#ACT
CALCVAR GLOBAL 蓝方52人数 - 1
SAVEVAR GLOBAL 蓝方52人数 
CALCVAR GLOBAL 蓝方总人数 - 1
SAVEVAR GLOBAL 蓝方总人数 
AddTextListEx ..\QuestDiary\数据文件\退出行会\退出行会名单.txt <$USERNAME>
SetHumAttackMode 5 1

#IF
NOT EQUAL A438 <$USERNAME>
EQUAL <$GUILDNAME> 蓝方
LARGE <$LEVEL> 59
SMALL <$LEVEL> 70
#ACT
CALCVAR GLOBAL 蓝方60人数 - 1
SAVEVAR GLOBAL 蓝方60人数 
CALCVAR GLOBAL 蓝方总人数 - 1
SAVEVAR GLOBAL 蓝方总人数 
AddTextListEx ..\QuestDiary\数据文件\退出行会\退出行会名单.txt <$USERNAME>
SetHumAttackMode 5 1

#IF
NOT EQUAL A438 <$USERNAME>
EQUAL <$GUILDNAME> 蓝方
EQUAL <$LEVEL> 70
#ACT
CALCVAR GLOBAL 蓝方70人数 - 1
SAVEVAR GLOBAL 蓝方70人数 
CALCVAR GLOBAL 蓝方总人数 - 1
SAVEVAR GLOBAL 蓝方总人数 
AddTextListEx ..\QuestDiary\数据文件\退出行会\退出行会名单.txt <$USERNAME>
SetHumAttackMode 5 1
#OR
EQUAL A437 <$USERNAME>
EQUAL A438 <$USERNAME>
#ACT
SetHumAttackMode 5 1


#IF
#ACT
AddTextListEx ..\QuestDiary\数据文件\退出行会\退出行会记录.txt [<$USERNAME>]退出[<$GUILDNAME>]行会:<$DATETIME>

meinvwudi

NPC,创建

[@main]
#IF
large <$HFCOUNT> 1
#ACT
sendmsg 9  <font color='#00FF00'> 首次沙巴克攻城结束后无需再加入红蓝方!</font>
BREAK
 
#IF
EQUAL N$禁止弹框 1
#ACT
MOV N$禁止弹框 0
#ELSEACT
sendmsg 9  <font color='#FF0000'>加入行会后随意退出，合区前无法再次加入红蓝方</font>

#IF
equal <$CLIENTFLAG> 1
#SAY
<Img|ay=1|x=0.0|y=0.0|width=500|height=320|scale9r=10|reset=1|reload=1|scale9t=10|img=public/bg_npc_01.png|scale9l=10|move=0|bg=1|scale9b=10>
<Layout|x=597.0|y=2.0|width=80|height=80|link=@exit>
<Button|x=500.0|y=1.0|nimg=public/1900000510.png|pimg=public/1900000511.png|link=@exit>
<Img|x=95.0|y=24.0|width=100|esc=0|img=custom/zft/hl_fj_02.png>
<Text|x=224.0|y=19.0|color=149|size=18|text=红 蓝 方>
<Img|x=310.0|y=24.0|width=100|esc=0|img=custom/zft/hl_fj_04.png>
<Text|x=67.0|y=52.0|color=254|size=16|text=只有两个红蓝方才可以参与攻沙，获得对应沙巴克奖励>
<Text|a=0|x=64.0|y=119.0|color=249|size=16|text=行会加入后人为退出，未合区前不能加入行会红方,蓝方>
<RText|x=49.0|y=75.0|color=250|size=16|text=新区一合,采用红蓝方模式沙巴克争夺,奖励按活跃度领取>
<RText|x=56.0|y=96.0|color=250|size=16|text=一合后沙巴克所有行会可参与,有活跃度的失败方均可领奖>
<RText|x=103.0|y=150.0|color=89|size=16|text=行会总人数                <红方:/FCOLOR=249>{<$GLOBAL(红方总人数)>/FCOLOR=249}人                     <蓝方:/FCOLOR=146>{<$GLOBAL(蓝方总人数)>/FCOLOR=249}人>
<RText|x=64.0|y=180.0|color=255|size=16|text=<52级/FCOLOR=70> ≤ <等级/FCOLOR=250> 〈 <60/FCOLOR=70>             <红方:/FCOLOR=249>{<$GLOBAL(红方52人数)>/FCOLOR=249}人                     <蓝方:/FCOLOR=146>{<$GLOBAL(蓝方52人数)>/FCOLOR=249}人>
<RText|x=64.0|y=210.0|color=255|size=16|text=<60级/FCOLOR=70> ≤ <等级/FCOLOR=250> 〈 <70/FCOLOR=70>             <红方:/FCOLOR=249>{<$GLOBAL(红方60人数)>/FCOLOR=249}人                     <蓝方:/FCOLOR=146>{<$GLOBAL(蓝方60人数)>/FCOLOR=249}人>
<RText|x=64.0|y=240.0|color=255|size=16|text=<70级/FCOLOR=70> ≤ <等级/FCOLOR=250> 〈 <70/FCOLOR=70>             <红方:/FCOLOR=249>{<$GLOBAL(红方70人数)>/FCOLOR=249}人                     <蓝方:/FCOLOR=146>{<$GLOBAL(蓝方70人数)>/FCOLOR=249}人>
<Img|x=30.0|y=171.0|width=440|img=public/1900000667.png|esc=0>
<Img|x=30.0|y=270.0|width=440|img=public/1900000667.png|esc=0>
<Text|a=0|x=210.0|y=280.0|tips={红方YY:681608/FCOLOR=249}^{蓝方YY:681608/FCOLOR=249}|tipsx=-3|tipsy=40|color=251|size=17|text=点击加入红蓝方|link=@点击加入红蓝方>




#IF
equal <$CLIENTFLAG> 2
#SAY
<Img|ay=1|x=0.0|y=0.0|width=500|height=320|scale9r=10|reset=1|scale9t=10|reload=1|img=public/bg_npc_01.png|scale9l=10|move=0|bg=1|scale9b=10>
<Layout|x=597.0|y=2.0|width=80|height=80|link=@exit>
<Button|x=500.0|y=1.0|nimg=public/1900000510.png|pimg=public/1900000511.png|link=@exit>
<Img|x=95.0|y=24.0|width=100|esc=0|img=custom/zft/hl_fj_02.png>
<Text|x=220.0|y=14.0|color=149|size=18|text=红 蓝 方>
<Img|x=310.0|y=24.0|width=100|esc=0|img=custom/zft/hl_fj_04.png>
<Text|x=67.0|y=52.0|color=254|size=16|text=只有两个红蓝方才可以参与攻沙，获得对应沙巴克奖励>
<Text|a=0|x=64.0|y=119.0|color=249|size=16|text=行会加入后人为退出，未合区前不能加入行会红方,蓝方>
<RText|x=49.0|y=75.0|color=250|size=16|text=新区一合,采用红蓝方模式沙巴克争夺,奖励按活跃度领取>
<RText|x=56.0|y=96.0|color=250|size=16|text=一合后沙巴克所有行会可参与,有活跃度的失败方均可领奖>
<RText|x=103.0|y=150.0|color=89|size=16|text=行会总人数                <红方:/FCOLOR=249>{<$GLOBAL(红方总人数)>/FCOLOR=249}人                     <蓝方:/FCOLOR=146>{<$GLOBAL(蓝方总人数)>/FCOLOR=249}人>
<RText|x=64.0|y=180.0|color=255|size=16|text=<52级/FCOLOR=70> ≤ <等级/FCOLOR=250> 〈 <60/FCOLOR=70>             <红方:/FCOLOR=249>{<$GLOBAL(红方52人数)>/FCOLOR=249}人                     <蓝方:/FCOLOR=146>{<$GLOBAL(蓝方52人数)>/FCOLOR=249}人>
<RText|x=64.0|y=210.0|color=255|size=16|text=<60级/FCOLOR=70> ≤ <等级/FCOLOR=250> 〈 <70/FCOLOR=70>             <红方:/FCOLOR=249>{<$GLOBAL(红方60人数)>/FCOLOR=249}人                     <蓝方:/FCOLOR=146>{<$GLOBAL(蓝方60人数)>/FCOLOR=249}人>
<RText|x=64.0|y=240.0|color=255|size=16|text=<70级/FCOLOR=70> ≤ <等级/FCOLOR=250> 〈 <70/FCOLOR=70>             <红方:/FCOLOR=249>{<$GLOBAL(红方70人数)>/FCOLOR=249}人                     <蓝方:/FCOLOR=146>{<$GLOBAL(蓝方70人数)>/FCOLOR=249}人>
<Img|x=30.0|y=171.0|width=440|img=public/1900000667.png|esc=0>
<Img|x=30.0|y=270.0|width=440|img=public/1900000667.png|esc=0>
<Button|a=0|x=200.0|y=275.0|width=150|height=30|tips={红方YY:681608/FCOLOR=249}^{蓝方YY:681608/FCOLOR=249}|tipsx=-3|tipsy=40|color=251|size=17|pimg=public/image5.png|nimg=public/image7.png|mimg=public/image7.png|text=点击加入红蓝方|link=@点击加入红蓝方>

#IF
equal <$CLIENTFLAG> 3
#SAY
<><沙巴克攻沙期间只有两个行会可以参与攻沙，获得对应沙巴克奖励/AUTOCOLOR=254>\
<><行会加入后人为退出，未合区前不能加入行会红方,蓝方/AUTOCOLOR=249>\
<><------------------------------------------------------/AUTOCOLOR=253>\
<><当前行会总人数/autocolor=103>             <红方>:{<$STR(G429)>人/AUTOCOLOR=250}         <蓝方/AUTOCOLOR=146>:{<$STR(G430)>人/AUTOCOLOR=250}          \
<><52/autocolor=70> ≤ <等级/AUTOCOLOR=250> 〈  <60/AUTOCOLOR=70>    <红方>:<$STR(G423)>人   <蓝方:/AUTOCOLOR=146><$STR(G424))>人     <相差不能超过><1/FCOLOR=251><人>\
<><60/autocolor=70> ≤ <等级/AUTOCOLOR=250> 〈  <70/AUTOCOLOR=70>    <红方>:<$STR(G425)>人   <蓝方:/AUTOCOLOR=146><$STR(G426)>人     <相差不能超过><1/FCOLOR=251><人>\
<><70/autocolor=70> ≤ <等级/AUTOCOLOR=250> 〈  <70/AUTOCOLOR=70>    <红方>:<$STR(G427)>人   <蓝方:/AUTOCOLOR=146><$STR(G428)>人     <相差不能超过><1/FCOLOR=251><人>\
<><------------------------------------------------------/AUTOCOLOR=253>\
<> <【加入红方】/@加入红方>  <退出行会,未合区前无法再次加入>  <【加入蓝方】/@加入蓝方>\



[@点击加入红蓝方]
#IF
; EQUAL <$HFCOUNT> 1
EQUAL A431 开启
#ELSEACT
sendmsg 9  <font color='#00FF00'>当前无法加入，开放时间:一合当天【18:00】--【20:30】</font>
BREAK

#IF
checknamelist ..\QuestDiary\数据文件\退出行会\退出行会名单.txt 
#ACT
sendmsg 9  <font color='#00FF00'>你已加入过红蓝方，退出无法再次加入</font>
BREAK

#IF
HAVEGUILD
#ACT
sendmsg 9  <font color='#00FF00'> 对不起！您当前有行会</font>
BREAK


#IF
CHECKLEVELEX < 50
#ACT
sendmsg 9  <font color='#00FF00'> 对不起！您的等级不足！</font>
break

#IF
CHECKJOB warrior
SMALL <$MAXDC> 150
#ACT
sendmsg 9  <font color='#00FF00'> 对不起！您的攻击不足150无法进入</font>
BREAK

#IF 
#ACT 
GETGuildsNumber 红方 S$红方人数
GETGuildsNumber 蓝方 S$蓝方人数

#IF 
equal S$红方人数
#act 
sendmsg 9  <font color='#FFFF00'>当前红方行会不存在，联系客服处理</font>
BREAK

#IF  
equal S$蓝方人数
#act 
sendmsg 9  <font color='#FFFF00'>当前蓝方行会不存在，联系客服处理</font>
BREAK


#IF
LARGE <$LEVEL> 49
SMALL <$LEVEL> 60
#ACT
GOTO @52级安排加入
BREAK

#IF
LARGE <$LEVEL> 59
SMALL <$LEVEL> 70
#ACT
GOTO @60级安排加入
BREAK

#IF
EQUAL <$LEVEL> 70
#ACT
GOTO @70级安排加入
BREAK

[@52级安排加入]
#IF
CHECKVAR GLOBAL 红方52人数 = <$GLOBAL(蓝方52人数)>
#ACT
MOVR N$取随机值 2
#IF
EQUAL N$取随机值 0
CHECKVAR GLOBAL 红方52人数 = <$GLOBAL(蓝方52人数)>
#ACT
ADDGUILDMEMBER 红方 <$USERNAME>
sendmsg 9  <font color='#00FF00'>加入红方行会.如退出行会，合区前无法再次加入红蓝方</font>
CALCVAR GLOBAL 红方52人数 + 1
SAVEVAR GLOBAL 红方52人数 
CALCVAR GLOBAL 红方总人数 + 1
SAVEVAR GLOBAL 红方总人数 
SetHumAttackMode 5 65535
MOV N$禁止弹框 1
GOTO @MAIN
break
#IF
EQUAL N$取随机值 1
CHECKVAR GLOBAL 红方52人数 = <$GLOBAL(蓝方52人数)>
#ACT
ADDGUILDMEMBER 蓝方 <$USERNAME>
sendmsg 9  <font color='#00FF00'>加入蓝方行会.如退出行会，合区前无法再次加入红蓝方</font>
CALCVAR GLOBAL 蓝方52人数 + 1
SAVEVAR GLOBAL 蓝方52人数 
CALCVAR GLOBAL 蓝方总人数 + 1
SAVEVAR GLOBAL 蓝方总人数 
SetHumAttackMode 5 65535
MOV N$禁止弹框 1
GOTO @MAIN
break
#OR
CHECKVAR GLOBAL 红方52人数 < <$GLOBAL(蓝方52人数)>
#ACT
ADDGUILDMEMBER 红方 <$USERNAME>
sendmsg 9  <font color='#00FF00'>加入红方行会.如退出行会，合区前无法再次加入红蓝方</font>
CALCVAR GLOBAL 红方52人数 + 1
SAVEVAR GLOBAL 红方52人数 
CALCVAR GLOBAL 红方总人数 + 1
SAVEVAR GLOBAL 红方总人数 
SetHumAttackMode 5 65535
MOV N$禁止弹框 1
GOTO @MAIN
break
#OR
CHECKVAR GLOBAL 蓝方52人数 < <$GLOBAL(红方52人数)>
#ACT
ADDGUILDMEMBER 蓝方 <$USERNAME>
sendmsg 9  <font color='#00FF00'>加入蓝方行会.如退出行会，合区前无法再次加入红蓝方</font>
CALCVAR GLOBAL 蓝方52人数 + 1
SAVEVAR GLOBAL 蓝方52人数 
CALCVAR GLOBAL 蓝方总人数 + 1
SAVEVAR GLOBAL 蓝方总人数 
SetHumAttackMode 5 65535
MOV N$禁止弹框 1
GOTO @MAIN
break





[@60级安排加入]
#IF
CHECKVAR GLOBAL 红方60人数 = <$GLOBAL(蓝方60人数)>
#ACT
MOVR N$取随机值 2
#IF
EQUAL N$取随机值 0
CHECKVAR GLOBAL 红方60人数 = <$GLOBAL(蓝方60人数)>
#ACT
ADDGUILDMEMBER 红方 <$USERNAME>
sendmsg 9  <font color='#00FF00'>加入红方行会.如退出行会，合区前无法再次加入红蓝方</font>
CALCVAR GLOBAL 红方60人数 + 1
SAVEVAR GLOBAL 红方60人数 
CALCVAR GLOBAL 红方总人数 + 1
SAVEVAR GLOBAL 红方总人数 
SetHumAttackMode 5 65535
MOV N$禁止弹框 1
GOTO @MAIN
break
#IF
EQUAL N$取随机值 1
CHECKVAR GLOBAL 红方60人数 = <$GLOBAL(蓝方60人数)>
#ACT
ADDGUILDMEMBER 蓝方 <$USERNAME>
sendmsg 9  <font color='#00FF00'>加入蓝方行会.如退出行会，合区前无法再次加入红蓝方</font>
CALCVAR GLOBAL 蓝方60人数 + 1
SAVEVAR GLOBAL 蓝方60人数 
CALCVAR GLOBAL 蓝方总人数 + 1
SAVEVAR GLOBAL 蓝方总人数 
SetHumAttackMode 5 65535
MOV N$禁止弹框 1
GOTO @MAIN
break
#OR
CHECKVAR GLOBAL 红方60人数 < <$GLOBAL(蓝方60人数)>
#ACT
ADDGUILDMEMBER 红方 <$USERNAME>
sendmsg 9  <font color='#00FF00'>加入红方行会.如退出行会，合区前无法再次加入红蓝方</font>
CALCVAR GLOBAL 红方60人数 + 1
SAVEVAR GLOBAL 红方60人数 
CALCVAR GLOBAL 红方总人数 + 1
SAVEVAR GLOBAL 红方总人数 
SetHumAttackMode 5 65535
MOV N$禁止弹框 1
GOTO @MAIN
break
#OR
CHECKVAR GLOBAL 蓝方60人数 < <$GLOBAL(红方60人数)>
#ACT
ADDGUILDMEMBER 蓝方 <$USERNAME>
sendmsg 9  <font color='#00FF00'>加入蓝方行会.如退出行会，合区前无法再次加入红蓝方</font>
CALCVAR GLOBAL 蓝方60人数 + 1
SAVEVAR GLOBAL 蓝方60人数 
CALCVAR GLOBAL 蓝方总人数 + 1
SAVEVAR GLOBAL 蓝方总人数 
SetHumAttackMode 5 65535
MOV N$禁止弹框 1
GOTO @MAIN
break




[@70级安排加入]
#IF
CHECKVAR GLOBAL 红方70人数 = <$GLOBAL(蓝方70人数)>
#ACT
MOVR N$取随机值 2
#IF
EQUAL N$取随机值 0
CHECKVAR GLOBAL 红方70人数 = <$GLOBAL(蓝方70人数)>
#ACT
ADDGUILDMEMBER 红方 <$USERNAME>
sendmsg 9  <font color='#00FF00'>加入红方行会.如退出行会，合区前无法再次加入红蓝方</font>
CALCVAR GLOBAL 红方70人数 + 1
SAVEVAR GLOBAL 红方70人数 
CALCVAR GLOBAL 红方总人数 + 1
SAVEVAR GLOBAL 红方总人数 
SetHumAttackMode 5 65535
MOV N$禁止弹框 1
GOTO @MAIN
break
#IF
EQUAL N$取随机值 1
CHECKVAR GLOBAL 红方70人数 = <$GLOBAL(蓝方70人数)>
#ACT
ADDGUILDMEMBER 蓝方 <$USERNAME>
sendmsg 9  <font color='#00FF00'>加入蓝方行会.如退出行会，合区前无法再次加入红蓝方</font>
CALCVAR GLOBAL 蓝方70人数 + 1
SAVEVAR GLOBAL 蓝方70人数 
CALCVAR GLOBAL 蓝方总人数 + 1
SAVEVAR GLOBAL 蓝方总人数 
SetHumAttackMode 5 65535
MOV N$禁止弹框 1
GOTO @MAIN
break
#OR
CHECKVAR GLOBAL 红方70人数 < <$GLOBAL(蓝方70人数)>
#ACT
ADDGUILDMEMBER 红方 <$USERNAME>
sendmsg 9  <font color='#00FF00'>加入红方行会.如退出行会，合区前无法再次加入红蓝方</font>
CALCVAR GLOBAL 红方70人数 + 1
SAVEVAR GLOBAL 红方70人数 
CALCVAR GLOBAL 红方总人数 + 1
SAVEVAR GLOBAL 红方总人数 
SetHumAttackMode 5 65535
MOV N$禁止弹框 1
GOTO @MAIN
break
#OR
CHECKVAR GLOBAL 蓝方70人数 < <$GLOBAL(红方70人数)>
#ACT
ADDGUILDMEMBER 蓝方 <$USERNAME>
sendmsg 9  <font color='#00FF00'>加入蓝方行会.如退出行会，合区前无法再次加入红蓝方</font>
CALCVAR GLOBAL 蓝方70人数 + 1
SAVEVAR GLOBAL 蓝方70人数 
CALCVAR GLOBAL 蓝方总人数 + 1
SAVEVAR GLOBAL 蓝方总人数 
SetHumAttackMode 5 65535
MOV N$禁止弹框 1
GOTO @MAIN
break

meinvwudi

变量申明

#IF
#ACT
VAR INTEGER GLOBAL 红方总人数 6
VAR INTEGER GLOBAL 红方52人数 6
VAR INTEGER GLOBAL 红方60人数 6
VAR INTEGER GLOBAL 红方70人数 6
VAR INTEGER GLOBAL 蓝方总人数 6
VAR INTEGER GLOBAL 蓝方52人数 6
VAR INTEGER GLOBAL 蓝方60人数 6
VAR INTEGER GLOBAL 蓝方70人数 6

meinvwudi

[@InPutString5]
#IF
EQUAL S5
#ACT
MESSAGEBOX 对不起！请输入玩家名字
BREAK

#IF 
#ACT 
GETGuildsNumber 红方 N$红方人数

#IF 
SMALL N$红方人数 1
#act 
sendmsg 9  <font color='#FFFF00'>当前分区尚未创建红方行会。</font>
BREAK

#IF
NOT S5.checkonline
#ACT
MESSAGEBOX “<$STR(S5)>”不在线！
BREAK

; 不在红方，先加入
#IF
NOT S5.CHECKOFGUILD 红方
#ACT
S5.ADDGUILDMEMBER 红方 <$STR(S5)>

#IF
S5.CHECKOFGUILD 红方
#ACT
<$STR(A437)>.SETRANKSGUILD 行会成员
<$STR(S5)>.SETRANKSGUILD 副掌门
MOV A437 <$STR(S5)>

#IF
S5.HAVEGUILD
S5.CHECKOFGUILD 红方
#ACT
MESSAGEBOX 已将“<$STR(S5)>”加入红方行会，并提升为红方掌门！
BREAK
#ELSEACT
MOV A437 
MESSAGEBOX 操作失败，错误原因可能为：\\1.玩家“<$STR(S5)>”已加入其它行会\\2.红方行会已经有2位掌门人
BREAK


[@InPutString6]
#IF
EQUAL S6
#ACT
MESSAGEBOX 对不起！请输入玩家名字
BREAK

#IF
NOT S6.checkonline
#ACT
MESSAGEBOX “<$STR(S6)>”不在线！
BREAK

#IF 
#ACT 
GETGuildsNumber 蓝方 N$蓝方人数


#IF  
SMALL N$蓝方人数 1
#act 
sendmsg 9  <font color='#FFFF00'>当前分区尚未创建蓝方行会。</font>
BREAK

; 不在蓝方，先加入会蓝方
#IF
not S6.CHECKOFGUILD 蓝方
#ACT
S6.ADDGUILDMEMBER 蓝方 <$STR(S6)>

; 设置副掌门
#IF
S6.CHECKOFGUILD 蓝方
#ACT
<$STR(A438)>.SETRANKSGUILD 行会成员
<$STR(S6)>.SETRANKSGUILD 副掌门
MOV A438 <$STR(S6)>

#IF
S6.HAVEGUILD
S6.CHECKOFGUILD 蓝方
#ACT
MESSAGEBOX 已将“<$STR(S6)>”加入蓝方行会，并提升为蓝方掌门！
BREAK
#ELSEACT
MOV A438 
MESSAGEBOX 操作失败，错误原因可能为：\\1.玩家“<$STR(S6)>”已加入其它行会\\2.蓝方行会已经有2位掌门人
BREAK