立即注册 找回密码
查看: 2372|回复: 20

传奇行会自助招人的简洁脚本

[复制链接]

1万

主题

1619

回帖

5万

积分

管理员

芝麻GM论坛站长www.5s98.com

Rank: 9Rank: 9Rank: 9

积分
57722
QQ
发表于 2017-4-2 16:21:07 | 显示全部楼层 |阅读模式
(@@InPutInteger @@InPutString @InPutInteger @InPutString @storage @getback @getnextpage @getPreviouspage)
[@main]
#IF
NOT ISGUILDMASTER
#ACT
OPENMERCHANTBIGDLG 1 493 1 4 0 0 20 390 7
MOV <$STR(S$行会一名字)> <$STR(A30)>
MOV <$STR(S$行会二名字)> <$STR(A40)>
MOV <$STR(S$行会三名字)> <$STR(A50)>
SetStringBlank <$STR(S$行会一名字)> 14 1
SetStringBlank <$STR(S$行会二名字)> 14 1
SetStringBlank <$STR(S$行会三名字)> 14 1
#SAY

                  <行会自助招人/AUTOCOLOR=250>\ \
<------------------------------------------------------------------/AUTOCOLOR=14> \
 <【天下第一行会】/AUTOCOLOR=249>:<$STR(S$行会一名字)><【招募】/AUTOCOLOR=249>:<$STR(A32)>   <【竞价】/AUTOCOLOR=249>:<$STR(G30)> \  \
 <【天下第二行会】/AUTOCOLOR=253>:<$STR(S$行会二名字)><【招募】/AUTOCOLOR=253>:<$STR(A42)>   <【竞价】/AUTOCOLOR=253>:<$STR(G40)> \  \
 <【天下第三行会】/AUTOCOLOR=146>:<$STR(S$行会三名字)><【招募】/AUTOCOLOR=146>:<$STR(A52)>   <【竞价】/AUTOCOLOR=146>:<$STR(G50)> \
<------------------------------------------------------------------/AUTOCOLOR=14> \
     <您需支付高于天下第一行会竞标价格10000元宝即可竞标成功/AUTOCOLOR=250>\ \

 <加入天下第一行会/@加入行会1>       <加入天下第二行会/@加入行会2>       <加入天下第三行会/@加入行会3>
#ELSEACT
OPENMERCHANTBIGDLG 1 493 1 4 0 0 20 390 7
MOV <$STR(S$行会一名字)> <$STR(A30)>
MOV <$STR(S$行会二名字)> <$STR(A40)>
MOV <$STR(S$行会三名字)> <$STR(A50)>
SetStringBlank <$STR(S$行会一名字)> 14 1
SetStringBlank <$STR(S$行会二名字)> 14 1
SetStringBlank <$STR(S$行会三名字)> 14 1
#elseSAY

                  <行会自助招人/AUTOCOLOR=250>\ \
<------------------------------------------------------------------/AUTOCOLOR=14> \
 <【天下第一行会】/AUTOCOLOR=249>:<$STR(S$行会一名字)><【招募】/AUTOCOLOR=249>:<$STR(A32)>   <【竞价】/AUTOCOLOR=249>:<$STR(G30)> \  \
 <【天下第二行会】/AUTOCOLOR=253>:<$STR(S$行会二名字)><【招募】/AUTOCOLOR=253>:<$STR(A42)>   <【竞价】/AUTOCOLOR=253>:<$STR(G40)> \  \
 <【天下第三行会】/AUTOCOLOR=146>:<$STR(S$行会三名字)><【招募】/AUTOCOLOR=146>:<$STR(A52)>   <【竞价】/AUTOCOLOR=146>:<$STR(G50)> \
<------------------------------------------------------------------/AUTOCOLOR=14> \
     <您需支付高于天下第一行会竞标价格10000元宝即可竞标成功/AUTOCOLOR=250>\ \

        <竞标天下第一行会/@竞标行会1>         <行会招募状态设置/@行会招募设置>

[@行会招募设置]
#if
equal <$GUILDNAME> <$STR(A30)>
#act
goto @天下第一行会开关
break

#if
equal <$GUILDNAME> <$STR(A40)>
#act
goto @天下第二行会开关
break

#if
equal <$GUILDNAME> <$STR(A50)>
#act
goto @天下第三行会开关
break

