versuch das xD.Quote:
Guten Tag,
Ich möchte eine Quest für den Reichsteleporter machen der halt zu map1 führt,
er soll immer zu Rote, Gelbe und Blaue Reich teleporten!
Hier meine quest:
PHP Code:quest reichsteleporter begin
state start begin
when 20083.chat."Reichsteleport" begin
say_title("Reichsteleporter")
say("")
say("Hiermit kannst du dich in ein Reich teleportieren.")
say("")
say_reward("Wähle das Reich aus:")
s=select("Rotes Reich", "Gelbs Reich", "Blaus Reich", "Abbrechen")
if s==4 then
return
elseif s == 1 then
pc.warp(474200, 954400)
elseif s == 2 then
pc.warp(63200, 166100)
elseif s == 3 then
pc.warp(960100, 268700)
end
end
end
end
[SERVICE] Die Questkontrolle
11/02/2012 01:13
'oShet#7081
11/02/2012 01:26
©by Noa#7082
welcher mob ist 20083?
UNWISSEND ZU BLEIBEN IST NICHT SCHÖN
UNWISSEND ZU BLEIBEN IST NICHT SCHÖN
11/02/2012 01:36
Nr_1#7083
Danke oShet es hat geklappt! :)
Ehm der sieht so ähnlich aus wie
Alter Mann
Ehm der sieht so ähnlich aus wie
Alter Mann
11/02/2012 10:52
PixelFlashmob#7084
'Quote:
quest desmeistersmeister begin
state start begin
when login or levelup with pc.get_level()>= 80 begin
set_state(info)
end
end
state info begin
when letter begin
send_letter("Des Meisters Meister")
local v = find_npc_by_vnum(20023)
if v != 0 then
target.vid("target1", v, "Soon")
end
end
when button or info begin
say_title("Des Meisters Meister")
say("Gehe zu Soon, er verlangt Hilfe")
say("von dir.")
end
when target1.target.click or 20023.chat."Des Meisters Meister" begin
target.delete("target1")
say_title("Soon")
say("Ich habe einen Brief meines alten Meisters")
say("erhalten. In ihm steht,")
say("dass er etwas besonderes über die ")
say("mysteriösen Metinsteine herrausfand")
say("und es mir nur persönlich sagen will")
say("Jedoch kann ich hier nicht weg")
say("Könntest du für mich ihn Aufsuchen ?")
local main=select("Ja werde ich tun", "Nein! Keine zeit")
if 2==main then
say("Ach schade...")
return
end
if 1==main then
setstate(info)
say_title("Der Meister")
say("Mein alter Meister ist ein weiser Mann")
say("jedoch auch sehr vergässlich.")
say("Wenn ich mich richtig ersinne ")
say("dürfte er in der Grotte gewesen sein")
say("denn er hat dort nach alten Reliqiuen ")
say("gesucht.")
say("Könntest du dort nach ihm Ausschau halten?")
end
end
state info begin
when letter begin
send_letter("Such den Meister")
end
when button or info begin
say_title("Such den Meister")
say("Soon hat gesagt das der Meister in")
say("der Grotte sein müsste")
say("Ich werde ihn dort suchen gehen")
say("...")
end
when 20364.click begin
say_title("Alter Mann")
say("Was willst du Bürschchen ??")
local main2=select("Bist du Soon alter Meister?", "Nichts...")
if 2==main2 then
return
end
if 1==main2 then
say_title("Soons Meister")
say("Soon ?! noch nie von ihm gehört...")
say(".................")
say("............... ")
say("........... ")
say("ach du meinst Soon?")
say("Von ihm habe ich ja lange nichts")
say("mehr gehört.")
say("Wie es ihm wohl geht?")
end
local main3=select("Denk nach alter Mann!", "Vergiss es...")
if 2==main3 then
return
end
if 1==main3 then
say_title("Meister")
say("Wie Er schickt dich ?")
say("Achso ich habe ihm ein Brief geschrieben ?")
say("Kann ich ihn sehen?")
local main4=select("Ich hab ihn nicht", "Vergiss es...")
if 2==main4 then
return
end
if 1==main4 then
set_state(beweis)
say_title("Brief")
say("Du hast ihn nicht?")
say("Dann hol mir etwas das mir beweist")
say("Das dir Soon vertraut!")
end
end
state beweis begin
when letter begin
send_letter("Der Beweis")
end
when button or info begin
say_title("Der Beweis")
say("Ich muss zurück zu soon und")
say("etwas holen das beweist")
say("das ich für Soon unterwegs bin...")
end
when 20023.click begin
say_title("Beweis")
say("Waaaas er glaubt dir nicht?")
say("nun gut....")
say("Hier hast du das Siegel")
say("meines Hauses...")
pc.give_item2(30191, 1)
notice("Siegelstein Erhalten")
say("Ich habe den Beweis")
say("nun auf zum Meister")
say("...")
end
when 20364.click begin
say_title("Beweis")
say("Ahh du bist es")
say("Hast du einen Beweis?")
local main=select("Hier ist er", "habe keinen...")
if 2==main then
return
end
if 1==main then
say_title("Siegelstein")
say("okey du besitzt sein vertrauen")
say("Dann möchte ich dir mal")
say("etwas erzählen...")
say_title("Metinstein")
say("Die Metinsteine sind nicht")
say("wie vermutet Kometen")
say("aus dem Weltall")
say("NEIN!!!")
say("Es sind EIER!.")
say("Dies fand ich herraus")
say("Als ich die Äusere Schicht untersuchte")
local main=select("Weiter...")
say("jedoch bist du noch zu")
say("unerfahren , dass du")
say("Uns weiterhelfen ")
say("Könntest...")
say("Geh zu Soon und geb")
say("Ihm meine Aufzeichnungen.")
say("Und bring auch sein Siegel")
say("zurück.")
pc.give_item2(30182, 1)
set_state(Soonchen)
end
end
state Soonchen begin
when letter begin
send_letter("Zurück zu Soon")
end
when button or info begin
say_title("Zurück zu Soon")
say("Ich habe ein Buch bekommen")
say("Das ich Soon bringen soll")
say("...")
end
when 20023.click begin
say_title("Aufzeichnungen")
say("Du bist es wider")
say("hast du etwas erfahren?")
local main5=select("Aufzeichnungen geben","abbrechen")
if main5 == 1 then
pc.remove_item(30182)
pc.remove_item(30191)
say("Soso Die Metins sind ")
say("also eier...")
say("Interresant")
say_title("King Rüstung")
say("Als Dank für deine Mühen")
say("werde ich dir eine Kingsrüstung")
say("Deiner Wahl geben")
say("also entscheide weise...")
say_reward("Wähle ein Item aus")
local a = select("Krieger King", "Ninja King", "Sura King", "Schamanen King")
if a == 1 then
pc.give_item2(11971) setstate(finish)
end
if a == 2 then
pc.give_item2(11972) setstate(finish)
end
if a == 3 then
pc.give_item2(11973) setstate(finish)
end
if a == 4 then
pc.give_item2(11974) setstate(finish)
end
else
return
end
end
end
state finish begin
complete_quest()
end
end
danke für hilfe
11/02/2012 17:36
bierkeller9#7085
Code:
quest mgstein begin
state start begin
when 80111.use with item.get_id() begin
local out = mysql_query("SELECT * FROM player.refine_proto WHERE id = (SELECT refine_set FROM player.item_proto WHERE vnum = "..item.get_vnum()..");")
if type(out) ~= "table" then
end
out.cost[1] = out.cost[1]
if pc.get_gold() < out.cost[1] then
return
end
pc.change_gold(-out.cost[1])
item.over9refine()
pc.remove_item(80111, 1)
end
end
end
11/02/2012 19:32
PixelFlashmob#7086
PHP Code:
quest kings begin
state start begin
when login or levelup with pc.get_level()>= 80 begin
set_state(info)
end
end
state info begin
when letter begin
send_letter("Der Mystische Ring")
local v = find_npc_by_vnum(20023)
if v != 0 then
target.vid("target1", v, "Soon")
end
end
when button or info begin
say_title("Der Mystische Ring")
say("Gehe zu Soon, er verlangt Hilfe")
say("von dir.")
end
when target1.target.click or 20023.chat."Des Meisters Meister" begin
target.delete("target1")
say_title("Soon")
say("Oh da bist du ja endlich")
say("...")
say("Ich habe gehört das ein Minotaurus")
say("im Besitzt eines Magischen Ringes ist")
say("Ich würde gerne herrausfinden ob es wahr ist")
say("Was man über diesen Ring erzählt...")
say("Könntest du ihn mir bringen?")
local main=select("Ja werde ich tun", "Nein! Keine zeit")
if 2==main then
say("Ach schade...")
return
if 1==main then
say_title("Der RIng")
say("Vielen Dank")
end
setstate(infos)
end
state infos begin
when 7568.kill begin
end
send_letter("Der Ring")
end
when button or info begin
say_title("Der Ring")
say("Ich habe einen Merkwürdigen")
say("Ring gefunden")
say("Als ich diesem Minotauren-Boss")
say("besiegte")
say("ich sollte ihn zu soon bringen")
say("...")
end
when target1.target.click or 20023.chat."Des Meisters Meister" begin
say_title("King Rüstung")
say("Als Dank für deine Mühen")
say("werde ich dir eine Kingsrüstung")
say("Deiner Wahl geben")
say("also entscheide weise...")
say_reward("Wähle ein Item aus")
local a = select("Krieger King", "Ninja King", "Sura King", "Schamanen King")
if a == 1 then
pc.give_item2(11971) setstate(finish)
end
if a == 2 then
pc.give_item2(11972) setstate(finish)
end
if a == 3 then
pc.give_item2(11973) setstate(finish)
end
if a == 4 then
pc.give_item2(11974) setstate(finish)
end
else
return
end
end
end
state finish begin
complete_quest()
end
end
11/02/2012 19:49
©by Noa#7087
Ziel der Quest ist nur eine Rüstung zu bekommen oder nicht?
Das ist jetzt ein bisschen quatsch
da steht falls die ID.kill = end also kein befehl
Ab den Strichen runter musst du dich einigen
Das ist jetzt ein bisschen quatsch
PHP Code:
when 7568.kill begin
end
send_letter("Der Ring")
end
Ab den Strichen runter musst du dich einigen
11/02/2012 20:17
suragott#7088
Ich habe ein Problem mit einigen Quests .....
Ich habe mal ein bsp. VID gemacht dann kann manns besser sehn ...
Ich habe mal ein bsp. VID gemacht dann kann manns besser sehn ...