传世脚本 传世1.910宝箱和钥匙数据代码

;数据库设置
神秘钥匙;46;0;1;0;0;0;953;0;0;0;0;0;0;0;0;0;0;0;0;0;40000;5
赤金钥匙;46;0;1;0;0;0;933;0;0;0;0;0;0;0;0;0;0;0;0;0;40000;5
白银钥匙;46;0;1;0;0;0;934;0;0;0;0;0;0;0;0;0;0;0;0;0;40000;5
青木钥匙;46;0;1;0;0;0;946;0;0;0;0;0;0;0;0;0;0;0;0;0;300000;5
神秘钥匙串;46;0;1;0;0;0;954;0;0;0;0;0;0;0;0;0;0;0;0;0;40000;5
赤金钥匙串;46;0;1;0;0;0;937;0;0;0;0;0;0;0;0;0;0;0;0;0;40000;5
白银钥匙串;46;0;1;0;0;0;938;0;0;0;0;0;0;0;0;0;0;0;0;0;40000;5
青木钥匙串;46;0;1;0;0;0;947;0;0;0;0;0;0;0;0;0;0;0;0;0;300000;5
神秘宝箱31,0,5,0,0,0,949;10000;0;0;0;0;0;0;0;0;0;0;0;0;20000;5
赤金宝箱31,0,5,0,0,0,935;10000;0;0;0;0;0;0;0;0;0;0;0;0;20000;5
白银宝箱31,0,5,0,0,0,936;10000;0;0;0;0;0;0;0;0;0;0;0;0;20000;5
青木宝箱31,0,5,0,0,0,945;10000;0;0;0;0;0;0;0;0;0;0;0;0;20000;5
;商城设置
31=101031|953|00199|神秘钥匙|10|1
32=101032|954|00200|神秘钥匙串|100|1
33=101033|933|00190|赤金钥匙|5|1
34=101034|937|00192|赤金钥匙串|50|1
35=101035|934|00191|白银钥匙|2|1
36=101036|938|00193|白银钥匙串|20|1
;商城物品说明
可以用来打开宝箱的特殊钥匙(注意:双击宝箱自动扣除钥匙,同时还要始终保证自己的包裹有足够的空间来承载奖励物品,如果玩家在开启过程中死亡或下线也将无法获得宝箱奖励)此道具使用次数1次

;商城购买触发(每个版本变量不一样建议使用自己的QSHOPNPC-0触发脚本)
[@BuyItem101031]
#ACT
CALCVAR HUMAN SCL = $BUYITEMNUMBER
CALCVAR HUMAN SCL * 10
#if
CHECKBAGSIZE $BUYITEMNUMBER
#act
#elseact
MessageBox 对不起，您身上背包的位置不够！请清理出空位！
break
#IF
CHECKGAMEGOLD > $human(SCL)
,#ACT
GAMEGOLD - $human(SCL)
give 神秘钥匙 $BUYITEMNUMBER
INC G79 5
CALCVAR HUMAN JFD + $human(SCL)
SAVEVAR HUMAN JFD ..\QuestDiary\数据文件\JFDSave.txt
MessageBox 您已经购买了神秘钥匙
SENDMSG 5 您当前元宝数量为:<$GAMEGOLD>
#ELSEACT
MessageBox 对不起，您的元宝不足，购买失败。
[@BuyItem101032]
#ACT
CALCVAR HUMAN SCL = $BUYITEMNUMBER
CALCVAR HUMAN SCL * 100
#if
CHECKBAGSIZE $BUYITEMNUMBER
#act
#elseact
MessageBox 对不起，您身上背包的位置不够！请清理出空位！
break
#IF
CHECKGAMEGOLD > $human(SCL)
#ACT
GAMEGOLD - $human(SCL)
give 神秘钥匙串 $BUYITEMNUMBER
INC G79 5
CALCVAR HUMAN JFD + $human(SCL)
SAVEVAR HUMAN JFD ..\QuestDiary\数据文件\JFDSave.txt
MessageBox 您已经购买了神秘钥匙串
SENDMSG 5 您当前元宝数量为:<$GAMEGOLD>
#ELSEACT
MessageBox 对不起，您的元宝不足，购买失败。
[@BuyItem101033]
#ACT
CALCVAR HUMAN SCL = $BUYITEMNUMBER
CALCVAR HUMAN SCL * 5
#if
CHECKBAGSIZE $BUYITEMNUMBER
#act
#elseact
MessageBox 对不起，您身上背包的位置不够！请清理出空位！
break
#IF
CHECKGAMEGOLD > $human(SCL)
#ACT
GAMEGOLD - $human(SCL)
give 赤金钥匙 $BUYITEMNUMBER
INC G79 5
CALCVAR HUMAN JFD + $human(SCL)
SAVEVAR HUMAN JFD ..\QuestDiary\数据文件\JFDSave.txt
MessageBox 您已经购买了赤金钥匙
SENDMSG 5 您当前元宝数量为:<$GAMEGOLD>
#ELSEACT
MessageBox 对不起，您的元宝不足，购买失败。
[@BuyItem101034]
#ACT
CALCVAR HUMAN SCL = $BUYITEMNUMBER
CALCVAR HUMAN SCL * 50
#if
CHECKBAGSIZE $BUYITEMNUMBER
#act
#elseact
MessageBox 对不起，您身上背包的位置不够！请清理出空位！
break
#IF
CHECKGAMEGOLD > $human(SCL)
#ACT
GAMEGOLD - $human(SCL)
give 赤金钥匙串 $BUYITEMNUMBER
INC G79 5
CALCVAR HUMAN JFD + $human(SCL)
SAVEVAR HUMAN JFD ..\QuestDiary\数据文件\JFDSave.txt
MessageBox 您已经购买了赤金钥匙串<b>**** Hidden Message *****</b>

我只看看不说话。。。

楼上的这是啥态度呢？

感谢楼主的推荐！

看了这么多帖子，第一次看到这么经典的！

很多天不上线，一上线就看到这么给力的帖子！