Sziasztok!
Mivel elég sok questes téma nyílik így az ezekhez tartozó megoldások is mind nehezen, körülményesen találhatók meg így pedig újabb és újabb témák nyílnak olyan problémákkal amikre rosszabb esetben is egy, jobb esetben több megoldás is megtalálható itt a fórumon. Kellet valami megoldás ami valamiféle rendszert hoz az idézőjeles káoszba és minden információ egy helyen elérhető így elkészült ez a téma [VIP]P3NG3R (http://metin2hungary.net/index.php?action=profile;u=15513) javaslatára! Szóval innentől bármiféle questtel kapcsolatos kérést, kérdést ide írd hozzászólás formájában! Illetve mielőtt újabb hozzászólást írnál tanácsos átnézni a témát!
Szabályok:
A fórum általános szabályai vonatkoznak a témára! (tilos a dupla poszt, a bumpolás, az off hozzászólások stb.)
Valaki nem segtene véletlen egy olyan questben mint pl az ox-e uriel és névtelen virág...
Nos az ox questjét probáltam átalakitani de sehogysem ment nekem az ilyen kérdés betöltés stbb...
Lényege hasonlitson az ox-ra De a felépitése ne legyen ilyen kérdés stb betötlés....
Elnézést a hibákért sietem az irásal.
Sziasztok!
Valaki küldene nekem egy működő questet, ami az illetőt egy egyszemélyes pályára küldi?
Tegyük fel VZ-s sárkány run helyett x-y belépőért egyedül a kristályterembe dobja ahol csak a sárkány van
quest party_run begin
state start begin
when NPCID.chat."Party RUN" begin
say_title(""..mob_name(NPCID)..": ")
say( "Üdvözöllek "..pc.get_name().."! " )
say( "Be szeretnél lépni a Party RUN-ba?" )
local p = select("Igen", "Nem")
if p == 1 then
pc.warp(x, y) --a run előszobája, ezután lehet party-t ellenőriztetni
elseif P == 2 then
return
end
end
when login with pc.get_map_index() == Y begin -- Y = mapindex száma(előszobáé)
mob_spawn(MOBID, x, y) --mobidézés
end
when MOBID.kill begin
game.drop_item_with_ownership(ITEMID, 1)
end
when NPCID.take with item.vnum == ITEMID begin --tárgyat ráhúzod az npc-re, akkor portol tovább
if party.is_party() or pc.is_gm() then
d.join(X) --innentől dungeon a map(feldob az igazi dungeon mapra) X = mapindex
pc.remove_item(ITEMID, 1) --ráhúzott tárgy eltüntetése
d.set_regen_file("data/dungeon/MAP/regen.txt") --mobok lerakása (MAP = általad megadott map név mappája dungeon mappán belül)
else
say( "Te nem vagy csoportba, csoport nélkül[ENTER]nem mehetsz tovább!")
return
end
end
when login with pc.in_dungeon() and pc.get_map_index() >= X0000 and pc.get_map_index() < (X+1)0000 begin --zárójelet töröld!!
d.notice("10 perc áll a rendelkezésedre!")
timer("alap",300) --5perc mert 60*5 = 300sec
end
when alap.timer with pc.in_dungeon() and pc.get_map_index() >= X0000 and pc.get_map_index() < (X+1)0000 begin
d.notice("5 perced maradt!")
timer("alap2",300) -- plusz 5perc és kijön a 2*5 perc = 10 perc
end
when alap2.timer with pc.in_dungeon() and pc.get_map_index() >= X0000 and pc.get_map_index() < (X+1)0000 begin
d.notice("Lejárt az időd!")
warp_to_village();
end
end
end
Szerk: Új questet csinálok.
Sziasztok! Ebbe a questbe szeretném valahogy beletuszoklni azt hogy 5. halál után kidobja az illetőt a map1-re. Ebben kellene némi segítség.
Itt a quest :
quest birwar begin
state start begin
when 20020.chat."Birodalmi harc(GM)" with pc.is_gm() begin
say_title("Áruló Balso: ")
say("")
local s = select("Megnyitom", "Lezárom", "Csak belépek", "Mégse")
if s == 4 then
return
elseif s == 3 then
pc.warp(40000, 65000)
elseif s == 1 then
if game.get_event_flag("birodalomharc1") == 0 then
game.set_event_flag("birodalomharc1", 1)
notice_all("Birodalmi harc elkezdődött!")
notice_all("Keressétek Áruló Balsot!")
else
say_title("Áruló Balso: ")
say("")
say("Jelenleg megvan már nyitva.")
return
end
else
if game.get_event_flag("birodalomharc1") == 1 then
game.set_event_flag("birodalomharc1", 0)
notice_all("Birodalmi harc belépés lezárva.")
else
say_title("Áruló Balso: ")
say("")
say("Jelenleg le van már zárva.")
return
end
end
end
when 20020.chat."Birodalmi harc" begin
if game.get_event_flag("birodalomharc1") == 1 then
say_title("Áruló Balso: ")
say("")
say("Üdvözöllek kalandor.")
say("Én elviszlek a Birodalmi harcre.")
say("Biztosan beszeretnél lépni?")
local s = select("Igen", "Nem")
if s == 2 then
return
else
pc.warp(40000, 65000)
end
else
say_title("Áruló Balso: ")
say("")
say("A mapra jelenleg nem mehetsz be.")
end
end
end
end
Szerintem rakd be a dead funkciót forrásba úgy könnyebben tudod ellenőriztetni a halált.
Vagy a VZ-ben találsz ilyen fajta questet.
Talán arena_manager.quest a neve és penger fajta.
Szia ! Az arena manager amit javasoltál az nem az a rendszer amit én keresek szerintem mivel ott 3 párpjaból az nyer akinek több van tudtommal. Esetleg még olyan másik eshetőség lenne hogy nem 5. halál után hanem csak egy egyszerű számláló birodalmanként, mint GF szerveren a birodalmi waron (pl. Shinso birodalom 1/Jinno birodalom 4/Chunjo birodalom 10 játékost ölt meg.)
Sziasztok!
Mi okozhatja azt a hibát, hogy ha a quest végén szintet lépek, nem tölti be az új questet, de ha mobokból vagy /level paranccsal lépek szintet, egyből betölti őket? Egy relog után "jönnek be" a questek normál esetben.
/Természetesen a questben így van írja: when login or levelup with... stbstb/
Valaki tudna megoldást?
- Ha questtel lépek szintet, csak akkor nem működik.
Készítettem egy exp italt is próbaképpen, ha azzal lépek szintet, akkor ugyanúgy nem tölti be,
csak relog után.
Vz fájlok
Sziasztok! Egy üdvözlő questet szeretnék írni(give_basic_weapon), de a jó Istenért sem szeretne működni.
A letter megvan, rákattintok, és nem történik lóf*sz sem.
Próbáltam már letter nélkül is, de a wait() nem szeretne működni, ergo a wait() előtti részt kiírja, aztán rámegyek a továbbra, és bezárja a questablakot. Szükségem van a wait()-ra mindenképp, mivel kicsit hosszabb szöveget szeretnék kiíratni.
Itt a quest:
quest give_basic_weapon begin
state start begin
when letter begin
send_letter("Üdvözöllek a szerveren! ")
end
when button or info begin
say_title("Igen ")
say("")
wait()
say_title("Nem ")
say("")
pc.give_item2(50187,1 )
set_state(__COMPLETE__)
end
end
state __COMPLETE__ begin
end
end
syserr:
SYSERR: May 22 14:42:10.17798 :: GetQuestNameByIndex: cannot find quest name by index 0
SYSERR: May 22 14:42:10.17827 :: OnInfo: QUEST no info event (quest )
Ööötlet? Már szívf*aszt kapok komolyan.
Hát ilyet még nem b*sztam, resiztem a szervert, és jó lett. Megyek, felakasztom magam.
Ha beraksz egy questet, amiben szerepel tekercs is, akkor a megfelelő működés érdekében feltétlen újra kell indítani a szervert. Ezután már gond nélkül lehet szerkesztgetni.
Idézetet írta: Rin the Exorcist Dátum 2016-05-22, 17:39:54
Ha beraksz egy questet, amiben szerepel tekercs is, akkor a megfelelő működés érdekében feltétlen újra kell indítani a szervert. Ezután már gond nélkül lehet szerkesztgetni.
Nem akarok offolni, de mi a tökömért kell újraindítani?
Meg kiszedtem egy csomó questet ugye, és újraindítás előtt olyan questekre dobott hibát, amiket kiszedtem, egyáltalán nem voltak bent.
Pl.:
SYSERR: May 22 14:41:53.677435 :: GetQuestStateIndex: QUEST wrong quest state file knut_shop_box.zone_enter
SYSERR: May 22 14:41:53.677483 :: GetQuestStateIndex: QUEST wrong quest state file knut_shop_box.zone_enter
SYSERR: May 22 14:41:53.677586 :: GetQuestStateIndex: QUEST wrong quest state file assassin_shop_box.information
SYSERR: May 22 14:41:53.677618 :: GetQuestStateIndex: QUEST wrong quest state file assassin_shop_box.information
Ez mi? Ezt miért kell ymir? Miért? Persze resi után ez is megjavult.
Nem tudom, nem igazán érdekelt a hiba. De van egy olyan érzésem, hogy ha Bélát megkéred, akkor ezt a hibát is orvosolja. :D
Hali ha valakinek lenne kedve írni egy olyan questet ami tartalmazná ezeket
EXP adás
Rang adás
Yang adás
P skil :)
THX
Kere.. Józan paraszti... Hagyjuk....
Idézetet írta: Rin the Exorcist Dátum 2016-05-29, 19:56:04
Kere.. Józan paraszti... Hagyjuk....
Tudom.. Nagyképű....nyomi....balf*sz vagy :D
Kor:31
Ez mindent elmond a színvonaladról.
Valaki rájött már, hogy a Sárkány ruletten hogyan lehet korlátozni a mobokat amik, az exp adják bele?
Erre gondolsz?
function drag_roulette_CONFIG(c)
local POINTS_FOR_SPHERE = 6 -- ide írod be mennyi mob ölés 1 körhöz
local MAX_SPHERE_COUNT = 8 -- 8 kör
Nekem olyan kellene, hogy pl csak a 2493 és a 2291-es mob adna bele exp-t(két sárkány).
Idézetet írta: Local Dátum 2016-05-29, 19:54:44
Hali ha valakinek lenne kedve írni egy olyan questet ami tartalmazná ezeket
EXP adás
Rang adás
Yang adás
P skil :)
THX
Mire is gondolsz pontosan?
GM tudja adni vagy egy npc adja a playernek?
Sziasztok !
Adott egy quest :
[spoiler]-- by Kilroy.
quest cqbGAOCMRqkw begin
state start begin
when login begin
cmdchat("WARPSYSTEM index/"..q.getcurrentquestindex())
end
when button begin
cmdchat("getinputbegin")
local INPUT = tonumber(input(cmdchat("WARPSYSTEM input/")))+1
cmdchat("getinputend")
local warp_koords = {
{39900, 15399200}, -- applies to the first entry Client Side
{1177600, 1664000}, -- applies to the second entry Client Side
{1126400, 1510400}, -- applies to the third entry Client Side
{1049600, 1510400},
{1024000, 1664000}
}
if warp_koords[INPUT]==nil then syschat("There has been an error. Please try again later!") return end
pc.warp(warp_koords[INPUT][1], warp_koords[INPUT][2])
end
end
end[/spoiler]
Ebben szeretném megoldani azt, hogy például,ennél a kordinátánál : 1177600, 1664000 pl Lv 90-es legyen a szintkorlát.Tudna valaki esetleg segíteni,vagy elindulni e felé ? :)
Idézetet írta: DolChe Dátum 2016-06-09, 15:03:02
Sziasztok !
Adott egy quest :
[spoiler]-- by Kilroy.
quest cqbGAOCMRqkw begin
state start begin
when login begin
cmdchat("WARPSYSTEM index/"..q.getcurrentquestindex())
end
when button begin
cmdchat("getinputbegin")
local INPUT = tonumber(input(cmdchat("WARPSYSTEM input/")))+1
cmdchat("getinputend")
local warp_koords = {
{39900, 15399200}, -- applies to the first entry Client Side
{1177600, 1664000}, -- applies to the second entry Client Side
{1126400, 1510400}, -- applies to the third entry Client Side
{1049600, 1510400},
{1024000, 1664000}
}
if warp_koords[INPUT]==nil then syschat("There has been an error. Please try again later!") return end
pc.warp(warp_koords[INPUT][1], warp_koords[INPUT][2])
end
end
end
[/spoiler]
Ebben szeretném megoldani azt, hogy például,ennél a kordinátánál : 1177600, 1664000 pl Lv 90-es legyen a szintkorlát.Tudna valaki esetleg segíteni,vagy elindulni e felé ? :)
Szerintem egy if statementtel meg lehet oldani de nem vagyok 100% biztos benne picit kesobb vissza nezek ra amint raerek ha addigra nem oldajak meg :)
Idézetet írta: Presator Dátum 2016-06-09, 13:21:00
Idézetet írta: Local Dátum 2016-05-29, 19:54:44
Hali ha valakinek lenne kedve írni egy olyan questet ami tartalmazná ezeket
EXP adás
Rang adás
Yang adás
P skil :)
THX
Mire is gondolsz pontosan?
GM tudja adni vagy egy npc adja a playernek?
Szia! ez nekem is jöl jönne
Idézetet írta: Wwpolo Dátum 2016-06-11, 19:23:00
Idézetet írta: Presator Dátum 2016-06-09, 13:21:00
Idézetet írta: Local Dátum 2016-05-29, 19:54:44
Hali ha valakinek lenne kedve írni egy olyan questet ami tartalmazná ezeket
EXP adás
Rang adás
Yang adás
P skil :)
THX
Mire is gondolsz pontosan?
GM tudja adni vagy egy npc adja a playernek?
Szia! ez nekem is jöl jönne
De meg mindig nem jott valasz, hogy npc vagy GM adja?
npc
Idézetet írta: Wwpolo Dátum 2016-06-11, 20:09:46
npc
quest szintandskill begin
state start begin
when NPCID.chat."Szint" begin
pc.give_exp2(exp mennyisege)
end
--[[Itt er veget az expt ado quest]]
when NPCID.chat."P skill"
if pc.get_race = 0 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)
elseif pc.get_race = 1 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)
elseif pc.get_race = 2 then
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.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)
elseif pc.get_ = 3 race then
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.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)
else
return
end
end
end
end
end
end
Ha valami nem lenne jo akkor irj es javitom nem teszteltem csak osszeirtam
Idézetet írta: Presator Dátum 2016-06-11, 20:44:05
Idézetet írta: Wwpolo Dátum 2016-06-11, 20:09:46
npc
quest szintandskill begin
state start begin
when NPCID.chat."Szint" begin
pc.give_exp2(exp mennyisege)
end
--[[Itt er veget az expt ado quest]]
when NPCID.chat."P skill"
if pc.get_race = 0 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)
elseif pc.get_race = 1 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)
elseif pc.get_race = 2 then
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.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)
elseif pc.get_ = 3 race then
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.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)
else
return
end
end
end
end
end
end
Ha valami nem lenne jo akkor irj es javitom nem teszteltem csak osszeirtam
ezzel nem lesz itt baj:
elseif pc.get_ = 3 race then
?
illetve:
when NPCID.chat."P skill"
?
Idézetet írta: T0gy3R Dátum 2016-06-11, 21:21:34
Idézetet írta: Presator Dátum 2016-06-11, 20:44:05
Idézetet írta: Wwpolo Dátum 2016-06-11, 20:09:46
npc
quest szintandskill begin
state start begin
when NPCID.chat."Szint" begin
pc.give_exp2(exp mennyisege)
end
--[[Itt er veget az expt ado quest]]
when NPCID.chat."P skill"
if pc.get_race = 0 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)
elseif pc.get_race = 1 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)
elseif pc.get_race = 2 then
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.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)
elseif pc.get_ = 3 race then
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.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)
else
return
end
end
end
end
end
end
Ha valami nem lenne jo akkor irj es javitom nem teszteltem csak osszeirtam
ezzel nem lesz itt baj:elseif pc.get_ = 3 race then
?
illetve:when NPCID.chat."P skill"
?
Hoppa nem figyeltem :D
Javitva koszi, hogy szoltal
quest szintandskill begin
state start begin
when NPCID.chat."Szint" begin
pc.give_exp2(exp mennyisege)
end
--[[Itt er veget az expt ado quest]]
when NPCID.chat."P skill" begin
if pc.get_race = 0 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)
elseif pc.get_race = 1 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)
elseif pc.get_race = 2 then
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.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)
elseif pc.get_race = 3 race then
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.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)
else
return
end
end
end
end
end
end
Ez:elseif pc.get_race = 3 race then
még mindig nem :DD
(igazán nincs mit :) )
Idézetet írta: T0gy3R Dátum 2016-06-11, 21:34:36
Ez:elseif pc.get_race = 3 race then
még mindig nem :DD
(igazán nincs mit :) )
De tenyleg xD
Lehet nem buszon ulve kene irnom az ilyeneket :D
quest szintandskill begin
state start begin
when NPCID.chat."Szint" begin
pc.give_exp2(exp mennyisege)
end
--[[Itt er veget az expt ado quest]]
when NPCID.chat."P skill" begin
if pc.get_race = 0 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)
elseif pc.get_race = 1 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)
elseif pc.get_race = 2 then
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.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)
elseif pc.get_race = 3 then
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.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)
else
return
end
end
end
end
end
end
Melllik az a quest funkció amelyik egy adott tárgyból az összeset eltávolítja a leltárból? Ha 7777777777777777777 darab van akkor mindet kipusztítja?
[spoiler]Pls[/spoiler]
Idézetet írta: вυɢ™ Dátum 2016-11-03, 20:25:56
Melllik az a quest funkció amelyik egy adott tárgyból az összeset eltávolítja a leltárból? Ha 7777777777777777777 darab van akkor mindet kipusztítja?
[spoiler]Pls[/spoiler]
DELETE FROM player.item WHERE vnum = "TÁRGY ID";
function item_delete_all(x)
if item.get_count(x) > 1 then
item.remove(x, 1000000)
end
end
item_delete_all(ID)
function item_delete_asd(x)
mysql_query("DELETE FROM player.item WHERE vnum = "..x.."")
end
item_delete_asd(ID)
Nem bittos' h megy-e a cucc csak próbaképp írtam' ::)
pc.remove_item("tárgyid", 10000)
Megoldotta :'( ;D
Tenksz bakura az ötletért és a próbálkozásért külön!
Idézetet írta: DolChe Dátum 2016-06-09, 15:03:02
Sziasztok !
Adott egy quest :
[spoiler]-- by Kilroy.
quest cqbGAOCMRqkw begin
state start begin
when login begin
cmdchat("WARPSYSTEM index/"..q.getcurrentquestindex())
end
when button begin
cmdchat("getinputbegin")
local INPUT = tonumber(input(cmdchat("WARPSYSTEM input/")))+1
cmdchat("getinputend")
local warp_koords = {
{39900, 15399200}, -- applies to the first entry Client Side
{1177600, 1664000}, -- applies to the second entry Client Side
{1126400, 1510400}, -- applies to the third entry Client Side
{1049600, 1510400},
{1024000, 1664000}
}
if warp_koords[INPUT]==nil then syschat("There has been an error. Please try again later!") return end
pc.warp(warp_koords[INPUT][1], warp_koords[INPUT][2])
end
end
end[/spoiler]
Ebben szeretném megoldani azt, hogy például,ennél a kordinátánál : 1177600, 1664000 pl Lv 90-es legyen a szintkorlát.Tudna valaki esetleg segíteni,vagy elindulni e felé ? :)
quest at-- by Kilroy.
quest cqbGAOCMRqkw begin
state start begin
when login begin
cmdchat("WARPSYSTEM index/"..q.getcurrentquestindex())
end
when button begin
cmdchat("getinputbegin")
local INPUT = tonumber(input(cmdchat("WARPSYSTEM input/")))+1
cmdchat("getinputend")
local warp_koords = {
{39900, 15399200, 250}, -- applies to the first entry Client Side
{1177600, 1664000, 90}, -- applies to the second entry Client Side
{1126400, 1510400, 250}, -- applies to the third entry Client Side
{1049600, 1510400, 250},
{1024000, 1664000, 250}
}
if warp_koords[INPUT]==nil then syschat("There has been an error. Please try again later!") return end
if pc.get_level() < warp_koords[INPUT][3] then syschat("Túl alacsony a szinted. Limit: "..warp_koords[INPUT][3]) return end
pc.warp(warp_koords[INPUT][1], warp_koords[INPUT][2])
end
end
end
Sziasztok !Csatolnék egy rarban két questet ! Érintetlenek amik eredetileg bent voltak
(Ezt azért említem mert én már 6 órát szenvedtem a szerkesztésükkel és még mindig nem jók szóval az eredetit teszem fel ide.) Lényege és funkciója : Adott map belépsz tárgy fejében 10 perced van bosst ölni (Dungeon)
Amit valójában csinál : Belépek és amint beléptet kiírja hogy az idő lejárt sajnáljuk....és vissza dob az eredeti mapra..
Fontos infók lehetnek :
A dungeon a game99 es mappa configfilejában szerepel map inxként.A map működik mert a beléptető map és a dungeon map ugyan az csak a quest nélkül nincs rajta bossÉrdekesség, hogy amikor belépek egy pillanatra bevillan a kép és ott a boss aztán ki is dob...Remélem valaki rájön mi lehet a baj mert én már nem tudom... több dungeonnál is ugyan ez a baj szóval ha ez megoldódik akkor a többi is. Köszönöm csatolom !
u.i.: Megnéztem most reggel, GM kóddal warpolok a mapra ugyan ez történik. Bossmapra betesz és azonnal ki is visz onnan !!!
pc.getqf("xmas")!=2
a luában a nem egyenlőt így kell írni ~=
és mi ez a gyertya qf? kétszer is ellenőrzi az egyik quest, de egyik sem ad neki értéket
pc.getf("xmas2_boss_enter","gyertya") == 1
talán így:
if rest_time > 0 and pc.getqf("xmas") == 0 and pc.count_item(50134) > 9 and get_time() > pc.getf("xmas2_boss_fight","xmas_boss_timer") then
d.notice("Mérkőz meg a Grinccsel, és győzd le!")
d.notice("Maradék időd: ".. round(rest_time/60, 0) .. " perc!")
if pc.getqf("xmas")==1 then
else
pc.removeitem("50134", 10) -- belépő elvétel
d.spawn_mob(7042, 180, 195) -- hóember
d.spawn_mob(7042, 189, 195) -- hóember
d.spawn_mob(7042, 183, 188) -- hóember
d.spawn_mob(7042, 179, 183) -- hóember
d.spawn_mob(7042, 172, 186) -- hóember
d.spawn_mob(7041, 159, 180) -- Krampusz
pc.setqf("xmas",1)
end
timer("fight_xmas", rest_time)
elseif rest_time > 0 and pc.getqf("xmas")==0 and pc.count_item(40154) > 0 then
Sziasztok. Ez a quest miért nem megY? :/ bárhogy próbálom nem akarja beadni a tekercset se :/
quest feladat1 begin
state start begin
when login or enter or levelup with pc.level >=0 begin
end
set_state(information)
end
state information begin
when letter begin
send_letter("Az első küldetés")
end
when button or info begin
say_title("Az első küldetés:")
say("")
say("Üdvözöllek kalandor! Lenne számodra egy feladatom.")
say("Egy kis erőpróba gyaránt ölj meg nekem:")
say("")
say_reward("5 Vad kutyát.")
set_state(feladat1start)
end
end
state feladat1start begin
when letter begin
send_letter("Ölj meg 5 Vad kutyát.)
q.set_counter("Vad kutya", 5-pc.getqf("kill_count"))
end
when 101.kill begin
pc.setqf("kill_count", pc.getqf("kill_count")+1)
q.set_counter("Vady kutya", 5-pc.getqf("kill_count"))
end
when button or info begin
say_title("Az 1. Feladat.")
say("Igyekezz és pusztíts el 5 Vad kutyát.")
say("Eddig elpusztított vad kutyák: "..pc.getqf("kill_count").."/5")
end
when enter begin
pc.setqf("kill_count", 0)
end
when 101.kill with pc.getqf("kill_count") >= 5 begin
say_title("Az első küldetés:")
say("Sikeresen teljesítetted a feladatod.")
say("Kapsz egy kis jutalmat.")
say("")
if pc.job == 0 then
local s = select("Kard +2","Tőr +2")
if s == 1 then
pc.give_item2(12)
if s == 2 then
pc.give_item2(3002)
elseif pc.job == 1 then
local s = select("Tőr +2","Íj +2")
if s == 1 then
pc.give_item2(1002)
if s == 2 then
pc.give_item2(2002)
elseif pc.job == 2 then
pc.give_item2(12)
elseif pc.job == 3 then
pc.give_item2(7002)
end
set_state(__COMPLETE__)
end
end
state __COMPLETE__ begin
end
end
wait a sec... van ott még valami
say("Sikeresen teljesítetted a feladatod.")
say("Válaszd ki a jutalmad!")
say("")
Sziasztok! Akár hogy is próbálom kivenni az IntetoryDialogot sehogy sem megy :( belépek metin végig tölt és ennyi avagy el inditom a klienst és ki is dob mikor bejelentkeznék. Valaki segítsen legyen olyan kedves ^^ :'( :(
Idézetet írta: hurka97 Dátum 2017-09-12, 00:39:49
Sziasztok! Akár hogy is próbálom kivenni az IntetoryDialogot sehogy sem megy :( belépek metin végig tölt és ennyi avagy el inditom a klienst és ki is dob mikor bejelentkeznék. Valaki segítsen legyen olyan kedves ^^ :'( :(
Ombre rossz téma, te pythonos kérdést tettél fel e.O
Az adott téma meg lua és quest témájú.
Sziasztok.
Magyarosítás közben jött elő egy hiba, abban kérném a segítségeteket hogy javítsam vagy hogy mitől lehet ez a hiba?
https://kephost.com/image/Bz6O (https://kephost.com/image/Bz6O)
Megjegyzés:
Franzi sf-ben jött elő a hiba.
Már próbáltam rá javítást találni de nem találtam.
Előre köszönöm a segítséget.
----------------------------------------------------------
-- Házasság Quest --
-- Magyarosítva by P3NG3R --
----------------------------------------------------------
quest marriage_manage begin
state start begin
when 9006.chat." Házasság " with not pc.is_engaged_or_married() begin
if not npc.lock() then
say("Hello pc.get_name().." ")
say(" Megszeretnél házasodni? ")
return
end
if pc.get_level() < 25 then
say_title(mob_name(9006)..":")
say("Üdvözöllek.")
say("Házasságot csak és kizálólag 25 Szint felett")
say("lehet kötni! Neked még igencsak fejlődnöd kell,")
say("hogy házasodhass!")
say("Remélem megérted..")
say("")
say_reward("Gyere vissza, ha már elérted minimum a 25 Szintet.")
say("")
return
end
local m_ring_num = pc.countitem(70301)
local m_has_ring = m_ring_num > 0
if not m_has_ring then
say_title(mob_name(9006)..":")
say_reward("Neked nincs eljegyzési gyűrűd!")
say("")
say_item("Eljegyzési gyűrű ", 70301, "")
say_reward("Amíg nincs nem kezdhetsz házasságot.")
say("")
return
end
local m_sex = pc.get_sex()
if not marriage_manage.is_equip_wedding_dress() then
say_title(mob_name(9006)..":")
say("Jól látok? Nincs nálad az esküvő ruházatod?!")
say("A nélkül nem engedhetek senkit esküdni!")
say("Talán később...")
say("")
if m_sex==0 then
say_item("Szmoking", marriage_manage.get_wedding_dress(pc.get_job()), "")
say_reward("Nincs rajtad a Szmokingod!")
else
say_item("Menyasszonyi ruha", marriage_manage.get_wedding_dress(pc.get_job()), "")
say_reward("Nincs rajtad a Menyasszonyi ruhád!")
end
say("")
return
end
local NEED_MONEY = 1000000
if pc.get_money() < NEED_MONEY then
say_title(mob_name(9006)..":")
say("Nincs nálad a szükséges fizetség...")
say("És így nincs mibőn finanszírozni az esküvőt!")
say("Be kell szerezzétek de sürgősen!")
say("")
say_reward(string.format("Szükséges Yang: %d Millió.", NEED_MONEY/1000000))
say("")
return
end
say_title(mob_name(9006)..":")
say("Oké, megvan minden, most jöhet a név.")
say("Mi a kedves menyasszony neve?")
say("")
say_reward("Add meg párod nevét:")
local sname = input()
if sname == "" then
say_title(mob_name(9006)..":")
say_reward("Muszáj megadnod egy nevet!")
say("")
return
end
local u_vid = find_pc_by_name(sname)
local m_vid = pc.get_vid()
if u_vid == 0 then
say_title(mob_name(9006)..":")
say_reward("Ez a játékos nem létezik vagy nem elérhető!")
say_reward("Lehet, hogy elírtad a játékos nevét.")
say("")
say_reward(string.format("A megadott név: %s", sname))
say("")
return
end
if not npc.is_near_vid(u_vid, 10) then
say_title(mob_name(9006)..":")
say("Oké, de miért nincs itt?!")
say("Nem vagyok képes így beazonosítani ha nem látom.")
say("Jöjjön ide azonnal!")
say("")
say_reward(string.format("Házassági partner: %s ", sname))
say("")
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.get_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_title(mob_name(9006)..":")
say("Saját magaddal nem köthetsz házasságot")
say("")
say_reward("Idióta-_-")
say("")
return
end
if u_sex == m_sex then
say_title(mob_name(9006)..":")
say_reward("Saját nemeddel való házasságot a törvény büntetni!!!")
say_reward("Hülye b*zi-_-'")
say("")
return
end
if u_married then
say_title(mob_name(9006)..":")
say("A párod már házas?!")
say("Így nem tudtok házasságot kötni!")
say("Bontsa fel az előző házasságát.")
say("")
say_reward(string.format("%s már házasságban van valakivel!", sname))
say("")
return
end
if u_level < 25 then
say_title(mob_name(9006)..":")
say("A párodnak nincs meg a szükséges szintje!")
say("Így nem tudtok házasságot kötni!")
say("")
say_reward("El kell érnie a 25 Szintet legalább!")
say("")
return
end
if m_level - u_level > 15 or u_level - m_level > 15 then
say_title(mob_name(9006)..":")
say("A házastársak közti szint különbsége nem haladhatja")
say("meg a +/- 15 Szintet!.")
say("Ez sajnos szabály..")
say("")
say_reward("Házastársadnak fel kell zárkóznia hozzád 15 Szint[ENTER]különbségig!")
say("")
return
end
if not u_has_ring then
if m_ring_num >= 2 then
say_title(mob_name(9006)..":")
say("Egyikőtöknek hiányzik az eljegyzési gyűrűje!")
say("Szerezzétek be minél előbb!")
else
say_title(mob_name(9006)..":")
say("Egyikőtöknek hiányzik az eljegyzési gyűrűje!")
say("Szerezzétek be minél előbb!")
say("")
end
say_item("Eljegyzési gyűrű ", 70301, "")
say_reward("Az esküvő abbamaradt,")
say_reward("mert nincs meg a két eljegyzési gyűrű!")
say("")
return
end
if not u_wear then
say_title(mob_name(9006)..":")
say("Párod nincs felkészülve.. Nem viseli az esküvői")
say("ruházatát. A folytatáshoz elengedhetetlen!")
say("")
if m_sex==0 then
say_item("Menyasszonyi ruha", 11903, "")
say_reward("Nincs rajta a Menyasszonyi ruhája!")
else
say_item("Szmoking", 11902, "")
say_reward("Nincs rajta a Szmokingja!")
end
say("")
return
end
local ok_sign = confirm(u_vid, "Elfogadod "..pc.get_name().. "-t házastársadul?", 30)
if ok_sign == CONFIRM_OK then
local m_name = pc.get_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_title(mob_name(9006)..":")
say("Rendben van, a gyűrűket megkaptátok.")
say("Kicsit várni kell...")
say("Aztán elviszlek titeket a szerelmesek szigetére,")
say("ahol végbe mehet az esküvőtök.")
say("")
say_reward("Gratulálok nektek!")
say("")
wait()
setskin(NOWINDOW)
marriage.engage_to(u_vid)
end
else
say_title(mob_name(9006)..":")
say("Visszautasították az ajánlatodat!")
say("")
say_reward("Esküvő megszakadt!")
end
say("")
end
when 9006.chat."Házassági HIBA" with pc.is_engaged() begin
say_title(mob_name(9006)..":")
say("Szeretnél házasságot kötni?")
say("Oké odateleportállak.")
say("")
wait()
setskin(NOWINDOW)
marriage.warp_to_my_marriage_map()
end
when 9011.chat."Az eskövő elkezdése" with pc.is_engaged() and marriage.in_my_wedding() begin
if not npc.lock() then
say_title(mob_name(9011)..":")
say("Elkezdjük az esküvőt?")
say("")
return
end
say_title(mob_name(9011)..":")
say("Üdvözöllek.")
say("Az eskövő kezdéséhez szükség lesz a nevek megadására.")
say("Ez csupán szakmai formalitás.")
say("")
local sname = input()
local u_vid = find_pc_by_name(sname)
local m_vid = pc.get_vid()
if u_vid == 0 then
say_title(mob_name(9011)..":")
say("Ne szórakozz...")
say("Helyesen írd be a nevét!")
say("")
say_reward(string.format("Házasság partner: %s ", sname))
say("")
return
end
if not npc.is_near_vid(u_vid, 10) then
say_title(mob_name(9006)..":")
say("Oké, de miért nincs itt?!")
say("Nem vagyok képes így beazonosítani ha nem látom.")
say("Jöjjön ide azonnal!")
say("")
say_reward(string.format("Házasság partner: %s ", sname))
say("")
return
end
if u_vid == m_vid then
say_title(mob_name(9006)..":")
say("Saját magaddal nem köthetsz házasságot")
say("")
say_reward("Idióta-_-")
say("")
return
end
if u_vid != marriage.find_married_vid() then
say_title(mob_name(9011)..":")
say("Oké minden okés.")
say("Miért házasodtok??")
say("")
return
end
local ok_sign = confirm(u_vid, "Elfogadod "..pc.get_name().. "-t házastársadul?", 30)
if ok_sign != CONFIRM_OK then
say_title(mob_name(9011)..":")
say("Oké, Minden szuper!")
say("Házastársakká nyílvánítalak!")
say("")
return
end
say_title(mob_name(9011)..":")
say("Gratulálok!")
say("A házastársak megajándékozták egymást!")
notice_in_map("Sok Boldogságot az ifjú párnak!")
marriage_manage.give_wedding_gift()
old = pc.select(u_vid)
marriage_manage.give_wedding_gift()
pc.select(old)
marriage.set_to_marriage()
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
when 9011.chat."Zene be" 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."Zene ki" 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."Naplemente" with pc.is_married() and marriage.in_my_wedding() begin
marriage.wedding_dark(true)
setskin(NOWINDOW)
end
when 9011.chat."Havazás" with pc.is_married() and marriage.in_my_wedding() begin
marriage.wedding_snow(true)
setskin(NOWINDOW)
end
when 9011.chat."Házasság befejezése" with pc.is_married() and marriage.in_my_wedding() begin
if not npc.lock() then
say_title(mob_name(9011)..":")
say("A házasság szent és sérthetetlen, ne legyetek rosszak )")
say("")
return
end
say_title(mob_name(9011)..":")
say("Szeretnéd befejezni az esküvőt?")
say("")
local s = select("Igen","Nem")
if s == 1 then
local u_vid = marriage.find_married_vid()
if u_vid == 0 then
say_title(mob_name(9011)..":")
say("Az esküvő befejezéséhez mindkét fél beleegyezésére")
say("lesz szükség!")
say_reward("Nem fejezheted be az esküvődet, mert a párod[ENTER]nincs jelen.")
say("")
return
end
say_title(mob_name(9011)..":")
say("Szeretnétek befejezni az esküvőtöket?")
say_reward("Mindkét fél beleegyezése szükséges.")
say("")
local ok_sign = confirm(u_vid, "Befejezitek az esküvőtöket?", 30)
if ok_sign == CONFIRM_OK then
marriage.end_wedding()
else
say_title(mob_name(9011)..":")
say_reward("Úgy döntöttetek, hogy a végéig buliztok :D!")
say("")
end
end
end
when 11000.chat."Válás" or 11002.chat."Válás" or 11004.chat."Válás" 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_title("Őr:")
say("Nincs itt a másik fél!")
say("Így nem tudlak szétválasztani titeket!")
say("Próbáld meg később!")
say("")
return
end
say_title("Őr:")
say("A kölcsönös válás feltételei: Mindkét félnek")
say("fizetnie kell fejenként 500.000 Yangot.")
say("Valóban el akartok válni?")
say("")
local MONEY_NEED_FOR_ONE = 500000
local s = select("Igen", "Nem")
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_reward("A másik félnél nincs meg a gyűrű!")
return
end
if not u_have_ring then
say_reward("Nincs nálad a gyűrű!")
return
end
if not m_enough_money then
say_title("Őr:")
say_reward("A másik félnél nincs meg a szükséges Yang!")
say("")
say_reward(string.format("A másik félnél nincs %s millió Yang!", MONEY_NEED_FOR_ONE/1000000))
say("")
return
end
if not u_enough_money then
say_title("Őr:")
say_reward("Nincs nálad a szükséges 500.000 Yang!")
say("")
return
end
say("Átgondolotátok a válás nehézségeit?.")
say("")
say("Mégis válni akartok?")
local c=select("Igen","Nem")
if 2 == c then
say_title(pc.get_name()..":")
say("Jobban belegondolva hülye ötlet volt.")
say("")
wait()
say_title("Őr:")
say("Ugye-ugye?")
say("A válás nem megoldás a problémáinkra!")
say("Legközelebb beszéljétek meg!")
say("")
say_reward("Amíg még nem késő!")
say("")
return
end
local ok_sign = confirm(u_vid, "El akarsz válni "..pc.get_name().."-tól?", 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_title("Őr:")
say("Ez kellett?! Nem lehetett volna megbeszélni?")
say("Jó, de utána nehogy sírjatok..!")
say("Akarod, hogy kimondjam?")
say("")
say_reward("Mostantól nem vagytok házasok!")
say("")
marriage.remove()
else
say_title("Őr:")
say("A válás nem sikerült!")
say("Hiányosak voltak a feltételek!")
say("")
say_reward("Próbáljátok meg később!")
say("")
end
else
say_title("Őr:")
say("A másik fél nem kíván tőled elválni!")
say("Ha egyoldalú válást vállalsz neked kell")
say("fizetned a kétfejre jutó összeget, ami Egy Millió Yang.")
say_reward("Próbáld meg később!")
say("")
end
end
end
when 11000.chat."Gyűrű visszaadás!" or 11002.chat."Gyűrű visszaadás!" or 11004.chat."Gyűrű visszaadás!" with not pc.is_married() and pc.count_item(70302)>0 begin
say_title("Őr:")
say("Nálad maradt egy Jegygyűrű és már elváltál?!")
say("Ide vele azonnal!")
say("")
say_reward("Jegygyűrű átadva!")
pc.remove_item(70302)
end
when 11000.chat."Egyoldalú válás" or 11002.chat."Egyoldalú válás" or 11004.chat."Egyoldalú válás" with pc.is_married() begin
if not marriage_manage.check_divorce_time() then
return
end
say_title("Őr:")
say("Valóban el akarsz válni párodtól?")
say("Ugye tudod, hogy ennek az ára duplája lesz a[ENTER]normális árnak?")
say("")
say_reward("Akarod, hogy elválasztjalak a házastársadtól?")
local s = select("Igen","Nem")
local NEED_MONEY = 1000000
if s == 2 then
return
end
if pc.money < NEED_MONEY then
say_title("Őr:")
say("Nincs meg a szükséges pénzd!")
say("Mint mondtam a duplája lesz..")
say_reward(string.format("Gyere vissza ha meglesz a szükséges %s Yang.", NEED_MONEY))
say("")
return
end
say_title("Őr:")
say("Nem gondolnád meg magad?")
say_reward("Akarod, hogy elválasztjalak a házastársadtól?")
local c = select("Igen", "Nem")
if c == 2 then
say_title("Őr:")
say("A házassággal nem szabad szórakozni!")
say("Keresd fel párod és beszéld meg vele mi legyen..")
say("Viszlát!")
say("")
return
end
pc.removeitem(70302, 1)
pc.change_gold(-NEED_MONEY)
marriage.remove()
say_title("Őr:")
say("Sikeresen elváltál párodtól.")
say("Viszlát...")
say("")
say_reward("Elváltál az ex-párodtól.")
say("")
end
when 9006.chat."Házasság lista" with not pc.is_engaged() begin
local t = marriage.get_wedding_list()
if table.getn(t) == 0 then
say_title("Házasság lista")
say("Jelenleg nincs házasság folyamatban!")
else
local wedding_names = {}
table.foreachi(t, function(n, p) wedding_names[n] = p[3].." és "..p[4].." esküvője." 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_title(mob_name(9011)..":")
say("Te csak vendég vagy!")
say("Psszt!")
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_title("Őr:")
say("Most házasodtál meg nem válhatsz el azonnal!")
say("Várnod kell egy teljes napot!")
say("")
return false
end
return true
end
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
az elején van a hiba, sok az idézőjel:
say("Hello pc.get_name().." ")
Hát megpróbáltam máshogy de így már más hiba jött ki ahogy le./qc-tam azonnal ez a hiba jött.
segmentation fault (core dumped)
Ezt hogy lehet javítani vagy mitől lehet ez a hiba?
Ja most így szerkesztettem a questet.
----------------------------------------------------------
-- Házasság Quest --
-- Magyarosítva by P3NG3R --
----------------------------------------------------------
quest marriage_manage begin
state start begin
when 9006.chat." Házasság " with not pc.is_engaged_or_married() begin
if not npc.lock() then
say("Hello harcos")
say(" Megszeretnél házasodni? ")
return
end
if pc.get_level() < 25 then
say_title(mob_name(9006)..":")
say("Üdvözöllek.")
say("Házasságot csak és kizálólag 25 Szint felett")
say("lehet kötni! Neked még igencsak fejlődnöd kell,")
say("hogy házasodhass!")
say("Remélem megérted..")
say("")
say_reward("Gyere vissza, ha már elérted minimum a 25 Szintet.")
say("")
return
end
local m_ring_num = pc.countitem(70301)
local m_has_ring = m_ring_num > 0
if not m_has_ring then
say_title(mob_name(9006)..":")
say_reward("Neked nincs eljegyzési gyűrűd!")
say("")
say_item("Eljegyzési gyűrű ", 70301, "")
say_reward("Amíg nincs nem kezdhetsz házasságot.")
say("")
return
end
local m_sex = pc.get_sex()
if not marriage_manage.is_equip_wedding_dress() then
say_title(mob_name(9006)..":")
say("Jól látok? Nincs nálad az esküvő ruházatod?!")
say("A nélkül nem engedhetek senkit esküdni!")
say("Talán később...")
say("")
if m_sex==0 then
say_item("Szmoking", marriage_manage.get_wedding_dress(pc.get_job()), "")
say_reward("Nincs rajtad a Szmokingod!")
else
say_item("Menyasszonyi ruha", marriage_manage.get_wedding_dress(pc.get_job()), "")
say_reward("Nincs rajtad a Menyasszonyi ruhád!")
end
say("")
return
end
local NEED_MONEY = 1000000
if pc.get_money() < NEED_MONEY then
say_title(mob_name(9006)..":")
say("Nincs nálad a szükséges fizetség...")
say("És így nincs mibőn finanszírozni az esküvőt!")
say("Be kell szerezzétek de sürgősen!")
say("")
say_reward(string.format("Szükséges Yang: %d Millió.", NEED_MONEY/1000000))
say("")
return
end
say_title(mob_name(9006)..":")
say("Oké, megvan minden, most jöhet a név.")
say("Mi a kedves menyasszony neve?")
say("")
say_reward("Add meg párod nevét:")
local sname = input()
if sname == "" then
say_title(mob_name(9006)..":")
say_reward("Muszáj megadnod egy nevet!")
say("")
return
end
local u_vid = find_pc_by_name(sname)
local m_vid = pc.get_vid()
if u_vid == 0 then
say_title(mob_name(9006)..":")
say_reward("Ez a játékos nem létezik vagy nem elérhető!")
say_reward("Lehet, hogy elírtad a játékos nevét.")
say("")
say_reward(string.format("A megadott név: %s", sname))
say("")
return
end
if not npc.is_near_vid(u_vid, 10) then
say_title(mob_name(9006)..":")
say("Oké, de miért nincs itt?!")
say("Nem vagyok képes így beazonosítani ha nem látom.")
say("Jöjjön ide azonnal!")
say("")
say_reward(string.format("Házassági partner: %s ", sname))
say("")
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.get_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_title(mob_name(9006)..":")
say("Saját magaddal nem köthetsz házasságot")
say("")
say_reward("Idióta-_-")
say("")
return
end
if u_sex == m_sex then
say_title(mob_name(9006)..":")
say_reward("Saját nemeddel való házasságot a törvény büntetni!!!")
say_reward("Hülye b*zi-_-'")
say("")
return
end
if u_married then
say_title(mob_name(9006)..":")
say("A párod már házas?!")
say("Így nem tudtok házasságot kötni!")
say("Bontsa fel az előző házasságát.")
say("")
say_reward(string.format("%s már házasságban van valakivel!", sname))
say("")
return
end
if u_level < 25 then
say_title(mob_name(9006)..":")
say("A párodnak nincs meg a szükséges szintje!")
say("Így nem tudtok házasságot kötni!")
say("")
say_reward("El kell érnie a 25 Szintet legalább!")
say("")
return
end
if m_level - u_level > 15 or u_level - m_level > 15 then
say_title(mob_name(9006)..":")
say("A házastársak közti szint különbsége nem haladhatja")
say("meg a +/- 15 Szintet!.")
say("Ez sajnos szabály..")
say("")
say_reward("Házastársadnak fel kell zárkóznia hozzád 15 Szint[ENTER]különbségig!")
say("")
return
end
if not u_has_ring then
if m_ring_num >= 2 then
say_title(mob_name(9006)..":")
say("Egyikőtöknek hiányzik az eljegyzési gyűrűje!")
say("Szerezzétek be minél előbb!")
else
say_title(mob_name(9006)..":")
say("Egyikőtöknek hiányzik az eljegyzési gyűrűje!")
say("Szerezzétek be minél előbb!")
say("")
end
say_item("Eljegyzési gyűrű ", 70301, "")
say_reward("Az esküvő abbamaradt,")
say_reward("mert nincs meg a két eljegyzési gyűrű!")
say("")
return
end
if not u_wear then
say_title(mob_name(9006)..":")
say("Párod nincs felkészülve.. Nem viseli az esküvői")
say("ruházatát. A folytatáshoz elengedhetetlen!")
say("")
if m_sex==0 then
say_item("Menyasszonyi ruha", 11903, "")
say_reward("Nincs rajta a Menyasszonyi ruhája!")
else
say_item("Szmoking", 11902, "")
say_reward("Nincs rajta a Szmokingja!")
end
say("")
return
end
local ok_sign = confirm(u_vid, "Elfogadod "..pc.get_name().. "-t házastársadul?", 30)
if ok_sign == CONFIRM_OK then
local m_name = pc.get_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_title(mob_name(9006)..":")
say("Rendben van, a gyűrűket megkaptátok.")
say("Kicsit várni kell...")
say("Aztán elviszlek titeket a szerelmesek szigetére,")
say("ahol végbe mehet az esküvőtök.")
say("")
say_reward("Gratulálok nektek!")
say("")
wait()
setskin(NOWINDOW)
marriage.engage_to(u_vid)
end
else
say_title(mob_name(9006)..":")
say("Visszautasították az ajánlatodat!")
say("")
say_reward("Esküvő megszakadt!")
end
say("")
end
when 9006.chat."Házassági HIBA" with pc.is_engaged() begin
say_title(mob_name(9006)..":")
say("Szeretnél házasságot kötni?")
say("Oké odateleportállak.")
say("")
wait()
setskin(NOWINDOW)
marriage.warp_to_my_marriage_map()
end
when 9011.chat."Az eskövő elkezdése" with pc.is_engaged() and marriage.in_my_wedding() begin
if not npc.lock() then
say_title(mob_name(9011)..":")
say("Elkezdjük az esküvőt?")
say("")
return
end
say_title(mob_name(9011)..":")
say("Üdvözöllek.")
say("Az eskövő kezdéséhez szükség lesz a nevek megadására.")
say("Ez csupán szakmai formalitás.")
say("")
local sname = input()
local u_vid = find_pc_by_name(sname)
local m_vid = pc.get_vid()
if u_vid == 0 then
say_title(mob_name(9011)..":")
say("Ne szórakozz...")
say("Helyesen írd be a nevét!")
say("")
say_reward(string.format("Házasság partner: %s ", sname))
say("")
return
end
if not npc.is_near_vid(u_vid, 10) then
say_title(mob_name(9006)..":")
say("Oké, de miért nincs itt?!")
say("Nem vagyok képes így beazonosítani ha nem látom.")
say("Jöjjön ide azonnal!")
say("")
say_reward(string.format("Házasság partner: %s ", sname))
say("")
return
end
if u_vid == m_vid then
say_title(mob_name(9006)..":")
say("Saját magaddal nem köthetsz házasságot")
say("")
say_reward("Idióta-_-")
say("")
return
end
if u_vid != marriage.find_married_vid() then
say_title(mob_name(9011)..":")
say("Oké minden okés.")
say("Miért házasodtok??")
say("")
return
end
local ok_sign = confirm(u_vid, "Elfogadod "..pc.get_name().. "-t házastársadul?", 30)
if ok_sign != CONFIRM_OK then
say_title(mob_name(9011)..":")
say("Oké, Minden szuper!")
say("Házastársakká nyílvánítalak!")
say("")
return
end
say_title(mob_name(9011)..":")
say("Gratulálok!")
say("A házastársak megajándékozták egymást!")
notice_in_map("Sok Boldogságot az ifjú párnak!")
marriage_manage.give_wedding_gift()
old = pc.select(u_vid)
marriage_manage.give_wedding_gift()
pc.select(old)
marriage.set_to_marriage()
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
when 9011.chat."Zene be" 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."Zene ki" 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."Naplemente" with pc.is_married() and marriage.in_my_wedding() begin
marriage.wedding_dark(true)
setskin(NOWINDOW)
end
when 9011.chat."Havazás" with pc.is_married() and marriage.in_my_wedding() begin
marriage.wedding_snow(true)
setskin(NOWINDOW)
end
when 9011.chat."Házasság befejezése" with pc.is_married() and marriage.in_my_wedding() begin
if not npc.lock() then
say_title(mob_name(9011)..":")
say("A házasság szent és sérthetetlen, ne legyetek rosszak )")
say("")
return
end
say_title(mob_name(9011)..":")
say("Szeretnéd befejezni az esküvőt?")
say("")
local s = select("Igen","Nem")
if s == 1 then
local u_vid = marriage.find_married_vid()
if u_vid == 0 then
say_title(mob_name(9011)..":")
say("Az esküvő befejezéséhez mindkét fél beleegyezésére")
say("lesz szükség!")
say_reward("Nem fejezheted be az esküvődet, mert a párod[ENTER]nincs jelen.")
say("")
return
end
say_title(mob_name(9011)..":")
say("Szeretnétek befejezni az esküvőtöket?")
say_reward("Mindkét fél beleegyezése szükséges.")
say("")
local ok_sign = confirm(u_vid, "Befejezitek az esküvőtöket?", 30)
if ok_sign == CONFIRM_OK then
marriage.end_wedding()
else
say_title(mob_name(9011)..":")
say_reward("Úgy döntöttetek, hogy a végéig buliztok :D!")
say("")
end
end
end
when 11000.chat."Válás" or 11002.chat."Válás" or 11004.chat."Válás" 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_title("Őr:")
say("Nincs itt a másik fél!")
say("Így nem tudlak szétválasztani titeket!")
say("Próbáld meg később!")
say("")
return
end
say_title("Őr:")
say("A kölcsönös válás feltételei: Mindkét félnek")
say("fizetnie kell fejenként 500.000 Yangot.")
say("Valóban el akartok válni?")
say("")
local MONEY_NEED_FOR_ONE = 500000
local s = select("Igen", "Nem")
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_reward("A másik félnél nincs meg a gyűrű!")
return
end
if not u_have_ring then
say_reward("Nincs nálad a gyűrű!")
return
end
if not m_enough_money then
say_title("Őr:")
say_reward("A másik félnél nincs meg a szükséges Yang!")
say("")
say_reward(string.format("A másik félnél nincs %s millió Yang!", MONEY_NEED_FOR_ONE/1000000))
say("")
return
end
if not u_enough_money then
say_title("Őr:")
say_reward("Nincs nálad a szükséges 500.000 Yang!")
say("")
return
end
say("Átgondolotátok a válás nehézségeit?.")
say("")
say("Mégis válni akartok?")
local c=select("Igen","Nem")
if 2 == c then
say_title(pc.get_name()..":")
say("Jobban belegondolva hülye ötlet volt.")
say("")
wait()
say_title("Őr:")
say("Ugye-ugye?")
say("A válás nem megoldás a problémáinkra!")
say("Legközelebb beszéljétek meg!")
say("")
say_reward("Amíg még nem késő!")
say("")
return
end
local ok_sign = confirm(u_vid, "El akarsz válni "..pc.get_name().."-tól?", 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_title("Őr:")
say("Ez kellett?! Nem lehetett volna megbeszélni?")
say("Jó, de utána nehogy sírjatok..!")
say("Akarod, hogy kimondjam?")
say("")
say_reward("Mostantól nem vagytok házasok!")
say("")
marriage.remove()
else
say_title("Őr:")
say("A válás nem sikerült!")
say("Hiányosak voltak a feltételek!")
say("")
say_reward("Próbáljátok meg később!")
say("")
end
else
say_title("Őr:")
say("A másik fél nem kíván tőled elválni!")
say("Ha egyoldalú válást vállalsz neked kell")
say("fizetned a kétfejre jutó összeget, ami Egy Millió Yang.")
say_reward("Próbáld meg később!")
say("")
end
end
end
when 11000.chat."Gyűrű visszaadás!" or 11002.chat."Gyűrű visszaadás!" or 11004.chat."Gyűrű visszaadás!" with not pc.is_married() and pc.count_item(70302)>0 begin
say_title("Őr:")
say("Nálad maradt egy Jegygyűrű és már elváltál?!")
say("Ide vele azonnal!")
say("")
say_reward("Jegygyűrű átadva!")
pc.remove_item(70302)
end
when 11000.chat."Egyoldalú válás" or 11002.chat."Egyoldalú válás" or 11004.chat."Egyoldalú válás" with pc.is_married() begin
if not marriage_manage.check_divorce_time() then
return
end
say_title("Őr:")
say("Valóban el akarsz válni párodtól?")
say("Ugye tudod, hogy ennek az ára duplája lesz a[ENTER]normális árnak?")
say("")
say_reward("Akarod, hogy elválasztjalak a házastársadtól?")
local s = select("Igen","Nem")
local NEED_MONEY = 1000000
if s == 2 then
return
end
if pc.money < NEED_MONEY then
say_title("Őr:")
say("Nincs meg a szükséges pénzd!")
say("Mint mondtam a duplája lesz..")
say_reward(string.format("Gyere vissza ha meglesz a szükséges %s Yang.", NEED_MONEY))
say("")
return
end
say_title("Őr:")
say("Nem gondolnád meg magad?")
say_reward("Akarod, hogy elválasztjalak a házastársadtól?")
local c = select("Igen", "Nem")
if c == 2 then
say_title("Őr:")
say("A házassággal nem szabad szórakozni!")
say("Keresd fel párod és beszéld meg vele mi legyen..")
say("Viszlát!")
say("")
return
end
pc.removeitem(70302, 1)
pc.change_gold(-NEED_MONEY)
marriage.remove()
say_title("Őr:")
say("Sikeresen elváltál párodtól.")
say("Viszlát...")
say("")
say_reward("Elváltál az ex-párodtól.")
say("")
end
when 9006.chat."Házasság lista" with not pc.is_engaged() begin
local t = marriage.get_wedding_list()
if table.getn(t) == 0 then
say_title("Házasság lista")
say("Jelenleg nincs házasság folyamatban!")
else
local wedding_names = {}
table.foreachi(t, function(n, p) wedding_names[n] = p[3].." és "..p[4].." esküvője." 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_title(mob_name(9011)..":")
say("Te csak vendég vagy!")
say("Psszt!")
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_title("Őr:")
say("Most házasodtál meg nem válhatsz el azonnal!")
say("Várnod kell egy teljes napot!")
say("")
return false
end
return true
end
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
Köszönöm a segitséget.
#Megoldva
Sziasztok. Mi lehet a baj ezzel a questtel?
[spoiler]
Idézquest alap begin
state start begin
when login or levelup with pc.get_level() >= 5 begin
set_state(alap_information)
end
end
state alap_information begin
when letter begin
send_letter("Uriel vár rád. ")
local v=find_npc_by_vnum(20011)
if 0==v then
else
target.vid("__TARGET__", v, "Uriel")
end
end
when button or info begin
say_title("Menj el Uriel-hez. ")
say()
say("Uriel körbe vezet téged a városban hogy tisztában ")
say("legyél azzal hogy mi hol van. ")
say()
say("Na ne várasd meg és menj el hozzá más különben ")
say("Nem fogsz több küldetést kapni. ")
end
when __TARGET__.target.click begin
target.delete("__TARGET__")
gameforge.main_quest_lv10._30_sayTitle)
say("Üdv kalandor. Én vagyok Uriel. Elöszzör is kezdjük ott ")
say("hogy a különleges Ox eseményre nálam tudsz belépni. ")
say("Na menjünk tovább.")
clear_letter()
set_state(keresd_meg_vn)
end
end
state keresd_meg_vn begin
when letter begin
local v=find_npc_by_vnum(9003)
send_letter("Menj a vegyeskereskedőnőhöz! ")
local v=find_npc_by_vnum(9003)
if 0==v then
else
target.vid("__TARGET__", v, "Vegyeskereskedőnő ")
end
end
when button or info begin
say_title(gameforge.main_quest_lv10._110_sayTitle)
say(gameforge.main_quest_lv10._120_sayReward)
end
when __TARGET__.target.click begin
target.delete("__TARGET__")
say_title(mob_name(9003)..":")
say("Nálam tudsz venni mindenféle bájitalt, csecsebecsét.")
say("Bár nem a legolcsóbbak az árúim de én vagyok az ")
say("egyetlen aki ilyet árúl szóval. (Mosolyog)")
clear_letter()
set_state(keresd_meg_kv)
end
end
state keresd_meg_kv begin
when letter begin
send_letter("Keresd meg a kovácsot. ")
local v=find_npc_by_vnum(20016)
if 0==v then
else
target.vid("__TARGET__", v, "A kovács")
end
end
when button or info begin
end
when __TARGET__.target.click begin
target.delete("__TARGET__")
say_title(mob_name(20016)..":")
say("Nálam fogod tudni alap szinten kovácsoltatni az ")
say("Összes felszerelésed. Szóval bátran gyere hozzám.")
say("Ha mégse nálam akkor az én előregyártott Mágikus ")
say("tárgyakkal amelyeket szétszórva találhatsz meg a ")
say("világban.")
clear_letter()
set_state(keresd_meg_fk)
end
end
state keresd_meg_fk begin
when letter begin
send_letter("Keresd meg a kovácsot. ")
local v=find_npc_by_vnum(9001)
if 0==v then
else
target.vid("__TARGET__", v, "A fegyverkereskedo")
end
end
when button or info begin
end
when __TARGET__.target.click begin
target.delete("__TARGET__")
say_title(mob_name(9001)..":")
say("Nálam és a testvéremnél tudsz venni fegyvert és ")
say("fegyverzetet ebben a városban. Ezek alapszintű ")
say("felszerelések. Késöbb más kis városokban fogsz ")
say("tudni venni nagyobb szintű felszerelést vagy ")
say("tudsz szerezni a szörnyek vagy az állatok ")
say("elejtésével. Ugyan is nagyon sok harcos felszerelését ")
say("Bitorolták el.")
clear_letter()
set_quest_state("to_2_quest", "run")
set_state(__COMPLETE__)
end
end
state __COMPLETE__ begin
end
end
[/spoiler]
Kép csatolva.
Esetleg így?
quest alap begin
state start begin
when login or levelup with pc.get_level() >= 5 begin
set_state(alap_information)
end
end
state alap_information begin
when letter begin
send_letter("Uriel vár rád. ")
local v=find_npc_by_vnum(20011)
if 0==v then
else
target.vid("__TARGET1__", v, "Uriel")
end
end
when button or info begin
say_title("Menj el Uriel-hez. ")
say()
say("Uriel körbe vezet téged a városban hogy tisztában ")
say("legyél azzal hogy mi hol van. ")
say()
say("Na ne várasd meg és menj el hozzá más különben ")
say("Nem fogsz több küldetést kapni. ")
end
when __TARGET1__.target.click begin
target.delete("__TARGET1__")
gameforge.main_quest_lv10._30_s ayTitle)
say("Üdv kalandor. Én vagyok Uriel. Elöszzör is kezdjük ott ")
say("hogy a különleges Ox eseményre nálam tudsz belépni. ")
say("Na menjünk tovább.")
clear_letter()
set_state(keresd_meg_vn)
end
end
state keresd_meg_vn begin
when letter begin
local v=find_npc_by_vnum(9003)
send_letter("Menj a vegyeskereskedőnőhöz! ")
local v=find_npc_by_vnum(9003)
if 0==v then
else
target.vid("__TARGET2__", v, "Vegyeskereskedőnő ")
end
end
when button or info begin
say_title(gameforge.main_quest_lv10._110_ sayTitle)
say(gameforge.main_quest_lv10._120_ sayReward)
end
when __TARGET2__.target.click begin
target.delete("__TARGET2__")
say_title(mob_name(9003)..":")
say("Nálam tudsz venni mindenféle bájitalt, csecsebecsét.")
say("Bár nem a legolcsóbbak az árúim de én vagyok az ")
say("egyetlen aki ilyet árúl szóval. (Mosolyog)")
clear_letter()
set_state(keresd_meg_kv)
end
end
state keresd_meg_kv begin
when letter begin
send_letter("Keresd meg a kovácsot. ")
local v=find_npc_by_vnum(20016)
if 0==v then
else
target.vid("__TARGET3__", v, "A kovács")
end
end
when button or info begin
end
when __TARGET3__.target.click begin
target.delete("__TARGET3__")
say_title(mob_name(20016)..":")
say("Nálam fogod tudni alap szinten kovácsoltatni az ")
say("Összes felszerelésed. Szóval bátran gyere hozzám.")
say("Ha mégse nálam akkor az én előregyártott Mágikus ")
say("tárgyakkal amelyeket szétszórva találhatsz meg a ")
say("világban.")
clear_letter()
set_state(keresd_meg_fk)
end
end
state keresd_meg_fk begin
when letter begin
send_letter("Keresd meg a kovácsot. ")
local v=find_npc_by_vnum(9001)
if 0==v then
else
target.vid("__TARGET4__", v, "A fegyverkereskedo")
end
end
when button or info begin
end
when __TARGET4__.target.click begin
target.delete("__TARGET4__")
say_title(mob_name(9001)..":")
say("Nálam és a testvéremnél tudsz venni fegyvert és ")
say("fegyverzetet ebben a városban. Ezek alapszintű ")
say("felszerelések. Késöbb más kis városokban fogsz ")
say("tudni venni nagyobb szintű felszerelést vagy ")
say("tudsz szerezni a szörnyek vagy az állatok ")
say("elejtésével. Ugyan is nagyon sok harcos felszerelését ")
say("Bitorolták el.")
clear_letter()
set_quest_state("to_2_quest", "run")
set_state(__COMPLETE__)
end
end
state __COMPLETE__ begin
end
end
(Make.sh/py-t nyomj)
Törölhető
Idézetet írta: K3zX Dátum 2018-07-06, 13:26:41
Esetleg így?
quest alap begin
state start begin
when login or levelup with pc.get_level() >= 5 begin
set_state(alap_information)
end
end
state alap_information begin
when letter begin
send_letter("Uriel vár rád. ")
local v=find_npc_by_vnum(20011)
if 0==v then
else
target.vid("__TARGET1__", v, "Uriel")
end
end
when button or info begin
say_title("Menj el Uriel-hez. ")
say()
say("Uriel körbe vezet téged a városban hogy tisztában ")
say("legyél azzal hogy mi hol van. ")
say()
say("Na ne várasd meg és menj el hozzá más különben ")
say("Nem fogsz több küldetést kapni. ")
end
when __TARGET1__.target.click begin
target.delete("__TARGET1__")
gameforge.main_quest_lv10._30_s ayTitle)
say("Üdv kalandor. Én vagyok Uriel. Elöszzör is kezdjük ott ")
say("hogy a különleges Ox eseményre nálam tudsz belépni. ")
say("Na menjünk tovább.")
clear_letter()
set_state(keresd_meg_vn)
end
end
state keresd_meg_vn begin
when letter begin
local v=find_npc_by_vnum(9003)
send_letter("Menj a vegyeskereskedőnőhöz! ")
local v=find_npc_by_vnum(9003)
if 0==v then
else
target.vid("__TARGET2__", v, "Vegyeskereskedőnő ")
end
end
when button or info begin
say_title(gameforge.main_quest_lv10._110_ sayTitle)
say(gameforge.main_quest_lv10._120_ sayReward)
end
when __TARGET2__.target.click begin
target.delete("__TARGET2__")
say_title(mob_name(9003)..":")
say("Nálam tudsz venni mindenféle bájitalt, csecsebecsét.")
say("Bár nem a legolcsóbbak az árúim de én vagyok az ")
say("egyetlen aki ilyet árúl szóval. (Mosolyog)")
clear_letter()
set_state(keresd_meg_kv)
end
end
state keresd_meg_kv begin
when letter begin
send_letter("Keresd meg a kovácsot. ")
local v=find_npc_by_vnum(20016)
if 0==v then
else
target.vid("__TARGET3__", v, "A kovács")
end
end
when button or info begin
end
when __TARGET3__.target.click begin
target.delete("__TARGET3__")
say_title(mob_name(20016)..":")
say("Nálam fogod tudni alap szinten kovácsoltatni az ")
say("Összes felszerelésed. Szóval bátran gyere hozzám.")
say("Ha mégse nálam akkor az én előregyártott Mágikus ")
say("tárgyakkal amelyeket szétszórva találhatsz meg a ")
say("világban.")
clear_letter()
set_state(keresd_meg_fk)
end
end
state keresd_meg_fk begin
when letter begin
send_letter("Keresd meg a kovácsot. ")
local v=find_npc_by_vnum(9001)
if 0==v then
else
target.vid("__TARGET4__", v, "A fegyverkereskedo")
end
end
when button or info begin
end
when __TARGET4__.target.click begin
target.delete("__TARGET4__")
say_title(mob_name(9001)..":")
say("Nálam és a testvéremnél tudsz venni fegyvert és ")
say("fegyverzetet ebben a városban. Ezek alapszintű ")
say("felszerelések. Késöbb más kis városokban fogsz ")
say("tudni venni nagyobb szintű felszerelést vagy ")
say("tudsz szerezni a szörnyek vagy az állatok ")
say("elejtésével. Ugyan is nagyon sok harcos felszerelését ")
say("Bitorolták el.")
clear_letter()
set_quest_state("to_2_quest", "run")
set_state(__COMPLETE__)
end
end
state __COMPLETE__ begin
end
end
(Make.sh/py-t nyomj)
Köszi jó lett. :D