dLRuss scrie:*Problemă:Nevoie Questuri
Tipologie server(PvM / PvP):
*Resursă folosită: *Link exclusiv J4M*
*ServerFiles utilizat:Cel de la Spyke
*Syserr:
Poză:
*Detalii suplimentare:As avea nevoie de toate questurile npc pet inel teleport anti xp(am incercat unele dar nu merg)

quest warpring begin
state start begin
when 70007.use begin
local x
local y
local t
local e = pc.get_empire()
say_title("Teleporter:")
say("Încotro vrei sã mergi strãine?")
local s = select("Map1", "Map2", "Valea Orcilor", "Deºert", "Sohan", "Tara de foc", "Urmãtoarele", "Închide")
if s==7 then
say_title("Teleporter:")
say("Încotro vrei sã mergi strãine?")
local p = select("Turnul Demonilor", "V1", "Pãdurea Fantomelor", "Pãdurea Roºie", "Tara Gigantilor", "Grota Exilului", "Închide")
if p==1 then
x="590400"
y="110500"
elseif p==2 then
x="91900"
y="525400"
elseif p==3 then
x="289000"
y="5800"
elseif p==4 then
say_title("Teleporter")
say("Încotro vrei sã mergi strãine?")
t = select("Început", "Sfârºit", "Închide")
if t==1 then
x="1119900"
y="70800"
elseif t==2 then
x="1119200"
y="7000"
end
elseif p==5 then
x="828100"
y="763400"
elseif p==6 then
x="284200"
y="809600"
end
elseif s==1 then
say_title("Teleporter")
say("Încotro vrei sã mergi strãine?")
t = select("Regatul Roºu", "Regatul Galben", "Regatul Albastru","Închide")
if t==1 then
x="473900"
y="954600"
elseif t==2 then
x="63200"
y="166700"
elseif t==3 then
x="959600"
y="269700"
end
elseif s==2 then
say_title("Teleporter:")
say("Încotro vrei sã mergi strãine?")
t = select("Regatul Roºu", "Regatul Galben", "Regatul Albastru", "Închide")
if t==1 then
x="352300"
y="882700"
elseif t==2 then
x="145700"
y="239800"
elseif t==3 then
x="863800"
y="246000"
end
elseif s==3 then
say_title("Teleporter:")
say("Încotro vrei sã mergi strãine?")
t = select("Început", "Centru", "Arahani", "Închide")
if t==1 then
if e==1 then
x="402100"
y="673900"
elseif e==2 then
x="270400"
y="739900"
elseif e==3 then
x="321300"
y="808000"
end
elseif t==2 then
x="332700"
y="745600"
elseif t==3 then
x="282800"
y="792800"
end
elseif s==4 then
say_title("Teleporter:")
say("Încotro vrei sã mergi strãine?")
t = select("Inceput", "Sfârºit", "Închide")
if t==1 then
if e==1 then
x="217800"
y="627200"
elseif e==2 then
x="221900"
y="502700"
elseif e==3 then
x="344000"
y="502500"
end
elseif t==2 then
x="296300"
y="547500"
end
elseif s==5 then
say_title("Teleporter")
say("Încotro vrei sã mergi strãine?")
t = select("Început", "Mijloc", "Închide")
if t==1 then
if e==1 then
x="434200"
y="290600"
elseif e==2 then
x="375200"
y="174900"
elseif e==3 then
x="491800"
y="173600"
end
elseif t==2 then
x="436200"
y="215300"
end
elseif s==6 then
say_title("Teleporter:")
say("Încotro vrei sã mergi strãine?")
t = select("Început", "Închide")
if t==1 then
if e==1 then
x="599400"
y="756300"
elseif e==2 then
x="597800"
y="622200"
elseif e==3 then
x="730700"
y="689800"
end
elseif t==2 then
return
end
end
if s!=8 or p!= 7 then
pc.warp(x, y)
end
end
end
end

