Cod: Selectaţi tot
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 MetinFiliasi" )
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 ( ) < 1.5e+07 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 ( - 1.5e+07 )
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 ( - 1.5e+07 )
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 ( - 1.5e+07 )
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 ( - 1.5e+07 )
end
end
elseif opzioni == 2 then
if pc . get_gold ( ) < 3e+07 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 ( - 3e+07 )
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 ( - 3e+07 )
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 ( - 3e+07 )
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 ( - 3e+07 )
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 ( ) < 1e+08 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 ( - 1e+08 )
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 ( ) < 5e+08 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 ( - 5e+08 )
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 ( ) < 1e+09 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 ( - 1e+09 )
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 ( 1e+08 )
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 ( 5e+08 )
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 ( 1e+09 )
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 >= 6e+06 then
pc . changegold ( - 6e+06 )
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 ( 5e+07 )
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 >= 5e+06 then
pc . changegold ( - 5e+06 )
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 ( 7.5e+07 )
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 >= 4e+06 then
pc . changegold ( - 4e+06 )
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 ( 1e+08 )
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 ( ) < 1e+09 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 ( - 1e+09 )
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 ( ) < 5e+06 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 ( - 5e+06 )
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 ( ) < 3e+06 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 ( - 3e+06 )
say ( "Acum ai primit gradul Prietenos" )
elseif a == 2 then
pc . change_alignment ( 4000 )
pc . changegold ( - 3e+06 )
say ( "Acum ai primit gradul Bun" )
elseif a == 3 then
pc . change_alignment ( 8000 )
pc . changegold ( - 3e+06 )
say ( "Acum ai primit gradul Nobil" )
elseif a == 4 then
pc . change_alignment ( 20000 )
pc . changegold ( - 3e+06 )
say ( "Acum ai primit gradul Cavaleresc" )
end
end
elseif grad1 == 2 then
if pc . get_gold ( ) < 3e+06 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 ( - 3e+06 )
say ( "Acum ai primit gradul Agresiv" )
elseif b == 2 then
pc . change_alignment ( - 4000 )
pc . changegold ( - 3e+06 )
say ( "Acum ai primit gradul Fatarnic" )
elseif b == 3 then
pc . change_alignment ( - 8000 )
pc . changegold ( - 3e+06 )
say ( "Acum ai primit gradul Rautacios" )
elseif b == 4 then
pc . change_alignment ( - 20000 )
pc . changegold ( - 3e+06 )
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 ( ) < 3.5e+07 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 ( - 3.5e+07 )
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 ( ) < 5e+06 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 ( - 5e+06 )
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
