[CERERE] Modificare QUEST PVM

Închis
Avatar utilizator
misura123
Nivel 3

Nivel 3
Mesaje: 301
Membru din: 13 Mar 2014, 18:46
Server: Karios2
Regat: Shinsoo
Aprecieri: 185  
Mulţumiri: 9  
Discord: Copiază ID
Medalii

Salut. Am primit acest quest pvm, e totul in regula, functioneaza. Insa are o mica problema, sa ii spun asa.. anume: sa zicem ca trebuie sa omor x10 Tigris, ei bine daca omor doar o parte din ei, dupa care dau teleport in alta harta sau asa ceva, mi se pierde progresul si trebuie sa iau de la inceput misiunea.
Ce am nevoie: sa nu se mai piarda progresul in legatura cu monstrii/pietrele distruse in cazul in care jucatorul pleaca din harta, sau schimba CH-ul, ori iese pur si simplu de pe joc. Ideea e sa ramana progresul.

QUEST:

Cod: Selectaţi tot

quest pvm_lv10 begin --aici e numele la quest stii tu
    state start begin
        when login with pc.level >= 10 begin --nivelul la care arata questul
            set_state(information)
        end
    end

    state information begin
        when letter begin
            send_letter("Satul este in pericol!") --numele scrisorii
        end

        when info or button begin
            say_title("Satul este in pericol!") --titlu scrisoare text
         say("")
            say_verde("O adunatura de tigrii dau tarcoale in satul nostru..") --text
         say_verde("Satenii sunt infricosati si le este frica sa [ENTER]iasa din case.") --text
            say_verde("Trebuie sa te duci si sa rezolvi aceasta problema!") --text
            say("") --text
            say_rosu("Omoara x10 Tigris") --text reward
         say_rosu("(Acestia pot fi gasiti in map1)")
            say("")
            pc.setqf("state", 10) --cantitatea ceruta de mobi sa ii ucizi
            q.set_counter("Tigris", 10) --cantitatea ceruta de mobi sa ii ucizi
        end

        when 194.kill begin --codul mobului ce trebuie ucis
            local count = pc.getqf("state") - 1
            if count <= 10 then --incepe contorizarea de la 10 in acest caz
                pc.setqf("state", count)
                q.set_counter("Tigris", count)
            end
            if count == 0 then
                say_title("Satul este in pericol - Succes!") --text titlu scrisoare cand ai terminat misiunea apare
                say("") --fara text pentru a fi un rand liber
                say_verde2("Ai terminat misiunea cu succes!") --text
                say_verde2("Drept multumire vei primi") --text
                say_verde2("o recompensa frumusica.") --text
                say("") --fara text pentru a fi un rand liber
                say_reward("Recompensa:") --text reward
                say_reward("Ai primit Licoare albastrã (G)") --text reward
                say_reward("Ai primit Licoare rosie(G)") --text reward
                say_reward("Ai primit Brãtarã de aur alb+5") --text reward
                say_reward("Ai primit Cercei lacrima cerului+5") --text reward
                say_reward("Ai primit Pergament Binecuvantat") --text reward
                say_reward("Ai primit 500000 Yang") --text reward
                say_reward("Ai primit 160000 Experienta") --text reward
                -- pc.change_money(500000) --aici ofera premiu in yang de 5kk
                -- pc.give_exp2(160000) --aici ofera premiu experienta in pucnte
                -- pc.give_item2(27006, 100) --aici ofera premiu in item 100 cantitati
                -- pc.give_item2(27003, 100) --aici ofera premiu in item 100 cantitati
                -- pc.give_item2(14145, 1) --aici ofera premiu in item 1 cantitate
                -- pc.give_item2(17205, 1)  --aici ofera premiu in item 1 cantitate
                -- pc.give_item2(45040, 1) --aici ofera premiu in item 1 cantitate
                clear_letter()
                set_state(__COMPLETE__)

            end
        end
    end

    state __COMPLETE__ begin
    end
end
[ Postat de pe Android ] Imagine
Talk is cheap.
Show me the code.
Afișează semnătura
Avatar utilizator
misura123
Nivel 3

Nivel 3
Mesaje: 301
Membru din: 13 Mar 2014, 18:46
Server: Karios2
Regat: Shinsoo
Aprecieri: 185  
Mulţumiri: 9  
Discord: Copiază ID
Medalii

