社区服务 统计排行
  • 381阅读
  • 0回复
心仪对象 离线

级别: 编辑

  • UID4
  • 精华 0
  • 发帖4532
  • 铜币1823 枚
  • 威望0 点
  • 贡献值984 点
  • 银元0 个
  • 好评度0 点
  • 在线时间301(时)
  • 注册时间2019-02-22
  • 最后登录2021-02-17
正序阅读   只看楼主      0楼 发表于: 2020-12-14
更多操作

[技术研究] GOM传奇引擎行会自助招人脚本,争夺天下第一会的命令和示例

(@@InPutInteger @@InPutString @InPutInteger @InPutString @storage @getback @getnextpage @getPreviouspage)
[@main]
#IF
#ACT

#SAY
 \ 
<>天下第一会:<$STR(A30)>           <行会自助招人/AUTOCOLOR=250>\ \

<><您支付比目前竞价多50个元宝,即可让你行会成为天下第一会./AUTOCOLOR=250>\ \

<>  <【行会名称】/AUTOCOLOR=250>:<$STR(A30)>     <【收人状态】/AUTOCOLOR=250>:<$STR(S10)>\ 

<><【行会掌门】/AUTOCOLOR=250>:<$STR(A31)>     <【竞标价格】/AUTOCOLOR=250>:<$STR(G131)>\ \ 

<><加入行会/@jrxh>   <参加竞价/@cyjj>   <管理选项/@竞标台管理>      <行会对战皇宫/@上限>

;
[@上限]
#IF
CHECKLEVELEX > 39
#ACT
MAPMOVE huanggong
give 回城卷
SENDMSG 0 {ぐ〖游戏提示〗:|245:0:0}{玩家|222:0}{『<$USERNAME>』|70:0}{独自闯入了|255:0}{『行会对战皇宫』|251:0}{开启了传奇旅程|249:0}
break
#ELSEACT
MESSAGEBOX [进入失败]小子你没有39级还想进去?





[@cyjj]
#IF
HAVEGUILD
ISGUILDMASTER
CHECKGAMEGOLD > <$STR(G131)>
#ACT
INC G131 50
GAMEGOLD - <$STR(G131)>
mov A30 <$GUILDNAME>
mov A31 <$USERNAME>
Messagebox [成功]:您在行会竞价板上花了【<$STR(G131)>】个元宝竞得。
GuildNoticeMsg  241 161 【<$USERNAME>】在竞价板为行会【<$STR(A30)>】竞得,大家赶快来加入这个有实力的行会吧!
GOTO @Main
BREAK
#ELSEACT
Messagebox [失败]:您的元宝不足或者您没有行会
[@jrxh]
#if
equal G109 1
#act
messagebox 对不起,本行会暂时不收人
break
#if
CHECKLEVELEX < <$STR(G108)>
#act
messagebox 等级不够!
break
#IF
ISGUILDMASTER
#ACT
Messagebox [失败]:您现在是行会掌门不能在加入其他行会!!
break
#IF
equal A30 <$GUILDNAME>
#ACT
Messagebox [失败]:您现在已经是【<$STR(A30)>】的行会成员了!!
break
#ELSEACT
goto @jrxh3
[@jrxh3]
#IF
HAVEGUILD
#ACT
Messagebox [失败]:你已经有行会了,请先出退行会!
#ELSEACT
goto @jrxh4
[@jrxh4]
#IF
equal A30
#ACT
Messagebox [失败]:现在还没行会竟价格
#ELSEACT
AddGuildMember <$STR(A30)>
GuildNoticeMsg   70 161  恭喜【<$USERNAME>】通过【天下第一行会】NPC加入了行会【<$STR(A30)>】
break
[@竞标台管理]
#if
ISGUILDMASTER
equal A30 <$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 关闭
goto @竞标台管理
break
#if
equal g109 1
#act
mov g109 0
messagebox 行会收人状态→开放
mov S10 开放
goto @竞标台管理
break
[@InPutString5]
#if
#act
mov S5 <$STR(S5)>
goto @竞标台管理
messagebox 你已修改公告内容!
break
[@InPutInteger71]
#if
#act
goto @竞标台管理
messagebox 修改等级要求成功!
break
描述
快速回复

如果您在写长篇帖子又不马上发表,建议存为草稿
认证码:

验证问题:
本站地址是? 正确答案:1opk.com
 回复后跳转到最后一页