很好的一个元宝竞价获得地图经营权的脚本

传奇服务端

元宝竞价

;变量 A451 为竞价位1当前经营者
;变量 g55  为竞价位1当前竞价元宝数
;变量 G407 为竞价位1当前经营收入

;变量 A551 为竞价位2当前经营者
;变量 g65  为竞价位2当前竞价元宝数
;变量 G507 为竞价位2当前经营收入

[@招商地]
--地盘名称---------赞助商名称--------竞价赞助--\  \

<★/AUTOCOLOR=249,254,250,253,252,251><牛运当头/@当头>---------<★/AUTOCOLOR=249,254,250,253,252,251><$str(A451)>------<竞价中。。。/@招商> \
<★/AUTOCOLOR=249,254,253,252,251><元宝升级/@当头1>---------<★/AUTOCOLOR=249,254,250,252,251><$str(A551)>------<竞价中。。。/@招商1>

[@招商]
玩家如果有足够的元宝可以竞价获得本地图经营权：\
本地图的经营权起拍价格为10元宝，每次竞拍+10元宝。 \
注意：合区后我们将无条件收回本地图的经营权\ \

当前地图的经营者是 <$str(A451)> 竞拍价格是 <$str(g55)>元宝\
如果你想竞拍获得本地图的经营权你必须付出 <$str(g55)>+10个元宝\ \

<我要竞拍/@买下>          <返回/@招商地>


[@招商1]
玩家如果有足够的元宝可以竞价获得本地图经营权：\
本地图的经营权起拍价格为10元宝，每次竞拍+10元宝。 \
注意：合区后我们将无条件收回本地图的经营权\ \

当前地图的经营者是 <$str(A551)> 竞拍价格是 <$str(g65)>元宝\
如果你想竞拍获得本地图的经营权你必须付出 <$str(g65)>+10个元宝\ \

<我要竞拍/@买下1>          <返回/@招商地>


[@买下]
#IF
CHECKGAMEGOLD > 10
CHECKGAMEGOLD > <$str(g55)>
#ACT
mov g56 2
gamegold - <$str(g55)>
gamegold - 10
inc g55 10
mov A451 <$USERNAME>
sendmsg 0 玩家"%s"花费<$str(g55)>个元宝，竞拍获得地图《牛运当头》的经营权！
#elseact
MESSAGEBOX 【提示】:你的元宝不够。

[@买下1]
#IF
CHECKGAMEGOLD > 10
CHECKGAMEGOLD > <$str(g65)>
#ACT
mov g66 2
gamegold - <$str(g65)>
gamegold - 10
inc g65 10
mov A551 <$USERNAME>
sendmsg 0 玩家"%s"花费<$str(g65)>个元宝，竞拍获得地图《元宝升级地图》的经营权！
#elseact
MESSAGEBOX 【提示】:你的元宝不够。


[@当头]
----------本领地主人是 ★<$str(A451)>★ ------------------\
进入本地图需要向领地主人★<$str(A451)>★缴纳 <$str(g56)>元宝 的费用：\
本地图内刷全服所有怪物，可暴出本服所有终极装备\
该领地目前收入为：<$STR(G407)>元宝。\ \ \
<★/AUTOCOLOR=249,254,250,253,252,251><进入牛运当头/@进入牛运当头>     <★/AUTOCOLOR=249,254,250,253,252,251><提取领地收入/@提取镜像神殿>   
<★/AUTOCOLOR=249,254,250,253,252,251><管理领地/@管理领地>\
[@管理领地]
#IF
#ACT
MOV S97 <$USERNAME>
GOTO @领主检测8
[@领主检测8]
#IF
EQUAL S97 <$str(A451)>
#SAY
你好！在这里你可以自由的管理你的领地\ \
<设置进入元宝数/@设置进入>
#ELSEACT
MESSAGEBOX 【提示】:抱歉，您不是该地图的主人!

[@当头1]
----------本领地主人是 ★<$str(A551)>★ ------------------\
进入本地图需要向领地主人★<$str(A551)>★缴纳 <$str(g66)>元宝 的费用：\
本地图内可用元宝快速升级\
该领地目前收入为：<$STR(G507)>元宝。\ \ \
<★/AUTOCOLOR=249,254,250,253,252,251><进入元宝升级/@进入牛运当头1>     <★/AUTOCOLOR=249,254,250,253,252,251><提取领地收入/@提取升级>   
<★/AUTOCOLOR=249,254,250,253,252,251><管理领地/@管理领地1>\
[@管理领地1]
#IF
#ACT
MOV S107 <$USERNAME>
GOTO @领主检测99
[@领主检测99]
#IF
EQUAL S107 <$str(A551)>
#SAY
你好！在这里你可以自由的管理你的领地\ \
<设置进入元宝数/@设置进入1>
#ELSEACT
MESSAGEBOX 【提示】:抱歉，您不是该地图的主人!

