芸7504 发表于 2023-10-7 11:01:21

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

玩命道盾英雄 发表于 2023-11-20 18:29:05

感谢楼主提供这么好的论坛」

天封专属 发表于 2023-11-20 21:58:56

比较全的传奇教程分享网站,站长辛苦了。

进化录混沌 发表于 2023-11-20 22:22:27

很多架设问题在这里可以找到,真是太好啦。

帝尊大陆 发表于 2023-11-21 02:26:08

很多架设问题在这里可以找到,真是太好啦。

弃天龙渊 发表于 2023-11-21 08:18:37

在这里可以学到很多传奇一条龙开区时遇到的问题。

雄霸屠龙 发表于 2023-11-21 12:44:49

感谢楼主提供这么好的论坛!

古惑仔之汉龙 发表于 2023-11-21 16:38:10

这东西我收了!

终极吾辈 发表于 2023-11-21 19:24:30

这个帖子不回对不起自己!

青妖专属 发表于 2023-11-21 21:57:23

楼主发贴辛苦了,谢谢楼主分享!
页: [1] 2 3 4
查看完整版本: GOM引擎天下第一会脚本,传奇版本库添加行会自助收人教程