Funktioniert .Delta.
Wieder mal Danke an dich :P
Wieder mal Danke an dich :P
quest Biologe begin
state start begin
when login or levelup with pc.get_level() >=80 begin
set_state(information)
end
end
state information begin
when letter begin
local v = find_npc_by_vnum(20084)
if v != 0 then
target.vid("__TARGET__", v, "Quest")
end
send_letter("Die Bitte des biologen")
end
when button or info begin
say_title("Die Bitte des Biologen")
say("")
say("Die bitte des Biologen")
say("Besorge ihm ein Seelenstein des Drachen")
say("du erhälst ihn vom Beran-Setau")
say("du wirst dafür gut von ihm Belohnt.")
say("")
say("")
say("")
end
when __TARGET__.target.click or
20084.chat."Biologe" begin
target.delete("__TARGET__")
say("Biologe:")
--- l
say("Hallo")
say("ich hab ein Problem kannst du mir")
say("1 Seelenstein des Drachen Besorgen?")
say("Du erhälst in vom Beran-Setau")
say("ich werde dich reichlich Belohnen")
say("")
say("")
set_state(go_to_disciple)
pc.setqf("collect_count",0)
pc.setqf("drink_drug",0)
end
end
state go_to_disciple begin
when letter begin
send_letter("Auftrag von Biologe")
end
when button or info begin
say_title("Biologe")
--- l
say("")
say("Biologe gab euch den Auftrag")
say("1 Seelenstein des Drachen zu sammeln!")
say("Das Item bekommt ihr von Beran-Setau.")
say("Viel Glueck!")
say("")
say_item_vnum(30228)
say_reward(" Du hast".." "..pc.getqf("collect_count").." bis jetzt gesammelt!")
say("")
end
when 71035.use begin --°g´bÃĤô
if pc.getqf("drink_drug")==1 then
say("")
say("Bessere Droppchance!")
say("")
return
end
if pc.count_item(30228)==0 then
say("")
say("Du hast keine!")
say("Lauf los und besorg mir einen!")
say("")
return
end
item.remove()
pc.setqf("drink_drug",1)
end
when 2493.kill begin
if pc.count_item(30228)<1-pc.getqf("collect_count") then
pc.give_item2(30228, 1)
end
end
when 20084.chat."Biologe" with pc.count_item(30228) >0 begin
say("Einen Moment!")
--- l
say("Ich werde das Item")
say("schnell mal ueberpruefen.")
say("Hoffentlich klappt alles!")
say("")
pc.remove_item(30228, 1)
wait()
local pass_percent
if pc.getqf("drink_drug")==0 then
pass_percent=27992
else
pass_percent=27992
end
local s= number(1,100)
if s<= pass_percent then
if pc.getqf("collect_count")< 0 then --5*Ó¥H¤U
local index =pc.getqf("collect_count")+1
pc.setqf("collect_count",index) --¨ú±o¤@* +1
say("Biologe:")
say("Perfekt! Das Item ist in Ordnung")
say("Du hast bis jetzt ".." "..1-pc.getqf("collect_count").. " abgegeben!")
say("Bring mir die restlichen!")
say("")
pc.setqf("drink_drug",0) --ÃĤôªì©l¤Æ
return
end
say("Biologe:")
say("Yuhu! Du hast mir")
say("alles gebracht!")
say("Dafür werde ich dich wie versprochen")
say("belohnen!")
say("")
say_reward("Du bekommst ein Weiße Perle!")
say_reward("Du bekommst ein Blaue Perle!")
say_reward("Du bekommst ein Rote Perle!")
say_reward("Du bekommst 20000000 Yang!")
say_reward("Du bekommst 20000000 Erfahrung!")
pc.setqf("collect_count",0)
pc.setqf("drink_drug",0)
clear_letter()
set_state(__complete)
pc.give_item2(27992)
pc.give_item2(27993)
pc.give_item2(27994)
pc.change_money(20000000)
pc.give_exp2(20000000)
set_quest_state("levelup","run")
return
else
say("Biologe:")
----------------------------------------------------
--Tempel des Drachen
----------------------------------------------------
quest dragontemple begin
state start begin
when logout with pc.get_map_index() >= (82*10000) begin
pc.setqf("punishment", 1)
end
when login with pc.get_map_index() >= (82*10000) and pc.getqf("punishment") == 1 begin
pc.setqf("punishment", 0)
warp_to_village()
end
when 30121.chat."Ich will den Drachen töten" with pc.get_map_index() == 73 and game.get_event_flag("dragontemple_open") == 1 begin
pc.setqf("punishment", 0)
if game.get_event_flag("dragontemple_used") == 1 then
if game.get_event_flag("dragontemple_block") == 1 then
say_title(mob_name(30121))
say("")
say("Der Raum ist gesperrt, versuch es später noch ein mal.")
return;
end
say_title(mob_name(30121))
say("")
say("Tut mir Leid, der Raum ist reseviert.")
say("Wenn du ein Passwort hast für den Zugang")
say("gebe es jetzt bitte ein.")
local password = input()
if game.get_event_flag("dragontemple_password") == tonumber(password) then
say_title(""..mob_name(30121).."")
say("")
say("Das Passwort stimmt überein.")
say("Ich bringe dich in die Kammer")
wait()
say_title(""..mob_name(30121).."")
say("")
say("Wenn du willst kann ich dich sofort,")
say("in den Drachnraum bringen.")
say("Gib mir einfach 3x")
say("")
say_item_vnum(30179)
local s = select("Hier, nimm sie und bring mich rein", "Abbrechen")
if s == 1 then
if pc.count_item(30179) >= 3 then
pc.remove_item(30179,3)
pc.warp(843600, 1066900,(82*10000))
--DragonLair.startRaid(82)
else
say("Du hast nur "..pc.count_item(30179).." von 3 benötigten")
say("")
say_item_vnum(30179)
end
else
return
end
else
say_title(""..mob_name(30121).."")
say("")
say("Das Passwort stimmt nicht überein.")
return
end
elseif pc.has_guild() and game.get_event_flag("dragontemple_used") == 0 then
say_title(""..mob_name(30121).."")
say("")
say("Du willst also den Drachen bekämpfen?")
say("Dann gib bitte erst ein Passwort(nur Zahlen) ein")
say("um den Raum zu schützen. Geb das Passwort")
say("einfach deinen Gruppenmitgliedern und sie")
say("können mit in den Raum")
say("Gib es bitte jetzt ein.")
local password = tonumber(input(""))
game.set_event_flag("dragontemple_password",password)
say_title(""..mob_name(30121).."")
say("")
say("Wenn du willst kann ich dich sofort,")
say("in den Drachnraum bringen.")
say("Gib mir einfach 3x")
say("")
say_item_vnum(30179)
say("")
local s = select("Hier, nimm sie und bring mich rein", "Abbrechen")
if s == 1 then
if pc.count_item(30179) >= 3 then
pc.remove_item(30179,3)
DragonLair.startRaid(82)
game.set_event_flag("dragontemple_used",1)
timer("blockentry",5*60)
else
say("Du hast nur "..pc.count_item(30179).." von 3 benötigten")
say("")
say_item_vnum(30179)
say("")
return
end
elseif s==2 then
return
end
elseif not pc.has_guild() then
say_title(""..mob_name(30121).."")
say("")
say("Du benötigst eine starke Gilde")
say("um gegen den Drachen zu kämpfen.")
end
end
when 2493.kill with pc.get_map_index() >= (82*10000) begin
timer("set_unused",30)
end
when set_unused.timer begin
game.set_event_flag("dragontemple_used",0)
game.set_event_flag("dragontemple_block",0)
end
when blockentry.timer begin
game.set_event_flag("dragontemple_block",1)
end
end
end
quest red_dragon_respawn begin
state start begin
when 91810.use begin
mob.spawn(2291, pc.get_x(), pc.get_y(), 5, 5)
pc.removeitem(91810, 1)
end
end
end
quest Biologe begin
state start begin
when login or levelup with pc.get_level() >=80 begin
set_state(information)
end
end
state information begin
when letter begin
local v = find_npc_by_vnum(20084)
if v != 0 then
target.vid("__TARGET__", v, "Quest")
end
send_letter("Die Bitte des biologen")
end
when button or info begin
say_title("Die Bitte des Biologen")
say("")
say("Die bitte des Biologen")
say("Besorge ihm ein Seelenstein des Drachen")
say("du erhälst ihn vom Beran-Setau")
say("du wirst dafür gut von ihm Belohnt.")
say("")
say("")
say("")
end
when __TARGET__.target.click or
20084.chat."Biologe" begin
target.delete("__TARGET__")
say("Biologe:")
--- l
say("Hallo")
say("ich hab ein Problem kannst du mir")
say("1 Seelenstein des Drachen Besorgen?")
say("Du erhälst in vom Beran-Setau")
say("ich werde dich reichlich Belohnen")
say("")
say("")
set_state(go_to_disciple)
pc.setqf("collect_count",0)
pc.setqf("drink_drug",0)
end
end
state go_to_disciple begin
when letter begin
send_letter("Auftrag von Biologe")
end
when button or info begin
say_title("Biologe")
--- l
say("")
say("Biologe gab euch den Auftrag")
say("1 Seelenstein des Drachen zu sammeln!")
say("Das Item bekommt ihr von Beran-Setau.")
say("Viel Glueck!")
say("")
say_item_vnum(30228)
say_reward(" Du hast".." "..pc.getqf("collect_count").." bis jetzt gesammelt!")
say("")
end
when 71035.use begin --°g´bÃĤô
if pc.getqf("drink_drug")==1 then
say("")
say("Bessere Droppchance!")
say("")
return
end
if pc.count_item(30228)==0 then
say("")
say("Du hast keine!")
say("Lauf los und besorg mir einen!")
say("")
return
end
item.remove()
pc.setqf("drink_drug",1)
end
when 2493.kill begin
if pc.count_item(30228)<1-pc.getqf("collect_count") then
pc.give_item2(30228, 1)
end
end
when 20084.chat."Biologe" with pc.count_item(30228) >0 begin
say("Einen Moment!")
--- l
say("Ich werde das Item")
say("schnell mal ueberpruefen.")
say("Hoffentlich klappt alles!")
say("")
pc.remove_item(30228, 1)
wait()
local pass_percent
if pc.getqf("drink_drug")==0 then
pass_percent=27992
else
pass_percent=27992
end
local s= number(1,100)
if s<= pass_percent then
if pc.getqf("collect_count")< 0 then --5*Ó¥H¤U
local index =pc.getqf("collect_count")+1
pc.setqf("collect_count",index) --¨ú±o¤@* +1
say("Biologe:")
say("Perfekt! Das Item ist in Ordnung")
say("Du hast bis jetzt ".." "..1-pc.getqf("collect_count").. " abgegeben!")
say("Bring mir die restlichen!")
say("")
pc.setqf("drink_drug",0) --ÃĤôªì©l¤Æ
return
end
say("Biologe:")
say("Yuhu! Du hast mir")
say("alles gebracht!")
say("Dafür werde ich dich wie versprochen")
say("belohnen!")
say("")
say_reward("Du bekommst ein Weiße Perle!")
say_reward("Du bekommst ein Blaue Perle!")
say_reward("Du bekommst ein Rote Perle!")
say_reward("Du bekommst 20000000 Yang!")
say_reward("Du bekommst 20000000 Erfahrung!")
pc.setqf("collect_count",0)
pc.setqf("drink_drug",0)
clear_letter()
set_state(__complete)
pc.give_item2(27992)
pc.give_item2(27993)
pc.give_item2(27994)
pc.change_money(20000000)
pc.give_exp2(20000000)
set_quest_state("levelup","run")
return
else
say("Biologe:")
----------------------------------------------------
--Tempel des Drachen
----------------------------------------------------
quest dragontemple begin
state start begin
when logout with pc.get_map_index() >= (82*10000) begin
pc.setqf("punishment", 1)
end
when login with pc.get_map_index() >= (82*10000) and pc.getqf("punishment") == 1 begin
pc.setqf("punishment", 0)
warp_to_village()
end
when 30121.chat."Ich will den Drachen töten" with pc.get_map_index() == 73 and game.get_event_flag("dragontemple_open") == 1 begin
pc.setqf("punishment", 0)
if game.get_event_flag("dragontemple_used") == 1 then
if game.get_event_flag("dragontemple_block") == 1 then
say_title(mob_name(30121))
say("")
say("Der Raum ist gesperrt, versuch es später noch ein mal.")
return;
end
say_title(mob_name(30121))
say("")
say("Tut mir Leid, der Raum ist reseviert.")
say("Wenn du ein Passwort hast für den Zugang")
say("gebe es jetzt bitte ein.")
local password = input()
if game.get_event_flag("dragontemple_password") == tonumber(password) then
say_title(""..mob_name(30121).."")
say("")
say("Das Passwort stimmt überein.")
say("Ich bringe dich in die Kammer")
wait()
say_title(""..mob_name(30121).."")
say("")
say("Wenn du willst kann ich dich sofort,")
say("in den Drachnraum bringen.")
say("Gib mir einfach 3x")
say("")
say_item_vnum(30179)
local s = select("Hier, nimm sie und bring mich rein", "Abbrechen")
if s == 1 then
if pc.count_item(30179) >= 3 then
pc.remove_item(30179,3)
pc.warp(843600, 1066900,(82*10000))
--DragonLair.startRaid(82)
else
say("Du hast nur "..pc.count_item(30179).." von 3 benötigten")
say("")
say_item_vnum(30179)
end
else
return
end
else
say_title(""..mob_name(30121).."")
say("")
say("Das Passwort stimmt nicht überein.")
return
end
elseif pc.has_guild() and game.get_event_flag("dragontemple_used") == 0 then
say_title(""..mob_name(30121).."")
say("")
say("Du willst also den Drachen bekämpfen?")
say("Dann gib bitte erst ein Passwort(nur Zahlen) ein")
say("um den Raum zu schützen. Geb das Passwort")
say("einfach deinen Gruppenmitgliedern und sie")
say("können mit in den Raum")
say("Gib es bitte jetzt ein.")
local password = tonumber(input(""))
game.set_event_flag("dragontemple_password",password)
say_title(""..mob_name(30121).."")
say("")
say("Wenn du willst kann ich dich sofort,")
say("in den Drachnraum bringen.")
say("Gib mir einfach 3x")
say("")
say_item_vnum(30179)
say("")
local s = select("Hier, nimm sie und bring mich rein", "Abbrechen")
if s == 1 then
if pc.count_item(30179) >= 3 then
pc.remove_item(30179,3)
DragonLair.startRaid(82)
game.set_event_flag("dragontemple_used",1)
timer("blockentry",5*60)
else
say("Du hast nur "..pc.count_item(30179).." von 3 benötigten")
say("")
say_item_vnum(30179)
say("")
return
end
elseif s==2 then
return
end
elseif not pc.has_guild() then
say_title(""..mob_name(30121).."")
say("")
say("Du benötigst eine starke Gilde")
say("um gegen den Drachen zu kämpfen.")
end
end
when 2493.kill with pc.get_map_index() >= (82*10000) begin
timer("set_unused",30)
end
when set_unused.timer begin
game.set_event_flag("dragontemple_used",0)
game.set_event_flag("dragontemple_block",0)
end
when blockentry.timer begin
game.set_event_flag("dragontemple_block",1)
end
end
end
quest vwkquest begin
state start begin
when 70107.use begin
say_title("Verwandeln leicht gemacht")
say("Du möchtest dich verwandeln?")
say("Wähle einen der Mobs aus und du verwandelst dich")
local s = select("Wildhund","Wilder Ergebener","Babygiftspinne","Sensenmann","Zombie Gott","Abbrechen")
if s == 6 then
return
end
if s == 1 then
pc.polymorph(101,9999999)
chat("Du hast dich in einen Wildhund verwandelt")
set_state(zu)
end
if s == 2 then
pc.polymorph(502,9999999)
chat("Du hast dich in einen Wilden Ergebenen verwandelt")
set_state(zu)
end
if s == 3 then
pc.polymoph(2031,9999999)
chat ("Du hast dich in einen Babygiftspinne verwandelt")
set_state(zu)
end
if s == 4 then
pc.polymorph(1093,9999999)
chat ("Du hast dich in einen Sensenmann verwandelt")
set_state(zu)
end
if s == 5 then
pc.polymorph(2598,9999999)
chat ("Du hast dich in den Zombie Gott verwandelt")
set_state(zu)
end
end
state zu begin
when letter begin
send_letter("Zurück Verwandeln")
end
when info or button begin
say_title("Zurück verwandeln!")
say("")
say("Möchtest du dich wirklich zurück")
say("verwandeln?")
local s = select("Ja","Nein")
if s == 2 then
set_state(zu)
end
if s == 1 then
pc.remove_polymorph()
set_state(start)
end
end
end
end
Quote:
Mfg. BenheroPHP Code:quest red_dragon_respawn begin
state start begin
when 91810.use begin
mob.spawn(2291, pc.get_x(), pc.get_y(), 5, 5)
pc.removeitem(91810, 1)
end
end
end
quest red_dragon_respawn begin
state start begin
when 91810.use begin
mob.spawn(2291, pc.get_local_x(), pc.get_local_y(), 5, 5)
pc.removeitem(91810, 1)
end
end
end
Fehlermeldung: Error occured on compile sd2teleporter.questQuote:
quest sd2teleporter begin
state start begin
when 20089.chat."Schnell weg" begin
if pc.level <= 90 then
say("Heyho")
say("Der Teleporter hat mich unterrichtet,")
say("nun kann ich dich an bestimmte Orte")
say("bringen")
say("")
say("Wo möchtest du hin?")
local s = select("Rotes Reich","Gelbes Reich","Blaues Reich","Abbrechen")
if s == 3 then
pc.warp(469300,964200)
elseif s == 2 then
pc.warp(55700,157900)
elseif s == 1 then
pc.warp(969600,278400)
end
else
say("Heyho")
say("Der Teleporter hat mich unterrichtet,")
say("nun kann ich dich an bestimmte Orte")
say("bringen")
say("")
say("Wo möchtest du hin ?")
local s = select("Rotes Reich","Gelbes Reich","Blaues Reich","Noch eine Ebene","Abbrechen")
if s == 4 then
say("Jahre lang habe ich diesen Ort beobachtet,")
say("dabei fand ich alte Schriften, die von einer")
say("3. Ebene erzählen, ich lernte diesen Weg.")
say("Du scheinst mir stark genug zu sein, doch sei")
say("gewarnt, dort unten warten mächte Monser")
say(")
say("möchtest du dorthin?")
local p = select("Ja","Nein")
if p == 1 then
pc.warp(9191100,9191100)
end
end
if s == 3 then
pc.warp(469300,964200)
elseif s == 2 then
pc.warp(55700,157900)
elseif s == 1 then
pc.warp(969600,278400)
end
end
end
end
end