#elseact
messagebox \\\您的行会未登天下行会榜.


[@天下第一行会开关]
#if
equal A32 开启
#act
messagebox \\\您将关闭行会招募状态.确定关闭么?  @确定关闭天下第一行会 @取消
#elseact
messagebox \\\您将开启行会招募状态.确定开启么?  @确定开启天下第一行会 @取消


[@天下第二行会开关]
#if
equal A42 开启
#act
messagebox \\\您将关闭行会招募状态.确定关闭么?  @确定关闭天下第二行会 @取消
#elseact
messagebox \\\您将开启行会招募状态.确定开启么?  @确定开启天下第二行会 @取消

[@天下第三行会开关]
#if
equal A52 开启
#act
messagebox \\\您将关闭行会招募状态.确定关闭么?  @确定关闭天下第三行会 @取消
#elseact
messagebox \\\您将开启行会招募状态.确定开启么?  @确定开启天下第三行会 @取消



[@确定关闭天下第一行会]
#act
MOV A32 关闭
GuildNoticeMsg 249 251 【<$USERNAME>】统治的天下第一行会【<$STR(A30)>】已经关闭招募状态.想投奔的下次请早!
GuildNoticeMsg 249 251 【<$USERNAME>】统治的天下第一行会【<$STR(A30)>】已经关闭招募状态.想投奔的下次请早!
GuildNoticeMsg 249 251 【<$USERNAME>】统治的天下第一行会【<$STR(A30)>】已经关闭招募状态.想投奔的下次请早!
GuildNoticeMsg 249 251 【<$USERNAME>】统治的天下第一行会【<$STR(A30)>】已经关闭招募状态.想投奔的下次请早!
goto @main

[@确定开启天下第一行会]
#act
MOV A32 开启
GuildNoticeMsg 249 251 【<$USERNAME>】统治的天下第一行会【<$STR(A30)>】已经开启招募状态.想投奔赶快了!
GuildNoticeMsg 249 251 【<$USERNAME>】统治的天下第一行会【<$STR(A30)>】已经开启招募状态.想投奔赶快了!
GuildNoticeMsg 249 251 【<$USERNAME>】统治的天下第一行会【<$STR(A30)>】已经开启招募状态.想投奔赶快了!
GuildNoticeMsg 249 251 【<$USERNAME>】统治的天下第一行会【<$STR(A30)>】已经开启招募状态.想投奔赶快了!
goto @main



[@确定关闭天下第二行会]
#act
MOV A42 关闭
GuildNoticeMsg 253 0 【<$USERNAME>】统治的天下第二行会【<$STR(A40)>】已经关闭招募状态.想投奔的下次请早!
GuildNoticeMsg 253 0 【<$USERNAME>】统治的天下第二行会【<$STR(A40)>】已经关闭招募状态.想投奔的下次请早!
GuildNoticeMsg 253 0 【<$USERNAME>】统治的天下第二行会【<$STR(A40)>】已经关闭招募状态.想投奔的下次请早!
GuildNoticeMsg 253 0 【<$USERNAME>】统治的天下第二行会【<$STR(A40)>】已经关闭招募状态.想投奔的下次请早!
goto @main

[@确定开启天下第二行会]
#act
MOV A42 开启
GuildNoticeMsg 253 0 【<$USERNAME>】统治的天下第二行会【<$STR(A40)>】已经开启招募状态.想投奔赶快了!
GuildNoticeMsg 253 0 【<$USERNAME>】统治的天下第二行会【<$STR(A40)>】已经开启招募状态.想投奔赶快了!
GuildNoticeMsg 253 0 【<$USERNAME>】统治的天下第二行会【<$STR(A40)>】已经开启招募状态.想投奔赶快了!
GuildNoticeMsg 253 0 【<$USERNAME>】统治的天下第二行会【<$STR(A40)>】已经开启招募状态.想投奔赶快了!
goto @main


