[QUEST] PvP Judy

Deconectat
Avatar utilizator
C.Mihai
Nivel 9
Nivel 9
Mesaje: 1851
Membru din: 26 Mai 2014
Localitate: Giurgiu
Reputație: Nume anterior: CHO
Status: Sal , cf ?
Server Metin2: xGamer
Regat: Chunjo
Mulțumiri acordate: 21
Mulțumiri primite: 2
Contact:

[QUEST] PvP Judy

Mesajde C.Mihai » 01 Iun 2015, 12:09

Saltutare j4m , am găsit pe un forum un quest care poate vă ajută !
REcomandat pentru serverele PVP ! la npc JUDY !
Dacă v-am ajutat dați un THX !

Cod: Selectaţi tot

quest npc4metin begin
   state start begin
      when 20094.chat."NPC " begin
         local s = select("Skiluri G/P", "Banca", "Loto(Loterie)", "Schimba rasa", "Schimba sexul", "Resetare Skill", "Pagina 2", "Anuleaza")
            if s == 1 then   
               say_title ( "Skilluri G/P:" )
               say ( "Bun venit pe  Metin" )
               say ( " Metin va ofera posibilitatea de a lua skillurile P sau G fara a mai apela la GM!" )
               say ( "Pentru a lua skillurile trebuie sa platesti o suma de bani" )
               say ( "" )
               say ( "" )
               say_reward ( "Skillurile G costa 15kk, necesita nivel 40" )
               say_reward ( "Skillurile P costa 30kk, necesita nivel 60")
               local opzioni = select ( "Skiluri G" , "Skiluri P", "Anuleaza" )
                  if opzioni == 1 then
                     if pc.get_gold()<15000000 then
                        say("Nu ai 15 kk")
                     elseif pc.get_level()<40 then
                        say("Nu ai nivel 40")
                     else
                        local skillg = select ("Warrior","Ninja","Sura","Shaman","Le-am luat deja..")
                           if skillg == 1 then
                              pc.set_skill_level (1,30)
                              pc.set_skill_level (2,30)
                              pc.set_skill_level (3,30)
                              pc.set_skill_level (4,30)
                              pc.set_skill_level (5,30)
                              pc.set_skill_level (16,30)
                              pc.set_skill_level (17,30)
                              pc.set_skill_level (18,30)
                              pc.set_skill_level (19,30)
                              pc.set_skill_level (20,30)
                              pc . changegold ( - 15000000 )
                           elseif skillg == 2 then
                              pc.set_skill_level (31,30)
                              pc.set_skill_level (32,30)
                              pc.set_skill_level (33,30)
                              pc.set_skill_level (34,30)
                              pc.set_skill_level (35,30)
                              pc.set_skill_level (46,30)
                              pc.set_skill_level (47,30)
                              pc.set_skill_level (48,30)
                              pc.set_skill_level (49,30)
                              pc.set_skill_level (50,30)
                              pc . changegold ( - 15000000 )
                           elseif skillg == 3 then
                              pc.set_skill_level (61,30)
                              pc.set_skill_level (62,30)
                              pc.set_skill_level (63,30)
                              pc.set_skill_level (64,30)
                              pc.set_skill_level (65,30)
                              pc.set_skill_level (66,30)
                              pc.set_skill_level (76,30)
                              pc.set_skill_level (77,30)
                              pc.set_skill_level (78,30)
                              pc.set_skill_level (79,30)
                              pc.set_skill_level (80,30)
                              pc.set_skill_level (81,30)
                              pc . changegold ( - 15000000 )
                           elseif skillg == 4 then
                              pc.set_skill_level (91,30)
                              pc.set_skill_level (92,30)
                              pc.set_skill_level (93,30)
                              pc.set_skill_level (94,30)
                              pc.set_skill_level (95,30)
                              pc.set_skill_level (96,30)
                              pc.set_skill_level (106,30)
                              pc.set_skill_level (107,30)
                              pc.set_skill_level (108,30)
                              pc.set_skill_level (109,30)
                              pc.set_skill_level (110,30)
                              pc.set_skill_level (111,30)
                              pc . changegold ( - 15000000 )
                           end
                        end
                  elseif opzioni == 2 then
                     if pc.get_gold()<30000000 then
                        say("Nu ai 30kk")
                     elseif pc.get_level()<60 then
                        say("Nu ai nivelul 60")
                     else
                        local skillp = select ("Warrior","Ninja","Sura","Shaman","Le-am luat deja..")
                           if skillp == 1 then
                              pc.set_skill_level(1 ,59)
                              pc.set_skill_level(2 ,59)
                              pc.set_skill_level(3 ,59)
                              pc.set_skill_level(4 ,59)
                              pc.set_skill_level(5 ,59)
                              pc.set_skill_level(16 ,59)
                              pc.set_skill_level(17 ,59)
                              pc.set_skill_level(18 ,59)
                              pc.set_skill_level(19 ,59)
                              pc.set_skill_level(20 ,59)
                              pc . changegold ( - 30000000 )
                           elseif skillp == 2 then
                              pc.set_skill_level(31 ,59)
                              pc.set_skill_level(32 ,59)
                              pc.set_skill_level(33 ,59)
                              pc.set_skill_level(34 ,59)
                              pc.set_skill_level(35 ,59)
                              pc.set_skill_level(46 ,59)
                              pc.set_skill_level(47 ,59)
                              pc.set_skill_level(48 ,59)
                              pc.set_skill_level(49 ,59)
                              pc.set_skill_level(50 ,59)
                              pc . changegold ( - 30000000 )
                           elseif skillp == 3 then
                              pc.set_skill_level(76 ,59)
                              pc.set_skill_level(77 ,59)
                              pc.set_skill_level(78 ,59)
                              pc.set_skill_level(79 ,59)
                              pc.set_skill_level(80 ,59)
                              pc.set_skill_level(81, 59)
                              pc.set_skill_level(61 ,59)
                              pc.set_skill_level(62 ,59)
                              pc.set_skill_level(63 ,59)
                              pc.set_skill_level(64 ,59)
                              pc.set_skill_level(65 ,59)
                              pc.set_skill_level(66 ,59)
                              pc . changegold ( - 30000000 )
                           elseif skillp == 4 then
                              pc.set_skill_level(106 ,59)
                              pc.set_skill_level(107 ,59)
                              pc.set_skill_level(108 ,59)
                              pc.set_skill_level(109 ,59)
                              pc.set_skill_level(110 ,59)
                              pc.set_skill_level(111 ,59)
                              pc.set_skill_level(91 ,59)
                              pc.set_skill_level(92 ,59)
                              pc.set_skill_level(93 ,59)
                              pc.set_skill_level(94 ,59)
                              pc.set_skill_level(95 ,59)
                              pc.set_skill_level(96 ,59)
                              pc . changegold ( - 30000000 )
                           end
                        end
                     end
            elseif s == 2 then
               say_title("Depozit de Yang")
               say("Ce pot face pentru tine?")
               local f = select("Depune Yang(100kk)", "Depune Yang(500kk)", "Depune Yang(1kkk)", "Retrage Yang(100kk)" , "Retrage Yang(500kk)" , "Retrage Yang(1kkk)" , "Inchide")
               if f == 1 then
                  say_title("Depozit de Yang")
               say ( "Buna. Vrei sa pui, vorba aia... sub saltea niste banuti? :)" )
               say ( "Eu pot sa iti depozitez aceasta suma, si iti voi da in schimb Pana Razboinicului!" )
                           say ( "Iar cand ai nevoie poti veni sa ii retragi, folosind ceea ce iti ofer!" )
                           say ( "" )
                           say ( "Doresti sa depui 100kk?" )
                           local s = select ( "Da" , "Nu" )
                           if s == 2 then
                           return
                           end 
                           if pc.get_gold()<100000000 then
                           say ( "Suma este prea mica pentru a o putea depozia! Tti trebuie minim 100kk" ) 
                           say ( "Te astept cand ai acesti bani :)" )
                           return
                           end
                           say ( "Ai depozitat banii cu succes!" )
                           say_item ( "Pana Razboinicului" , 70036 , "" )
                           pc . changegold ( - 100000000 )
                           pc . give_item2 ( 70036 )
               elseif f == 2 then           
                  say_title("Depozit de Yang")
               say ( "Buna. Vrei sa pui, vorba aia... sub saltea niste banuti? :)" )
               say ( "Eu pot sa iti depozitez aceasta suma, si iti voi da in schimb Medalia Razboinicului!" )
                           say ( "Iar cand ai nevoie poti veni sa ii retragi, folosind ceea ce iti ofer!" )
                           say ( "" )
                           say ( "Doresti sa depui 500kk?" )
                           local s = select ( "Da" , "Nu" )
                           if s == 2 then
                           return
                           end 
                           if pc.get_gold()<500000000 then
                           say ( "Suma este prea mica pentru a o putea depozia! Tti trebuie minim 500kk" ) 
                           say ( "Te astept cand ai acesti bani :)" )
                           return
                           end
                           say ( "Ai depozitat banii cu succes!" )
                           say_item ( "Medalia Razboinicului" , 70004 , "" )
                           pc . changegold ( - 500000000 )
                           pc . give_item2 ( 70004 )           
               elseif f == 3 then
                  say_title("Depozit de Yang")
               say ( "Buna. Vrei sa pui, vorba aia... sub saltea niste banuti? :)" )
               say ( "Eu pot sa iti depozitez aceasta suma, si iti voi da in schimb Cupa Razboinicului!" )
                           say ( "Iar cand ai nevoie poti veni sa ii retragi, folosind ceea ce iti ofer!" )
                           say ( "" )
                           say ( "Doresti sa depui 1kkk?" )
                           local s = select ( "Da" , "Nu" )
                           if s == 2 then
                           return
                           end 
                           if pc.get_gold()<1000000000 then
                           say ( "Suma este prea mica pentru a o putea depozia! Tti trebuie minim 1kkk" ) 
                           say ( "Te astept cand ai acesti bani :)" )
                           return
                           end
                           say ( "Ai depozitat banii cu succes!" )
                           say_item ( "Cupa Razboinicului" , 50042 , "" )
                           pc . changegold ( - 1000000000 )
                           pc . give_item2 ( 50042 )
                           elseif f == 4 then
                              say_title ( "Depozit de Yang" )
                              say ( "Buna. Ai nevoie de bani si doresti sa ii retragi din depozit? " )
                              say ( "Daca iti amintesti, la depunerea yang-ului, ai primit o Pana a Razboinicului. Cu ajutorul ei poti retrage suma dorita." )
                              say_item ( "Pana Razboinicului" , 70036 , "" )
                                say_title ( "Depozit de Yang" )
                              say ( "Esti sigur ca doresti sa retragi banii?" )
                              local s = select ( "Da" , "Nu" )
                              if s == 2 then
                              return
                              end
                              if pc . count_item ( 70036 ) == 0 then
                              say_title ( "Depozit de Yang" )
                              say ( "Nu detii Pana Razboinicului primita la depunerea baniilor pentru ai putea retrage suma de 100kk!." )
                              say ( "Fara ea nu poti retrage banii deoarece nu ai nici o dovada ca sunt ai tai. Haide inapoi cu Pana Razboinicului." )
                              return
                              end
                              say_title ( "Depozit de Yang" )
                              if pc . count_item ( 70036 ) == 0 then
                              return
                              end
                              say ( "Ai retras banii cu succes!" )
                              pc . remove_item ( 70036 )
                              pc . changegold ( 100000000 )
                                                   elseif f == 5 then
                                                      say_title ( "Depozit de Yang" )
                              say ( "Buna. Ai nevoie de bani si doresti sa ii retragi din depozit? " )
                              say ( "Daca iti amintesti, la depunerea yang-ului, ai primit o Pana a Razboinicului. Cu ajutorul ei poti retrage suma dorita." )
                              say_item ( "Medalia Razboinicului" , 70004 , "" )
                                say_title ( "Depozit de Yang" )
                              say ( "Esti sigur ca doresti sa retragi banii?" )
                              local s = select ( "Da" , "Nu" )
                              if s == 2 then
                              return
                              end
                              if pc . count_item ( 70004 ) == 0 then
                              say_title ( "Depozit de Yang" )
                              say ( "Nu detii Medalia Razboinicului primita la depunerea baniilor pentru ai putea retrage suma de 500kk!." )
                              say ( "Fara ea nu poti retrage banii deoarece nu ai nici o dovada ca sunt ai tai. Haide inapoi cu Medalia Razboinicului." )
                              return
                              end
                              say_title ( "Depozit de Yang" )
                              if pc . count_item ( 70004 ) == 0 then
                              return
                              end
                              say ( "Ai retras banii cu succes!" )
                              pc . remove_item ( 70004 )
                              pc . changegold ( 500000000 )
                                                    elseif f == 6 then
                                                      say_title ( "Depozit de Yang" )
                              say ( "Buna. Ai nevoie de bani si doresti sa ii retragi din depozit? " )
                              say ( "Daca iti amintesti, la depunerea yang-ului, ai primit o Pana a Razboinicului. Cu ajutorul ei poti retrage suma dorita." )
                              say_item ( "Cupa Razboinicului" , 50042 , "" )
                                say_title ( "Depozit de Yang" )
                              say ( "Esti sigur ca doresti sa retragi banii?" )
                              local s = select ( "Da" , "Nu" )
                              if s == 2 then
                              return
                              end
                              if pc . count_item ( 50042 ) == 0 then
                              say_title ( "Depozit de Yang" )
                              say ( "Nu detii Cupa Razboinicului primita la depunerea baniilor pentru ai putea retrage suma de 1kkk!." )
                              say ( "Fara ea nu poti retrage banii deoarece nu ai nici o dovada ca sunt ai tai. Haide inapoi cu Cupa Razboinicului." )
                              return
                              end
                              say_title ( "Depozit de Yang" )
                              if pc . count_item ( 50042 ) == 0 then
                              return
                              end
                              say ( "Ai retras banii cu succes!" )
                              pc . remove_item ( 50042 )
                              pc . changegold ( 1000000000 )
                           end
            elseif s == 3 then
               local loto = select("Loto 1 din 5", "Loto 1 din 10", "Loto 1 din 20", "Poate nu am nrorc...")
                  if loto == 1 then
                     say_title("Loteria:")
                     say("Salutare ".. pc.get_name() .."! Te simnti norocos?")
                     say("Poti sa participi la loto la un pret de:")
                     say_reward("6.000.000 Yang (6kk)")
                     say("Continui?")
                     local scelta = select("Da","Nu")
                     if scelta == 1 then
                        if pc . gold >= 6000000 then
                           pc . changegold ( - 6000000 )
                           local k
                           repeat
                              say_title( "Loteria:" )
                              say( "Introdu un numar de la 1 la 5" )
                              say("Daca acest numar corespunde cu rezultatul")
                              say("poti castiga un")
                              say("jackpot de 50.000.000 Yang (50kk)!!")
                              k = tonumber(input())
                              if k == nil then
                                 say_title("Loteria:")
                                 say("Scrie un numar!")
                                 local s = select("Continua", "Anuleaza")
                                 if s == 2 then
                                    return
                                 end
                              else
                                 if k <= 0 then
                                    say_title("Loteria:")
                                    say("Scrie un numar pozitiv!")
                                    local s = select("Continua", "Anuleaza")
                                    if s == 2 then
                                       return
                                    end
                                 else
                                    if k > 5 then
                                       say_title("Loteria:")
                                       say("Scrie un numar intre 1 si 5")
                                       local s = select("Continua", "Anuleaza")
                                       if s == 2 then
                                          return
                                       end
                                    else
                                       break
                                    end
                                 end
                              end
                           until false
                           say("Numarul ales de tine: " .. k )
                           wait ()
                           say ("Este timpul extrageri numarului!")
                           local random_number = tostring(number(1,5))
                           say("Numarul extras: " .. random_number)
                           if random_number == tostring(k) then
                              say ("Se pare ca norocul te-a lovit din plin")
                              say_reward ("Ai castigat 50.000.000 Yang(50kk)")
                              pc.changegold ( 50000000 )
                           else
                              say ("Din pacate nu ai avut noroc. Reincearca!")
                           end
                        end
                     end
                  elseif loto == 2 then
                     say_title("Loteria:")
                     say("Salutare ".. pc.get_name() .."! Te simnti norocos?")
                     say("Poti sa participi la loto la un pret de:")
                     say_reward("5.000.000 Yang (5kk)")
                     say("Continui?")
                     local scelta = select("Da","Nu")
                     if scelta == 1 then
                        if pc . gold >= 5000000 then
                           pc . changegold ( - 5000000 )
                           local k
                           repeat
                              say_title( "Loteria:" )
                              say( "Introdu un numar de la 1 la 10" )
                              say("Daca acest numar corespunde cu rezultatul")
                              say("poti castiga un")
                              say("jackpot de 75.000.000 Yang (75kk)!!")
                              k = tonumber(input())
                              if k == nil then
                                 say_title("Loteria:")
                                 say("Scrie un numar!")
                                 local s = select("Continua", "Anuleaza")
                                 if s == 2 then
                                    return
                                 end
                              else
                                 if k <= 0 then
                                    say_title("Loteria:")
                                    say("Scrie un numar pozitiv!")
                                    local s = select("Continua", "Anuleaza")
                                    if s == 2 then
                                       return
                                    end
                                 else
                                    if k > 10 then
                                       say_title("Loteria:")
                                       say("Scrie un numar intre 1 si 10")
                                       local s = select("Continua", "Anuleaza")
                                       if s == 2 then
                                          return
                                       end
                                    else
                                       break
                                    end
                                 end
                              end
                           until false
                           say("Numarul ales de tine: " .. k )
                           wait ()
                           say ("Este timpul extrageri numarului!")
                           local random_number = tostring(number(1,10))
                           say("Numarul extras: " .. random_number)
                           if random_number == tostring(k) then
                              say ("Se pare ca norocul te-a lovit din plin")
                              say_reward ("Ai castigat 75.000.000 Yang(75kk)")
                              pc.changegold ( 75000000 )
                           else
                              say ("Din pacate nu ai avut noroc. Reincearca!")
                           end
                        end
                     end
                  elseif loto == 3 then
                     say_title("Loteria:")
                     say("Salutare ".. pc.get_name() .."! Te simnti norocos?")
                     say("Poti sa participi la loto la un pret de:")
                     say_reward("4.000.000 Yang (4kk)")
                     say("Continui?")
                     local scelta = select("Da","Nu")
                     if scelta == 1 then
                        if pc . gold >= 4000000 then
                           pc . changegold ( - 4000000 )
                           local k
                           repeat
                              say_title( "Loteria:" )
                              say( "Introdu un numar de la 1 la 20" )
                              say("Daca acest numar corespunde cu rezultatul")
                              say("poti castiga un")
                              say("jackpot de 100.000.000 Yang (100kk)!!")
                              k = tonumber(input())
                              if k == nil then
                                 say_title("Loteria:")
                                 say("Scrie un numar!")
                                 local s = select("Continua", "Anuleaza")
                                 if s == 2 then
                                    return
                                 end
                              else
                                 if k <= 0 then
                                    say_title("Loteria:")
                                    say("Scrie un numar pozitiv!")
                                    local s = select("Continua", "Anuleaza")
                                    if s == 2 then
                                       return
                                    end
                                 else
                                    if k > 20 then
                                       say_title("Loteria:")
                                       say("Scrie un numar intre 1 si 20")
                                       local s = select("Continua", "Anuleaza")
                                       if s == 2 then
                                          return
                                       end
                                    else
                                       break
                                    end
                                 end
                              end
                           until false
                           say("Numarul ales de tine: " .. k )
                           wait ()
                           say ("Este timpul extrageri numarului!")
                           local random_number = tostring(number(1,20))
                           say("Numarul extras: " .. random_number)
                           if random_number == tostring(k) then
                              say ("Se pare ca norocul te-a lovit din plin")
                              say_reward ("Ai castigat 100.000.000 Yang(100kk)")
                              pc.changegold ( 100000000 )
                           else
                              say ("Din pacate nu ai avut noroc. Reincearca!")
                           end
                        end
                     end
                  end
            elseif s == 4 then
               say ( "" )
               say ( "Vrei sa schimbi Rasa??" )
               say ( "Din ori ce rasa esti poti deveni alta" )
               say ( "" )
               say ( "" )
               say ( "" )
               local main_set = select ( "Da" , "Nu" )
               if main_set == 1 then
                  say ( "Ce Rasa Vrei?" )
                  local razzacambiasex = select ("Warrior","Ninja","Sura","Shaman","Nu Stiu..")
                     if razzacambiasex == 1 then     
                        local sexwar = select ("Baiat","Fata")
                           if sexwar == 1 then           
                              pc.polymorph("4")
                              pc.change_sex()
                           elseif sexwar == 2 then
                              pc.polymorph("4")
                              pc.change_sex()
                              pc.polymorph("20032")
                              pc.polymorph("1")
                              pc.change_sex()
                              pc.polymorph("20032")
                           end
                     elseif razzacambiasex == 2 then
                        local sexninja = select ("Baiat","Fata")
                           if sexninja == 2 then           
                              pc.polymorph("5")
                              pc.change_sex()
                           elseif sexninja == 1 then
                              pc.polymorph("5")
                              pc.change_sex()
                              pc.polymorph("20032")
                              pc.polymorph("1")
                              pc.change_sex()
                              pc.polymorph("20032")
                           end
                     elseif razzacambiasex == 3 then
                        local sexsura = select ("Baiat","Fata")
                           if sexsura == 1 then           
                              pc.polymorph("6")
                              pc.change_sex()
                           elseif sexsura == 2 then
                              pc.polymorph("6")
                              pc.change_sex()
                              pc.polymorph("20032")
                              pc.polymorph("1")
                              pc.change_sex()
                              pc.polymorph("20032")
                           end
                     elseif razzacambiasex == 4 then
                        local sexshamy = select ("Baiat","Fata")
                           if sexshamy == 2 then           
                              pc.polymorph("7")
                              pc.change_sex()
                           elseif sexshamy == 1 then
                              pc.polymorph("7")
                              pc.change_sex()
                              pc.polymorph("20032")
                              pc.polymorph("1")
                              pc.change_sex()
                              pc.polymorph("20032")
                           end
                        end
                     end
            elseif s == 5 then
               say ( "" )
               say ( "Sigur vrei sa schimbi sexul?" )
               say ( "" )
               local main_set = select ( "Da" , "Nu" )
                  if main_set == 1 then
                     pc.change_sex()
                     pc.polymorph("20032")
                     say ( "Ai schimbat sexul cu succes" )
                  end
            elseif s == 6 then
               local reskill = select("Reseteaza toate skilurile", "M-am razgandit")
                  if reskill == 1 then
                     say ( "Vrei Sa Resetezi toate skillurile?" )
                     say ( "Daca resetezi skillurile vei loa totul de la M1." )
                     local main_set = select ( "Da" , "Nu" )
                        if main_set == 1 then
                           pc.setqf("clear", 1)
                           pc.clear_skill()
                           pc.set_skill_group(0)
                           say ( "Succes! Iti urez o zi buna !" )
                        end
                     end
            elseif s == 7 then
               local pagina2 = select("Elimina frizura", "Mareste viteza", "Mesaj global", "Modificare grad", "Teleportarea jucatorului", "Cal lvl 21", "Marmura Binecuvantare", "Anuleaza")
                  if pagina2 == 1 then
                     say ( "" )
                     say ( "Esti sigur ca vrei sa elimini frizura?" )
                     say ( "" )
                     local main_set = select ( "Da" , "Nu" )
                        if main_set == 1 then
                        pc.set_part(PART_HAIR, 0)
                        say ( "Ai Eliminat Cu Succes Frizura" )
                        say ( "" )
                     end
                  elseif pagina2 == 2 then
                     if pc.get_gold()<1000000000 then
                     say("Nu ai 1.000.000.000 Yang (1kkk)")
                  else
                     say ( "Esti sigur ca vrei sa iti maresc viteza" )
                     say ( "de miscare si de atac cu 150 puncte?" )
                     say ( "Aceasta costa 1.000.000.000 Yang (1kkk)" )
                     local vel =select ("Da","Nu")
                        if vel == 1 then
                           affect . add_collect ( apply . ATT_SPEED , 150 , 60 * 60 * 24 * 365 * 60 )
                           affect . add_collect ( apply . MOV_SPEED , 150 , 60 * 60 * 24 * 365 * 60 )
                           pc . changegold ( -1000000000 )
                           say ( "Ai primit viteza maxima cu succes" )
                           say ( "Ti s-au retras din Yang 1.000.000.000 Yang (1kkk)" )
                        end
                     end
                  elseif pagina2 == 3 then
                     say("Cu doar 5kk poti sa postezi")
                     say("un mesaj global")
                     say("Daca adresezi jigniri staffului")
                     say("sau unor playeri , se ajunge la sanctiuni")
                     say("Esti sigur ca vrei sa postezi un mesaj?")
                     local mes = select("Da", "Nu")
                        if mes == 1 then
                           if pc.get_gold()<5000000 then
                           say("Nu ai 5.000.000 Yang (5kk)")
                        else
                           say("Scrie Mesajul :")
                           local notice_text = input()
                           notice_all("Lv. "..pc.get_level().."  "..pc.get_name().." spune : "..notice_text)
                           pc.changegold(-5000000)
                        end
                     end
                  elseif pagina2 == 4 then
                     say("Cu doar 3kk poti sa iti")
                     say("modifici gradul din fata numelui")
                     say("Esti sigur ca vrei sa iti modifici")
                     say("gradul?")
                     local grad = select("Da", "Nu")
                        if grad == 1 then
                           local grad1 = select("Transforma-ti gradul(Pozitiv)", "Transforma-ti gradul(Nagativ)", "Anuleaza")
                              if grad1 == 1 then
                                 if pc.get_gold()<3000000 then
                                 say("Nu ai 3.000.000 Yang (3kk)")
                              else
                                 say("Alege ce grad sa-ti dau")
                                 local a = select ( "Prietenos" , "Bun" , "Nobil" , "Cavaleresc" , "Anuleaza" )
                                    if a == 1 then
                                    pc . change_alignment ( 1000 )
                                    pc.changegold(-3000000)
                                       say("Acum ai primit gradul Prietenos")
                                    elseif a == 2 then
                                    pc . change_alignment ( 4000 )
                                    pc.changegold(-3000000)
                                       say("Acum ai primit gradul Bun")
                                    elseif a == 3 then
                                    pc . change_alignment ( 8000 )
                                    pc.changegold(-3000000)
                                       say("Acum ai primit gradul Nobil")
                                    elseif a == 4 then
                                    pc . change_alignment ( 20000 )
                                    pc.changegold(-3000000)
                                       say("Acum ai primit gradul Cavaleresc")
                                    end
                                 end
                              elseif grad1 == 2 then
                                 if pc.get_gold()<3000000 then
                                 say("Nu ai 3.000.000 Yang (3kk)")
                              else
                                 local b = select ( "Agresiv" , "Fatarnic" , "Rautacios" , "Crud" , "Anuleaza" )
                                    if b == 1 then
                                    pc . change_alignment ( -1000 )
                                    pc.changegold(-3000000)
                                       say("Acum ai primit gradul Agresiv")
                                    elseif b == 2 then
                                    pc . change_alignment ( -4000 )
                                    pc.changegold(-3000000)
                                       say("Acum ai primit gradul Fatarnic")
                                    elseif b == 3 then
                                    pc . change_alignment ( -8000 )
                                    pc.changegold(-3000000)
                                       say("Acum ai primit gradul Rautacios")
                                    elseif b == 4 then
                                    pc . change_alignment ( -20000 )
                                    pc.changegold(-3000000)
                                       say("Acum ai primit gradul Crud")
                                    end
                                 end
                              end
                           end
                  elseif pagina2 == 5 then
                     say_title("Teleportarea jucatorului:")
                     say("Daca ai 35kk poti sa te teleportezi la un alt jucator.")
                     say_reward("Vrei sa te teleportezi?")
                     local a = select("Da","Nu!")
                        if a == 1 then
                           if pc.get_gold()<35000000 then
                           say("Nu ai 35.000.000 Yang (35kk)")
                        else
                           say_title("Teleportarea jucatorului:")
                           say_reward("Scrie numele jucatorului la care vrei sa te[ENTER]teleportezi:")
                           local name = input()
                              pc.teleport(name)
                              pc.changegold(-35000000)
                           end
                        end
                  elseif pagina2 == 6 then
                     say ( "Salut! Iti pot oferi cal lvl 21 in schimbul a 5kk" )
                     say ( "Vrei sa iti dau calul?" )
                     say ( "" )
                     say ( "Sigur vrei?" )
                     local main_set = select("Da", "Nu")
                        if main_set == 1 then
                           if pc.get_gold()<5000000 then
                           say("Nu ai 5.000.000 Yang (5kk)")
                        else
                           horse . unride ( )
                           horse . advance ( )
                           horse . advance ( )
                           horse . advance ( )
                           horse . advance ( )
                           horse . advance ( )
                           horse . advance ( )
                           horse . advance ( )
                           horse . advance ( )
                           horse . advance ( )
                           horse . advance ( )
                           horse . advance ( )
                           horse . advance ( )
                           horse . advance ( )
                           horse . advance ( )
                           horse . advance ( )
                           horse . advance ( )
                           horse . advance ( )
                           horse . advance ( )
                           horse . advance ( )
                           horse . advance ( )
                           horse . advance ( )
                           pc.changegold(-5000000)
                           command("setsk 131 10")
                           command("setsk 137 20")
                           command("setsk 138 20")
                           command("setsk 139 20")
                           command("setsk 140 20")
                           horse . ride ( )
                           setskin ( NOWINDOW )
                           pc . give_item2 ( "50053" , 1 )
                        end
                     end
                  elseif pagina2 == 7 then
                     say("Eu iti pot oferi 2 stocuri de marmuri")
                     say("Unul de o marmura; Unul de 5 marmuri")
                     local marmuri = select("Stoc de o Marmura", "Stoc de 5 Marmuri", "Anuleaza")
                        if marmuri == 1 then
                           pc . give_item2 ( "70024" , 1 )
                           say("Ai primit o Marmura")
                        elseif marmuri == 2 then
                           pc . give_item2 ( "70024" , 1 )
                           pc . give_item2 ( "70024" , 1 )
                           pc . give_item2 ( "70024" , 1 )
                           pc . give_item2 ( "70024" , 1 )
                           pc . give_item2 ( "70024" , 1 )
                           say("Ai primit 5 Marmuri")
                        end
                     end
                  end
               end
            end
         end


