本站主推发布：新开传奇发布网,新开传奇,新开传奇发布,176复古传奇,迷失传奇,战神传奇,传奇私服,找搜服,仙剑传奇
[网站地图] [设为首页] [加入收藏]
快速搜服找服： 复古 变态 微变 轻变 中变 超变 合击 迷失 沉默 星王 1.76 1.80 1.95 1.96 仿盛大 单职业
当前位置: zhaosf首页 > 开服资料 > 传奇脚本 >

价高者得规则脚本

时间:2016-09-20 00:13来源:新开传奇私服 作者:传奇私服发布网
该脚本只是竞价拍卖NPC脚本，并非全部竞价拍卖系统脚本，大家可以参照学习修改完善使用，如使用请自行添加相应数据后才可以使用。 [@main] if ISADMIN say 竞价物品名称：$STR(A499)\ 竞价物品属性：$STR(A498)\ 竞价元宝数目：$STR(G499)\ 当前竞价人物：$STR(A497)\ 竞价剩余时间：$STR(G498)分钟.\ 在竞价物品剩余时间内,谁出的价钱最高,该物品就是归谁的.\ 竞价如果失败,竞价元宝如数退还.
该脚本只是竞价拍卖NPC脚本，并非全部竞价拍卖系统脚本，大家可以参照学习修改完善使用，如使用请自行添加相应数据后才可以使用。
[@main]
if
ISADMIN
say
竞价物品名称：<$STR(A499)>\
竞价物品属性：<$STR(A498)>\
竞价元宝数目：<$STR(G499)>\
当前竞价人物：<$STR(A497)>\
竞价剩余时间：<$STR(G498)>分钟.\
<在竞价物品剩余时间内,谁出的价钱最高,该物品就是归谁的.>\
<竞价如果失败,竞价元宝如数退还.> <竞价失败人物退还元宝说明/@退还>\
<GM设置竞价物品/@gm>\
<点此输入竞标价格(必须大于现在竞价元宝数目)/@@InPutInteger97> <竞价成功领取/@成功>
elsesay
竞价物品名称：<$STR(A499)>\
竞价物品属性：<$STR(A498)>\
竞价元宝数目：<$STR(G499)>\
当前竞价人物：<$STR(A497)>\
竞价剩余时间：<$STR(G498)>分钟.\
<在竞价物品剩余时间内,谁出的价钱最高,该物品就是归谁的.>\
<竞价如果失败,竞价元宝如数退还.> <竞价失败人物退还元宝说明/@退还>\ \
<点此输入竞标价格(必须大于现在竞价元宝数目)/@@InPutInteger97> <竞价成功领取/@成功>
[@CallInPutInteger97]
if
equal G498 0
act
messagebox 竞价已经结束！
break
if
CHECKGAMEGOLD < <$STR(N97)>
act
messagebox 您的元宝不足【<$STR(N97)>】
break
IF
large N97 <$STR(G499)>
ACT
CreateFile QuestDiary\竞价中心\竞价名单\<$STR(A497)>.txt
AddTextList .\QuestDiary\竞价中心\竞价名单\<$STR(A497)>.txt <$STR(G499)>
AddTextList .\QuestDiary\竞价中心\失败名单.txt <$STR(A497)>
GAMEGOLD - <$STR(N97)>
sendmsg 0 [<$USERNAME>]出[<$STR(N97)>]元宝竞价物品[<$STR(A499)>]
sendmsg 0 [<$STR(A497)>]竞价失败.请到竞价中心取回原竞价元宝
mov A497 <$USERNAME>
mov G499 <$STR(N97)>
elseact
messagebox 你的出价太低了。现在竞价【<$STR(G499)>】
[@退还]
请牢记：\
如果您竞价失败.请一定在您再次竞价之前取回元宝.\
请牢记.\
如不看说明.元宝丢失自行负责.\ \ \
<取回退还的元宝/@退还元宝> <返回/@main>
[@退还元宝]
if
checknamelist ..\QuestDiary\竞价中心\失败名单.txt
act
GetRandomText .\QuestDiary\竞价中心\竞价名单\<$USERNAME>.txt S97
GAMEGOLD + <$STR(S97)>
DelNameList ..\QuestDiary\竞价中心\失败名单.txt
messagebox 竞价失败元宝已经取回。共【<$STR(S97)>】
elseact
messagebox 对不起，没有您的名单。
[@gm]
设置竞价\
<点此设置竞价物品/@@InPutString81> 当前：<$STR(A499)>\ \
<点此设置竞价物品属性/@@InPutString82> 当前：<$STR(A498)>\ \
< 点此设置竞价时间/@@InPutString83> 当前：<$STR(G498)>分钟\ \
<点此设置竞价最低元宝/@@InPutString84> 当前：<$STR(G499)>\
<点此开始进入倒计时竞价/@倒计时竞价>\
[@倒计时竞价]
act
MOV G497 0
messagebox 竞价已经开始计时
[@CallInPutString81]
act
mov A499 <$STR(S81)>
messagebox 设置成功
goto @gm
[@CallInPutString82]
act
mov A498 <$STR(S82)>
messagebox 设置成功
goto @gm
[@CallInPutString83]
act
mov G498 <$STR(S83)>
messagebox 设置成功
goto @gm
[@CallInPutString84]
act
mov G499 <$STR(S84)>
messagebox 设置成功
goto @gm
[@成功]
if
checknamelist ..\QuestDiary\竞价中心\成功名单.txt
act
GetRandomText .\QuestDiary\竞价中心\竞价成功\<$USERNAME>.txt S97
give <$STR(S97)> 1
DelNameList ..\QuestDiary\竞价中心\成功名单.txt
sendmsg 0 恭喜玩家[<$USERNAME>]领取竞价物品【<$STR(S97)>】
sendmsg 0 恭喜玩家[<$USERNAME>]领取竞价物品【<$STR(S97)>】
sendmsg 0 恭喜玩家[<$USERNAME>]领取竞价物品【<$STR(S97)>】
elseact
messagebox 对不起，没有您的名单。
(责任编辑：找搜服传奇发布网)
------分隔线----------------------------
栏目列表
推荐内容
工具排行
热点内容
返回顶部


Copyright © ZhaoSF.info 找搜服-传奇私服发布网 版权所有沪ICP备17017149号-1