AutoRestoremana.lua--自动战斗结束回蓝模块

local arm_NPC = {14010,"爱野餐的莉莉娅",4,1000,239,83} --npc
local arm_item = 79600 --料理食盒道具编号
local arm_petitem = 79601 --宠物料理食盒道具编号

Global_Reg.RegInit("autoRestoremana_Init");--注册基本NPC窗口对话和响应功能
Global_Reg.RegItemUseEvent("autoRestmp_shuangji")--双击道具事件
Global_Reg.RegMoveEquipItem("autoRestmp_cunfang")--移动一件道具到另一个格子事件
Global_Reg.RegBattleOverEvent("autoRestmp_battle")--战斗结束事件
Global_Reg.RegLoginEvent ("autoRestoremana_login")--玩家登录
---------------------------------------☆雨雨专用☆---------------------------------------------------------
autoRestoremana_tab = autoRestoremana_tab or {}--建立一个全局表,关联脚本ExpPlus.lua中的RegCharGetExp(用于判断战斗结束)
autoRestoremana_pet_tab = autoRestoremana_pet_tab or {} --宠物回蓝记录表,关联脚本ExpPlus.lua中的PetExpPlus(用于判断战斗结束)
---------------------------------------☆雨雨专用☆---------------------------------------------------------
function autoRestoremana_login(player)
        if autoRestoremana_pet_tab[player] then
                autoRestoremana_pet_tab[player]=nil
        end
        return 0
end

function autoRestoremana_Init()
        Restoremana_NPCA();
        --NL.RegMoveEquipItem(nil,"autoRestmp_cunfang")--移动一件道具到另一个格子事件
        return 0;
end

function Restoremana_NPCA(npc)
        if npc == nil or npc < 0 then
        npc = NL.CreateNpc(nil,"Restoremana_NPCB")
        end
        Char.SetData(npc,%对象_形象%,arm_NPC[1])
        Char.SetData(npc,%对象_原形%,arm_NPC[1])
        Char.SetData(npc,%对象_地图%,arm_NPC[4])
        Char.SetData(npc,%对象_X%,arm_NPC[5])
        Char.SetData(npc,%对象_Y%,arm_NPC[6])
        Char.SetData(npc,%对象_方向%,arm_NPC[3])
        Char.SetData(npc,%对象_原名%,arm_NPC[2])
        NLG.UpChar(npc)
        LuaNpcIndex["Autorm_Init"]=npc;
        InstallNpc("Autorm_Init",npc);
        Char.SetTalkedEvent(nil, "Restoremana_WindowEventCallBack",npc)
        Char.SetWindowTalkedEvent(nil,"Restoremana_WindowEvent",npc)
        return true
end

function Restoremana_NPCB(index)
        return true;
end

function Restoremana_WindowEventCallBack(npc,player)
        if NLG.CheckInFront(player,npc,2) then
                local msg = "5\n人家正努力推广法兰城的周末野餐文化,突然增多的魔物让大家都不敢外出了,异世界的勇者您能帮我讨伐魔物吗?\n$9我可以免费送您手工做的$4『料理食盒』$9作答谢$0\n\n1.查看『料理食盒』用法\n2.领取『料理食盒』\n3.领取『宠物料理食盒』"
                NLG.ShowWindowTalked(player,2,2,1,msg,npc);
        end
end

