|
You last visited: Today at 06:06
Advertisement
[SERVICE] Die Questkontrolle
Discussion on [SERVICE] Die Questkontrolle within the Metin2 Private Server forum part of the Metin2 category.
12/26/2013, 17:12
|
#9436
|
elite*gold: 0 
Join Date: Dec 2011
Posts: 1,891
Received Thanks: 1,244
|
PHP Code:
quest capewarp begin
state start begin
when 20080.use begin
local empire = pc.get_empire()
say_title("capewarp")
say("Wohin möchtest du Teleportiert werden?")
local a = select("Capedragonhead","Goblin City","Abbrechen")
if a==1 then
if empire == 1 then
pc.warp(599400, 756300)
elseif empire == 2 then
pc.warp(3500000, 1500000)
end
elseif a==2 then
if empire == 1 then
pc.warp(599400, 756300)
elseif empire == 2 then
pc.warp(3500000, 1500000)
end
elseif a==3 then
return
end
end
end
end
Diese Quest geht nicht das über mir! Keine Ahnung wieso und weshalb.
Der hier klappt kommischer weise.
PHP Code:
quest teleportmap1 begin
state start begin
when 20080.chat.'Teleport' begin --npcvnum
say_title'Teleport:'
say'[ENTER]Moechtest du dich teleportieren?[ENTER]'
if select('Capedragonhead','Abbrechen') == 1 then
pc.warp(1064000,1664000) --coords
end
end
end
end
|
|
|
|
12/26/2013, 17:47
|
#9437
|
elite*gold: 71
Join Date: Dec 2011
Posts: 598
Received Thanks: 149
|
Irgendein Putty Fehler oder stimmt beim Ablauf etwas nicht?
#Edit: Ersetz mal Zeile 4 mit dem hier:
PHP Code:
local empire = pc.empire()
|
|
|
|
|
12/26/2013, 18:14
|
#9438
|
elite*gold: 0
Join Date: Dec 2011
Posts: 1,891
Received Thanks: 1,244
|
PHP Code:
Error occured on compile capewarp.quest
|
|
|
|
|
12/26/2013, 18:35
|
#9439
|
elite*gold: 71
Join Date: Dec 2011
Posts: 598
Received Thanks: 149
|
Hmm bei mir kommt kein Fehler. Sicher dass du die Quest richtig eingefügt hast und die Datei auch capewarp.quest heißt?
|
|
|
|
|
12/26/2013, 18:43
|
#9440
|
elite*gold: 0
Join Date: Dec 2011
Posts: 1,891
Received Thanks: 1,244
|
ja das ist echt kommisch. Kannste für mich die 2 quest oben steht umschreiben.
|
|
|
|
|
12/26/2013, 19:02
|
#9441
|
elite*gold: 71
Join Date: Dec 2011
Posts: 598
Received Thanks: 149
|
PHP Code:
quest teleportmap1 begin
state start begin
when 20080.chat.'Teleport' begin --npcvnum
say_title'Teleport:'
say'[ENTER]Moechtest du dich teleportieren?[ENTER]'
local a=select('Capedragonhead','Goblin City','Abbrechen')
if a==1 then
pc.warp(1064000,1664000) --coords
elseif a==2 then
pc.warp(X,Y)
else
return
end
end
end
end
|
|
|
|
|
12/26/2013, 19:24
|
#9442
|
elite*gold: 0
Join Date: Dec 2011
Posts: 1,891
Received Thanks: 1,244
|
Ok Klappt Super danke dir.
|
|
|
|
|
12/26/2013, 20:00
|
#9443
|
elite*gold: 0
Join Date: Feb 2011
Posts: 7
Received Thanks: 0
|
Code:
quest krallikesitleme begin
state start begin
when login with pc.getqf("esitlendi") == 0 begin
if pc.getempire() == 1 then
mysql_query("UPDATE player.kralliklar SET sayisi = sayisi + 1 WHERE krallik = kirmizi")
pc.setqf("esitlendi",1)
elseif pc.getempire() == 2 then
if mysql_query("SELECT sayisi FROM player.kralliklar WHERE krallik = mavi") > mysql_query("SELECT sayisi FROM player.kralliklar WHERE krallik = kirmizi") then
mysql_query("UPDATE player.kralliklar SET sayisi = sayisi + 1 WHERE krallik = kirmizi")
pc.change_empire ( 1 )
pc.setqf("esitlendi",1)
elseif mysql_query("SELECT sayisi FROM player.kralliklar WHERE krallik = kirmizi") > mysql_query("SELECT sayisi FROM player.kralliklar WHERE krallik = mavi") then
mysql_query("UPDATE player.kralliklar SET sayisi = sayisi + 1 WHERE krallik = mavi")
pc.change_empire ( 3 )
pc.setqf("esitlendi",1)
elseif pc.getempire() == 3 then
if mysql_query("SELECT sayisi FROM player.kralliklar WHERE krallik = mavi") > mysql_query("SELECT sayisi FROM player.kralliklar WHERE krallik = kirmizi") then
mysql_query("UPDATE player.kralliklar SET sayisi = sayisi + 1 WHERE krallik = kirmizi")
pc.change_empire ( 1 )
pc.setqf("esitlendi",1)
elseif mysql_query("SELECT sayisi FROM player.kralliklar WHERE krallik = kirmizi") > mysql_query("SELECT sayisi FROM player.kralliklar WHERE krallik = mavi") then
mysql_query("UPDATE player.kralliklar SET sayisi = sayisi + 1 WHERE krallik = mavi")
pc.change_empire ( 3 )
pc.setqf("esitlendi",1)
end
end
end
Code:
QUEST : krallikesitleme
STATE : start
WHEN : login
with pc . getqf ( "esitlendi" ) == 0
qc in malloc(): error: allocation failed
Abort (core dumped)
what is wrong with this quest?
|
|
|
|
|
12/26/2013, 20:45
|
#9444
|
elite*gold: 71
Join Date: Dec 2011
Posts: 598
Received Thanks: 149
|
PHP Code:
quest krallikesitleme begin
state start begin
when login with pc.getqf("esitlendi") == 0 begin
if pc.getempire() == 1 then
mysql_query("UPDATE player.kralliklar SET sayisi = sayisi + 1 WHERE krallik = kirmizi")
pc.setqf("esitlendi",1)
elseif pc.getempire() == 2 then
if mysql_query("SELECT sayisi FROM player.kralliklar WHERE krallik = mavi") > mysql_query("SELECT sayisi FROM player.kralliklar WHERE krallik = kirmizi") then
mysql_query("UPDATE player.kralliklar SET sayisi = sayisi + 1 WHERE krallik = kirmizi")
pc.change_empire ( 1 )
pc.setqf("esitlendi",1)
elseif mysql_query("SELECT sayisi FROM player.kralliklar WHERE krallik = kirmizi") > mysql_query("SELECT sayisi FROM player.kralliklar WHERE krallik = mavi") then
mysql_query("UPDATE player.kralliklar SET sayisi = sayisi + 1 WHERE krallik = mavi")
pc.change_empire ( 3 )
pc.setqf("esitlendi",1)
end
elseif pc.getempire() == 3 then
if mysql_query("SELECT sayisi FROM player.kralliklar WHERE krallik = mavi") > mysql_query("SELECT sayisi FROM player.kralliklar WHERE krallik = kirmizi") then
mysql_query("UPDATE player.kralliklar SET sayisi = sayisi + 1 WHERE krallik = kirmizi")
pc.change_empire ( 1 )
pc.setqf("esitlendi",1)
elseif mysql_query("SELECT sayisi FROM player.kralliklar WHERE krallik = kirmizi") > mysql_query("SELECT sayisi FROM player.kralliklar WHERE krallik = mavi") then
mysql_query("UPDATE player.kralliklar SET sayisi = sayisi + 1 WHERE krallik = mavi")
pc.change_empire ( 3 )
pc.setqf("esitlendi",1)
end
end
end
end
end
|
|
|
|
|
12/27/2013, 16:52
|
#9445
|
elite*gold: 0
Join Date: Dec 2011
Posts: 1,891
Received Thanks: 1,244
|
Hab mal was versucht aber weiter komm ich nicht irgwie fehlerhaft.
Also das ist die Neue Quest.
PHP Code:
quest pets begin
state start begin
when 53001.use with pc.getqf("icephoenix") == 0 and pc.getqf("rentier") == 0
and pc.getqf("azrael") == 0 and pc.getqf("rufus") == 0
and pc.getqf("leonidas") == 0 and pc.getqf("porkie") == 0
and pc.getqf("khan") == 0 begin
if pc.getqf("firephoenix") == 0 then
horse.set_level("22")
horse.set_name("Feuer Phönix")
pc.setqf("phoenix_fly", 1)
pc.setqf("firephoenix", 1)
affect.add_collect(apply.ATT_GRADE_BONUS, 100, 60*60*8)
affect.add_collect(apply.MAX_HP, 3500, 60*60*8)
pet.unsummon() pet.summon()
horse.set_level("21")
horse.set_name(""..pc.get_name().."'s Pferd ")
loop_timer("bugcheck", 0.2)
elseif pc.getqf("firephoenix") == 1 then
pet.unsummon()
horse.set_level("21")
horse.set_name(""..pc.get_name().."'s Pferd")
affect.remove_collect(apply.ATT_GRADE_BONUS, 100, 60*60*8)
affect.remove_collect(apply.MAX_HP, 3500, 60*60*8)
pc.setqf("phoenix_fly", 0)
pc.setqf("firephoenix", 0)
cleartimer("bugcheck")
end
end
-- Bugschutz
when bugcheck.timer begin
if pc.count_item(53001) == 0 then
pet.unsummon()
horse.set_level("21")
horse.set_name(""..pc.get_name().."'s Pferd ")
affect.remove_collect(apply.ATT_GRADE_BONUS, 100, 60*60*8)
affect.remove_collect(apply.MAX_HP, 3500, 60*60*8)
pc.setqf("phoenix_fly", 0)
pc.setqf("firephoenix", 0)
syschat(" Rufe dein Pet bitte erneut, ein Fehler ist aufgetreten! ")
cleartimer("bugcheck")
end
end
when login or logout or disconnect with pc.getqf("firephoenix") == 1 begin
horse.set_level("22")
horse.set_name("Feuer Phönix ")
pc.setqf("phoenix_fly", 1)
pc.setqf("firephoenix", 1)
pet.unsummon() pet.summon()
horse.set_level("21")
horse.set_name(""..pc.get_name().."'s Pferd ")
loop_timer("bugcheck", 0.2)
end
end
end
quest pets begin
state start begin
when 53003.use with pc.getqf("firephoenix") == 0 and pc.getqf("rentier") == 0
and pc.getqf("azrael") == 0 and pc.getqf("rufus") == 0
and pc.getqf("leonidas") == 0 and pc.getqf("porkie") == 0
and pc.getqf("khan") == 0 begin
if pc.getqf("icephoenix") == 0 then
horse.set_level("23")
horse.set_name("Eis Phönix")
pc.setqf("phoenix_fly1", 1)
pc.setqf("icephoenix", 1)
affect.add_collect(apply.ATT_GRADE_BONUS, 100, 60*60*8)
affect.add_collect(apply.MAX_HP, 3500, 60*60*8)
pet.unsummon() pet.summon()
horse.set_level("21")
horse.set_name(""..pc.get_name().."'s Pferd ")
loop_timer("bugcheck1", 0.2)
elseif pc.getqf("icephoenix") == 1 then
pet.unsummon()
horse.set_level("21")
horse.set_name(""..pc.get_name().."'s Pferd ")
affect.remove_collect(apply.ATT_GRADE_BONUS, 100, 60*60*8)
affect.remove_collect(apply.MAX_HP, 3500, 60*60*8)
pc.setqf("phoenix_fly1", 0)
pc.setqf("icephoenix", 0)
cleartimer("bugcheck1")
end
end
-- Bugschutz
when bugcheck1.timer begin
if pc.count_item(53003) == 0 then
pet.unsummon()
horse.set_level("21")
horse.set_name(""..pc.get_name().."- Pferd ")
syschat(" Rufe dein Pet bitte erneut, ein Fehler ist aufgetreten! ")
affect.remove_collect(apply.ATT_GRADE_BONUS, 100, 60*60*8)
affect.remove_collect(apply.MAX_HP, 3500, 60*60*8)
pc.setqf("phoenix_fly1", 0)
pc.setqf("icephoenix", 0)
cleartimer("bugcheck1")
end
end
when login or logout or disconnect with pc.getqf("icephoenix") == 1 begin
horse.set_level("23")
horse.set_name("Eis Phönix")
pc.setqf("phoenix_fly1", 1)
pc.setqf("icephoenix", 1)
pet.unsummon() pet.summon()
horse.set_level("21")
horse.set_name(""..pc.get_name().."'s Pferd ")
loop_timer("bugcheck1", 0.2)
end
end
end
quest pets begin
state start begin
when 53002.use with pc.getqf("firephoenix") == 0 and pc.getqf("icephoenix") == 0 -- ITEM DAS ER BENUTZT
and pc.getqf("azrael") == 0 and pc.getqf("rufus") == 0
and pc.getqf("leonidas") == 0 and pc.getqf("porkie") == 0
and pc.getqf("khan") == 0 begin
if pc.getqf("panda") == 0 then
horse.set_level("24")
horse.set_name("Panda") -- DIE WERTE ÄNDERN
pc.setqf("phoenix_fly2", 1)
pc.setqf("panda", 1)
affect.add_collect(apply.ATT_GRADE_BONUS, 100, 60*60*8)
affect.add_collect(apply.MAX_HP, 3500, 60*60*8)
pet.unsummon() pet.summon()
horse.set_level("21")
horse.set_name(""..pc.get_name().."'s Pferd ")
loop_timer("bugcheck2", 0.2)
elseif pc.getqf("rentier") == 1 then
pet.unsummon()
horse.set_level("21")
horse.set_name(""..pc.get_name().."'s Pferd ")
affect.remove_collect(apply.ATT_GRADE_BONUS, 100, 60*60*8)
affect.remove_collect(apply.MAX_HP, 3500, 60*60*8)
pc.setqf("phoenix_fly2", 0)
pc.setqf("rentier", 0)
cleartimer("bugcheck2")
end
end
-- Bugschutz
when bugcheck2.timer begin
if pc.count_item(53002) == 0 then
pet.unsummon()
horse.set_level("21")
horse.set_name(""..pc.get_name().."'s Pferd ")
syschat(" Rufe dein Pet bitte erneut, ein Fehler ist aufgetreten! ")
affect.remove_collect(apply.ATT_GRADE_BONUS, 100, 60*60*8)
affect.remove_collect(apply.MAX_HP, 3500, 60*60*8)
pc.setqf("phoenix_fly2", 0)
pc.setqf("rentier", 0)
cleartimer("bugcheck2")
end
end
when login or logout or disconnect with pc.getqf("rentier") == 1 begin
horse.set_level("24")
horse.set_name("Rentierjunges")
pc.setqf("phoenix_fly2", 1)
pc.setqf("rentier", 1)
pet.unsummon() pet.summon()
horse.set_level("21")
horse.set_name(""..pc.get_name().."'s Pferd ")
loop_timer("bugcheck2", 0.2)
end
end
end
quest pets begin
state start begin
when 53005.use with pc.getqf("firephoenix") == 0 and pc.getqf("icephoenix") == 0
and pc.getqf("rentier") == 0 and pc.getqf("rufus") == 0
and pc.getqf("leonidas") == 0 and pc.getqf("porkie") == 0
and pc.getqf("khan") == 0 begin
if pc.getqf("azrael") == 0 then
horse.set_level("25")
horse.set_name("Baby Azrael")
pc.setqf("phoenix_fly3", 1)
pc.setqf("azrael", 1)
affect.add_collect(apply.ATT_GRADE_BONUS, 100, 60*60*8)
affect.add_collect(apply.MAX_HP, 3500, 60*60*8)
pet.unsummon() pet.summon()
horse.set_level("21")
horse.set_name(""..pc.get_name().."'s Pferd ")
loop_timer("bugcheck3", 0.2)
elseif pc.getqf("azrael") == 1 then
pet.unsummon()
horse.set_level("21")
horse.set_name(""..pc.get_name().."'s Pferd ")
affect.remove_collect(apply.ATT_GRADE_BONUS, 100, 60*60*8)
affect.remove_collect(apply.MAX_HP, 3500, 60*60*8)
pc.setqf("phoenix_fly3", 0)
pc.setqf("azrael", 0)
cleartimer("bugcheck3")
end
end
-- Bugschutz
when bugcheck3.timer begin
if pc.count_item(53005) == 0 then
pet.unsummon()
horse.set_level("21")
horse.set_name(""..pc.get_name().." - Pferd ")
syschat(" Rufe dein Pet bitte erneut, ein Fehler ist aufgetreten! ")
affect.remove_collect(apply.ATT_GRADE_BONUS, 100, 60*60*8)
affect.remove_collect(apply.MAX_HP, 3500, 60*60*8)
pc.setqf("phoenix_fly3", 0)
pc.setqf("azrael", 0)
cleartimer("bugcheck3")
end
end
when login or logout or disconnect with pc.getqf("azrael") == 1 begin
horse.set_level("25")
horse.set_name("Baby Azrael")
pc.setqf("phoenix_fly3", 1)
pc.setqf("azrael", 1)
pet.unsummon() pet.summon()
horse.set_level("21")
horse.set_name(""..pc.get_name().."'s Pferd ")
loop_timer("bugcheck3", 0.2)
end
end
end
quest pets begin
state start begin
when 53006.use with pc.getqf("firephoenix") == 0 and pc.getqf("icephoenix") == 0
and pc.getqf("rentier") == 0 and pc.getqf("azrael") == 0
and pc.getqf("leonidas") == 0 and pc.getqf("porkie") == 0
and pc.getqf("khan") == 0 begin
if pc.getqf("rufus") == 0 then
horse.set_level("26")
horse.set_name("Rufus")
pc.setqf("phoenix_fly4", 1)
pc.setqf("rufus", 1)
affect.add_collect(apply.ATT_GRADE_BONUS, 100, 60*60*8)
affect.add_collect(apply.MAX_HP, 3500, 60*60*8)
pet.unsummon() pet.summon()
horse.set_level("21")
horse.set_name(""..pc.get_name().."'s Pferd ")
loop_timer("bugcheck4", 0.2)
elseif pc.getqf("rufus") == 1 then
pet.unsummon()
horse.set_level("21")
horse.set_name(""..pc.get_name().."'s Pferd ")
affect.remove_collect(apply.ATT_GRADE_BONUS, 100, 60*60*8)
affect.remove_collect(apply.MAX_HP, 3500, 60*60*8)
pc.setqf("phoenix_fly4", 0)
pc.setqf("rufus", 0)
cleartimer("bugcheck4")
end
end
-- Bugschutz
when bugcheck4.timer begin
if pc.count_item(53006) == 0 then
pet.unsummon()
horse.set_level("21")
horse.set_name(""..pc.get_name().."'s Pferd ")
syschat(" Rufe dein Pet bitte erneut, ein Fehler ist aufgetreten! ")
affect.remove_collect(apply.ATT_GRADE_BONUS, 100, 60*60*8)
affect.remove_collect(apply.MAX_HP, 3500, 60*60*8)
pc.setqf("phoenix_fly4", 0)
pc.setqf("rufus", 0)
cleartimer("bugcheck4")
end
end
when login or logout or disconnect with pc.getqf("rufus") == 1 begin
horse.set_level("26")
horse.set_name("Rufus")
pc.setqf("phoenix_fly4", 1)
pc.setqf("rufus", 1)
pet.unsummon() pet.summon()
horse.set_level("21")
horse.set_name(""..pc.get_name().."'s Pferd ")
loop_timer("bugcheck4", 0.2)
end
end
end
quest pets begin
state start begin
when 53007.use with pc.getqf("firephoenix") == 0 and pc.getqf("icephoenix") == 0
and pc.getqf("rentier") == 0 and pc.getqf("azrael") == 0
and pc.getqf("rufus") == 0 and pc.getqf("porkie") == 0
and pc.getqf("khan") == 0 begin
if pc.getqf("leonidas") == 0 then
horse.set_level("27")
horse.set_name("Leonidas")
pc.setqf("phoenix_fly5", 1)
pc.setqf("leonidas", 1)
affect.add_collect(apply.ATT_GRADE_BONUS, 100, 60*60*8)
affect.add_collect(apply.MAX_HP, 3500, 60*60*8)
pet.unsummon() pet.summon()
horse.set_level("21")
horse.set_name(""..pc.get_name().."'s Pferd ")
loop_timer("bugcheck5", 0.2)
elseif pc.getqf("leonidas") == 1 then
pet.unsummon()
horse.set_level("21")
horse.set_name(""..pc.get_name().."'s Pferd ")
affect.remove_collect(apply.ATT_GRADE_BONUS, 100, 60*60*8)
affect.remove_collect(apply.MAX_HP, 3500, 60*60*8)
pc.setqf("phoenix_fly5", 0)
pc.setqf("leonidas", 0)
cleartimer("bugcheck5")
end
end
-- Bugschutz
when bugcheck5.timer begin
if pc.count_item(53007) == 0 then
pet.unsummon()
horse.set_level("21")
horse.set_name(""..pc.get_name().."'s Pferd ")
syschat(" Rufe dein Pet bitte erneut, ein Fehler ist aufgetreten! ")
affect.remove_collect(apply.ATT_GRADE_BONUS, 100, 60*60*8)
affect.remove_collect(apply.MAX_HP, 3500, 60*60*8)
pc.setqf("phoenix_fly5", 0)
pc.setqf("leonidas", 0)
cleartimer("bugcheck5")
end
end
when login or logout or disconnect with pc.getqf("leonidas") == 1 begin
horse.set_level("27")
horse.set_name("Leonidas")
pc.setqf("phoenix_fly5", 1)
pc.setqf("leonidas", 1)
pet.unsummon() pet.summon()
horse.set_level("21")
horse.set_name(""..pc.get_name().."'s Pferd ")
loop_timer("bugcheck5", 0.2)
end
end
end
quest pets begin
state start begin
when 53008.use with pc.getqf("firephoenix") == 0 and pc.getqf("icephoenix") == 0
and pc.getqf("rentier") == 0 and pc.getqf("azrael") == 0
and pc.getqf("rufus") == 0 and pc.getqf("leonidas") == 0
and pc.getqf("khan") == 0 begin
if pc.getqf("porkie") == 0 then
horse.set_level("28")
horse.set_name("Porkie")
pc.setqf("phoenix_fly6", 1)
pc.setqf("porkie", 1)
affect.add_collect(apply.ATT_GRADE_BONUS, 100, 60*60*8)
affect.add_collect(apply.MAX_HP, 3500, 60*60*8)
pet.unsummon() pet.summon()
horse.set_level("21")
horse.set_name(""..pc.get_name().."'s Pferd ")
loop_timer("bugcheck6", 0.2)
elseif pc.getqf("porkie") == 1 then
pet.unsummon()
horse.set_level("21")
horse.set_name(""..pc.get_name().."'s Pferd ")
affect.remove_collect(apply.ATT_GRADE_BONUS, 100, 60*60*8)
affect.remove_collect(apply.MAX_HP, 3500, 60*60*8)
pc.setqf("phoenix_fly6", 0)
pc.setqf("porkie", 0)
cleartimer("bugcheck6")
end
end
-- Bugschutz
when bugcheck6.timer begin
if pc.count_item(53008) == 0 then
pet.unsummon()
horse.set_level("21")
horse.set_name(""..pc.get_name().."'s Pferd ")
syschat(" Rufe dein Pet bitte erneut, ein Fehler ist aufgetreten! ")
affect.remove_collect(apply.ATT_GRADE_BONUS, 100, 60*60*8)
affect.remove_collect(apply.MAX_HP, 3500, 60*60*8)
pc.setqf("phoenix_fly6", 0)
pc.setqf("porkie", 0)
cleartimer("bugcheck6")
end
end
when login or logout or disconnect with pc.getqf("porkie") == 1 begin
horse.set_level("28")
horse.set_name("Porkie")
pc.setqf("phoenix_fly6", 1)
pc.setqf("porkie", 1)
pet.unsummon() pet.summon()
horse.set_level("21")
horse.set_name(""..pc.get_name().."'s Pferd ")
loop_timer("bugcheck6", 0.2)
end
end
end
quest pets begin
state start begin
when 53009.use with pc.getqf("firephoenix") == 0 and pc.getqf("icephoenix") == 0
and pc.getqf("rentier") == 0 and pc.getqf("azrael") == 0
and pc.getqf("rufus") == 0 and pc.getqf("leonidas") == 0
and pc.getqf("porkie") == 0 begin
if pc.getqf("khan") == 0 then
horse.set_level("29")
horse.set_name("Khan")
pc.setqf("phoenix_fly7", 1)
pc.setqf("khan", 1)
affect.add_collect(apply.ATT_GRADE_BONUS, 100, 60*60*8)
affect.add_collect(apply.MAX_HP, 3500, 60*60*8)
pet.unsummon() pet.summon()
horse.set_level("21")
horse.set_name(""..pc.get_name().."'s Pferd ")
loop_timer("bugcheck7", 0.2)
elseif pc.getqf("khan") == 1 then
pet.unsummon()
horse.set_level("21")
horse.set_name(""..pc.get_name().."'s Pferd ")
affect.remove_collect(apply.ATT_GRADE_BONUS, 100, 60*60*8)
affect.remove_collect(apply.MAX_HP, 3500, 60*60*8)
pc.setqf("phoenix_fly7", 0)
pc.setqf("khan", 0)
cleartimer("bugcheck7")
end
end
-- Bugschutz
when bugcheck7.timer begin
if pc.count_item(53009) == 0 then
pet.unsummon()
horse.set_level("21")
horse.set_name(""..pc.get_name().."'s Pferd ")
syschat(" Rufe dein Pet bitte erneut, ein Fehler ist aufgetreten! ")
affect.remove_collect(apply.ATT_GRADE_BONUS, 100, 60*60*8)
affect.remove_collect(apply.MAX_HP, 3500, 60*60*8)
pc.setqf("phoenix_fly7", 0)
pc.setqf("khan", 0)
cleartimer("bugcheck7")
end
end
when login or logout or disconnect with pc.getqf("khan") == 1 begin
horse.set_level("29")
horse.set_name("Khan")
pc.setqf("phoenix_fly7", 1)
pc.setqf("khan", 1)
pet.unsummon() pet.summon()
horse.set_level("21")
horse.set_name(""..pc.get_name().."'s Pferd ")
loop_timer("bugcheck7", 0.2)
end
end
end
quest pets begin
state start begin
when 53010.use with pc.getqf("firephoenix") == 0 and pc.getqf("icephoenix") == 0
and pc.getqf("rentier") == 0 and pc.getqf("azrael") == 0
and pc.getqf("rufus") == 0 and pc.getqf("leonidas") == 0
and pc.getqf("porkie") == 0 and pc.getqf("khan") == 0 and pc.getqf("panda") == 0 begin
if pc.getqf("babylöwe") == 0 then
horse.set_level("29")
horse.set_name("Baby Tiger")
pc.setqf("babytiger_fly", 1)
pc.setqf("babyhund8", 1)
affect.add_collect(apply.ATT_GRADE_BONUS, 100, 60*60*8)
affect.add_collect(apply.MAX_HP, 3500, 60*60*8)
pet.unsummon() pet.summon()
horse.set_level("21")
horse.set_name(""..pc.get_name().."'s Pferd ")
loop_timer("bugcheck8", 0.2)
elseif pc.getqf("babylöwe") == 1 then
pet.unsummon()
horse.set_level("21")
horse.set_name(""..pc.get_name().."'s Pferd ")
affect.remove_collect(apply.ATT_GRADE_BONUS, 100, 60*60*8)
affect.remove_collect(apply.MAX_HP, 3500, 60*60*8)
pc.setqf("babytiger_fly", 0)
pc.setqf("babylöwe", 0)
cleartimer("bugcheck8")
end
end
-- Bugschutz
when bugcheck8.timer begin
if pc.count_item(53010) == 0 then
pet.unsummon()
horse.set_level("21")
horse.set_name(""..pc.get_name().."'s Pferd ")
syschat(" Rufe dein Pet bitte erneut, ein Fehler ist aufgetreten! ")
affect.remove_collect(apply.ATT_GRADE_BONUS, 100, 60*60*8)
affect.remove_collect(apply.MAX_HP, 3500, 60*60*8)
pc.setqf("babytiger_fly", 0)
pc.setqf("babylöwe", 0)
cleartimer("bugcheck8")
end
end
when login or logout or disconnect with pc.getqf("babylöwe") == 1 begin
horse.set_level("29")
horse.set_name("Baby Tiger")
pc.setqf("babytiger_fly", 1)
pc.setqf("babylöwe", 1)
pet.unsummon() pet.summon()
horse.set_level("21")
horse.set_name(""..pc.get_name().."'s Pferd ")
loop_timer("bugcheck8", 0.2)
end
end
end
quest pets begin
state start begin
when 53011.use with pc.getqf("firephoenix") == 0 and pc.getqf("icephoenix") == 0
and pc.getqf("rentier") == 0 and pc.getqf("azrael") == 0
and pc.getqf("rufus") == 0 and pc.getqf("leonidas") == 0
and pc.getqf("porkie") == 0 and pc.getqf("khan") == 0
and pc.getqf("babylöwe") == 0 begin
if pc.getqf("babylöwe") == 0 then
horse.set_level("29")
horse.set_name("Baby Tiger")
pc.setqf("babytiger_fly", 1)
pc.setqf("babyhund8", 1)
affect.add_collect(apply.ATT_GRADE_BONUS, 100, 60*60*8)
affect.add_collect(apply.MAX_HP, 3500, 60*60*8)
pet.unsummon() pet.summon()
horse.set_level("21")
horse.set_name(""..pc.get_name().."'s Pferd ")
loop_timer("bugcheck8", 0.2)
elseif pc.getqf("babylöwe") == 1 then
pet.unsummon()
horse.set_level("21")
horse.set_name(""..pc.get_name().."'s Pferd ")
affect.remove_collect(apply.ATT_GRADE_BONUS, 100, 60*60*8)
affect.remove_collect(apply.MAX_HP, 3500, 60*60*8)
pc.setqf("babytiger_fly", 0)
pc.setqf("babylöwe", 0)
cleartimer("bugcheck8")
end
end
-- Bugschutz
when bugcheck8.timer begin
if pc.count_item(53010) == 0 then
pet.unsummon()
horse.set_level("21")
horse.set_name(""..pc.get_name().."'s Pferd ")
syschat(" Rufe dein Pet bitte erneut, ein Fehler ist aufgetreten! ")
affect.remove_collect(apply.ATT_GRADE_BONUS, 100, 60*60*8)
affect.remove_collect(apply.MAX_HP, 3500, 60*60*8)
pc.setqf("babytiger_fly", 0)
pc.setqf("babylöwe", 0)
cleartimer("bugcheck8")
end
end
when login or logout or disconnect with pc.getqf("babylöwe") == 1 begin
horse.set_level("29")
horse.set_name("Baby Tiger")
pc.setqf("babytiger_fly", 1)
pc.setqf("babylöwe", 1)
pet.unsummon() pet.summon()
horse.set_level("21")
horse.set_name(""..pc.get_name().."'s Pferd ")
loop_timer("bugcheck8", 0.2)
end
end
end
quest pets begin
state start begin
when 53011.use with pc.getqf("firephoenix") == 0 and pc.getqf("icephoenix") == 0
and pc.getqf("rentier") == 0 and pc.getqf("azrael") == 0
and pc.getqf("rufus") == 0 and pc.getqf("leonidas") == 0
and pc.getqf("porkie") == 0 and pc.getqf("khan") == 0
and pc.getqf("babylöwe") == 0 begin
if pc.getqf("babylöwe") == 0 then
horse.set_level("29")
horse.set_name("Baby Tiger")
pc.setqf("babytiger_fly", 1)
pc.setqf("babyhund8", 1)
affect.add_collect(apply.ATT_GRADE_BONUS, 100, 60*60*8)
affect.add_collect(apply.MAX_HP, 3500, 60*60*8)
pet.unsummon() pet.summon()
horse.set_level("21")
horse.set_name(""..pc.get_name().."'s Pferd ")
loop_timer("bugcheck8", 0.2)
elseif pc.getqf("babylöwe") == 1 then
pet.unsummon()
horse.set_level("21")
horse.set_name(""..pc.get_name().."'s Pferd ")
affect.remove_collect(apply.ATT_GRADE_BONUS, 100, 60*60*8)
affect.remove_collect(apply.MAX_HP, 3500, 60*60*8)
pc.setqf("babytiger_fly", 0)
pc.setqf("babylöwe", 0)
cleartimer("bugcheck8")
end
end
-- Bugschutz
when bugcheck8.timer begin
if pc.count_item(53010) == 0 then
pet.unsummon()
horse.set_level("21")
horse.set_name(""..pc.get_name().."'s Pferd ")
syschat(" Rufe dein Pet bitte erneut, ein Fehler ist aufgetreten! ")
affect.remove_collect(apply.ATT_GRADE_BONUS, 100, 60*60*8)
affect.remove_collect(apply.MAX_HP, 3500, 60*60*8)
pc.setqf("babytiger_fly", 0)
pc.setqf("babylöwe", 0)
cleartimer("bugcheck8")
end
end
when login or logout or disconnect with pc.getqf("babylöwe") == 1 begin
horse.set_level("29")
horse.set_name("Baby Tiger")
pc.setqf("babytiger_fly", 1)
pc.setqf("babylöwe", 1)
pet.unsummon() pet.summon()
horse.set_level("21")
horse.set_name(""..pc.get_name().."'s Pferd ")
loop_timer("bugcheck8", 0.2)
end
end
end
Aber da fehlen zB Panda etc ein paar Pets fehlen kann mir das jemand vielleicht bitte Intirgrieren bei mir kommt beim Reload der Quests ein Fehler wenn ich weiter mache.
ICH DANKE EUCH
PHP Code:
quest haustiere begin
state start begin
-- Setzt den neuen Petnamen in die Datenbank ein
function set_pet_name(name)
mysql_query("DELETE FROM player.pet_name WHERE id = \\'"..pc.get_player_id().."\\'")
mysql_query("INSERT INTO player.pet_name(id, name) VALUES(\\'"..pc.get_player_id().."\\', \\'"..name.."\\')")
end
-- Holt sich den Petnamen aus der Datenbank
function get_pet_name()
local pet_name = mysql_query("SELECT * FROM player.pet_name WHERE id = \\'"..pc.get_player_id().."\\'")
return (pet_name.name or {pc.get_name().."'s Haustier"})[1]
end
-- Feuer-Phönix
when 53001.use begin
if pet.is_summon() then
pet.unsummon()
chat("Dein Haustier verabschiedet sich nun von dir!")
affect.remove_collect(apply.ATT_GRADE_BONUS, 50, 60*60*8)
affect.remove_collect(apply.MAX_HP, 2500, 60*60*8)
else
local old_level = horse.get_level()
local old_name = horse.get_name()
horse.set_level(22)
horse.set_name(haustiere.get_pet_name())
pet.summon()
horse.set_level(old_level)
horse.set_name(old_name)
affect.add_collect(apply.ATT_GRADE_BONUS, 50, 60*60*8)
affect.add_collect(apply.MAX_HP, 2500, 60*60*8)
end
end
-- Panda
when 53002.use begin
if pet.is_summon() then
pet.unsummon()
chat("Dein Haustier verabschiedet sich nun von dir!")
affect.remove_collect(apply.ATTBONUS_HUMAN, 20, 60*60*8)
affect.remove_collect(apply.MAX_HP, 5000, 60*60*8)
else
local old_level = horse.get_level()
local old_name = horse.get_name()
horse.set_level(24)
horse.set_name(haustiere.get_pet_name())
pet.summon()
horse.set_level(old_level)
horse.set_name(old_name)
affect.add_collect(apply.ATTBONUS_HUMAN, 20, 60*60*8)
affect.add_collect(apply.MAX_HP, 5000, 60*60*8)
end
end
-- Eis-Phönix
when 53003.use begin
if pet.is_summon() then
pet.unsummon()
chat("Dein Haustier verabschiedet sich nun von dir!")
affect.remove_collect(apply.ATT_GRADE_BONUS, 50, 60*60*8)
affect.remove_collect(apply.MAX_HP, 2500, 60*60*8)
else
local old_level = horse.get_level()
local old_name = horse.get_name()
horse.set_level(23)
horse.set_name(haustiere.get_pet_name())
pet.summon()
horse.set_level(old_level)
horse.set_name(old_name)
affect.add_collect(apply.ATT_GRADE_BONUS, 50, 60*60*8)
affect.add_collect(apply.MAX_HP, 2500, 60*60*8)
end
end
-- Baby-Azrael
when 53005.use begin
if pet.is_summon() then
pet.unsummon()
chat("Dein Haustier verabschiedet sich nun von dir!")
affect.remove_collect(apply.ATT_GRADE_BONUS, 100, 60*60*8)
affect.remove_collect(apply.MAX_HP, 5000, 60*60*8)
else
local old_level = horse.get_level()
local old_name = horse.get_name()
horse.set_level(25)
horse.set_name(haustiere.get_pet_name())
pet.summon()
horse.set_level(old_level)
horse.set_name(old_name)
affect.add_collect(apply.ATT_GRADE_BONUS, 200, 60*60*8)
affect.add_collect(apply.MAX_HP, 5000, 60*60*8)
end
end
-- Baby-Wolfs
when 53006.use begin
if pet.is_summon() then
pet.unsummon()
chat("Dein Haustier verabschiedet sich nun von dir!")
affect.remove_collect(apply.ATT_GRADE_BONUS, 50, 60*60*8)
affect.remove_collect(apply.MAX_HP, 2500, 60*60*8)
else
local old_level = horse.get_level()
local old_name = horse.get_name()
horse.set_level(26)
horse.set_name(haustiere.get_pet_name())
pet.summon()
horse.set_level(old_level)
horse.set_name(old_name)
affect.add_collect(apply.ATT_GRADE_BONUS, 50, 60*60*8)
affect.add_collect(apply.MAX_HP, 2500, 60*60*8)
end
end
-- Baby-Löwen
when 53007.use begin
if pet.is_summon() then
pet.unsummon()
chat("Dein Haustier verabschiedet sich nun von dir!")
affect.remove_collect(apply.ATT_GRADE_BONUS, 50, 60*60*8)
affect.remove_collect(apply.MAX_HP, 2500, 60*60*8)
else
local old_level = horse.get_level()
local old_name = horse.get_name()
horse.set_level(27)
horse.set_name(haustiere.get_pet_name())
pet.summon()
horse.set_level(old_level)
horse.set_name(old_name)
affect.add_collect(apply.ATT_GRADE_BONUS, 50, 60*60*8)
affect.add_collect(apply.MAX_HP, 2500, 60*60*8)
end
end
-- Baby-Keiler
when 53008.use begin
if pet.is_summon() then
pet.unsummon()
chat("Dein Haustier verabschiedet sich nun von dir!")
affect.remove_collect(apply.ATTBONUS_HUMAN, 20, 60*60*8)
affect.remove_collect(apply.MAX_HP, 7500, 60*60*8)
else
local old_level = horse.get_level()
local old_name = horse.get_name()
horse.set_level(28)
horse.set_name(haustiere.get_pet_name())
pet.summon()
horse.set_level(old_level)
horse.set_name(old_name)
affect.add_collect(apply.ATT_GRADE_BONUS, 50, 60*60*8)
affect.add_collect(apply.MAX_HP, 2500, 60*60*8)
end
end
-- Baby-Tiger
when 53009.use begin
if pet.is_summon() then
pet.unsummon()
chat("Dein Haustier verabschiedet sich nun von dir!")
affect.remove_collect(apply.ATT_GRADE_BONUS, 50, 60*60*8)
affect.remove_collect(apply.MAX_HP, 2500, 60*60*8)
else
local old_level = horse.get_level()
local old_name = horse.get_name()
horse.set_level(29)
horse.set_name(haustiere.get_pet_name())
pet.summon()
horse.set_level(old_level)
horse.set_name(old_name)
affect.add_collect(apply.ATT_GRADE_BONUS, 50, 60*60*8)
affect.add_collect(apply.MAX_HP, 2500, 60*60*8)
end
end
-- Baby-Eisbär
when 53014.use begin
if pet.is_summon() then
pet.unsummon()
chat("Dein Haustier verabschiedet sich nun von dir!")
affect.remove_collect(apply.BLOCK, 10, 60*60*8)
affect.remove_collect(apply.MAX_HP, 5000, 60*60*8)
else
local old_level = horse.get_level()
local old_name = horse.get_name()
horse.set_level(30)
horse.set_name(haustiere.get_pet_name())
pet.summon()
horse.set_level(old_level)
horse.set_name(old_name)
affect.add_collect(apply.BLOCK, 10, 60*60*8)
affect.add_collect(apply.MAX_HP, 5000, 60*60*8)
end
end
-- Namenskette - Namensändung des Haustiers
when 71110.use begin
say_title("Namenskette :")
say("")
say("Hier kannst du deinem Haustier einen neuen")
say("Namen geben. Damit kannst du dein Haustier")
say("über alle anderen hervorheben.")
say("")
akna = haustiere.get_pet_name()
if string.len(akna) == 0 then
say_reward("Dein Haustier besitzt bis jetzt keinen Namen.")
else
say_reward("Der aktuelle Name deines Haustieres lautet: "..akna)
end
say("")
say("Möchtest du fortfahren?")
say("")
local s=select("Umbenennen", "Abbrechen")
if s==2 then
return
end
say_title("Namenskette :")
say("")
say("Bitte gib hier den neuen Namen deines")
say("Haustieres ein.")
local x = input()
if string.len(x) < 2 then
say_title("Namenskette :")
say("Der eingegeben Name ist zu kurz.")
say("")
say_reward("Der neue Name muss aus")
say_reward("mind. 2 Zeichen bestehen.")
say("")
return
elseif string.len(x) > 12 then
say_title("Namenskette :")
say("Der eingegeben Name ist zu lang.")
say("")
say_reward("Der neue Name darf max.")
say_reward("aus 12 Zeichen bestehen.")
say("")
return
end
haustiere.set_pet_name(x)
chat("Haustier erfolgreich umbenannt")
pc.remove_item(71110, 1)
end
end
end
|
|
|
|
|
12/27/2013, 19:06
|
#9446
|
elite*gold: 26
Join Date: Mar 2010
Posts: 3,765
Received Thanks: 2,661
|
frags doch einfach zusätzlich ab 
PHP Code:
quest pferd begin
state start begin
when 20349.chat."Pferd(lv.1)" with horse.get_level() < 1 and pc.get_level() >= 10 begin
say_title('Hallo lieber Spieler')
say('')
say('Du bist also schon über Level 10?')
say('Du kannst dir von mir einen Pony abholen, wenn')
say('du mir eine Pferdemedaille bringst!')
say_reward('Pferd steigern')
if select('Ja','Nein') == 2 then return end
if pc.count_item(50050) < 1 then
say('Du hast keine Pferdemedaille')
say('Bitte besorge mir eine, wenn ein Pony reiten möchtest.')
return
end
say_title(''..pc.get_name()..' Dein Pferde level wurde erfolgreich erhöht.')
say('Herzlichen Glückwunsch![ENTER]Dein Pferd ist nun Level 1.')
horse.set_level(horse.get_level()+1)
if horse.get_level() == 1 then
pc.give_item2(50051)
pc.remove_item(50050, 1)
horse.summon()
horse.ride()
end
end
when 20349.chat."Kampfpferd(lv.11)" with horse.get_level() >= 1 and horse.get_level() < 11 and pc.get_level() >= 25 begin
say_title('Hallo lieber Spieler')
say('')
say('Du bist also schon über Level 25?')
say('Du kannst dir von mir einen Kampfgaul abholen, wenn')
say('du mir 11 Pferdemedaillen bringst!')
say_reward('Pferd steigern')
if select('Ja','Nein') == 2 then return end
if pc.count_item(50050) < 11 then
say('Du hast keine Pferdemedaillen')
say('Bitte besorge mir 11 davon, wenn du ein Kampfpferd reiten möchtest.')
return
end
say_title(''..pc.get_name()..' Dein Pferde level wurde erfolgreich erhöht.')
say('Herzlichen Glückwunsch![ENTER]Dein Pferd ist nun Level 11.')
horse.set_level(horse.get_level()+10)
if horse.get_level() == 11 then
pc.give_item2(50052)
pc.remove_item(50050, 11)
pc.remove_item(50051)
horse.unride()
horse.summon()
horse.ride()
end
end
when 20349.chat."Millitärpferd(lv.21)" with horse.get_level() >= 11 and horse.get_level() < 21 and pc.get_level() >= 50 begin
say_title('Hallo lieber Spieler')
say('')
say('Du bist also schon über Level 50?')
say('Du kannst dir von mir einen Milligaul abholen, wenn')
say('du mir 21 Pferdemedaillen bringst!')
say_reward('Pferd steigern')
if select('Ja','Nein') == 2 then return end
if pc.count_item(50050) < 21 then
say('Du hast keine Pferdemedaille-')
say('Bitte besorge mir 21 davon, wenn ein Millitärpferd reiten möchtest.')
return
end
say_title(''..pc.get_name()..' Dein Pferde level wurde erfolgreich erhöht.')
say('Herzlichen Glückwunsch![ENTER]Dein Pferd ist nun Level 21.')
horse.set_level(horse.get_level()+10)
if horse.get_level() == 21 then
pc.give_item2(50053)
pc.remove_item(50050, 21)
pc.remove_item(50052)
horse.unride()
horse.summon()
horse.ride()
end
end
end
end
|
|
|
|
|
12/29/2013, 15:52
|
#9447
|
elite*gold: 0
Join Date: Jan 2013
Posts: 20
Received Thanks: 3
|
Hello epvp ,i have a problem of this quest ....
if i install this quest in putty i receive this error :
qc in malloc(): error: allocation failed
Abort (core dumped)
Or:
syntax error : [string "start"]:2: unexpected symbol near `when'
intrebari_raspunsuri.quest:281:Abort (core dumped)
Quest :
PHP Code:
quest sistem_intrebari begin
state start begin
when login begin
send_letter ("Intrebari si Raspunsuri")
when button or info begin
addimage (-85,-130,"uriel.tga")
say_help_title ("Intrebari si Raspunsuri")
say_help ("Pentru a afla mai multe informatii despre")
say_help ("server introduceti in caseta de mai jos")
say_help ("numarul intrebarii dorite. [ENTER]")
say_help ("1. Cum iau legatura cu echipa?")
say_help ("2. Cand se fac Evenimente?")
say_help ("3. Unde Pica?")
say_help ("4. Alte Intrebari utile")
say_help ("5. De ce ma scoate din Client?")
say_help ("6. Cum pot sa donez?")
say_help ("7. Iesire")
local help = input()
if help == "1" then
addimage (-85,-130,"uriel.tga")
say_help_title ("Cum iau legatura cu echipa?")
say_help ("Daca aveti o problema legata de joc si nu este")
say_help ("foarte importanta cautati un MOD sau GM")
say_help ("El va raspunde la intrebari.[ENTER]")
say_help ("Daca este o problema ce tine de")
say_help ("server si siguranta lui contactati imediat [OwN]Xander")
say_help ("spe adresa de Yahoo Messenger")
say_help (" [ENTER]")
say_help ("sau skype : worldmetin2.ro [ENTER]")
wait()
sent_letter ("Intrebari si raspunsuri")
return
elseif help == "2" then
addimage (-85,-130,"uriel.tga")
say_help_title ("Cand se fac Evenimente?")
say_help ("Va Multumim pentru ca ati ales WorldMetin2")
say_help ("Evenimentele se fac in modul Urmator:")
say_help ("Evenimentul OX- Sambata Orele 20:00")
say_help ("PVM Event - Duminica Orele 12:00")
say_help ("Hide Event - Luni,Miercuri Orele : 19:00")
say_help ("Ghost Shop - Marti,Joi : 19:00 [ENTER]")
wait()
sent_letter ("Intrebari si raspunsuri")
return
elseif help == "3" then
addimage (-85,-130,"uriel.tga")
say_help_title ("Unde Pica?")
say_help ("1. Marihuana")
say_help ("2. Diamant Verde/Galben/Verde/Rosu")
say_help ("3. Scrol Verde/Galben/Verde/Rosu")
say_help ("4. Nisip Verde/Galben/Verde/Rosu")
say_help ("5. Seminte Verzi/Galbene/Verzi/Rosii")
say_help ("6. Perle Celesta/Orhidee/Hooker/Lime")
say_help ("7. Perla Plasma")
say_help ("8. Piatra Abraziva")
say_help ("9. Iesire")
local help2 = input()
if help2 == "1" then
say_help_title ("Marihuana")
addimage (-85,-130,"uriel.tga")
say_help ("Marihuana pica la:")
say_help ("Metinul Singuratatii ,care se afla in Farm Map1")
say_help ("La acest Metin poate pica maxim 2 bucati")
say_help ("Hae-Tae ,care se afla in Farm Map 1")
say_help ("La acest Monstru poate pica maxim 6 bucati [ENTER] ")
wait()
sent_letter ("Intrebari si raspunsuri")
return
elseif help2 == "2" then
addimage (-85,-130,"uriel.tga")
say_help_title ("Diamant Verde/Galben/Verde/Rosu")
say_help ("Diamantele pica la :")
say_help ("Metinul Arogantei ,care se afla in Farm Map1")
say_help ("Metinul Arogantei ,care se afla mapa de la Sultan")
say_help ("Metinul Singuratatii ,care se afla in Farm Map1")
say_help ("La acest Metin poate pica maxim 1 bucata de fiecare")
say_help ("Culoare [ENTER] ")
wait()
sent_letter ("Intrebari si raspunsuri")
return
elseif help2 == "3" then
addimage (-85,-130,"uriel.tga")
say_help_title ("Scrol Verde/Galben/Verde/Rosu")
say_help ("Metinul Arogantei ,care se afla in Farm Map1")
say_help ("Metinul Arogantei ,care se afla mapa de la Sultan")
say_help ("Metinul Singuratatii ,care se afla in Farm Map1")
say_help ("La acest Metin poate pica maxim 1 bucata de fiecare")
say_help ("Culoare [ENTER] ")
wait()
sent_letter ("Intrebari si raspunsuri")
return
elseif help2 == "4" then
addimage (-85,-130,"uriel.tga")
say_help_title ("Nisip Verde/Cuart/Verde/Rosu")
say_help ("Nisip Verde/Cuart/Verde/Rosu pica la:")
say_help ("Metinul Eliberarii,care se afla in Farm Map2")
say_help ("La acest Metin poate pica maxim 1 bucata de fiecare")
say_help ("Culoare")
say_help ("Metinul Tradarii,care se afla in Farm Map2")
say_help ("La acest Metin poate pica maxim 1 bucata de fiecare")
say_help ("Culoare [ENTER] ")
wait()
sent_letter ("Intrebari si raspunsuri")
return
elseif help2 == "5" then
addimage (-85,-130,"uriel.tga")
say_help_title ("Seminte Verzi/Galbene/Verzi/Rosii")
say_help ("Seminte Verzi/Galbene/Verzi/Rosii pica la:")
say_help ("Metinul Eliberarii,care se afla in Farm Map2")
say_help ("La acest Metin poate pica maxim 1 bucata de fiecare")
say_help ("Culoare")
say_help ("Metinul Tradarii,care se afla in Farm Map2")
say_help ("La acest Metin poate pica maxim 1 bucata de fiecare")
say_help ("Culoare [ENTER] ")
wait()
sent_letter ("Intrebari si raspunsuri")
return
elseif help2 == "6" then
addimage (-85,-130,"uriel.tga")
say_help_title ("Perle Celesta/Orhidee/Hooker/Lime")
say_help ("Perle Celesta/Orhidee/Hooker/Lime pica la:")
say_help ("Metinul Arogantei ,care se afla in Farm Map1")
say_help ("Metinul Arogantei ,care se afla mapa de la Sultan")
say_help ("La acest Metin poate pica maxim 1 bucata de fiecare")
say_help ("Culoare [ENTER]")
wait()
sent_letter ("Intrebari si raspunsuri")
return
elseif help2 == "7" then
addimage (-85,-130,"uriel.tga")
say_help_title ("Perla Plasma")
say_help ("Perla Plasma pica din:")
say_help ("Lada Dragonului Rosu ,care se afla in Farm Map 2")
say_help ("Din aceasta lada poate pica maxim o perla plasma ")
say_help ("Aceasta Perla iti foloseste la plusarea pietrilor [ENTER] ")
wait()
sent_letter ("Intrebari si raspunsuri")
return
elseif help2 == "8" then
addimage (-85,-130,"uriel.tga")
say_help_title ("Piatra Abraziva")
say_help ("Piatra Abraziva o poti obtine in felul urmator:")
say_help ("Combini 2x Citrin cu 2x Topaz La NPC")
say_help ("Upgrade Item care se afla in Map1 in cerc")
say_help ("Citrin poti obtine de la Metinul Muntelui")
say_help ("Care se afla in Farm Map 3")
say_help ("Topaz poti obtine de la ")
say_help ("Citrin poti obtine de la Metinul Razbunarii")
say_help ("Care se afla in Farm Map 3 [ENTER] ")
wait()
sent_letter ("Intrebari si raspunsuri")
return
elseif help2 == "9" then
sent_letter ("Intrebari si raspunsuri")
return
elseif help2 == "" then
addimage (-85,-130,"uriel.tga")
say_help_title ("Intrebari si raspunsuri")
say_help ("Nu ai ales nici o intrebare [ENTER]")
wait()
sent_letter ("Intrebari si raspunsuri")
return
elseif help == "4" then
addimage (-85,-130,"uriel.tga")
say_help_title ("Cum Obtin?")
say_help ("1. Cum obtin Inel de experienta")
say_help ("2. Cum obtin Inel Anti-Experienta")
say_help ("3. Cum obtin Pamflet")
say_help ("4. Pot face Roua Verde pe acest server?")
say_help ("5. Unde fac bine banii?")
say_help ("6. De Unde fac rost de iteme de Upgrade secundare?")
say_help ("7. Sunt Modate pe acest server?")
say_help ("8. Pe bonusurile 6-7 intra bonusuri PVP?")
say_help ("9. Iesire")
local help3 = input()
elseif help3 == "1" then
addimage (-85,-130,"uriel.tga")
say_help_title ("Cum obtin Inel de experienta")
say_help ("Inele De experienta le poti obtine de la:")
say_help ("Metinele de nivelul 85-89 din Padurea Rosie")
say_help ("Cuferele Clar de Luna ,care se da la OX")
say_help ("Cufarul Incepatorului")
say_help ("Indeplinind misiunile de la biolog [ENTER]")
wait()
sent_letter ("Intrebari si raspunsuri")
return
elseif help3 == "2" then
addimage (-85,-130,"uriel.tga")
say_help_title ("Cum obtin Inel Anti-Experienta?")
say_help ("Acest inel il poti cumpara de la Negustoarea")
say_help ("de Diverse care se afla in map1 centrul orasului [ENTER]")
wait()
sent_letter ("Intrebari si raspunsuri")
return
elseif help3 == "3" then
addimage (-85,-130,"uriel.tga")
say_help_title ("Cum obtin Pamflet?")
say_help ("Acest obiect il poti obtine de la NPC de Upgrade")
say_help ("Deasemenea poate pica si in V4,V5 [ENTER] ")
wait()
sent_letter ("Intrebari si raspunsuri")
return
elseif help3 == "4" then
addimage (-85,-130,"uriel.tga")
say_help_title ("Pot face Roua Verde pe acest server?")
say_help ("Pe Acest server nu poti face Roua Verde [ENTER] ")
wait()
sent_letter ("Intrebari si raspunsuri")
return
elseif help3 == "5" then
addimage (-85,-130,"uriel.tga")
say_help_title ("Unde fac bine banii?")
say_help ("Poti face bine banii luptand cu monstrii din:")
say_help ("Farm Map 2")
say_help ("Harta de nivelul 190")
say_help ("V4 [ENTER] ")
wait()
sent_letter ("Intrebari si raspunsuri")
return
elseif help3 == "6" then
addimage (-85,-130,"uriel.tga")
say_help_title ("De Unde fac rost de iteme de Upgrade secundare?")
say_help ("Poti face Rost de aceste iteme de la Hand-Up")
say_help ("Care se afla in Map1 [ENTER] ")
wait()
sent_letter ("Intrebari si raspunsuri")
return
elseif help3 == "7" then
addimage (-85,-130,"uriel.tga")
say_help_title ("Sunt Modate pe acest server?")
say_help ("Pe acest server nu au fost si nu vor fi")
say_help ("iteme modate. [ENTER] ")
wait()
sent_letter ("Intrebari si raspunsuri")
return
elseif help3 == "8" then
addimage (-85,-130,"uriel.tga")
say_help_title ("Pe bonusurile 6-7 intra bonusuri PVP?")
say_help ("Pe bonusurile 6-7 Nu intra bonusuri PVP [ENTER] ")
wait()
sent_letter ("Intrebari si raspunsuri")
return
elseif help3 == "9" then
sent_letter ("Intrebari si raspunsuri")
return
elseif help == "5" then
addimage (-85,-130,"uriel.tga")
say_help_title ("De ce ma scoate din client?")
say_help ("Din cauza ca am adaugat foarte multe armuri")
say_help ("arme,sisteme in clientul WorldMetin2")
say_help ("Unii pot avea probleme cu acest client.")
say_help ("Daca va scoate din Client si primiti o eroare ")
say_help ("Gen :RunTime Error C++")
say_help ("O poti rezolva foarte usor in modul urmator: ")
say_help ("In Client este un folder/mapa cu denumirea ")
say_help ("Rezolvare RunTime Error")
say_help ("Deschizi acel folder si dai click pe fisierul")
say_help ("CITESTE ,si urmezi instructiunile de acolo [ENTER] ")
wait()
sent_letter ("Intrebari si raspunsuri")
return
elseif help == "6" then
addimage (-85,-130,"uriel.tga")
say_help_title ("Cum pot sa donez?")
say_help ("Poti Dona prin Urmatoarele Metode:")
say_help ("PayPal/Money Gram (Banca) / SMS")
say_help ("ATENTIE:Donatiile SMS uneori pot fi inchise!")
say_help ("Inainte de a Dona Contactati un Administrator")
say_help ("ATENTIE : De donatii se ocupa doar [OwN]Xander")
say_help ("Skype: worldmetin2.ro")
say_help ("Yahoo Messenger : echipa.worldmetin2 [ENTER] ")
wait()
sent_letter ("Intrebari si raspunsuri")
return
elseif help == "7" then
sent_letter ("Intrebari si raspunsuri")
return
end
end
end
end
|
|
|
|
|
12/29/2013, 16:34
|
#9448
|
elite*gold: 26
Join Date: Mar 2010
Posts: 3,765
Received Thanks: 2,661
|
try this
1) you cannot open a when statement in another when statement -> you forgot an end
2) You forgot more ends in your if structure.
PHP Code:
quest sistem_intrebari begin
state start begin
when login begin
send_letter ("Intrebari si Raspunsuri")
end
when letter begin
send_letter("Intrebari si Raspunsuri")
end
when button or info begin
addimage (-85,-130,"uriel.tga")
say_help_title ("Intrebari si Raspunsuri")
say_help ("Pentru a afla mai multe informatii despre")
say_help ("server introduceti in caseta de mai jos")
say_help ("numarul intrebarii dorite. [ENTER]")
say_help ("1. Cum iau legatura cu echipa?")
say_help ("2. Cand se fac Evenimente?")
say_help ("3. Unde Pica?")
say_help ("4. Alte Intrebari utile")
say_help ("5. De ce ma scoate din Client?")
say_help ("6. Cum pot sa donez?")
say_help ("7. Iesire")
local help = input()
if help == "1" then
addimage (-85,-130,"uriel.tga")
say_help_title ("Cum iau legatura cu echipa?")
say_help ("Daca aveti o problema legata de joc si nu este")
say_help ("foarte importanta cautati un MOD sau GM")
say_help ("El va raspunde la intrebari.[ENTER]")
say_help ("Daca este o problema ce tine de")
say_help ("server si siguranta lui contactati imediat [OwN]Xander")
say_help ("spe adresa de Yahoo Messenger")
say_help (" [ENTER]")
say_help ("sau skype : worldmetin2.ro [ENTER]")
elseif help == "2" then
addimage (-85,-130,"uriel.tga")
say_help_title ("Cand se fac Evenimente?")
say_help ("Va Multumim pentru ca ati ales WorldMetin2")
say_help ("Evenimentele se fac in modul Urmator:")
say_help ("Evenimentul OX- Sambata Orele 20:00")
say_help ("PVM Event - Duminica Orele 12:00")
say_help ("Hide Event - Luni,Miercuri Orele : 19:00")
say_help ("Ghost Shop - Marti,Joi : 19:00 [ENTER]")
elseif help == "3" then
addimage (-85,-130,"uriel.tga")
say_help_title ("Unde Pica?")
say_help ("1. Marihuana")
say_help ("2. Diamant Verde/Galben/Verde/Rosu")
say_help ("3. Scrol Verde/Galben/Verde/Rosu")
say_help ("4. Nisip Verde/Galben/Verde/Rosu")
say_help ("5. Seminte Verzi/Galbene/Verzi/Rosii")
say_help ("6. Perle Celesta/Orhidee/Hooker/Lime")
say_help ("7. Perla Plasma")
say_help ("8. Piatra Abraziva")
say_help ("9. Iesire")
local help2 = input()
if help2 == "1" then
say_help_title ("Marihuana")
addimage (-85,-130,"uriel.tga")
say_help ("Marihuana pica la:")
say_help ("Metinul Singuratatii ,care se afla in Farm Map1")
say_help ("La acest Metin poate pica maxim 2 bucati")
say_help ("Hae-Tae ,care se afla in Farm Map 1")
say_help ("La acest Monstru poate pica maxim 6 bucati [ENTER] ")
elseif help2 == "2" then
addimage (-85,-130,"uriel.tga")
say_help_title ("Diamant Verde/Galben/Verde/Rosu")
say_help ("Diamantele pica la :")
say_help ("Metinul Arogantei ,care se afla in Farm Map1")
say_help ("Metinul Arogantei ,care se afla mapa de la Sultan")
say_help ("Metinul Singuratatii ,care se afla in Farm Map1")
say_help ("La acest Metin poate pica maxim 1 bucata de fiecare")
say_help ("Culoare [ENTER] ")
elseif help2 == "3" then
addimage (-85,-130,"uriel.tga")
say_help_title ("Scrol Verde/Galben/Verde/Rosu")
say_help ("Metinul Arogantei ,care se afla in Farm Map1")
say_help ("Metinul Arogantei ,care se afla mapa de la Sultan")
say_help ("Metinul Singuratatii ,care se afla in Farm Map1")
say_help ("La acest Metin poate pica maxim 1 bucata de fiecare")
say_help ("Culoare [ENTER] ")
elseif help2 == "4" then
addimage (-85,-130,"uriel.tga")
say_help_title ("Nisip Verde/Cuart/Verde/Rosu")
say_help ("Nisip Verde/Cuart/Verde/Rosu pica la:")
say_help ("Metinul Eliberarii,care se afla in Farm Map2")
say_help ("La acest Metin poate pica maxim 1 bucata de fiecare")
say_help ("Culoare")
say_help ("Metinul Tradarii,care se afla in Farm Map2")
say_help ("La acest Metin poate pica maxim 1 bucata de fiecare")
say_help ("Culoare [ENTER] ")
elseif help2 == "5" then
addimage (-85,-130,"uriel.tga")
say_help_title ("Seminte Verzi/Galbene/Verzi/Rosii")
say_help ("Seminte Verzi/Galbene/Verzi/Rosii pica la:")
say_help ("Metinul Eliberarii,care se afla in Farm Map2")
say_help ("La acest Metin poate pica maxim 1 bucata de fiecare")
say_help ("Culoare")
say_help ("Metinul Tradarii,care se afla in Farm Map2")
say_help ("La acest Metin poate pica maxim 1 bucata de fiecare")
say_help ("Culoare [ENTER] ")
elseif help2 == "6" then
addimage (-85,-130,"uriel.tga")
say_help_title ("Perle Celesta/Orhidee/Hooker/Lime")
say_help ("Perle Celesta/Orhidee/Hooker/Lime pica la:")
say_help ("Metinul Arogantei ,care se afla in Farm Map1")
say_help ("Metinul Arogantei ,care se afla mapa de la Sultan")
say_help ("La acest Metin poate pica maxim 1 bucata de fiecare")
say_help ("Culoare [ENTER]")
elseif help2 == "7" then
addimage (-85,-130,"uriel.tga")
say_help_title ("Perla Plasma")
say_help ("Perla Plasma pica din:")
say_help ("Lada Dragonului Rosu ,care se afla in Farm Map 2")
say_help ("Din aceasta lada poate pica maxim o perla plasma ")
say_help ("Aceasta Perla iti foloseste la plusarea pietrilor [ENTER] ")
elseif help2 == "8" then
addimage (-85,-130,"uriel.tga")
say_help_title ("Piatra Abraziva")
say_help ("Piatra Abraziva o poti obtine in felul urmator:")
say_help ("Combini 2x Citrin cu 2x Topaz La NPC")
say_help ("Upgrade Item care se afla in Map1 in cerc")
say_help ("Citrin poti obtine de la Metinul Muntelui")
say_help ("Care se afla in Farm Map 3")
say_help ("Topaz poti obtine de la ")
say_help ("Citrin poti obtine de la Metinul Razbunarii")
say_help ("Care se afla in Farm Map 3 [ENTER] ")
elseif help2 == "" then
addimage (-85,-130,"uriel.tga")
say_help_title ("Intrebari si raspunsuri")
say_help ("Nu ai ales nici o intrebare [ENTER]")
end
elseif help == "4" then
addimage (-85,-130,"uriel.tga")
say_help_title ("Cum Obtin?")
say_help ("1. Cum obtin Inel de experienta")
say_help ("2. Cum obtin Inel Anti-Experienta")
say_help ("3. Cum obtin Pamflet")
say_help ("4. Pot face Roua Verde pe acest server?")
say_help ("5. Unde fac bine banii?")
say_help ("6. De Unde fac rost de iteme de Upgrade secundare?")
say_help ("7. Sunt Modate pe acest server?")
say_help ("8. Pe bonusurile 6-7 intra bonusuri PVP?")
say_help ("9. Iesire")
local help3 = input()
if help3 == "1" then
addimage (-85,-130,"uriel.tga")
say_help_title ("Cum obtin Inel de experienta")
say_help ("Inele De experienta le poti obtine de la:")
say_help ("Metinele de nivelul 85-89 din Padurea Rosie")
say_help ("Cuferele Clar de Luna ,care se da la OX")
say_help ("Cufarul Incepatorului")
say_help ("Indeplinind misiunile de la biolog [ENTER]")
elseif help3 == "2" then
addimage (-85,-130,"uriel.tga")
say_help_title ("Cum obtin Inel Anti-Experienta?")
say_help ("Acest inel il poti cumpara de la Negustoarea")
say_help ("de Diverse care se afla in map1 centrul orasului [ENTER]")
elseif help3 == "3" then
addimage (-85,-130,"uriel.tga")
say_help_title ("Cum obtin Pamflet?")
say_help ("Acest obiect il poti obtine de la NPC de Upgrade")
say_help ("Deasemenea poate pica si in V4,V5 [ENTER] ")
elseif help3 == "4" then
addimage (-85,-130,"uriel.tga")
say_help_title ("Pot face Roua Verde pe acest server?")
say_help ("Pe Acest server nu poti face Roua Verde [ENTER] ")
elseif help3 == "5" then
addimage (-85,-130,"uriel.tga")
say_help_title ("Unde fac bine banii?")
say_help ("Poti face bine banii luptand cu monstrii din:")
say_help ("Farm Map 2")
say_help ("Harta de nivelul 190")
say_help ("V4 [ENTER] ")
elseif help3 == "6" then
addimage (-85,-130,"uriel.tga")
say_help_title ("De Unde fac rost de iteme de Upgrade secundare?")
say_help ("Poti face Rost de aceste iteme de la Hand-Up")
say_help ("Care se afla in Map1 [ENTER] ")
elseif help3 == "7" then
addimage (-85,-130,"uriel.tga")
say_help_title ("Sunt Modate pe acest server?")
say_help ("Pe acest server nu au fost si nu vor fi")
say_help ("iteme modate. [ENTER] ")
elseif help3 == "8" then
addimage (-85,-130,"uriel.tga")
say_help_title ("Pe bonusurile 6-7 intra bonusuri PVP?")
say_help ("Pe bonusurile 6-7 Nu intra bonusuri PVP [ENTER] ")
end
elseif help == "5" then
addimage (-85,-130,"uriel.tga")
say_help_title ("De ce ma scoate din client?")
say_help ("Din cauza ca am adaugat foarte multe armuri")
say_help ("arme,sisteme in clientul WorldMetin2")
say_help ("Unii pot avea probleme cu acest client.")
say_help ("Daca va scoate din Client si primiti o eroare ")
say_help ("Gen :RunTime Error C++")
say_help ("O poti rezolva foarte usor in modul urmator: ")
say_help ("In Client este un folder/mapa cu denumirea ")
say_help ("Rezolvare RunTime Error")
say_help ("Deschizi acel folder si dai click pe fisierul")
say_help ("CITESTE ,si urmezi instructiunile de acolo [ENTER] ")
elseif help == "6" then
addimage (-85,-130,"uriel.tga")
say_help_title ("Cum pot sa donez?")
say_help ("Poti Dona prin Urmatoarele Metode:")
say_help ("PayPal/Money Gram (Banca) / SMS")
say_help ("ATENTIE:Donatiile SMS uneori pot fi inchise!")
say_help ("Inainte de a Dona Contactati un Administrator")
say_help ("ATENTIE : De donatii se ocupa doar [OwN]Xander")
say_help ("Skype: worldmetin2.ro")
say_help ("Yahoo Messenger : echipa.worldmetin2 [ENTER] ")
end
send_letter ("Intrebari si raspunsuri")
end
end
end
|
|
|
|
|
12/29/2013, 17:46
|
#9449
|
elite*gold: 0
Join Date: Jan 2013
Posts: 20
Received Thanks: 3
|
Don't work man...
|
|
|
|
|
12/29/2013, 18:18
|
#9450
|
elite*gold: 26
Join Date: Mar 2010
Posts: 3,765
Received Thanks: 2,661
|
error?
i cannot tell you anything with "Don't work man..."
|
|
|
|
All times are GMT +1. The time now is 06:07.
|
|
![[SERVICE] Die Questkontrolle](https://www.elitepvpers.com/forum/iconimages/metin2-private-server/service-die-questkontrolle_ltr.gif){kind=small}
