GM部落 发表于 2015-3-27 18:22:15

传奇拍卖系统脚本（拍卖行）

传奇拍卖系统脚本提取GM部落传奇服务端中适合在游戏内竞价拍卖的脚本
[@main]
#if
equal A114
#act
mov A114

#if
isadmin
#say
　\
<元宝可拍卖物品以下物品:/SCOLOR=242>　<提示/SCOLOR=242>：<佩戴武器可召唤强力宝宝2只/SCOLOR=254>\
<-----------------------------------------------------------/SCOLOR=6>\
<奖励物品/SCOLOR=253>：<九霄龙吟/SCOLOR=254>　　　<初始化参数/@初始化参数>\
<当前元宝拍卖第一名的是/SCOLOR=249>：<$STR(A114)>\
<当前拍卖元宝价格是/SCOLOR=249> <$STR(G116)> <个元宝/SCOLOR=249>\
<-----------------------------------------------------------/SCOLOR=6>\
<如果物品倍价高者拍卖所得！之前持有装备的将自动收回/SCOLOR=250>\
<每次拍卖都要比当前拍卖价格多出10W即可/SCOLOR=253>　　【<我要竞卖武器/@领取九霄龙吟>】\
#elsesay
　\
<元宝可拍卖物品以下物品:/SCOLOR=242>　<提示/SCOLOR=242>：<佩戴武器可召唤强力宝宝2只/SCOLOR=254>\
<-----------------------------------------------------------/SCOLOR=6>\
<奖励物品/SCOLOR=253>：<九霄龙吟/SCOLOR=254>\
<当前元宝拍卖第一名的是/SCOLOR=249>：<$STR(A114)>\
<当前拍卖元宝价格是/SCOLOR=249> <$STR(G116)> <个元宝/SCOLOR=249>\
<-----------------------------------------------------------/SCOLOR=6>\
<如果物品倍价高者拍卖所得！之前持有装备的将自动收回/SCOLOR=250>\
<每次拍卖都要比当前拍卖价格多出10W即可/SCOLOR=253>　　【<我要竞卖武器/@领取九霄龙吟>】\


[@初始化参数]
#act
mov G116 0
MOV G118 0
mov A114
CLEARNAMELIST ..\QuestDiary\九霄龙吟名单.txt
messagebox 初始化完成！！！
goto @main

[@领取九霄龙吟]
#if
checkitem 九霄龙吟 1
#act
messagebox 不要这么贪心！你领取的东西都还在呀！
break

#if
checkitemw 九霄龙吟 1
#act
messagebox 不要这么贪心！你领取的东西都还在呀！
break

#if
checknamelist ..\QuestDiary\九霄龙吟名单.txt
#act
give 九霄龙吟 1
break

#if
EQUAL G116 0
#ACT
GOTO @第一次拍卖
#ELSEACT
MOV G118 0
INC G118 <$STR(G116)>
INC G118 100000
GOTO @历届拍卖了

[@第一次拍卖]
#if
CHECKGAMEGOLD > 99999
#act
mov G116 100000
mov A114 <$USERNAME>
MOV G118 0
GameGold - <$STR(G116)>
give 九霄龙吟 1
CLEARNAMELIST ..\QuestDiary\九霄龙吟名单.txt
addnamelist ..\QuestDiary\九霄龙吟名单.txt
SENDMSG 1 [%s]领取了[九霄龙吟]！[%s]当前拍卖价格为[<$STR(G116)>]元宝！
SENDMSG 1 [%s]领取了[九霄龙吟]！[%s]当前拍卖价格为[<$STR(G116)>]元宝！
GuildNoticeMsg 254 4 [%s]领取了[九霄龙吟]！[%s]当前拍卖价格为[<$STR(G116)>]元宝！
GuildNoticeMsg 253 4 [%s]领取了[九霄龙吟]！[%s]当前拍卖价格为[<$STR(G116)>]元宝！
GuildNoticeMsg 255 3 [%s]领取了[九霄龙吟]！[%s]当前拍卖价格为[<$STR(G116)>]元宝！
goto @main
#elseact
messagebox 注意！你还需要继续努力哦！\　\你当前元宝为　<$GAMEGOLD>\　\当前第一名拍卖元宝为　<$STR(G116)>\　\你需要超过第一名拍卖元宝10W才可以领取物品
break


