Hey Leute ich such eine Questfunktion die mit der Gm funktion /b gleich ist. Gibt es die Funktion überhaupt
[SERVICE] Die Questkontrolle
03/30/2012 00:38
Failed<3#5266
03/30/2012 12:33
HuHu95#5267
Jetzt scheitert es hier..
Ich komm in die 3 ebene und dann seh ich die map und dann kommt ein ladefenster und dann seh ich die map wieder und dann wieder ladefenster.. bis ich eine taste drücke und kick bekomme..
Ich komm in die 3 ebene und dann seh ich die map und dann kommt ein ladefenster und dann seh ich die map wieder und dann wieder ladefenster.. bis ich eine taste drücke und kick bekomme..
PHP Code:
when 30103.chat."Weiter zur 3. Ebene" begin
npc.purge()
say_reward("Inschrift:")
say("Es ist noch ein weiter weg.")
wait()
d.new_jump_all(209, 5427, 42282)
d.regen_file("data/dungeon/devilcave/dc_regen_ebene3.txt")
local metindv = number(1,4)
if metindv==1 then
d.spawn_mob(8029, 1351, 348)
d.spawn_mob(8029, 1148, 350)
d.spawn_mob(8029, 1151, 155)
d.spawn_mob(8028, 1351, 149)
d.setf("EbeneI", 3)
end
if metindv==2 then
d.spawn_mob(8029, 1351, 348)
d.spawn_mob(8029, 1148, 350)
d.spawn_mob(8028, 1151, 155)
d.spawn_mob(8029, 1351, 149)
d.setf("EbeneI", 3)
end
if metindv==3 then
d.spawn_mob(8029, 1351, 348)
d.spawn_mob(8028, 1148, 350)
d.spawn_mob(8029, 1151, 155)
d.spawn_mob(8029, 1351, 149)
d.setf("EbeneI", 3)
end
if metindv==4 then
d.spawn_mob(8028, 1351, 348)
d.spawn_mob(8029, 1148, 350)
d.spawn_mob(8029, 1151, 155)
d.spawn_mob(8029, 1351, 149)
d.setf("EbeneI", 3)
end
end
when login with pc.in_dungeon() begin
if d.getf("EbeneI") == 3 then
chat("Findet und zerstört den richtigen Metin der Vergeltung.")
chat("Ihr habt 10 Minuten Zeit.")
timer("dc2", 600)
else
d.exit_all()
end
end
03/30/2012 12:49
fumadu#5268
HILFE BITTE ! :((
quest give_basic_weapon begin
state start begin
when login begin
local item_vnum = 19
local item_vnum2 = 11209
local item_vnum3 = 12209
if pc.get_job() == 1 then
item_vnum = 1009
item_vnum2 = 11409
item_vnum3 = 12349
elseif pc.get_job() == 2 then
item_vnum2 = 11609
item_vnum3 = 12489
elseif pc.get_job() == 3 then
item_vnum = 7009
item_vnum2 = 11809
item_vnum3 = 12629
end
pc.give_item2(item_vnum)
pc.give_item2(item_vnum2)
pc.give_item2(item_vnum3)
pc.give_item2(27003, 200)
pc.give_item2(27006, 200)
pc.give_item2(72702)
pc.give_item2(71050, 20)
pc.give_item2(70038, 20)
pc.give_item2(13009)
pc.give_item2(14009)
pc.give_item2(15009)
pc.give_item2(16009)
pc.give_item2(17009)
pc.give_item2(60002)
pc.give_item2(70045)
say(" |SA|Joshi:Viel Spaß auf Magari2)
set_state(weiter)
end
end
state weiter begin
when letter begin
send_letter("Willkommen auf Magari2!")
end
when button or info begin
say_title("Hey"..pc.get_name())
say(" |SA|Joshi: Willkommen auf Magari2 !")
say_title("|SA|Joshi:Du bist Hiermit ein player auf Magari "..pc.get_name())
say(" Der Server wurde mit den Raten Perfekt abgestimmt")
say(" Solltest du weitere Fragen haben")
say(" melde dich bitte beim Support Oder ")
say(" Bei deinem GM's")
say(" Dein Magari 2 Team")
set_state(ende)
end
end
state ende begin
end
end
Error occured on compile give_basic_weapon.quest
quest give_basic_weapon begin
state start begin
when login begin
local item_vnum = 19
local item_vnum2 = 11209
local item_vnum3 = 12209
if pc.get_job() == 1 then
item_vnum = 1009
item_vnum2 = 11409
item_vnum3 = 12349
elseif pc.get_job() == 2 then
item_vnum2 = 11609
item_vnum3 = 12489
elseif pc.get_job() == 3 then
item_vnum = 7009
item_vnum2 = 11809
item_vnum3 = 12629
end
pc.give_item2(item_vnum)
pc.give_item2(item_vnum2)
pc.give_item2(item_vnum3)
pc.give_item2(27003, 200)
pc.give_item2(27006, 200)
pc.give_item2(72702)
pc.give_item2(71050, 20)
pc.give_item2(70038, 20)
pc.give_item2(13009)
pc.give_item2(14009)
pc.give_item2(15009)
pc.give_item2(16009)
pc.give_item2(17009)
pc.give_item2(60002)
pc.give_item2(70045)
say(" |SA|Joshi:Viel Spaß auf Magari2)
set_state(weiter)
end
end
state weiter begin
when letter begin
send_letter("Willkommen auf Magari2!")
end
when button or info begin
say_title("Hey"..pc.get_name())
say(" |SA|Joshi: Willkommen auf Magari2 !")
say_title("|SA|Joshi:Du bist Hiermit ein player auf Magari "..pc.get_name())
say(" Der Server wurde mit den Raten Perfekt abgestimmt")
say(" Solltest du weitere Fragen haben")
say(" melde dich bitte beim Support Oder ")
say(" Bei deinem GM's")
say(" Dein Magari 2 Team")
set_state(ende)
end
end
state ende begin
end
end
Error occured on compile give_basic_weapon.quest
03/30/2012 16:16
Brodan#5269
Problem besteht leider immernoch..Quote:
Abend,
habe meine Ox-Quest etwas geändert.. alles funktioniert prima, bis auf diesen Teil hier
Wäre nett wenn sich das jmd. ansieht..
Wenn ich mich auf die Map porte sollte eig. die Quest erscheinen, tut sie aber nicht :/
Danke im voraus :)
03/30/2012 20:44
HuHu95#5270
Hat sich alles geklärt :)
03/30/2012 20:57
Ytura#5271
Wenn man auf das Item klickt, soll er halt fragen ob er das Pferd wieder beleben möchte oder nicht..
aber geht nich die Quest :S
ist meine erste Quest, also kein wunder :P
[Only registered and activated users can see links. Click Here To Register...]
aber geht nich die Quest :S
ist meine erste Quest, also kein wunder :P
PHP Code:
quest pferdtot begin
state start begin
when 7002.click begin
if horse.is_mine() then
if horse.isdead() then
say title("Pferd")
say("")
say("Wie ich sehe ist dein Pferd verstorben.")
say("Am besten wiederbeleben wir es so schnell wie möglich,")
say("ansonsten ist es eventuell zu spät!")
say("")
local a = select("Ja"), ("Nein")
if a == then horse.revive()
else retun
end
end
end
end
end
03/30/2012 23:28
Brodan#5272
Quote:
aber geht nich die Quest :S
ist meine erste Quest, also kein wunder :P
[Only registered and activated users can see links. Click Here To Register...]PHP Code:quest pferdtot begin
state start begin
when 7002.click begin
if horse.is_mine() then
if horse.isdead() then
say title("Pferd")
say("")
say("Wie ich sehe ist dein Pferd verstorben.")
say("Am besten wiederbeleben wir es so schnell wie möglich,")
say("ansonsten ist es eventuell zu spät!")
say("")
local a = select("Ja"), ("Nein")
if a == then horse.revive()
else retun
end
end
end
end
end
PHP Code:
quest pferdebelebung begin
state start begin
when 7002.use begin
if horse.is_dead() then
say_title("Pferd")
say("")
say("Wie ich sehe ist dein Pferd verstorben.")
say("Am besten wiederbeleben wir es so schnell wie möglich,")
say("ansonsten ist es eventuell zu spät!")
say("")
wait()
say_title("Pferd")
say("")
say("Dein Pferd ist tot,")
say("möchtest du es wiederbeleben?")
local a = select("Ja", "Nein")
if a == 1 then
say_title("Pferd")
say("")
say("Gut, dein Pferd lebt wieder")
say("")
return
else
say_title("Pferd")
say("")
say("Nagut, dann bleibt es weiterhin tot")
say("")
return
end
else
say_title("Pferd")
say("")
say("Dein Pferd lebt..")
say("")
end
end
end
end
end
Questname falsch eingetragen, deine If's waren fehlerhaft.. hatten keine verneinungen..
Ich bin mir ziemlich sicher, dass ItemId 7002 der Lv.1 Fächer+2 ist.. überprüf das bitte nochmal
Benutz das nächste mal bitte [ PHP ] [/ PHP ] (Ohne die Leerzeichen..)Quote:
quest give_basic_weapon begin
state start begin
when login begin
local item_vnum = 19
local item_vnum2 = 11209
local item_vnum3 = 12209
if pc.get_job() == 1 then
item_vnum = 1009
item_vnum2 = 11409
item_vnum3 = 12349
elseif pc.get_job() == 2 then
item_vnum2 = 11609
item_vnum3 = 12489
elseif pc.get_job() == 3 then
item_vnum = 7009
item_vnum2 = 11809
item_vnum3 = 12629
end
pc.give_item2(item_vnum)
pc.give_item2(item_vnum2)
pc.give_item2(item_vnum3)
pc.give_item2(27003, 200)
pc.give_item2(27006, 200)
pc.give_item2(72702)
pc.give_item2(71050, 20)
pc.give_item2(70038, 20)
pc.give_item2(13009)
pc.give_item2(14009)
pc.give_item2(15009)
pc.give_item2(16009)
pc.give_item2(17009)
pc.give_item2(60002)
pc.give_item2(70045)
say(" |SA|Joshi:Viel Spaß auf Magari2)
set_state(weiter)
end
end
state weiter begin
when letter begin
send_letter("Willkommen auf Magari2!")
end
when button or info begin
say_title("Hey"..pc.get_name())
say(" |SA|Joshi: Willkommen auf Magari2 !")
say_title("|SA|Joshi:Du bist Hiermit ein player auf Magari "..pc.get_name())
say(" Der Server wurde mit den Raten Perfekt abgestimmt")
say(" Solltest du weitere Fragen haben")
say(" melde dich bitte beim Support Oder ")
say(" Bei deinem GM's")
say(" Dein Magari 2 Team")
set_state(ende)
end
end
state ende begin
end
end
Error occured on compile give_basic_weapon.quest
Sieht dann so aus..
PHP Code:
quest give_basic_weapon begin
state start begin
when login begin
if pc.getqf("basic_weapon") == 0 then
pc.setqf("basic_weapon", 1)
if pc.job == 0 then
pc.give_item2(19) -- Schwert+9
pc.give_item2(11209) -- Mönchsplattenpanzer+9
pc.give_item2(12209) -- Traditioneller Helm+9
pc.give_item2(13009) -- Schlachtschild+9
pc.give_item2(17009) -- Holzohrringe+9
pc.give_item2(14009) -- Holzarmband+9
pc.give_item2(15009) -- Lederschuhe+9
pc.give_item2(16009) -- Holzhalskette+9
elseif pc.job == 1 then
pc.give_item2(1009) -- Dolch+9
pc.give_item2(11409) -- Azuranzug+9
pc.give_item2(12349) -- Lederkapuze+9
pc.give_item2(13009) -- Schlachtschild+9
pc.give_item2(17009) -- Holzohrringe+9
pc.give_item2(14009) -- Holzarmband+9
pc.give_item2(15009) -- Lederschuhe+9
pc.give_item2(16009) -- Holzhalskette+9
elseif pc.job == 2 then
pc.give_item2(19) -- Schwert+9
pc.give_item2(11609) -- Requiem-Plattenpanzer+9
pc.give_item2(12489) -- Blutiger Helm+9
pc.give_item2(13009) -- Schlachtschild+9
pc.give_item2(17009) -- Holzohrringe+9
pc.give_item2(14009) -- Holzarmband+9
pc.give_item2(15009) -- Lederschuhe+9
pc.give_item2(16009) -- Holzhalskette+9
elseif pc.job == 3 then
pc.give_item2(7009) -- Fächer+9
pc.give_item2(11809) -- Azurkleidung+9
pc.give_item2(12629) -- Mönchshut+9
pc.give_item2(13009) -- Schlachtschild+9
pc.give_item2(17009) -- Holzohrringe+9
pc.give_item2(14009) -- Holzarmband+9
pc.give_item2(15009) -- Lederschuhe+9
pc.give_item2(16009) -- Holzhalskette+9
end
if pc.countitem(item) == 0 and pc.weapon != item then
pc.give_item2(item)
pc.give_item2(27003,200 ) -- Rote Potts (G) | 200x
pc.give_item2(27003,200 ) -- Rote Potts (G) | 200x
pc.give_item2(27003,200 ) -- Rote Potts (G) | 200x
pc.give_item2(27003,200 ) -- Rote Potts (G) | 200x
pc.give_item2(27003,200 ) -- Rote Potts (G) | 200x
pc.give_item2(27006,200 ) -- Blaue Potts (G) | 200x
pc.give_item2(27006,200 ) -- Blaue Potts (G) | 200x
pc.give_item2(27006,200 ) -- Blaue Potts (G) | 200x
pc.give_item2(27006,200 ) -- Blaue Potts (G) | 200x
pc.give_item2(27006,200 ) -- Blaue Potts (G) | 200x
pc.give_item2(72702,1 ) -- Windschuhe | 1x
pc.give_item2(72037,200 ) -- Drachengott Leben |
pc.give_item2(72031,200 ) -- ,, Angriff | jeweils
pc.give_item2(72034,200 ) -- ,, Verteidigung | 200x
pc.give_item2(70038,200 ) -- Tapferkeitsumhänge | 200x
pc.give_item2(70038,200 ) -- Tapferkeitsumhänge | 200x
pc.give_item2(71050,200 ) -- Lila Potts (60%) | 200x
pc.give_item2(72018,1 ) -- Dritte Hand
pc.give_item2(72018,1 ) -- Dritte Hand
pc.give_item2(50051,1 ) -- Pferdebuch
horse.set_level(1)
pc.set_skill_level(131, 10)
say_title("Herzlich Willkommen bei Servername!")
say("")
say("Hallo, "..pc.get_name() .."!")
say("Herzlich Willkommen auf dem Server von Servername,")
say("um dir einige Mühen abzunehmen haben wir uns")
say("die Frechheit erlaubt dir ein paar Items")
say("zu schenken.")
say("")
say_reward("Du hast das Startset erhalten.")
say("")
say("Viel Spaß auf unserem Server,")
say("wünscht das komplette Servername-Team!")
end
end
end
end
end
03/31/2012 06:51
Ytura#5273
PHP Code:
quest pferdebelebung begin
state start begin
when 7002.use begin
if horse.is_dead() then
say_title("Pferd")
say("")
say("Wie ich sehe ist dein Pferd verstorben.")
say("Am besten wiederbeleben wir es so schnell wie möglich,")
say("ansonsten ist es eventuell zu spät!")
say("")
wait()
say_title("Pferd")
say("")
say("Dein Pferd ist tot,")
say("möchtest du es wiederbeleben?")
local a = select("Ja", "Nein")
if a == 1 then
say_title("Pferd")
say("")
say("Gut, dein Pferd lebt wieder")
say("")
return
else
say_title("Pferd")
say("")
say("Nagut, dann bleibt es weiterhin tot")
say("")
return
end
else
say_title("Pferd")
say("")
say("Dein Pferd lebt..")
say("")
end
end
end
end
end
[Only registered and activated users can see links. Click Here To Register...]
03/31/2012 10:16
Jakomo'#5274
PHP Code:
quest pferdebelebung begin
state start begin
when 7002.use begin
if horse.is_dead() then
say_title("Pferd")
say("")
say("Wie ich sehe ist dein Pferd verstorben.")
say("Am besten wiederbeleben wir es so schnell wie möglich,")
say("ansonsten ist es eventuell zu spät!")
say("")
wait()
say_title("Pferd")
say("")
say("Dein Pferd ist tot,")
say("möchtest du es wiederbeleben?")
local a = select("Ja", "Nein")
if a == 1 then
say_title("Pferd")
say("")
say("Gut, dein Pferd lebt wieder")
say("")
return
else
say_title("Pferd")
say("")
say("Nagut, dann bleibt es weiterhin tot")
say("")
return
end
else
say_title("Pferd")
say("")
say("Dein Pferd lebt..")
say("")
end
end
end
end
03/31/2012 10:42
Brodan#5275
Hast du die Quest in der Hongkong Bzw. Questlist eingetragen & eine leerzeile am Ende gemacht?Quote:
quest pferdebelebung begin
state start begin
when 7002.use begin
if horse.is_dead() then
say_title("Pferd")
say("")
say("Wie ich sehe ist dein Pferd verstorben.")
say("Am besten wiederbeleben wir es so schnell wie möglich,")
say("ansonsten ist es eventuell zu spät!")
say("")
wait()
say_title("Pferd")
say("")
say("Dein Pferd ist tot,")
say("möchtest du es wiederbeleben?")
local a = select("Ja", "Nein")
if a == 1 then
say_title("Pferd")
say("")
say("Gut, dein Pferd lebt wieder")
say("")
return
else
say_title("Pferd")
say("")
say("Nagut, dann bleibt es weiterhin tot")
say("")
return
end
else
say_title("Pferd")
say("")
say("Dein Pferd lebt..")
say("")
end
end
end
end
end
[Only registered and activated users can see links. Click Here To Register...]
Die Quest sollte eig. Funktionieren, kann's grad nicht überprüfen da ich mit meinem Handy on bin :/
03/31/2012 10:58
Ytura#5276
Ja hatte sie auffen Pc, aber schon geändert, auf 50153..
Jakomo, Danke Dir :)
Geht nun!
Jakomo, Danke Dir :)
Geht nun!
03/31/2012 12:25
Retrograd#5277
da war ein end am ende zu viel
PHP Code:
quest pferdebelebung begin
state start begin
when 7002.use begin
if horse.is_dead() then
say_title("Pferd")
say("")
say("Wie ich sehe ist dein Pferd verstorben.")
say("Am besten wiederbeleben wir es so schnell wie möglich,")
say("ansonsten ist es eventuell zu spät!")
say("")
wait()
say_title("Pferd")
say("")
say("Dein Pferd ist tot,")
say("möchtest du es wiederbeleben?")
local a = select("Ja", "Nein")
if a == 1 then
say_title("Pferd")
say("")
say("Gut, dein Pferd lebt wieder")
say("")
return
else
say_title("Pferd")
say("")
say("Nagut, dann bleibt es weiterhin tot")
say("")
return
end
else
say_title("Pferd")
say("")
say("Dein Pferd lebt..")
say("")
end
end
end
end
03/31/2012 17:25
Ytura#5278
Weiss einer wo der Fehler is?^^
[Only registered and activated users can see links. Click Here To Register...]
[Only registered and activated users can see links. Click Here To Register...]
PHP Code:
quest kalsius begin
state start begin
when 71131.use with pc.is_mount() begin
pc.unmount()
end
when 71117.use with pc.is_mount() begin
pc.unmount()
end
when 71118.use with pc.is_mount() begin
pc.unmount()
end
when 71131.use begin
pc.unmount()
pc.mount(20114, 1800)
pc.mount_bonus(apply.STR, 100, 1800)
end
when 71117.use begin
pc.unmount()
pc.mount(20116, 1800)
pc.mount_bonus(apply.ATT_BONUS_TO_MONSTER, 30,1800)
end
when 71118.use begin
pc.unmount()
pc.mount(20117, 1800)
pc.mount_bonus(apply.MAX_HP, 5000,1800)
end
end
end
03/31/2012 22:13
Retrograd#5279
du musst die funktion pc.mount_bonus noch in den quest_functions eintragen
03/31/2012 22:37
.ProPlayer#5280
PHP Code:
quest user begin
state start begin
when 20095.click begin
say_title("Kontrollzentrum")
say("")
say_reward("Willkommen im Kontrollzentrum")
say_reward("Wie kann ich dir "..pc.get_name().." weiterhelfen")
say("")
local main_set = select("Pferde-Tool","Teleport-Tool","Verwandlungs-Tool","Afk gehen","Team-Liste","Weiter","Garnicht")
if main_set == 7 then
say("Nagut, vielleicht beim nächsten mal")
return
end
if main_set == 1 then
say("Hier ist die Pferdeabteilung")
say("Was möchtest du tun?")
local b = select("Reiten","Absitzen","Pferd rufen","Pferd wegschicken","Pferd füttern","Pferd wiederbeleben","Pferde-Daten","Nix")
if b == 8 then
return
end
if b == 1 then
say("Möchtest du mit deinem Pferd reiten?")
local c = select("Ja","Nein")
if c == 1 then
horse.ride()
end
if c == 2 then
return
end
end
if b == 2 then
say("Du möchtest echt vom Pferd absitzen?")
local d = select("Ja","Nein")
if d == 1 then
horse.unride()
end
if d == 2 then
return
end
end
if b == 3 then
say("Möchtest du dein Pferd rufen?")
local e = select("Ja","Nein")
if e == 1 then
horse.summon()
end
if e == 2 then
return
end
end
if b == 4 then
say("Möchtest du dein Pferd echt wegschicken?")
local f = select("Ja","Nein")
if f == 1 then
horse.unsummon()
end
if f == 2 then
return
end
end
if b == 5 then
say("Möchtest du dein Pferd füttern")
local g = select("Ja","Nein")
if g == 1 then
horse.feed()
end
if g == 2 then
return
end
end
if b == 6 then
say("Möchtest du dein Pferd wiederbeleben?")
local h = select("Ja","Nein")
if h == 1 then
horse.revive()
end
if h == 2 then
return
end
end
if b == 7 then
say("Du willst also deine Pferde-Daten wissen")
say("Pferdeleben: "..horse.get_health_pct().."")
say("Ausdauer: "..horse.get_stamina_pct().."")
say("Pferdelevel: "..horse.get_level().."")
local i = select("Beenden")
if i == 1 then
return
end
end
end
if main_set == 2 then
say("Du willst dich also Teleportieren?")
say("")
local j = select("Ja","Nein")
if j == 2 then
return
end
if j == 1 then
say_reward("Wo möchtest du hin:")
local k = select("Map1-Rot","Map1-Blau","Map1-Gelb","Nirgens")
if k == 4 then
return
end
if k == 1 then
pc.warp(469300, 964200)
end
if k == 2 then
pc.warp(969600, 278400)
end
if k == 3 then
pc.warp (55700, 157900)
end
end
end
if main_set == 3 then
say("In was möchtest du dich für 5 Minuten Verwandeln?")
say("5 Minuten kosten dich 5.000.000 Yang!")
local u = select("Wildhund","Wolf","Ork","Spinne","Monster-Wahl","Zurückverwandeln")
if u == 1 then
if pc.money>=5000000 then
say("Du wirst in einen Wildhund verwandelt")
pc.polymorph(101, 300)
pc.change_money(-5000000)
else
say("Du hast nicht genug Yang")
say("Du benötigst 5.000.000 Yang")
end
end
if u == 2 then
if pc.money>=5000000 then
say("Du wirst in einen Wolf verwandelt")
pc.polymorph(102, 300)
pc.change_money(-5000000)
else
say("Du hast nicht genug Yang")
say("Du benötigst 5.000.000 Yang")
end
end
if u == 3 then
if pc.money>=5000000 then
say("Du wirst in ein Ork verwandelt")
pc.polymorph(601, 300)
pc.change_money(-5000000)
else
say("Du hast nicht genug Yang")
say("Du benötigst 5.000.000 Yang")
end
end
if u == 4 then
if pc.money>=5000000 then
say("Du wirst in eine Spinne verwandelt")
pc.polymorph(2001, 300)
pc.change_money(-5000000)
else
say("Du hast nicht genug Yang")
say("Du benötigst 5.000.000 Yang")
end
end
if u == 5 then
say_title("Hier musst du die Value von dem")
say_title("Monster eingeben, in welches du")
say_title("dich verwandeln willst.")
say_reward("Es kostet 10.000.000 Yang für 10 Minuten!")
local y = input()
if pc.money>=10000000 then
say("Okey ich verwandle dich für")
say("30 Minuten in einen")
say_reward(" "..mob_name( y ).." ")
pc.polymorph(y, 600)
else
say("Du hast nicht genug Yang")
say("Du benötigst 10.000.000 Yang!")
end
end
if u == 6 then
say("Willst du dich echt zurückverwandeln?")
local v = select("Ja","Nein")
if v == 2 then
say("Dann bleibst du noch Verwandelt!")
return
end
if v == 1 then
say("Okey, ich verwandel dich zurück")
pc.remove_polymorph()
end
end
end
if main_set == 4 then
say("Möchtest du AFK gehen bzw. einen Shop öffnen?")
say("")
local w = select("Ja","Wieder da","Nein")
if w == 1 then
say("Okey du bist nun ein Shop")
pc.polymorph(30000, 2000000)
end
if w == 2 then
say("Gut, du bist wieder da")
pc.remove_polymorph()
end
if w == 3 then
say("Ok, dann halt nicht")
return
end
end
if main_set == 5 then
say_reward("Hier siehst du alle Teammitglieder")
say("")
say_reward("Die ServerAdmin´s [SA] :")
say("******")
say_reward("Die GameAdmin´s [GA] :")
say("*****")
say("****")
say_reward("Die GameMaster´s [GM] :")
say("******")
say("*****")
say("Du kannst dir die Liste jederzeit erneut anschaun")
return
end
if main_set == 6 then
say_title("Hier ist das Kontrollzentrum")
say_title("Wie kann ich dir "..pc.get_name().." weiterhelfen?")
local aa = select("Reittiere","Einkaufen",Göttlich werden","Lager/Itemshop öffnen","GM-Tool","Nichts")
if aa == 6 then
say("Dann halt nicht, ich bin mir sicher")
say("Das du mich irgendwann gebrauchen wirst")
return
end
if aa == 1 then
say_title("Ich bin der Reittier-Händler:")
say_title("Was möchtest du für eins?")
local bb = select("Lowe","Kailer","Feuer-Tiger","Wolf","Keinen")
if bb == 5 then
say("Dann halt nicht, dann hebe ich meine")
say("Kraft zum Beschwören fürs nächste mal auf")
return
end
if bb == 1 then
say("Du bekommst meinen Löwen ausgeliehen?")
say("Bist du dir sicher?")
say_reward("5 Minuten kosten 5.000.000 Yang!")
local bc = select("Ja","Nein")
if bc == 2 then
say("Dann halt nicht, pech gehabt!")
return
end
if bc == 1 then
if pc.money>=5000000 then
say("Hier hast du meinen Löwen für")
say("5 Minuten")
pc.mount(39912, 300)
pc.change_money(-5000000)
else
say("Du hast nicht genug Yang")
say("Du benötigst 5.000.000 Yang")
end
end
end
if bb == 2 then
say("Du bekommst meinen Kailer ausgeliehen?")
say("Bist du dir sicher?")
say_reward("5 Minuten kosten 5.000.000 Yang!")
local cc = select("Ja","Nein")
if cc == 2 then
say("Dann halt nicht, pech gehabt!")
return
end
if cc == 1 then
if pc.money>=5000000 then
say("Hier hast du meinen Kailer für")
say("5 Minuten")
pc.mount(39913, 300)
pc.change_money(-5000000)
else
say("Du hast nicht genug Yang")
say("Du benötigst 5.000.000 Yang")
end
end
end
if bb == 3 then
say("Du bekommst meinen Feuer-Tiger ausgeliehen?")
say("Bist du dir sicher?")
say_reward("5 Minuten kosten 5.000.000 Yang!")
local cc = select("Ja","Nein")
if cc == 2 then
say("Dann halt nicht, pech gehabt!")
return
end
if cc == 1 then
if pc.money>=5000000 then
say("Hier hast du meinen Feuer-Tiger für")
say("5 Minuten")
pc.mount(39914, 300)
pc.change_money(-5000000)
else
say("Du hast nicht genug Yang")
say("Du benötigst 5.000.000 Yang")
end
end
end
if bb == 4 then
say("Du bekommst meinen Wolf ausgeliehen?")
say("Bist du dir sicher?")
say_reward("5 Minuten kosten 5.000.000 Yang!")
local cc = select("Ja","Nein")
if cc == 2 then
say("Dann halt nicht, pech gehabt!")
return
end
if cc == 1 then
if pc.money>=5000000 then
say("Hier hast du meinen Wolf für")
say("5 Minuten")
pc.mount(39915, 300)
pc.change_money(-5000000)
else
say("Du hast nicht genug Yang")
say("Du benötigst 5.000.000 Yang")
end
end
end
end
if aa == 2 then
say_title("Einkaufszentrum:")
say("Hier kannst du jeden Shop per Item öffnen")
say_reward("Welchen Shop möchtest du öffnen?")
local dd = select("Gemischwaren","Saft des Lebens","Itemshop","Keinen")
if dd == 4 then
say("Dann halt nicht, schönen Tag noch")
return
end
if dd == 1 then
say("Möchtest du echt den Shop der Gemischwaren öffnen?")
local de = select("Ja","Nein")
if de == 2 then
say("Okey, tschüüüss!")
return
end
if de == 1 then
say("Der Shop der Gemischwaren wird geöffnet")
npc.open_shop()
end
end
if dd == 2 then
say("Möchtest du echt den Shop des Betrunkenen")
say("Bürger offnen")
local ee = select("Ja","Nein")
if ee == 2 then
say("Dann halt nicht, Byyee")
return
end
if ee == 1 then
say("Der Shop des Betrunkenen Bürgers wird geöffnet")
npc.open_shop()
end
end
if dd == 3 then
say("Möchtest du echt den Shop von Vivien öffnen?")
local ef = select("Ja","Nein")
if ef == 2 then
say("Dann halt nicht, Byyee!")
return
end
if ef == 1 then
say("Der Shop von Vivien wird geöffnet")
npc.open_shop()
end
end
end
if aa == 3 then
say_title("Heyho, ich bin der Gott der Ränge")
say_title("Für etwas Yang mache ich dich auch")
say_title("zu einem Gott")
say_reward("Du benötigst 50.000.000 Yang")
say("Willst du Göttlich werden?")
local ff = select("Ja, Natürlich","Nein, lieber nicht")
if ff == 2 then
say("Ok Dann nicht, villeicht später")
return
end
if ff == 1 then
say("Wenn du deinen Rang auf 20.000 haben willst")
say("Und 50.000.000 Yang besitzt dann klicke")
say("nun auf Ja")
local fg = select("Ja","Nein")
if fg == 2 then
return
end
if fg == 1 then
if pc.money>=50000000 then
say("Schön, du hast dein rang bekommen")
say("Nun bist du so ein Gott wie ich")
say("Viel spaß noch!")
pc.changemoney(-50000000)
pc.change_alignment(200000)
else
say("Du hast nicht genug Yang")
say("Du benötigst 50.000.000 Yang!")
end
end
end
end
if aa == 4 then
say_title("Bankangestellter:")
say("Hey, ich kann auch von weit weg")
say("euer Lager/Itemshop öffnen..willst du")
say("das ich das mache?")
local gg = select("Lager öffnen","Is-Lager öffnen","Nichts öffnen")
if gg == 3 then
say("Dann halt nicht, jetzt fühle ich mich schlecht!")
return
end
if gg == 1 then
say("Okey ich öffne dir dein Lager!")
say("Beachte: Du kannst dein Lager nur")
say("jede 10 Sekunden aufrufen")
game.open_safebox()
chat("Lager geöffnet")
end
if gg == 2 then
say("Okey ich öffne dein Itemshop-Lager")
say("Beachte: Du kannst dein Itemshop-Lager")
say("nur jede 10 Sekunden öffnen")
game.open_mall()
chat("Lager geöffnet")
end
end
if aa == 5 then
if pc.is_gm() then
say_title("Ohh...hoher Besuch, wie kann ich dir")
say_title("großer GM"..pc.get_name().." weiterhelfen?")
local s = select("Gm-Notiz","Garnicht")
if s == 2 then
say("Okey, dann nicht...")
say("Vielleicht beim nächsten mal!")
return
end
if s == 1 then
say("Gib eine Notiz ein, die an alle Reiche")
say("gesendet wird!")
local y = input()
notice_all(y)
end
end
end
end
end
end
end
Error occured on compile userpanel.quest