|
You last visited: Today at 07:52
Advertisement
[SERVICE] Die Questkontrolle
Discussion on [SERVICE] Die Questkontrolle within the Metin2 Private Server forum part of the Metin2 category.
01/31/2012, 14:12
|
#4651
|
elite*gold: 40 
Join Date: May 2010
Posts: 413
Received Thanks: 519
|
naja bloß dann würde er nicht uknown regentype schreiben und die regen files hab ich alle geleert auch die skia_boss1-5.txt ist alles leer
|
![[ShiizoPhreN]™ is offline](images/elitepvpers/statusicon/user_offline.gif)
|
|
|
01/31/2012, 16:23
|
#4652
|
elite*gold: 0
Join Date: Oct 2011
Posts: 8
Received Thanks: 0
|
PHP Code:
quest Shop begin
state start begin
when 30000.chat."Rassen-Shops" begin
say_title("HalliHallo und Herzlichen Willkommen auf Famous2?")
say("Da wir zuviele NPCs vermeiden wollten All in One. Alle Rassen-Shops hier!)
say("Was willst du genau haben?")
local s = select("Ninja-Zeug","Krieger-Zeugs","Schamane-Zeugs","Sura-Zeugs","Ich will nix alter.")
if s == 1 then
npc.open_shop(1)
end
if s == 2 then
npc.open_shop(6)
end
if s == 3 then
npc.open_shop(765)
end
if s == 4 then
npc.open_shop(101)
end
end
end
end
|
|
|
|
|
01/31/2012, 17:45
|
#4653
|
elite*gold: 0
Join Date: Jul 2010
Posts: 385
Received Thanks: 129
|
Hab für Kollegen ne Quest geschrieben aber ich erkenne keine Fehler trotzdem "ERRRRROR"-.-
Das 2 if s == 1 then Ist nicht der FEHLER das soll nur so sien das,das Fenster dann zu geht als nein
BITTE UM HELP-.-
Quote:
quest Gemii begin
state start begin
when 30000.chat."Item-Shop" begin
say_title("HalliHallo und Herzlichen WIlkommen auf Famous2?:")
say("Hier alle Rassenshops")
say("Welchen Shop?")
local s = select("Ja","Nein","Kein Shop bitte.")
if s == 1 then
npc.open_shop(6)
end
if s == 1 then
npc.open_shop(6)
end
end
end
end
|
|
|
|
|
|
01/31/2012, 18:09
|
#4654
|
elite*gold: 0
Join Date: Jan 2011
Posts: 2,903
Received Thanks: 1,262
|
@Techem
Versuch es mal so
PHP Code:
quest Shop begin
state start begin
when 30000.chat."Rassen-Shops" begin
say_title("HalliHallo und Herzlichen Willkommen auf Famous2?")
say("Da wir zuviele NPCs vermeiden wollten All in One. Alle Rassen-Shops hier!")
say("Was willst du genau haben?")
local s = select("Ninja-Zeug","Krieger-Zeugs","Schamane-Zeugs","Sura-Zeugs","Ich will nix alter.")
if s==5 then
return
end
elseif s == 1 then
npc.open_shop(1)
elseif s == 2 then
npc.open_shop(6)
elseif s == 3 then
npc.open_shop(765)
elseif s == 4 then
npc.open_shop(101)
end
end
end
|
|
|
|
|
01/31/2012, 18:15
|
#4655
|
elite*gold: 15
Join Date: Sep 2010
Posts: 844
Received Thanks: 975
|
PHP Code:
quest Shop begin
state start begin
when 30000.chat."Rassen-Shops" begin
say_title("HalliHallo und Herzlichen Willkommen auf Famous2?")
say("Da wir zuviele NPCs vermeiden wollten All in One. Alle Rassen-Shops hier!")
say("Was willst du genau haben?")
local s = select("Ninja-Zeug","Krieger-Zeugs","Schamane-Zeugs","Sura-Zeugs","Ich will nix alter.")
if s == 1 then
npc.open_shop(1)
end
if s == 2 then
npc.open_shop(6)
end
if s == 3 then
npc.open_shop(765)
end
if s == 4 then
npc.open_shop(101)
end
end
end
end
PHP Code:
quest Gemii begin
state start begin
when 30000.chat."Item-Shop" begin
say_title("HalliHallo und Herzlichen WIlkommen auf Famous2?:")
say("Hier alle Rassenshops")
say("Welchen Shop?")
local s = select("Ja","Nein","Kein Shop bitte.")
if s == 1 then
npc.open_shop(6)
else
return
end
end
end
end
Falls sich das fenster nach dem schließen des shops nicht anpasst, einfach unter npc.open_shop() "setskin(NOWINDOW) " einfügen 
|
|
|
|
|
01/31/2012, 20:22
|
#4656
|
elite*gold: 0
Join Date: Jan 2011
Posts: 2,504
Received Thanks: 870
|
warp quest
hallo com hab da ein problem und zwar diese quest
bei daroos 1678 file also funktioniert klike npc ann geht fenster auf waele eine mapp dan schliest es also wede nicht geportet
kann einer bitte helfen??
PHP Code:
quest npc_shop begin
state start begin
when 20083.chat."Extra Teleporter" begin
local s = select("Frosh Map","Eis Metin Map","Boss Doungen","Beenden")
if s == 1 then
pc.warp(999900,999900)
end
if s == 2 then
pc.warp(12800,10000)
end
if s == 3 then
pc.warp(153600,1049600)
end
if s == 4 then
setskin(NOWINDOW)
end
if s == 5 then
setskin(NOWINDOW)
end
if s == 6 then
setskin(NOWINDOW)
end
if s == 87 then
setskin(NOWINDOW)
end
if s == 9 then
setskin(NOWINDOW)
end
if s == 10 then
setskin(NOWINDOW)
end
end
end
end
|
|
|
|
|
02/01/2012, 12:35
|
#4657
|
elite*gold: 389
Join Date: Jul 2010
Posts: 4,910
Received Thanks: 530
|
Ich bekomme immer diesen Fehler wenn ich die Quest "tausch.quest" einfügen will.
PHP Code:
QUEST : perlentausch
STATE : start
WHEN : 20018.take
with item . vnum == 27992
qc in malloc(): error: allocation failed
Abort trap (core dumped)
Segmentation fault (core dumped)
Hier ist einmal die "tausch.quest"
PHP Code:
quest perlentausch begin
state start begin
when 20018.take with item.vnum == 27992 begin
say("Hey,")
say("Bist du etwa auf der Suche nach einer anderen Perle?")
say("Nun dann bist du hier richtig!! Ich habe Perlen jeder Art.")
say("Allerdings bin ich nur innerhalb des Koenigreichs unterwegs, was bedeutet")
say("Ich kann dir nur Blutrote, Blaue oder Weiße Perlen anbieten.")
say("")
local s = select ("Blaue Perle", "Blutrote Perle", "Nichts von alledem!")
if s == 1 then
if pc.count_item(27992) >= 1 then
pc.removeitem("27992")
pc.give_item2("27993")
say("Danke dir!")
say("Du erhältst eine Blaue Perle")
say("Ich hoffe sie wird dir von großem Nutzen sein")
say("lieber Abenteurer!")
say("")
end
if s == 2 then
if pc.count_item(27992) >= 1 then
pc.removeitem("27992")
pc.give_item2("27994")
say("Danke dir!")
say("Du erhältst eine Blutrote Perle")
say("Ich hoffe sie wird dir von großem Nutzen sein")
say("lieber Abenteurer!")
say("")
end
end
end
when 20018.take with item.vnum == 27993 begin
say("Hey,")
say("Bist du etwa auf der Suche nach einer anderen Perle?")
say("Nun dann bist du hier richtig!! Ich habe Perlen jeder Art.")
say("Allerdings bin ich nur innerhalb des Koenigreichs unterwegs, was bedeutet")
say("Ich kann dir nur Blutrote, Blaue oder Weiße Perlen anbieten.")
say("")
local s = select ("Weiße Perle", "Blutrote Perle", "Nichts von alledem!")
if s == 1 then
if pc.count_item(27993) >= 1 then
pc.removeitem("27993")
pc.give_item2("27992")
say("Danke dir!")
say("Du erhältst eine Weiße Perle")
say("Ich hoffe sie wird dir von großem Nutzen sein")
say("lieber Abenteurer!")
say("")
end
if s == 2 then
if pc.count_item(27993) >= 1 then
pc.removeitem("27993")
pc.give_item2("27994")
say("Danke dir!")
say("Du erhältst eine Blutrote Perle")
say("Ich hoffe sie wird dir von großem Nutzen sein")
say("lieber Abenteurer!")
say("")
end
end
end
when 20018.take with item.vnum == 27994 begin
say("Hey,")
say("Bist du etwa auf der Suche nach einer anderen Perle?")
say("Nun dann bist du hier richtig!! Ich habe Perlen jeder Art.")
say("Allerdings bin ich nur innerhalb des Koenigreichs unterwegs, was bedeutet")
say("Ich kann dir nur Blutrote, Blaue oder Weiße Perlen anbieten.")
say("")
local s = select ("Weiße Perle", "Blaue Perle", "Nichts von alledem!")
if s == 1 then
if pc.count_item(27994) >= 1 then
pc.removeitem("27994")
pc.give_item2("27992")
say("Danke dir!")
say("Du erhältst eine Weiße Perle")
say("Ich hoffe sie wird dir von großem Nutzen sein")
say("lieber Abenteurer!")
say("")
end
if s == 2 then
if pc.count_item(27994) >= 1 then
pc.removeitem("27994")
pc.give_item2("27993")
say("Danke dir!")
say("Du erhältst eine Blaue Perle")
say("Ich hoffe sie wird dir von großem Nutzen sein")
say("lieber Abenteurer!")
say("")
end
end
end
|
|
|
|
|
02/01/2012, 14:39
|
#4658
|
elite*gold: 0
Join Date: Jul 2011
Posts: 501
Received Thanks: 110
|
Hey,
will meinen Warpring eine Quest geben undzwar, dass beim anklicken 3 Kategorien kommen:
"Map 1 & Map 2"
"Dungeon's"
"Sonstige Map's"
"Abbrechen"
und beim anklicken einer Kategorie zB. bei Dungeon's sollte dann stehen:
"SD1"
"SD2"
"Grotte 1"
"Grotte 2"
"Zurück"
"Abbrechen"
Wenn man dann eines anklickt sollte man teleportiert werden.
Ich weiß nur nicht wie man die Kategorien macht.
Hab schon was angefangen, aber ist vollkommen falsch^^
PHP Code:
quest warpring begin
state start begin
when 70007.use with pc.get_level() >= 10 begin
if pc.countitem("70007")>=1 then
pc.removeitem("70007", 1)
end
say_title("Ring:")
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("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
local map = pc.get_map_index()
local empire = pc.get_empire()
local level = pc.get_level()
say_title("Ring:")
say("Wohin möchtest du teleportiert werden?")
-- ?? ?? ???? ?? ?? (? ?? 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 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?")
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
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?")
sub_set = select("Doyyumhwaji", "Dämonenturm", "Abbrechen") + 5
if sub_set == 8 then -- ??
return
end
end
end
end
end
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("Ring:")
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 -- ? ?? 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 sub_set2 == 1 then
say_title("Ring:")
say("Ich teleportiere dich dorthin.")
wait()
if empire == 1 then
pc.warp(474300,954800)
elseif empire == 2 then
pc.warp(63800,166400)
elseif empire == 3 then
pc.warp(959900,269200)
end
elseif sub_set2 == 2 then
say_title("Ring:")
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 -- end sub set check2 if
end -- end sub set check1 if
end -- end map check if
end -- end when use item
end -- end state start
end -- end quest warpring
|
|
|
|
|
02/01/2012, 14:44
|
#4659
|
elite*gold: 26
Join Date: Mar 2010
Posts: 3,765
Received Thanks: 2,661
|
lieber selber komplett neu schreiben.
Geht schneller als jetzt deine Quests zu bearbeiten^^
|
|
|
|
|
02/01/2012, 15:53
|
#4660
|
elite*gold: 36
Join Date: Nov 2011
Posts: 2,966
Received Thanks: 279
|
Fehlermeldung:
Quest:
PHP Code:
quest allshops begin
state start begin
when 20091.chat."Steine" begin
npc.open_shop(5558)
end
when 20091.chat."Sonderitems" begin
npc.open_shop(5554)
end
when 20094.chat."Waffen" begin
npc.open_shop(5555)
end
when 20094.chat."Rüstungen" begin
npc.open_shop(5556)
end
when 20094.chat."Schmuck" begin
npc.open_shop(5557)
end
when 20094.chat."Ausrüstung" begin
npc.open_shop(5559)
end
und die geht auch nicht
PHP Code:
quest gemifenster begin
state start begin
when 20091.chat."Steine" begin
npc . open_shop( 5558 )
setskin(NOWINDOW)
end
when 20091.chat."Sonderitems" begin
npc . open_shop( 5554 )
setskin(NOWINDOW)
when 20094.chat."Waffen" begin
npc . open_shop( 5555 )
setskin(NOWINDOW)
end
when 20094.chat."Rüstungen" begin
npc . open_shop( 5556 )
setskin(NOWINDOW)
when 20094.chat."Schmuck" begin
npc . open_shop( 5557 )
setskin(NOWINDOW)
end
when 20094.chat."Ausrüstung" begin
npc . open_shop( 5559 )
setskin(NOWINDOW)
end
end
end
|
|
|
|
|
02/01/2012, 16:37
|
#4661
|
elite*gold: 15
Join Date: Sep 2010
Posts: 844
Received Thanks: 975
|
@ reez:
PHP Code:
quest perlentausch begin
state start begin
function perlen(perle1, perle2, weg)
say("Hey,")
say("Bist du etwa auf der Suche nach einer anderen Perle?")
say("Nun dann bist du hier richtig!! Ich habe Perlen jeder Art.")
say("Allerdings bin ich nur innerhalb des Koenigreichs unterwegs, was bedeutet")
say("Ich kann dir nur Blutrote, Blaue oder Weiße Perlen anbieten.")
say("")
local s = select(""..item_name(perle1).."", ""..item_name(perle2).."", "Nichts von alledem!")
if s == 1 then
if pc.count_item(weg) >= 1 then
pc.removeitem(weg, 1)
pc.give_item2(perle1, 1)
say("Danke dir!")
say("Du erhältst eine "..item_name(perle1).." Perle")
say("Ich hoffe sie wird dir von großem Nutzen sein")
say("lieber Abenteurer!")
say("")
end
end
if s == 2 then
if pc.count_item(weg) >= 1 then
pc.removeitem(weg, 1)
pc.give_item2(perle2, 1)
say("Danke dir!")
say("Du erhältst eine "..item_name(perle2).." Perle")
say("Ich hoffe sie wird dir von großem Nutzen sein")
say("lieber Abenteurer!")
say("")
end
end
end
when 20018.take with item.vnum == 27992 begin perlentausch.perlen(27993, 27994, 27992) end
when 20018.take with item.vnum == 27993 begin perlentausch.perlen(27992, 27994, 27993) end
when 20018.take with item.vnum == 27994 begin perlentausch.perlen(27992, 27993, 27994) end
end
end
@realmadrid: falls ich lust hab, mach ich dir später solch eine quest
@exelence:
PHP Code:
quest allshops begin
state start begin
when 20091.chat."Steine" begin
npc.open_shop(5558)
setskin(NOWINDOW)
end
when 20091.chat."Sonderitems" begin
npc.open_shop(5554)
setskin(NOWINDOW)
end
when 20094.chat."Waffen" begin
npc.open_shop(5555)
setskin(NOWINDOW)
end
when 20094.chat."Rüstungen" begin
npc.open_shop(5556)
setskin(NOWINDOW)
end
when 20094.chat."Schmuck" begin
npc.open_shop(5557)
setskin(NOWINDOW)
end
when 20094.chat."Ausrüstung" begin
npc.open_shop(5559)
setskin(NOWINDOW)
end
end
end
|
|
|
|
|
02/01/2012, 17:00
|
#4662
|
elite*gold: 0
Join Date: Oct 2010
Posts: 9
Received Thanks: 0
|
if get_time ( ) > pc . getqf ( "duration" ) then
say ( "Stallbursche:" )
say ( "Wenn du ein Kaumpfgaul haben wilst" )
say ( "bring mir einfach 10 Pferdemedaillen" )
say ( "und du bekommst dein Kampfgaul sofort" )
say ("")
say ("")
say ( "Du hast 10 Pferdemedaillen dabei" )
say ( "und willst jetzt dein Kampfgaul?" )
local s = select ( "Ja." , "Nein." )
if 2 = s then
return
end
target . delete ( "__TARGET__" )
local horse medal = pc . count_item ( 50050 )
if horse medal < 10
say ( "Stallbursche:" )
say ( "Du hast nicht 10 Pferdemedaillen" )
say ( "" )
return
end
if horse medal > 10
say ( "Stallbursche:" )
say ( "Danke." )
say ( "Hier ist dein" )
say ( "Kampfgaul!" )
pc . remove_item ( 50050 , 10 )
elseif horse.get_level()>=11 then
end
Wäre schön wenn du mir sagen könntest wo der fehler ist.
|
|
|
|
|
02/01/2012, 17:38
|
#4663
|
elite*gold: 40
Join Date: May 2010
Posts: 413
Received Thanks: 519
|
Quote:
Hi...
Ich hab wie soviele ein problem bei der drachenraum Q wenn ich den metinstein im raum kille werd ich geportet dann seh ich kurz die map und dann bekomm ich kick und in putty kommt das hier:
HTML Code:
Assertion failed: (m_pUsedList==NULL && "CDynamicPool::~CDynamicPool() - NOT Clear"), function ~CDynamicPool, file ../../common/pool.h, line 41.
connect: Connection refused
und in der syserr steht nur unknown regentype doch ich hab die regen dateien extra alle geleert..
Das hier ist die Quest:
HTML Code:
----------------------------------------------------
--Tempel des Drachen
----------------------------------------------------
quest Tempel_of_dragon begin
state start begin
function drachen_login()
rows = mysql_select("SELECT COUNT(id) FROM "..DATABASE..".LOG_Drachentempel_login")
local calcc = tonumber(rows[1][1]) + 1
mysql_notselect("INSERT INTO player.LOG_Drachentempel_login (id, account_id, player_id, player_name, map_index, date) VALUES ('"..calcc.."','"..pc.get_account_id().."','"..pc.get_player_id().."','"..pc.get_name().."','"..pc.get_map_index().."', NOW() )")
end
function drachen_kill()
rows = mysql_select("SELECT COUNT(id) FROM "..DATABASE..".LOG_Drachentempel_kill")
local calcc = tonumber(rows[1][1]) + 1
mysql_notselect("INSERT INTO player.LOG_Drachentempel_kill (account_id, player_id,player_name,map_index,date) VALUES ('"..calcc.."','"..pc.get_account_id().."','"..pc.get_player_id().."','"..pc.get_name().."','"..pc.get_map_index().."', NOW() )")
end
function av_drachen_kill()
rows = mysql_select("SELECT beran_kill FROM player.Archivments where player_id='"..pc.get_player_id().."'")
local calcc = tonumber(rows[1][1]) + 1
rows = mysql_notselect("UPDATE player.Archivments SET beran_kill='"..caalc.."' WHERE player_id='"..pc.get_player_id().."'")
end
when 30121.chat."Tempel des Drachen" with pc.get_map_index() == 73 begin
if get_time() > game.get_event_flag("Grotte_time") then
game.set_event_flag("Grotte_zugang",0)
end
if pc.is_gm() or pc.count_item(80041) >= 1 then
say_title(""..mob_name(30121).."")
say("")
say("Hallo Gamemaster, "..pc.get_name().."")
say("Ich lasse dich auch ohne die Schlüssel und")
say("das Passwort passieren.")
wait()
pc.warp(843200, 1066900)
return
end
if game.get_event_flag("Grotte_zugang") == 0 and pc.count_item(30179) < 3 then
say_title(""..mob_name(30121).."")
say("")
say("Dir fehlen "..item_name(30179).."")
say_item_vnum(30179)
say("Komme wieder wenn du 3 besitzt.")
return
end
if game.get_event_flag("Grotte_zugang") == 1 then
say_title(""..mob_name(30121).."")
say("")
pc.setqf("grotte_passworto", 078954687921)
if pc.getqf("abgabe") == 1 then
pc.setqf("abgabe",0)
say("Du hast bereits deine 3 Schlüssel abgeben.")
say("Ich lasse dich passieren.")
pc.setqf("erlaubt",1)
wait()
pc.warp(843200, 1066900)
return
end
say("Tut mir Leid, der Raum ist reseviert.")
say("Wenn du ein die Kennzahl hast für den Zugang,")
say("gebe sie jetzt bitte ein.")
local passwort = tonumber(input(""))
--pc.setqf("grotte_passworto", passwort)
if game.get_event_flag("Grotte_passwort") == passwort then
say_title(""..mob_name(30121).."")
say("")
say("Die Kennzahl stimmt überein.")
if pc.count_item(30179) < 3 then
say("Ich kann dir den zutritt nicht gewähren")
say("Dir fehlt "..item_name(30179).."")
say_item_vnum(30179)
say("Komme wieder wenn du 3 besitzt.")
return
end
say("Ich gewähre dir den zutritt!")
pc.setqf("erlaubt",1)
wait()
if pc.can_warp() then pc.remove_item("30179",3) end
pc.warp(843200, 1066900)
elseif passi != pc.getqf("grotte_passworto") then
say_title(""..mob_name(30121).."")
say("")
say("Die Kennzahl ist leider falsch.")
return
end
end
if game.get_event_flag("Grotte_zugang") == 0 and pc.count_item(30179) >= 3 then
say_title(""..mob_name(30121).."")
say("")
say("Du bist der erste der den Eintritt in den Tempel")
say("des Drachens verlangt. Ich werde dich passieren")
say("lassen, sofern du einen gewunden Schlüssel")
say("besitzt. Bevor du den Raum betreten darfst")
say("musst du eine geheime Zahl eingeben.")
say("Diese kannst du innerhalb von 5 Minuten an")
say("deine Mitstreiter weitergeben, so das auch")
say("sie den Raum betreten können. ")
say("")
say("Bedenke auch das die Macht der Schlüssel nur")
say("30 Minuten lang hält. In dieser Zeit müsst")
say("ihr den Drachen besiegt haben.")
local i = select("Ich bin Bereit", "Abbrechen")
if 1 == i then
say_title(""..mob_name(30121).."")
say("Dann Lege jetzt die kennzahl fest.")
local passwort = tonumber(input(""))
if passwort and passwort <= 999999999 and pc.count_item(30179)>=1 then
game.set_event_flag("Grotte_zugang",1)
game.set_event_flag("Grotte_passwort",passwort)
local times = get_time() + 300 --Wartezeit
game.set_event_flag("Grotte_time", times)
say_title(""..mob_name(30121).."")
pc.setqf("abgabe",1)
say("")
say("Die Kennzahl lautet:")
chat("Die Kennzahl lautet für den Tempel des Drachen: "..passwort.."")
say_reward(""..passwort.."")
say("Gib die Kennzahl deinen Mitstreitern weiter")
pc.remove_item("30179",3)
else
say_title(""..mob_name(30121).."")
say("")
say("Beim Kennzahl setzen ist ein fehler aufgetreten, versuche es erneut.")
say("Bitte gebe nur Ziffern ein.")
end
end
end
end
when login with pc.get_map_index() == 408 and not pc.is_gm() begin
if pc.count_item("80041") >= 1 then chat("Tempel des Drachen: Du hast das GM-Item, prüfungen werden geblockt!") return end
if pc.get_level() < 75 or pc.getqf("erlaubt") == 0 and pc.get_map_index() == 408 then
chat("Dir ist es nicht erlaubt diese Map zu betreten. "..pc.get_level().." "..pc.getqf("erlaubt").." "..pc.get_map_index().." ")
warp_to_village()
end
chat("Willkommen, zerstört schnell den Stein um zu dem Drachen zu gelangen.")
chat("Aber beeilt euch, sonst fliegt ihr raus")
local sekunden = game.get_event_flag("Grotte_time") - get_time()
notice_in_map("Verbleibende Zeit bis ihr rausfliegt: "..sekunden.." Sekunden")
timer("skipia_boss_ende", sekunden)
pc.set_warp_location(73 , 1825, 12207)
end
when 8023.kill with pc.get_map_index() == 408 begin
timer("skipia_boss_goo", 2)
notice_in_map("Ihr hab den Stein zerstört ihr werden nun in die nächste Ebene gebracht")
end
when skipia_boss_goo.timer begin
game.set_event_flag("Grotte_zugang",1)
d.new_jump_all(408, 8436, 10669)
d.setf("grotte_boss", 1)
d.spawn_mob(9012, 239, 173)
end
when 8031.kill or 8032.kill or 8033.kill or 8034.kill with pc.in_dungeon() and d.getf("grotte_boss") == 2 begin
local n =d.getf("count") + 1
d.setf("count", n)
--notice_all("Metin killed "..n.."")
if n > 2 then
local t = number(1,4)
--notice_all("Spawn Metin")
if 1 == t then
d.regen_file("data/dungeon/skia_boss1.txt")
elseif 2 == t then
d.regen_file("data/dungeon/skia_boss2.txt")
elseif 3 == t then
d.regen_file("data/dungeon/skia_boss3.txt")
else
d.regen_file("data/dungeon/skia_boss4.txt")
end
end
end
when 2493.kill with pc.in_dungeon() and d.getf("grotte_boss") == 2 begin
Tempel_of_dragon.drachen_kill()
Tempel_of_dragon.av_drachen_kill()
d.setf("grotte_boss", 3)
notice_all("Die Gruppe von "..pc.get_name().." hat Beran-Setaou getötet.")
d.notice("Beeindruckend, ihr habt ihn tatsächlich besiegt.") -- Als Abschluss könnt ihr noch die Metins zerstören")
d.notice("ihr werdet in 60 Sekunden zurück in Grotte 2 gebracht.")
timer("skipia_boss_end", 60)
d.kill_all()
d.spawn_mob(9012, 239, 173)
d.clear_regen()
end
when login with pc.in_dungeon() and d.getf("grotte_boss") == 2 begin
pc.set_warp_location(73 , 1825, 12207)
end
when login with pc.in_dungeon() and d.getf("grotte_boss") == 1 begin
timer("skipia_boss_end", 3600)
d.set_regen_file("data/dungeon/skia_boss.txt")
local t = number(1,4)
if 1 == t then
d.regen_file("data/dungeon/skia_boss1.txt")
elseif 2 == t then
d.regen_file("data/dungeon/skia_boss2.txt")
elseif 3 == t then
d.regen_file("data/dungeon/skia_boss3.txt")
else
d.regen_file("data/dungeon/skia_boss4.txt")
end
local o = number(1,4)
if 1 == o then
d.regen_file("data/dungeon/skia_boss1.txt")
elseif 2 == o then
d.regen_file("data/dungeon/skia_boss2.txt")
elseif 3 == o then
d.regen_file("data/dungeon/skia_boss3.txt")
else
d.regen_file("data/dungeon/skia_boss4.txt")
end
d.setf("grotte_boss", 2)
d.notice("Willkommen im Tempel des Drachen, ihr habt maximal 1 Stunde Zeit Beran-Setaou zu besiegen, Viel Erfolg")
d.setf("count", 0)
Tempel_of_dragon.drachen_login()
pc.set_warp_location(73 , 1825, 12207)
end
when login with pc.in_dungeon() and d.getf("grotte_boss") == 3 begin -- begin
--pc.warp(181700, 1220600)
end
when skipia_boss_end.timer begin
d.exit_all()
end
when skipia_boss_ende.timer begin
kill_all_in_map(408)
game.set_event_flag("Grotte_zugang",0)
d.setf("grotte_boss", 1)
d.exit_all()
end
when login with pc.get_map_index() != 408 or not pc.in_dungeon() begin
pc.setqf("erlaubt",0)
end
end
end
end
|
ich push ma mein beitrag ich need dort immernoch hilfe xD
|
|
|
|
|
02/01/2012, 17:52
|
#4664
|
elite*gold: 0
Join Date: Feb 2010
Posts: 60
Received Thanks: 16
|
Quote:
Originally Posted by [ShiizoPhreN]™
Hi...
Ich hab wie soviele ein problem bei der drachenraum Q wenn ich den metinstein im raum kille werd ich geportet dann seh ich kurz die map und dann bekomm ich kick und in putty kommt das hier:
HTML Code:
Assertion failed: (m_pUsedList==NULL && "CDynamicPool::~CDynamicPool() - NOT Clear"), function ~CDynamicPool, file ../../common/pool.h, line 41.
connect: Connection refus
und in der syserr steht nur unknown regentype doch ich hab die regen dateien extra alle geleert..
Das hier ist die Quest:
HTML Code:
----------------------------------------------------
--Tempel des Drachen
----------------------------------------------------
quest Tempel_of_dragon begin
state start begin
function drachen_login()
rows = mysql_select("SELECT COUNT(id) FROM "..DATABASE..".LOG_Drachentempel_login")
local calcc = tonumber(rows[1][1]) + 1
mysql_notselect("INSERT INTO player.LOG_Drachentempel_login (id, account_id, player_id, player_name, map_index, date) VALUES ('"..calcc.."','"..pc.get_account_id().."','"..pc.get_player_id().."','"..pc.get_name().."','"..pc.get_map_index().."', NOW() )")
end
function drachen_kill()
rows = mysql_select("SELECT COUNT(id) FROM "..DATABASE..".LOG_Drachentempel_kill")
local calcc = tonumber(rows[1][1]) + 1
mysql_notselect("INSERT INTO player.LOG_Drachentempel_kill (account_id, player_id,player_name,map_index,date) VALUES ('"..calcc.."','"..pc.get_account_id().."','"..pc.get_player_id().."','"..pc.get_name().."','"..pc.get_map_index().."', NOW() )")
end
function av_drachen_kill()
rows = mysql_select("SELECT beran_kill FROM player.Archivments where player_id='"..pc.get_player_id().."'")
local calcc = tonumber(rows[1][1]) + 1
rows = mysql_notselect("UPDATE player.Archivments SET beran_kill='"..caalc.."' WHERE player_id='"..pc.get_player_id().."'")
end
when 30121.chat."Tempel des Drachen" with pc.get_map_index() == 73 begin
if get_time() > game.get_event_flag("Grotte_time") then
game.set_event_flag("Grotte_zugang",0)
end
if pc.is_gm() or pc.count_item(80041) >= 1 then
say_title(""..mob_name(30121).."")
say("")
say("Hallo Gamemaster, "..pc.get_name().."")
say("Ich lasse dich auch ohne die Schlüssel und")
say("das Passwort passieren.")
wait()
pc.warp(843200, 1066900)
return
end
if game.get_event_flag("Grotte_zugang") == 0 and pc.count_item(30179) < 3 then
say_title(""..mob_name(30121).."")
say("")
say("Dir fehlen "..item_name(30179).."")
say_item_vnum(30179)
say("Komme wieder wenn du 3 besitzt.")
return
end
if game.get_event_flag("Grotte_zugang") == 1 then
say_title(""..mob_name(30121).."")
say("")
pc.setqf("grotte_passworto", 078954687921)
if pc.getqf("abgabe") == 1 then
pc.setqf("abgabe",0)
say("Du hast bereits deine 3 Schlüssel abgeben.")
say("Ich lasse dich passieren.")
pc.setqf("erlaubt",1)
wait()
pc.warp(843200, 1066900)
return
end
say("Tut mir Leid, der Raum ist reseviert.")
say("Wenn du ein die Kennzahl hast für den Zugang,")
say("gebe sie jetzt bitte ein.")
local passwort = tonumber(input(""))
--pc.setqf("grotte_passworto", passwort)
if game.get_event_flag("Grotte_passwort") == passwort then
say_title(""..mob_name(30121).."")
say("")
say("Die Kennzahl stimmt überein.")
if pc.count_item(30179) < 3 then
say("Ich kann dir den zutritt nicht gewähren")
say("Dir fehlt "..item_name(30179).."")
say_item_vnum(30179)
say("Komme wieder wenn du 3 besitzt.")
return
end
say("Ich gewähre dir den zutritt!")
pc.setqf("erlaubt",1)
wait()
if pc.can_warp() then pc.remove_item("30179",3) end
pc.warp(843200, 1066900)
elseif passi != pc.getqf("grotte_passworto") then
say_title(""..mob_name(30121).."")
say("")
say("Die Kennzahl ist leider falsch.")
return
end
end
if game.get_event_flag("Grotte_zugang") == 0 and pc.count_item(30179) >= 3 then
say_title(""..mob_name(30121).."")
say("")
say("Du bist der erste der den Eintritt in den Tempel")
say("des Drachens verlangt. Ich werde dich passieren")
say("lassen, sofern du einen gewunden Schlüssel")
say("besitzt. Bevor du den Raum betreten darfst")
say("musst du eine geheime Zahl eingeben.")
say("Diese kannst du innerhalb von 5 Minuten an")
say("deine Mitstreiter weitergeben, so das auch")
say("sie den Raum betreten können. ")
say("")
say("Bedenke auch das die Macht der Schlüssel nur")
say("30 Minuten lang hält. In dieser Zeit müsst")
say("ihr den Drachen besiegt haben.")
local i = select("Ich bin Bereit", "Abbrechen")
if 1 == i then
say_title(""..mob_name(30121).."")
say("Dann Lege jetzt die kennzahl fest.")
local passwort = tonumber(input(""))
if passwort and passwort <= 999999999 and pc.count_item(30179)>=1 then
game.set_event_flag("Grotte_zugang",1)
game.set_event_flag("Grotte_passwort",passwort)
local times = get_time() + 300 --Wartezeit
game.set_event_flag("Grotte_time", times)
say_title(""..mob_name(30121).."")
pc.setqf("abgabe",1)
say("")
say("Die Kennzahl lautet:")
chat("Die Kennzahl lautet für den Tempel des Drachen: "..passwort.."")
say_reward(""..passwort.."")
say("Gib die Kennzahl deinen Mitstreitern weiter")
pc.remove_item("30179",3)
else
say_title(""..mob_name(30121).."")
say("")
say("Beim Kennzahl setzen ist ein fehler aufgetreten, versuche es erneut.")
say("Bitte gebe nur Ziffern ein.")
end
end
end
end
when login with pc.get_map_index() == 408 and not pc.is_gm() begin
if pc.count_item("80041") >= 1 then chat("Tempel des Drachen: Du hast das GM-Item, prüfungen werden geblockt!") return end
if pc.get_level() < 75 or pc.getqf("erlaubt") == 0 and pc.get_map_index() == 408 then
chat("Dir ist es nicht erlaubt diese Map zu betreten. "..pc.get_level().." "..pc.getqf("erlaubt").." "..pc.get_map_index().." ")
warp_to_village()
end
chat("Willkommen, zerstört schnell den Stein um zu dem Drachen zu gelangen.")
chat("Aber beeilt euch, sonst fliegt ihr raus")
local sekunden = game.get_event_flag("Grotte_time") - get_time()
notice_in_map("Verbleibende Zeit bis ihr rausfliegt: "..sekunden.." Sekunden")
timer("skipia_boss_ende", sekunden)
pc.set_warp_location(73 , 1825, 12207)
end
when 8023.kill with pc.get_map_index() == 408 begin
timer("skipia_boss_goo", 2)
notice_in_map("Ihr hab den Stein zerstört ihr werden nun in die nächste Ebene gebracht")
end
when skipia_boss_goo.timer begin
game.set_event_flag("Grotte_zugang",1)
d.new_jump_all(408, 8436, 10669)
d.setf("grotte_boss", 1)
d.spawn_mob(9012, 239, 173)
end
when 8031.kill or 8032.kill or 8033.kill or 8034.kill with pc.in_dungeon() and d.getf("grotte_boss") == 2 begin
local n =d.getf("count") + 1
d.setf("count", n)
--notice_all("Metin killed "..n.."")
if n > 2 then
local t = number(1,4)
--notice_all("Spawn Metin")
if 1 == t then
d.regen_file("data/dungeon/skia_boss1.txt")
elseif 2 == t then
d.regen_file("data/dungeon/skia_boss2.txt")
elseif 3 == t then
d.regen_file("data/dungeon/skia_boss3.txt")
else
d.regen_file("data/dungeon/skia_boss4.txt")
end
end
end
when 2493.kill with pc.in_dungeon() and d.getf("grotte_boss") == 2 begin
Tempel_of_dragon.drachen_kill()
Tempel_of_dragon.av_drachen_kill()
d.setf("grotte_boss", 3)
notice_all("Die Gruppe von "..pc.get_name().." hat Beran-Setaou getötet.")
d.notice("Beeindruckend, ihr habt ihn tatsächlich besiegt.") -- Als Abschluss könnt ihr noch die Metins zerstören")
d.notice("ihr werdet in 60 Sekunden zurück in Grotte 2 gebracht.")
timer("skipia_boss_end", 60)
d.kill_all()
d.spawn_mob(9012, 239, 173)
d.clear_regen()
end
when login with pc.in_dungeon() and d.getf("grotte_boss") == 2 begin
pc.set_warp_location(73 , 1825, 12207)
end
when login with pc.in_dungeon() and d.getf("grotte_boss") == 1 begin
timer("skipia_boss_end", 3600)
d.set_regen_file("data/dungeon/skia_boss.txt")
local t = number(1,4)
if 1 == t then
d.regen_file("data/dungeon/skia_boss1.txt")
elseif 2 == t then
d.regen_file("data/dungeon/skia_boss2.txt")
elseif 3 == t then
d.regen_file("data/dungeon/skia_boss3.txt")
else
d.regen_file("data/dungeon/skia_boss4.txt")
end
local o = number(1,4)
if 1 == o then
d.regen_file("data/dungeon/skia_boss1.txt")
elseif 2 == o then
d.regen_file("data/dungeon/skia_boss2.txt")
elseif 3 == o then
d.regen_file("data/dungeon/skia_boss3.txt")
else
d.regen_file("data/dungeon/skia_boss4.txt")
end
d.setf("grotte_boss", 2)
d.notice("Willkommen im Tempel des Drachen, ihr habt maximal 1 Stunde Zeit Beran-Setaou zu besiegen, Viel Erfolg")
d.setf("count", 0)
Tempel_of_dragon.drachen_login()
pc.set_warp_location(73 , 1825, 12207)
end
when login with pc.in_dungeon() and d.getf("grotte_boss") == 3 begin -- begin
--pc.warp(181700, 1220600)
end
when skipia_boss_end.timer begin
d.exit_all()
end
when skipia_boss_ende.timer begin
kill_all_in_map(408)
game.set_event_flag("Grotte_zugang",0)
d.setf("grotte_boss", 1)
d.exit_all()
end
when login with pc.get_map_index() != 408 or not pc.in_dungeon() begin
pc.setqf("erlaubt",0)
end
end
end
end
|
Ich hatte mal dasselbe Problem...
Kann an SF's liegen (In den Game-Dateien sind evtl. die Mapindexe der Grotte nicht eingetragen)
Oder wie bei mir, es liegt am Client.
Schau mal in deinen Client und Poste mal deine Atlasinfo hier rein
Mfg derkiler
#Edit:
Quote:
Originally Posted by cReez'
Ich bekomme immer diesen Fehler wenn ich die Quest "tausch.quest" einfügen will.
PHP Code:
QUEST : perlentausch
STATE : start
WHEN : 20018.take
with item . vnum == 27992
qc in malloc(): error: allocation failed
Abort trap (core dumped)
Segmentation fault (core dumped)
Hier ist einmal die "tausch.quest"
PHP Code:
quest perlentausch begin
state start begin
when 20018.take with item.vnum == 27992 begin
say("Hey,")
say("Bist du etwa auf der Suche nach einer anderen Perle?")
say("Nun dann bist du hier richtig!! Ich habe Perlen jeder Art.")
say("Allerdings bin ich nur innerhalb des Koenigreichs unterwegs, was bedeutet")
say("Ich kann dir nur Blutrote, Blaue oder Weiße Perlen anbieten.")
say("")
local s = select ("Blaue Perle", "Blutrote Perle", "Nichts von alledem!")
if s == 1 then
if pc.count_item(27992) >= 1 then
pc.removeitem("27992")
pc.give_item2("27993")
say("Danke dir!")
say("Du erhältst eine Blaue Perle")
say("Ich hoffe sie wird dir von großem Nutzen sein")
say("lieber Abenteurer!")
say("")
end
if s == 2 then
if pc.count_item(27992) >= 1 then
pc.removeitem("27992")
pc.give_item2("27994")
say("Danke dir!")
say("Du erhältst eine Blutrote Perle")
say("Ich hoffe sie wird dir von großem Nutzen sein")
say("lieber Abenteurer!")
say("")
end
end
end
when 20018.take with item.vnum == 27993 begin
say("Hey,")
say("Bist du etwa auf der Suche nach einer anderen Perle?")
say("Nun dann bist du hier richtig!! Ich habe Perlen jeder Art.")
say("Allerdings bin ich nur innerhalb des Koenigreichs unterwegs, was bedeutet")
say("Ich kann dir nur Blutrote, Blaue oder Weiße Perlen anbieten.")
say("")
local s = select ("Weiße Perle", "Blutrote Perle", "Nichts von alledem!")
if s == 1 then
if pc.count_item(27993) >= 1 then
pc.removeitem("27993")
pc.give_item2("27992")
say("Danke dir!")
say("Du erhältst eine Weiße Perle")
say("Ich hoffe sie wird dir von großem Nutzen sein")
say("lieber Abenteurer!")
say("")
end
if s == 2 then
if pc.count_item(27993) >= 1 then
pc.removeitem("27993")
pc.give_item2("27994")
say("Danke dir!")
say("Du erhältst eine Blutrote Perle")
say("Ich hoffe sie wird dir von großem Nutzen sein")
say("lieber Abenteurer!")
say("")
end
end
end
when 20018.take with item.vnum == 27994 begin
say("Hey,")
say("Bist du etwa auf der Suche nach einer anderen Perle?")
say("Nun dann bist du hier richtig!! Ich habe Perlen jeder Art.")
say("Allerdings bin ich nur innerhalb des Koenigreichs unterwegs, was bedeutet")
say("Ich kann dir nur Blutrote, Blaue oder Weiße Perlen anbieten.")
say("")
local s = select ("Weiße Perle", "Blaue Perle", "Nichts von alledem!")
if s == 1 then
if pc.count_item(27994) >= 1 then
pc.removeitem("27994")
pc.give_item2("27992")
say("Danke dir!")
say("Du erhältst eine Weiße Perle")
say("Ich hoffe sie wird dir von großem Nutzen sein")
say("lieber Abenteurer!")
say("")
end
if s == 2 then
if pc.count_item(27994) >= 1 then
pc.removeitem("27994")
pc.give_item2("27993")
say("Danke dir!")
say("Du erhältst eine Blaue Perle")
say("Ich hoffe sie wird dir von großem Nutzen sein")
say("lieber Abenteurer!")
say("")
end
end
end
|
Die Fehler sagen dir dass die Quest nicht vollständig ist-> es fehlen einige end's (welche die If Befehle ausschalten)
Du hast einige end's vergessen...
So, die hier funktioniert:
PHP Code:
quest perlentausch begin
state start begin
when 20018.take with item.vnum == 27992 begin
say("Hey,")
say("Bist du etwa auf der Suche nach einer anderen Perle?")
say("Nun dann bist du hier richtig!! Ich habe Perlen jeder Art.")
say("Allerdings bin ich nur innerhalb des Koenigreichs unterwegs, was bedeutet")
say("Ich kann dir nur Blutrote, Blaue oder Weiße Perlen anbieten.")
say_item_vnum(27992)
say("")
local s = select ("Blaue Perle", "Blutrote Perle", "Nichts von alledem!")
if s == 1 then
if pc.count_item(27992) >= 1 then
pc.removeitem("27992")
pc.give_item2("27993")
say("Danke dir!")
say("Du erhältst eine Blaue Perle")
say("Ich hoffe sie wird dir von großem Nutzen sein")
say("lieber Abenteurer!")
say("")
end
end
if s == 2 then
if pc.count_item(27992) >= 1 then
pc.removeitem("27992")
pc.give_item2("27994")
say("Danke dir!")
say("Du erhältst eine Blutrote Perle")
say("Ich hoffe sie wird dir von großem Nutzen sein")
say("lieber Abenteurer!")
say("")
end
end
end
when 20018.take with item.vnum == 27993 begin
say("Hey,")
say("Bist du etwa auf der Suche nach einer anderen Perle?")
say("Nun dann bist du hier richtig!! Ich habe Perlen jeder Art.")
say("Allerdings bin ich nur innerhalb des Koenigreichs unterwegs, was bedeutet")
say("Ich kann dir nur Blutrote, Blaue oder Weiße Perlen anbieten.")
say_item_vnum(27993)
say("")
local s = select ("Weiße Perle", "Blutrote Perle", "Nichts von alledem!")
if s == 1 then
if pc.count_item(27993) >= 1 then
pc.removeitem("27993")
pc.give_item2("27992")
say("Danke dir!")
say("Du erhältst eine Weiße Perle")
say("Ich hoffe sie wird dir von großem Nutzen sein")
say("lieber Abenteurer!")
say("")
end
end
if s == 2 then
if pc.count_item(27993) >= 1 then
pc.removeitem("27993")
pc.give_item2("27994")
say("Danke dir!")
say("Du erhältst eine Blutrote Perle")
say("Ich hoffe sie wird dir von großem Nutzen sein")
say("lieber Abenteurer!")
say("")
end
end
end
when 20018.take with item.vnum == 27994 begin
say("Hey,")
say("Bist du etwa auf der Suche nach einer anderen Perle?")
say("Nun dann bist du hier richtig!! Ich habe Perlen jeder Art.")
say("Allerdings bin ich nur innerhalb des Koenigreichs unterwegs, was bedeutet")
say("Ich kann dir nur Blutrote, Blaue oder Weiße Perlen anbieten.")
say_item_vnum(27994)
say("")
local s = select ("Weiße Perle", "Blaue Perle", "Nichts von alledem!")
if s == 1 then
if pc.count_item(27994) >= 1 then
pc.removeitem("27994")
pc.give_item2("27992")
say("Danke dir!")
say("Du erhältst eine Weiße Perle")
say("Ich hoffe sie wird dir von großem Nutzen sein")
say("lieber Abenteurer!")
say("")
end
end
if s == 2 then
if pc.count_item(27994) >= 1 then
pc.removeitem("27994")
pc.give_item2("27993")
say("Danke dir!")
say("Du erhältst eine Blaue Perle")
say("Ich hoffe sie wird dir von großem Nutzen sein")
say("lieber Abenteurer!")
say("")
end
end
end
end
end
PS: habe noch die Funktion say_item_vnum eingebaut, kannst auch entfernen wenn du diese nicht benötigst.
Ich hoffe ich konnte dir weiterhelfen
Mfg derkiler
|
|
|
|
|
02/01/2012, 18:54
|
#4665
|
elite*gold: 40
Join Date: May 2010
Posts: 413
Received Thanks: 519
|
HTML Code:
map_a2 256000 665600 6 6
map_b2 102400 51200 6 6
map_c2 665600 281600 6 6
map_n_snowm_01 358400 153600 6 6
metin2_map_a1 409600 896000 4 5
metin2_map_a3 307200 819200 4 4
metin2_map_b1 0 102400 4 5
metin2_map_b3 102400 204800 4 4
metin2_map_c1 921600 204800 4 5
metin2_map_c3 819200 204800 4 4
metin2_map_deviltower1 204800 665600 3 3
metin2_map_milgyo 537600 51200 4 4
metin2_map_n_desert_01 204800 486400 6 6
metin2_map_n_flame_01 588800 614400 6 6
metin2_map_spiderdungeon 51200 486400 3 3
season1/metin2_map_spiderdungeon_02 665600 435200 4 4
metin2_map_t1 0 25600 3 3
metin2_map_t2 6400 0 1 1
metin2_map_t3 32000 0 1 1
metin2_map_t4 57600 0 1 1
metin2_map_t5 793600 0 1 1
metin2_map_monkeydungeon 819200 51200 3 3
metin2_map_monkeydungeon 768000 435200 3 3
metin2_map_monkeydungeon 844800 435200 3 3
metin2_map_monkeydungeon 921600 435200 3 3
metin2_map_monkeydungeon_02 128000 640000 3 3
metin2_map_monkeydungeon_03 128000 716800 3 3
metin2_map_wedding_01 819200 0 1 1
metin2_map_guild_01 128000 0 2 2
metin2_map_guild_02 179200 0 2 2
metin2_map_guild_03 230400 0 2 2
metin2_map_trent 281600 0 2 2
metin2_map_trent02 1049600 0 4 4
gm_guild_build 83200 0 1 1
metin2_map_duel 844800 0 1 1
season1/metin2_map_WL_01 1049600 716800 6 6
season1/metin2_map_nusluck01 819200 716800 4 4
season1/metin2_map_oxevent 870400 0 2 2
season1/metin2_map_sungzi 921600 0 2 2
metin2_map_bf 972800 0 2 2
metin2_map_bf_02 921600 51200 2 2
metin2_map_bf_03 972800 51200 2 2
metin2_map_sungzi_flame_pass01 1024000 102400 4 4
metin2_map_sungzi_flame_pass02 1024000 204800 4 4
metin2_map_sungzi_flame_pass03 1024000 307200 4 4
season1/metin2_map_sungzi_flame_hill_01 1126400 102400 2 4
season1/metin2_map_sungzi_flame_hill_02 1126400 204800 2 4
season1/metin2_map_sungzi_flame_hill_03 1126400 307200 2 4
season1/metin2_map_sungzi_snow 1152000 0 3 3
season1/metin2_map_sungzi_snow_pass01 1177600 102400 2 4
season1/metin2_map_sungzi_snow_pass02 1177600 204800 2 4
season1/metin2_map_sungzi_snow_pass03 1177600 307200 2 4
season1/metin2_map_sungzi_desert_01 1228800 0 4 4
season1/metin2_map_sungzi_desert_hill_01 1228800 102400 2 4
season1/metin2_map_sungzi_desert_hill_02 1228800 204800 2 4
season1/metin2_map_sungzi_desert_hill_03 1228800 307200 2 4
season1/metin2_map_sungzi_milgyo 1331200 0 3 3
season1/metin2_map_sungzi 1408000 0 3 3
season1/metin2_map_sungzi_snow 1484800 0 3 3
season1/metin2_map_sungzi_desert_01 1561600 0 3 3
season1/metin2_map_sungzi_milgyo_pass01 1280000 102400 2 4
season1/metin2_map_sungzi_milgyo_pass02 1280000 204800 2 4
season1/metin2_map_sungzi_milgyo_pass03 1280000 307200 2 4
season1/metin2_map_sungzi_flame_hill_01 1331200 102400 2 4
season1/metin2_map_sungzi_flame_hill_02 1331200 204800 2 4
season1/metin2_map_sungzi_flame_hill_03 1331200 307200 2 4
season1/metin2_map_sungzi_snow_pass01 1382400 102400 2 4
season1/metin2_map_sungzi_snow_pass02 1382400 204800 2 4
season1/metin2_map_sungzi_snow_pass03 1382400 307200 2 4
season1/metin2_map_sungzi_desert_hill_01 1433600 102400 2 4
season1/metin2_map_sungzi_desert_hill_02 1433600 204800 2 4
season1/metin2_map_sungzi_desert_hill_03 1433600 307200 2 4
season1/metin2_map_ew02 256000 51200 4 4
season2/metin2_map_empirewar01 972800 102400 2 2
season2/metin2_map_empirewar02 921600 153600 2 2
season2/metin2_map_empirewar03 972800 153600 2 2
season2/map_n_snowm_02 0 1049600 6 6
season2/metin2_map_milgyo_a 153600 1049600 4 4
season2/metin2_map_n_desert_02 307200 1049600 6 6
season2/metin2_map_n_flame_02 460800 1049600 6 6
season2/metin2_map_a2_1 614400 1049600 6 6
season2/metin2_map_trent_a 768000 1049600 2 2
season2/metin2_map_trent02_a 921600 1049600 3 3
season2/metin2_map_skipia_dungeon_01 0 1203200 6 6
metin2_map_skipia_dungeon_02 153600 1203200 6 6
season2/metin2_map_skipia_dungeon_01 0 1356800 6 6
season2/metin2_map_skipia_dungeon_01 0 1510400 6 6
season2/metin2_map_skipia_dungeon_01 0 1664000 6 6
metin2_map_skipia_dungeon_02 153600 1356800 6 6
metin2_map_skipia_dungeon_02 153600 1510400 6 6
metin2_map_skipia_dungeon_02 153600 1664000 6 6
season2/metin2_map_empirewar01 665600 230400 2 2
season2/metin2_map_empirewar02 716800 230400 2 2
season2/metin2_map_empirewar03 768000 230400 2 2
season1/metin2_map_spiderdungeon_02 563200 435200 4 4
season1/metin2_map_oxevent 742400 0 2 2
metin2_map_skipia_dungeon_boss 819200 1049600 2 2
metin2_map_skipia_dungeon_boss 819200 1100800 2 2
metin2_map_skipia_dungeon_boss2 819200 1152000 2 2
metin2_map_skipia_dungeon_boss 819200 1203200 2 2
season2/metin2_map_devilscatacomb 307200 1203200 7 7
metin2_level_map 365400 311200 6 6
m2m_premium_arena 210500 021200 1 1
m2m_premium_map 190700 1904500 3 3
m2m_premium_map_02 458000 3497500 3 3
m2m_premium_map_03 3111900 2506100 3 3
metin2_dark_map 180100 2604800 1 1
metin2_light_map 2412200 2896200 1 1
metin2_sarkanyhadur_map 8934500 2349800 2 2
okay atlasinfo liegt im spoiler xD
|
|
|
|
All times are GMT +1. The time now is 07:57.
|
|
![[SERVICE] Die Questkontrolle](https://www.elitepvpers.com/forum/iconimages/metin2-private-server/service-die-questkontrolle_ltr.gif){kind=small}
![[ShiizoPhreN]™'s Avatar](https://www.elitepvpers.com/forum/customavatars/avatar2442452_3.gif){kind=avatar}