Nu stie nimeni? Nu gasesc nicaieri un quest bun.
Talk is cheap.
Show me the code.
Afișează semnătura
Avatar utilizator
[RaKu]
Membru Club

Membru Club
Mesaje: 2137
Membru din: 30 Noi 2016, 21:49
Regat: Jinno
Aprecieri: 202  
Mulţumiri: 424  
Discord: Copiază ID
Medalii

Ia vezi acum:

Cod: Selectaţi tot

quest pvm_lv10 begin
        state start begin
                when login or levelup with pc.level >= 10 and pc.level <= 109 begin
                        set_state(information)
                end
        end
        state information begin
      when letter begin
         send_letter("Satul este in pericol!")
      end

      when info or button begin
         say_title("Satul este in pericol!")
         say_verde("O adunatura de tigrii dau tarcoale in satul nostru..") --text
         say_verde("Satenii sunt infricosati si le este frica sa iasa din case.") --text
         say_verde("Trebuie sa te duci si sa rezolvi aceasta problema!") --text
         say("") --text
         say_rosu("Omoara x10 Tigris") --text reward
         say("")
		 say_rosu("(Acestia pot fi gasiti in map1)")
         say("")
           pc.setqf("state", 10)
           q.set_counter("Tigris", 10)
      end

      when 194.kill begin
         local count = pc.getqf("state") - 1
         if count <= 10 then
            pc.setqf("state", count)
               q.set_counter("Tigris", count)
         end
         if count == 0 then
             say_title("Satul este in pericol - Succes!") --text titlu scrisoare cand ai terminat misiunea apare
                say("") --fara text pentru a fi un rand liber
                say_verde2("Ai terminat misiunea cu succes!") --text
                say_verde2("Drept multumire vei primi") --text
                say_verde2("o recompensa frumusica.") --text
                say("") --fara text pentru a fi un rand liber
                say_reward("Recompensa:") --text reward
                say_reward("Ai primit Licoare albastrã (G)") --text reward
                say_reward("Ai primit Licoare rosie(G)") --text reward
                say_reward("Ai primit Brãtarã de aur alb+5") --text reward
                say_reward("Ai primit Cercei lacrima cerului+5") --text reward
                say_reward("Ai primit Pergament Binecuvantat") --text reward
                say_reward("Ai primit 500000 Yang") --text reward
                say_reward("Ai primit 160000 Experienta") --text reward
                pc.change_money(500000) --aici ofera premiu in yang de 5kk
                pc.give_exp2(160000) --aici ofera premiu experienta in pucnte
                pc.give_item2(27006, 100) --aici ofera premiu in item 100 cantitati
                pc.give_item2(27003, 100) --aici ofera premiu in item 100 cantitati
                pc.give_item2(14145, 1) --aici ofera premiu in item 1 cantitate
                pc.give_item2(17205, 1)  --aici ofera premiu in item 1 cantitate
                pc.give_item2(45040, 1) --aici ofera premiu in item 1 cantitate
            clear_letter()
            set_state(__COMPLETE__)

         end
      end
   end

   state __COMPLETE__ begin
   end
end
Avatar utilizator
misura123
Nivel 3

Nivel 3
Mesaje: 301
Membru din: 13 Mar 2014, 18:46
Server: Karios2
Regat: Shinsoo
Aprecieri: 185  
Mulţumiri: 9  
Discord: Copiază ID
Medalii

[RaKu] scrie:Ia vezi acum:

Cod: Selectaţi tot