function Restoremana_WindowEvent(npc,player,Seqno,Select,Data)
        --print("\n Seqno是:"..Seqno.."\n Select是:"..Select.."\n Data是:"..Data)
        if Select~=2 then --按下的按钮不是取消
                if Seqno==1 then
                        if Data=="1" then
                                local msg="8\n$9①4『料理食盒简介』$9当料理食盒开启时,战斗结束将会$4『自动恢复魔法值』$9,并扣除对应的食盒耐久值,您可以设定魔法值低于一定的比例才使用料理食盒"
                                                .."\n$9②4『料理食盒魔法值』$9可以通过右键单击$4『料理』$9,$9拖动到$4『料理食盒』$9内进行料理存放,根据下列表格$9补充$4『料理食盒魔法值』$9(通过料理食盒的耐久度显示)"
                                                .."\n\n    $4请点击此处查看料理食盒具体补充魔法值"
                                NLG.ShowWindowTalked(player,2,2,100,msg,npc);--介绍的下一页判断用100编号的Seqno
                        elseif Data=="2" then
                                local Num = Char.ItemNum(player,arm_item)
                                if Num>0 then
                                        NLG.SystemMessage(player,"[莉莉娅]:您已经有一份『料理食盒』了")
                                else
                                        local itemNum = Char.FindEmptyItemBox(player)
                                        if itemNum>0 then
                                                NLG.GiveItem(player,arm_item)
                                                for i=8,47 do
                                                        local ItemIndex = Char.GetItemIndex(player,i)
                                                        local Item_ID = Item.GetData(ItemIndex,0);--获取道具ID
                                                        if Item_ID==arm_item then
                                                                Item.SetData(ItemIndex,%道具_耐久%,0)
                                                                Item.UpItem(player,i)
                                                        end
                                                end
                                                NLG.SystemMessage(player,"[系统]:你获得了『料理食盒』")
                                        else
                                                NLG.SystemMessage(player,"[系统]:你身上没有空位放置『料理食盒』")
                                        end
                                end
                        elseif Data=="3" then
                                local Num = Char.ItemNum(player,arm_petitem)
                                if Num>0 then
                                        NLG.SystemMessage(player,"[莉莉娅]:您已经有一份『宠物料理食盒』了")
                                else
                                        local itemNum = Char.FindEmptyItemBox(player)
                                        if itemNum>0 then
                                                NLG.GiveItem(player,arm_petitem)
                                                for i=8,47 do
                                                        local ItemIndex = Char.GetItemIndex(player,i)
                                                        local Item_ID = Item.GetData(ItemIndex,0);--获取道具ID
                                                        if Item_ID==arm_petitem then
                                                                Item.SetData(ItemIndex,%道具_耐久%,0)
                                                                Item.UpItem(player,i)
                                                        end
                                                end
                                                NLG.SystemMessage(player,"[系统]:你获得了『宠物料理食盒』")
                                        else
                                                NLG.SystemMessage(player,"[系统]:你身上没有空位放置『宠物料理食盒』")
                                        end
                                end
                        end
                elseif Seqno==10 then
                        if Select==1 then
                                local msg = "2\n\n\n1.『料理食盒』介绍\n2.使用『料理食盒』\n3.停止从『料理食盒』内拿食物"
                                NLG.ShowWindowTalked(player,2,2,10,msg,npc);
                        end
                        if Data=="1" then
                                local msg="8\n$9①4『料理食盒简介』$9当料理食盒开启时,战斗结束将会$4『自动恢复魔法值』$9,并扣除对应的食盒耐久值,您可以设定魔法值低于一定的比例才使用料理食盒"
                                                .."\n$9②4『料理食盒魔法值』$9可以通过右键单击$4『料理』$9,$9拖动到$4『料理食盒』$9内进行料理存放,根据下列表格$9补充$4『料理食盒魔法值』$9(通过料理食盒的耐久度显示)"
                                                .."\n\n    $4请点击此处查看料理食盒具体补充魔法值"
                                NLG.ShowWindowTalked(player,2,2,100,msg,npc);--介绍的下一页判断用100编号的Seqno
                        elseif Data=="2" then
                                local msg = "选择[确定]开启『料理食盒』[战斗后自动回蓝功能],请输入输入0-99的值,当战斗结束蓝量低于该值(百分比)时,将会自动恢复蓝量,什么也不设置直接确认时,将会以70%为初设定值开启"
                                NLG.ShowWindowTalked(player,1,3,200,msg,npc);--设定为200编号Seqno触发回蓝设定
                        elseif Data=="3" then
                                if autoRestoremana_tab[player] then
                                        autoRestoremana_tab[player]=nil
                                        NLG.SystemMessage(player,"[系统]:您停止从『料理食盒』内拿取食物(关闭战斗后自动回蓝功能)")
                                else
                                        NLG.SystemMessage(player,"[系统]:您未使用『料理食盒』")
                                end
                        end
                elseif Seqno==100 then
                        if Data=="1" then
                                Char.OpenHttp(player,"http://bbs.ftmoli.com/forum.php?mod=viewthread&tid=80");
                        end
                elseif Seqno==200 then
                        local bili = tonumber(Data)
                        if type(bili)=="number" then
                                if bili>=0 and bili<=99 then
                                        autoRestoremana_tab[player]=bili
                                        NLG.SystemMessage(player,"[系统]:您设置战斗结束后自身魔法值低于"..bili.."%自动恢复魔法值")
                                else
                                        autoRestoremana_tab[player]=70
                                        NLG.SystemMessage(player,"[系统]:您设置的战斗结束后剩余魔法值比例值不在0-99内,已自动设定为低于70%就恢复魔法值[开启战斗结束恢复魔法值功能]")
                                end
                        else
                                autoRestoremana_tab[player]=70
                                NLG.SystemMessage(player,"[系统]:请设置正确的比例(数字0到99内),由于输入错误,已自动设定为低于70%就恢复魔法值的初始值[开启战斗结束恢复魔法值功能]")
                        end
                elseif Seqno==300 then
                        local bili = tonumber(Data)
                        if type(bili)=="number" then
                                if bili>=0 and bili<=99 then
                                        autoRestoremana_pet_tab[player]=bili
                                        NLG.SystemMessage(player,"[系统]:您设置战斗结束后宠物魔法值低于"..bili.."%自动恢复魔法值")
                                else
                                        autoRestoremana_pet_tab[player]=70
                                        NLG.SystemMessage(player,"[系统]:您设置的战斗结束后宠物剩余魔法值比例值不在0~99内,已自动设定为低于70%就恢复魔法值[开启战斗结束恢复魔法值功能]")
                                end
                        else
                                autoRestoremana_pet_tab[player]=70
                                NLG.SystemMessage(player,"[系统]:请设置正确的比例(数字0到99内),由于输入错误,已自动设定为战斗结束宠物魔法值比例低于70%就恢复魔法值[开启战斗结束恢复魔法值功能]")
                        end
                elseif Seqno==1000 then
                        if Select==1 then
                                local msg = "2\n\n\n1.『料理食盒』介绍\n2.使用『宠物料理食盒』\n3.停止用『宠物料理食盒』内的食物喂食宠物"
                                NLG.ShowWindowTalked(player,2,2,1000,msg,npc);
                        end
                        if Data=="1" then
                                local msg="8\n$9①4『料理食盒简介』$9当料理食盒开启时,战斗结束将会$4『自动恢复魔法值』$9,并扣除对应的食盒耐久值,您可以设定魔法值低于一定的比例才使用料理食盒"
                                                .."\n$9②4『料理食盒魔法值』$9可以通过右键单击$4『料理』$9,$9拖动到$4『料理食盒』$9内进行料理存放,根据下列表格$9补充$4『料理食盒魔法值』$9(通过料理食盒的耐久度显示)"
                                                .."\n\n    $4请点击此处查看料理食盒具体补充魔法值"
                                NLG.ShowWindowTalked(player,10,34,100,msg,npc);--介绍的下一页判断用100编号的Seqno
                        elseif Data=="2" then
                                local msg = "选择[确定]开启『宠物料理食盒』[战斗后自动为宠物回蓝功能],请输入输入0~99的值,当战斗结束蓝量低于该值(百分比)时,将会自动恢复蓝量,什么也不设置直接确认时,将会以70%为初设定值开启"
                                NLG.ShowWindowTalked(player,1,3,300,msg,npc);--设定为300编号Seqno触发宠物回蓝设定
                        elseif Data=="3" then
                                if autoRestoremana_pet_tab[player] then
                                        autoRestoremana_pet_tab[player]=nil
                                        NLG.SystemMessage(player,"[系统]:您停止从『宠物料理食盒』内拿取食物(关闭战斗后自动为宠物回蓝功能)")
                                else
                                        NLG.SystemMessage(player,"[系统]:您未使用『宠物料理食盒』")
                                end
                        end
                end
        end
        return