[@确定关闭天下第三行会]
#act
MOV A52 关闭
GuildNoticeMsg 146 0 【<$USERNAME>】统治的天下第三行会【<$STR(A50)>】已经关闭招募状态.想投奔的下次请早!
GuildNoticeMsg 146 0 【<$USERNAME>】统治的天下第三行会【<$STR(A50)>】已经关闭招募状态.想投奔的下次请早!
GuildNoticeMsg 146 0 【<$USERNAME>】统治的天下第三行会【<$STR(A50)>】已经关闭招募状态.想投奔的下次请早!
GuildNoticeMsg 146 0 【<$USERNAME>】统治的天下第三行会【<$STR(A50)>】已经关闭招募状态.想投奔的下次请早!
goto @main

[@确定开启天下第三行会]
#act
MOV A52 开启
GuildNoticeMsg 146 0 【<$USERNAME>】统治的天下第三行会【<$STR(A50)>】已经开启招募状态.想投奔赶快了!
GuildNoticeMsg 146 0 【<$USERNAME>】统治的天下第三行会【<$STR(A50)>】已经开启招募状态.想投奔赶快了!
GuildNoticeMsg 146 0 【<$USERNAME>】统治的天下第三行会【<$STR(A50)>】已经开启招募状态.想投奔赶快了!
GuildNoticeMsg 146 0 【<$USERNAME>】统治的天下第三行会【<$STR(A50)>】已经开启招募状态.想投奔赶快了!
goto @main



[@竞标行会1]
#if
equal <$GUILDNAME> <$STR(A30)>
#act
messagebox \\\您已是天下第一行会老大.无需再次竞标.
break

#if
equal <$GUILDNAME> <$STR(A40)>
#act
MOV <$STR(N$竞标价格一)> <$STR(G30)>
INC <$STR(N$竞标价格一)> 10000
goto @二进一
break

#if
equal <$GUILDNAME> <$STR(A50)>
#act
MOV <$STR(N$竞标价格一)> <$STR(G30)>
INC <$STR(N$竞标价格一)> 10000
goto @三进一
break

#if
NOT equal <$GUILDNAME> <$STR(A30)>
NOT equal <$GUILDNAME> <$STR(A40)>
NOT equal <$GUILDNAME> <$STR(A50)>
#act
MOV <$STR(N$竞标价格一)> <$STR(G30)>
INC <$STR(N$竞标价格一)> 10000
goto @三进一
break



[@三进一]
#if
CHECKGAMEGOLD > <$STR(N$竞标价格一)>
#act
GAMEGOLD - <$STR(N$竞标价格一)>
MOV A50 <$STR(A40)>
MOV A52 <$STR(A42)>
MOV G50 <$STR(G40)>

MOV A40 <$STR(A30)>
MOV A42 <$STR(A32)>
MOV G40 <$STR(G30)>

MOV A30 <$GUILDNAME>
MOV A32 开启
MOV G30 <$STR(N$竞标价格一)>
GuildNoticeMsg 249 251 恭喜【<$USERNAME>】统治的行会【<$STR(A30)>】荣登【天下第一行会】
goto @main
#elseact
messagebox \\\您的元宝不足<$STR(N$竞标价格一)>.无法竞标天下第一行会


[@二进一]
#if
CHECKGAMEGOLD > <$STR(N$竞标价格一)>
#act
GAMEGOLD - <$STR(N$竞标价格一)>
MOV A40 <$STR(A30)>
MOV A42 <$STR(A32)>
MOV G40 <$STR(G30)>
MOV A30 <$GUILDNAME>
MOV A32 开启
MOV G30 <$STR(N$竞标价格一)>
GuildNoticeMsg 249 251 恭喜【<$USERNAME>】统治的行会【<$STR(A30)>】荣登【天下第一行会】
goto @main
#elseact
messagebox \\\您的元宝不足<$STR(N$竞标价格一)>.无法竞标天下第一行会










[@加入行会1]
#IF
HAVEGUILD
#ACT
Messagebox \\\您当前已经加入行会.请退出后在加入.
break
#if
NOT equal <$STR(A32)> 开启
#act
messagebox \\\天下第一行会未开启招募状态.
break
#OR
equal <$STR(A30)> 暂无行会竞标
equal <$STR(A30)>
#act
messagebox \\\当前天下第一行会无人竞标.
#elseact
ADDGUILDMEMBER <$STR(A30)>
GuildNoticeMsg 249 251 恭喜【<$USERNAME>】通过【行会大旗】加入了【天下第一行会】【<$STR(A30)>】

