LEGM2引擎/BLUEM2引擎行会一键收人脚本

75kf论坛

(@@INPUTSTRING @@INPUTINTEGER @MDlgImgName=MerchantDlg.png)
%100
[@MAIN]
#IF
EQUAL H2 0
#ACT
MOV H2 10000
#IF
EQUAL H4 0
#ACT
MOV H4 5000
#IF
EQUAL H6 0
#ACT
MOV H6 1000
#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
<COLOR=clYellow ┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈>  \
<COLOR=clYellow 介绍:为了荣誉,为了兄弟,为了梦想中的沙城,全民皆开战！>\
<COLOR=clYellow 介绍:为了吸引更多的勇士参与到这场关于荣耀的战争中来！>\
<COLOR=clYellow 介绍:全服未加入行会的所有勇士都会收到消息,选择是否加入该行会>\
<COLOR=clLime 提示:每次发起一键收人全服提示.需要花费50000元宝.可设加入等级>\
<COLOR=clRed ------------------------------------------------------------>\
             <我要招揽全服勇士/@位置1>     <COLOR=clLime 必须行会掌门才能发起招募>\

?????????????????


[@位置1]
#IF
ISGUILDMASTER
#SAY
每次招人需要50000元宝.<请设置最低等级要求/@@INPUTINTEGER62>\
#ELSEACT
MESSAGEBOX 你不是掌门，不能委托收人

[@@INPUTINTEGER62]
#IF
ISGUILDMASTER
#ACT
DELAYGOTO 1 ~INPUTINTEGER62
[~INPUTINTEGER62]
#IF
CHECKGAMEGOLD > 49999
#ACT
GAMEGOLD - 50000
MOV H1 <$STR(M62)>
messagebox 你当前所设最低等级为:<$STR(M62)>级!
goto @MAIN
#SAY
<开始招人/@招人> \
#ELSESAY
你没有50000元宝




[@招人]
#IF
#ACT
MOV H2 <$STR(M61)>
MOV A61 <$GUILDNAME>
MOV A62 <$USERNAME>
INC A62 ；
INC A62 <$LEVEL>
INC A62 级！
Gmexecute 开始提问 @行会召唤
SENDMSG 0 【<$GUILDNAME>】掌门【<$USERNAME>】发起了行会招人令，想入会的赶快加入吧。。。 250 0 30
SENDMSG 0 【<$GUILDNAME>】掌门【<$USERNAME>】发起了行会招人令，想入会的赶快加入吧。。。 250 0 30
SENDMSG 0 【<$GUILDNAME>】掌门【<$USERNAME>】发起了行会招人令，想入会的赶快加入吧。。。 250 0 30
#SAY
恭喜你发起行会招人成功！


[@@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





[@入会1]
#IF
HAVEGUILD
#ACT
MESSAGEBOX 你有行会就别来趁热闹了！
BREAK
#IF
EQUAL A61
#ACT
MESSAGEBOX 你想遁入空门？！
BREAK
#IF
CHECKLEVELEX ? <$STR(H1)>
#ACT
Gmexecute 退出门派
Gmexecute 加入门派
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
Gmexecute 退出门派
Gmexecute 加入门派
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
Gmexecute 退出门派
Gmexecute 加入门派
AFFILIATEGUILD <$STR(A65)>
#ELSEACT
MESSAGEBOX 需要等级[<$STR(H5)>]以上才可以加入该行会！
break