Suche eine einweg warpring quest

terrorpimmel · 04/11/2012, 17:11

Hi ich suche eine warpring quest, bei der der warpring einfach fragt ob man wirklich da hin will und es so und so vel yang kostet um dort hinzureisen und der ring danach nachtürlich verschwindet.
wenn jemand so eine quest hat bitte hier rein posten oder link zu thread in dem so eine quest veröffentlicht wurde.

danke im voraus.

MetinLegende · 04/11/2012, 17:14

Nimm einfach die teleporter quest mach aus dem npc.chat blabla begin
Ein when item(vnum)use begin
Und dann am ende PC.remove_item(vnum)
Und San eben wenn du andre punkte haben willst die Koordinaten dazuschreiven und bei dem select die Möglichkeiten dazu schreiben

terrorpimmel · 04/11/2012, 17:17

wie wie mache ich das der ring geld verlangt und wenn es nicht da ist denjenigen nicht portet?

MetinLegende · 04/11/2012, 17:24

Poste einfach deine teleporter quest. Dann mach ich's schnell

€und die vnum vom warpring

terrorpimmel · 04/11/2012, 17:36

quest dragon_room_ring begin
state start begin
when 40004.use with pc.get_level() >= 80 begin
pc.warp(819200, 1049600)
end
end
end

MetinLegende · 04/11/2012, 17:41

Die meine ich nicht. Ich meine die vom normalen teleporter.

terrorpimmel · 04/11/2012, 17:43

aso

-- Teleporter
quest map_warp begin
state start begin
when 9012.chat."Möchtest du reisen?" begin
say_title("Teleporter:")
say("Dies ist eine faszinierende Gegend. Aber")
say("passiert hier denn auch mal etwas")
say("Außergewöhnliches? Eher wohl nicht. In anderen")
say("Teilen des Landes sieht es mitunter ganz anders.")
say("aus! Es gibt daher sicher einen intressanten")
say("Ort, an den ich dich teleportieren könnte. Da")
say("jedoch die Kräfte des Bösen wieder stärker")
say("geworden sind, wurden Raum und Zeit ins Chaos")
say("gestürzt. Dadurch kann es passieren, dass deine")
say("Rückkehr nicht immer augenblicklich funktioniert.")
say("Möchtest du dennoch teleportiert werden?")

local main_set = select("Ja","Nein")
if main_set == 2 then
return
end

if pc.get_level() <= 10 then
say_title("Teleporter:")
say("Hm… Mit deinem derzeitigen Level bist du noch")
say("zu schwach für die Reise durch Zeit und Raum.")
say("Komm wieder, wenn du höher als Level 10 bist.")
return
end

local map = pc.get_map_index()
local empire = pc.get_empire()
local level = pc.get_level()
local cost = math.floor(level / 5) * 1000

-- ?? ????
if cost < 1000 then
cost = 1000
end

say_title("Teleporter:")
say("Wohin möchtest du teleportiert werden?")
say_reward(string.format("Das kostet dich %d Yang.", cost))

-- ?? ?? ???? ?? ?? (? ?? 1,2 ??)
if map == 1 or map == 3 or map == 21 or map == 23 or map == 41 or map == 43 then

local guild_map_names = {
"Gildenzone",
"Gildenzone",
"Gildenzone",
}

guild_map_name = guild_map_names[empire]
local empire_castle={
"Burgschlacht",
"Burgschlacht",
"Burgschlacht",
}
empire_castle =empire_castle[empire]
local sub_set = 0

if pc.count_item(30180) >= 1 then
if level < 60 then -- 60?? : ?????, ???, ????, ???
sub_set = select(guild_map_name, "Tal von Seungryong", "Yongbi-Wüste", "Berg Sohan", empire_castle, "Drachengottamulett benutzen", "Andere Gebiete")
if sub_set == 6 then -- ??
return
end

else -- 61?? : ????, ???, ????, ????
sub_set = select(guild_map_name, "Tal von Seungryong", "Yongbi-Wüste", "Berg Sohan", empire_castle, "Drachengottamulett benutzen", "Andere Gebiete")
if sub_set == 7 then -- ??
say_title("Teleporter:")
say("Wohin möchtest du teleportiert werden?")
say_reward(string.format("Das kostet dich %d Yang.", cost))
sub_set = select("Doyyumhwaji", "Dämonenturm", "Zurück", "Abbrechen") + 6
if sub_set == 10 then -- ??
return
end
if sub_set == 9 then -- ??
say_title("Teleporter:")
say("Wohin möchtest du teleportiert werden?")
--- l
say_reward(string.format("Das kostet dich %d Yang.", cost))
sub_set = select(guild_map_name, "Tal von Seungryong", "Yongbi-Wüste", "Berg Sohan", empire_castle, "Drachengottamulett benutzen", "Andere Gebiete")
if sub_set == 7 then -- ??
say_title("Teleporter:")
say("Wohin möchtest du teleportiert werden?")
say_reward(string.format("Das kostet dich %d Yang.", cost))
sub_set = select("Doyyumhwaji", "Dämonenturm", "Abbrechen") + 6
if sub_set == 9 then -- ??
return
end
end
end
end
end