[@加入行会2]
#IF
HAVEGUILD
#ACT
Messagebox \\\您当前已经加入行会.请退出后在加入.
break
#if
NOT equal <$STR(A42)> 开启
#act
messagebox \\\天下第二行会未开启招募状态.
break
#OR
equal <$STR(A40)> 暂无行会竞标
equal <$STR(A40)>
#act
messagebox \\\当前天下第二行会无人竞标.
#elseact
ADDGUILDMEMBER <$STR(A40)>
GuildNoticeMsg 249 251 恭喜【<$USERNAME>】通过【行会大旗】加入了【天下第二行会】【<$STR(A40)>】


[@加入行会3]
#IF
HAVEGUILD
#ACT
Messagebox \\\您当前已经加入行会.请退出后在加入.
break
#if
NOT equal <$STR(A52)> 开启
#act
messagebox \\\天下第三行会未开启招募状态.
break
#OR
equal <$STR(A50)> 暂无行会竞标
equal <$STR(A50)>
#act
messagebox \\\当前天下第三行会无人竞标.
#elseact
ADDGUILDMEMBER <$STR(A50)>
GuildNoticeMsg 249 251 恭喜【<$USERNAME>】通过【行会大旗】加入了【天下第三行会】【<$STR(A50)>】







上一篇:芝麻版本库-传奇私服沙巴克城主特权系统
下一篇:芝麻版本库-传奇宝宝领养脚本传奇sf
芝麻GM论坛所有传奇版本均系正常开区的商业版本!用的好也请多帮我做一下宣传!~
本站有各机房服务器出租.域名出售.高速空间.有需要的请联系站长.站长QQ:164794989
芝麻论坛GM交流群:七群222746092八群213728287
回复

使用道具 举报

0

主题

1070

回帖

1376

积分

金牌会员

Rank: 6Rank: 6

积分
1376
发表于 2017-4-4 07:14:43 | 显示全部楼层
很好~~

回复 支持 反对

使用道具 举报

0

主题

991

回帖

1887

积分

金牌会员

Rank: 6Rank: 6

积分
1887
发表于 2017-4-4 22:52:57 | 显示全部楼层
路过,学习下

回复 支持 反对

使用道具 举报

0

主题

1237

回帖

1211

积分

金牌会员

Rank: 6Rank: 6

积分
1211
发表于 2017-4-5 03:03:32 | 显示全部楼层
有道理。。。

回复 支持 反对

使用道具 举报

0

主题

1373

回帖

1265

积分

金牌会员

Rank: 6Rank: 6

积分
1265
发表于 2017-4-5 09:19:33 | 显示全部楼层
支持支持再支持

回复 支持 反对

使用道具 举报

0

主题

996

回帖

1035

积分

金牌会员

Rank: 6Rank: 6

积分
1035
发表于 2017-4-5 11:56:24 | 显示全部楼层
我也来顶一下..

回复 支持 反对

使用道具 举报

2

主题

1255

回帖

1511

积分

金牌会员

Rank: 6Rank: 6

积分
1511
发表于 2017-4-5 15:04:26 | 显示全部楼层
相当不错,感谢无私分享精神!

回复 支持 反对

使用道具 举报

0

主题

1406

回帖

1786

积分

金牌会员

Rank: 6Rank: 6

积分
1786
发表于 2017-4-5 19:46:45 | 显示全部楼层
无论是不是沙发都得回复下

回复 支持 反对

使用道具 举报

1

主题

1119

回帖

1300

积分

金牌会员

Rank: 6Rank: 6

积分
1300
发表于 2017-4-5 21:20:31 | 显示全部楼层
报告!别开枪,我就是路过来看看的。。。

回复 支持 反对

使用道具 举报

0

主题

1444

回帖

1349

积分

金牌会员

Rank: 6Rank: 6

积分
1349
发表于 2017-4-6 04:06:30 | 显示全部楼层
传奇私服版本太多了,我都看眼花了,不知道选什么了

回复 支持 反对

使用道具 举报

您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

传奇单机服务端 X3.4 © 2022 免费私服版本下载

芝麻论坛打造行业第一传奇版本论坛,所有商业版本均免费开放下载,力争做行业最大的教程及版本发布基地,GM基地开传奇一条龙服务及商业服务端下载

免责声明:本站所有资源均来至网络,仅供学习交流,严禁用于商业用途,请于24小时内删除!