当前位置: 主页 > 传奇信息资讯 > 传奇开服 > 我受三大门主所托,在此招贤纳士脚本传奇搜服

我受三大门主所托,在此招贤纳士脚本传奇搜服

发布时间:2015-12-17 20:13内容来源:sf999点击:

(@@InPutString @@InPutInteger)
[@main]
#IF
EQUAL H2 0
#ACT
MOV H2 200

#IF
EQUAL H4 0
#ACT
MOV H4 100

#IF
EQUAL H6 0
#ACT
MOV H6 50

#IF
#SAY
<COLOR=clLime 我受三大门主所托,在此招贤纳士>(<查看细则/@详情>):\
<COLOR=clFuchsia 1.行会>:<$STR(A70)> 要求<$STR(H1)>级,掌门:<$STR(A71)>\
╚<我要加入此行会/@入会1><COLOR=clLime (免费)>              <我要委托收人/@位置1>(需<$STR(H2)>元宝)\  \
<COLOR=clAqua 2.行会>:<$STR(A72)> 要求<$STR(H3)>级,掌门:<$STR(A73)>\
╚<我要加入此行会/@入会2><COLOR=clLime (免费)>              <我要委托收人/@位置2>(需<$STR(H4)>元宝)\  \
<COLOR=clRed 3.行会>:<$STR(A74)> 要求<$STR(H5)>级,掌门:<$STR(A75)>\
╚<我要加入此行会/@入会3><COLOR=clLime (免费)>              <我要委托收人/@位置3>(需<$STR(H6)>元宝)\  \
 


[@详情]
各掌门可以委托我收人。只需要设置入会的最低等级要求。\
因能力有限,我只接受三个门派的委托。这里有三个位置\
请各掌门根据自已的实力选择位置,注意如果有人加价,\
你的收人广告位置就被抢了。。。之前的委托金不退还。\
你若不同意此声明,请不要申请位置。  \


[@入会1]
#IF
HaveGuild
#ACT
MESSAGEBOX 你有行会就别来趁热闹了!
BREAK

#IF
EQUAL A70
#ACT
MESSAGEBOX 你想遁入空门?!
BREAK

#IF
CHECKLEVELEX ? <$STR(H1)>
#ACT
AFFILIATEGUILD <$STR(A70)>


[@入会2]
#IF
HaveGuild
#ACT
MESSAGEBOX 你有行会就别来趁热闹了!
BREAK

#IF
EQUAL A72
#ACT
MESSAGEBOX 你想遁入空门?!
BREAK

#IF
CHECKLEVELEX ? <$STR(H3)>
#ACT
AFFILIATEGUILD <$STR(A72)>

[@入会3]
#IF
HaveGuild
#ACT
MESSAGEBOX 你有行会就别来趁热闹了!
BREAK

#IF
EQUAL A74
#ACT
MESSAGEBOX 你想遁入空门?!
BREAK

#IF
CHECKLEVELEX ? <$STR(H5)>
#ACT
AFFILIATEGUILD <$STR(A74)>


[@位置1]
#IF
IsGuildMaster
#SAY
抢夺位置,每次至少加价1元宝。\
①号位置的当前竞价是:<$STR(H2)>元宝\
请输入你的<出价/@@InPutInteger51>
#ELSEACT
MESSAGEBOX 你不是掌门,不能委托收人


[@@InPutInteger51]
#IF
#ACT
DELAYGOTO 1 ~InPutInteger51

[~InPutInteger51]
#IF
CHECKGAMEGOLD ? <$STR(M51)>
LARGE M51 <$STR(H2)>
#ACT
MOV H2 <$STR(M51)>
GAMEGOLD - <$STR(H2)>
MOV A70 <$GUILDNAME>
MOV A71 <$USERNAME>
INC A71 ;
INC A71 <$LEVEL>
INC A71 级;
SENDMSG 2 <$GUILDNAME>掌门<$USERNAME>委托我收人,想入会的来。。。
SENDMSG 0 <$GUILDNAME>掌门<$USERNAME>委托我收人,想入会的来。。。 252 255 50
SENDMSG 0 <$GUILDNAME>掌门<$USERNAME>委托我收人,想入会的来。。。 252 255 50
#SAY
<设置最低等级要求/@@InPutInteger52>
#ELSESAY
抱歉,你的元宝不足<$STR(M51)>.

[@位置2]
#IF
IsGuildMaster
#SAY
抢夺位置,每次至少加价1元宝。\
②号位置的当前竞价是:<$STR(H4)>元宝\
请输入你的<出价/@@InPutInteger53>
#ELSEACT
MESSAGEBOX 你不是掌门,不能委托收人

[@@InPutInteger53]
#IF
#ACT
DELAYGOTO 1 ~InPutInteger53

[~InPutInteger53]
#IF
CHECKGAMEGOLD ? <$STR(M53)>
LARGE M53 <$STR(H4)>
#ACT
MOV H4 <$STR(M53)>
GAMEGOLD - <$STR(H4)>
MOV A72 <$GUILDNAME>
MOV A73 <$USERNAME>
INC A73 ;
INC A73 <$LEVEL>
INC A73 级;
SENDMSG 2 <$GUILDNAME>掌门<$USERNAME>委托我收人,想入会的来。。。
SENDMSG 0 <$GUILDNAME>掌门<$USERNAME>委托我收人,想入会的来。。。 252 255 50
SENDMSG 0 <$GUILDNAME>掌门<$USERNAME>委托我收人,想入会的来。。。 252 255 50
#SAY
<设置最低等级要求/@@InPutInteger54>
#ELSESAY
抱歉,你的元宝不足<$STR(M53)>.

顶一下
(0)
0%
踩一下
(0)
0%
------分隔线----------------------------
  • 挑错
  • 打印