Cerere roua permanenta

Totalitatea subiectelor care nu respectă regulamentul vor fi stocate aici.
Deconectat
Avatar utilizator
Cornel.
Nivel 2
Nivel 2
Mesaje: 151
Membru din: 21 Dec 2014
Status: Sunt bine mersi ^.^
Mulțumiri acordate: 0
Mulțumiri primite: 0

Cerere roua permanenta

Mesajde Cornel. » 26 Ian 2015, 11:34

salut,cine imi da si mie va rog un quest pentru roua permanenta ? fara sa faca ceva playerul ? doar sa dea click acolo pe quest si apoi sa ii bage alea permanente..am mai bagat unul dar scrie asa in putty :
roua.quest:6:Abort (core dumped)
Multumesc,astept raspuns.

Deconectat
Avatar utilizator
NewHero
Deţinător Server
Deţinător Server
Mesaje: 1097
Membru din: 24 Iun 2014
Localitate: Strehaia
Status: www.Metin2Power.ro
Server Metin2: Metin2Power
Regat: Jinno
Mulțumiri acordate: 19
Mulțumiri primite: 3
Contact:

Re: roua permanenta

Mesajde NewHero » 26 Ian 2015, 11:39

Propunerea mea e sa nu bagi quest roua permanenta pe parcurs nu o sa mai aiba playerii bonusurile.
E treaba ta , uite questul este 100% functional.
Modifici si tu questul cum doresti.

Cod: Selectaţi tot