quest pvm_lv10 begin
        state start begin
                when login or levelup with pc.level >= 10 and pc.level <= 109 begin
                        set_state(information)
                end
        end
        state information begin
      when letter begin
         send_letter("Satul este in pericol!")
      end

      when info or button begin
         say_title("Satul este in pericol!")
         say_verde("O adunatura de tigrii dau tarcoale in satul nostru..") --text
         say_verde("Satenii sunt infricosati si le este frica sa iasa din case.") --text
         say_verde("Trebuie sa te duci si sa rezolvi aceasta problema!") --text
         say("") --text
         say_rosu("Omoara x10 Tigris") --text reward
         say("")
		 say_rosu("(Acestia pot fi gasiti in map1)")
         say("")
           pc.setqf("state", 10)
           q.set_counter("Tigris", 10)
      end

      when 194.kill begin
         local count = pc.getqf("state") - 1
         if count <= 10 then
            pc.setqf("state", count)
               q.set_counter("Tigris", count)
         end
         if count == 0 then
             say_title("Satul este in pericol - Succes!") --text titlu scrisoare cand ai terminat misiunea apare
                say("") --fara text pentru a fi un rand liber
                say_verde2("Ai terminat misiunea cu succes!") --text
                say_verde2("Drept multumire vei primi") --text
                say_verde2("o recompensa frumusica.") --text
                say("") --fara text pentru a fi un rand liber
                say_reward("Recompensa:") --text reward
                say_reward("Ai primit Licoare albastrã (G)") --text reward
                say_reward("Ai primit Licoare rosie(G)") --text reward
                say_reward("Ai primit Brãtarã de aur alb+5") --text reward
                say_reward("Ai primit Cercei lacrima cerului+5") --text reward
                say_reward("Ai primit Pergament Binecuvantat") --text reward
                say_reward("Ai primit 500000 Yang") --text reward
                say_reward("Ai primit 160000 Experienta") --text reward
                pc.change_money(500000) --aici ofera premiu in yang de 5kk
                pc.give_exp2(160000) --aici ofera premiu experienta in pucnte
                pc.give_item2(27006, 100) --aici ofera premiu in item 100 cantitati
                pc.give_item2(27003, 100) --aici ofera premiu in item 100 cantitati
                pc.give_item2(14145, 1) --aici ofera premiu in item 1 cantitate
                pc.give_item2(17205, 1)  --aici ofera premiu in item 1 cantitate
                pc.give_item2(45040, 1) --aici ofera premiu in item 1 cantitate
            clear_letter()
            set_state(__COMPLETE__)

         end
      end
   end

   state __COMPLETE__ begin
   end
end
Salut. Aceeasi problema.. Daca nu ii omor pe toti si de exemplu ma teleportez, se reseteaza si trebuie sa o iau de la inceput.. Nicaieri nu gasesc un quest, sa fiu eu..
Anyway, multumesc de ajutor. (inca nu doresc sa se inchide topicul -> problema nu e rezolvata! multumesc)
Talk is cheap.
Show me the code.
Afișează semnătura
Avatar utilizator
[RaKu]
Membru Club

Membru Club
Mesaje: 2137
Membru din: 30 Noi 2016, 21:49
Regat: Jinno
Aprecieri: 202  
Mulţumiri: 424  
Discord: Copiază ID
Medalii

Modifica quest-ul asta sigur o sa mearga :

Cod: Selectaţi tot

