关于如何在游戏中植入拍卖系统

啊v · 发表于 2016-3-30 15:56:32

马上注册，结交更多好友，享用更多功能，让你轻松玩转社区。

您需要登录才可以下载或查看，没有帐号？立即注册

x

我想其实每个gm都会有这样一个想法：

玩家打到的好装备可以在游戏里竞拍
或者游戏gm自己放一些装备去竞拍以回收金币或者钻石等
现在公布下脚本看不懂的可以直接联系我1074203011
;;;;;;;星源传奇3-----------最具技术实力的传奇3-----永远的星源;;;;;;;;;;;;
[@paimai_zb]
{
#act
LoadValue D1 "QuestDiary\附加得功能\拍卖系统\拍卖系统.txt" [初始状态] [起价]
LoadValue A1 "QuestDiary\附加得功能\拍卖系统\拍卖系统.txt" [初始状态] [装备属性]
LoadValue A2 "QuestDiary\附加得功能\拍卖系统\拍卖系统.txt" [初始状态] [装备名称]
LoadValue D2 "QuestDiary\附加得功能\拍卖系统\拍卖系统.txt" [最高价位] [价位]
LoadValue A3 "QuestDiary\附加得功能\拍卖系统\拍卖系统.txt" [最高价位] [玩家名字]
LoadValue D3 "QuestDiary\附加得功能\拍卖系统\拍卖系统.txt" [顺序] [%username]
LoadValue D4 "QuestDiary\附加得功能\拍卖系统\拍卖系统.txt" [玩家铁数] [%username]

#say
{FCOLOR/1}目前服务器出售物品一件:{FCOLOR/12} {FCOLOR/15}<$OUTPUT(A2)>{FCOLOR/12}\
{FCOLOR/1}属性:{FCOLOR/12}{FCOLOR/15}<$OUTPUT(A1)>{FCOLOR/12}\
{FCOLOR/1}起价:{FCOLOR/12}{FCOLOR/13}<$OUTPUT(D1)>块{FCOLOR/12}{FCOLOR/1}上古玄铁{FCOLOR/12}\
{FCOLOR/1}目前玩家出的最高价为:{FCOLOR/12}{FCOLOR/13}<$OUTPUT(D2)>块{FCOLOR/12}\
{FCOLOR/1}玩家名字是:{FCOLOR/12}{FCOLOR/15}<$OUTPUT(A3)>{FCOLOR/12}\
{FCOLOR/1}您目前给出的竞价为:{FCOLOR/12}{FCOLOR/13}<$OUTPUT(D4)>块{FCOLOR/12}{FCOLOR/1}上古玄铁{FCOLOR/12}\
{FCOLOR/15}星    ((__,-"""-,__))    欢\{FCOLOR/12}
{FCOLOR/15}源    `--){FCOLOR/12}{FCOLOR/1}~ ~{FCOLOR/12}{FCOLOR/15}(--`    迎\{FCOLOR/12}
{FCOLOR/15}传    .-'(    )`-,    大\{FCOLOR/12}
{FCOLOR/15}奇    `~~`d    b`~~`    家\{FCOLOR/12}
{FCOLOR/15} 3       (6___6)       到\{FCOLOR/12}
{FCOLOR/15}→          `---`          来\{FCOLOR/12}
{FCOLOR/1}竞价规则：\{FCOLOR/12}
{FCOLOR/10}如果你想参与拍卖,首先你的出价必须高于目前的最高价,否则不能成功参加竞价!
参加竞价成功的玩家,系统将暂时帮你保管您竞价数额的{FCOLOR/12}{FCOLOR/1}【上古玄铁】{FCOLOR/12}
{FCOLOR/10}如果以前竞价成功的玩家，再加价可以选择追加物品{FCOLOR/12}{FCOLOR/1}【上古玄铁】{FCOLOR/12}{FCOLOR/10}，总物品数必须大于当前最高方可成功追加！\
竞价时间为每周一至每周六18：00-20：00\
每周日，晚上6点发放竞价物品！
没有获得物品的玩家可以开始领取以前被系统没收的{FCOLOR/12}{FCOLOR/1}【上古玄铁】\{FCOLOR/12}

<参与竞价/@jingjia_cy> \
[@jingjia_cy]
#act
LoadValue D4 "QuestDiary\附加得功能\拍卖系统\拍卖系统.txt" [玩家铁数] [%username]
LoadValue D3 "QuestDiary\附加得功能\拍卖系统\拍卖系统.txt" [顺序] [%username]
LoadValue D2 "QuestDiary\附加得功能\拍卖系统\拍卖系统.txt" [最高价位] [价位]
LoadValue D0 "QuestDiary\附加得功能\拍卖系统\拍卖系统.txt" [开关状态] [开关]
#if
equal D0 1
#say
别人正在使用，请稍候再试
#act
break

#IF
!CheckUnit CHECKJF 30
#SAY
_你的积分不够！！\\
_<[返回]/@paimai_zb>\
_<[关闭]/@exit>\
#ACT
break

#elseact
goto @jip_dfw

[@jip_dfw]
#if
equal D4 0
#say
您之前没有参加过竞价,这是您第一次对该物品竞价 !\
<请输入你的竞价/@@jingjia_2cy>\
#elsesay
您目前已经出价:<$OUTPUT(D4)>块上古选铁\
目前最高竞价为:<$OUTPUT(D2)>块上古选铁\
<请输入你的追加竞价/@@jingjia_3cy>\

[@@jingjia_2cy]
#ACT
mov  D7  %INPUTSTR
SAVEValue  "QuestDiary\附加得功能\拍卖系统\拍卖系统.txt" [开关状态] [开关] 1

#IF
Equal D7 ""
#SAY
_〖提醒〗:请尽快出价！！\\
_<退出/@exit>\
#ACT
break
#ELSEACT
goto @jinpfe_ui

[@jinpfe_ui]
#if
large D7 %D2
#act
goto @jingjia1_cy
#elsesay
您输入的数字必须大于当前竞价的最大数额~!

[@@jingjia_3cy]
#ACT
SAVEValue  "QuestDiary\附加得功能\拍卖系统\拍卖系统.txt" [开关状态] [开关] 1
mov  D6  %INPUTSTR

#IF
Equal D6 ""
#SAY
_〖提醒〗:请尽快出价！！\\
_<退出/@exit>\
#ACT
break
#ELSEACT
INC D4 %D6
goto @fwjofy_du

[@fwjofy_du]
#if
large D4 %D2
#act
Delaygoto [Grobal] 2 @jingjian2_cy2
break
#say
数据处理中。。。。。。
#elsesay
您的总数额低于最高价位,竞价失败

[@jingjia1_cy]
#act
Delaygoto [Grobal] 2 @xiy_df
#say
系统正在处理中。。。。。

[@xiy_df]
#if
CheckUnit CHECKJF 30
checkitem 上古玄铁 %D7
#act
take 上古玄铁 %D7
SetUnit SETJF - 30
INC D3 1
SAVEValue  "QuestDiary\附加得功能\拍卖系统\拍卖系统.txt" [顺序]  [%username] %D3
SAVEValue  "QuestDiary\附加得功能\拍卖系统\拍卖系统.txt" [玩家铁数]  [%username] %D7
SAVEValue  "QuestDiary\附加得功能\拍卖系统\拍卖系统.txt" [最高价位] [价位] %D7
SAVEValue  "QuestDiary\附加得功能\拍卖系统\拍卖系统.txt" [最高价位] [玩家名字] %username
SAVEValue  "QuestDiary\附加得功能\拍卖系统\拍卖系统.txt" [开关状态] [开关] 0
#SAY
竞价成功!请关注每天的竞价!以免错失良机\
您的出价为:<$OUTPUT(D7)>块上古选铁\
#elsesay
第一次竞价需要30点积分,并且你必须拥有你出价数额的【上古玄铁】才能竞价\

[@jingjian2_cy2]
#if
CheckUnit CHECKJF 10
checkitem 上古玄铁 %D6
#act
take 上古玄铁 %D6
SetUnit SETJF - 10
SAVEValue  "QuestDiary\附加得功能\拍卖系统\拍卖系统.txt" [玩家铁数] [%username] %D4
SAVEValue  "QuestDiary\附加得功能\拍卖系统\拍卖系统.txt" [最高价位] [价位] %D4
SAVEValue  "QuestDiary\附加得功能\拍卖系统\拍卖系统.txt" [最高价位] [玩家名字] %username
SAVEValue  "QuestDiary\附加得功能\拍卖系统\拍卖系统.txt" [开关状态] [开关] 0
#say
竞价成功!请关注每天的竞价!以免错失良机\
您的出价为:<$OUTPUT(D4)>块上古选铁\
#eslesay
追加进价需要10点积分,并且你必须拥有追加数额的【上古玄铁】才能竞价\

}