----------------------------------------------------
--COLLECT QUEST_lv30
--METIN2 Collect Quest 
----------------------------------------------------
quest roua_quest_lv30  begin
   state start begin
      when login or levelup with pc.level >= 30 and pc.level <= 150 begin
         set_state(information)
      end   
   end

   state information begin
      when letter begin
         local v = find_npc_by_vnum(2738)
         if v != 0 then
            target.vid("__TARGET__", v, "Roua Permanenta")
         end
         send_letter("Roua Permanenta")
      end

      when button or info begin
         say_title("Roua Permanenta:")
         say("Din cauza bugului la roua, si din cauza excessului")
         say("Am decis , sa  scoatem roua de pe")
         say("server. Fugi la Hitler!")
         say("Si el iti va da bonusurile de la Roua maxima permanent..")
         say("")
      end
     
      when __TARGET__.target.click or
         2738.chat."Misiunea pentru pt roua permanenta" begin
         target.delete("__TARGET__")
         say_title("Hitler:")
         say("Oh!! Te rog ajuta-ma.")
         say("Adun informatii despre")
         say("monstrii din tinutul nostru, dar nu")
         say("ma pot ocupa singur.")
         say("Iti poti imagina ca eu, un")
         say("simplu batran, am")
         say("probleme in acest sens. Te rog,")
         say("ajuta-ma. Bineinteles ca vei primi")
         say("bonusurile de la roua PERMANENTE.")
         wait()
         say_title ( "Hitler:" )
         say("In acest moment examinez" )
         say("orcii negri din Valea Seungryong.")
         say("Dintii lor sunt plini de calciu.")
         say("De aceea sunt asa de")
         say("interesanti pentru mine. Este posibil sa")
         say("fim legati de acesti orci")
         say("..Dintii pot fi o cheie")
         say("a evolutiei umane pentru noi toti!")
         say("")
         wait()
         say_title("Hitler:")
         say("Poti sa-mi faci rost de niste")
         say("dinti? Dar am nevoie de")
         say("dinti speciali prin urmare fii foarte")
         say("atent..Poti sa-l folosesti pe prietenul meu")
         say("din apropiere in cazul in care nu-ti place sa vanezi")
         say("orcii..Dar cred ca te va costa foarte mult!")
         say("")                                                                                                                   
         set_state(go_to_disciple)
         pc.setqf("duration",0)
         pc.setqf("collect_count",0)
         pc.setqf("drink_drug",0)
      end
   end

   state go_to_disciple begin
      when letter begin
         send_letter("Dintii din Valea Seungryong")
         
      end
      when button or info begin
         say_title("Dintii din Valea Seungryong:")
         say("Hitler are nevoie")
         say("de dintii de orc din Valea")
         say("Seungryong pentru cercetarile sale.")
         say("Adu-i mereu cate unul pe rand,")
         say("in asa fel incat sa aiba timp sa ii")
         say("examineze.")
         say("")
         say_item_vnum(30006)
         say_reward("Pana acum ai colectat".." "..pc.getqf("collect_count").." dinti de orc.")
         say("")
      end
     
      when 71035.use begin
         if get_time() < pc.getqf("duration") then
            say_title("Elixir:")
            say("Poti diminua timpul de asteptare daca vrei.")
            return
         end
         if pc.getqf("drink_drug")==1 then
            say_title("Elixir:")
            say("Poti diminua timpul de asteptare daca vrei.")

            return
         end
         if pc.count_item(30006)==0 then
            say_title("Hitler:")
            say("Daca nu-mi aduci dintii de orc")
            say("cum imi voi termina")
            say("cercetarea? Gaseste-mi cativa!")
            say("")
            return
         end
         item.remove()   
         pc.setqf("drink_drug",1)
      end



     
      when 2738.chat."Ai un dinte de orc?" with pc.count_item(30006) >0   begin
         if get_time() > pc.getqf("duration") then
            say_title("Hitler:")
            say("Humm...")
            say("Mi-ai adus un dinte de orc..")
            say("Sa ma uit o clipa.")
            say("")
            pc.remove_item("30006", 1)
            pc.setqf("duration",get_time()+0) -----------------------------------00??
            wait()
           
            local pass_percent
            if pc.getqf("drink_drug")==0 then
               pass_percent=80
            else     
               pass_percent=100
            end
           
            local s= number(1,100)
            if s<= pass_percent  then
               if pc.getqf("collect_count")< 9 then
                  local index =pc.getqf("collect_count")+1
                  pc.setqf("collect_count",index)
                  say_title("Hitler:")
                  say("Perfect aventurierule!")
                  say("Acest dinte de orc este potrivit pentru cercetarea mea.")
                                         say("")
                  say_reward("Trebuie sa-mi mai aduci".." "..10-pc.getqf("collect_count").. " dinti de orc!")
                  say("")
                  pc.setqf("drink_drug",0)
                  return
               end
               say_title("Hitler:")
               say("Excelent!!!")
               say("Mi-am terminat cercetarea...")
               say("Nu... Asteapta...")
               say("Pentru a-mi termina cercetarea am nevoie")   
               say("de Piatra sufletului Jununggyis.")
               say("Ea pica la orci.")
               say("")
               pc.setqf("collect_count",0)
               pc.setqf("drink_drug",0)   
               pc.setqf("duration",0)
               set_state(key_item)
               return
            else                       
            say_title("Hitler:")
            say("Acest dinte nu este potrivit pentru")
            say("cercetarea mea.")
            say("Poti sa-mi aduci altul?")
            pc.setqf("drink_drug",0)
            return
            end
      else
        say_title("Hitler:")
        say("Ah... Adu-ti aminte sa-mi aduci cate")
        say("un dinte pe rand!")
        say("In cazul in care aduci mai mult de un dinte, vei putea")
        say("sa-i aduni, dar iti voi lua")
        say("unul singur...Prin urmare fii atent!")
        return
      end

   end