quest Craios75 begin
        state start begin
                when login or levelup with pc.level >= 75 begin
                        set_state(information)
                end
        end
        state information begin
                when letter begin
                        local v = find_npc_by_vnum(55886)
                        if v != 0 then
                                target.vid("__TARGET__", v, "Craios")
                        end
                        send_letter("Curele te vor face mai puternic!")
                end
                when button or info begin
                    say_title("Craios ")
                    say("Craios are nevoie de ajutorul tau du-te si vezi ce")
                    say("vrea sa faci pentru el. Bineinteles vei primi si ")
                    say("o recompensa binemeritata. ")
                end
                when __TARGET__.target.click or
                        55886.chat."Prima curea" begin
                        target.delete("__TARGET__")
                        say_title("Craios :")
                        say("Oh, ai venit sa ma ajuti? ")
                        say("Ei bine eu sunt Craios, si ma ocup")
                        say("cu studiul numeroaselor curele.")
                        say("Daca ma ajuti cu cercetarea eu te voi rasplati din")
                        say("plin cu difete curele. ")
                        wait()
                        say_title("Craios :")
                        say("De aceasta data eu ma ocup de cercetarea minelor de aur,")
                        say("dar in acest moment ma ocup de un alt studiu si nu")
                        say("pot pleca in excursie de cercetare. Trebuie sa ")
                        say("mergi in diferite locatii.")
                        wait()
                        say_title("Craios :")
                        say("Odata ce ai ajuns va trebui")
                        say("sa colectezi 25 de blazoane in perfecta ")
                        say("stare pentru cercetarile mele.")
                        say_reward("Aceste blazoane sunt dropabile")
                  say_reward("la bossi cei mai puternici ai jocului!")
                        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("Cercetarile Lui Craios partea I.")
                end
                        when 2191.kill or 2192.kill or 2206.kill or 2493.kill or 2598.kill or 1093.kill begin
                        local s = number(1, 15)
                        if s == 1 and pc.count_item(40497)<31 then
                                pc.give_item2(40497, 1)
                                send_letter("Ai primit: Blazon.")
                        end
               end
               
            when button or info begin
                    say_title("Informatie:")
                    say("Craios te-a trimis in cautarea blazoanelor.")
                    say("Pentru colectarea a 25 de blazoane de la")
               say("cei mai puternici monstrii din joc")
                    say("Colecteaza-le pe toate si du-le pe rand pentru")
                    say("a finaliza cercetarile actuale.")
                    say_item_vnum(40497)
               say_reward("acum ai "..pc.count_item("40497").." Blazoane in inventar")
                    say("Pana acum ai dus "..pc.getqf("collect_count").." blazoane in perfecta stare.")
                end
            
         when 55886.chat."Am un Blazon." with pc.count_item(40497) >0   begin
                        if get_time() > pc.getqf("duration") then
                            if  pc.count_item(40497) >0 then
                                say("Da-mi un moment te rog. Multumesc pentru")
                                say("timpul acordat. Acum voi verifica sa vad")
                                say("daca Blazonul aceasta este folositor.")
                                pc.remove_item("40497",1)
                                if  is_test_server()  then
                                pc.setqf("duration",get_time()+180)
                                else
                                pc.setqf("duration",get_time()+180)
    end
                                wait()
                                local pass_percent
                                if pc.getqf("drink_drug")==0 then
                                        pass_percent=60
                                else
                                        pass_percent=100
                                end
                                local s= number(1,80)
                                if s<= pass_percent  then
                                   if pc.getqf("collect_count")< 24 then
                                                local index =pc.getqf("collect_count")+1
                                                pc.setqf("collect_count",index)
                                             
                                        say_title("Craios :")
                                        say("Foarte bine, acest Blazon este de calitate inalta.")
                                        say("Mai ai in prezent".." "..25-pc.getqf("collect_count").. " blazoane de colectat.")
                                             
                                               pc.setqf("drink_drug",0)
                                                return
                                        end
                                        say_title("Craios :")
                                        say("Se pare ca ai adunat Toate Blazoanele.")
                                        say("Totusi mai am o mica sarcina. Am nevoie de")
                                        say("inca o bijuterie.")      
                                        pc.setqf("collect_count",0)
                                        pc.setqf("drink_drug",0)
                                        pc.setqf("duration",0)
                                        set_state(key_item)
                                        return
                                else
                                say_title("Craios :")
                                say("Aceasta Blazon este de calitate proasta.")
                                say("Adu-mi altul te rog frumos.")
                                pc.setqf("drink_drug",0)
                                return
                                end
                else
                    say_title("Craios :")
                    say("Nu ai nici un "..item_name(40497).." !")
                    return
                end
            else
                    say_title("Craios :")
                    say("Studiile nu sunt terminate inca. ")
                    say("Te rog sa imi aduci blazonul mai tarziu.")
                  return
                end
        end