[@刷怪]
你可以随意设置领地里的怪物，不过不同系列的怪物将收取不同的元宝。 \ \
<狂风魔/@狂风魔>400元宝      <秦始皇/@秦始皇>500元宝 \

[@设置进入]
你可以随意设置进入你的领地所要支付的元宝数量\ \

<2元宝/@2元宝> <5元宝/@5元宝> <10元宝/@10元宝> <20元宝/@20元宝> <50元宝/@50元宝> <返回/@招商地>

[@2元宝]
#IF
#ACT
mov g56 2
GuildNoticeMsg 249 251 <$str(A451)>强烈推荐所有玩家进入由他赞助的领地，现在进入价格为2元宝！

[@5元宝]
#IF
#ACT
mov g56 5
GuildNoticeMsg 249 251 <$str(A451)>强烈推荐所有玩家进入由他赞助的领地，现在进入价格为5元宝！

[@10元宝]
#IF
#ACT
mov g56 10
GuildNoticeMsg 249 251 <$str(A451)>强烈推荐所有玩家进入由他赞助的领地，现在进入价格为10元宝！

[@20元宝]
#IF
#ACT
mov g56 20
GuildNoticeMsg 249 251 <$str(A451)>强烈推荐所有玩家进入由他赞助的领地，现在进入价格为20元宝！
[@50元宝]
#IF
#ACT
mov g56 50
GuildNoticeMsg 249 251 <$str(A451)>强烈推荐所有玩家进入由他赞助的领地，现在进入价格为50元宝！

[@设置进入1]
你可以随意设置进入你的领地所要支付的元宝数量\ \

<2元宝/@233元宝> <5元宝/@533元宝> <10元宝/@1033元宝> <20元宝/@2033元宝> <50元宝/@5033元宝> <返回/@招商地>

[@233元宝]
#IF
#ACT
mov g66 2
GuildNoticeMsg 249 251 <$str(A551)>强烈推荐所有玩家进入由他赞助的领地，现在进入价格为2元宝！

[@533元宝]
#IF
#ACT
mov g66 5
GuildNoticeMsg 249 251 <$str(A551)>强烈推荐所有玩家进入由他赞助的领地，现在进入价格为5元宝！

[@1033元宝]
#IF
#ACT
mov g66 10
GuildNoticeMsg 249 251 <$str(A551)>强烈推荐所有玩家进入由他赞助的领地，现在进入价格为10元宝！

[@2033元宝]
#IF
#ACT
mov g66 20
GuildNoticeMsg 249 251 <$str(A551)>强烈推荐所有玩家进入由他赞助的领地，现在进入价格为20元宝！
[@5033元宝]
#IF
#ACT
mov g66 50
GuildNoticeMsg 249 251 <$str(A551)>强烈推荐所有玩家进入由他赞助的领地，现在进入价格为50元宝！


[@进入牛运当头]
#IF
CHECKGAMEGOLD > <$str(g56)>
#ACT
gamegold - <$str(g56)>
INC G407 <$str(g56)>
mapmove D613a 17 14
give 回城卷
GuildNoticeMsg 249 251 玩家『%s』进入了由≮<$str(A451)>≯赞助开放的地图〖牛运当头〗！
#elseact
MESSAGEBOX 【提示】:你没有2元宝的费用！
BREAK
[@进入牛运当头1]
#IF
CHECKGAMEGOLD > <$str(g66)>
#ACT
gamegold - <$str(g66)>
INC G507 <$str(g66)>
mapmove G012 41 36
give 回城卷
GuildNoticeMsg 249 251 玩家『%s』进入了由≮<$str(A551)>≯赞助开放的地图〖元宝升级地图〗！
#elseact
MESSAGEBOX 【提示】:你没有足够的元宝！
BREAK
[@查看镜像神殿]
#IF
#SAY
该领地目前收入为：<$STR(G407)>元宝。
[@提取镜像神殿]
#IF
#ACT
MOV S97 <$USERNAME>
GOTO @领主检测7
[@领主检测7]
#IF
EQUAL S97 <$str(A451)>
#ACT
GAMEGOLD + <$STR(G407)>
GuildNoticeMsg 249 251 由≮<$str(A451)>≯赞助开放的地图〖牛运当头〗目前收入为<$STR(G407)>元宝！
MOV G407 0
#ELSEACT
MESSAGEBOX 【提示】:抱歉，您不是该地图的主人，无法领取资金！
[@提取升级]
#IF
#ACT
MOV S107 <$USERNAME>
GOTO @领主升级
[@领主升级]
#IF
EQUAL S107 <$str(A551)>
#ACT
GAMEGOLD + <$STR(G507)>
GuildNoticeMsg 249 251 由≮<$str(A551)>≯赞助开放的地图〖元宝升级地图〗目前收入为<$STR(G507)>元宝！
MOV G507 0
#ELSEACT
MESSAGEBOX 【提示】:抱歉，您不是该地图的主人，无法领取资金！