PHP Code:
quest multiring begin
state start begin
when 70007.use begin
say_title("Warpring:")
local main=select("Warpring-Funktion", "Lager-Funktion", "Shopping-Funktion", "Tastensperre")
if 1==main then
say_title("Warpring-Funktion:")
local s=select("Map1", "Map2", "Orktal (Mitte)", ".", ".", "Weitere", "Beenden")
if 1==s then
say_title("Warpring-Funktion:")
local a=select ("Rotes", "Gelbes", "Blaues", "Beenden")
if 1==a then
pc.warp(474086, 954540)
elseif 2==a then
pc.warp(63098, 166617)
elseif 3==a then
pc.warp(960054, 268807)
elseif 4==a then
return
end
elseif 2==s then
say_title("Warpring-Funktion:")
local a=select ("Rotes", "Gelbes", "Blaues", "Beenden")
if 1==a then
pc.warp(353003, 882460)
elseif 2==a then
pc.warp(145582, 240227)
elseif 3==a then
pc.warp(863589, 246139)
elseif 4==a then
return
end
elseif 3==s then
pc.warp(332885, 745737)
elseif 6==s then
if pc.get_level() < 75 then
say_title("Weitere Maps:")
local a=select ("Feuerland (Teleporter)", "Spinnendungeon", "Dämonenturm", "Beenden")
if 1==a then
pc.warp(600813, 687144)
elseif 2==a then
say_title("Warping-Funktion:")
local sd = select ("Spinnendungeon 1", "Spinnendungeon 2", "Beenden")
if 1==sd then
pc.warp(51200, 486400)
elseif 2==sd then
pc.warp(665600, 435200)
elseif 3==sd then
return
end
elseif 3==a then
pc.warp(590516, 110606)
elseif 4==a then
return
end
elseif pc.get_level() < 90 then
say_title("Weitere Maps:")
local a=select ("Feuerland (Teleporter)", "Spinnendungeon", "Dämonenturm", "Seelengrotte", "Areal der Steine", "Königsraum", "Beenden")
if 1==a then
pc.warp(600813, 687144)
elseif 2==a then
say_title("Warping-Funktion:")
local sd = select ("Spinnendungeon 1", "Spinnendungeon 2", "Beenden")
if 1==sd then
pc.warp(51200, 486400)
elseif 2==sd then
pc.warp(665600, 435200)
elseif 3==sd then
return
end
elseif 3==a then
pc.warp(590516, 110606)
elseif 4==a then
say_reward("In welche Seelengrotte möchtest du denn?")
local b=select ("Seelengrotte 1", "Seelengrotte 2", "Beenden")
if 1==b then
pc.warp(10086, 1213190)
elseif 2==b then
pc.warp(241682, 1275028)
elseif 3==b then
return
end
elseif 5==a then
pc.warp(44445978, 44445878)
elseif 6==a then
pc.warp(92110, 97047)
elseif 7==a then
return
end
elseif pc.get_level() < 110 then
say_title("Weitere Maps:")
local a=select ("Feuerland (Teleporter)", "Spinnendungeon", "Dämonenturm", "Seelengrotte", "Areal der Steine", "Königsraum", "Weitere", "Beenden")
if 1==a then
pc.warp(600813, 687144)
elseif 2==a then
say_title("Warping-Funktion:")
local sd = select ("Spinnendungeon 1", "Spinnendungeon 2", "Beenden")
if 1==sd then
pc.warp(51200, 486400)
elseif 2==sd then
pc.warp(665600, 435200)
elseif 3==sd then
return
end
elseif 3==a then
pc.warp(590516, 110606)
elseif 4==a then
say_reward("In welche Seelengrotte möchtest du denn?")
local b=select ("Seelengrotte 1", "Seelengrotte 2", "Beenden")
if 1==b then
pc.warp(10086, 1213190)
elseif 2==b then
pc.warp(241682, 1275028)
elseif 3==b then
return
end
elseif 5==a then
pc.warp(44445978, 44445878)
elseif 6==a then
pc.warp(92110, 97047)
elseif 7==a then
say_title("Warpring-Funktion:")
local c=select ("Verkommenes Land", "Beenden")
if 1==c then
pc.warp(2206207, 2231958)
elseif 2==c then
return
end
elseif 7==a then
return
end
elseif pc.get_level() >= 110 then
say_title("Weitere Maps:")
local a=select ("Feuerland (Teleporter)", "Spinnenmaps", "Dämonenturm", "Seelengrotte", "Areal der Steine", "Königsraum", "Weitere", "Beenden")
if 1==a then
pc.warp(600813, 687144)
elseif 2==a then
say_title("Warping-Funktion:")
local sd = select ("Spinnendungeon 1", "Spinnendungeon 2", "Spinnenwald", "Beenden")
if 1==sd then
pc.warp(51200, 486400)
elseif 2==sd then
pc.warp(665600, 435200)
elseif 3==sd then
pc.warp(4168320, 4173180)
elseif 4==sd then
return
end
elseif 3==a then
pc.warp(590516, 110606)
elseif 4==a then
say_reward("In welche Seelengrotte möchtest du denn?")
local b=select ("Seelengrotte 1", "Seelengrotte 2", "Beenden")
if 1==b then
pc.warp(10086, 1213190)
elseif 2==b then
pc.warp(241682, 1275028)
elseif 3==b then
return
end
elseif 5==a then
pc.warp(44445978, 44445878)
elseif 6==a then
pc.warp(92110, 97047)
elseif 7==a then
say_title("Warpring-Funktion:")
local c=select ("Verkommenes Land", "Orkberg", "Beenden")
if 1==c then
pc.warp(2206207, 2231958)
elseif 2==c then
return
end
elseif 8==a then
return
end
end
elseif 7==s then
return
end
elseif 2==main then
say_title("Lager-Funktion")
say_reward("Möchtest du dein Lager öffnen?")
local lager=select("Ja", "Nein")
if 1==lager then
say_title("Lager-Funktion:")
say("Welches Lager möchtest du denn öffnen?")
local a=select("Normales Lager", "Itemshop Lager", "Beenden")
if 1==a then
game.open_safebox()
elseif 2==a then
game.open_mall()
elseif 3==a then
return
end
elseif 2==lager then
return
end
elseif 3==main then
say_title("Shopping-Funktion:")
say("Mit dieser Funktion kannst einen")
say("Multishop herbeirufen.")
say("Dieser Shop hat das zu bieten ,was du bestellst")
say("Also probier es einfach mal aus!")
say()
say("Aber denk dran:")
say()
say("Der Shop muss einmal geöffnet werden!")
say_reward("Sonst funktioniert das Handy nichtmehr!")
local s=select("Ok", "Nein")
if 1==s then
say("Shopping-Funktion:")
say_reward("Welchen Shop möchtes du öffnen?")
local shop=select("Waffenhandel", "Specialshop", "Rüstungshandel", "Gemischtwarenhandel", "Schmuckhandel", "Mehr Anzeigen", "Beenden")
if 1==shop then
mob.spawn(20024, pc.get_local_x(), pc.get_local_y(), 1, 1, 1)
set_state(waffen)
elseif 2==shop then
mob.spawn(20024, pc.get_local_x(), pc.get_local_y(), 1, 1, 1)
set_state(special)
elseif 3==shop then
mob.spawn(20024, pc.get_local_x(), pc.get_local_y(), 1, 1, 1)
set_state(rüstung)
elseif 4==shop then
mob.spawn(20024, pc.get_local_x(), pc.get_local_y(), 1, 1, 1)
set_state(gemi)
elseif 5==shop then
mob.spawn(20024, pc.get_local_x(), pc.get_local_y(), 1, 1, 1)
set_state(schmuck)
elseif 6==shop then
say_title("Shopping-Funktion")
say_reward("Welchen Shop möchtest du öffnen?")
local shop2=select("Pfeilhandel", "Beenden")
if 1==shop2 then
mob.spawn(20024, pc.get_local_x(), pc.get_local_y(), 1, 1, 1)
set_state(pfeil)
elseif 2==shop2 then
return
end
elseif 7==shop then
return
end
elseif 2==s then
return
end
elseif 4==main then
if get_time() > pc.getqf("duration") then
say_title("Willkommen:")
end
elseif 5==main then
return
end
end
end
state waffen begin
when 20024.chat."Waffenhandel" begin
npc.open_shop(1)
setskin(NOWINDOW)
npc.purge()
set_state(start)
end
end
state special begin
when 20024.chat."Spezialhandel" begin
npc.open_shop(41)
setskin(NOWINDOW)
npc.purge()
set_state(start)
end
end
state rüstung begin
when 20024.chat."Rüstungshandel" begin
npc.open_shop(16)
setskin(NOWINDOW)
npc.purge()
set_state(start)
end
end
state gemi begin
when 20024.chat."Gemischtwarenhandel" begin
npc.open_shop(3)
setskin(NOWINDOW)
npc.purge()
set_state(start)
end
end
state schmuck begin
when 20024.chat."Schmuckhandel" begin
npc.open_shop(17)
setskin(NOWINDOW)
npc.purge()
set_state(start)
end
end
state pfeil begin
when 20024.chat."Pfeilhandel" begin
npc.open_shop(15)
setskin(NOWINDOW)
npc.purge()
set_state(start)
end
end
end