end
        state key_item begin
                when letter begin
                        send_letter("Blazonul Suprem")
                        if pc.count_item(40498)>0 then
                                local v = find_npc_by_vnum(55886)
                                if v != 0 then
                                        target.vid("__TARGET__", v, "")
                                end
                        end
                end
                when button or info begin
                        if pc.count_item(40498) >0 then
                                say_title("Blazonul Suprem")
                                ---                                                   l
                                say("Ai gasit Blazonul intoarce-te la Craios .")
                                say("Pentru a primi recompensa.")
                                return
                        end
                        say_title("Blazonul Suprem")
                        say("Felicitari! Ai colectat toate cele 25 de blazoane")
                        say("Acum ai nevoie sa capturati blzaonul suprem ")
                        say_item_vnum(40498)
                        say_reward("Acest Blazon Suprem de fapt contine un suflet.")
                  local v = find_npc_by_vnum(3791)
                        if v != 0 then
                        target.vid("__TARGET__", v, "")
                        end
                end
                when 3791.kill begin
                        local s = number(1, 20)
                        if s == 1 and pc.count_item(40498)==0 then
                                pc.give_item2(40498, 1)
                                send_letter("Ai primit: Blazonul Suprem.")
                        end
                end
                when __TARGET__.target.click  or
                        55886.chat."Blazonul Suprem." with pc.count_item(40498) > 0  begin
                        target.delete("__TARGET__")
                        if pc.count_item(40498) > 0 then
                        say_title("Craios")
                        say("Felicitarile mele ucenicule, se pare ca ai la")
                        say("tine Blazonul Suprem.")
                        say("Cautare noastra este pe sfarsit acum mergi la")
                        say("Fierar, si dui aceasta reteta.")
                        pc.remove_item(40498,1)
                        set_state(__reward)
            else
                say_title("Craios ")
                say("Nu ai gasit "..item_name(40498).." !")
                say("")
                return
                end
        end

        end
        state __reward begin
                when letter begin
                        send_letter("Gasestel pe Fierar.")
                        local v = find_npc_by_vnum(20016)
                        if v != 0 then
                                target.vid("__TARGET__", v, "Fierar")
                        end
                end
                when button or info begin
                        say_title("Gasestel pe Fierar:")
                        say("L-ai ajutat pe Craios sa studieze blazoanele!")
                        say("Acum v-a trebuii sa mergi la Fierar.")
                end
                when __TARGET__.target.click  or
                        20016.chat."Reteta secreta pt curea."  begin
                        target.delete("__TARGET__")
                        say_title("Fierar:")
                        say("Bun venit la mine straine(a) Ce este cu aceasta ")
                        say("reteta ? Oh, Craios te-a trimis la mine?")
                        say("Aceasta reteta permite posesorului sau sa aibe")
                        say("o curea de calitate scazuta")
                  say("Dar aceasta te va ajuta sa iti ridici")
                  say("gradul curelei cat si puterea")
                        wait()
                        say_title("Fierar:")
                        say("Aceasta reteta trimisa de Craios trebuie sa o")
                        say("procur pentru tine. Este deja gata.")
                        say("")
                        say("Vei primii o Curea de in +0")
                  pc.give_item2(18000, 1)
                        wait()
            -----------                                                   l
                        clear_letter()
                        set_state(__complete)
                end
        end
        state __giveup__ begin
                when 55886.chat."Un alt progres." begin
                        say_title("Craios :")
                        say("Mai am ceva misiuni pentru tine. revino la un")
                        say("nivel mai mare.")
                        set_state(start)
             end
         end
        state __complete begin
        end
end
Avatar utilizator
misura123
Nivel 3

Nivel 3
Mesaje: 301
Membru din: 13 Mar 2014, 18:46
Server: Karios2
Regat: Shinsoo
Aprecieri: 185  
Mulţumiri: 9  
Discord: Copiază ID
Medalii

[RaKu] scrie:Modifica quest-ul asta sigur o sa mearga :

Cod: Selectaţi tot

