Cerere quest npc
Salut , tot caut de ceva timp un quest pentru un npc care să ofere : exp , grad P , Skill p și yang , și nu găsesc . Mă poate ajuta cineva vă rog ?
Am căutat și nu găsesc .
-
-DND-
-
- Mesaje: 1464
- Membru din: 22 Ian 2017, 16:40
- Server: Serverfiles By DnD
- Regat: Jinno
- Aprecieri: 116
- Mulţumiri: 2249
- Discord: Copiază ID
- Contact:
Medalii
Cod: Selectaţi tot
quest NpcAll begin
state start begin
when 20094.chat."Buna Ziua" 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 Just4Metin" )
say ( "Just4Metin 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 500kk" )
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()<500000000 then
say("Nu ai 500.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(-500000000)
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- Pentru acest mesaj, -DND- for the post:
- isismaretu
EXP ->
Grad ->
Skill P ->
Yang ->
Cod: Selectaţi tot
quest experienta begin
state start begin
when 9004.chat."Experienta" begin
say("Eu iti pot oferii")
say("experienta.")
say("Esti sigur ca vrei?")
local s=select("Da!")
if s==1 then
--Da!
pc.give_exp2(200000000)
say("Ai primit experienta!")
end
end
end
endCod: Selectaţi tot
uest neograd begin
state start begin
when 20092.chat."Transforma-ti gradul(Pozitiv)" begin
say_title("Soon : ")
say("Hmm, am aflat o noua posibilitate de imbunatatire a")
say_reward("punctellor de grad,alege ce grad vei sa-ti dau:")
local a = select ( "Prietenos" , "Bun" , "Nobil" , "Cavaleresc" , "Anuleaza" )
if a == 1 then
pc . change_alignment ( 1000 )
say("Acum ai primit gradul Prietenos")
elseif a == 2 then
pc . change_alignment ( 4000 )
say("Acum ai primit gradul Bun")
elseif a == 3 then
pc . change_alignment ( 8000 )
say("Acum ai primit gradul Nobil")
elseif a == 4 then
pc . change_alignment ( 20000 )
say("Acum ai primit gradul Cavaleresc")
elseif a == 5 then
end
end
when 20023.chat."Transforma-ti gradul(Negativ)" begin
say_title("Soon :")
say("Hmm, am aflat o nuou posibilitate de scadere a")
say_reward("punctelor de grad, alege ce grad vrei sa-ti dau:")
local b = select ( "Agresiv" , "Fatarnic" , "Rautacios" , "Crud" , "Anuleaza" )
if b == 1 then
pc . change_alignment ( -1000 )
say("Acum ai primit gradul Agresiv")
elseif b == 2 then
pc . change_alignment ( -4000 )
say("Acum ai primit gradul Fatarnic")
elseif b == 3 then
pc . change_alignment ( -8000 )
say("Acum ai primit gradul Rautacios")
elseif b == 4 then
pc . change_alignment ( -20000 )
say("Acum ai primit gradul Crud")
elseif b == 5 then
end
end
end
endCod: Selectaţi tot
quest item_skill_p begin
state start begin
-- DEFAULT --
when 50512.use with pc.get_skill_group() == 0 begin
say("Nu ai nicio competenta aleaasa!")
say("")
end
-- WARRIOR --
when 50512.use with pc.get_job() == 0 and pc.get_skill_group() == 1 begin
say_title("Alege o competenta:")
say("")
local mandi = select("Incizia Tripa","Vartejul Sabiei","Iures","Aura Sabiei","Izbitura","Inchide")
if mandi == 1 and pc.count_item(50512) >= 1 then
if pc.get_skill_level(1) >= 40 then
syschat("Ai deja acesta competenta Perfecta!")
else
pc.set_skill_level(1, 59)
pc.remove_item(50512, 1)
end
end
if mandi == 2 and pc.count_item(50512) >= 1 then
if pc.get_skill_level(2) >= 40 then
syschat("Ai deja acesta competenta Perfecta!")
else
pc.set_skill_level(2, 59)
pc.remove_item(50512, 1)
end
end
if mandi == 3 and pc.count_item(50512) >= 1 then
if pc.get_skill_level(3) >= 40 then
syschat("Ai deja acesta competenta Perfecta!")
else
pc.set_skill_level(3, 59)
pc.remove_item(50512, 1)
end
end
if mandi == 4 and pc.count_item(50512) >= 1 then
if pc.get_skill_level(4) >= 40 then
syschat("Ai deja acesta competenta Perfecta!")
else
pc.set_skill_level(4, 59)
pc.remove_item(50512, 1)
end
end
if mandi == 5 and pc.count_item(50512) >= 1 then
if pc.get_skill_level(5) >= 40 then
syschat("Ai deja acesta competenta Perfecta!")
else
pc.set_skill_level(5, 59)
pc.remove_item(50512, 1)
end
end
end
when 50512.use with pc.get_job() == 0 and pc.get_skill_group() == 2 begin
say_title("Alege o competenta:")
say("")
local mandi = select("Atacul Spiritului","Zdrobire","Zdruncinare","Corp Rezistent","Atacul Sabiei","Inchide")
if mandi == 1 and pc.count_item(50512) >= 1 then
if pc.get_skill_level(16) >= 40 then
syschat("Ai deja acesta competenta Perfecta!")
else
pc.set_skill_level(16, 59)
pc.remove_item(50512, 1)
end
end
if mandi == 2 and pc.count_item(50512) >= 1 then
if pc.get_skill_level(17) >= 40 then
syschat("Ai deja acesta competenta Perfecta!")
else
pc.set_skill_level(17, 59)
pc.remove_item(50512, 1)
end
end
if mandi == 3 and pc.count_item(50512) >= 1 then
if pc.get_skill_level(18) >= 40 then
syschat("Ai deja acesta competenta Perfecta!")
else
pc.set_skill_level(18, 59)
pc.remove_item(50512, 1)
end
end
if mandi == 4 and pc.count_item(50512) >= 1 then
if pc.get_skill_level(19) >= 40 then
syschat("Ai deja acesta competenta Perfecta!")
else
pc.set_skill_level(19, 59)
pc.remove_item(50512, 1)
end
end
if mandi == 5 and pc.count_item(50512) >= 1 then
if pc.get_skill_level(20) >= 40 then
syschat("Ai deja acesta competenta Perfecta!")
else
pc.set_skill_level(20, 59)
pc.remove_item(50512, 1)
end
end
end
-- ASSASSIN --
when 50512.use with pc.get_job() == 1 and pc.get_skill_group() == 1 begin
say_title("Alege o competenta:")
say("")
local mandi = select("Ambuscada","Atac Mortal","Rulant","Camuflaj","Norul","Inchide")
if mandi == 1 and pc.count_item(50512) >= 1 then
if pc.get_skill_level(31) >= 40 then
syschat("Ai deja acesta competenta Perfecta!")
else
pc.set_skill_level(31, 59)
pc.remove_item(50512, 1)
end
end
if mandi == 2 and pc.count_item(50512) >= 1 then
if pc.get_skill_level(32) >= 40 then
syschat("Ai deja acesta competenta Perfecta!")
else
pc.set_skill_level(32, 59)
pc.remove_item(50512, 1)
end
end
if mandi == 3 and pc.count_item(50512) >= 1 then
if pc.get_skill_level(33) >= 40 then
syschat("Ai deja acesta competenta Perfecta!")
else
pc.set_skill_level(33, 59)
pc.remove_item(50512, 1)
end
end
if mandi == 4 and pc.count_item(50512) >= 1 then
if pc.get_skill_level(34) >= 40 then
syschat("Ai deja acesta competenta Perfecta!")
else
pc.set_skill_level(34, 59)
pc.remove_item(50512, 1)
end
end
if mandi == 5 and pc.count_item(50512) >= 1 then
if pc.get_skill_level(35) >= 40 then
syschat("Ai deja acesta competenta Perfecta!")
else
pc.set_skill_level(35, 59)
pc.remove_item(50512, 1)
end
end
end
when 50512.use with pc.get_job() == 1 and pc.get_skill_group() == 2 begin
say_title("Alege o competenta:")
say("")
local mandi = select("Foc repetat","Ploaie de Sageti","Sageata de Foc","Mers de Fulg","Sageata Otravita","Inchide")
if mandi == 1 and pc.count_item(50512) >= 1 then
if pc.get_skill_level(46) >= 40 then
syschat("Ai deja acesta competenta Perfecta!")
else
pc.set_skill_level(46, 59)
pc.remove_item(50512, 1)
end
end
if mandi == 2 and pc.count_item(50512) >= 1 then
if pc.get_skill_level(47) >= 40 then
syschat("Ai deja acesta competenta Perfecta!")
else
pc.set_skill_level(47, 59)
pc.remove_item(50512, 1)
end
end
if mandi == 3 and pc.count_item(50512) >= 1 then
if pc.get_skill_level(48) >= 40 then
syschat("Ai deja acesta competenta Perfecta!")
else
pc.set_skill_level(48, 59)
pc.remove_item(50512, 1)
end
end
if mandi == 4 and pc.count_item(50512) >= 1 then
if pc.get_skill_level(49) >= 40 then
syschat("Ai deja acesta competenta Perfecta!")
else
pc.set_skill_level(49, 59)
pc.remove_item(50512, 1)
end
end
if mandi == 5 and pc.count_item(50512) >= 1 then
if pc.get_skill_level(50) >= 40 then
syschat("Ai deja acesta competenta Perfecta!")
else
pc.set_skill_level(50, 59)
pc.remove_item(50512, 1)
end
end
end
-- SURA --
when 50512.use with pc.get_job() == 2 and pc.get_skill_group() == 1 begin
say_title("Alege o competenta:")
say("")
local mandi = select("Lovitura Degetului","Vartejul Dragonului","Tais Vrajit","Teama","Armura Vrajita","Risipirea Magiei","Inchide")
if mandi == 1 and pc.count_item(50512) >= 1 then
if pc.get_skill_level(61) >= 40 then
syschat("Ai deja acesta competenta Perfecta!")
else
pc.set_skill_level(61, 59)
pc.remove_item(50512, 1)
end
end
if mandi == 2 and pc.count_item(50512) >= 1 then
if pc.get_skill_level(62) >= 40 then
syschat("Ai deja acesta competenta Perfecta!")
else
pc.set_skill_level(62, 59)
pc.remove_item(50512, 1)
end
end
if mandi == 3 and pc.count_item(50512) >= 1 then
if pc.get_skill_level(63) >= 40 then
syschat("Ai deja acesta competenta Perfecta!")
else
pc.set_skill_level(63, 59)
pc.remove_item(50512, 1)
end
end
if mandi == 4 and pc.count_item(50512) >= 1 then
if pc.get_skill_level(64) >= 40 then
syschat("Ai deja acesta competenta Perfecta!")
else
pc.set_skill_level(64, 59)
pc.remove_item(50512, 1)
end
end
if mandi == 5 and pc.count_item(50512) >= 1 then
if pc.get_skill_level(65) >= 40 then
syschat("Ai deja acesta competenta Perfecta!")
else
pc.set_skill_level(65, 59)
pc.remove_item(50512, 1)
end
end
if mandi == 6 and pc.count_item(50512) >= 1 then
if pc.get_skill_level(66) >= 40 then
syschat("Ai deja acesta competenta Perfecta!")
else
pc.set_skill_level(66, 59)
pc.remove_item(50512, 1)
end
end
end
when 50512.use with pc.get_job() == 2 and pc.get_skill_group() == 2 begin
say_title("Alege o competenta:")
say("")
local mandi = select("Lovitura Intunecata","Lovitura Focului","Spiritul Flacarii","Protectia Intunecata","Lovitura Spiritului","Sfera Intunecata","Inchide")
if mandi == 1 and pc.count_item(50512) >= 1 then
if pc.get_skill_level(76) >= 40 then
syschat("Ai deja acesta competenta Perfecta!")
else
pc.set_skill_level(76, 59)
pc.remove_item(50512, 1)
end
end
if mandi == 2 and pc.count_item(50512) >= 1 then
if pc.get_skill_level(1) >= 40 then
syschat("Ai deja acesta competenta Perfecta!")
else
pc.set_skill_level(77, 59)
pc.remove_item(50512, 1)
end
end
if mandi == 3 and pc.count_item(50512) >= 1 then
if pc.get_skill_level(78) >= 40 then
syschat("Ai deja acesta competenta Perfecta!")
else
pc.set_skill_level(78, 59)
pc.remove_item(50512, 1)
end
end
if mandi == 4 and pc.count_item(50512) >= 1 then
if pc.get_skill_level(79) >= 40 then
syschat("Ai deja acesta competenta Perfecta!")
else
pc.set_skill_level(79, 59)
pc.remove_item(50512, 1)
end
end
if mandi == 5 and pc.count_item(50512) >= 1 then
if pc.get_skill_level(80) >= 40 then
syschat("Ai deja acesta competenta Perfecta!")
else
pc.set_skill_level(80, 59)
pc.remove_item(50512, 1)
end
end
if mandi == 6 and pc.count_item(50512) >= 1 then
if pc.get_skill_level(81) >= 40 then
syschat("Ai deja acesta competenta Perfecta!")
else
pc.set_skill_level(81, 59)
pc.remove_item(50512, 1)
end
end
end
-- SHAMAN --
when 50512.use with pc.get_job() == 3 and pc.get_skill_group() == 1 begin
say_title("Alege o competenta:")
say("")
local mandi = select("Talismant Zburator","Aruncarea Dragonului","Ragetul Dragonului","Binecuvantare","Reflexie","Forta Dragonului","Inchide")
if mandi == 1 and pc.count_item(50512) >= 1 then
if pc.get_skill_level(91) >= 40 then
syschat("Ai deja acesta competenta Perfecta!")
else
pc.set_skill_level(91, 59)
pc.remove_item(50512, 1)
end
end
if mandi == 2 and pc.count_item(50512) >= 1 then
if pc.get_skill_level(92) >= 40 then
syschat("Ai deja acesta competenta Perfecta!")
else
pc.set_skill_level(92, 59)
pc.remove_item(50512, 1)
end
end
if mandi == 3 and pc.count_item(50512) >= 1 then
if pc.get_skill_level(93) >= 40 then
syschat("Ai deja acesta competenta Perfecta!")
else
pc.set_skill_level(93, 59)
pc.remove_item(50512, 1)
end
end
if mandi == 4 and pc.count_item(50512) >= 1 then
if pc.get_skill_level(94) >= 40 then
syschat("Ai deja acesta competenta Perfecta!")
else
pc.set_skill_level(94, 59)
pc.remove_item(50512, 1)
end
end
if mandi == 5 and pc.count_item(50512) >= 1 then
if pc.get_skill_level(95) >= 40 then
syschat("Ai deja acesta competenta Perfecta!")
else
pc.set_skill_level(95, 59)
pc.remove_item(50512, 1)
end
end
if mandi == 6 and pc.count_item(50512) >= 1 then
if pc.get_skill_level(96) >= 40 then
syschat("Ai deja acesta competenta Perfecta!")
else
pc.set_skill_level(96, 59)
pc.remove_item(50512, 1)
end
end
end
when 50512.use with pc.get_job() == 3 and pc.get_skill_group() == 2 begin
say_title("Alege o competenta:")
say("")
local mandi = select("Aruncarea Fulgerului","Chemarea Fulgerului","Gheara Fulgerului","Leac","Accelerare","Atac Fortat","Inchide")
if mandi == 1 and pc.count_item(50512) >= 1 then
if pc.get_skill_level(106) >= 40 then
syschat("Ai deja acesta competenta Perfecta!")
else
pc.set_skill_level(106, 59)
pc.remove_item(50512, 1)
end
end
if mandi == 2 and pc.count_item(50512) >= 1 then
if pc.get_skill_level(107) >= 40 then
syschat("Ai deja acesta competenta Perfecta!")
else
pc.set_skill_level(107, 59)
pc.remove_item(50512, 1)
end
end
if mandi == 3 and pc.count_item(50512) >= 1 then
if pc.get_skill_level(108) >= 40 then
syschat("Ai deja acesta competenta Perfecta!")
else
pc.set_skill_level(108, 59)
pc.remove_item(50512, 1)
end
end
if mandi == 4 and pc.count_item(50512) >= 1 then
if pc.get_skill_level(109) >= 40 then
syschat("Ai deja acesta competenta Perfecta!")
else
pc.set_skill_level(109, 59)
pc.remove_item(50512, 1)
end
end
if mandi == 5 and pc.count_item(50512) >= 1 then
if pc.get_skill_level(110) >= 40 then
syschat("Ai deja acesta competenta Perfecta!")
else
pc.set_skill_level(110, 59)
pc.remove_item(50512, 1)
end
end
if mandi == 6 and pc.count_item(50512) >= 1 then
if pc.get_skill_level(111) >= 40 then
syschat("Ai deja acesta competenta Perfecta!")
else
pc.set_skill_level(111, 59)
pc.remove_item(50512, 1)
end
end
end
end
end
Cod: Selectaţi tot
quest yang_morphe begin
state start begin
when 9003.chat."Salut, vrei Yang?" begin
say("Salut tinere razboinic !")
say("Chiar doresti sa imprumuti niste yang")
say("de la mine?")
local s = select("Desigur, am nevoie..", "Nu")
if s == 1 and pc.get_gold()<=999999999 then
pc.change_money(999999999)
elseif s == 1 and pc.get_gold()>=999999999 then
say("Ai prea mult yang in inventar !")
say("Poti purta la tine doar 2kkk (2 miliarde)!")
say("Vino cand ai mai putin yang !")
elseif s == 1 and pc.get_gold()>=999999999 then
say("Poftim yangul!")
say("Nu ezita .. poti veni oricand la mine.")
end
if s == 2 then
return
end
end
end
end- Pentru acest mesaj, Negrea Nicusor Valentin for the post:
- isismaretu
Am rezolvat , multumesc pentru ajutor.
-
-DND-
-
- Mesaje: 1464
- Membru din: 22 Ian 2017, 16:40
- Server: Serverfiles By DnD
- Regat: Jinno
- Aprecieri: 116
- Mulţumiri: 2249
- Discord: Copiază ID
- Contact:
Medalii
Tc la cerere
[ Postat de pe Android ]
[ Postat de pe Android ]
Răspunsuri
6 Vizualizări
348
6 Vizualizări
348
de
Răspunsuri
2 Vizualizări
462
2 Vizualizări
462
de
Răspunsuri
2 Vizualizări
176
2 Vizualizări
176
Răspunsuri
5 Vizualizări
1777
5 Vizualizări
1777
-
- Informaţie
-
Cine este conectat
Utilizatori ce ce navighează pe acest forum: cosminusi93ksm și 48 vizitatori