开区脚本Mir2000自动入会行会招人传奇脚本命令

　　 [@MAIN]

　　 #CALL [Mir2000_自动入会Mir2000_自动入会NPC.txt] @Mir2000_自动入会NPC

脚本下载地址

　　 [@Mir2000_自动入会QF]

　　 {

　　 [@UserCmd9]

　　 #IF

　　 ISGUILDMASTER

　　 #ACT

　　 GOTO @Mir2000_自动入会NPC

　　 BREAK

　　 #IF

　　 HAVEGUILD

　　 #ACT

　　 SENDMSG 7 对不起，您已有行会，无法申请加入！

　　 BREAK

　　 #IF

　　 CHECKLEVELEX > 0

　　 #ACT

　　 QUERYVALUE 10 0 20 @Mir2000_入会申请 输入申请加入的行会名： QF

　　 BREAK

　　 [@Mir2000_入会申请]

　　 #IF

　　 CHECKStringList ....GuildBaseGuildList.txt <$STR(S10)>

　　 #ACT

　　 INI_READ_STRING ....GuildBaseGuilds<$STR(S10)>.ini Mir2000_入会设置 Mir2000_入会掌门 S11

　　 INI_READ_INTEGER ....GuildBaseGuilds<$STR(S10)>.ini Mir2000_入会设置 Mir2000_入会开关 P1

　　 INI_READ_INTEGER ....GuildBaseGuilds<$STR(S10)>.ini Mir2000_入会设置 Mir2000_入会等级 P2

　　 INI_READ_INTEGER ....GuildBaseGuilds<$STR(S10)>.ini Mir2000_入会设置 Mir2000_入会弹窗 P3

　　 #ELSEACT

　　 MESSAGEBOX 入会申请：对不起，您输入的行会名字不正确！

　　 BREAK

　　 #OR

　　 SMALL P1 1

　　 EQUAL S11

　　 #ACT

　　 MESSAGEBOX 入会申请：【<$STR(S10)>】行会当前禁止任何人加入，请联系行会掌门开放入会！

　　 BREAK

　　 #IF

　　 CHECKLEVELEX < <$STR(P2)>

　　 #ACT

　　 MESSAGEBOX 入会申请：【<$STR(S10)>】行会最低要求[<$STR(P2)>级]才能加入！传奇脚本升级，

　　 BREAK

　　 #IF

　　 SMALL P3 1

　　 #ACT

　　 AFFILIATEGUILD <$STR(S10)>

　　 MESSAGEBOX 入会申请：恭喜加入【<$STR(S10)>】成功，-ksd引擎，同兄弟们回到无限的岁月！

　　 BREAK

　　 #IF

　　 CHECKONLINE <$STR(S11)>

　　 #ACT

　　 <$STR(S11)>.CALCVAR HUMAN 申请入会姓名 = <$USERNAME>

　　 <$STR(S11)>.CALCVAR HUMAN 申请入会职业 = <$JOB>

　　 <$STR(S11)>.CALCVAR HUMAN 申请入会等级 = <$LEVEL>

　　 <$STR(S11)>.QUERYVALUE 2 2 2 @Mir2000_同意入会 入会申请：姓名[<$USERNAME>]职业[<$JOB>]等级[<$LEVEL>]。传奇脚本摆摊，点击【确认】同意入会→ QF

　　 MESSAGEBOX 入会申请：请求加入【<$STR(S10)>】的申请已发出。如果长时间未同意、传奇开启光源，可能就是被拒绝！

　　 #ELSEACT

　　 MESSAGEBOX 入会申请：【<$STR(S10)>】的掌门[<$STR(S11)>]未在线，无法申请！

　　 BREAK

　　 [@Mir2000_同意入会]

　　 #IF

　　 CHECKLEVELEX > 0

　　 #ACT

　　 <$HUMAN(申请入会姓名)>.AFFILIATEGUILD <$GUILDNAME>

　　 #IF

　　 <$HUMAN(申请入会姓名)>.HAVEGUILD

　　 #ELSEACT

　　 <$HUMAN(申请入会姓名)>.GMEXECUTE 加入门派

　　 <$HUMAN(申请入会姓名)>.AFFILIATEGUILD <$GUILDNAME>

　　 #IF

　　 CHECKLEVELEX > 0

　　 #ACT

　　 <$HUMAN(申请入会姓名)>.MESSAGEBOX 入会申请：行会【<$GUILDNAME>】已经同意您的入会申请！

　　 BREAK

　　 [@Mir2000_自动入会加载]

　　 #CALL [Mir2000_自动入会Mir2000_自动入会NPC.txt] @Mir2000_自动入会NPC

　　 BREAK

　　 }

　　 [@Mir2000_自动入会QM]

　　 {

　　 #IF

　　 CHECKLEVELEX > 0

　　 #ACT

　　 VAR STRING HUMAN 申请入会姓名

　　 VAR STRING HUMAN 申请入会职业

　　 VAR INTEGER HUMAN 申请入会等级

　　 #IF

　　 ISGUILDMASTER

　　 #ACT

　　 INI_READ_STRING ....GuildBaseGuilds<$GUILDNAME>.ini Mir2000_入会设置 Mir2000_入会掌门 S11

　　 #ELSEACT

　　 BREAK

　　 #IF

　　 EQUAL <$STR(S11)>

　　 #ELSEACT

　　 INI_WRITE_STRING ....GuildBaseGuilds<$GUILDNAME>.ini Mir2000_入会设置 Mir2000_入会掌门 <$USERNAME>

　　 BREAK

　　 }