end


   state key_item begin
      when letter begin
         send_letter("Piatra Sufletului")
         
         if pc.count_item(30220)>0 then   
            local v = find_npc_by_vnum(2738)
            if v != 0 then
               target.vid("__TARGET__", v, "Piatra Sufletului")
            end
         end

      end
      when button or info begin
         if pc.count_item(30220) >0 then
            say_title("Piatra Sufletului:")
            say("Acum ca ai adus toti dintii de orc")
            say("si ai gasit Piatra Sufletului")
            say("intoarce-te la Hitler sa ")
            say("iti dea recompensa!")
            return
         end
         say_title("Piatra Sufletului:")
         say("Acum ca ai gasit toti cei ")
         say("zece dinti..Gaseste Piatra Sufletului")
         say("pentru a termina cercetarea.")
         say_item_vnum(30220)
         say("O vei gasi vanand orcii negri sau mereu")
         say("de la prietenul meu din apropiere.")
         say("")
      end
     

   
      when 635.kill or
          636.kill or
          637.kill  begin
         local s = number(1, 30)
         if s == 1 and pc.count_item(30220)==0 then
            pc.give_item2(30220, 1)
            send_letter("Am Piatra Sufletului")     
         end   
      end
   
      when __TARGET__.target.click  or
         2738.chat."Am Piatra Sufletului" with pc.count_item(30220) > 0  begin
         target.delete("__TARGET__")
         say_title ( "Hitler:" )
         say ( "Acum ca ai gasit Piatra Sufletului" )
         say ( "pot intr-un final sa-mi termin" )
         say ( "cercetarea.Du-te sa iti ridici recompensa." )
         say ( "" )
         say_reward("Du-te la Beak-go.")
         pc.remove_item(30220,1)
         set_state(__reward)
      end
     
   end
   
   state __reward begin
      when letter begin
         send_letter("Gaseste-l pe Beak-go")
         
         local v = find_npc_by_vnum(20018)
         if v != 0 then
            target.vid("__TARGET__", v, "Beak-go")
         end

      end
      when button or info begin
         say_title("Gaseste-l pe Beak-go:")
         say("Ai gasit Piatra Sacra a Sufletului ..Minunat!")
         say("Acum nu-ti mai lipseste decat sa te duci sa-ti iei")
         say("recompensa..")
         say("")
         say_reward("Mergi la Beak-go si ia-ti recompensa.")
         say("")
      end
     
      when __TARGET__.target.click  or
         20018.chat."Recompensa Roua Permanenta"  begin
         target.delete("__TARGET__")
         say_title("Beak-go:")
         say("Mi-a spus Seon-Hae ca ai reusit")
         say("sa-i termini cercetarea")
         say("aducandu-i ce avea nevoie.")
         say("Te asteapta, prin urmare, o recompensa mare.")
         say("")
         say_title("Ca recompensa vei primi:")
         say_reward("Bonus Viteza de miscare +10% (Permanent).")
         say_reward("Bonus Viteza de atac +10% (Permanent).")
         say_reward("Valoarea atacului +120% (Permanent).")
         say_reward("Rezistenta la magie +20% (Permanent).")
         say_reward("Aparare +200% (Permanent).")
         say_reward("Sansa de lov. Critica +20% (Permanent).")
         say_reward("Sansa de lov. Patrunzatoare +20% (Permanent).")
         affect.add_collect(apply.MOV_SPEED, 10, 60*60*24*365*60) --60¦~   
         affect.add_collect(apply.ATT_SPEED, 10, 60*60*24*365*60) --60¦~   
         affect.add_collect(apply.CRITICAL_PCT, 20, 60*60*24*365*60) --60¦~
         affect.add_collect(apply.PENETRATE_PCT, 20, 60*60*24*365*60) --60¦~   
         affect.add_collect(apply.ATT_GRADE_BONUS, 120, 60*60*24*365*60) --60¦~
         affect.add_collect(apply.DEF_GRADE_BONUS, 200, 60*60*24*365*60) --60¦~
         affect.add_collect(apply.RESIST_MAGIC, 10, 60*60*24*365*60) --60¦~
         pc.give_item2(50109, 1)
         clear_letter()
         set_state(__complete)
      end
   end
   state __complete begin
   end
end
Cauti un server de Metin2 deschis recent ?
-Level 250
-Bonusuri fixe
-Switchbot implementat
-Iteme noi
-Sisteme noi

Hai si tu pe Trebuie să fii logat sau înregistrat pentru a vedea acest link.
Descrierea completa http://just4metin.ro/announces/metin2po ... 17024.html

Deconectat
Avatar utilizator
Cornel.
Nivel 2
Nivel 2
Mesaje: 151
Membru din: 21 Dec 2014
Status: Sunt bine mersi ^.^
Mulțumiri acordate: 0
Mulțumiri primite: 0

Re: roua permanenta

Mesajde Cornel. » 27 Ian 2015, 11:05

Eu as vrea sa dea direct pe quest si sa vina bonusurile ...nu asa..sa faca misiune..

