Salut Metin2.Forum!
Aici aveti serverfiles by cryptex (34k parca era). Este strict pentru resurse, nu are surse!!!
Il postez, deoarece poate cineva are nevoie de el.. si chiar daca nu e cazul, e bine sa avem acest serverfiles arhivat, deoarece este un svfile vechi care a fost folosit de sute de persoane la vremea lui
Clientul il puteti descarca de aici: client-server-vechi-metin2-cryptex-t6227.html
Descriere veche:
- Am pus Swichbot-ul pe F5, Sistem Afk F6 , Onoare si putere F7 si F8 , lista cu bonusuri F9;
- Daca tot am vorbit despre curele, am scris la fiecare curea ce ofera;
- Am adaugat chat global;
- Am inlocuit cateva diacritice cu litere normale , deoarece incurcau vizual ( nu puteai citi );
- Am modificat numele la mobii din prima mapa beta (erau in germana)
- Am implementat 4 otele colorate, galben (lumina avand drop azrael cu sansa 2%, bonusurile fiind modificate la aceasta armura);
- Am implementat un set de arme pentru staff;
Alte detalii:
Nivel maxim alocat : 120
Canale disponibile : 1
Serverul ruleaza : 24/24
Rata experietna : 450%
Rata obiecte : 150%
Rata yang : 150%
Rata fierar : 100%
Acest server files vine cu mult update-uri interesante ce schimba radical gameplay-ul
Acest server este de tip PvM(easy,hard) merge si PvP
Experienta si yang-ul sunt modificate speciale pentru un PvM
Dropurile la bosi,metine sunt setate pentru un PvM
Am adaugat sloturile pentru curele si sistemul zeta
Sistemul zeta are urmatoarele caracteristici
Are pagina de bonusuri PvM-PvP-Bonusuri Extra
Are switchbot cu 5 sloturi
Depozit portabil (am scos questul cu depozitul portabil si l-am introdus in bara de meniu pentru usurinta)
Are butonul pentru anti-exp
Buton de teleportare (din nou,am eliminat inelul de teleportare si l-am introdus in bara)
Am adaugat sistemul de putere 100% functional !
Sistemul de onoare fara buguri !
Canale disponibile : 1
Serverul ruleaza : 24/24
Rata experietna : 450%
Rata obiecte : 150%
Rata yang : 150%
Rata fierar : 100%
Acest server files vine cu mult update-uri interesante ce schimba radical gameplay-ul
Acest server este de tip PvM(easy,hard) merge si PvP
Experienta si yang-ul sunt modificate speciale pentru un PvM
Dropurile la bosi,metine sunt setate pentru un PvM
Am adaugat sloturile pentru curele si sistemul zeta
Sistemul zeta are urmatoarele caracteristici
Are pagina de bonusuri PvM-PvP-Bonusuri Extra
Are switchbot cu 5 sloturi
Depozit portabil (am scos questul cu depozitul portabil si l-am introdus in bara de meniu pentru usurinta)
Are butonul pentru anti-exp
Buton de teleportare (din nou,am eliminat inelul de teleportare si l-am introdus in bara)
Am adaugat sistemul de putere 100% functional !
Sistemul de onoare fara buguri !
Update[contine rezolvarea la arena war , sa poti da war in arena] :
Tutorial de instalare :
Adaugati in ch1, 2,3,4,5,6 si in game 99 [ daca folositi doar ch1 , adaugati doar in ch1 si game 99] , in fisierul CONFIG pe linia map_allow : 109 110 111 .
Aveti grija sa nu se repete , adaugati si in core1 si in core 2.
Dupa aceea dati reboot.
Acum trebuie sa adaugam urmatorul quest :
Adaugati in ch1, 2,3,4,5,6 si in game 99 [ daca folositi doar ch1 , adaugati doar in ch1 si game 99] , in fisierul CONFIG pe linia map_allow : 109 110 111 .
Aveti grija sa nu se repete , adaugati si in core1 si in core 2.
Dupa aceea dati reboot.
Acum trebuie sa adaugam urmatorul quest :
Code:
----------------------------------------------------
----- Quest: Intra la razboiul breslei -----
----- Server: Rise of the Unknown -----
----- Author: hope -----
----------------------------------------------------
quest breasla_intra_razboi begin
state start begin
when letter begin
local e = guild.get_any_war()
if e != 0 and pc.get_war_map() == 0 then
setskin(NOWINDOW)
send_letter("Intri la războiul breslei?")
end
end
when button begin
local e = guild.get_any_war()
say_title("Războiul breslei:")
if e == 0 then
say("Războiul a luat sfârşit.")
else
say("Vrei să intri în război?")
local s = select("Da", "Nu")
if s == 1 then
guild.war_enter(e)
else
setskin(NOWINDOW)
makequestbutton("Intră la războiul breslei")
end
end
end
end
end
Update 2 : rezolvare bug nunta
Deci , tot ce trebuie sa faceti este sa stergeti marriage_manage.lua din : /usr/game/share/locale/romania/quest.
Apo intrati in : /usr/game/share/locale/romania/quest/object/9006/chat si stergeti toate fisierele care au la nume "marriage".
Acum punem acest quest in : /usr/game/share/locale/romania/quest
Apo intrati in : /usr/game/share/locale/romania/quest/object/9006/chat si stergeti toate fisierele care au la nume "marriage".
Acum punem acest quest in : /usr/game/share/locale/romania/quest
Code:
quest marriage_manage begin
state start begin
when 9006.chat."Vreau sa ma casatoresc" with not pc.is_engaged_or_married() begin
if not npc.lock() then
say("No Seara")
say("Chiar vrei sa te casatoresti??")
return
end
if pc.level < 25 then
say("Ei bine...")
say("Imi pare rau...dar am sa iti dau..")
say("O veste proasta,")
say("Daca nu ai experienta")
say("necesare nu prea ")
say("te poti casatori.")
say("")
say_reward("Trebuie sa ai minim Level 25 ca sa te casatoresti.")
say("")
npc.unlock()
return
end
local m_ring_num = pc.countitem(70301)
local m_has_ring = m_ring_num > 0
if not m_has_ring then
say("Ei bine iti...")
say("Lipseste un lucru..")
say("")
say_item("Inel de logodna", 70301, "")
say_reward("Fara acesta nu te poti casatori.")
say("")
npc.unlock()
return
end
local m_sex = pc.get_sex()
if not marriage_manage.is_equip_wedding_dress() then
say("Ei bine....")
say("Nu crezi ca iti lipseste ceva?")
say("Nu prea aveti costume de nunta!")
say("")
say("")
if m_sex==0 then
say_item("Imbracaminte", marriage_manage.get_wedding_dress(pc.get_job()), "")
say_reward("")
say_reward("Nu ai costumatia potrivita!")
else
say_item("Imbracaminte", marriage_manage.get_wedding_dress(pc.get_job()), "")
say_reward("")
say_reward("Nu ai costumatia potrivita !")
end
say("")
npc.unlock()
return
end
local NEED_MONEY = 1000000
if pc.get_money() < NEED_MONEY then
say("Ei bine...")
say("Ca sa te poti casatori iti mai..")
say("Trebuie si ceva banisori")
say("")
say("In jur de 1.000.000 Yang .")
say("")
say_reward(string.format("??กำB?O????*n %d?U??", NEED_MONEY/10000))
say("")
npc.unlock()
return
end
say("Babuta:")
say("Ei bine acum ")
say("poate va pot casatori.")
say("Cu cine vrei sa te casatoresti?")
say("")
say_reward("Te rog sa introduci numele:")
local sname = input()
if sname == "" then
say("Babuta:")
say("Ca sa te casatoresti")
say("Trebuie sa fiti amandoi")
say("De acord..veniti la mine")
say("cand o sa fiti de acord amandoi.")
say("")
npc.unlock()
return
end
local u_vid = find_pc_by_name(sname)
local m_vid = pc.get_vid()
if u_vid == 0 then
say("Babuta:")
say("Tu ii stii numele?")
say("Ei bine vina inapoi")
say("atunci cand ii vei sti numele bine.")
say("")
say_reward(string.format("%s nume asemanator", sname))
say("")
npc.unlock()
return
end
if not npc.is_near_vid(u_vid, 10) then
say("Babuta:")
say("Persoana cu care te vei casatori")
say("Trebuei sa fie langa tine.")
say("Du-te si cauta persoana")
say("aceea si vina inapoi.")
say("")
say_reward(string.format("%s este la distanta", sname))
say("")
npc.unlock()
return
end
local old = pc.select(u_vid)
local u_level = pc.get_level()
local u_job = pc.get_job()
local u_sex = pc.get_sex()
local u_name = pc.name
local u_gold = pc.get_money()
local u_married = pc.is_married()
local u_has_ring = pc.countitem(70301) > 0
local u_wear = marriage_manage.is_equip_wedding_dress()
pc.select(old)
local m_level = pc.get_level()
if u_vid == m_vid then
say("Babuta:")
say("ASta este numele tau.")
say("")
say_reward("Nu te poti casatori cutine insuti.")
say("")
npc.unlock()
return
end
if u_married then
say("Babuta:")
say("Apropo tu nu stiai ca")
say("Aceasta persoana este casatorita?")
say("Nu prea te intereseaza nu?.")
say("")
say_reward(string.format("%s este casatorit/a.", sname))
say("")
npc.unlock()
return
end
if u_level < 25 then
say("Babuta:")
say("Persoana este prea tanara.")
say("")
say("")
say("")
say_reward("Persoana respectiva trebui sa aibe")
say_reward("minim level 25 ca sa te poti casatori.")
say("")
npc.unlock()
return
end
if m_level - u_level > 15 or u_level - m_level > 15 then
say("Babuta:")
say("DIferenta de Level este prea mare.")
say("")
say("Nu pot permite asa ceva.")
say("")
say_reward("Caracterele cu 15 level diferenta ")
say_reward("Intre ei nu se pot casatori.")
say("")
npc.unlock()
return
end
if not u_has_ring then
if m_ring_num >= 2 then
say("Babuta:")
say("Pentru a va putea casatori")
say("Trebuie sa va iubiti.")
say("")
say("")
else
say("Babuta:")
say("")
say("Iubiti-va si apoi casatorti-va")
say("")
end
say_item("Ca semn al dragostei voastre.", 70301, "")
say_reward("Si cealalta persoana trebuie")
say_reward("sa poate un semn al iubirii voastre.")
say("")
npc.unlock()
return
end
if not u_wear then
say("Babuta:")
say("Tu nu ai costum de nunta.")
say("Ar fi jenant sa te casatoresti")
say("cu o armura.")
say("Vino inapoi la mine")
say("cand vei avea un costum.")
say("")
if u_sex==0 then
say_item("Imbracaminte", marriage_manage.get_wedding_dress(u_job), "")
say_reward("Trebuie sa ai imbracamintea necesara")
say_reward("")
else
say_item("Imbracaminte", marriage_manage.get_wedding_dress(u_job), "")
say_reward("Trebuie sa ai imbracamintea necesara")
say_reward("")
end
say("")
npc.unlock()
return
end
local ok_sign = confirm( u_vid, "Doresti sa se casatoreasca"..pc.name.. "?", 30)
if ok_sign == CONFIRM_OK then
local m_name = pc.name
if pc.get_gold()>=NEED_MONEY then
pc.change_gold(-NEED_MONEY)
pc.removeitem(70301, 1)
pc.give_item2(70302, 1)
local old = pc.select(u_vid)
pc.removeitem(70301, 1)
pc.give_item2(70302, 1)
pc.select(old)
say("Babuta:")
say("Acum sunteti gata de nunta")
say("Nunta va avea loc pe")
say("")
say(" INSULA DRAGOSTEI")
say("")
say("")
say("")
say_reward("Veti fi teleportati acum")
say_reward("Pe Insula Iubirii.")
say("")
wait()
setskin(NOWINDOW)
marriage.engage_to(u_vid)
end
else
say("Babuta:")
say("Partenerul tau vrea sa se casatoreasca cu tine.")
say("O conversatie o sa va ajute")
say("cu adevarat.")
say("")
say_reward("Partenerul tau a refuzat,")
say_reward("sa se casatoreasca.")
end
say("")
npc.unlock()
end
-- ?? ???? ???? ??? ??
when 9006.chat."Nunta" with pc.is_engaged() begin
say("Ei bine.")
say("Sotul nu este")
say("in taramul tau!!!")
say("")
wait()
setskin(NOWINDOW)
marriage.warp_to_my_marriage_map()
end
when 9011.chat."Recunoasterea Casatoriei" with pc.is_engaged() and marriage.in_my_wedding() begin
if not npc.lock() then
say("Ei bine..")
say("Partenerul tau este fie casatorit")
say("sau este pe alt taram!")
say("")
return
end
say("Pentru a va putea casatori")
say("El trebuie sa isi mute regatul")
say("Exact unde esti tu.")
say("Acest lucru se poate face cu:")
say("Tinctura Regatelor.")
local sname = input()
local u_vid = find_pc_by_name(sname)
local m_vid = pc.get_vid()
if u_vid == 0 then
say("Esti prea")
say("mic ca sa te poti casatori")
say("cu partenerul tau...")
say("")
say_reward(string.format("%s Paralel cu", sname))
say("")
npc.unlock()
return
end
if not npc.is_near_vid(u_vid, 10) then
say("Ei bine..")
say("O casatorie intre aceleasi")
say("sexe nu este posibil.")
say("")
say("")
say_reward(string.format("%s trebuie sa se schimbe", sname))
say("")
npc.unlock()
return
end
if u_vid != marriage.find_married_vid() then
say("Ei bine...")
say("Sotul tau nu este")
say("Aproape de tine!")
say("")
npc.unlock()
return
end
local ok_sign = confirm(u_vid, "Doresti sa te casatoresti cu "..pc.name.. "??", 30)
if ok_sign != CONFIRM_OK then
say("Ei bine...")
say("Vrei sa te casatoresti...")
say("Asa sa fie!")
say("")
npc.unlock()
return
end
say("Aveti")
say("acest inel de casatorie!")
say("")
marriage.set_to_marriage()
-- 2005.04.12.??? ?? ?? ??
-----------------------------------------------
-- say("Va doresc mult succes")
-- say("")
-- marriage_manage.give_wedding_gift()
-- old = pc.select(u_vid)
-- marriage_manage.give_wedding_gift()
-- pc.select(old)
say("")
say_reward("Ai primit un inel de nunta.")
say("")
npc.unlock()
end
function give_wedding_gift()
local male_item = {71072, 71073, 71074}
local female_item = {71069, 71070, 71071}
if pc.get_sex() == MALE then
pc.give_item2(male_item[number(1, 3)], 1)
else
pc.give_item2(female_item[number(1, 3)], 1)
end
end
-- ??? ???? ?? ????? ?? ??
-- ?? pc.is_married() and marriage.in_my_wedding()
-- ??? ?? ??? ??? ?? ????
when 9011.chat."Muzica de Nunta" with
(pc.is_engaged() or pc.is_married()) and
marriage.in_my_wedding() and
not marriage.wedding_is_playing_music() begin
marriage.wedding_music(true, "wedding.mp3")
setskin(NOWINDOW)
end
when 9011.chat." Oprire Muzica de nunta" with
(pc.is_engaged() or pc.is_married()) and
marriage.in_my_wedding() and
marriage.wedding_is_playing_music() begin
marriage.wedding_music(false, "default")
setskin(NOWINDOW)
end
when 9011.chat."Schimbare ZI/NOAPTE" with
pc.is_married() and
marriage.in_my_wedding() begin
marriage.wedding_dark(true)
setskin(NOWINDOW)
end
when 9011.chat."Ninsoare" with pc.is_married() and marriage.in_my_wedding() begin
marriage.wedding_snow(true)
setskin(NOWINDOW)
end
when 9011.chat."Opreste Nunta" with pc.is_married() and marriage.in_my_wedding() begin
if not npc.lock() then
say("Organizator Nunta:")
say("Vrei sa inchei nunta acum?")
say("")
return
end
say("Organizator Nunta:")
say("Doreste sa inchei nunta acum?")
say("")
local s = select("Da","Nu")
if s == 1 then
local u_vid = marriage.find_married_vid()
if u_vid == 0 then
say("Pentru a se incheia nunta")
say("trebuie sa fie de acord si partenerul tau.")
say("")
say("")
say("")
npc.unlock()
return
end
say("Organizator Nunta:")
say("Pentru a se incheia nunta")
say("trebuie sa fie de acord si partenerul tau.")
say("Eu astept raspunsul...")
say("")
local ok_sign = confirm(u_vid, "Vrei sa incheie nunta?", 30)
if ok_sign == CONFIRM_OK then
marriage.end_wedding() -- ??? ???? ??? ??.
else
say("Organizator Nunta:")
say("Partenerul nu este de acord.")
say("")
end
end
npc.unlock()
end
-- ??? ???? ???? ??? ??
when 11000.chat."Divort" or
11002.chat." Divort" or
11004.chat." Divort" with pc.is_married() begin
if not marriage_manage.check_divorce_time() then
return
end
local u_vid = marriage.find_married_vid()
if u_vid == 0 or not npc.is_near_vid(u_vid, 10) then
say("Gardian:")
say("Divortul este o chestiune foarte grava!")
say("Daca vrei sa divortezi,")
say("Trebuie sa fie si partenerul de acord.")
say("")
return
end
say("Gardian:")
say("Divortul te va costa 500.000 Yang.")
say("")
say("")
say("Vrei sa organizezi divortul?")
say("")
local MONEY_NEED_FOR_ONE = 500000
local s = select("Da", "Nu")
if s == 1 then
local m_enough_money = pc.gold > MONEY_NEED_FOR_ONE
local m_have_ring = pc.countitem(70302) > 0
local old = pc.select(u_vid)
local u_enough_money = pc.gold > MONEY_NEED_FOR_ONE
local u_have_ring = pc.countitem(70302) > 0
pc.select(old)
if not m_have_ring then
say("Trebuie sa aduci inelul de nunta.")
return;
end
if not u_have_ring then
say("Si partenerul de nunta")
say("Trebuie sa aduca inelul.")
return;
end
if not m_enough_money then
say("Gardian:")
say("Nu ai suficienti Yang pentru divort.")
say("")
say_reward(string.format("Costurile divortului %dvon", MONEY_NEED_FOR_ONE/10000))
say("")
return;
end
if not u_enough_money then
say("Gardian:")
say("Partenerul nu are suficienti Yang.")
say("")
say_reward("Pentru a putea divorta")
say_reward("Ambele persoane trebuie sa aibe 500.000 Yang.")
say("")
return;
end
say("Divortul este foarte dureros")
say("")
say("Vreti sa va distrugeti viitorul?")
say("")
say("Serios? Iti doresti cu adevarat sa divortezi?")
say("")
local c=select("Da", "Nu")
if 2 == c then
say_pc_name()
say("Vreau sa divortez pentru ca")
say("aceasta este decizia mea.")
say("")
wait()
say("Gardian:")
say("Asa sa fie...")
say("Sunteti 2 persoane care nu aveti nimic in comun")
say("")
say("")
say_reward("Voi incheia casatoria cu un divort.")
say("")
return
end
local ok_sign = confirm(u_vid, pc.name.." vrei sa divortezi?", 30)
if ok_sign == CONFIRM_OK then
local m_enough_money = pc.gold > MONEY_NEED_FOR_ONE
local m_have_ring = pc.countitem(70302) > 0
local old = pc.select(u_vid)
local u_enough_money = pc.gold > MONEY_NEED_FOR_ONE
local u_have_ring = pc.countitem(70302) > 0
pc.select(old)
if m_have_ring and m_enough_money and u_have_ring and u_enough_money then
pc.removeitem(70302, 1)
pc.change_money(-MONEY_NEED_FOR_ONE)
local old = pc.select(u_vid)
pc.removeitem(70302, 1)
pc.change_money(-MONEY_NEED_FOR_ONE)
pc.select(old)
say("Gardian:")
say("Divortul a fost un succes.")
say("Acum sunteti 2 persoane care nu mai aveti nimic in comun,")
say("")
say("")
say_reward("Divortul a fost finalizat cu succes!")
say("")
marriage.remove()
else
say("Gardian:")
say("A avut loc o eroare.")
say("Divortul nu a putut fi terminat.")
say("Te rog revina mai tarziu.")
say("")
say_reward("Divortul nu a reusit.")
say("")
end
else
say("Gardian:")
say("Partenerul nu este de acord.")
say("Reveniti la mine cand sunteti")
say("de acord amandoi.")
say("")
say_reward("Divortul a fost abandonat.")
say("")
end
end
end
when 11000.chat."Inel de Nunta" or
11002.chat." Inel de Nunta" or
11004.chat." Inel de Nunta" with
not pc.is_married() and
pc.count_item(70302)>0
begin
say("Gardian:")
say("Iti voi sterge amintirile rele")
say("cu partenerul.")
say("")
say_reward("Verigheta a fost eliminata cu succes.")
pc.remove_item(70302)
end
when 11000.chat." Consecintele Divortului" or
11002.chat." Consecintele Divortului" or
11004.chat." Consecintele Divortului" with pc.is_married() begin
if not marriage_manage.check_divorce_time() then
return
end
say("Gardian:")
say("Divortul te va costa 1.000.000 Yang.")
say("Vrei sa dai suma asta?")
say("")
local s = select("Da", "Nu.")
local NEED_MONEY = 1000000
if s == 2 then
return
end
if pc.money < NEED_MONEY then
say("Gardian:")
say("Nu ai suficienti Yang pentru Divort.")
say("")
say("")
say("")
return
end
say("Gardian:")
say("Chiar vrei sa divortezi?")
say("Sa uiti de toate clipele fericite alaturi de partener?")
local c = select("Da!", "Nu.")
if c == 2 then
say("Gardian:")
say("Asta este decizia voastra si eu o respect")
say("")
say("Bucurati-va de viata")
say("")
say_reward("Divortul a fost anulat")
say("")
return
end
pc.removeitem(70302, 1)
pc.change_gold(-NEED_MONEY)
marriage.remove()
say("Gardian:")
say("Pentru ca nu va intelegiati bine")
say("")
say("Acum esti divortat")
say("")
say_reward("Divortul a fost reusit")
say("")
end
-- ??? ?? ??
when 9006.chat."Lista de nunti" with not pc.is_engaged() begin
local t = marriage.get_wedding_list()
if table.getn(t) == 0 then
say("In acest moment nu exista nunti.")
say("")
else
-- chat(table.getn(t))
local wedding_names = {}
table.foreachi(t, function(n, p) wedding_names[n] = p[3].."und "..p[4].." Hochzeit" end)
wedding_names[table.getn(t)+1] = locale.confirm
local s = select_table(wedding_names)
if s != table.getn(wedding_names) then
marriage.join_wedding(t[s][1], t[s][2])
end
end
end
when 9011.click with not pc.is_engaged() and not pc.is_married() begin
say("Organizator Nunta:")
say("Va aflati azi aici,")
say("pentru a va uni sufletele")
say("si a trai fericiti pana la")
say("Adanciii Batraneti.")
say("")
end
function check_divorce_time()
local DIVORCE_LIMIT_TIME = 86400
if is_test_server() then
DIVORCE_LIMIT_TIME = 60
end
if marriage.get_married_time() < DIVORCE_LIMIT_TIME then
say("Gardianul Nuntii:")
say("Astazi este sarbatoare!!!")
say("Toata lumea este aici!")
say("")
return false
end
return true
end
-- ?? ??? ?? ???? ??? ??
-- ?? ?? : pc.is_engaged_or_married()
function is_equip_wedding_dress()
local a = pc.get_armor()
return a >= 11901 and a <= 11904
end
function get_wedding_dress(pc_job)
if 0==pc_job then
return 11901
elseif 1==pc_job then
return 11903
elseif 2==pc_job then
return 11902
elseif 3==pc_job then
return 11904
else
return 0;
end
end
end
end*Poze / Video (obligatoriu):
Conținut: Ascuns
Reacționează 
la acest mesaj și conținutul se va afișa automat.
la acest mesaj și conținutul se va afișa automat.Conținut: Ascuns
Reacționează la acest mesaj și conținutul se va afișa automat.
la acest mesaj și conținutul se va afișa automat.Conținut: Ascuns
Reacționează la acest mesaj și conținutul se va afișa automat.
la acest mesaj și conținutul se va afișa automat.*Date (mysql/vdi/ingame):
Parola MySQL:
Code:
h4m2tol