end

function autoRestmp_battle(battleindex)
        local GetType = Battle.GetType(battleindex);
        --NLG.SystemMessage(-1,"战斗类型是"..GetType)
        if GetType==1 then
                for i=0,9 do
                        local player = Battle.GetPlayIndex(battleindex, 0, i);
                        if player>=0 then
                                local ifpet = Char.GetData(player,0)
                                if ifpet==1 then--是人,启动人物料理食盒
                                        if autoRestoremana_tab[player] then--战斗结束自动回蓝事件
                                                local mp = Char.GetData(player,%对象_魔%)
                                                local maxmp = Char.GetData(player,288)--%对象_最大魔%常量用288代替,免得报错
                                                local dqmpbl = math.floor((mp/maxmp)*100)
                                                if autoRestoremana_tab[player]>=dqmpbl then
                                                        for i=8,47 do
                                                                local ItemIndex = Char.GetItemIndex(player,i);
                                                                if ItemIndex>=0 then--有道具
                                                                        local Item_ID = Item.GetData(ItemIndex,0);
                                                                        if Item_ID==arm_item then
                                                                                local Item_nj = Item.GetData(ItemIndex,%道具_耐久%)--获取剩余耐久
                                                                                if Item_nj>0 then
                                                                                        local que = maxmp - mp
                                                                                        if Item_nj>=que then
                                                                                                Char.SetData(player,%对象_魔%,Char.GetData(player,288))
                                                                                                Item.SetData(ItemIndex,%道具_耐久%,Item_nj-que)
                                                                                                NLG.UpChar(player)
                                                                                                Item.UpItem(player,i)
                                                                                                NLG.SystemMessage(player,"[系统]:您从『料理食盒』内拿取食物,恢复了魔法值")
                                                                                        elseif Item_nj<que then
                                                                                                Char.SetData(player,%对象_魔%,mp+Item_nj)
                                                                                                Item.SetData(ItemIndex,%道具_耐久%,0)
                                                                                                NLG.UpChar(player)
                                                                                                Item.UpItem(player,i)
                                                                                                autoRestoremana_tab[player]=nil
                                                                                                NLG.SystemMessage(player,"[系统]:您从『料理食盒』内拿光了食物,恢复了魔法值(关闭战斗后自动回蓝功能)")
                                                                                        end
                                                                                else
                                                                                        autoRestoremana_tab[player]=nil
                                                                                        NLG.SystemMessage(player,"[系统]:『料理食盒』内空空如也,已经自动停止从『料理食盒』内拿取食物(关闭战斗后自动回蓝功能)")
                                                                                end
                                                                                break
                                                                        end
                                                                end
                                                        end
                                                end
                                        end
                                elseif ifpet==3 then--是宠,启动宠物料理食盒
                                        local petindex=player
                                        local cdk = Char.GetData(petindex,%对象_宠物主人CDK%)
                                        local player = NLG.GetCharindexformuser(cdk);
                                        if autoRestoremana_pet_tab[player] then--战斗结束自动回蓝事件
                                                local mp = Char.GetData(petindex,%对象_魔%)
                                                local maxmp = Char.GetData(petindex,288)--%对象_最大魔%常量用288代替,免得报错
                                                local dqmpbl = math.floor((mp/maxmp)*100)
                                                if autoRestoremana_pet_tab[player]>=dqmpbl then
                                                        for i=8,47 do
                                                                local ItemIndex = Char.GetItemIndex(player,i);
                                                                if ItemIndex>=0 then--有道具
                                                                        local Item_ID = Item.GetData(ItemIndex,0);
                                                                        if Item_ID==arm_petitem then
                                                                                local Item_nj = Item.GetData(ItemIndex,%道具_耐久%)--获取剩余耐久
                                                                                if Item_nj>0 then
                                                                                        local que = maxmp - mp
                                                                                        if Item_nj>=que then
                                                                                                Char.SetData(petindex,%对象_魔%,Char.GetData(petindex,288))
                                                                                                Item.SetData(ItemIndex,%道具_耐久%,Item_nj-que)
                                                                                                Pet.UpPet(player,-1)
                                                                                                Item.UpItem(player,i)
                                                                                                NLG.SystemMessage(player,"[系统]:您从『宠物料理食盒』内拿取食物,为宠物恢复了魔法值")
                                                                                        elseif Item_nj<que then
                                                                                                Char.SetData(player,%对象_魔%,mp+Item_nj)
                                                                                                Item.SetData(ItemIndex,%道具_耐久%,0)
                                                                                                Pet.UpPet(player,-1)
                                                                                                Item.UpItem(player,i)
                                                                                                autoRestoremana_pet_tab[player]=nil
                                                                                                NLG.SystemMessage(player,"[系统]:您从『宠物料理食盒』内拿光了食物,为宠物恢复了魔法值(关闭战斗后自动为宠物回蓝功能)")
                                                                                        end
                                                                                else
                                                                                        autoRestoremana_pet_tab[player]=nil
                                                                                        NLG.SystemMessage(player,"[系统]:『宠物料理食盒』内空空如也,已经自动停止从『宠物料理食盒』内拿取食物(关闭战斗后为宠物自动回蓝功能)")
                                                                                end
                                                                                break
                                                                        end
                                                                end
                                                        end
                                                end
                                        end
                                end
                        end       
                end
        end
        return 0