if pc.gold < cost then
say("Du hast nicht genug Geld,")
say_title("Teleporter:")
say("Ich würde dich auch kostenlos teleportieren,")
say("aber ich habe eine große Familie. Um sie zu")
say("ernähren, muss ich Geld verdienen.")
say_reward(string.format("Es kostet %d Yang.", cost))
return
end

pc.changegold(-cost)

local warp = {
-- guild_map
{
{ 128500, 1000 },
{ 179500, 1000 },
{ 271800, 13000 },
},
-- 64 map_n_threeway
{
{ 402100, 673900 },
{ 270400, 739900 },
{ 321300, 808000 },
},
-- 63 metin2_map_n_desert_01
{
{ 217800, 627200 },
{ 221900, 502700 },
{ 344000, 502500 },
},
-- 61 map_n_snowm_01
{
{ 434200, 290600 },
{ 375200, 174900 },
{ 491800, 173600 },
},
{--empire_castle
{975200, 133000},
{977200, 185000},
{923900, 183600},

} ,
{--Drachengottamulett
{ 283600, 808300 },
{ 283600, 808300 },
{ 283600, 808300 },

} ,
-- 62 metin2_map_n_flame_01
{
{ 599400, 756300 },
{ 597800, 622200 },
{ 730700, 689800 },
},
-- devil_tower
{
{ 590500, 110500 },
{ 590500, 110500 },
{ 590500, 110500 },
},
}
test_chat(warp[sub_set][empire][1]..warp[sub_set][empire][2])
say_title("Teleporter:")
say("Achtung, ich teleportiere dich jetzt. Du wirst")
say("an einem gefährlichen Ort landen, also pass auf")
say("dich auf. Viel Glück!")
wait()
pc.warp(warp[sub_set][empire][1], warp[sub_set][empire][2])
else
if level < 60 then -- 60?? : ?????, ???, ????, ???
sub_set = select(guild_map_name, "Tal von Seungryong", "Yongbi-Wüste", "Berg Sohan", empire_castle,"Andere Gebiete")
if sub_set == 6 then -- ??
return
end

else -- 61?? : ????, ???, ????, ????
sub_set = select(guild_map_name, "Tal von Seungryong", "Yongbi-Wüste", "Berg Sohan", empire_castle,"Andere Gebiete")
if sub_set == 6 then -- ??
say_title("Teleporter:")
say("Wohin möchtest du teleportiert werden?")
say_reward(string.format("Das kostet dich %d Yang.", cost))
sub_set = select("Doyyumhwaji", "Dämonenturm", "Zurück", "Abbrechen") + 5
if sub_set == 9 then -- ??
return
end
if sub_set == 8 then -- ??
say_title("Teleporter:")
say("Wohin möchtest du teleportiert werden?")
--- l
say_reward(string.format("Das kostet dich %d Yang.", cost))
sub_set = select(guild_map_name, "Tal von Seungryong", "Yongbi-Wüste", "Berg Sohan", empire_castle,"Andere Gebiete")
if sub_set == 6 then -- ??
say_title("Teleporter:")
say("Wohin möchtest du teleportiert werden?")
say_reward(string.format("Das kostet dich %d Yang.", cost))
sub_set = select("Doyyumhwaji", "Dämonenturm", "Abbrechen") + 5
if sub_set == 8 then -- ??
return
end
end
end
end
end

if pc.gold < cost then
say("Du hast nicht genug Geld,")
say_title("Teleporter:")
say("Ich würde dich auch kostenlos teleportieren,")
say("aber ich habe eine große Familie. Um sie zu")
say("ernähren, muss ich Geld verdienen.")
say_reward(string.format("Es kostet %d Yang.", cost))
return
end

pc.changegold(-cost)

