Tipologie server: -test-
*Resursă folosită: -
*ServerFiles utilizat: -
*Syserr: Abort (core dumped)
Poză:
*Detalii suplimentare: Mi-am facut un quest pentru un nou inel de teleportare, dar nu stiu unde gresesc, am verificat de cel putin 5-10 ori, rand cu rand si nu am gasit nimic...
Cod: Selectaţi tot
--Quest: Teleport standard / Harta de teleportare
--OBIECT: Harta normala ( Vnum = 9033 )
--Autor: T4zu
--Tester: T4zu
quest metin2test_obj_harta_normala begin
state start begin
--=======================================================================
--UTILIZARE_HARTA_NORMALA
--=======================================================================
when 9033.use begin
--
local empire = pc.get_empire()
--
say_title( "Harta (Normala)" )
say_alb( "" )
say_galben( "(Ro)" )
say_alb( "Selecteaza zona in care doresti sa calatoresti:" )
say_alb( "" )
say_galben( "(En)" )
say_alb( "Select the area you want to travel:" )
say_alb( "" )
say_alb( "" )
say_alb( "" )
say_verde2( "Metin2Test" )
local SelectChoiceA = select( "Intern" , "Extern" , "- (X) -" )
if SelectChoiceA == 3 then return end
--====================================================================
--Intern
--====================================================================
if SelectChoiceA == 1 then
say_title( "Harta (Normala)" )
say_alb( "" )
say_alb( "(Ro) Unde doresti sa calatoresti?" )
say_alb( "(En) Where do you want to travel?" )
say_alb( "" )
say_alb( "" )
say_alb( "" )
say_alb( "" )
say_verde2( "Metin2Test" )
local SelectChoiceB = select( "Map. 1" , "Map. 2" , "- (X) -" )
if SelectChoiceB == 3 then return end
say_title( "Harta (Normala)" )
--==========================
--MAP_1
--==========================
if SelectChoiceB == 1 then
say_auriu( "Map. 1" )
say_alb( "" )
say_alb( "(Ro) In ce imperiu doresti sa calatoresti?" )
say_alb( "(En) In what empire do you want to travel?" )
say_alb( "" )
say_verde2( "Metin2Test" )
local SelectChoiceC1 = select( "Shinsoo (Rosu/Red)" , "Chunjo (Galben/Yellow)" , "Jinno (Albastru/Blue)" , "- (X) -" )
if SelectChoiceC1 == 4 then return end
if SelectChoiceC1 == 1 then
pc.warp( 474300 , 954800 ) --Red
end
if SelectChoiceC1 == 2 then
pc.warp( 55700 , 157900 ) --Yellow
end
if SelectChoiceC1 == 3 then
pc.warp( 959900 , 269200 ) --Blue
end
end
end -- IF B 1
--==========================
--MAP_2
--==========================
if SelectChoiceB == 2 then
say_auriu( "Map. 2" )
say_alb( "" )
say_alb( "(Ro) In ce imperiu doresti sa calatoresti?" )
say_alb( "(En) In what empire do you want to travel?" )
say_alb( "" )
say_verde2( "Metin2Test" )
local SelectChoiceC2 = select( "Shinsoo (Rosu/Red)" , "Chunjo (Galben/Yellow)" , "Jinno (Albastru/Blue)" , "- (X) -" )
if SelectChoiceC2 == 4 then return end
if SelectChoiceC2 == 1 then
pc.warp( 353100 , 882900 ) --Red
end
if SelectChoiceC2 == 1 then
pc.warp( 353100 , 882900 ) --Yellow
end
if SelectChoiceC2 == 3 then
pc.warp( 863900 , 246000 ) --Blue
end
end
end --IF B 2
end -- IF A 1
--====================================================================
--Extern
--====================================================================
if SelectChoiceA == 2 then
say_title( "Harta (Normala)" )
say_alb( "" )
local SelectChoiceD = select( "Valea Seungryong" , "Desertul Yongbi" , "Muntele Sohan" , "Taramul Doyumhwan" , "Zona Lungsam" , "Padurea rosie" , "Templul Hwang" , "Turnul Demonilor" , "V0" , "V1" , "V2" , "Vizuina Reginei" , "Grota exilului 1" , "Grota exilului 2" , "Catacomba Diavolului" , "Zona speciala" , "- (X) -" )
if SelectChoiceD == 17 then return end
say_title( "Harta (Normala)" )
--==========================
--Valea Seungryong
--==========================
if SelectChoiceD == 1 then
say_auriu( "Valea Seungryong" )
say_alb( "" )
say_alb( "(Ro) Unde doresti sa ajungi?" )
say_alb( "(En) Where do you want to get there?" )
local SelectChoiceE01 = select( "Intrare Regat" , "Intrare Shinsoo" , "Intrare Chunjo" , "Intrare Jinno" , "Centru" , "- (X) -" )
if SelectChoiceE01 == 6 then return end
--Intrare_Regat
if SelectChoiceE01 == 1 then
if empire == 1 then
pc.warp( 402100 , 673900 ) -- Red
return
elseif empire == 2 then
pc.warp( 270400 , 739900 ) -- Yellow
return
elseif empire == 3 then
pc.warp( 321300 , 808000 ) -- Blue
end
end
--Intrare_Regat_Shinsoo
if SelectChoiceE01 == 2 then
pc.warp( 402100 , 673900 ) -- Red
end
--Intrare_Regat_Chunjo
if SelectChoiceE01 == 3 then
pc.warp( 270400 , 739900 ) -- Yellow
end
--Intrare_Regat_Jinno
if SelectChoiceE01 == 4 then
pc.warp( 321300 , 808000 ) -- Blue
end
--Intrare_Centru
if SelectChoiceE01 == 5 then
say_title( "Harta (Normala)" )
say_item_vnum( 9034 )
say_galben( "(Ro)" )
say_alb( "Unele zone pot fi accesibile doar cu aceasta harta Premium." )
say_alb( "" )
say_galben( "(En)" )
say_alb( "Some areas can only be accessed with this Premium map." )
say_alb( "" )
say_alb( "" )
say_alb( "" )
say_reward( "INFO: (NPC) Biolog" )
say_verde2( "Metin2Test" )
end
end
--==========================
--Desertul Yongbi
--==========================
if SelectChoiceD == 2 then
say_auriu( "Desertul Yongbi" )
say_alb( "" )
say_alb( "(Ro) Unde doresti sa ajungi?" )
say_alb( "(En) Where do you want to get there?" )
local SelectChoiceE02 = select( "Intrare Regat" , "Intrare Shinsoo" , "Intrare Chunjo" , "Intrare Jinno" , "Centru" , "- (X) -" )
if SelectChoiceE02 == 6 then return end
--Intrare_Regat
if SelectChoiceE02 == 1 then
if empire == 1 then
pc.warp( 217800 , 627200 ) -- Red
return
elseif empire == 2 then
pc.warp( 221900 , 502700 ) -- Yellow
return
elseif empire == 3 then
pc.warp( 344000 , 502500 ) -- Blue
end
end
--Intrare_Regat_Shinsoo
if SelectChoiceE02 == 2 then
pc.warp( 217800 , 627200 ) -- Red
end
--Intrare_Regat_Chunjo
if SelectChoiceE02 == 3 then
pc.warp( 221900 , 502700 ) -- Yellow
end
--Intrare_Regat_Jinno
if SelectChoiceE02 == 4 then
pc.warp( 344000 , 502500 ) -- Blue
end
--Intrare_Centru
if SelectChoiceE02 == 5 then
say_title( "Harta (Normala)" )
say_item_vnum( 9034 )
say_galben( "(Ro)" )
say_alb( "Unele zone pot fi accesibile doar cu aceasta harta Premium." )
say_alb( "" )
say_galben( "(En)" )
say_alb( "Some areas can only be accessed with this Premium map." )
say_alb( "" )
say_alb( "" )
say_alb( "" )
say_reward( "INFO: (NPC) Biolog" )
say_verde2( "Metin2Test" )
end
end --IF D 2
--==========================
--Muntele Sohan
--==========================
if SelectChoiceD == 3 then
say_auriu( "Muntele Sohan" )
say_alb( "" )
say_alb( "(Ro) Unde doresti sa ajungi?" )
say_alb( "(En) Where do you want to get there?" )
local SelectChoiceE03 = select( "Intrare Regat" , "Intrare Shinsoo" , "Intrare Chunjo" , "Intrare Jinno" , "Centru" , "- (X) -" )
if SelectChoiceE03 == 6 then return end
--Intrare_Regat
if SelectChoiceE03 == 1 then
if empire == 1 then
pc.warp( 434200 , 290600 ) -- Red
return
elseif empire == 2 then
pc.warp( 375200 , 174900 ) -- Yellow
return
elseif empire == 3 then
pc.warp( 491800 , 173600 ) -- Blue
end
end
--Intrare_Regat_Shinsoo
if SelectChoiceE03 == 2 then
pc.warp( 434200 , 290600 ) -- Red
end
--Intrare_Regat_Chunjo
if SelectChoiceE03 == 3 then
pc.warp( 375200 , 174900 ) -- Yellow
end
--Intrare_Regat_Jinno
if SelectChoiceE03 == 4 then
pc.warp( 491800 , 173600 ) -- Blue
end
--Intrare_Centru
if SelectChoiceE03 == 5 then
say_title( "Harta (Normala)" )
say_item_vnum( 9034 )
say_galben( "(Ro)" )
say_alb( "Unele zone pot fi accesibile doar cu aceasta harta premium." )
say_alb( "" )
say_galben( "(En)" )
say_alb( "Some areas can only be accessed with this premium map." )
say_alb( "" )
say_alb( "" )
say_alb( "" )
say_reward( "INFO: (NPC) Biolog" )
say_verde2( "Metin2Test" )
end
end
--==========================
--Taramul Doyumhwan
--==========================
if SelectChoiceD == 4 then
say_auriu( "Taramul Doyumhwan" )
say_alb( "" )
say_alb( "(Ro) Unde doresti sa ajungi?" )
say_alb( "(En) Where do you want to get there?" )
local SelectChoiceE04 = select( "Intrare Regat" , "Intrare Shinsoo" , "Intrare Chunjo" , "Intrare Jinno" , "Centru" , "- (X) -" )
if SelectChoiceE04 == 6 then return end
--Intrare_Regat
if SelectChoiceE04 == 1 then
if empire == 1 then
pc.warp( 599400 , 756300 ) -- Red
return
elseif empire == 2 then
pc.warp( 597800 , 622200 ) -- Yellow
return
elseif empire == 3 then
pc.warp( 730700 , 730700 ) -- Blue
end
end
--Intrare_Regat_Shinsoo
if SelectChoiceE04 == 2 then
pc.warp( 599400 , 756300 ) -- Red
end
--Intrare_Regat_Chunjo
if SelectChoiceE04 == 3 then
pc.warp( 597800 , 622200 ) -- Yellow
end
--Intrare_Regat_Jinno
if SelectChoiceE04 == 4 then
pc.warp( 730700 , 730700 ) -- Blue
end
--Intrare_Centru
if SelectChoiceE04 == 5 then
say_title( "Harta (Normala)" )
say_item_vnum( 9034 )
say_galben( "(Ro)" )
say_alb( "Unele zone pot fi accesibile doar cu aceasta harta premium." )
say_alb( "" )
say_galben( "(En)" )
say_alb( "Some areas can only be accessed with this premium map." )
say_alb( "" )
say_alb( "" )
say_alb( "" )
say_reward( "INFO: (NPC) Biolog" )
say_verde2( "Metin2Test" )
end
end
--==========================
--Zona Lungsam
--==========================
if SelectChoiceD == 5 then
say_auriu( "Zona Lungsam" )
say_alb( "" )
say_alb( "(Ro) Unde doresti sa ajungi?" )
say_alb( "(En) Where do you want to get there?" )
say_alb( "" )
say_alb( "" )
say_alb( "" )
say_alb( "" )
say_alb( "" )
say_verde2( "Metin2Test" )
local SelectChoiceE05 = select( "Intrare Regat" , "Centru" , "- (X) -" )
if SelectChoiceE05 == 3 then return end
--Intrare_Regat
if SelectChoiceE05 == 1 then
pc.warp( 289000 , 5800 ) -- Main
end
--Intrare_Centru
if SelectChoiceE05 == 2 then
say_title( "Harta (Normala)" )
say_item_vnum( 9034 )
say_galben( "(Ro)" )
say_alb( "Unele zone pot fi accesibile doar cu aceasta harta premium." )
say_alb( "" )
say_galben( "(En)" )
say_alb( "Some areas can only be accessed with this premium map." )
say_alb( "" )
say_alb( "" )
say_alb( "" )
say_reward( "INFO: (NPC) Biolog" )
say_verde2( "Metin2Test" )
end
end
--==========================
--Padurea rosie
--==========================
if SelectChoiceD == 6 then
say_auriu( "Padurea rosie" )
say_alb( "" )
say_alb( "(Ro) Unde doresti sa ajungi?" )
say_alb( "(En) Where do you want to get there?" )
say_alb( "" )
say_alb( "" )
say_alb( "" )
say_alb( "" )
say_alb( "" )
say_verde2( "Metin2Test" )
local SelectChoiceE06 = select( "Intrare Regat" , "Centru" , "- (X) -" )
if SelectChoiceE06 == 3 then return end
--Intrare_Regat
if SelectChoiceE06 == 1 then
pc.warp( 1119900 , 70800 ) --Main
end
--Intrare_Centru
if SelectChoiceE06 == 2 then
say_title( "Harta (Normala)" )
say_item_vnum( 9034 )
say_galben( "(Ro)" )
say_alb( "Unele zone pot fi accesibile doar cu aceasta harta premium." )
say_alb( "" )
say_galben( "(En)" )
say_alb( "Some areas can only be accessed with this premium map." )
say_alb( "" )
say_alb( "" )
say_alb( "" )
say_reward( "INFO: (NPC) Biolog" )
say_verde2( "Metin2Test" )
end
end
--========================== NEFINALIZAT_COORDONATE_NECUNOSCUTE !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
--Templul Hwang
--==========================
if SelectChoiceD == 7 then
say_auriu( "Templul Hwang" )
say_alb( "" )
say_alb( "(Ro) Unde doresti sa ajungi?" )
say_alb( "(En) Where do you want to get there?" )
say_alb( "" )
say_alb( "" )
say_alb( "" )
say_alb( "" )
say_alb( "" )
say_verde2( "Metin2Test" )
local SelectChoiceE07 = select( "Intrare Regat" , "Centru" , "- (X) -" )
if SelectChoiceE07 == 3 then return end
--Intrare_Regat
if SelectChoiceE07 == 1 then
pc.warp( 1119900 , 70800 ) --Main ????
end
--Intrare_Centru
if SelectChoiceE07 == 2 then
say_title( "Harta (Normala)" )
say_item_vnum( 9034 )
say_galben( "(Ro)" )
say_alb( "Unele zone pot fi accesibile doar cu aceasta harta premium." )
say_alb( "" )
say_galben( "(En)" )
say_alb( "Some areas can only be accessed with this premium map." )
say_alb( "" )
say_alb( "" )
say_alb( "" )
say_reward( "INFO: (NPC) Biolog" )
say_verde2( "Metin2Test" )
end
end
--==========================
--Turnul Demonilor
--==========================
if SelectChoiceD == 8 then
pc.warp( 590400 , 110500 ) --Main
end
--==========================
--V0
--==========================
if SelectChoiceD == 9 then
pc.warp( 1059000 , 726200 ) --Main
end
--==========================
--V1
--==========================
if SelectChoiceD == 10 then
pc.warp( 91900 , 525400 ) --Main
end
--==========================
--V2
--==========================
if SelectChoiceD == 11 then
pc.warp( 704100 , 464100 ) --Main
end
--==========================
--Vizuina Reginei
--==========================
if SelectChoiceD == 12 then
--pc.warp( 10000 , 1214200 ) --Main
--end
--SUS_HARTA_PREMIUM
--JOS_HARTA_NORMALA
say_title( "Harta (Normala)" )
say_item_vnum( 9034 )
say_galben( "(Ro)" )
say_alb( "Unele zone pot fi accesibile doar cu aceasta harta premium." )
say_alb( "" )
say_galben( "(En)" )
say_alb( "Some areas can only be accessed with this premium map." )
say_alb( "" )
say_alb( "" )
say_alb( "" )
say_reward( "INFO: (NPC) Biolog" )
say_verde2( "Metin2Test" )
end
--==========================
--Grota exilului 1
--==========================
if SelectChoiceD == 13 then
pc.warp( 10000 , 1214200 ) --Main
end
--==========================
--Grota exilului 2
--==========================
if SelectChoiceD == 14 then
say_auriu( "Grota Exilului 2" )
say_alb( "" )
say_alb( "(Ro) Unde doresti sa ajungi?" )
say_alb( "(En) Where do you want to get there?" )
say_alb( "" )
say_alb( "" )
say_alb( "" )
say_alb( "" )
say_alb( "" )
say_verde2( "Metin2Test" )
local SelectChoiceE14 = select( "Intrare Regat" , "Templul dragonului" , "- (X) -" )
if SelectChoiceE14 == 3 then return end
--Intrare_Regat
if SelectChoiceE14 == 1 then
pc.warp( 1119900 , 70800 ) --Main
end
--Intrare_Centru
if SelectChoiceE14 == 2 then
-- if pc.get_empty_inventory_count() < 1 then
-- --FEREASTRA_CHAT
-- chat( "_________________________________________________" )
-- chat( "Metin2Test system:")
-- chat( "(Ro) Ai nevoie de un spatiu liber in inventar pentru a continua!" )
-- chat( "(En) You need a free inventory space to continue!" )
-- --END_FEREASTRA_CHAT
-- return
-- else
-- pc.warp( 10000 , 1214200 ) --Main ???
-- pc.give_item2( 30179 , 3 )
-- end
--end
--SUS_HARTA_PREMIUM
--JOS_HARTA_NORMALA
say_title( "Harta (Normala)" )
say_item_vnum( 9034 )
say_galben( "(Ro)" )
say_alb( "Unele zone pot fi accesibile doar cu aceasta harta premium." )
say_alb( "" )
say_galben( "(En)" )
say_alb( "Some areas can only be accessed with this premium map." )
say_alb( "" )
say_alb( "" )
say_alb( "" )
say_reward( "INFO: (NPC) Biolog" )
say_verde2( "Metin2Test" )
end
end
--==========================
--Catacomba diavolului
--==========================
if SelectChoiceD == 15 then
say_title( "Harta (Normala)" )
say_alb( "" )
--Conditii
if pc.get_level() < 59 then
say_galben( "(Ro)" )
say_rosu( "Nu ai nivelul necesar pentru a continua!" )
say_alb( "" )
say_galben( "(En)" )
say_rosu( "You do not have required the level to continue!" )
say_alb( "" )
say_alb( "" )
say_alb( "" )
say_alb( "" )
say_alb( "" )
say_alb( "" )
say_reward( "LVL: 59+" )
say_verde2( "Metin2Test" )
return
elseif pc.get_empty_inventory_count() < 1 then
--FEREASTRA_CHAT
chat( "_________________________________________________" )
chat( "Metin2Test system:")
chat( "(Ro) Ai nevoie de un spatiu liber in inventar pentru a continua!" )
chat( "(En) You need a free inventory space to continue!" )
--END_FEREASTRA_CHAT
return
elseif pc.count_item( 9024 ) < 1 then
say_galben( "(Ro)" )
say_rosu( "Pentru a intra in Catacomba diavolului trebuie sa" )
say_rosu( "detii in inventar 1x Totem intunecat!" )
say_alb( "" )
say_galben( "(En)" )
say_rosu( "If you want to go in Devil's Catacomb you need to")
say_rosu( "have in the inventory 1x Totem intunecat!" )
say_alb( "" )
say_alb( "" )
say_alb( "" )
say_alb( "" )
say_alb( "" )
say_verde2( "Metin2Test" )
return
else --if pc.get_level() >= 59 then
say_galben( "(Ro)" )
say_alb( "Pentru a intra in Catacomba diavolului este necesar sa" )
say_alb( "parcurgi Turnul demonilor, de unde va trebui sa obtii," )
say_alb( "(incepand de la etajul 7), Toteme intunecate sau poti" )
say_alb( "folosi Harta (avansata), pentru a intra direct..." )
say_alb( "" )
say_galben( "(En)" )
say_alb( "If you want to go in Devil's Catacomb it is necessary" )
say_alb( "to go first in the Demon Tower, because you need to" )
say_alb( "get Dark Totems, (starting from the 7 floor) or you" )
say_alb( "can use Harta (avansata) to enter directly..." )
say_alb( "" )
say_verde2( "Metin2Test" )
wait()
say_title( "Harta (Normala)" )
say_alb( "" )
say_galben( "(Ro)" )
say_alb( "Dupa ce intri in Catacomba diavolului este bine de stiut" )
say_alb( "ca pentru a trece mai departe va trebui sa obti rapid 1x" )
say_alb( "Cheia Suflet Cristalizat; (1/Grupa)." )
say_alb( "Doresti sa intri in Catacomba diavolului?" )
say_alb( "" )
say_galben( "(En)" )
say_alb( "After entering the Catacombs of the Devil, it is good to" )
say_alb( "know that to move on you will have to quickly get 1x" )
say_alb( "Cheia Suflet Cristalizat; (1/Group)." )
say_alb( "Do you want to enter in Devil's Catacomb?" )
local SelectChoiceE15 = select( "Da" , "Nu acum" )
if SelectChoiceE15 == 2 then return end
if SelectChoiceE15 == 1 then
pc.remove_item( 9024 , 1 )
pc.warp( 307200 , 1203200 ) --Main
end
end -- END CONDITII
end --IF D 15
--==========================
--Zona Speciala (Cape)
--==========================
if SelectChoiceD == 16 then
--pc.warp(1084600, 1784400) --Main
--end
--SUS_HARTA_PREMIUM
--JOS_HARTA_NORMALA
say_title( "Harta (Normala)" )
say_item_vnum( 9034 )
say_item_vnum( 9027 )
say_galben( "(Ro)" )
say_alb( "Pentru a merge in Zona Speciala, ai nevoie de aceste" )
say_alb( "articole sau de 1x Tichet de trecere." )
say_galben( "(En)" )
say_alb( "If you want to go in the Special Area, you need to have" )
say_alb( "these items or 1x Tichet de trecere." )
end
end -- IF A 2
end --When
end
end