[@历届拍卖了]
#if
CHECKGAMEGOLD > <$STR(G118)>
#act
mov G116 <$STR(G118)>
mov A114 <$USERNAME>
MOV G118 0
GameGold - <$STR(G116)>
give 九霄龙吟 1
CLEARNAMELIST ..\QuestDiary\九霄龙吟名单.txt
addnamelist ..\QuestDiary\九霄龙吟名单.txt
SENDMSG 1 [%s]领取了[九霄龙吟]！[%s]当前拍卖价格为[<$STR(G116)>]元宝！
SENDMSG 1 [%s]领取了[九霄龙吟]！[%s]当前拍卖价格为[<$STR(G116)>]元宝！
GuildNoticeMsg 254 4 [%s]领取了[九霄龙吟]！[%s]当前拍卖价格为[<$STR(G116)>]元宝！
GuildNoticeMsg 253 4 [%s]领取了[九霄龙吟]！[%s]当前拍卖价格为[<$STR(G116)>]元宝！
GuildNoticeMsg 255 3 [%s]领取了[九霄龙吟]！[%s]当前拍卖价格为[<$STR(G116)>]元宝！
goto @main
#elseact
messagebox 注意！你还需要继续努力哦！\　\你当前元宝为　<$GAMEGOLD>\　\当前第一名拍卖元宝为　<$STR(G116)>\　\你需要超过第一名拍卖元宝10W才可以领取物品
break



(@getsellgold @selloff @buyoff )
[@main]
#IF
#ACT

CloseBigDialogBox

BREAK
#SAY
当前元宝数量为：<$GAMEGOLD>个\
╔┄┄┄┄┄┄╗╔┄┄┄┄┄┄╗╔┄┄┄┄┄┄╗\
┆『<出售物品/@selloff>』┆┆『<购买物品/@buyoff>』┆┆『<元宝物品>』┆\
╚┄┄┄┄┄┄╝╚┄┄┄┄┄┄╝╚┄┄┄┄┄┄╝\
╔┄┄┄┄┄┄╗╔┄┄┄┄┄┄╗╔┄┄┄┄┄┄╗\
┆『<我的款项/@selfgold>』┆┆『<我的物品/@selfitem>』┆┆『<返回首页/@main>』┆\
╚┄┄┄┄┄┄╝╚┄┄┄┄┄┄╝╚┄┄┄┄┄┄╝\ \
<注意:只能用元宝来出售、购买物品>\
[@selloff]
请将拍卖物品放上，并输入拍卖价格: \ \
╔┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄╗\
┆ <注意：在我这里出售需要缴纳5%的税收> ┆\
╚┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄╝\ \
请下载专用登入器，否则无法使用这个系统！\
<返回/@main>
[@selfitem]
以下为你在此拍卖的物品:\
<返回/@Main>\
<$SELLOFFITEM>
[@selfgold]
以下为你在此拍卖所得款项:\
<返回/@main> <取款 /@getsellgold>\
<$SELLOUTGOLD>
[@getsellgold]
#ACT
goto @selfgold
[@buyoff2]
[@buyoff]
以下为全部拍卖的物品，绿颜色的为你自己拍卖的物品，\
可以直接取回。\ \
<返回/@Main>


zhudao54 发表于 2017-11-22 06:29:16

有能力自然有魅力

zhudao54 发表于 2017-11-22 06:36:28

要相信自己~智商为0

zhudao54 发表于 2017-11-22 06:42:41

其实今天baidu 又 抽风了

zhudao54 发表于 2017-11-22 06:48:43

看起来好~~像啊~~~~~

zhudao54 发表于 2017-11-22 06:54:36

呵呵　　我傻了‘～～哈哈

zhudao54 发表于 2017-11-22 07:00:31

呵呵 放心 如我算错 你以后来砸我的帖子 呵呵

zhudao54 发表于 2017-11-22 07:06:16

对自己好点~别难为自己

zhudao54 发表于 2017-11-22 07:12:28

朕要午休了..............

zhudao54 发表于 2017-11-22 07:18:19

楼上的话等于没说~~~
页: [1] 2 3 4 5
查看完整版本: 传奇拍卖系统脚本（拍卖行）