local warp = {
-- guild_map
{
{ 128500, 1000 },
{ 179500, 1000 },
{ 271800, 13000 },
},
-- 64 map_n_threeway
{
{ 402100, 673900 },
{ 270400, 739900 },
{ 321300, 808000 },
},
-- 63 metin2_map_n_desert_01
{
{ 217800, 627200 },
{ 221900, 502700 },
{ 344000, 502500 },
},
-- 61 map_n_snowm_01
{
{ 434200, 290600 },
{ 375200, 174900 },
{ 491800, 173600 },
},
{--empire_castle
{975200, 133000},
{977200, 185000},
{923900, 183600},

} ,
-- 62 metin2_map_n_flame_01
{
{ 599400, 756300 },
{ 597800, 622200 },
{ 730700, 689800 },
},
-- devil_tower
{
{ 590500, 110500 },
{ 590500, 110500 },
{ 590500, 110500 },
},
}
test_chat(warp[sub_set][empire][1]..warp[sub_set][empire][2])
say_title("Teleporter:")
say("Achtung, ich teleportiere dich jetzt. Du wirst")
say("an einem gefährlichen Ort landen, also pass auf")
say("dich auf. Viel Glück!")
wait()
pc.warp(warp[sub_set][empire][1], warp[sub_set][empire][2])
end

else -- ? ?? 1,2 ? ??? ?????? ? ?? 1,2 ? ??? ?? ??
local sub_set2 = 3

--sub_set2 = select(locale.vileage1_name[empire], locale.vileage2_name[empire], locale.cancel)
if empire==1 then
sub_set2 = select("Yongan","Jayang" , locale.cancel)
elseif empire ==2 then
sub_set2 = select("Joan","Bokjung" , locale.cancel)
elseif empire ==3 then
sub_set2 = select("Pyungmoo","Bakra" , locale.cancel)
end
if sub_set2 != 3 then
if pc.gold < cost then
say_title("Teleporter:")
say("Ich würde dich auch umsonst teleportieren,")
say("aber ich habe eine große Familie. Um sie zu")
say("ernähren, muss ich Geld verdienen.")
say_reward(string.format("Es kostet %d Yang.", cost))
else
if sub_set2 == 1 then
say_title("Teleporter:")
say("Ich teleportiere dich dorthin.")
wait()

if empire == 1 then
pc.warp(469300,964200)
elseif empire == 2 then
pc.warp(55700,157900)
elseif empire == 3 then
pc.warp(969600,278400)
end
elseif sub_set2 == 2 then
say_title("Teleporter:")
say("Ich teleportiere dich dorthin.")

wait()
if empire == 1 then
pc.warp(353100,882900)
elseif empire == 2 then
pc.warp(145500,240000)
elseif empire == 3 then
pc.warp(863900,246000)
end
end

pc.changegold(-cost)
end
end
end
end -- end_of_chat
end -- end_of_state
end -- end_of_quest

MetinLegende · 04/11/2012, 17:49

Ich such dir schnell ne andere die ist zu lang

PHP Code:


			
quest warpring begin 

    state start begin 

        when vnum.use with pc.get_level() >= 10 begin  

         

            say_title("Ring:") 

            say("Möchtest du teleportiert werden?") 

            say("Es kostet dich 10000 Yang")

            local main_set = select("Ja","Nein") 

            if main_set == 2 then 

                return 

            end 

             

            if pc.get_level() < 10 then 

                say_title("Ring:") 

                say("Hm… Mit deinem derzeitigen Level bist du noch") 

                say("zu schwach für die Reise durch Zeit und Raum.") 

                say("Komm wieder, wenn du höher als Level 10 bist.") 

                return 

            end 

            if pc.gold < 10000

                 say_title("Ring":)

                 say("Du hast nicht genug Yang um teleportiert zu werden")

                 say("Komm wieder wenn du genug Yang hast")

            

            local sub_set = select("Rotes Reich", "Blaues Reich", "Gelbes Reich", "MetinMap", "HighLvlMap 1", "HighLvlMap 2", "Abbrechen") + 5 

            if sub_set == 7 then 

                return 

                        end 

            elseif sub_set == 1 then 

                pc.warp(474120, 954400) 

            elseif sub_set == 2 then 

                pc.warp(352900, 882500) 

            elseif sub_set == 3 then 

                pc.warp(63200, 166100) 

            elseif sub_set == 4 then 

                pc.warp(999900, 999900) 

            elseif sub_set == 5 then 

                pc.warp(83200, 0) 

            elseif sub_set == 6 then 

                pc.warp(940000, 897200) 

            end 

                pc.remove_item(vnum, 1)

                pc.changemoney(-10000)

        end 

    end 

end

das kostet so jedes mal 10k, das kannst du aber umstellen. Und die Koordinaten musst du eben anpassen und das auswahlmenü wohin

terrorpimmel · 04/11/2012, 17:57

ich will doch nur eine einweg warpring quest die geld verlangt -.-*

MetinLegende · 04/11/2012, 18:02

Soll die so wie der teleporter levelbedingt kosten? Hab die eben jetzt so gemacht dass sie jedes mal 10k kostet lvl egal