da ich oft PN's hier bekomme ob ich noch mein Power/Petsystem habe und anscheinend der downloadlink für meine Serverfiles down ist mach ich sie nochma so offziel Pub.
Zur Quest:
-Pet muss gerufen sein um mit dem Stallburschen zu reden.
-Pet ist levelbar durch deine eigene EXP von deinem Char.
-Pet ist levelbar durch "EXP-Rollen" große und kleine.
-Sobald das Pet genug Erfahrung zusammen hat und man den Stallburschen
anspricht kann man sei Pet zu einem Mount machen.
-Um es zum Mount zu machen ist die Rolle der Evolution nötig.
-4 Pets sind eingetragen und basieren auf dem Pferdelevel 26-29
-Mit der EXP des Spieler das Pet zu leveln ist möglich hat aber eine Zeitbeschränkung.
Nun zur eigentlichen Quest, es ist die "Lite" Version werde meine neu
geschriebene Vorerst nciht releasen.
PHP Code:
------------------------------------------------------------------------------
---------------------QUEST MADE BY [SA]TEARS FROM TEARS OF HEAVEN-------------
------------------------------------------------------------------------------
------------------------------------------------------------------------------
---------------------PETSYSTEM BEGINNT-------------
quest petlvlsystem begin
state start begin
when 20349.chat. "Das leveln des Tigers" with horse.get_level() == 29 begin
if pc.getqf ("Pferdelevel29") >= 500000000 then
say("Dein Pet hat genug EXP, willst du es")
say("zu einem Reittier upgraden?")
local upgraden = select("Ja", "Nein")
if upgraden == 2 then
return end
if upgraden == 1 then
if pc.countitem(20025) == 0 then
say("Dir fehlt dir Rolle der Evolution")
return end
if pc.countitem(20025) >= 1 then
say("Ok ich gebe deinem Pet die Rolle")
say_reward("Deine Rolle der Evolution wurde entfernt")
say_gold("Du erhälst das Dunkle Tiger Siegel")
pc.removeitem(20025,1)
pc.give_item2(53050)
pc.delqf("Pferdelevel29")
end
end
return
end
say("Du hast also einen Babytiger, möchtest du ihn Levlen")
say("Um aus ihm ein Reittier zu machen?")
local ichwill = select("Ja", "Nein")
if ichwill == 2 then
return end
if ichwill == 1 then
say("Okay du hast 2 Optionen")
say_reward("Durch deine Erfarhung")
say("oder")
say_reward("Durch Items")
say("")
say("")
say("Nun wähle deine Methode")
local methode = select("Durch Items", "Durch Erfahrung", "Nichts von beiden")
local actual_PetEXP = pc.getqf("Pferdelevel29")
if methode == 3 then
return end
if methode == 1 then
say("Die kleine Erfarhungsrolle")
say("gibt dem Pet 20.000.000 EXP")
say("")
say("Die große Erfarhungsrolle")
say("gibt dem Pet 35.000.000 EXP")
local itemwahl = select("Kleine Rolle", "Große Rolle")
if itemwahl == 1 then
if pc.countitem(20023) >=1 then
local rolle1exp = 20000000
say("Ok dein Pet erhält 20.000.000 EXP")
pc.setqf("Pferdelevel29", actual_PetEXP + rolle1exp)
say("[DELAY value;340]...[/DELAY]")
say("Dein Pet besitzt nun "..actual_PetEXP + rolle1exp.." EXP")
say("Von 500.000.000 EXP")
pc.removeitem(20023,1)
end
end
if itemwahl == 2 then
if pc.countitem(20024) >=1 then
local rolle2exp = 35000000
say("Ok dein Pet erhält 35.000.000 EXP")
pc.setqf("Pferdelevel29", actual_PetEXP + rolle2exp)
say("[DELAY value;340]...[/DELAY]")
say("Dein Pet besitzt nun "..actual_PetEXP + rolle2exp.." EXP")
say("Von 500.000.000 EXP")
pc.removeitem(20024,1)
end
end
end
if methode == 2 then
local delay = 7200
if get_global_time() - pc.getqf("time2") < delay and pc.getqf("time2") != 0 then
say("Du kannst nur alle 2 Stunde deine Erfahrung spenden")
say("Du musst noch etwas warten")
return end
say("Du willst dein Pet durch deine Erfahrung level")
say("Wähle die Menge")
local spendeexp = select("10KK EXP", "15KK EXP", "Gar keine")
if spendeexp == 3 then
return end
if spendeexp == 1 then
if pc.get_exp() <= 10000000 then
say("Du hast keine 10 Millionen EXP!")
return end
if pc.get_exp() >= 10000000 then
local PetEXP = 10000000
say("Dir werden "..PetEXP.." Erfahrung abgezogen")
say("Und deinem Pet gutgschrieben")
pc.give_exp2(-PetEXP)
pc.setqf("Pferdelevel29", actual_PetEXP + PetEXP)
say("[DELAY value;340]...[/DELAY]")
say("")
say("Dein Pet besitzt nun "..actual_PetEXP + PetEXP.." EXP")
say("Von 500.000.000 EXP")
pc.setqf("time2", get_global_time())
end
end
if spendeexp == 2 then
if pc.get_exp() <= 15000000 then
say("Du hast keine 15 Millionen EXP!")
return end
if pc.get_exp() >= 15000000 then
local PetEXP = 15000000
say("Dir werden "..PetEXP.." Erfahrung abgezogen")
say("Und deinem Pet gutgschrieben")
pc.give_exp2(-PetEXP)
pc.setqf("Pferdelevel29", actual_PetEXP + PetEXP)
say("[DELAY value;340]...[/DELAY]")
say("")
say("Dein Pet besitzt nun "..actual_PetEXP + PetEXP.." EXP")
say("Von 500.000.000 EXP")
pc.setqf("time2", get_global_time())
end
end
end
end
end
--------------------------------------------------------------------------------------------------------------
when 20349.chat. "Das leveln des Keilers" with horse.get_level() == 28 begin
if pc.getqf ("Pferdelevel28") >= 500000000 then
say("Dein Pet hat genug EXP, willst du es")
say("zu einem Reittier upgraden?")
local upgraden = select("Ja", "Nein")
if upgraden == 2 then
return end
if upgraden == 1 then
if pc.countitem(20025) == 0 then
say("Dir fehlt dir Rolle der Evolution")
return end
if pc.countitem(20025) >= 1 then
say("Ok ich gebe deinem Pet die Rolle")
say_reward("Deine Rolle der Evolution wurde entfernt")
say_gold("Du erhälst das Dunkle Keiler Siegel")
pc.removeitem(20025,1)
pc.give_item2(53053)
pc.delqf("Pferdelevel28")
end
end
return
end
say("Du hast also einen Babykeiler, möchtest du ihn Levlen")
say("Um aus ihm ein Reittier zu machen?")
local ichwill = select("Ja", "Nein")
if ichwill == 2 then
return end
if ichwill == 1 then
say("Okay du hast 2 Optionen")
say_reward("Durch deine Erfarhung")
say("oder")
say_reward("Durch Items")
say("")
say("")
say("Nun wähle deine Methode")
local methode = select("Durch Items", "Durch Erfahrung", "Nichts von beiden")
local actual_PetEXP = pc.getqf("Pferdelevel28")
if methode == 3 then
return end
if methode == 1 then
say("Die kleine Erfarhungsrolle")
say("gibt dem Pet 20.000.000 EXP")
say("")
say("Die große Erfarhungsrolle")
say("gibt dem Pet 35.000.000 EXP")
local itemwahl = select("Kleine Rolle", "Große Rolle")
if itemwahl == 1 then
if pc.countitem(20023) >=1 then
local rolle1exp = 20000000
say("Ok dein Pet erhält 20.000.000 EXP")
pc.setqf("Pferdelevel28", actual_PetEXP + rolle1exp)
say("[DELAY value;340]...[/DELAY]")
say("Dein Pet besitzt nun "..actual_PetEXP + rolle1exp.." EXP")
say("Von 500.000.000 EXP")
pc.removeitem(20023,1)
end
end
if itemwahl == 2 then
if pc.countitem(20024) >=1 then
local rolle2exp = 35000000
say("Ok dein Pet erhält 35.000.000 EXP")
pc.setqf("Pferdelevel28", actual_PetEXP + rolle2exp)
say("[DELAY value;340]...[/DELAY]")
say("Dein Pet besitzt nun "..actual_PetEXP + rolle2exp.." EXP")
say("Von 500.000.000 EXP")
pc.removeitem(20024,1)
end
end
end
if methode == 2 then
local delay = 7200
if get_global_time() - pc.getqf("time2") < delay and pc.getqf("time2") != 0 then
say("Du kannst nur alle 2 Stunde deine Erfahrung spenden")
say("Du musst noch etwas warten")
return end
say("Du willst dein Pet durch deine Erfahrung level")
say("Wähle die Menge")
local spendeexp = select("10KK EXP", "15KK EXP", "Gar keine")
if spendeexp == 3 then
return end
if spendeexp == 1 then
if pc.get_exp() <= 10000000 then
say("Du hast keine 10 Millionen EXP!")
return end
if pc.get_exp() >= 10000000 then
local PetEXP = 10000000
say("Dir werden "..PetEXP.." Erfahrung abgezogen")
say("Und deinem Pet gutgschrieben")
pc.give_exp2(-PetEXP)
pc.setqf("Pferdelevel28", actual_PetEXP + PetEXP)
say("[DELAY value;340]...[/DELAY]")
say("")
say("Dein Pet besitzt nun "..actual_PetEXP + PetEXP.." EXP")
say("Von 500.000.000 EXP")
pc.setqf("time2", get_global_time())
end
end
if spendeexp == 2 then
if pc.get_exp() <= 15000000 then
say("Du hast keine 15 Millionen EXP!")
return end
if pc.get_exp() >= 15000000 then
local PetEXP = 15000000
say("Dir werden "..PetEXP.." Erfahrung abgezogen")
say("Und deinem Pet gutgschrieben")
pc.give_exp2(-PetEXP)
pc.setqf("Pferdelevel28", actual_PetEXP + PetEXP)
say("[DELAY value;340]...[/DELAY]")
say("")
say("Dein Pet besitzt nun "..actual_PetEXP + PetEXP.." EXP")
say("Von 500.000.000 EXP")
pc.setqf("time2", get_global_time())
end
end
end
end
end
--------------------------------------------------------------------------------------------------------------------
when 20349.chat. "Das leveln des Löwens" with horse.get_level() == 27 begin
if pc.getqf ("Pferdelevel27") >= 500000000 then
say("Dein Pet hat genug EXP, willst du es")
say("zu einem Reittier upgraden?")
local upgraden = select("Ja", "Nein")
if upgraden == 2 then
return end
if upgraden == 1 then
if pc.countitem(20025) == 0 then
say("Dir fehlt dir Rolle der Evolution")
return end
if pc.countitem(20025) >= 1 then
say("Ok ich gebe deinem Pet die Rolle")
say_reward("Deine Rolle der Evolution wurde entfernt")
say_gold("Du erhälst das Dunkle Löwe Siegel")
pc.delqf("Pferdelevel27")
pc.removeitem(20025,1)
pc.give_item2(53051)
end
end
return
end
say("Du hast also einen Babylöwen, möchtest du ihn Levlen")
say("Um aus ihm ein Reittier zu machen?")
local ichwill = select("Ja", "Nein")
if ichwill == 2 then
return end
if ichwill == 1 then
say("Okay du hast 2 Optionen")
say_reward("Durch deine Erfarhung")
say("oder")
say_reward("Durch Items")
say("")
say("")
say("Nun wähle deine Methode")
local methode = select("Durch Items", "Durch Erfahrung", "Nichts von beiden")
local actual_PetEXP = pc.getqf("Pferdelevel27")
if methode == 3 then
return end
if methode == 1 then
say("Die kleine Erfarhungsrolle")
say("gibt dem Pet 20.000.000 EXP")
say("")
say("Die große Erfarhungsrolle")
say("gibt dem Pet 35.000.000 EXP")
local itemwahl = select("Kleine Rolle", "Große Rolle")
if itemwahl == 1 then
if pc.countitem(20023) >=1 then
local rolle1exp = 20000000
say("Ok dein Pet erhält 20.000.000 EXP")
pc.setqf("Pferdelevel27", actual_PetEXP + rolle1exp)
say("[DELAY value;340]...[/DELAY]")
say("Dein Pet besitzt nun "..actual_PetEXP + rolle1exp.." EXP")
say("Von 500.000.000 EXP")
pc.removeitem(20023,1)
end
end
if itemwahl == 2 then
if pc.countitem(20024) >=1 then
local rolle2exp = 35000000
say("Ok dein Pet erhält 35.000.000 EXP")
pc.setqf("Pferdelevel27", actual_PetEXP + rolle2exp)
say("[DELAY value;340]...[/DELAY]")
say("Dein Pet besitzt nun "..actual_PetEXP + rolle2exp.." EXP")
say("Von 500.000.000 EXP")
pc.removeitem(20024,1)
end
end
end
if methode == 2 then
local delay = 7200
if get_global_time() - pc.getqf("time2") < delay and pc.getqf("time2") != 0 then
say("Du kannst nur alle 2 Stunde deine Erfahrung spenden")
say("Du musst noch etwas warten")
return end
say("Du willst dein Pet durch deine Erfahrung level")
say("Wähle die Menge")
local spendeexp = select("10KK EXP", "15KK EXP", "Gar keine")
if spendeexp == 3 then
return end
if spendeexp == 1 then
if pc.get_exp() <= 10000000 then
say("Du hast keine 10 Millionen EXP!")
return end
if pc.get_exp() >= 10000000 then
local PetEXP = 10000000
say("Dir werden "..PetEXP.." Erfahrung abgezogen")
say("Und deinem Pet gutgschrieben")
pc.give_exp2(-PetEXP)
pc.setqf("Pferdelevel27", actual_PetEXP + PetEXP)
say("[DELAY value;340]...[/DELAY]")
say("")
say("Dein Pet besitzt nun "..actual_PetEXP + PetEXP.." EXP")
say("Von 500.000.000 EXP")
pc.setqf("time2", get_global_time())
end
end
if spendeexp == 2 then
if pc.get_exp() <= 15000000 then
say("Du hast keine 15 Millionen EXP!")
return end
if pc.get_exp() >= 15000000 then
local PetEXP = 15000000
say("Dir werden "..PetEXP.." Erfahrung abgezogen")
say("Und deinem Pet gutgschrieben")
pc.give_exp2(-PetEXP)
pc.setqf("Pferdelevel27", actual_PetEXP + PetEXP)
say("[DELAY value;340]...[/DELAY]")
say("")
say("Dein Pet besitzt nun "..actual_PetEXP + PetEXP.." EXP")
say("Von 500.000.000 EXP")
pc.setqf("time2", get_global_time())
end
end
end
end
end
--------------------------------------------------------------------------------------------------------------
when 20349.chat. "Das leveln des Hundes" with horse.get_level() == 26 begin
if pc.getqf ("Pferdelevel26") >= 500000000 then
say("Dein Pet hat genug EXP, willst du es")
say("zu einem Reittier upgraden?")
local upgraden = select("Ja", "Nein")
if upgraden == 2 then
return end
if upgraden == 1 then
if pc.countitem(20025) == 0 then
say("Dir fehlt dir Rolle der Evolution")
return end
if pc.countitem(20025) >= 1 then
say("Ok ich gebe deinem Pet die Rolle")
say_reward("Deine Rolle der Evolution wurde entfernt")
say_gold("Du erhälst das Dunkle Wolf Siegel")
pc.delqf("Pferdelevel26")
pc.removeitem(20025,1)
pc.give_item2(53052)
end
end
return
end
say("Du hast also einen Babywolf, möchtest du ihn Levlen")
say("Um aus ihm ein Reittier zu machen?")
local ichwill = select("Ja", "Nein")
if ichwill == 2 then
return end
if ichwill == 1 then
say("Okay du hast 2 Optionen")
say_reward("Durch deine Erfarhung")
say("oder")
say_reward("Durch Items")
say("")
say("")
say("Nun wähle deine Methode")
local methode = select("Durch Items", "Durch Erfahrung", "Nichts von beiden")
local actual_PetEXP = pc.getqf("Pferdelevel26")
if methode == 3 then
return end
if methode == 1 then
say("Die kleine Erfarhungsrolle")
say("gibt dem Pet 20.000.000 EXP")
say("")
say("Die große Erfarhungsrolle")
say("gibt dem Pet 35.000.000 EXP")
local itemwahl = select("Kleine Rolle", "Große Rolle")
if itemwahl == 1 then
if pc.countitem(20023) >=1 then
local rolle1exp = 20000000
say("Ok dein Pet erhält 20.000.000 EXP")
pc.setqf("Pferdelevel26", actual_PetEXP + rolle1exp)
say("[DELAY value;340]...[/DELAY]")
say("Dein Pet besitzt nun "..actual_PetEXP + rolle1exp.." EXP")
say("Von 500.000.000 EXP")
pc.removeitem(20023,1)
end
end
if itemwahl == 2 then
if pc.countitem(20024) >=1 then
local rolle2exp = 35000000
say("Ok dein Pet erhält 35.000.000 EXP")
pc.setqf("Pferdelevel26", actual_PetEXP + rolle2exp)
say("[DELAY value;340]...[/DELAY]")
say("Dein Pet besitzt nun "..actual_PetEXP + rolle2exp.." EXP")
say("Von 500.000.000 EXP")
pc.removeitem(20024,1)
end
end
end
if methode == 2 then
local delay = 7200
if get_global_time() - pc.getqf("time2") < delay and pc.getqf("time2") != 0 then
say("Du kannst nur alle 2 Stunde deine Erfahrung spenden")
say("Du musst noch etwas warten")
return end
say("Du willst dein Pet durch deine Erfahrung level")
say("Wähle die Menge")
local spendeexp = select("10KK EXP", "15KK EXP", "Gar keine")
if spendeexp == 3 then
return end
if spendeexp == 1 then
if pc.get_exp() <= 10000000 then
say("Du hast keine 10 Millionen EXP!")
return end
if pc.get_exp() >= 10000000 then
local PetEXP = 10000000
say("Dir werden "..PetEXP.." Erfahrung abgezogen")
say("Und deinem Pet gutgschrieben")
pc.give_exp2(-PetEXP)
pc.setqf("Pferdelevel26", actual_PetEXP + PetEXP)
say("[DELAY value;340]...[/DELAY]")
say("")
say("Dein Pet besitzt nun "..actual_PetEXP + PetEXP.." EXP")
say("Von 500.000.000 EXP")
pc.setqf("time2", get_global_time())
end
end
if spendeexp == 2 then
if pc.get_exp() <= 15000000 then
say("Du hast keine 15 Millionen EXP!")
return end
if pc.get_exp() >= 15000000 then
local PetEXP = 15000000
say("Dir werden "..PetEXP.." Erfahrung abgezogen")
say("Und deinem Pet gutgschrieben")
pc.give_exp2(-PetEXP)
pc.setqf("Pferdelevel26", actual_PetEXP + PetEXP)
say("[DELAY value;340]...[/DELAY]")
say("")
say("Dein Pet besitzt nun "..actual_PetEXP + PetEXP.." EXP")
say("Von 500.000.000 EXP")
pc.setqf("time2", get_global_time())
end
end
end
end
end
end
end