游客您好
第三方账号登陆
  • 点击联系客服

    在线时间:9:00-17:00

    联系QQ

    3543403617

    电子邮件

    3543403617@QQ.com
  • PKhuo手机版

    GM资源教程随时查询

  • 扫描二维码

    进传奇GM资源交流群

Lv.9 管理员
1号会员,0活跃值,2021.07.08 加入
  • 19307发帖
  • 17544主题
  • 0关注
  • 0粉丝
这个人很懒,什么也没有留下。
最新源码 更多>
游戏视频 更多>
脚本教程 更多>

[LEGEND引擎] LEG服务端专用竞拍拍卖系统传奇脚本

[复制链接]
pkhuo 发表于 2021-10-10 19:40:46 | 显示全部楼层 |阅读模式 打印 上一主题 下一主题
(@@InPutInteger @@InPutString )
[@开始拍卖]
{
#IF
ISADMIN
#SAY
您好欢迎来到,原始传奇拍卖行!<COLOR=clFuchsia 使用命令 @拍卖 可直接参与竞价>\
在这里你可以把您所要的拍卖的游戏装备交给我!\
我一定会帮你卖出个好价钱的!\
拍卖游戏道具要收取 起拍价<COLOR=clLime  1% > 的费用!  <COLOR=clRed 注:起拍价由卖家定>\
竞拍成功后系统收取 交易额<COLOR=clLime  10%> 的竞拍税  <COLOR=clRed 注:由卖方缴纳>\
<起拍价格/@起拍价格>       <竞拍成功/@竞拍成功>       <拍卖失败/@拍卖失败>       <拍卖时间/@拍卖时间>\  
<COLOR=clSkyBlue 当前竞拍装备:><$STR(A10)><COLOR=clSkyBlue :><$STR(G9)>元宝<COLOR=clSkyBlue      当前拍卖主是:><$STR(A9)>\
<COLOR=#242 当前竞拍玩家:><$STR(A8)>   拍卖失败后不领回物品<清除重置拍卖/@重置拍卖>\
<我要竞价/@竞价>  <买家领取物品/@买家领取>  <卖家领回拍卖物品/@卖家领取>  <关 闭/@exit>\
#ACT
BREAK


#IF
EQUAL G9 0
#SAY
您好欢迎来到,原始传奇拍卖行!<COLOR=clFuchsia 使用命令 @拍卖 可直接参与竞价>\
在这里你可以把您所要的拍卖的游戏装备交给我!\
我一定会帮你卖出个好价钱的!\
拍卖游戏道具要收取 起拍价<COLOR=clLime  1% > 的费用!  <COLOR=clRed 注:起拍价由卖家定>\
竞拍成功后系统收取 交易额<COLOR=clLime  10%> 的竞拍税  <COLOR=clRed 注:由卖方缴纳>\
<起拍价格/@起拍价格>       <竞拍成功/@竞拍成功>       <拍卖失败/@拍卖失败>       <拍卖时间/@拍卖时间>\ \
#ACT
;mov M5 0
BREAK

#IF
#SAY
您好欢迎来到,原始传奇拍卖行!<COLOR=clFuchsia 使用命令 @拍卖 可直接参与竞价>\
在这里你可以把您所要的拍卖的游戏装备交给我!\
我一定会帮你卖出个好价钱的!\
拍卖游戏道具要收取 起拍价<COLOR=clLime  1% > 的费用!  <COLOR=clRed 注:起拍价由卖家定>\
竞拍成功后系统收取 交易额<COLOR=clLime  10%> 的竞拍税  <COLOR=clRed 注:由卖方缴纳>\
<起拍价格/@起拍价格>       <竞拍成功/@竞拍成功>       <拍卖失败/@拍卖失败>       <拍卖时间/@拍卖时间>\  
<COLOR=clSkyBlue 当前竞拍装备:><$STR(A10)><COLOR=clSkyBlue :><$STR(G9)>元宝<COLOR=clSkyBlue      当前拍卖主是:><$STR(A9)>\
<COLOR=#242 当前竞拍玩家:><$STR(A8)>\
<我要竞价/@竞价>  <买家领取物品/@买家领取>  <卖家领回拍卖物品/@卖家领取>  <关 闭/@exit>\


[@拍卖时间]
\ \
每次有玩家竞价时间回涨60秒\
拍卖时间为0时,拍卖结束\
竞拍剩余时间:<$STR(G8)>秒!\ \
<刷新/@拍卖时间>\
<返回/@开始拍卖>

[@竞价]
#IF
large G8 0
#ACT
QUERYVALUE 6 1 10 ~拍卖物品 请输入您的想拍物品的起拍底价: 单位(元宝),最底<$STR(G9)>元宝以上 QF
#ELSEACT
goto @开始拍卖
SENDMSG 6 [提示:]本此竞价时间已结束!
BREAK

[~拍卖物品]
#IF
large M6 <$STR(G9)>
#ACT
goto @元宝2
#ELSEACT
goto @开始拍卖
SENDMSG 5 [提示:]最底<$STR(G9)>元宝以上!请重新输入正确数量
BREAK


[@元宝2]
#IF
EQUAL G50 1
CHECKGAMEGOLD ? $STR(M6)
#ACT
<$STR(A8)>.GAMEGOLD + <$STR(G9)>
mov A8 <$USERNAME>
mov G9 <$STR(M6)>
GAMEGOLD - <$STR(M6)>
INC G8 60
SENDMSG 0 =========================================================== 255 245 10
SENDMSG 0 <$USERNAME>,竞拍宝石:<$STR(A10)>,竞拍价:<$STR(G9)>元宝,竞拍剩余时间:%t秒 255 245 <$STR(G8)>
SENDMSG 0 <$STR(A10)>极品属性:防御+<$STR(G10)>,魔防+<$STR(M11)>,攻击+<$STR(M12)>,魔法+<$STR(M13)>,道术+<$STR(M14)>,持久=<$STR(M16)> 255 245 <$STR(G8)>
SENDMSG 0 =========================================================== 255 245 10
SENDMSG 0 <$USERNAME>,竞拍:<$STR(A10)>,竞拍价:<$STR(G9)>元宝!
goto @开始拍卖
BREAK

#IF
EQUAL G51 1
CHECKGAMEGOLD ? $STR(M6)
#ACT
<$STR(A8)>.GAMEGOLD + <$STR(G9)>
mov A8 <$USERNAME>
mov G9 <$STR(M6)>
GAMEGOLD - <$STR(M6)>
INC G8 60
SENDMSG 0 =========================================================== 255 245 10
SENDMSG 0 <$USERNAME>,竞拍腰带:<$STR(A10)>,竞拍价:<$STR(G9)>元宝,竞拍剩余时间:%t秒 255 245 <$STR(G8)>
SENDMSG 0 <$STR(A10)>极品属性:防御+<$STR(G10)>,魔防+<$STR(M11)>,攻击+<$STR(M12)>,魔法+<$STR(M13)>,道术+<$STR(M14)>,持久=<$STR(M16)> 255 245 <$STR(G8)>
SENDMSG 0 =========================================================== 255 245 10
SENDMSG 0 <$USERNAME>,竞拍:<$STR(A10)>,竞拍价:<$STR(G9)>元宝!
goto @开始拍卖
BREAK

#IF
EQUAL G52 1
CHECKGAMEGOLD ? $STR(M6)
#ACT
<$STR(A8)>.GAMEGOLD + <$STR(G9)>
mov A8 <$USERNAME>
mov G9 <$STR(M6)>
GAMEGOLD - <$STR(M6)>
INC G8 60
SENDMSG 0 =========================================================== 255 245 10
SENDMSG 0 <$USERNAME>,竞拍靴子:<$STR(A10)>,竞拍价:<$STR(G9)>元宝,竞拍剩余时间:%t秒 255 245 <$STR(G8)>
SENDMSG 0 <$STR(A10)>极品属性:防御+<$STR(G10)>,魔防+<$STR(M11)>,攻击+<$STR(M12)>,魔法+<$STR(M13)>,道术+<$STR(M14)>,持久=<$STR(M16)> 255 245 <$STR(G8)>
SENDMSG 0 =========================================================== 255 245 10
SENDMSG 0 <$USERNAME>,竞拍:<$STR(A10)>,竞拍价:<$STR(G9)>元宝!
goto @开始拍卖
BREAK

#IF
EQUAL G53 1
CHECKGAMEGOLD ? $STR(M6)
#ACT
<$STR(A8)>.GAMEGOLD + <$STR(G9)>
mov A8 <$USERNAME>
mov G9 <$STR(M6)>
GAMEGOLD - <$STR(M6)>
INC G8 60
SENDMSG 0 =========================================================== 255 245 10
SENDMSG 0 <$USERNAME>,竞拍勋章:<$STR(A10)>,竞拍价:<$STR(G9)>元宝,竞拍剩余时间:%t秒 255 245 <$STR(G8)>
SENDMSG 0 <$STR(A10)>极品属性:防御+<$STR(G10)>,魔防+<$STR(M11)>,攻击+<$STR(M12)>,魔法+<$STR(M13)>,道术+<$STR(M14)>,持久=<$STR(M16)> 255 245 <$STR(G8)>
SENDMSG 0 =========================================================== 255 245 10
SENDMSG 0 <$USERNAME>,竞拍:<$STR(A10)>,竞拍价:<$STR(G9)>元宝!
goto @开始拍卖
BREAK


#IF
EQUAL G54 1
CHECKGAMEGOLD ? $STR(M6)
#ACT
<$STR(A8)>.GAMEGOLD + <$STR(G9)>
mov A8 <$USERNAME>
mov G9 <$STR(M6)>
GAMEGOLD - <$STR(M6)>
INC G8 60
SENDMSG 0 =========================================================== 255 245 10
SENDMSG 0 <$USERNAME>,竞拍头盔:<$STR(A10)>,竞拍价:<$STR(G9)>元宝,竞拍剩余时间:%t秒 255 245 <$STR(G8)>
SENDMSG 0 <$STR(A10)>极品属性:防御+<$STR(G10)>,魔防+<$STR(M11)>,攻击+<$STR(M12)>,魔法+<$STR(M13)>,道术+<$STR(M14)>,持久=<$STR(M16)> 255 245 <$STR(G8)>
SENDMSG 0 =========================================================== 255 245 10
SENDMSG 0 <$USERNAME>,竞拍:<$STR(A10)>,竞拍价:<$STR(G9)>元宝!
goto @开始拍卖
BREAK


#IF
EQUAL G55 1
CHECKGAMEGOLD ? $STR(M6)
#ACT
<$STR(A8)>.GAMEGOLD + <$STR(G9)>
mov A8 <$USERNAME>
mov G9 <$STR(M6)>
GAMEGOLD - <$STR(M6)>
INC G8 60
SENDMSG 0 =========================================================== 255 245 10
SENDMSG 0 <$USERNAME>,竞拍服装:<$STR(A10)>,竞拍价:<$STR(G9)>元宝,竞拍剩余时间:%t秒 255 245 <$STR(G8)>
SENDMSG 0 <$STR(A10)>极品属性:防御+<$STR(G10)>,魔防+<$STR(M11)>,攻击+<$STR(M12)>,魔法+<$STR(M13)>,道术+<$STR(M14)>,持久=<$STR(M16)> 255 245 <$STR(G8)>
SENDMSG 0 =========================================================== 255 245 10
SENDMSG 0 <$USERNAME>,竞拍:<$STR(A10)>,竞拍价:<$STR(G9)>元宝!
goto @开始拍卖
BREAK


#IF
EQUAL G56 1
CHECKGAMEGOLD ? $STR(M6)
#ACT
<$STR(A8)>.GAMEGOLD + <$STR(G9)>
mov A8 <$USERNAME>
mov G9 <$STR(M6)>
GAMEGOLD - <$STR(M6)>
INC G8 60
SENDMSG 0 =========================================================== 255 245 10
SENDMSG 0 <$USERNAME>,竞拍武器:<$STR(A10)>,竞拍价:<$STR(G9)>元宝,竞拍剩余时间:%t秒 255 245 <$STR(G8)>
SENDMSG 0 <$STR(A10)>极品属性:攻击+<$STR(G10)>,魔法+<$STR(G11)>,道术+<$STR(G12)>,幸运+<$STR(G13)>,准确+<$STR(G14)>,持久=<$STR(G16)> 255 245 <$STR(G8)>
SENDMSG 0 =========================================================== 255 245 10
SENDMSG 0 <$USERNAME>,竞拍:<$STR(A10)>,竞拍价:<$STR(G9)>元宝!
goto @开始拍卖
BREAK



#IF
EQUAL G57 1
CHECKGAMEGOLD ? $STR(M6)
#ACT
<$STR(A8)>.GAMEGOLD + <$STR(G9)>
mov A8 <$USERNAME>
mov G9 <$STR(M6)>
GAMEGOLD - <$STR(M6)>
INC G8 60
SENDMSG 0 =========================================================== 255 245 10
SENDMSG 0 <$USERNAME>,竞拍项链:<$STR(A10)>,竞拍价:<$STR(G9)>元宝,竞拍剩余时间:%t秒 255 245 <$STR(G8)>
SENDMSG 0 <$STR(A10)>极品属性:防御+<$STR(G10)>,魔防+<$STR(M11)>,攻击+<$STR(M12)>,魔法+<$STR(M13)>,道术+<$STR(M14)>,持久=<$STR(M16)> 255 245 <$STR(G8)>
SENDMSG 0 =========================================================== 255 245 10
SENDMSG 0 <$USERNAME>,竞拍:<$STR(A10)>,竞拍价:<$STR(G9)>元宝!
goto @开始拍卖
BREAK


#IF
EQUAL G58 1
CHECKGAMEGOLD ? $STR(M6)
#ACT
<$STR(A8)>.GAMEGOLD + <$STR(G9)>
mov A8 <$USERNAME>
mov G9 <$STR(M6)>
GAMEGOLD - <$STR(M6)>
INC G8 60
SENDMSG 0 =========================================================== 255 245 10
SENDMSG 0 <$USERNAME>,竞拍手镯:<$STR(A10)>,竞拍价:<$STR(G9)>元宝,竞拍剩余时间:%t秒 255 245 <$STR(G8)>
SENDMSG 0 <$STR(A10)>极品属性:防御+<$STR(G10)>,魔防+<$STR(M11)>,攻击+<$STR(M12)>,魔法+<$STR(M13)>,道术+<$STR(M14)>,持久=<$STR(M16)> 255 245 <$STR(G8)>
SENDMSG 0 =========================================================== 255 245 10
SENDMSG 0 <$USERNAME>,竞拍:<$STR(A10)>,竞拍价:<$STR(G9)>元宝!
goto @开始拍卖
BREAK


#IF
EQUAL G59 1
CHECKGAMEGOLD ? $STR(M6)
#ACT
<$STR(A8)>.GAMEGOLD + <$STR(G9)>
mov A8 <$USERNAME>
mov G9 <$STR(M6)>
GAMEGOLD - <$STR(M6)>
INC G8 60
SENDMSG 0 =========================================================== 255 245 10
SENDMSG 0 <$USERNAME>,竞拍戒指:<$STR(A10)>,竞拍价:<$STR(G9)>元宝,竞拍剩余时间:%t秒 255 245 <$STR(G8)>
SENDMSG 0 <$STR(A10)>极品属性:防御+<$STR(G10)>,魔防+<$STR(M11)>,攻击+<$STR(M12)>,魔法+<$STR(M13)>,道术+<$STR(M14)>,持久=<$STR(M16)> 255 245 <$STR(G8)>
SENDMSG 0 =========================================================== 255 245 10
SENDMSG 0 <$USERNAME>,竞拍:<$STR(A10)>,竞拍价:<$STR(G9)>元宝!
goto @开始拍卖
BREAK


#IF
CHECKGAMEGOLD ? $STR(M6)
#ACT
<$STR(A8)>.GAMEGOLD + <$STR(G9)>
mov A8 <$USERNAME>
mov G9 <$STR(M6)>
GAMEGOLD - <$STR(M6)>
INC G8 60
SENDMSG 0 =========================================================== 255 245 10
SENDMSG 0 <$USERNAME>,竞拍物品:<$STR(A10)>,竞拍价:<$STR(G9)>元宝,竞拍剩余时间:%t秒 255 245 <$STR(G8)>
SENDMSG 0 <$STR(A10)>物品属性:+<$STR(G10)>,+<$STR(M11)>,+<$STR(M12)>,+<$STR(M13)>,+<$STR(M14)>,+<$STR(M16)> 255 245 <$STR(G8)>
SENDMSG 0 =========================================================== 255 245 10
SENDMSG 0 <$USERNAME>,竞拍:<$STR(A10)>,竞拍价:<$STR(G9)>元宝!
goto @开始拍卖
#ELSEACT
goto @开始拍卖
MESSAGEBOX 你的元宝不够支付竞价!
BREAK

[@起拍价格]
#IF
EQUAL A10 暂无
#ACT
QUERYVALUE 5 1 10 ~qbjg 请输入您的想拍卖物品的起拍底价: 单位(元宝),最底10元宝 QF
#ELSEACT
goto @开始拍卖
MESSAGEBOX 正在拍卖中无法再次申请拍卖!
BREAK

[~qbjg]
#IF
large M5 9
EQUAL A10 暂无
#ACT
goto @元宝
#ELSEACT
goto @开始拍卖
SENDMSG 6 [提示:]最底10元宝!请重新输入正确数量或已经有人抢先申请了拍卖!
BREAK


[@元宝]
#IF
;EQUAL A10 暂无
#SAY
您好欢迎来到,原始传奇拍卖行!<COLOR=clFuchsia 使用命令 @拍卖 可直接参与竞价>\
在这里你可以把您所要的拍卖的游戏装备交给我!\
我一定会帮你卖出个好价钱的!\
拍卖游戏道具要收取 起拍价<COLOR=clLime  1% > 的费用!  <COLOR=clRed 注:起拍价由卖家定>\
竞拍成功后系统收取 交易额<COLOR=clLime  10%> 的竞拍税  <COLOR=clRed 注:由卖方缴纳>\
<起拍价格/@起拍价格>       <竞拍成功/@竞拍成功>       <拍卖失败/@拍卖失败>       <拍卖时间/@拍卖时间>\ \  
起拍价格:<$STR(G9)>\
请把你要拍卖的游戏道具放到下面交易栏内后 点击OK即可\
#ACT
DELAYCALL 50 @1开始拍1
mov G9 <$STR(M5)>


[@1开始拍1]
#IF
EQUAL A10 暂无
#ACT
QUERYITEMDLG 放入要拍卖的装备 @1开始拍2 0
#ELSEACT
goto @开始拍卖
MESSAGEBOX  [提示:]已有人抢先进行的拍卖,请等此轮结束后再申请拍卖!
#ELSEACT
goto @开始拍卖
MESSAGEBOX 正在拍卖中无法再次申请拍卖!
BREAK

[@1开始拍2]
#IF
EQUAL A10 暂无
CHECKGAMEGOLD > 0
#ACT
goto @检测装备名
#ELSEACT
goto @开始拍卖
MESSAGEBOX  [提示:]已有人抢先进行的拍卖,请等此轮结束后再申请拍卖!\或你无元宝支付申请拍卖!
BREAK

[@检测装备名]
#IF
CHECKDLGITEMTYPE BUJUK
CHECKDLGITEMNAME <$DLGITEMNAME>
#ACT
mov A10 <$DLGITEMNAME>
GAMEGOLD - 1
GETDLGITEMVALUE M10 0
GETDLGITEMVALUE M11 1
GETDLGITEMVALUE M12 2
GETDLGITEMVALUE M13 3
GETDLGITEMVALUE M14 4
GETDLGITEMVALUE M16 14
TAKEDLGITEM
mov A9 <$USERNAME>
mov G10 <$STR(M10)>
mov G11 <$STR(M11)>
mov G12 <$STR(M12)>
mov G13 <$STR(M13)>
mov G14 <$STR(M14)>
mov G16 <$STR(M16)>
mov G7 0
DelayCall 1000 @倒计时宝石
MESSAGEBOX 竞拍开始前,卖家要交纳 起拍价1% 的服务费用!\ \起拍价由卖方自已决定
SENDMSG 0 <$USERNAME>,竞拍:<$STR(A10)>,竞拍价:<$STR(G9)>元宝!
goto @开始拍卖
Break


#IF
CHECKDLGITEMTYPE BELT
CHECKDLGITEMNAME <$DLGITEMNAME>
#ACT
mov A10 <$DLGITEMNAME>
GAMEGOLD - 1
GETDLGITEMVALUE M10 0
GETDLGITEMVALUE M11 1
GETDLGITEMVALUE M12 2
GETDLGITEMVALUE M13 3
GETDLGITEMVALUE M14 4
GETDLGITEMVALUE M16 14
TAKEDLGITEM
mov A9 <$USERNAME>
mov G10 <$STR(M10)>
mov G11 <$STR(M11)>
mov G12 <$STR(M12)>
mov G13 <$STR(M13)>
mov G14 <$STR(M14)>
mov G16 <$STR(M16)>
mov G7 0
DelayCall 1000 @倒计时腰带
MESSAGEBOX 竞拍开始前,卖家要交纳 起拍价1% 的服务费用!\ \起拍价由卖方自已决定
SENDMSG 0 <$USERNAME>,竞拍:<$STR(A10)>,竞拍价:<$STR(G9)>元宝!
goto @开始拍卖
Break

#IF
CHECKDLGITEMTYPE BOOTS
CHECKDLGITEMNAME <$DLGITEMNAME>
#ACT
mov A10 <$DLGITEMNAME>
GAMEGOLD - 1
GETDLGITEMVALUE M10 0
GETDLGITEMVALUE M11 1
GETDLGITEMVALUE M12 2
GETDLGITEMVALUE M13 3
GETDLGITEMVALUE M14 4
GETDLGITEMVALUE M16 14
TAKEDLGITEM
mov A9 <$USERNAME>
mov G10 <$STR(M10)>
mov G11 <$STR(M11)>
mov G12 <$STR(M12)>
mov G13 <$STR(M13)>
mov G14 <$STR(M14)>
mov G16 <$STR(M16)>
mov G7 0
DelayCall 1000 @倒计时靴子
MESSAGEBOX 竞拍开始前,卖家要交纳 起拍价1% 的服务费用!\ \起拍价由卖方自已决定
SENDMSG 0 <$USERNAME>,竞拍:<$STR(A10)>,竞拍价:<$STR(G9)>元宝!
goto @开始拍卖
Break

#IF
CHECKDLGITEMTYPE MEDAL
CHECKDLGITEMNAME <$DLGITEMNAME>
#ACT
mov A10 <$DLGITEMNAME>
GAMEGOLD - 1
GETDLGITEMVALUE M10 0
GETDLGITEMVALUE M11 1
GETDLGITEMVALUE M12 2
GETDLGITEMVALUE M13 3
GETDLGITEMVALUE M14 4
GETDLGITEMVALUE M16 14
TAKEDLGITEM
mov A9 <$USERNAME>
mov G10 <$STR(M10)>
mov G11 <$STR(M11)>
mov G12 <$STR(M12)>
mov G13 <$STR(M13)>
mov G14 <$STR(M14)>
mov G16 <$STR(M16)>
mov G7 0
DelayCall 1000 @倒计时勋章
MESSAGEBOX 竞拍开始前,卖家要交纳 起拍价1% 的服务费用!\ \起拍价由卖方自已决定
SENDMSG 0 <$USERNAME>,竞拍:<$STR(A10)>,竞拍价:<$STR(G9)>元宝!
goto @开始拍卖
Break

#IF
CHECKDLGITEMTYPE HELMET
CHECKDLGITEMNAME <$DLGITEMNAME>
#ACT
mov A10 <$DLGITEMNAME>
GAMEGOLD - 1
GETDLGITEMVALUE M10 0
GETDLGITEMVALUE M11 1
GETDLGITEMVALUE M12 2
GETDLGITEMVALUE M13 3
GETDLGITEMVALUE M14 4
GETDLGITEMVALUE M16 14
TAKEDLGITEM
mov A9 <$USERNAME>
mov G10 <$STR(M10)>
mov G11 <$STR(M11)>
mov G12 <$STR(M12)>
mov G13 <$STR(M13)>
mov G14 <$STR(M14)>
mov G16 <$STR(M16)>
mov G7 0
DelayCall 1000 @倒计时头盔
MESSAGEBOX 竞拍开始前,卖家要交纳 起拍价1% 的服务费用!\ \起拍价由卖方自已决定
SENDMSG 0 <$USERNAME>,竞拍:<$STR(A10)>,竞拍价:<$STR(G9)>元宝!
goto @开始拍卖
Break

#IF
CHECKDLGITEMTYPE DRESS
CHECKDLGITEMNAME <$DLGITEMNAME>
#ACT
mov A10 <$DLGITEMNAME>
GAMEGOLD - 1
GETDLGITEMVALUE M10 0
GETDLGITEMVALUE M11 1
GETDLGITEMVALUE M12 2
GETDLGITEMVALUE M13 3
GETDLGITEMVALUE M14 4
GETDLGITEMVALUE M16 14
TAKEDLGITEM
mov A9 <$USERNAME>
mov G10 <$STR(M10)>
mov G11 <$STR(M11)>
mov G12 <$STR(M12)>
mov G13 <$STR(M13)>
mov G14 <$STR(M14)>
mov G16 <$STR(M16)>
mov G7 0
DelayCall 1000 @倒计时衣服
MESSAGEBOX 竞拍开始前,卖家要交纳 起拍价1% 的服务费用!\ \起拍价由卖方自已决定
SENDMSG 0 <$USERNAME>,竞拍:<$STR(A10)>,竞拍价:<$STR(G9)>元宝!
goto @开始拍卖
Break

#IF
CHECKDLGITEMNAME <$DLGITEMNAME>
CHECKDLGITEMTYPE WEAPON
#ACT
mov A10 <$DLGITEMNAME>
GAMEGOLD - 1
GETDLGITEMVALUE M10 0
GETDLGITEMVALUE M11 1
GETDLGITEMVALUE M12 2
GETDLGITEMVALUE M13 3
GETDLGITEMVALUE M14 5
GETDLGITEMVALUE M16 14
TAKEDLGITEM
mov A9 <$USERNAME>
mov G10 <$STR(M10)>
mov G11 <$STR(M11)>
mov G12 <$STR(M12)>
mov G13 <$STR(M13)>
mov G14 <$STR(M14)>
mov G16 <$STR(M16)>
mov G7 0
DelayCall 1000 @倒计时
MESSAGEBOX 竞拍开始前,卖家要交纳 起拍价1% 的服务费用!\ \起拍价由卖方自已决定
SENDMSG 0 <$USERNAME>,竞拍:<$STR(A10)>,竞拍价:<$STR(G9)>元宝!
goto @开始拍卖
Break

#IF
CHECKDLGITEMNAME <$DLGITEMNAME>
CHECKDLGITEMTYPE NECKLACE
#ACT
mov A10 <$DLGITEMNAME>
GAMEGOLD - 1
GETDLGITEMVALUE M10 0
GETDLGITEMVALUE M11 1
GETDLGITEMVALUE M12 2
GETDLGITEMVALUE M13 3
GETDLGITEMVALUE M14 4
GETDLGITEMVALUE M16 14
TAKEDLGITEM
mov A9 <$USERNAME>
mov G10 <$STR(M10)>
mov G11 <$STR(M11)>
mov G12 <$STR(M12)>
mov G13 <$STR(M13)>
mov G14 <$STR(M14)>
mov G16 <$STR(M16)>
mov G7 0
DelayCall 1000 @倒计时项链
MESSAGEBOX 竞拍开始前,卖家要交纳 起拍价1% 的服务费用!\ \起拍价由卖方自已决定
SENDMSG 0 <$USERNAME>,竞拍:<$STR(A10)>,竞拍价:<$STR(G9)>元宝!
goto @开始拍卖
Break

#IF
CHECKDLGITEMNAME <$DLGITEMNAME>
CHECKDLGITEMTYPE ARMRING
#ACT
mov A10 <$DLGITEMNAME>
GAMEGOLD - 1
GETDLGITEMVALUE M10 0
GETDLGITEMVALUE M11 1
GETDLGITEMVALUE M12 2
GETDLGITEMVALUE M13 3
GETDLGITEMVALUE M14 4
GETDLGITEMVALUE M16 14
TAKEDLGITEM
mov A9 <$USERNAME>
mov G10 <$STR(M10)>
mov G11 <$STR(M11)>
mov G12 <$STR(M12)>
mov G13 <$STR(M13)>
mov G14 <$STR(M14)>
mov G16 <$STR(M16)>
mov G7 0
DelayCall 1000 @倒计时手镯
MESSAGEBOX 竞拍开始前,卖家要交纳 起拍价1% 的服务费用!\ \起拍价由卖方自已决定
SENDMSG 0 <$USERNAME>,竞拍:<$STR(A10)>,竞拍价:<$STR(G9)>元宝!
goto @开始拍卖
Break

#IF
CHECKDLGITEMNAME <$DLGITEMNAME>
CHECKDLGITEMTYPE RING
#ACT
mov A10 <$DLGITEMNAME>
GAMEGOLD - 1
GETDLGITEMVALUE M10 0
GETDLGITEMVALUE M11 1
GETDLGITEMVALUE M12 2
GETDLGITEMVALUE M13 3
GETDLGITEMVALUE M14 4
GETDLGITEMVALUE M16 14
TAKEDLGITEM
mov A9 <$USERNAME>
mov G10 <$STR(M10)>
mov G11 <$STR(M11)>
mov G12 <$STR(M12)>
mov G13 <$STR(M13)>
mov G14 <$STR(M14)>
mov G16 <$STR(M16)>
mov G7 0
DelayCall 1000 @倒计时戒指
MESSAGEBOX 竞拍开始前,卖家要交纳 起拍价1% 的服务费用!\ \起拍价由卖方自已决定
SENDMSG 0 <$USERNAME>,竞拍:<$STR(A10)>,竞拍价:<$STR(G9)>元宝!
goto @开始拍卖
Break

#IF
CHECKDLGITEMNAME <$DLGITEMNAME>
#ACT
mov A10 <$DLGITEMNAME>
GAMEGOLD - 1
GETDLGITEMVALUE M10 0
GETDLGITEMVALUE M11 1
GETDLGITEMVALUE M12 2
GETDLGITEMVALUE M13 3
GETDLGITEMVALUE M14 4
GETDLGITEMVALUE M16 14
TAKEDLGITEM
mov A9 <$USERNAME>
mov G10 <$STR(M10)>
mov G11 <$STR(M11)>
mov G12 <$STR(M12)>
mov G13 <$STR(M13)>
mov G14 <$STR(M14)>
mov G16 <$STR(M16)>
mov G7 0
DelayCall 1000 @倒计时自定义
MESSAGEBOX 竞拍开始前,卖家要交纳 起拍价1% 的服务费用!\ \起拍价由卖方自已决定
SENDMSG 0 <$USERNAME>,竞拍:<$STR(A10)>,竞拍价:<$STR(G9)>元宝!
goto @开始拍卖
BREAK

#IF
CHECKDLGITEMNAME <$STR(S10)>
#ACT
mov A10 <$STR(S10)>
GAMEGOLD - 1
GETDLGITEMVALUE M10 0
GETDLGITEMVALUE M11 1
GETDLGITEMVALUE M12 2
GETDLGITEMVALUE M13 3
GETDLGITEMVALUE M14 4
GETDLGITEMVALUE M16 14
TAKEDLGITEM
mov A9 <$USERNAME>
mov G10 <$STR(M10)>
mov G11 <$STR(M11)>
mov G12 <$STR(M12)>
mov G13 <$STR(M13)>
mov G14 <$STR(M14)>
mov G16 <$STR(M16)>
mov G7 0
DelayCall 1000 @倒计时自定义
MESSAGEBOX 竞拍开始前,卖家要交纳 起拍价1% 的服务费用!\ \起拍价由卖方自已决定
SENDMSG 0 <$USERNAME>,竞拍:<$STR(A10)>,竞拍价:<$STR(G9)>元宝!
goto @开始拍卖
BREAK
#ELSECAT
#ELSESAY
\ \
<$DLGITEMNAME>暂时无固定拍卖!\
你可以自定义输入要拍卖的物品名称:\
<输入拍卖物品名称/@@InPutString10>




[@@InPutString10]
#If
CheckLevelEx > 0
#Act
DelayGoto 1 ~InPutString10
[~InPutString10]
#ACT
QUERYITEMDLG 放入要拍卖的装备 @1开始拍2 0
goto @开始拍卖
MESSAGEBOX 输入的自定义装备名称是:[<$STR(S10)>]重新放入装备即可开始拍卖!
BREAK

[@卖家领取]
#IF
EQUAL A9 <$USERNAME>
EQUAL G8 0
EQUAL A8 暂无
#ACT
GiveEx <$STR(A10)> 1 0=<$STR(G10)>,1=<$STR(G11)>,2=<$STR(G12)>,3=<$STR(G13)>,5=<$STR(G14)>,14=<$STR(G16)>
MESSAGEBOX 成功取回<$STR(A10)>!
SENDMSG 0 <$USERNAME>,竞拍失败:取回了<$STR(A10)>!
mov A10 暂无
mov A9 暂无
mov G10 0
mov G11 0
mov G12 0
mov G13 0
mov G14 0
Mov G9 0
Mov G8 0
mov G16 0
mov G50 0
mov G51 0
mov G52 0
mov G53 0
mov G54 0
mov G55 0
mov G56 0
mov G57 0
mov G58 0
mov G59 0
goto @开始拍卖
#ELSEACT
MESSAGEBOX 取回失败原因:\1.已有买价参与了竞价\2.你不是卖家\3.竞拍结束时间未到

[@买家领取]
#IF
EQUAL A8 <$USERNAME>
EQUAL G8 0
#ACT
SENDMSG 0 <$USERNAME>,成功竞拍到:<$STR(A10)>,竞拍价:<$STR(G9)>元宝已发放到卖家手中!
SENDMSG 0 <$USERNAME>,成功竞拍到:<$STR(A10)>,竞拍价:<$STR(G9)>元宝已发放到卖家手中!
GiveEx <$STR(A10)> 1 0=<$STR(G10)>,1=<$STR(G11)>,2=<$STR(G12)>,3=<$STR(G13)>,5=<$STR(G14)>,14=<$STR(G16)>
MESSAGEBOX 竞价成功领取<$STR(A10)>!
MOV G4 <$STR(G9)>
DIV G9 10
DEC G4 <$STR(G9)>
<$STR(A9)>.GAMEGOLD + <$STR(G4)>
mov A10 暂无
mov A8 暂无
mov A9 暂无
mov G10 0
mov G11 0
mov G12 0
mov G13 0
mov G14 0
Mov G9 0
mov G16 0
mov G50 0
mov G51 0
mov G52 0
mov G53 0
mov G54 0
mov G55 0
mov G56 0
mov G57 0
mov G58 0
mov G59 0
goto @开始拍卖
#ELSEACT
MESSAGEBOX 时间未到或你跟本没竞价成功这么急想得到<$STR(A10)>啊??

[@重置拍卖]
#ACT
mov A10 暂无
mov A8 暂无
mov A9 暂无
mov G10 0
mov G11 0
mov G12 0
mov G13 0
mov G14 0
Mov G9 0
Mov G8 0
mov G16 0
mov G50 0
mov G51 0
mov G52 0
mov G53 0
mov G54 0
mov G55 0
mov G56 0
mov G57 0
mov G58 0
mov G59 0
MESSAGEBOX 拍卖已重置!


[@倒计时宝石]
#IF
#ACT
mov G50 1
SENDMSG 0 =========================================================== 255 245 10
SENDMSG 0 <$USERNAME>,拍卖宝石:<$STR(A10)>,首拍价:<$STR(G9)>元宝,竞拍剩余时间:%t秒 255 245 <$STR(G8)>
SENDMSG 0 <$STR(A10)>极品属性:防御+<$STR(G10)>,魔防+<$STR(M11)>,攻击+<$STR(M12)>,魔法+<$STR(M13)>,道术+<$STR(M14)>,持久=<$STR(M16)> 255 245 <$STR(G8)>
SENDMSG 0 =========================================================== 255 245 10
[@倒计时腰带]
#IF
#ACT
mov G51 1
SENDMSG 0 =========================================================== 255 245 10
SENDMSG 0 <$USERNAME>,拍卖腰带:<$STR(A10)>,首拍价:<$STR(G9)>元宝,竞拍剩余时间:%t秒 255 245 <$STR(G8)>
SENDMSG 0 <$STR(A10)>极品属性:防御+<$STR(G10)>,魔防+<$STR(M11)>,攻击+<$STR(M12)>,魔法+<$STR(M13)>,道术+<$STR(M14)>,持久=<$STR(M16)> 255 245 <$STR(G8)>
SENDMSG 0 =========================================================== 255 245 10
[@倒计时靴子]
#IF
#ACT
mov G52 1
SENDMSG 0 =========================================================== 255 245 10
SENDMSG 0 <$USERNAME>,拍卖靴子:<$STR(A10)>,首拍价:<$STR(G9)>元宝,竞拍剩余时间:%t秒 255 245 <$STR(G8)>
SENDMSG 0 <$STR(A10)>极品属性:防御+<$STR(G10)>,魔防+<$STR(M11)>,攻击+<$STR(M12)>,魔法+<$STR(M13)>,道术+<$STR(M14)>,持久=<$STR(M16)> 255 245 <$STR(G8)>
SENDMSG 0 =========================================================== 255 245 10
[@倒计时勋章]
#IF
#ACT
mov G53 1
SENDMSG 0 =========================================================== 255 245 10
SENDMSG 0 <$USERNAME>,拍卖勋章:<$STR(A10)>,首拍价:<$STR(G9)>元宝,竞拍剩余时间:%t秒 255 245 <$STR(G8)>
SENDMSG 0 <$STR(A10)>极品属性:防御+<$STR(G10)>,魔防+<$STR(M11)>,攻击+<$STR(M12)>,魔法+<$STR(M13)>,道术+<$STR(M14)>,持久=<$STR(M16)> 255 245 <$STR(G8)>
SENDMSG 0 =========================================================== 255 245 10
[@倒计时头盔]
#IF
#ACT
mov G54 1
SENDMSG 0 =========================================================== 255 245 10
SENDMSG 0 <$USERNAME>,拍卖头盔:<$STR(A10)>,首拍价:<$STR(G9)>元宝,竞拍剩余时间:%t秒 255 245 <$STR(G8)>
SENDMSG 0 <$STR(A10)>极品属性:防御+<$STR(G10)>,魔防+<$STR(M11)>,攻击+<$STR(M12)>,魔法+<$STR(M13)>,道术+<$STR(M14)>,持久=<$STR(M16)> 255 245 <$STR(G8)>
SENDMSG 0 =========================================================== 255 245 10
[@倒计时自定义]
#IF
#ACT
SENDMSG 0 =========================================================== 255 245 10
SENDMSG 0 <$USERNAME>,拍卖物品:<$STR(A10)>,首拍价:<$STR(G9)>元宝,竞拍剩余时间:%t秒 255 245 <$STR(G8)>
SENDMSG 0 <$STR(A10)>物品属性:+<$STR(G10)>,+<$STR(M11)>,+<$STR(M12)>,+<$STR(M13)>,+<$STR(M14)>,+<$STR(M16)> 255 245 <$STR(G8)>
SENDMSG 0 =========================================================== 255 245 10
[@倒计时衣服]
#IF
#ACT
mov G55 1
SENDMSG 0 =========================================================== 255 245 10
SENDMSG 0 <$USERNAME>,拍卖服装:<$STR(A10)>,首拍价:<$STR(G9)>元宝,竞拍剩余时间:%t秒 255 245 <$STR(G8)>
SENDMSG 0 <$STR(A10)>极品属性:防御+<$STR(G10)>,魔防+<$STR(M11)>,攻击+<$STR(M12)>,魔法+<$STR(M13)>,道术+<$STR(M14)>,持久=<$STR(M16)> 255 245 <$STR(G8)>
SENDMSG 0 =========================================================== 255 245 10
[@倒计时]
#IF
#ACT
mov G56 1
SENDMSG 0 =========================================================== 255 245 10
SENDMSG 0 <$USERNAME>,拍卖武器:<$STR(A10)>,首拍价:<$STR(G9)>元宝,竞拍剩余时间:%t秒 255 245 <$STR(G8)>
SENDMSG 0 <$STR(A10)>极品属性:攻击+<$STR(G10)>,魔法+<$STR(M11)>,道术+<$STR(M12)>,幸运+<$STR(M13)>,准确+<$STR(M14)>,持久=<$STR(M16)> 255 245 <$STR(G8)>
SENDMSG 0 =========================================================== 255 245 10
[@倒计时项链]
#IF
#ACT
mov G57 1
SENDMSG 0 =========================================================== 255 245 10
SENDMSG 0 <$USERNAME>,拍卖项链:<$STR(A10)>,首拍价:<$STR(G9)>元宝,竞拍剩余时间:%t秒 255 245 <$STR(G8)>
SENDMSG 0 <$STR(A10)>极品属性:防御+<$STR(G10)>,魔防+<$STR(M11)>,攻击+<$STR(M12)>,魔法+<$STR(M13)>,道术+<$STR(M14)>,持久=<$STR(M16)> 255 245 <$STR(G8)>
SENDMSG 0 =========================================================== 255 245 10
[@倒计时手镯]
#IF
#ACT
mov G58 1
SENDMSG 0 =========================================================== 255 245 10
SENDMSG 0 <$USERNAME>,拍卖手镯:<$STR(A10)>,首拍价:<$STR(G9)>元宝,竞拍剩余时间:%t秒 255 245 <$STR(G8)>
SENDMSG 0 <$STR(A10)>极品属性:防御+<$STR(G10)>,魔防+<$STR(M11)>,攻击+<$STR(M12)>,魔法+<$STR(M13)>,道术+<$STR(M14)>,持久=<$STR(M16)> 255 245 <$STR(G8)>
SENDMSG 0 =========================================================== 255 245 10
[@倒计时戒指]
#IF
#ACT
mov G59 1
SENDMSG 0 =========================================================== 255 245 10
SENDMSG 0 <$USERNAME>,拍卖戒指:<$STR(A10)>,首拍价:<$STR(G9)>元宝,竞拍剩余时间:%t秒 255 245 <$STR(G8)>
SENDMSG 0 <$STR(A10)>极品属性:防御+<$STR(G10)>,魔防+<$STR(M11)>,攻击+<$STR(M12)>,魔法+<$STR(M13)>,道术+<$STR(M14)>,持久=<$STR(M16)> 255 245 <$STR(G8)>
SENDMSG 0 =========================================================== 255 245 10
[@竞拍成功]
#ACT
MESSAGEBOX 竞拍开始后,在剩余拍卖时间为0前有买家竞价的话\ \则被视为竞拍成功\ \最终竞拍成功买家可以在我这里领取拍卖物品\ \买家领取到拍卖物品后竞拍元宝自动汇入卖家手中

[@拍卖失败]
#ACT
MESSAGEBOX 竞拍开始后,在剩余拍卖时间为0前有买家竞价的话\ \则竞拍被视为轮空,竞拍失败\ \卖家可以在我这里领回所拍卖的游戏道具
}

游客,如果您要查看本帖隐藏内容请回复


回复

使用道具 举报

精彩评论2

xinyukala 发表于 2021-12-27 16:19:32 | 显示全部楼层
不错,又占了一个沙发!
回复

使用道具 举报

akenyc 发表于 2022-6-10 18:23:47 | 显示全部楼层
观摩观摩!!!!!!!!!!!!!!!1
回复

使用道具 举报

懒得打字嘛,点击右侧快捷回复 【右侧内容,后台自定义】
您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

PKhuo论坛手机版

扫一扫二维码

传奇最全教程基地

Powered by PKhuo!X3.4 ©2001-2013 Comsenz Inc. 湘ICP备15015719号-5 |Sitemap|友链申请|网站地图