quest Craios75 begin
        state start begin
                when login or levelup with pc.level >= 75 begin
                        set_state(information)
                end
        end
        state information begin
                when letter begin
                        local v = find_npc_by_vnum(55886)
                        if v != 0 then
                                target.vid("__TARGET__", v, "Craios")
                        end
                        send_letter("Curele te vor face mai puternic!")
                end
                when button or info begin
                    say_title("Craios ")
                    say("Craios are nevoie de ajutorul tau du-te si vezi ce")
                    say("vrea sa faci pentru el. Bineinteles vei primi si ")
                    say("o recompensa binemeritata. ")
                end
                when __TARGET__.target.click or
                        55886.chat."Prima curea" begin
                        target.delete("__TARGET__")
                        say_title("Craios :")
                        say("Oh, ai venit sa ma ajuti? ")
                        say("Ei bine eu sunt Craios, si ma ocup")
                        say("cu studiul numeroaselor curele.")
                        say("Daca ma ajuti cu cercetarea eu te voi rasplati din")
                        say("plin cu difete curele. ")
                        wait()
                        say_title("Craios :")
                        say("De aceasta data eu ma ocup de cercetarea minelor de aur,")
                        say("dar in acest moment ma ocup de un alt studiu si nu")
                        say("pot pleca in excursie de cercetare. Trebuie sa ")
                        say("mergi in diferite locatii.")
                        wait()
                        say_title("Craios :")
                        say("Odata ce ai ajuns va trebui")
                        say("sa colectezi 25 de blazoane in perfecta ")
                        say("stare pentru cercetarile mele.")
                        say_reward("Aceste blazoane sunt dropabile")
                  say_reward("la bossi cei mai puternici ai jocului!")
                        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("Cercetarile Lui Craios partea I.")
                end
                        when 2191.kill or 2192.kill or 2206.kill or 2493.kill or 2598.kill or 1093.kill begin
                        local s = number(1, 15)
                        if s == 1 and pc.count_item(40497)<31 then
                                pc.give_item2(40497, 1)
                                send_letter("Ai primit: Blazon.")
                        end
               end
               
            when button or info begin
                    say_title("Informatie:")
                    say("Craios te-a trimis in cautarea blazoanelor.")
                    say("Pentru colectarea a 25 de blazoane de la")
               say("cei mai puternici monstrii din joc")
                    say("Colecteaza-le pe toate si du-le pe rand pentru")
                    say("a finaliza cercetarile actuale.")
                    say_item_vnum(40497)
               say_reward("acum ai "..pc.count_item("40497").." Blazoane in inventar")
                    say("Pana acum ai dus "..pc.getqf("collect_count").." blazoane in perfecta stare.")
                end
            
         when 55886.chat."Am un Blazon." with pc.count_item(40497) >0   begin
                        if get_time() > pc.getqf("duration") then
                            if  pc.count_item(40497) >0 then
                                say("Da-mi un moment te rog. Multumesc pentru")
                                say("timpul acordat. Acum voi verifica sa vad")
                                say("daca Blazonul aceasta este folositor.")
                                pc.remove_item("40497",1)
                                if  is_test_server()  then
                                pc.setqf("duration",get_time()+180)
                                else
                                pc.setqf("duration",get_time()+180)
    end
                                wait()
                                local pass_percent
                                if pc.getqf("drink_drug")==0 then
                                        pass_percent=60
                                else
                                        pass_percent=100
                                end
                                local s= number(1,80)
                                if s<= pass_percent  then
                                   if pc.getqf("collect_count")< 24 then
                                                local index =pc.getqf("collect_count")+1
                                                pc.setqf("collect_count",index)
                                             
                                        say_title("Craios :")
                                        say("Foarte bine, acest Blazon este de calitate inalta.")
                                        say("Mai ai in prezent".." "..25-pc.getqf("collect_count").. " blazoane de colectat.")
                                             
                                               pc.setqf("drink_drug",0)
                                                return
                                        end
                                        say_title("Craios :")
                                        say("Se pare ca ai adunat Toate Blazoanele.")
                                        say("Totusi mai am o mica sarcina. Am nevoie de")
                                        say("inca o bijuterie.")      
                                        pc.setqf("collect_count",0)
                                        pc.setqf("drink_drug",0)
                                        pc.setqf("duration",0)
                                        set_state(key_item)
                                        return
                                else
                                say_title("Craios :")
                                say("Aceasta Blazon este de calitate proasta.")
                                say("Adu-mi altul te rog frumos.")
                                pc.setqf("drink_drug",0)
                                return
                                end
                else
                    say_title("Craios :")
                    say("Nu ai nici un "..item_name(40497).." !")
                    return
                end
            else
                    say_title("Craios :")
                    say("Studiile nu sunt terminate inca. ")
                    say("Te rog sa imi aduci blazonul mai tarziu.")
                  return
                end
        end
