实用于LEGENDM2引擎的行会招人脚本新开传奇发布站
发布时间:2015-12-28 23:28
内容来源:sf999点击:次
(@@INPUTSTRING @@INPUTINTEGER)
%100
[@MAIN]
#IF
EQUAL H2 0
#ACT
MOV H2 600
#IF
EQUAL H4 0
#ACT
MOV H4 500
#IF
EQUAL H6 0
#ACT
MOV H6 300
#IF
#ACT
MOV S33 <COLOR=cllime
inc s33
inc s33 <$STR(A61)>
inc S33 >
MOV S34 <COLOR=cllime
inc s34
inc s34 <$STR(A63)>
inc S34 >
MOV S35 <COLOR=cllime
inc s35
inc s35 <$STR(A65)>
inc S35 >
#SAY
<查看细则/@概况>:\
1.行会名:【<$STR(S33)>】 需:<$STR(H1)>级,传奇私服,掌门:<$STR(A62)>\
╚<我要退出此行会/@入会1>(免费) <我要委托收人/@地位1>(需<$STR(H2)>元宝)\ \
2.行会名:【<$STR(S34)>】 需:<$STR(H3)>级,掌门:<$STR(A64)>\
╚<我要退出此行会/@入会2>(免费) <我要委托收人/@地位2>(需<$STR(H4)>元宝)\ \
3.行会名:【<$STR(S35)>】 需:<$STR(H5)>级,掌门:<$STR(A66)>\
╚<我要退出此行会/@入会3>(免费) <我要委托收人/@地位3>(需<$STR(H6)>元宝)\
[@概况]
各掌门可能委托我收人。只有要设置入会的最低等级要求。\
因才能有限,我只承受三个门派的委托。这里有三个地位\
请各掌门依据自已的实力抉择地位,留意假设有人加价,\
你的收人广告地位就被抢了。。。之前的委托金不退还。\
你若不赞同此申明,请不要央求地位。\
<前往/@main>
[@入会1]
#IF
HAVEGUILD
#ACT
MESSAGEBOX 你有行会就别来趁繁华了!
BREAK
#IF
EQUAL A61
#ACT
MESSAGEBOX 你想遁入空门?!
BREAK
#IF
CHECKLEVELEX ? <$STR(H1)>
#ACT
AFFILIATEGUILD <$STR(A61)>
#ELSEACT
MESSAGEBOX 需求等级[<$STR(H1)>]以上才可能退出该行会!
break
[@入会2]
#IF
HAVEGUILD
#ACT
MESSAGEBOX 你有行会就别来趁繁华了!
BREAK
#IF
EQUAL A63
#ACT
MESSAGEBOX 你想遁入空门?!
BREAK
#IF
CHECKLEVELEX ? <$STR(H3)>
#ACT
AFFILIATEGUILD <$STR(A63)>
#ELSEACT
MESSAGEBOX 需求等级[<$STR(H3)>]以上才可能退出该行会!
break
[@入会3]
#IF
HAVEGUILD
#ACT
MESSAGEBOX 你有行会就别来趁繁华了!
BREAK
#IF
EQUAL A65
#ACT
MESSAGEBOX 你想遁入空门?!
BREAK
#IF
CHECKLEVELEX ? <$STR(H5)>
#ACT
AFFILIATEGUILD <$STR(A65)>
#ELSEACT
MESSAGEBOX 需求等级[<$STR(H5)>]以上才可能退出该行会!
break
[@地位1]
#IF
ISGUILDMASTER
#SAY
抢夺地位,每次至少加价1元宝。\
①号地位的以后竞价是:<$STR(H2)>元宝\
请输入你的<出价/@@INPUTINTEGER61>
#ELSEACT
MESSAGEBOX 你不是掌门,不能委托收人
[@@INPUTINTEGER61]
#IF
#ACT
DELAYGOTO 1 ~INPUTINTEGER61
[~INPUTINTEGER61]
#IF
CHECKGAMEGOLD ? <$STR(M61)>
LARGE M61 <$STR(H2)>
#ACT
MOV H2 <$STR(M61)>
GAMEGOLD - <$STR(H2)>
MOV A61 <$GUILDNAME>
MOV A62 <$USERNAME>
INC A62 ;
INC A62 <$LEVEL>
INC A62 级!
SENDMSG 2 <$GUILDNAME>掌门<$USERNAME>委托我收人,想入会的来老兵旁点我。。。
#SAY
<设置最低等级要求/@@INPUTINTEGER62>
#ELSESAY
抱歉,你的元宝无余<$STR(M61)>.
[@地位2]
#IF
ISGUILDMASTER
#SAY
抢夺地位,每次至少加价1元宝。\
①号地位的以后竞价是:<$STR(H4)>元宝\
请输入你的<出价/@@INPUTINTEGER63>
#ELSEACT
MESSAGEBOX 你不是掌门,不能委托收人
[@@INPUTINTEGER63]
#IF
#ACT
DELAYGOTO 1 ~INPUTINTEGER63
[~INPUTINTEGER63]
#IF
CHECKGAMEGOLD ? <$STR(M63)>
LARGE M63 <$STR(H4)>
#ACT
MOV H4 <$STR(M63)>
GAMEGOLD - <$STR(H4)>
MOV A63 <$GUILDNAME>
MOV A64 <$USERNAME>
INC A64 ;
INC A64 <$LEVEL>
INC A64 级!
SENDMSG 2 <$GUILDNAME>掌门<$USERNAME>委托我收人,想入会的来老兵旁点我。。。
#SAY
<设置最低等级要求/@@INPUTINTEGER64>
#ELSESAY
抱歉,你的元宝无余<$STR(M63)>.
[@地位3]
#IF
ISGUILDMASTER
#SAY
抢夺地位,每次至少加价1元宝。\
①号地位的以后竞价是:<$STR(H6)>元宝\
请输入你的<出价/@@INPUTINTEGER65>
#ELSEACT
MESSAGEBOX 你不是掌门,不能委托收人
[@@INPUTINTEGER65]
#IF
#ACT
DELAYGOTO 1 ~INPUTINTEGER65
[~INPUTINTEGER65]
#IF
CHECKGAMEGOLD ? <$STR(M65)>
LARGE M65 <$STR(H6)>
#ACT
MOV H6 <$STR(M65)>
GAMEGOLD - <$STR(H6)>
MOV A65 <$GUILDNAME>
MOV A66 <$USERNAME>
INC A66 ;
INC A66 <$LEVEL>
INC A66 级!
SENDMSG 2 <$GUILDNAME>掌门<$USERNAME>委托我收人,想入会的来老兵旁点我。。。
#SAY
<设置最低等级要求/@@INPUTINTEGER66>
#ELSESAY
抱歉,你的元宝无余<$STR(M65)>.
[@@INPUTINTEGER62]
#IF
#ACT
DELAYGOTO 1 ~INPUTINTEGER62
[~INPUTINTEGER62]
#IF
#ACT
MOV H1 <$STR(M62)>
messagebox 你以后所设最低等级为:<$STR(M62)>级!
goto @MAIN
[@@INPUTINTEGER64]
#IF
#ACT
DELAYGOTO 1 ~INPUTINTEGER64
[~INPUTINTEGER64]
#IF
#ACT
MOV H3 <$STR(M64)>
messagebox 你以后所设最低等级为:<$STR(M64)>级!
goto @MAIN
[@@INPUTINTEGER66]
#IF
#ACT
DELAYGOTO 1 ~INPUTINTEGER66
[~INPUTINTEGER66]
#IF
#ACT
MOV H5 <$STR(M66)>
messagebox 你以后所设最低等级为:<$STR(M66)>级!
goto @MAIN |
------分隔线----------------------------