...
when 110.kill or 111.kill or 112.kill or 113.kill or 180.kill or 181.kill or 182.kill or 183.kill begin
local s = number(1, 100)
if s <= 5 and pc.count_item("30150")==0 then
pc.give_item2(30150, 1)
set_state(gotohauptmann)
end
end
end
state gotohauptmann begin
when letter begin
send_letter("Ein Hinweiß")
local v = find_npc_by_vnum(20355)
if v != 0 then target.vid("__TARGET__", v, "Hauptmann")
end
end
when button or info begin
say_title("Ein Hinweiß")
say("")
say("Begebe dich zurück zum")
say("und zeigt ihm den Hinweiß.")
say("")
say_reward("Beeilt euch, es geht um den Prinzen!" )
end
when __TARGET__.target.click begin
target.delete("__TARGET__")
say_title("Ein Hinweiß")
say("")
say("Hauptmann:")
say("")
say("text")
say("text")
say("text")
say("")
say_reward("Belohnung einfügen")
say("Kehrt mit level 25 zu mir zurück!")
pc.remove_item(30150)
set_state(complete)
q.done()
end
end
state complete begin
end
end
Quote:
Tag,
ich habe ein Shop.quest in meiner Quest_list gefunden und mein Bündel ist auf Type 18 (ist auch für Quests glaub ich ). Wenn ich auf JA drücke passiert nichts.
quest shop22 begin
state start begin
when login with pc.getqf("shop")==1 begin
pc.remove_polymorph()
pc.setqf("shop", 0)
end
when 50200.use or 72007.use or 72008.use or 72009.use begin
if pc.get_map_index() == 216 then
if pc.getqf("spam")==0 then
pc.polymorph("30000", time_hour_to_sec(24))
cmdchat("OpenPrivateShop")
pc.setqf("shop", 1)
pc.remove_item("50200", 1)
send_letter("Shop schließen")
pc.setqf("spam", 1)
timer("spam", 5)
end
else
say_title("Shop öffnen")
say("Du befindest dich nicht auf der")
say("Handelsmap. Möchtest du dorthin")
say("teleportiert werden?")
local s = select("Ja", "Nein")
if s==2 then
return
end
if s==1 then
pc.warp(472900, 2183100)
end
end
end
when button or info begin
pc.remove_polymorph()
cmdchat("ClosePrivateShop")
pc.setqf("shop", 0)
end
when spam.timer begin
pc.setqf("spam", 0)
end
end
end
als erstes:Quote:
quest npc_shop begin
state start begin
when 9001.chat."Einhandwaffen" begin
npc.open_shop(1001)
say("Ohne die Waffenhändler wären")
say("die Spieler von ... nicht so stark wie")
say("Sie es jetzt schon sind, ihre")
say("verleihen den Spielern eine sehr große Macht")
end
when 9001.chat."Alle Zweihandwaffen" begin
npc.open_shop(1002)
say("Die Spieler von ... brauchen Tränke um")
say("sich am Leben zu halten gegen böse Monster")
say("sowie gegen verärgerte Spieler, würde es Sie")
say("nicht geben würden die Spieler schon lange")
say("aufgegeben haben ...")
end
when 9001.chat."Fächer" begin
npc.open_shop(1003)
say("Die Spieler von ... brauchen Tränke um")
say("sich am Leben zu halten gegen böse Monster")
say("sowie gegen verärgerte Spieler, würde es Sie")
say("nicht geben würden die Spieler schon lange")
say("aufgegeben haben ...")
end
when 9001.chat."Glocken" begin
npc.open_shop(1004)
say("Ohne die Waffenhändler wären")
say("die Spieler von ... nicht so stark wie")
say("Sie es jetzt schon sind, ihre")
say("verleihen den Spielern eine sehr große Macht")
end
when 9001.chat."Sura Einhandwaffen" begin
npc.open_shop(1005)
say("Die Spieler von ... brauchen Tränke um")
say("sich am Leben zu halten gegen böse Monster")
say("sowie gegen verärgerte Spieler, würde es Sie")
say("nicht geben würden die Spieler schon lange")
say("aufgegeben haben ...")
end
when 9001.chat."Bogen" begin
npc.open_shop(1006)
say("Ohne die Waffenhändler wären")
say("die Spieler von ... nicht so stark wie")
say("Sie es jetzt schon sind, ihre")
say("verleihen den Spielern eine sehr große Macht")
end
end
quest shining begin
state start begin
when 20010.chat."Shining Rüsstungen" begin
say_title("Shininge Rüsstunge")
say("Hey "..pc.get_name().."")
say("")
say("")
say("")
say("")
say("")
say("")
say_title("Das Shining")
local main=select("Shining", "Schließen")
if 1==main then
end
say_title("Wähle deine Character aus")
local v=select("Krieger", "Ninja", "Sura", "Schamane", "Schließen")
if 1==v then
say_title("Der Ausgewählte Character ist (Krieger)")
say_reward("Wähle deine Shining-Farbe aus.")
say("")
end
local a=select("Grün", "Gelb", "Pink", "Orange", "Rot", "Weiß", "Violet", "Schließen")
if 1==a then
say_title("Deine gewählte Farbe ist (Grün)")
say_reward("Wähle deine Rüsstung aus")
say("")
end
local b=select("Mönchsplattenpanzer+9", "Eisenplattenpanzer+9", "Tiger-Plattenpanzer+9", "Tödl.Plattenpanzer+9", "Drachen-Plattenpanzer+9", "Shuppen-Plattenpanzer+9", "Weiter")
if 1==b then
pc.give_item2(50053)
say_title("Mönchsplattenpanzer+9")
say("")
say("Du erhälst den Mönchsplattenpanzer+9")
say("Ich hoffe sie wird dir von großem Nutzen sein")
say("")
say_chat("Mönchsplattenpanzer+9 erhalten")
end
elseif 2==b then
pc.give_item2(50053)
say_title("Eisenplattenpanzer+9")
say("")
say("Du erhälst den Eisenplattenpanzer+9")
say("Ich hoffe sie wird dir von großem Nutzen sein")
say("")
say_chat("Eisenplattenpanzer+9 erhalten")
end
elseif 3==b then
pc.give_item2(50053)
say_title("Tiger-Plattenpanzer+9")
say("")
say("Tiger-Plattenpanzer+9")
say("Ich hoffe sie wird dir von großem Nutzen sein")
say("")
say_chat("Tiger-Plattenpanzer+9 erhalten")
end
elseif 4==b then
pc.give_item2(50053)
say_title("Tödl.Plattenpanzer+9")
say("")
say("Tödl.Plattenpanzer+9")
say("Ich hoffe sie wird dir von großem Nutzen sein")
say("")
say_chat("Tödl.Plattenpanzer+9 erhalten")
end
elseif 5==b then
pc.give_item2(50053)
say_title("Drachen-Plattenpanzer+9")
say("")
say("Drachen-Plattenpanzer+9")
say("Ich hoffe sie wird dir von großem Nutzen sein")
say("")
say_chat("Drachen-Plattenpanzer+9 erhalten")
end
elseif 6==b then
pc.give_item2(50053)
say_title("Shuppen-Plattenpanzer+9")
say("")
say("Shuppen-Plattenpanzer+9")
say("Ich hoffe sie wird dir von großem Nutzen sein")
say("")
say_chat("Shuppen-Plattenpanzer+9 erhalten")
end
elseif 7==b then
say_title("Wähle eine Rüstung aus")
local c=select("Gold-Plattenpanzer+9", "Drachengott-Panzer+9", "Schließen")
end
if 1==c then
pc.give_item2(50053)
say_title("Gold-Plattenpanzer+9")
say("")
say("Gold-Plattenpanzer+9")
say("Ich hoffe sie wird dir von großem Nutzen sein")
say("")
say_chat("Gold-Plattenpanzer+9 erhalten")
end
elseif 2==c then
pc.give_item2(50053)
say_title("Drachengott-Panzer+9")
say("")
say("Drachengott-Panzer+9")
say("Ich hoffe sie wird dir von großem Nutzen sein")
say("")
say_chat("Drachengott-Panzer+9 erhalten")
elseif 3==c then
return
end
elseif 2==main then
return
end
elseif 5==v then
return
end
elseif 8==a then
return
end
end
end
end
end
Quote:
quest npc_shop begin state start begin when 9001.chat."Einhandwaffen" begin npc.open_shop(1001) say("Ohne die Waffenhändler wären") say("die Spieler von ... nicht so stark wie") say("Sie es jetzt schon sind, ihre") say("verleihen den Spielern eine sehr große Macht") end when 9001.chat."Alle Zweihandwaffen" begin npc.open_shop(1002) say("Die Spieler von ... brauchen Tränke um") say("sich am Leben zu halten gegen böse Monster") say("sowie gegen verärgerte Spieler, würde es Sie") say("nicht geben würden die Spieler schon lange") say("aufgegeben haben ...") end when 9001.chat."Fächer" begin npc.open_shop(1003) say("Die Spieler von ... brauchen Tränke um") say("sich am Leben zu halten gegen böse Monster") say("sowie gegen verärgerte Spieler, würde es Sie") say("nicht geben würden die Spieler schon lange") say("aufgegeben haben ...") end when 9001.chat."Glocken" begin npc.open_shop(1004) say("Ohne die Waffenhändler wären") say("die Spieler von ... nicht so stark wie") say("Sie es jetzt schon sind, ihre") say("verleihen den Spielern eine sehr große Macht") end when 9001.chat."Sura Einhandwaffen" begin npc.open_shop(1005) say("Die Spieler von ... brauchen Tränke um") say("sich am Leben zu halten gegen böse Monster") say("sowie gegen verärgerte Spieler, würde es Sie") say("nicht geben würden die Spieler schon lange") say("aufgegeben haben ...") end when 9001.chat."Bogen" begin npc.open_shop(1006) say("Ohne die Waffenhändler wären") say("die Spieler von ... nicht so stark wie") say("Sie es jetzt schon sind, ihre") say("verleihen den Spielern eine sehr große Macht") end end
quest shops begin
state start begin
when 9001.chat."Einhandwaffen" begin
say("Ohne die Waffenhändler wären")
say("die Spieler von ... nicht so stark wie")
say("Sie es jetzt schon sind, ihre")
say("verleihen den Spielern eine sehr große Macht")
wait()
npc.open_shop(1001)
end
when 9001.chat."Alle Zweihandwaffen" begin
say("Die Spieler von ... brauchen Tränke um")
say("sich am Leben zu halten gegen böse Monster")
say("sowie gegen verärgerte Spieler, würde es Sie")
say("nicht geben würden die Spieler schon lange")
say("aufgegeben haben ...")
wait()
npc.open_shop(1002)
end
when 9001.chat."Fächer" begin
say("Die Spieler von ... brauchen Tränke um")
say("sich am Leben zu halten gegen böse Monster")
say("sowie gegen verärgerte Spieler, würde es Sie")
say("nicht geben würden die Spieler schon lange")
say("aufgegeben haben ...")
wait()
npc.open_shop(1003)
end
when 9001.chat."Glocken" begin
say("Ohne die Waffenhändler wären")
say("die Spieler von ... nicht so stark wie")
say("Sie es jetzt schon sind, ihre")
say("verleihen den Spielern eine sehr große Macht")
wait()
npc.open_shop(1004)
end
when 9001.chat."Sura Einhandwaffen" begin
say("Die Spieler von ... brauchen Tränke um")
say("sich am Leben zu halten gegen böse Monster")
say("sowie gegen verärgerte Spieler, würde es Sie")
say("nicht geben würden die Spieler schon lange")
say("aufgegeben haben ...")
wait()
npc.open_shop(1005)
end
when 9001.chat."Bogen" begin
say("Ohne die Waffenhändler wären")
say("die Spieler von ... nicht so stark wie")
say("Sie es jetzt schon sind, ihre")
say("verleihen den Spielern eine sehr große Macht")
wait()
npc.open_shop(1006)
end
end
end
Danke Hat jetzt Geklappt kannst du mir noch sagen was genau falsch war ??Quote:
PHP Code:quest shops begin
state start begin
when 9001.chat."Einhandwaffen" begin
say("Ohne die Waffenhändler wären")
say("die Spieler von ... nicht so stark wie")
say("Sie es jetzt schon sind, ihre")
say("verleihen den Spielern eine sehr große Macht")
wait()
npc.open_shop(1001)
end
when 9001.chat."Alle Zweihandwaffen" begin
say("Die Spieler von ... brauchen Tränke um")
say("sich am Leben zu halten gegen böse Monster")
say("sowie gegen verärgerte Spieler, würde es Sie")
say("nicht geben würden die Spieler schon lange")
say("aufgegeben haben ...")
wait()
npc.open_shop(1002)
end
when 9001.chat."Fächer" begin
say("Die Spieler von ... brauchen Tränke um")
say("sich am Leben zu halten gegen böse Monster")
say("sowie gegen verärgerte Spieler, würde es Sie")
say("nicht geben würden die Spieler schon lange")
say("aufgegeben haben ...")
wait()
npc.open_shop(1003)
end
when 9001.chat."Glocken" begin
say("Ohne die Waffenhändler wären")
say("die Spieler von ... nicht so stark wie")
say("Sie es jetzt schon sind, ihre")
say("verleihen den Spielern eine sehr große Macht")
wait()
npc.open_shop(1004)
end
when 9001.chat."Sura Einhandwaffen" begin
say("Die Spieler von ... brauchen Tränke um")
say("sich am Leben zu halten gegen böse Monster")
say("sowie gegen verärgerte Spieler, würde es Sie")
say("nicht geben würden die Spieler schon lange")
say("aufgegeben haben ...")
wait()
npc.open_shop(1005)
end
when 9001.chat."Bogen" begin
say("Ohne die Waffenhändler wären")
say("die Spieler von ... nicht so stark wie")
say("Sie es jetzt schon sind, ihre")
say("verleihen den Spielern eine sehr große Macht")
wait()
npc.open_shop(1006)
end
end
end
quest neutral_warp begin
state start begin
when 20009.chat."Hallo!" begin
say_title("Alter Mann")
say("Hallo!")
say("ich weiss wie du in andere Regionen reisen kannst.")
say("Wenn du mir ein bischen Gold gibst werde ich dich")
say("begleiten.")
local s = select("Bezahlen", "Abbrechen")
if 2 == s then return end
local cost = 1000
say_title("Alter Mann")
say("Wohin möchtest du?")
say("Es kostet "..cost.." Yang.")
if pc.gold < cost then
say("Du hast nicht genug Yang!")
return
end
local m = pc.get_map_index()
local e = pc.get_empire()
if m == 1 or m == 21 or m == 41 then
local s = select("Orktal", "Eisland", "Abbrechen")
if 3 == s then
return
end
local warp = {
{
{ 402100, 673900 };
{ 270400, 739900 };
{ 321300, 808000 };
};
{
{ 434200, 290600 };
{ 375200, 174900 };
{ 491800, 173600 };
};
};
pc.warp(warp[s][e][1], warp[s][e][2])
pc.changegold(-cost)
elseif m == 3 or m == 23 or m == 43 then
local s = select( "Wüste","Feuerland", "Abbrechen")
if 3 == s then
return
end
local warp = {
{
{ 217800, 627200 };
{ 221900, 502700 };
{ 344000, 502500 };
};
{
{ 599400, 756300 };
{ 597800, 622200 };
{ 730700, 689800 };
};
};
pc.warp(warp[s][e][1], warp[s][e][2])
pc.changegold(-cost)
end
end
end
end
quest map_warp begin
state start begin
when 9012.chat."Teleportieren" begin
local map = pc.get_map_index()
local empire = pc.get_empire()
local level = pc.get_level()
local cost = math.floor(level / 5) * 1000
local warp = {
{
{ 402100, 673900 },
{ 270400, 739900 },
{ 321300, 808000 },
},
{
{ 217800, 627200 },
{ 221900, 502700 },
{ 344000, 502500 },
},
{
{ 434200, 290600 },
{ 375200, 174900 },
{ 491800, 173600 },
},
{
{ 599400, 756300 },
{ 597800, 622200 },
{ 730700, 689800 },
},
{
{ 590500, 110500 },
{ 590500, 110500 },
{ 590500, 110500 },
},
{
{ 1119900, 70800 },
{ 1119900, 70800 },
{ 1119900, 70800 },
},
{
{ 60000, 496700 },
{ 60000, 496700 },
{ 60000, 496700 },
},
}
local sub_set = 0
say_title("Teleporter")
if map == 1 or map == 3 or map == 21 or map == 23 or map == 41 or map == 43 then
say("Hier gibt es keine starken Monster.")
say("Jedoch gibt es viele andere Regionen,")
say("in denen es gefährlichere und stärkere")
say("gesichtet wurden..")
say("")
say_reward("Soll ich dich hingeleiten?")
else
say("Anscheinend sind die Monster zu stark")
say("für dich. Oder ist dir eine Medizin")
say("ausgegangen?")
say("")
say_reward("Soll ich dich in die Stadt bringen?")
end
local s = select("Teleportieren","Schließen")
if s == 2 then
return
end
say_title("Teleporter")
if map == 1 or map == 3 or map == 21 or map == 23 or map == 41 or map == 43 then
if level < 60 then
say("Um ernste Verletzungen zu vermeiden,")
say("teleportiere ich dich nur in folgende Gebiete")
sub_set = select("Tal von Seungryong", "Yongbi-Wüste", "Berg Sohan", "Abbrechen")
if sub_set == 4 then
return
end
else
say("Da dein Level schon recht hoch ist,")
say("kann ich dich auch in gefährlicheren")
say("Regionen teleportieren..")
sub_set = select("Tal von Seungryong", "Yongbi-Wüste", "Berg Sohan", "Andere Gebiete", "Abbrechen")
if sub_set == 5 then
return
end
if sub_set == 4 then
say_title("Teleportieren")
say("Dies sind die schweren Regionen..")
sub_set = select("Doyyumhwan", "Dämonenturm", "Roter Wald", "Kuahklo Dong", "Abbrechen") + 3
if sub_set == 10 then
return
end
end
end
pc.warp(warp[sub_set][empire][1], warp[sub_set][empire][2])
else
if empire== 1 then
sub_set3 = select("Yongan", "Jayang", "Abbrechen")
if sub_set3 == 1 then
pc.warp(474300,954800)
end
if sub_set3 == 2 then
pc.warp(353100,882900)
end
if sub_set3 == 3 then
return
end
elseif empire == 2 then
local sub_set3 = select("Joan","Bokjung", "Abbrechen")
if sub_set3 == 1 then
pc.warp(63800,166400)
end
if sub_set3 == 2 then
pc.warp(145500,240000)
end
if sub_set3 == 3 then
return
end
elseif empire == 3 then
local sub_set3 = select("Pyungmoo","Bakra", "Abbrechen")
if sub_set3 == 1 then
pc.warp(959900,269200)
end
if sub_set3 == 2 then
pc.warp(863900,246000)
end
if sub_set3 == 3 then
return
end
end
end
end
end
end
quest training_grandmaster_skill begin
state start begin
when 50513.use begin
say_title("Großmeister")
local seelicount = pc.count_item(50513)
if pc.get_skill_group() == 0 then
say("Deine Fertigkeiten sind noch zu Schwach um sie zu Trainieren. "..pc.get_skill_group())
return
end
if get_time() < pc.getqf("next_time") then -- and not is_test_server() then
if pc.is_skill_book_no_delay() then
say("Du hast eine Exorzismus-Schriftrolle gelesen")
say("nun kannst du einen weiteren")
say("Seelenstein lesen.")
say("")
wait()
say_title("Großmeister")
else
say("Ich habe heute bereits einen Seelenstein gelesen")
say("mit einer Exorzismus-Schriftrolle könnte ich")
say("nochmal Trainieren.")
return
end
end
local result = training_grandmaster_skill.BuildGrandMasterSkillList(pc.get_job(), pc.get_skill_group())
local vnum_list = result[1]
local name_list = result[2]
if table.getn(vnum_list) == 0 then
say("Lies erstmal Bücher bevor du ein Seelenstein lesen")
say("willst")
return
end
say("Welche Fertigkeit möchtest du Trainieren?")
say("Wähle bitte aus.")
local menu_list = {}
table.foreach(name_list, function(i, name) table.insert(menu_list, name) end)
table.insert(menu_list, "Abbrechen")
local s=select_table(menu_list)
if table.getn(menu_list) == s then
return
end
local skill_name=name_list[s]
local skill_vnum=vnum_list[s]
local skill_level = pc.get_skill_level(skill_vnum)
local cur_alignment = pc.get_real_alignment()
local need_alignment = 1000+500*(skill_level-30)
test_chat("Momentaner Rang: "..cur_alignment)
test_chat("Benötigter Rang: "..need_alignment)
local title=string.format("%s auf Großmeister", skill_name, skill_level-30+1)
if pc.count_item(50513) != seelicount then
say("Stfu Buguser!")
return
end
say_title(title)
say("Das lesen eines Seelensteines")
say("kostet Rangpunke.")
say("")
if cur_alignment<-19000+need_alignment then
say_reward("Du hast zu wenig Rang!")
return
end
if cur_alignment<0 then
say_reward(string.format("Benötigter Rang: %d -> %d", need_alignment, need_alignment*2))
say_reward("Beim erfolgreichen lesen des Seelensteines wird dir")
say_reward("das doppelte an Rangpunkten abgezogen!")
need_alignment=need_alignment*2
elseif cur_alignment<need_alignment then
say_reward(string.format("Benötigter Rang: %d", need_alignment))
say_reward("Beim erfolgreichen lesen des Seelensteines wird dir")
say_reward("das doppelte an Rangpunkten abgezogen!")
else
say_reward(string.format("Benötigter Rang: %d", need_alignment))
end
say("")
local s=select("Lesen", "Abbrechen")
if s==2 then
return
end
if cur_alignment>=0 and cur_alignment<need_alignment then
say_title(string.format("%s Bestätigen", title))
say("Das Lesen eines Seelensteines kostet Rang,")
say("wenn du diesen Seelenstein ließt,")
say("kommst du in -Rang")
say("Bitte Bestätige das du diesen Seelenstein")
say("wirklich lesen möchtest!")
say("")
say_reward("Ravion2")
say("")
say("Bitte gebe 'Ravion2' ein!")
local s=input()
if s!="Ravion2" then
return
end
end
if get_time() < pc.getqf("next_time") then -- and not is_test_server() then
if pc.is_skill_book_no_delay() then
pc.remove_skill_book_no_delay()
else
say("Herzlichen Glückwunsch !")
notice_all("".. pc.get_name() .." hat die Fertigkeit "..skill_name.." Perfekt gemeistert!")
notice_all("Herzlichen Glückwunsch!")
return
end
end
pc.setqf("next_time", get_time()+time_hour_to_sec(number(8, 12)))
if need_alignment>0 then
if pc.learn_grand_master_skill(skill_vnum, 400) then
pc.change_alignment(-need_alignment)
say_title(string.format("%s erfolgreich", title))
if 40 == pc.get_skill_level(skill_vnum) then
say(string.format("%s ist nun P.", skill_name))
notice_all("".. pc.get_name() .." hat die Fertigkeit "..skill_name.." mit level "..pc.get_level().." Perfekt gemeistert!")
notice_all("Herzlichen Glückwunsch!")
else
say(string.format("Dein Seelenstein war erfolgreich!", skill_name, skill_level-30+1+1))
end
say("")
say_reward("Herzlichen Glückwunsch!")
say_reward(string.format("Kosten an Rang: %d ", need_alignment))
say("")
pc.remove_item(50513, 1)
else
pc.remove_item(50513, 1)
say_title(string.format("%s Fehlgeschlagen", title))
say("Dein Seelenstein hat nicht geklappt.")
say("")
say_reward("Fehlgeschlagen!")
say("")
pc.change_alignment(-number(need_alignment/3, need_alignment/2))
end
end
end
function BuildGrandMasterSkillList(job, group)
GRAND_MASTER_SKILL_LEVEL = 30
PERFECT_MASTER_SKILL_LEVEL = 40
local skill_list = special.active_skill_list[job+1][group]
local ret_vnum_list = {}
local ret_name_list = {}
-- test_chat(string.format("job=%d, group=%d", job, group))
table.foreach(skill_list,
function(i, skill_vnum)
local skill_level = pc.get_skill_level(skill_vnum)
-- test_chat(string.format("[%d]=%d", skill_vnum, skill_level))
if skill_level >= GRAND_MASTER_SKILL_LEVEL and skill_level < PERFECT_MASTER_SKILL_LEVEL then
table.insert(ret_vnum_list, skill_vnum)
local name=locale.GM_SKILL_NAME_DICT[skill_vnum]
if name == nil then name=skill_vnum end
table.insert(ret_name_list, name)
end
end)
return {ret_vnum_list, ret_name_list}
--return {ret_vnum_list, ret_name_list}
end
end
end
Quote:
Quote:
Ich wollte mal fragen ob es eine quest gibt,
wenn man zb. 50,000,000 yang hat dass man sich davon 1 level up kaufen kann... ?
Lg. Flampy
quest cash begin
state start begin
when login begin
local ep = pc.get_next_exp()
if pc.get_money() >= 50000000 then
say_title("Level kaufen")
say("")
say("Du kannst dir jetzt ein Level up")
say("Kaufen weil wegen Yang.")
say("")
say_reward("Möchtest du ein Level kaufen?")
local a = select("Jap", "Nope")
if a == 2 then
return
else
pc.change_money(-50000000)
pc.give_exp2(..ep..)
end
end
end
end
end
quest InfoPanel begin
state start begin
when login with pc.get_level() >= 1 begin
set_state(InfoPanel)
end
end
state InfoPanel begin
when letter begin
send_letter("Info-Panel")
end
when button or info begin
say_title("Was möchtest du wissen?:")
local f = select("Level Fragen","Dropp-Fragen","Allgemeine Fragen","Client","Quests","HP & IS","Regeln","Team")
if f == 1 then
local d = select("Wo Level ich?")
if d == 1 then
say("Du Levelest auf den Levelmaps die du mit dem Userpanel-Item aufrufen kannst.")
say("Das Userpanel Item bekommst du beim Start oder im Itemshop Ingame.")
return
end
end
if f == 2 then
local c = select("Wo droppe ich Rüstungen ?","Wo droppe ich Waffen ?","Wo droppe ich Yangsteine ?","Wo droppe ich 81er Schilder ?")
if c == 1 then
say("Auf der Lv.230 Farmmap .")
return
end
if c == 2 then
say("Auf der Lv.230 Farmmap .")
return
end
if c == 3 then
say("Auf der Lv.230 Farmmap .")
return
end
if c == 4 then
say("Im Spinnendungeon 2 (Lv.58 Levelmap) .")
return
end
end
if f == 3 then
local y = select("Dropps Übersicht?","Uppsystem Übersicht?","Switchbot Übersicht?")
if y == 1 then
say("Du findest ein Bild im Forum wo du alle Dropps Perfekt sehen kannst,")
say("es liegt im Bereich News bei Game.")
return
end
if y == 2 then
say("Du findest ein Bild im Forum wo du das Uppsystem Perfekt sehen kannst,")
say("es liegt im Bereich News bei Game.")
return
end
if y == 3 then
say("Du findest ein Switchbot im Forum aber du kannst auch einen anderen nutzen,")
say("es liegt im Bereich News bei Game.")
return
end
end
if f == 4 then
local x = select("Du kannst Metins/Monster nicht sehen?","Client stürzt ab?")
if x == 1 then
say("Starte den Client Komplett neu.")
return
end
if x == 2 then
say("Lade dir die neuste Version von .NET Framework herunter, starte deinen PC NEU & teste es nochmal.")
say("Falls nichts passiert Frag im Board.")
return
end
end
if f == 5 then
local z = select("Muss ich Quests machen?")
if z == 1 then
say("Generell NEIN. Wir Haben Ein Super PvP Konzept")
say("Aber es werden ein paar neue PvP/PvM Quests kommen")
return
end
end
if f == 6 then
local xd = select("Wann kommen meine Coins?,"Wie bekomme ich mein Coins schneller?"")
if xd == 1 then
say("Dies kann in seltenen Fällen paar Stunden dauern.")
say("Also gedulde dich bitte")
return
end
if xd == 2 then
say("Wende dich an den Serverleiter im Forum/Board per pn.")
return
end
end
if f == 7 then
local lod = select("Dauerkill erlaubt?","Hacks/Bots erlaubt?","Bugusing erlaubt?","Rassismus erlaubt?")
if lod == 1 then
say("Ja, aber ungern gesehen , wird zu viel Arbeit dies zu ahnden.")
say("Jedoch NPC KILL verboten.")
return
end
if lod == 2 then
say("Jeder Hack und Bot oder ähnliches sind verboten ! Wird mit Permanent-Bann geahndet !")
return
end
if lod == 3 then
say("VERBOTEN ! Wird je nach Vergehen bis zu Permanent Bann geahndet.")
return
end
if lod == 4 then
say("Wer ander aufgrund seines Geschlechts / Herkunft ausschließt oder Beleidigt wird sofort Permanent gebannt !")
say("Wir sind eine Welt und leben alle unter dem selben Himmel.")
return
end
end
if f == 8 then
say("Das Team bilden momentan :")
say_reward("ServerLeiter - [SL]*****")
say("...")
say("Mehr im Board.")
end
end
end
end
quest Itemshop Info begin
state start begin
when login with pc.get_level() >= 1 begin
set_state(Itemshop Info)
end
end
state Itemshop Info begin
when letter begin
send_letter("Itemshop Info")
end
when button or info begin
say_title("Was möchtest du wissen?:")
local f = select("Itemshop Info")
if f == 1 then
local d = select("Itemshop Info")
if d == 1 then
say("Itemshop Info")
say("Spenden:")
say("10€ = 60.000")
say("25€ = 150.000")
say("50€ = 300.000")
say("100€ = 600.000")
say("")
say("Vote 4 Coins:")
say("Pro Voten bekommt ihr 2.000 coins gutgeschrieben.")
say("Man kann nur alle 24 Stunden voten.")
return
end
end
end
end
end
Quote:
und die hierCode:quest InfoPanel begin state start begin when login with pc.get_level() >= 1 begin set_state(InfoPanel) end end state InfoPanel begin when letter begin send_letter("Info-Panel") end when button or info begin say_title("Was möchtest du wissen?:") local f = select("Level Fragen","Dropp-Fragen","Allgemeine Fragen","Client","Quests","HP & IS","Regeln","Team") if f == 1 then local d = select("Wo Level ich?") if d == 1 then say("Du Levelest auf den Levelmaps die du mit dem Userpanel-Item aufrufen kannst.") say("Das Userpanel Item bekommst du beim Start oder im Itemshop Ingame.") return end end if f == 2 then local c = select("Wo droppe ich Rüstungen ?","Wo droppe ich Waffen ?","Wo droppe ich Yangsteine ?","Wo droppe ich 81er Schilder ?") if c == 1 then say("Auf der Lv.230 Farmmap .") return end if c == 2 then say("Auf der Lv.230 Farmmap .") return end if c == 3 then say("Auf der Lv.230 Farmmap .") return end if c == 4 then say("Im Spinnendungeon 2 (Lv.58 Levelmap) .") return end end if f == 3 then local y = select("Dropps Übersicht?","Uppsystem Übersicht?","Switchbot Übersicht?") if y == 1 then say("Du findest ein Bild im Forum wo du alle Dropps Perfekt sehen kannst,") say("es liegt im Bereich News bei Game.") return end if y == 2 then say("Du findest ein Bild im Forum wo du das Uppsystem Perfekt sehen kannst,") say("es liegt im Bereich News bei Game.") return end if y == 3 then say("Du findest ein Switchbot im Forum aber du kannst auch einen anderen nutzen,") say("es liegt im Bereich News bei Game.") return end end if f == 4 then local x = select("Du kannst Metins/Monster nicht sehen?","Client stürzt ab?") if x == 1 then say("Starte den Client Komplett neu.") return end if x == 2 then say("Lade dir die neuste Version von .NET Framework herunter, starte deinen PC NEU & teste es nochmal.") say("Falls nichts passiert Frag im Board.") return end end if f == 5 then local z = select("Muss ich Quests machen?") if z == 1 then say("Generell NEIN. Wir Haben Ein Super PvP Konzept") say("Aber es werden ein paar neue PvP/PvM Quests kommen") return end end if f == 6 then local xd = select("Wann kommen meine Coins?,"Wie bekomme ich mein Coins schneller?"") if xd == 1 then say("Dies kann in seltenen Fällen paar Stunden dauern.") say("Also gedulde dich bitte") return end if xd == 2 then say("Wende dich an den Serverleiter im Forum/Board per pn.") return end end if f == 7 then local lod = select("Dauerkill erlaubt?","Hacks/Bots erlaubt?","Bugusing erlaubt?","Rassismus erlaubt?") if lod == 1 then say("Ja, aber ungern gesehen , wird zu viel Arbeit dies zu ahnden.") say("Jedoch NPC KILL verboten.") return end if lod == 2 then say("Jeder Hack und Bot oder ähnliches sind verboten ! Wird mit Permanent-Bann geahndet !") return end if lod == 3 then say("VERBOTEN ! Wird je nach Vergehen bis zu Permanent Bann geahndet.") return end if lod == 4 then say("Wer ander aufgrund seines Geschlechts / Herkunft ausschließt oder Beleidigt wird sofort Permanent gebannt !") say("Wir sind eine Welt und leben alle unter dem selben Himmel.") return end end if f == 8 then say("Das Team bilden momentan :") say_reward("ServerLeiter - [SL]*****") say("...") say("Mehr im Board.") end end end end
Code:quest Itemshop Info begin state start begin when login with pc.get_level() >= 1 begin set_state(Itemshop Info) end end state Itemshop Info begin when letter begin send_letter("Itemshop Info") end when button or info begin say_title("Was möchtest du wissen?:") local f = select("Itemshop Info") if f == 1 then local d = select("Itemshop Info") if d == 1 then say("Itemshop Info") say("Spenden:") say("10€ = 60.000") say("25€ = 150.000") say("50€ = 300.000") say("100€ = 600.000") say("") say("Vote 4 Coins:") say("Pro Voten bekommt ihr 2.000 coins gutgeschrieben.") say("Man kann nur alle 24 Stunden voten.") return end end end end end
quest InfoPanel begin
state start begin
when login with pc.get_level() >= 1 begin
set_state(InfoPanel)
end
end
state InfoPanel begin
when letter begin
send_letter("Info-Panel")
end
when button or info begin
say_title("Was möchtest du wissen?:")
local f = select("Level Fragen","Dropp-Fragen","Allgemeine Fragen","Client","Quests","HP & IS","Regeln","Team")
if f == 1 then
say_title("Wo level ich?")
say("Du Levelest auf den Levelmaps die du mit dem Userpanel-Item aufrufen kannst.")
say("Das Userpanel Item bekommst du beim Start oder im Itemshop Ingame.")
end
if f == 2 then
local c = select("Wo droppe ich Rüstungen ?","Wo droppe ich Waffen ?","Wo droppe ich Yangsteine ?","Wo droppe ich 81er Schilder ?")
if c == 1 then
say("Auf der Lv.230 Farmmap .")
elseif c == 2 then
say("Auf der Lv.230 Farmmap .")
elseif c == 3 then
say("Auf der Lv.230 Farmmap .")
elseif c == 4 then
say("Im Spinnendungeon 2 (Lv.58 Levelmap) .")
end
end
if f == 3 then
local y = select("Dropps Übersicht?","Uppsystem Übersicht?","Switchbot Übersicht?")
if y == 1 then
say("Du findest ein Bild im Forum wo du alle Dropps Perfekt sehen kannst,")
say("es liegt im Bereich News bei Game.")
elseif y == 2 then
say("Du findest ein Bild im Forum wo du das Uppsystem Perfekt sehen kannst,")
say("es liegt im Bereich News bei Game.")
elseif y == 3 then
say("Du findest ein Switchbot im Forum aber du kannst auch einen anderen nutzen,")
say("es liegt im Bereich News bei Game.")
end
end
if f == 4 then
local x = select("Du kannst Metins/Monster nicht sehen?","Client stürzt ab?")
if x == 1 then
say("Starte den Client Komplett neu.")
elseif x == 2 then
say("Lade dir die neuste Version von .NET Framework herunter, starte deinen PC NEU & teste es nochmal.")
say("Falls nichts passiert Frag im Board.")
end
end
if f == 5 then
local z = select("Muss ich Quests machen?")
if z == 1 then
say("Generell NEIN. Wir Haben Ein Super PvP Konzept")
say("Aber es werden ein paar neue PvP/PvM Quests kommen")
end
end
if f == 6 then
local xd = select("Wann kommen meine Coins?","Wie bekomme ich mein Coins schneller?")
if xd == 1 then
say("Dies kann in seltenen Fällen paar Stunden dauern.")
say("Also gedulde dich bitte")
elseif xd == 2 then
say("Wende dich an den Serverleiter im Forum/Board per pn.")
end
end
if f == 7 then
local lod = select("Dauerkill erlaubt?","Hacks/Bots erlaubt?","Bugusing erlaubt?","Rassismus erlaubt?")
if lod == 1 then
say("Ja, aber ungern gesehen , wird zu viel Arbeit dies zu ahnden.")
say("Jedoch NPC KILL verboten.")
elseif lod == 2 then
say("Jeder Hack und Bot oder ähnliches sind verboten ! Wird mit Permanent-Bann geahndet !")
elseif lod == 3 then
say("VERBOTEN ! Wird je nach Vergehen bis zu Permanent Bann geahndet.")
elseif lod == 4 then
say("Wer ander aufgrund seines Geschlechts / Herkunft ausschließt oder Beleidigt wird sofort Permanent gebannt !")
say("Wir sind eine Welt und leben alle unter dem selben Himmel.")
end
end
if f == 8 then
say("Das Team bilden momentan :")
say_reward("ServerLeiter - [SL]Dante")
say("...")
say("Mehr im Board.")
end
end
end
end
quest isinfo begin
state start begin
when login begin
send_letter("Itemshop Info")
end
when button or info begin
say_title("Was möchtest du wissen?")
say("")
say("")
local f = select("Itemshop Info", "Nichts weiter")
if f == 1 then
say("Itemshop Info")
say("Spenden:")
say("10€ = 60.000")
say("25€ = 150.000")
say("50€ = 300.000")
say("100€ = 600.000")
say("")
say("Vote 4 Coins:")
say("Pro Voten bekommt ihr 2.000 coins gutgeschrieben.")
say("Man kann nur alle 24 Stunden voten.")
else
return
end
end
end
end