end
        state key_item begin
                when letter begin
                        send_letter("Blazonul Suprem")
                        if pc.count_item(40498)>0 then
                                local v = find_npc_by_vnum(55886)
                                if v != 0 then
                                        target.vid("__TARGET__", v, "")
                                end
                        end
                end
                when button or info begin
                        if pc.count_item(40498) >0 then
                                say_title("Blazonul Suprem")
                                ---                                                   l
                                say("Ai gasit Blazonul intoarce-te la Craios .")
                                say("Pentru a primi recompensa.")
                                return
                        end
                        say_title("Blazonul Suprem")
                        say("Felicitari! Ai colectat toate cele 25 de blazoane")
                        say("Acum ai nevoie sa capturati blzaonul suprem ")
                        say_item_vnum(40498)
                        say_reward("Acest Blazon Suprem de fapt contine un suflet.")
                  local v = find_npc_by_vnum(3791)
                        if v != 0 then
                        target.vid("__TARGET__", v, "")
                        end
                end
                when 3791.kill begin
                        local s = number(1, 20)
                        if s == 1 and pc.count_item(40498)==0 then
                                pc.give_item2(40498, 1)
                                send_letter("Ai primit: Blazonul Suprem.")
                        end
                end
                when __TARGET__.target.click  or
                        55886.chat."Blazonul Suprem." with pc.count_item(40498) > 0  begin
                        target.delete("__TARGET__")
                        if pc.count_item(40498) > 0 then
                        say_title("Craios")
                        say("Felicitarile mele ucenicule, se pare ca ai la")
                        say("tine Blazonul Suprem.")
                        say("Cautare noastra este pe sfarsit acum mergi la")
                        say("Fierar, si dui aceasta reteta.")
                        pc.remove_item(40498,1)
                        set_state(__reward)
            else
                say_title("Craios ")
                say("Nu ai gasit "..item_name(40498).." !")
                say("")
                return
                end
        end

        end
        state __reward begin
                when letter begin
                        send_letter("Gasestel pe Fierar.")
                        local v = find_npc_by_vnum(20016)
                        if v != 0 then
                                target.vid("__TARGET__", v, "Fierar")
                        end
                end
                when button or info begin
                        say_title("Gasestel pe Fierar:")
                        say("L-ai ajutat pe Craios sa studieze blazoanele!")
                        say("Acum v-a trebuii sa mergi la Fierar.")
                end
                when __TARGET__.target.click  or
                        20016.chat."Reteta secreta pt curea."  begin
                        target.delete("__TARGET__")
                        say_title("Fierar:")
                        say("Bun venit la mine straine(a) Ce este cu aceasta ")
                        say("reteta ? Oh, Craios te-a trimis la mine?")
                        say("Aceasta reteta permite posesorului sau sa aibe")
                        say("o curea de calitate scazuta")
                  say("Dar aceasta te va ajuta sa iti ridici")
                  say("gradul curelei cat si puterea")
                        wait()
                        say_title("Fierar:")
                        say("Aceasta reteta trimisa de Craios trebuie sa o")
                        say("procur pentru tine. Este deja gata.")
                        say("")
                        say("Vei primii o Curea de in +0")
                  pc.give_item2(18000, 1)
                        wait()
            -----------                                                   l
                        clear_letter()
                        set_state(__complete)
                end
        end
        state __giveup__ begin
                when 55886.chat."Un alt progres." begin
                        say_title("Craios :")
                        say("Mai am ceva misiuni pentru tine. revino la un")
                        say("nivel mai mare.")
                        set_state(start)
             end
         end
        state __complete begin
        end
end
Bun, il incerc in seara asta si revin cu reply :)) multumesc!
(In caz ca nu ma descurc sa il modific dupa bunul plac, ma poti ajuta?)
EDIT: Nu prea inteleg cum trebuie sa modific, nu sunt inca destul de familiarizat.

[ Postat de pe Android ] Imagine
Talk is cheap.
Show me the code.
Afișează semnătura
Avatar utilizator
Nicolescu Radu
Membru Club

Membru Club
Mesaje: 1728
Membru din: 11 Noi 2017, 09:50
Server: Eruris2
Regat: Jinno
Aprecieri: 0
Mulţumiri: 96  
 Contact:
Medalii

Subiect inactiv . Arhivat !
► Daca crezi ca te-am ajutat , sau iti place mesajul meu nu uita sa dai un LIKE !◄
Afișează semnătura
Închis
Răspunsuri
6
Vizualizări
414
Răspunsuri
14
Vizualizări
1214
Răspunsuri
6
Vizualizări
222

Înapoi la “Arhivă”

  • Informaţie
  • Cine este conectat

    Utilizatori ce ce navighează pe acest forum: Niciun utilizator înregistrat și 7 vizitatori