end

function autoRestmp_shuangji(player,Itemindex)--双击道具事件
        local Item_ID = Item.GetData(Itemindex,0);--获取道具ID
        if Item_ID==arm_item then
                Restoremana_WindowEvent(LuaNpcIndex["Autorm_Init"],player,10,1,"")--Select模拟为1(相当于选了"是")
        elseif Item_ID==arm_petitem then
                Restoremana_WindowEvent(LuaNpcIndex["Autorm_Init"],player,1000,1,"")--Seqno设定为1000
        end
        return 0
end

function autoRestmp_cunfang(player,OldItemPos, NewItemPos)--移动一件道具到另一个格子事件
        local oldItemIndex = Char.GetItemIndex(player,OldItemPos);
        local newItemIndex = Char.GetItemIndex(player,NewItemPos);
        local oldItem_ID = Item.GetData(oldItemIndex,0) or -1
        local newItem_ID = Item.GetData(newItemIndex,0) or -1
        if oldItem_ID==arm_item then
                if newItem_ID==12405 then--番茄酱-20%
                        food_storage(player,newItem_ID,OldItemPos,NewItemPos,oldItemIndex,6)
                elseif newItem_ID==15201 then--面包-20%
                        food_storage(player,newItem_ID,OldItemPos,NewItemPos,oldItemIndex,20)
                elseif newItem_ID==15202 then--蛋包饭-60%
                        food_storage(player,newItem_ID,OldItemPos,NewItemPos,oldItemIndex,90)
                elseif newItem_ID==15203 then--法国面包-60%
                        food_storage(player,newItem_ID,OldItemPos,NewItemPos,oldItemIndex,120)
                elseif newItem_ID==15204 then--炒面-80%
                        food_storage(player,newItem_ID,OldItemPos,NewItemPos,oldItemIndex,200)
                elseif newItem_ID==15206 then--青椒肉丝-80%
                        food_storage(player,newItem_ID,OldItemPos,NewItemPos,oldItemIndex,240)
                elseif newItem_ID==15207 then--烧鸡-120%
                        food_storage(player,newItem_ID,OldItemPos,NewItemPos,oldItemIndex,420)
                elseif newItem_ID==15208 then--亲子丼-120%
                        food_storage(player,newItem_ID,OldItemPos,NewItemPos,oldItemIndex,480)
                elseif newItem_ID==15209 then--汉堡-140%
                        food_storage(player,newItem_ID,OldItemPos,NewItemPos,oldItemIndex,630)
                elseif newItem_ID==15210 then--星鳗饭团-140%
                        food_storage(player,newItem_ID,OldItemPos,NewItemPos,oldItemIndex,700)
                elseif newItem_ID==15205 then--炒面面包-180%
                        food_storage(player,newItem_ID,OldItemPos,NewItemPos,oldItemIndex,990)
                elseif newItem_ID==15211 then--寿喜锅-180%
                        food_storage(player,newItem_ID,OldItemPos,NewItemPos,oldItemIndex,1080)       
                elseif newItem_ID==15212 then--咖喱饭-200%
                        food_storage(player,newItem_ID,OldItemPos,NewItemPos,oldItemIndex,1300)
                elseif newItem_ID==15213 then--韩式泡菜饭-200%
                        food_storage(player,newItem_ID,OldItemPos,NewItemPos,oldItemIndex,1400)
                elseif newItem_ID==15214 then--螃蟹锅-200%
                        food_storage(player,newItem_ID,OldItemPos,NewItemPos,oldItemIndex,1500)
                elseif newItem_ID==15215 then--牛排-200%
                        food_storage(player,newItem_ID,OldItemPos,NewItemPos,oldItemIndex,1600)
                elseif newItem_ID==15216 then--醋饭寿司-200%
                        food_storage(player,newItem_ID,OldItemPos,NewItemPos,oldItemIndex,1700)
                elseif newItem_ID==15217 then--豪华寿司组-200%
                        food_storage(player,newItem_ID,OldItemPos,NewItemPos,oldItemIndex,1800)
                elseif newItem_ID==15218 then--鱼翅汤-200%
                        food_storage(player,newItem_ID,OldItemPos,NewItemPos,oldItemIndex,2000)
                elseif newItem_ID==15219 then--鳖料理-200%
                        food_storage(player,newItem_ID,OldItemPos,NewItemPos,oldItemIndex,2400)
                elseif newItem_ID==50316 then--鲷鱼烧-300%
                        food_storage(player,newItem_ID,OldItemPos,NewItemPos,oldItemIndex,300)
                elseif newItem_ID==50060 then--炭烧烤串-300%
                        food_storage(player,newItem_ID,OldItemPos,NewItemPos,oldItemIndex,600)
                elseif newItem_ID==50061 then--羊羹-300%
                        food_storage(player,newItem_ID,OldItemPos,NewItemPos,oldItemIndex,1200)
                elseif newItem_ID==670002 then--魔力之泉-300%
                        food_storage(player,newItem_ID,OldItemPos,NewItemPos,oldItemIndex,6000)
                elseif newItem_ID==91051 then--蜜糖松饼-300%(原始350)
                        food_storage(player,newItem_ID,OldItemPos,NewItemPos,oldItemIndex,1050)
                elseif newItem_ID==16234 then--年节料理-300%
                        food_storage(player,newItem_ID,OldItemPos,NewItemPos,oldItemIndex,6000)
                elseif newItem_ID==56341 then--元宵-300%
                        food_storage(player,newItem_ID,OldItemPos,NewItemPos,oldItemIndex,300)
                elseif newItem_ID==56342 then--元宵-300%
                        food_storage(player,newItem_ID,OldItemPos,NewItemPos,oldItemIndex,300)
                else
                        NLG.SystemMessage(player,"[系统]:该物品不能放到『料理食盒』内")
                end
        elseif oldItem_ID==arm_petitem then
                if newItem_ID==12405 then--番茄酱-100%
                        food_storage(player,newItem_ID,OldItemPos,NewItemPos,oldItemIndex,30)
                elseif newItem_ID==15201 then--面包-100%
                        food_storage(player,newItem_ID,OldItemPos,NewItemPos,oldItemIndex,100)
                elseif newItem_ID==15202 then--蛋包饭-100%
                        food_storage(player,newItem_ID,OldItemPos,NewItemPos,oldItemIndex,150)
                elseif newItem_ID==15203 then--法国面包-100%
                        food_storage(player,newItem_ID,OldItemPos,NewItemPos,oldItemIndex,200)
                elseif newItem_ID==15204 then--炒面-150%
                        food_storage(player,newItem_ID,OldItemPos,NewItemPos,oldItemIndex,375)
                elseif newItem_ID==15206 then--青椒肉丝-150%
                        food_storage(player,newItem_ID,OldItemPos,NewItemPos,oldItemIndex,450)
                elseif newItem_ID==15207 then--烧鸡-200%
                        food_storage(player,newItem_ID,OldItemPos,NewItemPos,oldItemIndex,700)
                elseif newItem_ID==15208 then--亲子丼-200%
                        food_storage(player,newItem_ID,OldItemPos,NewItemPos,oldItemIndex,800)
                elseif newItem_ID==15209 then--汉堡-300%
                        food_storage(player,newItem_ID,OldItemPos,NewItemPos,oldItemIndex,1350)
                elseif newItem_ID==15210 then--星鳗饭团-300%
                        food_storage(player,newItem_ID,OldItemPos,NewItemPos,oldItemIndex,1500)
                elseif newItem_ID==15205 then--炒面面包-300%
                        food_storage(player,newItem_ID,OldItemPos,NewItemPos,oldItemIndex,1650)
                elseif newItem_ID==15211 then--寿喜锅-300%
                        food_storage(player,newItem_ID,OldItemPos,NewItemPos,oldItemIndex,1800)       
                elseif newItem_ID==15212 then--咖喱饭-300%
                        food_storage(player,newItem_ID,OldItemPos,NewItemPos,oldItemIndex,1950)
                elseif newItem_ID==15213 then--韩式泡菜饭-300%
                        food_storage(player,newItem_ID,OldItemPos,NewItemPos,oldItemIndex,2100)
                elseif newItem_ID==15214 then--螃蟹锅-300%
                        food_storage(player,newItem_ID,OldItemPos,NewItemPos,oldItemIndex,2250)
                elseif newItem_ID==15215 then--牛排-300%
                        food_storage(player,newItem_ID,OldItemPos,NewItemPos,oldItemIndex,2400)
                elseif newItem_ID==15216 then--醋饭寿司-300%
                        food_storage(player,newItem_ID,OldItemPos,NewItemPos,oldItemIndex,2125)
                elseif newItem_ID==15217 then--豪华寿司组-300%
                        food_storage(player,newItem_ID,OldItemPos,NewItemPos,oldItemIndex,2700)
                elseif newItem_ID==15218 then--鱼翅汤-400%
                        food_storage(player,newItem_ID,OldItemPos,NewItemPos,oldItemIndex,4000)
                elseif newItem_ID==15219 then--鳖料理-400%
                        food_storage(player,newItem_ID,OldItemPos,NewItemPos,oldItemIndex,4800)
                elseif newItem_ID==50316 then--鲷鱼烧-600%
                        food_storage(player,newItem_ID,OldItemPos,NewItemPos,oldItemIndex,600)
                elseif newItem_ID==50060 then--炭烧烤串-600%
                        food_storage(player,newItem_ID,OldItemPos,NewItemPos,oldItemIndex,1200)
                elseif newItem_ID==50061 then--羊羹-600%
                        food_storage(player,newItem_ID,OldItemPos,NewItemPos,oldItemIndex,2400)
                elseif newItem_ID==670002 then--魔力之泉-600%
                        food_storage(player,newItem_ID,OldItemPos,NewItemPos,oldItemIndex,12000)
                elseif newItem_ID==91051 then--蜜糖松饼-600%(原始350)
                        food_storage(player,newItem_ID,OldItemPos,NewItemPos,oldItemIndex,2100)
                elseif newItem_ID==16234 then--年节料理-600%
                        food_storage(player,newItem_ID,OldItemPos,NewItemPos,oldItemIndex,12000)
                elseif newItem_ID==56341 then--元宵-600%
                        food_storage(player,newItem_ID,OldItemPos,NewItemPos,oldItemIndex,600)
                elseif newItem_ID==56342 then--元宵-600%
                        food_storage(player,newItem_ID,OldItemPos,NewItemPos,oldItemIndex,600)
                else
                        NLG.SystemMessage(player,"[系统]:该物品不能放到『宠物料理食盒』内")
                end
        end
        return 0
end

function food_storage(player,newItem_ID,OldItemPos,NewItemPos,oldItemIndex,mp)--mp为给料理食盒增加的MP设定值
        local Item_nj = Item.GetData(oldItemIndex,%道具_耐久%)
        local Item_maxnj = Item.GetData(oldItemIndex,%道具_最大耐久%)
        if Item_nj~=Item_maxnj then
                local delitem = NLG.DelItem(player,newItem_ID)
                local newnj = Item_nj+mp
                if newnj<=Item_maxnj then
--Item.SetData(oldItemIndex,%道具_耐久%,newnj)
                        Item.SetData(oldItemIndex,%道具_耐久%,newnj)
                else
                        Item.SetData(oldItemIndex,%道具_耐久%,Item_maxnj)
                end
                NLG.SystemMessage(player,"[系统]:您把食物放入『料理食盒』")
                Item.UpItem(player,OldItemPos)
                Char.MoveEquipItem(player,OldItemPos,NewItemPos,-1)
        else
        NLG.SystemMessage(player,"[系统]:『料理食盒』内已经装满了食物")
        end
end