作者:传奇之家类别:开服视频教材
更新:2023-09-17查看次数:147
(@@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)\
╚我要加入此行会/@入会1COLOR=clLime (白手) 我要委托收人/@位置1(需$STR(H2)元宝)\ \
COLOR=clAqua 2.行会:$STR(A72) 要求$STR(H3)级,掌门:$STR(A73)\
╚我要加入此行会/@入会2COLOR=clLime (白手) 我要委托收人/@位置2(需$STR(H4)元宝)\ \
COLOR=clRed 3.行会:$STR(A74) 要求$STR(H5)级,掌门:$STR(A75)\
╚我要加入此行会/@入会3COLOR=clLime (白手) 我要委托收人/@位置3(需$STR(H6)元宝)\ \
[@详情]
各掌门可以委托我收人。只需要设置入会的低等级要求。\
因能力有限,我只接受三个门派的委托。这里有三个位置\
请各掌门根据自已的实力选择位置,注意如果有人加价,\
你的收人广告位置就被抢了。。。之前的委托金不退还。\
你若不同意此声明,请不要申请位置。 \
[@入会1]
#IF
H呵呵eGuild
#ACT
MESSAGEBOX 你有行会就别来趁热闹了!
BREAK
#IF
EQUAL A70
#ACT
MESSAGEBOX 你想遁入空门?!
BREAK
#IF
CHECKLEVELEX ? $STR(H1)
#ACT
AFFILIATEGUILD $STR(A70)
[@入会2]
#IF
H呵呵eGuild
#ACT
MESSAGEBOX 你有行会就别来趁热闹了!
BREAK
#IF
EQUAL A72
#ACT
MESSAGEBOX 你想遁入空门?!
BREAK
#IF
CHECKLEVELEX ? $STR(H3)
#ACT
AFFILIATEGUILD $STR(A72)
[@入会3]
#IF
H呵呵eGuild
#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).
[@位置3]
#IF
IsGuildMaster
#SAY
抢夺位置,每次至少加价1元宝。\
③号位置的当前竞价是:$STR(H6)元宝\
请输入你的出价/@@InPutInteger55
#ELSEACT
MESSAGEBOX 你不是掌门,不能委托收人
[@@InPutInteger55]
#IF
#ACT
DELAYGOTO 1 ~InPutInteger55
[~InPutInteger55]
#IF
CHECKGAMEGOLD ? $STR(M55)
LARGE M55 $STR(H6)
#ACT
MOV H6 $STR(M55)
GAMEGOLD - $STR(H6)
MOV A74 $GUILDNAME
MOV A75 $USERNAME
INC A75 ;
INC A75 $LEVEL
INC A75 级;
SENDMSG 2 $GUILDNAME掌门$USERNAME委托我收人,想入会的来。。。
SENDMSG 0 $GUILDNAME掌门$USERNAME委托我收人,想入会的来。。。 252 255 50
SENDMSG 0 $GUILDNAME掌门$USERNAME委托我收人,想入会的来。。。 252 255 50
#SAY
设置低等级要求/@@InPutInteger56
#ELSESAY
抱歉,你的元宝不足$STR(M55).
[@@InPutInteger52]
#IF
#ACT
DELAYGOTO 1 ~InPutInteger52
[~InPutInteger52]
#IF
#SAY
恭喜你.设置醉底等级要求成功!
#ACT
MOV H1 $STR(M52)
[@@InPutInteger54]
#IF
#ACT
DELAYGOTO 1 ~InPutInteger54
[~InPutInteger54]
#IF
#SAY
恭喜你.设置醉底等级要求成功!
#ACT
MOV H3 $STR(M54)
[@@InPutInteger56]
#IF
#ACT
DELAYGOTO 1 ~InPutInteger56
[~InPutInteger56]
#IF
#SAY
恭喜你.设置醉底等级要求成功!
#ACT
MOV H5 $STR(M56)