Deconectat
Avatar utilizator
SauRRoN™
Fost Helper
Fost Helper
Mesaje: 2167
Membru din: 26 Iul 2014
Status: Metin2VenoM
Server Metin2: www.metin2venom.com
Regat: Jinno
Mulțumiri acordate: 1
Mulțumiri primite: 2
Contact:

Re: roua permanenta

Mesajde SauRRoN™ » 27 Ian 2015, 12:15

Salut Cornel,uite aici quest Trebuie să fii logat sau înregistrat pentru a vedea acest link.
-Sper ca te-am ajutat! ;)
Imagine

Deconectat
Avatar utilizator
[Chuli-Gaara]
Utilizator interzis !
Utilizator interzis !
Mesaje: 2356
Membru din: 27 Oct 2014
Localitate: Bucureşti
Status: Haide
Server Metin2: Al meu
Regat: Chunjo
Mulțumiri acordate: 0
Mulțumiri primite: 15
Contact:

Re: roua permanenta

Mesajde [Chuli-Gaara] » 27 Ian 2015, 12:17

Mutat in secţiunea corespunzătoare.

Deconectat
Avatar utilizator
AdrianC
Nivel 4
Nivel 4
Mesaje: 656
Membru din: 30 Noi 2014
Reputație: -Trial Moderator
-Pensionat
-Analist Programator
-AMF
Status: http://metin2hyger.com/
Server Metin2: Metin2Hyger !
Regat: Chunjo
Mulțumiri acordate: 0
Mulțumiri primite: 4

Re: roua permanenta

Mesajde AdrianC » 27 Ian 2015, 14:57

Postează aici questul de început și ți-l fac eu.

Deconectat
Avatar utilizator
Cornel.
Nivel 2
Nivel 2
Mesaje: 151
Membru din: 21 Dec 2014
Status: Sunt bine mersi ^.^
Mulțumiri acordate: 0
Mulțumiri primite: 0

Re: roua permanenta

Mesajde Cornel. » 27 Ian 2015, 20:13

SauRRoN™ la al tau da core dumped..
asta e questul :

Cod: Selectaţi tot

quest roua_quest_lv1  begin
   state start begin
      when login or levelup with pc.level >= 1 and pc.level <= 150 begin
         set_state(information)
      end   
   end
say_title("Ca recompensa vei primi:")
         say_reward("Bonus Viteza de miscare +10% (Permanent).")
         say_reward("Bonus Viteza de atac +10% (Permanent).")
         say_reward("Valoarea atacului +120% (Permanent).")
         say_reward("Rezistenta la magie +20% (Permanent).")
         say_reward("Aparare +200% (Permanent).")
         say_reward("Sansa de lov. Critica +20% (Permanent).")
         say_reward("Sansa de lov. Patrunzatoare +20% (Permanent).")
         affect.add_collect(apply.MOV_SPEED, 10, 60*60*24*365*60) --60年   
         affect.add_collect(apply.ATT_SPEED, 10, 60*60*24*365*60) --60年   
         affect.add_collect(apply.CRITICAL_PCT, 20, 60*60*24*365*60) --60年
         affect.add_collect(apply.PENETRATE_PCT, 20, 60*60*24*365*60) --60年   
         affect.add_collect(apply.ATT_GRADE_BONUS, 120, 60*60*24*365*60) --60年
         affect.add_collect(apply.DEF_GRADE_BONUS, 200, 60*60*24*365*60) --60年
         affect.add_collect(apply.RESIST_MAGIC, 20, 60*60*24*365*60) --60年
         pc.give_item2(50109, 1)
         clear_letter()
         set_state(__complete)
      end
   end
   state __complete begin
   end
end

Deconectat
Avatar utilizator
AdrianC
Nivel 4
Nivel 4
Mesaje: 656
Membru din: 30 Noi 2014
Reputație: -Trial Moderator
-Pensionat
-Analist Programator
-AMF
Status: http://metin2hyger.com/
Server Metin2: Metin2Hyger !
Regat: Chunjo
Mulțumiri acordate: 0
Mulțumiri primite: 4

Re: Cerere roua permanenta

Mesajde AdrianC » 28 Ian 2015, 20:54