== ESTE TESTAT DE MINE ! FUNCȚIONEAZĂ 100%==

Tutorial instalare quest:
1. Salvaţi conţinutul quest-ului într-un fişier text numit de exemplu nume_quest.quest .
2. Vă conectaţi la filezilla / winscp şi întrati în /usr/home/game/share/locale/germany/quest (depinde ce server aveţi).
3. Îl puneţi acolo (să fie .quest) şi da-ţi permisiuni 777.
4. Te loghezi în FreeBSD / putty şi scrii în felul următor: cd /usr/home/game/share/locale/germany/quest apoi ./qc nume_quest.quest
5. Intraţi pe server şi scrieţi /reload q .
6. Testaţi quest-ul .
Ultima oară modificat 21 Apr 2016, 21:20 de către Yahiko, modificat 1 dată în total.
Motiv: //# Actualizat după noile cerințe.
Nu iti poti trai viata pentru altii. Trebuie sa faci ceea ce e bine pentru tine, chiar daca astfel ii ranesti pe cei pe care ii iubesti. – Nicholas Sparks
Imagine
Trebuie să fii logat sau înregistrat pentru a vedea acest link.

Conectat
Avatar utilizator
Sociopath
Super Ad Mod
Super Ad Mod
Mesaje: 1974
Membru din: 03 Sep 2014
Localitate: Bravos
Reputație: ﭸ S.Ad.Moderator
▬▬▬▬▬▬▬▬▬▬▬▬▬▬▬
ﭸ Fost lider Helperi si Trial Helperi
ﭸ Fost Ad.Moderator
ﭸ Fost S.Moderator
ﭸ Fost Moderator
ﭸ Fost Helper
▬▬▬▬▬▬▬▬
ﭸ Old dawg
ﭸ Băştinaş
ﭸ Human after all...
▬▬▬▬▬▬▬▬
ﭸ Sătul de PCR
Nume anterior: h u m a n, .Ragnar
Status: ▬▬▬▬▬▬
Server Metin2: ▬▬▬▬▬▬
Mulțumiri acordate: 19
Mulțumiri primite: 20
Contact:

Re: [QUEST] PvP Judy

Mesajde Sociopath » 07 Iul 2015, 22:42

Mutat în quest-uri!

[ Mesaj scris via Android ] Imagine
Imagine
Imagine

Deconectat
Avatar utilizator
ciarsosan
Nou Venit
Nou Venit
Mesaje: 9
Membru din: 29 Iun 2014
Status: Sunt bine mersi ^.^
Server Metin2: Metin2 Cyan
Regat: Jinno
Mulțumiri acordate: 0
Mulțumiri primite: 0

Re: [QUEST] PvP Judy

Mesajde ciarsosan » 09 Apr 2017, 13:00

Nu este sii fisierul 20094 ? ca imi scrie ca nu merge

Deconectat
Avatar utilizator
cosmin931
Nivel 1
Nivel 1
Mesaje: 80
Membru din: 25 Ian 2016
Localitate: Bucuresti
Status: Gandeste , nu costa !
Server Metin2: Pro-Metin2
Regat: Jinno
Mulțumiri acordate: 1
Mulțumiri primite: 0
Contact:

Re: [QUEST] PvP Judy

Mesajde cosmin931 » 13 Apr 2017, 00:52

Nu am testat acest quest dar pare destul de interesant mai ales penntru serverele PVP sau cele PVM easy :) .


Înapoi la “Quest-uri”

Cine este conectat

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