升级
  100%
TA的每日心情 | 奋斗 昨天 07:59 |
|---|
签到天数: 330 天 [LV.8]以坛为家I
管理员
  
- 积分
- 9302
|
80家族网:本站力求让你一站在手资源全有!
这是一个行会管理集一身的脚本,包含了行会竞价、加入第一行会、创建行会。
此脚本是在版本拔下来的,感觉不错分享给大家(素材已打包,到底下载)。
脚本内容:
[@main]
#if
#ACT
#if
#Act
MOV P90 10000
OPENMERCHANTBIGDLG 71 335 1 4 0 -100 1 580 15 1
#SAY
<>\ \
<>\ \
<> <INPUTTEXT:1:375:210:128:15:0:250:254:8:14:字符最少4字、最大7字:行会创建[4-7个汉字]:250> <INPUTTEXT:144:11380:11405:128:15:0:250:254:4:7:创建需要1W元宝:行会创建:160> \
<><ImgEx:143:240:241:240:85:220|249#竞标第一行会^250#装逼必备/@@InPutInteger10(第一次竞标1000魔币起,之后大于竞拍价格即可:)> <ImgEx:143:242:243:242:85:220|249#加入第一行会^250#加入此行会/@加入行会> <ImgEx:143:244:245:244:85:220:1|249#行会创建^250#用心凝聚每一份情谊^250#创建需要5000魔币/@创建行会>\
<> <Text: <$STR(A95)> :48:30{FCOLOR=191}>\ \
<> <Text: <$STR(G93)> :48:30{FCOLOR=191}>\ \
<> <Text: <$STR(G91)> |点击设置:48:30{FCOLOR=191}/@@InPutInteger12>\ \
<> <Text: <$STR(A91)> |点击设置:48:30{FCOLOR=191}/@是否加入>\ \
<>\
<> \
<> \ \
<> \
<> \
<> \
<> \
<> \
;<解散/@解散>
[@初始]
#act
MOV A95 暂无
MOV A94 暂无
MOV G93 0
MOV A92 [<$STR(A94)>]\天下第一行会\[<$STR(A95)>]\第一会长
MOV A91 暂无行会
MOV G91 0
goto @main
[@解散]
#IF
ISGUILDMASTER
#ACT
Gmexecute 删除行会 <$GUILDNAME>
close
#ELSEACT
MESSAGEBOX 提示:您还不是行会老大,无法使用此服务!
;--------------------------------------
[@创建行会]
#IF
CHECKGAMEDIAMOND > 4999
NOT HAVEGUILD
#ACT
GAMEDIAMOND - 5000
Gmexecute 增加行会 <$NPCINPUT(1)> <$USERNAME>
goto @main
break
#ELSEACT
MESSAGEBOX 你已经有行会了,或者魔币不足!
[@InPutInteger10]
#if
NOT HAVEGUILD
#act
Messagebox 你没加入行会
break
#if
NOT ISGUILDMASTER
#act
Messagebox 你不是行会老大
break
#if
LARGE P80 <$STR(N10)>
#ACT
Messagebox 请输入500以上的,当前输入<$STR(N10)>,以后输入要比竞争价格更高
break
#if
SMALL <$STR(N10)> <$STR(G93)>
#ACT
Messagebox 当前金额小于当前竞拍价格
break
#IF
CHECKGAMEDIAMOND > 999
#ACT
GAMEDIAMOND - <$STR(N10)>
mov A95 <$GUILDNAME>
mov A94 <$USERNAME>
MOV G93 <$STR(N10)>
MOV A92 [<$STR(A94)>]\天下第一行会\[<$STR(A95)>]\第一会长
MOV A91 开启
Messagebox [成功]:您在行会竞价板上花了【<$STR(N10)>】个魔币。
GuildNoticeMsg 251 0 {(天下第一行会)===>>|249:0}{★伟大的行会掌门★|254:0}{ <$USERNAME> |255:253}{ 在行会竞标为 |58:0}{|249:0}{〖 <$STR(A95)> 〗|255:253}{ 竞得天下第一行会....|58:0}
GuildNoticeMsg 251 0 {(天下第一行会)===>>|249:0}{★伟大的行会掌门★|254:0}{ <$USERNAME> |255:253}{ 在行会竞标为 |58:0}{|249:0}{〖 <$STR(A95)> 〗|255:253}{ 竞得天下第一行会....|58:0}
GuildNoticeMsg 251 0 {(天下第一行会)===>>|249:0}{★伟大的行会掌门★|254:0}{ <$USERNAME> |255:253}{ 在行会竞标为 |58:0}{|249:0}{〖 <$STR(A95)> 〗|255:253}{ 竞得天下第一行会....|58:0}
GuildNoticeMsg 251 0 {(天下第一行会)===>>|249:0}{★伟大的行会掌门★|254:0}{ <$USERNAME> |255:253}{ 在行会竞标为 |58:0}{|249:0}{〖 <$STR(A95)> 〗|255:253}{ 竞得天下第一行会....|58:0}
GuildNoticeMsg 251 0 {(天下第一行会)===>>|249:0}{★伟大的行会掌门★|254:0}{ <$USERNAME> |255:253}{ 在行会竞标为 |58:0}{|249:0}{〖 <$STR(A95)> 〗|255:253}{ 竞得天下第一行会....|58:0}
GOTO @main
BREAK
[@是否加入]
#if
NOT ISGUILDMASTER
#act
Messagebox 你不是行会掌门
break
#if
NOT equal A95 <$GUILDNAME>
#act
Messagebox 你不是第一行会老大!无法管理!
break
#if
equal A91 开启
#act
mov A91 关闭
goto @main
#ELSEACT
mov A91 开启
goto @main
[@InPutInteger12]
#if
NOT ISGUILDMASTER
#act
Messagebox 你不是行会掌门
break
#if
NOT equal A95 <$GUILDNAME>
#act
Messagebox 你不是第一行会老大!无法管理!
break
#if
LARGE N12 100
#act
messagebox 修改等级要求不得大于100级!
BREAK
#if
#act
mov G91 <$STR(N12)>
goto @main
messagebox 修改等级要求成功!
break
[@加入行会]
#if
equal A91 关闭
#act
messagebox 对不起,本行会暂时不收人
break
#if
CHECKLEVELEX < <$STR(G91)>
#act
messagebox 等级不够!对方行会掌门设置了【<$STR(G91)>】级才可以加入!
break
#IF
ISGUILDMASTER
#ACT
Messagebox [失败]:您现在是行会掌门不能在加入其他行会!!
break
#IF
equal A95 <$GUILDNAME>
#ACT
Messagebox [失败]:您现在已经是【<$STR(A95)>】的行会成员了!!
break
#IF
equal A95 暂无
#ACT
Messagebox [失败]:现在还没行会竟价格
break
#IF
HAVEGUILD
#ACT
Gmexecute 退出门派
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
#ACT
Gmexecute 退出门派
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
|
上一篇:装备加星强化炉-装备加星脚本-80家族网下一篇:GOM引擎完整的二级密码脚本-80家族网
|