Poftim un quest de început cu rouă direct:

Cod: Selectaţi tot

quest iteme_inceput begin
   state start begin
      when login with pc.get_level() >= 1 begin
      timer("starter", 1)
      end
         when starter.timer begin
         say_title("Bun venit  "..pc.get_name().." pe Metin2Under.")
         say("Vei câºtiga experienþa ºi vei cunoaºte")
         say("farmecul de pe acest joc. Lupta ºi câºtiga !")
         say("")
         wait()
         say_title("Iteme de început:")
         say("")
         pc . give_item2 ( "39036" , 1 )
         pc . give_item2 ( "71171" , 1 )
         pc . give_item2 ( "50053" , 1 )
         pc . give_item2 ( "70058" , 1 )
         horse . set_level ( "21" )
         horse.ride()
         pc.change_alignment(2000)
         pc . change_money ( 1000000000 )
         if pc . job == 0 then
         pc . give_item2 ( "19" , 1 )
         pc . give_item2 ( "12209" , 1 )
         pc . give_item2 ( "11209" , 1 )
         say_reward ( "Ai primit iteme de razboinic !" )
         elseif pc . job == 1 then
         pc . give_item2 ( "1009" , 1 )
         pc . give_item2 ( "12349" , 1 )
         pc . give_item2 ( "11409" , 200 )
         say_reward ( "Ai primit iteme de ninja!" )
         elseif pc . job == 2 then
         pc . give_item2 ( "19" , 1 )
         pc . give_item2 ( "12489" , 1 )
         pc . give_item2 ( "11609" , 1 )
         say_reward ( "Ai pirmit iteme de sura!" )
         elseif pc . job == 3 then
         pc . give_item2 ( "7009" , 1 )
         pc . give_item2 ( "12629" , 1 )
         pc . give_item2 ( "11809" , 1 )
         affect.add_collect(apply.MOV_SPEED, 10, 60*60*24*365*60) --60¦~   
         affect.add_collect(apply.ATT_SPEED, 10, 60*60*24*365*60) --60¦~   
         affect.add_collect(apply.CRITICAL_PCT, 20, 60*60*24*365*60) --60¦~
         affect.add_collect(apply.PENETRATE_PCT, 20, 60*60*24*365*60) --60¦~   
         affect.add_collect(apply.ATT_GRADE_BONUS, 120, 60*60*24*365*60) --60¦~
         affect.add_collect(apply.DEF_GRADE_BONUS, 200, 60*60*24*365*60) --60¦~
         affect.add_collect(apply.RESIST_MAGIC, 10, 60*60*24*365*60) --60¦~
         say_reward ( "Ai primit iteme de ºaman!" )
         end
         say("")
         say("Distreaza-te ºi îþi dorim succes.")
         say_gold("Echipa Metin2Under - PvP Classic !")
         set_state(__COMPLETE__)

      end
   end
   state __COMPLETE__ begin
   end
end

Deconectat
Avatar utilizator
Quin.
Nou Venit
Nou Venit
Mesaje: 10
Membru din: 26 Ian 2015
Status: Sunt bine mersi ^.^
Server Metin2: In curand.
Mulțumiri acordate: 0
Mulțumiri primite: 0

Re: Cerere roua permanenta

Mesajde Quin. » 31 Ian 2015, 17:44

Salut,si roua permanenta de ce nu mi-o da?
Imi da decat itemele de inceput...

Deconectat
Avatar utilizator
AdrianC
Nivel 4
Nivel 4
Mesaje: 656
Membru din: 30 Noi 2014
Reputație: -Trial Moderator
-Pensionat
-Analist Programator
-AMF
Status: http://metin2hyger.com/
Server Metin2: Metin2Hyger !
Regat: Chunjo
Mulțumiri acordate: 0
Mulțumiri primite: 4

Re: Cerere roua permanenta

Mesajde AdrianC » 01 Feb 2015, 11:06

Nu are cum să nu ți-o dea, questul este testat 100 % și funcționează.


Înapoi la “Topicuri şi mesaje şterse”

Cine este conectat

Utilizatori ce ce navighează pe acest forum: N1GhT și 5 vizitatori