quest pet_system begin
state start begin
function get_pet_info(itemVnum)
pet_info_map = {
-- [ITEM VNUM] MOB_VNUM, DEFAULT NAME, buff_idx, spawn_effect_idx
[53001] = { 34001, "'s Phoenix de foc", 0},
[53002] = { 34002, "'s Pui de ren", 0},
[53003] = { 34003, "'s Pheonix de gheata", 0},
[53004] = { 34001, "'s Feuer Phoenix", 0},
[53005] = { 34004, "'s Baby Azrael", 1},
[53006] = { 34009, "'s Golden Gahnasel", 1},
[53007] = { 34010, "'s Bambi", 0},
[53008] = { 34011, "'s Knuud", 0},
[53009] = { 34012, "'s Bao Bao", 0},
[53010] = { 34008, "'s Leonidas", 0},
[53011] = { 34007, "'s Khan", 0},
[53012] = { 34005, "´s Porky", 0},
[53013] = { 34006, "´s Rufus", 0},
[53014] = { 34031, "´s Mini Executor", 0},
[53015] = { 34014, "´s Mini Executor Aur", 0},
[53016] = { 34015, "´s Micutul Amigo", 0},
[53017] = { 34016, "´s Phoenix de Jade", 0},
[53021] = { 34013, "´s Rufus Negru", 0},
[53022] = { 34033, "´s Rufus Aur", 0},
[53023] = { 34032, "´s Rufus Polar", 0},
[53024] = { 34030, "´s Rufus Albastru", 0},
[55701] = { 55701, "´s Pui de Maimuta", 0},
[55702] = { 55702, "´s Pui de Paianjen", 0},
[55703] = { 55703, "´s Pui de Razador", 0},
[55704] = { 55704, "´s Pui de Nemere", 0},
}

itemVnum = tonumber(itemVnum)

return pet_info_map[itemVnum]
end
function get_spawn_effect_file(idx)
effect_table = {
[0] = nil,
[1] = "d:\\\\ymir work\\\\effect\\\\etc\\\\appear_die\\\\npc2_appear.mse",
}
return effect_table [idx]
end
when 53001.use or
53002.use or
53003.use or
53004.use or
53005.use or
53006.use or
53007.use or
53008.use or
53009.use or
53010.use or
53011.use or
53012.use or
53013.use or
53014.use or
53015.use or
53016.use or
53017.use or
53021.use or
53022.use or
53023.use or
53024.use or
53025.use or
53026.use or
53027.use or
53028.use or
53029.use or
53030.use or
53031.use or
53032.use or
53033.use or
53034.use or
53035.use or
53036.use or
53080.use or
53081.use or
53082.use or
53083.use or
53224.use or
55701.use or
55702.use or
55703.use or
55704.use or
53225.use begin
local pet_info = pet_system.get_pet_info(item.vnum)

if null != pet_info then

local mobVnum = pet_info[1]
local petName = pet_info[2]
local spawn_effect_file_name = pet_system.get_spawn_effect_file(pet_info[3])

if true == pet.is_summon(mobVnum) then
if spawn_effect_file_name != nil then
pet.spawn_effect (mobVnum, spawn_effect_file_name)
end
pet.unsummon(mobVnum)
else
if pet.count_summoned() < 1 then
pet.summon(mobVnum, petName, false)
else
syschat("You already summoned a pet.")
end
if spawn_effect_file_name != nil then
pet.spawn_effect (mobVnum, spawn_effect_file_name)
end
end -- if pet.is_summon
end -- if null != pet_info
end -- when
end -- state
end -- quest

quest anti_exp begin
state start begin
when 40004.use begin
if pc.getqf("antiexp") == 0 then
pc.setqf("antiexp", 1)
chat("Inelul anti experienta este activat. Punctele dvs. de experienta sunt setate la 0 la fiecare 3 secunde.")
local ep = pc.get_exp()
pc.give_exp2(-ep)
timer("erfahrung", 3)
elseif pc.getqf("antiexp") == 1 then
pc.setqf("antiexp", 0)
chat("Anti experienta dezactivat. Distractie placuta!")
end
end

when erfahrung.timer with pc.getqf("antiexp") == 1 begin
local ep = pc.get_exp()
pc.give_exp2(-ep)
timer("erfahrung1", 3)
pc.setqf("antiexp", 1)
end

when erfahrung1.timer with pc.getqf("antiexp") == 1 begin
local ep = pc.get_exp()
pc.give_exp2(-ep)
timer("erfahrung", 3)
pc.setqf("antiexp", 1)
end
end
end