Cod: Selectaţi tot

quest p_mount begin
state start begin
   when 20349.take begin
   if pc.is_mount() then
   say_title(""..mob_name(20349)..":")
   say("Ai putea sã cobori de pe mount în timp ce ")
   say("vorbim?")
   say("")
   return
   end
   item.set_socket( 2,1 )
   local vnum = item.get_vnum()
   local wert = item.get_socket(2)	
   if vnum >= 20201 and vnum <= 52090 then
      if pc.count_item(38100) >= 1
      or pc.count_item(38101) >= 1
      or pc.count_item(38102) >= 1
      then
      say_title(""..mob_name(20349)..":")
      say("Vad ca ai o autorizatie. Aceasta iti permite sa ")
      say("creezi sau sã prelungesti timpul mountului tau. ")
      local i = select ("Continua ","Imbunatateste ","Abandoneaza ")
      if i == 1 then
      local t = select("Cu 7 zile ","Cu 15 zile ","Cu 30 zile ","Abandoneazã ")
      if t == 1 then --7 Zile
         if pc.count_item(38100) >= 1 then
            say("Continuã, 7 zile")
	    item.set_socket(2,wert + 60*24* number(1,3))	
            pc.removeitem(38100,1)
         else
         p_mount.fail_message()
         end
      elseif t == 2 then --15 Tage
         if pc.count_item(38101) >= 1 then
            say("Continuã, 15 zile")
            pc.removeitem(38101,1)
         else
         p_mount.fail_message()
         end
      elseif t == 3 then --30 Zile
         if pc.count_item(38102) >= 1 then
            say("Continuã, 30 zile")
            pc.removeitem(38102,1)
         else
         p_mount.fail_message()
         end
      else
         return
      end
      elseif i == 2 then
         if p_mount.upgrade(vnum) == true then
            pc.give_item2(vnum +5,1)
            item.remove()
         else
            p_mount.fail_message()
         end
      end
   local blub = 1
   elseif blub == 2 then --item.get_socket(2) <= 1440 then
      say_title(""..mob_name(20349)..":")
      say("Sigiliul dvs. tine 1 zi mai mult!.")
      say("Text... Text.. Text..")
      local f = select("Da as dori sa...","Nu nu inca!")
      say(""..pc.get_gold().." "..pc.count_item(50068).."")
      say(""..f.."")
      if f == 1 then
         if pc.get_gold() <= 200000 then
            say_title(""..mob_name(20349)..":")
            say("")
            say("Pentru a prelungi durata de viaþã a mountului tãu ")
            say("ai nevoie de: 200.000 Yang. ")
            return
         elseif pc.count_item(50068) == 0 then --Rolul de Mutatie
            say_title(""..mob_name(20349)..":")
            say("")
            say("Pentru a prelungi durata de viaþã a mountului tãu ")
            say("ai nevoie de(1*): "..item_name(50068)..".")
            say_item_vnum(50068)
            return
         elseif pc.get_gold() >= 200000 and pc.count_item(50068) >= 1 then
            pc.remove_item(50068,1)
            pc.changegold(-200000)
               if number(1,2) == 1 then
               local wert = item.get_socket(2)
               item.set_socket(2,wert + 60*24* number(1,3))
               say("Durata de viaþã a mountului a fost extinsã! ")
               else
                  say("Extinderea duratei de viaþã a mountului a eºuat! ")
               end
         else
         p_mount.fail_message()
         end
      else --Nu,nu inca!
      return
      end
      elseif vnum >= 52011 and vnum <= 52015
      or vnum >= 52026 and vnum <= 52030
      or vnum >= 52041 and vnum <= 52045
      or vnum >= 52056 and vnum <= 52060
      or vnum >= 52071 and vnum <= 52075
      or vnum >= 52086 and vnum <= 52090   then --Mount Curajos
      say_title(""..mob_name(20349)..":")
      say("")
      say("Acest sigiliu nu mai poate fi îmbunãtãþit! ")
      return
      elseif pc.count_item(50067) >= 1 or pc.count_item(50068) >= 1 then
      say_title(""..mob_name(20349)..":")
      say("Doreºti evoluarea mountului? Ai venit unde ")
      say("trebuia. Te voi ajuta sa îl evoluezi. ")
      say("")
      say("Doreºti sa þi-l evoluezi acum? ")
      say("")
      local m = select("Da","Nu")
      if m == 1 then --Da
         if p_mount.upgrade(vnum) == true then
            pc.give_item2(vnum +5,1)
            --local wert = item.get_socket(2)
            --Upgrade 1-4 erhöhen laufzeit? ? item.set_socket(2,wert + 60*24* number(1,3))
            item.remove()
         else
            p_mount.fail_message()
         end
      else --Nu
         return
      end
   else
   p_mount.fail_message()
   end
   end
   end
   function upgrade(vnum)
      if (vnum >= 52001 and vnum <= 52005
      or vnum >= 52016 and vnum <= 52020
      or vnum >= 52031 and vnum <= 52035
      or vnum >= 52046 and vnum <= 52050
      or vnum >= 52061 and vnum <= 52065
      or vnum >= 52076 and vnum <= 52080) and pc.count_item(50067) >= 1 then --Mount Tanar,Pergamentul Transformari
         pc.remove_item(50067,1)
         return true
      elseif  (vnum >= 52006 and vnum <= 52010
      or vnum >= 52021 and vnum <= 52025
      or vnum >= 52036 and vnum <= 52040
      or vnum >= 52051 and vnum <= 52055
      or vnum >= 52066 and vnum <= 52070
      or vnum >= 52081 and vnum <= 52085) and pc.count_item(50068) >= 1 then --Mount Salbatic,Pergamentul Evolutiei
         pc.remove_item(50068,1)
         return true
      else
         return false
      end
    
   end
   when 20349.chat."Evolueaza mount " begin
      say_title(""..mob_name(20349)..":")
      say("Aºadar, doreºti evoluarea mountului... ")
      say("Îþi voi spune ce trebuie sã faci ºi cum, aºa ")
      say("cã ascultã-mã cu mare atenþie. ")
      say("")
      wait()
      say_title(""..mob_name(20349)..":")                   
      say("Acest sistem îþi permite sã-þi evoluezi mountul, ")
      say("asta însemnând cã, cu ajutorul meu vei putea ")
      say("lupta cu cele mai bune mounturi. ")
      say("Sã nu ne mai lungim mult la vorba, mounturile ")
      say("ce vor fi evoluate, vor beneficia de anumite ")
      say("bonusuri. ")
      local v = select("Transforma","Renunt")
      if v == 1 then
      say_title(""..mob_name(20349)..":")
      say("Foarte bine, îti voi lua autorizatia si în ")
      say("schimbul ei îti voi îmbunatatii mountul. ")
      say("")
      say_gold("Trage sigiliul dorit pe mine. ")
      end
   end
   when 20349.chat."Ia un mount " begin
      say_title(""..mob_name(20349)..":")
      say("Salutare tinere rãzboinic, ")
      say("Ai venit la mine pentru a lua un mount? ")
      say("Dacã ai asupra ta mai multe autorizaþii, îþi ")
      say("poþi alege ceea ce doreºti, îþi voi pune la ")
      say("dispoziþie o listã cu mounturile disponibile. ")
      say("")
      wait()
      say_title(""..mob_name(20349)..":")
      if pc.count_item(52701) >= 1 then
         say("Se pare cã ai asupra ta: "..item_name(52701).."")
         pc.setqf("mount",1)
      elseif pc.count_item(52702) >= 1 then
         say("Se pare cã ai asupra ta: "..item_name(52702).."")
         pc.setqf("mount",2)
      elseif pc.count_item(52703) >= 1 then
         say("Se pare cã ai asupra ta: "..item_name(52703).."")
         pc.setqf("mount",3)
      elseif pc.count_item(52704) >= 1 then
         say("Se pare cã ai asupra ta: "..item_name(52704).."")
         pc.setqf("mount",4)
      elseif pc.count_item(52705) >= 1 then
         say("Se pare cã ai asupra ta: "..item_name(52705).."")
         pc.setqf("mount",5)
      elseif pc.count_item(52706) >= 1 then
         say("Se pare cã ai asupra ta: "..item_name(52706).."")
         pc.setqf("mount",6)
      else
         say("Nu deþii nici un certificat asupra ta! ")
         return
      end
      --
      say("Acum alege un bonus:")
      local b = select("Puternic împotriva monstrilor ","EXP ","Puncte de viata ","Aparare ","Atac ","Altadata ")
      if b == 1 then --Putere impotriva monstrilor
         p_mount.give_seal(pc.getqf("mount"),1)
      elseif b == 2 then --Experienta (EXP)
         p_mount.give_seal(pc.getqf("mount"),2)
      elseif b == 3 then --Puncte de Viata (PV)
         p_mount.give_seal(pc.getqf("mount"),3)
      elseif b == 4 then --Aparare (DEF)
         p_mount.give_seal(pc.getqf("mount"),4)
      elseif b == 5 then --Puncte de Atac
         p_mount.give_seal(pc.getqf("mount"),5)
      end
   end
   function fail_message()
      say_title(""..mob_name(20349)..":")
      say("Îmi pare rãu, fãrã pergamentele necesare, ")
      say("nu pot face nimic pentru tine. ")
      say("Revino mai tarziu când vei avea pergamentele necesare. ")
      say("")
   end
   function give_seal(a,b)
   if a == 1 then --Certificat-Leu
      if b == 1 then --Incepe!
         pc.give_item2( 52031 )
         item.set_socket( 52031 , 100 )
 
         --pc.give_item2(52031,1) --Putere impotriva monstrilor
         pc.remove_item(52701,1) --Certificat-Leu
         return true
      elseif b == 2 then
         pc.give_item2(52032,1) --Experienta (EXP)
         pc.remove_item(52701,1) --Certificat-Leu
      elseif b == 3 then
         pc.give_item2(52033,1) --Puncte de Viata (PV)
         pc.remove_item(52701,1) --Certificat-Leu
      elseif b == 4 then
         pc.give_item2(52034,1) --Aparare (DEF)
         pc.remove_item(52701,1) --Certificat-Leu
      elseif b == 5 then
         pc.give_item2(52035,1) --Puncte de Atac
         pc.remove_item(52701,1) --Certificat-Leu
      else
         return
      end
   elseif a == 2 then --Certificat-Tigru
      if b == 1 then --Incepe!
         pc.give_item2(52046,1) --Putere impotriva monstrilor
         pc.remove_item(52702,1) --Certificat-Tigru
      elseif b == 2 then
         pc.give_item2(52047,1) --Experienta (EXP)
         pc.remove_item(52702,1) --Certificat-Tigru
      elseif b == 3 then
         pc.give_item2(52048,1) --Puncte de Viata (PV)
         pc.remove_item(52702,1) --Certificat-Tigru
      elseif b == 4 then
         pc.give_item2(52049,1) --Aparare (DEF)
         pc.remove_item(52702,1) --Certificat-Tigru
      elseif b == 5 then
         pc.give_item2(52050,1) --Puncte de Atac
         pc.remove_item(52702,1) --Certificat-Tigru
      else
         return
      end
   elseif a == 3 then --Certificat-Mistert
      if b == 1 then --Incepe
         pc.give_item2(52001,1) --Putere impotriva monstrilor
         pc.remove_item(52703,1) --Certificat-Mistert
      elseif b == 2 then
         pc.give_item2(52002,1) --Experienta (EXP)
         pc.remove_item(52703,1) --Certificat-Mistert
      elseif b == 3 then
         pc.give_item2(52003,1) --Puncte de Viata (PV)
         pc.remove_item(52703,1) --Certificat-Mistert
      elseif b == 4 then
         pc.give_item2(52004,1) --Aparare (DEF)
         pc.remove_item(52703,1) --Certificat-Mistert
      elseif b == 5 then
         pc.give_item2(52005,1) --Puncte de Atac
         pc.remove_item(52703,1) --Certificat-Mistert
      else
         return
      end
   elseif a == 4 then --Certificat-Lup
      if b == 1 then --Start
         pc.give_item2(52016,1) --Putere impotriva monstrilor
         pc.remove_item(52704,1) --Certificat-Lup
      elseif b == 2 then
         pc.give_item2(52017,1) --Experienta (EXP)
         pc.remove_item(52704,1) --Certificat-Lup
      elseif b == 3 then
         pc.give_item2(52018,1) --Puncte de Viata (PV)
         pc.remove_item(52704,1) --Certificat-Lup
      elseif b == 4 then
         pc.give_item2(52019,1) --Aparare (DEF)
         pc.remove_item(52704,1) --Certificat-Lup
      elseif b == 5 then
         pc.give_item2(52020,1) --Puncte de Atac
         pc.remove_item(52704,1) --Certificat-Lup
      else
         return
      end
   elseif a == 5 then --Certificat-Ren (M)
      if b == 1 then --Incepe
         pc.give_item2(52016,1) --Putere impotriva monstrilor
         pc.remove_item(52705,1) --Certificat-Ren (M)
      elseif b == 2 then
         pc.give_item2(52062,1) --Experienta (EXP)
         pc.remove_item(52705,1) --Certificat-Ren (M)
      elseif b == 3 then
         pc.give_item2(52063,1) --Puncte de Viata (PV)
         pc.remove_item(52705,1) --Certificat-Ren (M)
      elseif b == 4 then
         pc.give_item2(52064,1) --Aparare (DEF)
         pc.remove_item(52705,1) --Certificat-Ren (M)
      elseif b == 5 then
         pc.give_item2(52065,1) --Puncte de Atac
         pc.remove_item(52705,1) --Certificat-Ren (M)
      else
         return
      end
   elseif a == 6 then --Certificat-Ren (F)
      if b == 1 then --Start
         pc.give_item2(52076,1) --Putere impotriva monstrilor
         pc.remove_item(52706,1) --Certificat-Ren (F)
      elseif b == 2 then
         pc.give_item2(52077,1) --Experienta (EXP)
         pc.remove_item(52706,1) --Certificat-Ren (F)
      elseif b == 3 then
         pc.give_item2(52078,1) --Puncte de Viata (PV)
         pc.remove_item(52706,1) --Certificat-Ren (F)
      elseif b == 4 then
         pc.give_item2(52079,1) --Aparare (DEF)
         pc.remove_item(52706,1) --Certificat-Ren (F)
      elseif b == 5 then
         pc.give_item2(52080,1) --Puncte de Atac
         pc.remove_item(52706,1) --Certificat-Ren (F)
      else
         return
      end
   end
   end
   when 52001.use or 52002.use or 52003.use or 52004.use or 52005.use or 52006.use or 52007.use or 52008.use or 52009.use or 52010.use
    or 52011.use or 52012.use or 52013.use or 52014.use or 52015.use or 52016.use or 52017.use or 52018.use or 52019.use or 52020.use
    or 52021.use or 52022.use or 52023.use or 52024.use or 52025.use or 52026.use or 52027.use or 52028.use or 52029.use or 52030.use
    or 52031.use or 52032.use or 52033.use or 52034.use or 52035.use or 52036.use or 52037.use or 52038.use or 52039.use or 52040.use
    or 52041.use or 52042.use or 52043.use or 52044.use or 52045.use or 52046.use or 52047.use or 52048.use or 52049.use or 52050.use
    or 52051.use or 52052.use or 52053.use or 52054.use or 52055.use or 52056.use or 52057.use or 52058.use or 52059.use or 52060.use
    or 52061.use or 52062.use or 52063.use or 52064.use or 52065.use or 52066.use or 52067.use or 52068.use or 52069.use or 52070.use
    or 52071.use or 52072.use or 52073.use or 52074.use or 52075.use or 52076.use or 52077.use or 52078.use or 52079.use or 52080.use
    or 52081.use or 52082.use or 52083.use or 52084.use or 52085.use or 52086.use or 52087.use or 52088.use or 52089.use or 52090.use begin
      local vnum = item.get_vnum()
      local mounts_horse_lvl = horse.get_level()
      local player_level = pc.get_level()
      if pc.getf("pets","pet_active") == 1 or horse.is_summon() and horse.get_level() >= 22 then
      mounts_horse_lvl = pc.getf("pets","old_horse_level")
      end
   if pc.is_polymorphed() then
      say("Nu poþi cãlãri un animal atâta timp cât eºti transformat! ")
      return
   elseif pc.is_mount() then
      pc.unmount()
      return
   end
   if vnum >= 52001 and vnum <= 52005
    or vnum >= 52016 and vnum <= 52020
    or vnum >= 52031 and vnum <= 52035
    or vnum >= 52046 and vnum <= 52050
    or vnum >= 52061 and vnum <= 52065
    or vnum >= 52076 and vnum <= 52080
    or vnum >= 52091 and vnum <= 52095 then
    if player_level < 10 then
        syschat("Nivelul tãu este prea mic pentru a putea îmbunãtãþii acest mount! ")
        syschat("Nivel necesar: 10 ")
        return
    end
   elseif vnum >= 52006 and vnum <= 52010
      or vnum >= 52021 and vnum <= 52025
      or vnum >= 52036 and vnum <= 52040
      or vnum >= 52051 and vnum <= 52055
      or vnum >= 52066 and vnum <= 52070
      or vnum >= 52081 and vnum <= 52085 then --Mount Salbatic
      if player_level < 30 then
         syschat("Nivelul tãu este prea mic pentru a putea îmbunãtãþii acest mount! ")
         syschat("Nivel necesar: 30 ")
         return
    end 
      if mounts_horse_lvl < 11 then
         syschat("Nivelul calului este prea mic pentru a putea îmbunãtãþii acest mount! ")
         return
      end
   elseif vnum >= 52011 and vnum <= 52015
      or vnum >= 52026 and vnum <= 52030
      or vnum >= 52041 and vnum <= 52045
      or vnum >= 52056 and vnum <= 52060
      or vnum >= 52071 and vnum <= 52075
      or vnum >= 52086 and vnum <= 52090   then --Mount Mandru
      if player_level < 45 then
         syschat("Nivelul tãu este prea mic pentru a putea îmbunãtãþii acest mount! ")
         syschat("Nivel necesar: 45 ")
         return
      end 
      if mounts_horse_lvl < 21 then
         syschat("Nivelul calului este prea mic pentru a putea îmbunãtãþii acest mount! ")
         return
      end
   end
      local check = p_mount.give_mount_bonus(vnum)
      if check == true then
      local timee = 3600 --item.get_socket(2)*60
      else
      syschat("A apãrut o problemã, mountul nu a putut fi evoluat! ")
      end
   end
   function give_mount_bonus(a)
   pc.delqf("mount")
   local vnum = a
   local mounts_bonus = {
      [52001] = { 20201,apply.ATTBONUS_MONSTER,3},             --Mistert Tanar
      [52002] = { 20201,apply.ATTBONUS_MONSTER,3},             --Mistert Tanar
      [52003] = { 20201,apply.ATTBONUS_MONSTER,3},             --Mistert Tanar
      [52004] = { 20201,apply.ATTBONUS_MONSTER,3},             --Mistert Tanar
      [52005] = { 20201,apply.ATTBONUS_MONSTER,3},             --Mistert Tanar
      [52006] = { 20205,apply.ATTBONUS_MONSTER,3},    --Mistret Salbatic
      [52007] = { 20205,apply.EXP_DOUBLE_BONUS,3},   --Mistret Salbatic
      [52008] = { 20205,apply.MAX_HP,250},          --Mistret Salbatic
      [52009] = { 20205,apply.DEF_GRADE_BONUS,50},   --Mistret Salbatic
      [52010] = { 20205,apply.ATT_GRADE_BONUS,30},    --Mistret Salbatic
      [52011] = { 20209,apply.ATTBONUS_MONSTER,5},    --Mistret Mandru
      [52012] = { 20209,apply.EXP_DOUBLE_BONUS,5},    --Mistret Mandru
      [52013] = { 20209,apply.MAX_HP,500},          --Mistret Mandru
      [52014] = { 20209,apply.DEF_GRADE_BONUS,150},   --Mistret Mandru
      [52015] = { 20209,apply.ATT_GRADE_BONUS,100},    --Mistret Mandru

      [52016] = { 20202,apply.ATTBONUS_MONSTER,3},             --Lup Tanar
      [52017] = { 20202,apply.ATTBONUS_MONSTER,3},             --Lup Tanar
      [52018] = { 20202,apply.ATTBONUS_MONSTER,3},             --Lup Tanar
      [52019] = { 20202,apply.ATTBONUS_MONSTER,3},             --Lup Tanar
      [52020] = { 20202,apply.ATTBONUS_MONSTER,3},             --Lup Tanar
      [52021] = { 20206,apply.ATTBONUS_MONSTER,3},    --Lup Salbatic
      [52022] = { 20206,apply.EXP_DOUBLE_BONUS,3},   --Lup Salbatic
      [52023] = { 20206,apply.MAX_HP,250},          --Lup Salbatic
      [52024] = { 20206,apply.DEF_GRADE_BONUS,50},   --Lup Salbatic
      [52025] = { 20206,apply.ATT_GRADE_BONUS,30},    --Lup Salbatic
      [52026] = { 20210,apply.ATTBONUS_MONSTER,5},    --Lup Mandru
      [52027] = { 20210,apply.EXP_DOUBLE_BONUS,5},    --Lup Mandru
      [52028] = { 20210,apply.MAX_HP,500},          --Lup Mandru
      [52029] = { 20210,apply.DEF_GRADE_BONUS,150},   --Lup Mandru
      [52030] = { 20210,apply.ATT_GRADE_BONUS,100},    --Lup Mandru    
    
      [52031] = { 20204,apply.ATTBONUS_MONSTER,3},             --Leu Tanar
      [52032] = { 20204,apply.ATTBONUS_MONSTER,3},             --Leu Tanar
      [52033] = { 20204,apply.ATTBONUS_MONSTER,3},             --Leu Tanar
      [52034] = { 20204,apply.ATTBONUS_MONSTER,3},             --Leu Tanar
      [52035] = { 20204,apply.ATTBONUS_MONSTER,3},             --Leu Tanar
      [52036] = { 20208,apply.ATTBONUS_MONSTER,3},    --Leu Salbatic
      [52037] = { 20208,apply.EXP_DOUBLE_BONUS,3},   --Leu Salbatic
      [52038] = { 20208,apply.MAX_HP,250},          --Leu Salbatic
      [52039] = { 20208,apply.DEF_GRADE_BONUS,50},   --Leu Salbatic
      [52040] = { 20208,apply.ATT_GRADE_BONUS,30},    --Leu Salbatic
      [52041] = { 20212,apply.ATTBONUS_MONSTER,5},    --Leu Mandru
      [52042] = { 20212,apply.EXP_DOUBLE_BONUS,5},    --Leu Mandru
      [52043] = { 20212,apply.MAX_HP,500},          --Leu Mandru
      [52044] = { 20212,apply.DEF_GRADE_BONUS,150},   --Leu Mandru
      [52045] = { 20212,apply.ATT_GRADE_BONUS,100},    --Leu Mandru
    
      [52046] = { 20203,apply.ATTBONUS_MONSTER,3},             --Tigru Tanar
      [52047] = { 20203,apply.ATTBONUS_MONSTER,3},             --Tigru Tanar
      [52048] = { 20203,apply.ATTBONUS_MONSTER,3},             --Tigru Tanar
      [52049] = { 20203,apply.ATTBONUS_MONSTER,3},             --Tigru Tanar
      [52050] = { 20203,apply.ATTBONUS_MONSTER,3},             --Tigru Tanar
      [52051] = { 20207,apply.ATTBONUS_MONSTER,3},    --Tigru Salbatic
      [52052] = { 20207,apply.EXP_DOUBLE_BONUS,3},   --Tigru Salbatic
      [52053] = { 20207,apply.MAX_HP,250},          --Tigru Salbatic
      [52054] = { 20207,apply.DEF_GRADE_BONUS,50},   --Tigru Salbatic
      [52055] = { 20207,apply.ATT_GRADE_BONUS,30},    --Tigru Salbatic
      [52056] = { 20211,apply.ATTBONUS_MONSTER,5},    --Tigru Mandru
      [52057] = { 20211,apply.EXP_DOUBLE_BONUS,5},    --Tigru Mandru
      [52058] = { 20211,apply.MAX_HP,500},          --Tigru Mandru
      [52059] = { 20211,apply.DEF_GRADE_BONUS,150},   --Tigru Mandru
      [52060] = { 20211,apply.ATT_GRADE_BONUS,100},    --Tigru Mandru
    
      [52061] = { 20213,apply.ATTBONUS_MONSTER,3},             --Sigiliu Ren-Tanar (M)
      [52062] = { 20213,apply.ATTBONUS_MONSTER,3},             --Sigiliu Ren-Tanar (M)
      [52063] = { 20213,apply.ATTBONUS_MONSTER,3},             --Sigiliu Ren-Tanar (M)
      [52064] = { 20213,apply.ATTBONUS_MONSTER,3},             --Sigiliu Ren-Tanar (M)
      [52065] = { 20213,apply.ATTBONUS_MONSTER,3},             --Sigiliu Ren-Tanar (M)
      [52066] = { 20214,apply.ATTBONUS_MONSTER,3},    --Sigiliu Ren-Salbatic (M)
      [52067] = { 20214,apply.EXP_DOUBLE_BONUS,3},   --Sigiliu Ren-Salbatic (M)
      [52068] = { 20214,apply.MAX_HP,250},          --Sigiliu Ren-Salbatic (M)
      [52069] = { 20214,apply.DEF_GRADE_BONUS,50},   --Sigiliu Ren-Salbatic (M)
      [52070] = { 20214,apply.ATT_GRADE_BONUS,30},    --Sigiliu Ren-Salbatic (M)
      [52071] = { 20215,apply.ATTBONUS_MONSTER,5},    --Sigiliu Ren-Mandru (M)
      [52072] = { 20215,apply.EXP_DOUBLE_BONUS,5},    --Sigiliu Ren-Mandru (M)
      [52073] = { 20215,apply.MAX_HP,500},          --Sigiliu Ren-Mandru (M)
      [52074] = { 20215,apply.DEF_GRADE_BONUS,150},   --Sigiliu Ren-Mandru (M)
      [52075] = { 20215,apply.ATT_GRADE_BONUS,100},    --Sigiliu Ren-Mandru (M)
    
      [52076] = { 20216,apply.ATTBONUS_MONSTER,3},             --Sigiliu Ren-Tanar (F)
      [52077] = { 20216,apply.ATTBONUS_MONSTER,3},             --Sigiliu Ren-Tanar (F)
      [52078] = { 20216,apply.ATTBONUS_MONSTER,3},             --Sigiliu Ren-Tanar (F)
      [52079] = { 20216,apply.ATTBONUS_MONSTER,3},             --Sigiliu Ren-Tanar (F)
      [52080] = { 20216,apply.ATTBONUS_MONSTER,3},             --Sigiliu Ren-Tanar (F)
      [52081] = { 20217,apply.ATTBONUS_MONSTER,3},    --Sigiliu Ren-Salbatic (F)
      [52082] = { 20217,apply.EXP_DOUBLE_BONUS,3},   --Sigiliu Ren-Salbatic (F)
      [52083] = { 20217,apply.MAX_HP,250},          --Sigiliu Ren-Salbatic (F)
      [52084] = { 20217,apply.DEF_GRADE_BONUS,50},   --Sigiliu Ren-Salbatic (F)
      [52085] = { 20217,apply.ATT_GRADE_BONUS,30},    --Sigiliu Ren-Salbatic (F)
      [52086] = { 20218,apply.ATTBONUS_MONSTER,5},    --Sigiliu Ren-Mandru (F)
      [52087] = { 20218,apply.EXP_DOUBLE_BONUS,5},    --Sigiliu Ren-Mandru (F)
      [52088] = { 20218,apply.MAX_HP,500},          --Sigiliu Ren-Mandru (F)
      [52089] = { 20218,apply.DEF_GRADE_BONUS,150},   --Sigiliu Ren-Mandru (F)
      [52090] = { 20218,apply.ATT_GRADE_BONUS,100}    --Sigiliu Ren-Mandru (F)
      --20201   boar_0 --tanar
      --20202   dog_god_0 --tanar
      --20203   fire_tiger_0 --tanar
      --20204   lion_0 --tanar

      --20205   boar_2 --salbatic
      --20206   dog_god_2 --salbatic
      --20207   fire_tiger_2 --salbatic
      --20208   lion_2 --salbatic

      --20209   boar_3 --mandru
      --20210   dog_god_3 --mandru
      --20211   fire_tiger_3 --mandru
      --20212   lion_3 --Tapfer --mandru

      --20213   reindeer_male1  --tanar
      --20214   reindeer_male2 --salbatic
      --20215   reindeer_male3 --mandru

      --20216   reindeer_female1  --tanar
      --20217   reindeer_female2 --salbatic
      --20218   reindeer_female3 --mandru
      }
      local ride_npc = mounts_bonus[a][1]
      local ride_time = 60*60*5 --item.get_socket(2)*60
      local ride_skill = mounts_bonus[a][2]
      local ride_value = mounts_bonus[a][3]
      pc.mount(ride_npc,ride_time)
   if vnum >= 52001 and vnum <= 52005
      or vnum >= 52016 and vnum <= 52020
      or vnum >= 52031 and vnum <= 52035
      or vnum >= 52046 and vnum <= 52050
      or vnum >= 52061 and vnum <= 52065
      or vnum >= 52076 and vnum <= 52080   then --Mountii Tineri (30+ Viteza de Miscare)
      pc.mount_bonus(apply.MOV_SPEED, 30, ride_time )
      return true
   elseif vnum >= 52006 and vnum <= 52010
      or vnum >= 52021 and vnum <= 52025
      or vnum >= 52036 and vnum <= 52040
      or vnum >= 52051 and vnum <= 52055
      or vnum >= 52066 and vnum <= 52070
      or vnum >= 52081 and vnum <= 52085   then --Mountii Salbatici (40+ Viteza de Miscare)
      pc.mount_bonus(apply.MOV_SPEED, 40, ride_time )
      pc.mount_bonus(ride_skill, ride_value, ride_time)
      return true
   elseif vnum >= 52011 and vnum <= 52015
      or vnum >= 52026 and vnum <= 52030
      or vnum >= 52041 and vnum <= 52045
      or vnum >= 52056 and vnum <= 52060
      or vnum
      >= 52071 and vnum <= 52075
      or vnum >= 52086 and vnum <= 52090   then --Mountii Mandri (50+ Vieza de Miscare)
      pc.mount_bonus(apply.MOV_SPEED, 50, ride_time)
      pc.mount_bonus(ride_skill, ride_value, ride_time )
      return true
   else
      syschat("Power Mount: FEHLERCODE #00123#")
      return false
   end
   end
 
end
end