Es kommt zwar keine Fehler meldung in VPC aber ingame funkt die Quest auch nicht :(
Der Pfad "usr/home/game/share/locale/germany/map/metin2_map_devilscatacomb/dc_regen_tore_left.txt" stimmt??Quote:
Hi Leute,
ich habe ein kleines Problem. Diese quest ist vom Devils Catacomb, und habe halt alles eingefügt und die pfäde hingeschrieben wo dann die regen.txt dateien aufgerufen werden sollen.
Es klappt auch alles in ebene 1 (grundebene, nach dem Wächter)
Danach als ich dann den Schlüssel der Statue des kud gegeben habe wurde ich in der Nächsten ebene geportet. Nur sind dort KEINE mobs.
Die Schildkröte ist da aber KEINE Mobs, sowie die Tore.
Ich bin mir nicht sicher ob es an der Quest liegt oder an den regen.txt´en.
Wenn ich weiß das die Quest in ordnung ist und keine Fehler enthält dann muss ich nochmal die regen.txt hervorholen, damit ihr euch die mal anschauen könnt.
Hier jetzt die Quest:
Hoffe mir kann jemand Helfen.
MFG MM92
Würde ich mal so Probieren:Quote:
Es kommt zwar keine Fehler meldung in VPC aber ingame funkt die Quest auch nicht :(
quest skipia_join begin
state start begin
when login or levelup with pc.get_level() >= 75 and pc.getqf("first_level_75", 0) begin
pc.setqf("first_level_75", 1)
set_state(first_75)
end
state first_75 begin
when letter begin
send_letter("Seon-Hae")
end
when button or info begin
say_title("Seon-Hae")
say("")
say("Wunderbar!")
say("Du bist endlich Level 75.")
say("Mach dich schnell auf den Weg zu mir,")
say("ich habe eine tolle Nachricht für dich.")
say("")
end
when 20095.chat."Die Grotte der Verbannung" with pc.getqf("first_level75", 1) begin
say_title("Seon-Hae")
say("")
say("Guten Tag,")
say("Mein Name ist Seon-Hae, ich bin der Bruder")
say("von Koe-Pung, dem Hüter des Portals zur")
say("Grotte der Verbannung. Meine Aufgabe ist es")
say("Bürgern wie dir Blutsteine zu verkaufen oder")
say("zusagen, wie man an einen Blutstein gelangen kann.")
say("")
say_reward("Hast du Interesse an einem Blutstein?")
local int=select("Ich bin Interessiert", "Vielleicht später")
if int==2 then
return
end
say_title("Seon-Hae")
say("")
say("Ah, du hast also Interesse?")
say("Super! Dann werde ich dir nun mein")
say("Angebot machen.")
wait()
say_title("Seon-Hae")
say("")
say("Ich verkaufe dir einen Blutstein für")
say("500.000.000 Yang.")
say("")
say_reward("Hast du Interesse?")
local int_blutstein=select("Ich möchte einen", "Das ist mir zu Zeuer")
if int_blutstein==1 and pc.get_money(500000000) >=1 then
say_title("Seon-Hae")
say("")
say("Super!")
say("Ich habe dir einen Blutstein für")
say("500.000.000 Yang in dein Inventar gelegt.")
pc.change_money(-500000000)
else
say_title("Seon-Hae")
say("")
say("Du hast keine 500.000.000 Yang!")
say("Komm wieder wenn du das Yang hast.")
end
if int_blutstein==2 then
say_title("Seon-Hae")
say("")
say("Du möchtest also nicht Zahlen, dann")
say("werde ich dir nun erklären wie du")
say("auf eine andere Art an Blutstein kommst.")
wait()
say_title("Seon-Hae")
say("")
say("Um an einen Blutstein zu kommen,")
say("musst du den Sensenmann töten und")
say("sehr viel Glück haben, das er einen")
say("verliert. Ich warne dich aber vor,")
say("ein Blutstein vom Sensenmann zu erhalten")
say("ist sehr sehr schwierig!")
end
when 20095.chat."Die Grotte der Verbannung" with pc.getqf("first_level_75", 0) begin
say_title("Seon-Hae")
say("")
say("Wer bist du? Was willst du?")
say("Was ist die Grotte der Verbannung?")
say("Noch nie davon gehört!")
say("Verschwinde, lass mich in ruh!")
end
end
end
end
Quote:
quest icerun begin
state start begin
when 9010.chat."Atlantis betreten" with pc.get_map_index() == 16 begin
say_title("Wächter von Atlantis:")
say("Ihr müsst ganz schön mutig sein")
say("hierher zu kommen.")
say("")
say_title("Ihr seid stark genug??")
say("")
say("Wollt ihr das vereiste Atlantis betreten?.")
say("")
local s = select("Aber klar!", "Nein, lieber nicht.")
if s == 1 then
--if party.get_near_count() >=5 then
--game.set_event_flag("besuchinheiligerhalle", game.get_event_flag("besuchinheiligerhalle")-1)
d.new_jump_all(208, 5106 , 4089)
d.regen_file("data/dungeon/icerun_regen.txt")
d.notice("Ungebetener Besuch!!")
d.notice("Verschwindet aus meinem Atlantis!")
d.notice("Wehe ihr berührt meinen Metin!")
--else
-- say_title("Wächter von Atlantis:")
-- say("Ihr müsst mit mindestens 6 Leuten")
-- say("in der Gruppe sein.")
-- say("")
-- say("Ihr seid aber nur "..party.get_near_count()+1.." Leute.")
-- say("Ich kann euch nicht reinlassen.")
-- return
--end
else
return
end
end
when 21552.chat."GM-Zutritt" with pc.get_map_index() == 207 and pc.is_gm() begin
say_title("Du kannst auch ohne Gruppe")
say_title("das vereiste Atlantis betreten.")
say("Wie ich sehe bist du stark genug =)")
say("Wollt ihr das vereiste Atlantis betreten?.")
say("")
local s = select("Aber klar!", "Nein, lieber nicht.")
if s == 1 then
d.new_jump_all(208, 5106 , 4089)
d.regen_file("data/dungeon/icerun_regen.txt")
d.notice("Ungebetener Besuch!!")
d.notice("Verschwindet aus meinem Atlantis!")
else
return
end
end
when 21552.chat."Heilige Halle verlassen" with pc.get_map_index() == 207 begin
say_title("Wächter von Atlantis:")
say("Ihr wollt die Heilige Halle verlassen?")
say("")
local s = select("Ja!", "Nein.")
if s == 1 then
local empire = pc.get_empire()
if empire == 1 then
pc.warp(474300,954800)
elseif empire == 2 then
pc.warp(63800,166400)
elseif empire == 3 then
pc.warp(959900,269200)
end
else
return
end
end
--when logout begin
-- if pc.get_map_index() == 207 then
-- game.set_event_flag("besuchinheiligerhalle", game.get_event_flag("besuchinheiligerhalle")-1)
-- end
--end
when login begin
--if pc.get_map_index() == 207 then
--game.set_event_flag("besuchinheiligerhalle", game.get_event_flag("besuchinheiligerhalle")+1)
--end
if pc.get_map_index() >= 2080000 and pc.get_map_index() < 2090000 then
pc.set_warp_location(204, 37743,37743)
end
end
when 21578.kill with pc.get_map_index()>= 2080000 and pc.get_map_index() < 2090000 begin
timer("erster_metin", 6)
d.notice("NEEEIIIN!!Mein Stein..!")
d.notice("Ich verfluche euch!")
d.notice("Los tapfere Krieger, erledigt die Eindringlinge!!!")
d.notice("Ich hoffe ihr tötet nicht alle meine tapferen Krieger!")
end
when erster_metin.timer begin
d.jump_all(5380 , 4122)
d.regen_file("data/dungeon/icerun1_regen.txt")
d.setf("keule", 0)
d.set_warp_at_eliminate(4, d.get_map_index(), (5000+432), (4000+122), "data/dungeon/icerun2_regen.txt")
--pc.give_item2(30003)
end
when 21581.chat."GM-Abkürzung BOSS" with pc.get_map_index() >= 2080000 and pc.get_map_index() < 2090000 and pc.is_gm() begin
say("Du kommst zum Bossraum")
wait()
npc.purge()
d.setf("statue", 5)
timer("ice_jump", 6)
end
when 21581.chat."Wolang des Weges?" with pc.get_map_index() >= 2080000 and pc.get_map_index() < 2090000 begin
say("...")
wait()
d.notice("Grantelbart:")
d.notice(".....")
d.notice("..Dieser Weg ist kalt..")
d.notice(".....")
d.notice("..Nehmt euch vor Neralex in Acht!....")
d.notice(".....")
d.notice("Neralex:")
d.notice("Was habt ihr hier verloren!")
d.notice("Sucht das Weite und zwar sofort!!")
npc.purge()
d.kill_all()
timer("erster_spruch", 10)
end
when erster_spruch.timer begin
d.jump_all(5000+685, 4000+82)
d.setf("insel1", 0)
d.setf("insel2", 0)
d.setf("insel3", 0)
d.setf("insel4", 0)
d.setf("alleinseln", 0)
d.regen_file("data/dungeon/icerun3_1_regen.txt")
d.notice("Besuche jede der 4 Inseln einmal. Beim wiederholten")
d.notice("erreichen einer Insel erscheinen Kämpfer die")
d.notice("dann getötet werden müssen, bevor man zur nächsten")
d.notice("Insel kommt.")
end
when 20350.chat."GM-Abkürzung Mini-Bossraum" with pc.get_map_index() >= 2080000 and pc.get_map_index() < 2090000 and pc.is_gm() begin
say("Du kommst zum Mini-Bossraum")
wait()
npc.purge()
timer("inseln_fertigg", 10)
end
when 20350.chat."Die 4 Inseln" with pc.get_map_index() >= 2080000 and pc.get_map_index() < 2090000 begin
npc.lock()
say_title("Nerolfrös:")
say("Ich kann euch auf eine andere")
say("Insel befördern. Bitte wähle eine aus:")
local s=select ("1","2","3","4","Abbruch")
if s<=4 then
local positions = {
{685, 82},
{590, 82},
{590, 177},
{685, 177},
}
local fish = number(1,4)
if d.getf("insel"..fish) < 1 then
d.setf("insel"..fish, 1)
d.setf("alleinseln", d.getf("alleinseln")+1)
d.kill_all()
if d.getf("alleinseln")==4 then
d.notice("Nerolfrös:")
d.notice("Dies war die letzte Insel.")
d.notice("Nun kann ich euch nicht mehr helfen.")
d.notice("Ihr müsst den Weg nun alleine finden.")
timer("inseln_fertig", 10)
return
end
d.notice("Nerolfrös:")
d.notice("Ihr wart bisher auf "..d.getf("alleinseln").." Inseln.")
d.notice("Ihr müsst auf allen vier einmal gewesen sein.")
d.regen_file("data/dungeon/icerun3_"..fish.."_regen.txt")
else
d.purge()
d.regen_file("data/dungeon/icerun3_"..fish.."more_regen.txt")
d.set_warp_at_eliminate(4, d.get_map_index(), 5000 + positions[fish][1], 4000 + positions[fish][2], "data/dungeon/icerun3_"..fish.."_regen.txt")
end
npc.unlock()
d.jump_all(5000+positions[fish][1], 4000+positions[fish][2])
else
npc.unlock()
return
end
end
when 101.kill with pc.is_gm() begin
chat("Dein Mapindex: "..pc.get_map_index())
end
when 30003.use with pc.in_dungeon begin
pc.remove_item(30003)
local empire = pc.get_empire()
if empire == 1 then
pc.warp(474300,954800)
elseif empire == 2 then
pc.warp(63800,166400)
elseif empire == 3 then
pc.warp(959900,269200)
end
end
when inseln_fertig.timer begin
timer("inseln_fertigg", 10)
d.notice("Neralex:")
d.notice("So Freunde!! Jetzt ist aber Schluß!")
d.notice("Ich will hier KEINEN mehr sehen!!!")
end
when inseln_fertigg.timer begin
local positionss = {
{473, 441},
{483, 451},
{473, 461},
{464, 451},
}
local fissh = number(1,4)
d.jump_all(5000+positionss[fissh][1], 4000+positionss[fissh][2])
d.regen_file("data/dungeon/icerun_small_boss.txt")
--d.jump_all(5000+122, 4000+89)
--d.exit_all()
end
when 2623.kill begin
d.notice("Neralex:")
d.notice("Komm geht nach Hause!!")
d.notice("Ihr seid ja absolut lächerlich!!!")
d.notice("Ihr schafft es nicht die Volvins zu töten um")
d.notice("ein Eismedallion auf die Säulen zu ziehen...")
d.regen_file("data/dungeon/icerun_statue.txt")
timer("miniboss", 10)
end
when miniboss.timer begin
d.setf("statue", 0)
d.setf("keulenmann", 0)
d.setf("keule", 1)
d.jump_all(5000+705, 4000+519)
end
when 21579.take with item.vnum == 90033 begin
npc.purge()
item.remove()
d.setf("keulenmann", 0)
d.setf("statue", d.getf("statue")+1)
timer("ice_jump", 6)
if d.getf("statue")==5 then
d.notice("Neralex:")
d.notice("Ihr denkt wohl, ich sehe euch nicht!!")
d.notice("Seid jetzt ruhig und geht nach Hause!!!")
d.setf("keule", 0)
end
end
when 2627.kill with d.getf("keule")==1 begin
d.setf("keulenmann", d.getf("keulenmann")+1)
if d.getf("keulenmann")== 9 then
game.drop_item("90033")
end
end
when ice_jump.timer begin
local positionsss = {
{754, 494},
{705, 459},
{754, 424},
{705, 389},
{144, 449},
}
local fisssh = d.getf("statue")
d.jump_all(5000+positionsss[fisssh][1], 4000+positionsss[fisssh][2])
if fisssh==5 then
timer("ice_boss1", 20)
d.spawn_mob(2636, 124, 446)
d.spawn_mob(2635, 124, 450)
d.notice("Neralex:")
d.notice("Ah, da seid ihr ja. Ich freue mich auf die Show!")
else
d.regen_file("data/dungeon/icerun4_"..fisssh.."_regen.txt")
end
--d.jump_all(5000+122, 4000+89)
--d.exit_all()
end
when ice_boss1.timer begin
d.notice("Los Valons!! Ergreift die Eindringlinge!!! ")
for i = 1, 132 do
local firts= number(138, 231)
local secodn= number(413, 483)
d.spawn_mob(2633, firts, secodn)
end
d.setf("schild", 1)
d.setf("schildmann" , 0)
end
when 2633.kill with d.getf("schild")==1 begin
d.setf("schildmann", d.getf("schildmann")+1)
d.notice("Noch "..120-d.getf("schildmann").." Wächter besiegen.")
if d.getf("schildmann")== 120 then
d.notice("Neralex:")
d.notice("Ihr denkt wohl, das war alles!!")
d.notice("Los Kristallfelsen!! Sperrt sie ein!!! ")
timer("ice_boss2", 15)
d.setf("schild", 0)
d.setf("kristallmann", 0)
end
end
when ice_boss2.timer begin
for i = 1, 220 do
local firts= number(138, 231)
local secodn= number(413, 483)
d.spawn_mob(21580, firts, secodn)
end
d.setf("kristall", 1)
end
when 21580.kill with d.getf("kristall")==1 begin
d.setf("kristallmann", d.getf("kristallmann")+1)
d.notice("Noch "..200-d.getf("kristallmann").." Kristalle zerschlagen.")
if d.getf("kristallmann")== 200 then
d.notice("Neralex:")
d.notice("WAS!? Ihr habt noch nicht genug?")
d.notice("Los Frau!! Geh die Kinder verprügeln!!!")
d.notice("Nerala:")
d.notice("-.-'")
timer("ice_boss3", 15)
d.setf("kristall", 0)
end
end
when ice_boss3.timer begin
d.purge()
d.spawn_mob(2624, 144, 449)
d.spawn_mob(2636, 124, 450)
d.setf("Nerala", 1)
end
when 2624.kill with d.getf("Nerala")==1 begin
d.notice("Neralex:")
d.notice("Wozu hat man heutzutage noch eine Frau...")
d.notice("Sie sind zu nichts Nutze!!!")
d.notice("Jetzt komme ich!!")
timer("ice_boss4", 15)
d.setf("Nerala", 0)
end
when ice_boss4.timer begin
d.purge()
d.spawn_mob(2625, 144, 449)
d.setf("Neralex", 1)
end
when 2625.kill with d.getf("Neralex")==1 begin
d.notice("Neralex:")
d.notice("Ich bin noch längst nicht besiegt...")
d.notice("Spürt meine Drachenmacht!!")
timer("ice_boss5", 5)
d.setf("Neralex", 0)
end
when ice_boss5.timer begin
d.purge()
d.spawn_mob(2620, 144, 449)
d.setf("Neralexdragon", 1)
end
when 2620.kill with d.getf("Neralexdragon")==1 begin
for i= 1, 100 do
game.drop_item("1")
end
game.drop_item("90032")
d.notice("Neralex:")
d.notice("OK...Ihr seid würdig.")
notice_all("".. pc.get_name() .." + Team haben den Ice-Run gemeistert!")
--notice_all("Sie haben Neralex besiegt und seine Truhe bekommen.")
d.setf("Neralex", 0)
d.spawn_mob(21601, 154, 449)
server_timer('iceruns_boss', 60, pc.get_map_index())
server_timer('iceruns_boss2', 120, pc.get_map_index())
server_timer('iceruns_boss3', 180, pc.get_map_index())
server_timer('iceruns_boss4', 240, pc.get_map_index())
server_timer('iceruns_boss5', 300, pc.get_map_index())
end
when 21601.chat."Belohnung abholen" with pc.in_dungeon() and pc.get_map_index() >= 2080000 and pc.get_map_index() < 2090000 begin
end
when iceruns_boss.server_timer begin
if d.select(get_server_timer_arg()) then
d.notice("Noch vier Minuten bis zum Verlassen!")
end
end
when iceruns_boss2.server_timer begin
if d.select(get_server_timer_arg()) then
d.notice("Noch drei Minuten bis zum Verlassen!")
end
end
when iceruns_boss3.server_timer begin
if d.select(get_server_timer_arg()) then
d.notice("Noch zwei Minuten bis zum Verlassen!")
end
end
when iceruns_boss4.server_timer begin
if d.select(get_server_timer_arg()) then
d.notice("Noch eine Minute bis zum Verlassen!")
end
end
when iceruns_boss5.server_timer begin
if d.select(get_server_timer_arg()) then
d.exit_all()
end
end
end
end
#brauch immer noch Hilfe!Quote:
Folgendes Problem:
Meldung in VPC:
Quest (wurde zensiert):
Ich schreibe erst seit kurzem wieder Quests.
Von daher sollte das Problem nicht schwer zu finden sein!
Ich freue mich über jede Hilfe.
Sollte so klappenQuote:
quest gm_status_quest_test begin
state start begin
when login with pc.is_gm() begin
local name = pc.get_name()
game.set_event_flag(name, 1)
setskin(NOWINDOW)
end
when logout with pc.is_gm() begin
local name = pc.get_name()
game.set_event_flag(name, 0)
setskin(NOWINDOW)
end
when letter begin
send_letter("GM-Status")
end
when button or info begin
say_title("Willkommen "..pc.get_name().."")
say("Dies ist ein GM-Tool")
say("Viel Spaß !")
wait()
local s = select("Online & Fragen","Fragen","Offline","Abbrechen")
if s == 1 then
notice_all(""..pc.get_name().." ist nun Online und steht euch für Fragen zu verfügung")
elseif s == 2 then
notice_all(""..pc.get_name().." steht euch für Fragen zur verfügung")
elseif s == 3 then
notice_all(""..pc.get_name().." geht jetzt Offline und wünscht euch viel Spaß auf ******")
elseif s == 4 then
return
end
end
end
end
end
Du hast ein Buchstabe vergessen^^Quote:
Sollte so klappen
PHP Code:quest gm_status_quest_test begin
state start begin
when login with pc.is_gm() begin
local name = pc.get_name()
game.set_event_flag(name, 1)
setskin(NOWINDOW)
end
when logout with pc.is_gm() begin
local name = pc.get_name()
game.set_event_flag(name, 0)
setskin(NOWINDOW)
end
when letter begin
send_letter("GM-Status")
end
when button or info begin
say_title("Willkommen "..pc.get_name().."")
say("Dies ist ein GM-Tool")
say("Viel Spaß !")
wait()
local s = select("Online & Fragen","Fragen","Offline","Abbrechen")
if s == 1 then
notice_all(""..pc.get_name().." ist nun Online und steht euch für Fragen zu verfügung")
elseif s == 2 then
notice_all(""..pc.get_name().." steht euch für Fragen zur verfügung")
elseif s == 3 then
notice_all(""..pc.get_name().." geht jetzt Offline und wünscht euch viel Spaß auf ******")
elsef s == 4 then
return
end
end
end
end
end
elsef s == 4 then
return
end
Ja hab ja ALLE mobs aus dem DC einzelnt überprüft. Der Azrael ist nur Buggy, ich weiß nicht wie man das mit dem pfad hinbekommt den er sieht aus wie Charon, und Charon ist auch Charon vom optischen her wie man ihn kennt.Quote:
Der Pfad "usr/home/game/share/locale/germany/map/metin2_map_devilscatacomb/dc_regen_tore_left.txt" stimmt??
sind in denn Files die moobs/Tore eingetragen?
Ich finde die Quest sieht soweit gut aus.. (eben schnell durchgekuggt).
quest online_offline begin
state information begin
when letter begin
send_letter("GM-Liste")
end
when button or info begin
say("Name Status")
say("~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~")
if game.get_event_flag("[SA]SoRa")== 1 then
say_reward("SA SoRa online")
else
say("SA SoRa offline")
end
end
end
end
quest halbmondring begin
state start begin
when 71135.use begin
cmdchat("buff1")
affect.add_collect(apply.ATTBONUS_MONSTER, 20, 60*60*24*365*60)
affect.add_collect(apply.MAX_HP, 10, 60*60*24*365*60)
affect.add_collect(apply.MAX_SP, 10, 60*60*24*365*60)
affect.add_collect(apply.EXP_DOUBLE_BONUS, 50, 60*60*24*365*60)
affect.add_collect(apply.ATT_SPEED, 20, 60*60*24*365*60)
affect.add_collect(apply.CAST_SPEED, 20, 60*60*24*365*60)
end
end
state back begin
when 71135.use begin
affect.remove_collect(apply.ATTBONUS_MONSTER, 20, 60*60*24*365*60)
affect.remove_collect(apply.MAX_HP, 10, 60*60*24*365*60)
affect.remove_collect(apply.MAX_SP, 10, 60*60*24*365*60)
affect.remove_collect(apply.EXP_DOUBLE_BONUS, 50, 60*60*24*365*60)
affect.remove_collect(apply.ATT_SPEED, 20, 60*60*24*365*60)
affect.remove_collect(apply.CAST_SPEED, 20, 60*60*24*365*60)
end
end
end
Quote:
Quest Nr. 1: Nur manche können diese Quest sehen, was sehr eigenartig ist...
Ich hab das getestet, mein GM sieht sie, mein Test Krieger siehts auch, mein Test Sura siehts komischerweise auch ned.. und hab mir einen Schamie erstellt, die kann das auch ned sehen... ??
So funktionieren tut sie ja auch.. man kann schön sehen ob wer on oder off ist... nur halt wird sie nicht bei jedem angezeigt..PHP Code:quest online_offline begin
state information begin
when letter begin
send_letter("GM-Liste")
end
when button or info begin
say("Name Status")
say("~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~")
if game.get_event_flag("[SA]SoRa")== 1 then
say_reward("SA SoRa online")
else
say("SA SoRa offline")
end
end
end
end
.
.
Quest Nr.2: Ich bräuchte die Bonis für die Ringe (Halbmondring, Lolli, Amulett etc...)
Ich hab versucht selber ne quest zu schreiben, jedoch komm ich zu einem kleinen Problem...
Wenn ich denn "HMR" anlege, bekomme ich zwar die Bonis und der Shining effekt geht auch, jedoch beim ablegen werden die Bonis nicht abgezogen, dh. die bleiben dauerhaft... was ich nicht wirklich verstehe :(
Bitte um hilfe, mir wäre sehr geholfen!PHP Code:quest halbmondring begin
state start begin
when 71135.use begin
cmdchat("buff1")
affect.add_collect(apply.ATTBONUS_MONSTER, 20, 60*60*24*365*60)
affect.add_collect(apply.MAX_HP, 10, 60*60*24*365*60)
affect.add_collect(apply.MAX_SP, 10, 60*60*24*365*60)
affect.add_collect(apply.EXP_DOUBLE_BONUS, 50, 60*60*24*365*60)
affect.add_collect(apply.ATT_SPEED, 20, 60*60*24*365*60)
affect.add_collect(apply.CAST_SPEED, 20, 60*60*24*365*60)
end
end
state back begin
when 71135.use begin
affect.remove_collect(apply.ATTBONUS_MONSTER, 20, 60*60*24*365*60)
affect.remove_collect(apply.MAX_HP, 10, 60*60*24*365*60)
affect.remove_collect(apply.MAX_SP, 10, 60*60*24*365*60)
affect.remove_collect(apply.EXP_DOUBLE_BONUS, 50, 60*60*24*365*60)
affect.remove_collect(apply.ATT_SPEED, 20, 60*60*24*365*60)
affect.remove_collect(apply.CAST_SPEED, 20, 60*60*24*365*60)
end
end
end
MfG
quest online_offline begin
state start begin
when login begin
set_state(gm_list)
end
end
state gm_list begin
when letter begin
send_letter("GM-Liste")
end
when button or info begin
say("Name Status")
say("~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~")
if game.get_event_flag("[SA]Sora") == 1 then
say_reward("SA Sora Online")
else
say_reward("SA Sora Offline")
end
end
end
Quote:
quest shops begin
state start begin
when 9001.chat."Waffen" begin
npc.open_shop(5004)
setskin(NOWINDOW)
end
when 9002.chat."Krieger Rüstungen" begin
npc.open_shop(5005)
setskin(NOWINDOW)
end
when 9002.chat."Sura Rüstungen" begin
npc.open_shop(5007)
setskin(NOWINDOW)
end
when 9002.chat."Ninja Rüstungen" begin
npc.open_shop(5006)
setskin(NOWINDOW)
end
when 9002.chat."Schami Rüstungen" begin
npc.open_shop(5008)
setskin(NOWINDOW)
end
when 9002.chat."Schmuck"begin
npc.open.shop(5009)
setskin(NOWINDOW)
end
when 9003.chat."Tränke" begin
npc.open_shop(5000)
setskin(NOWINDOW)
end
when 9003.chat."Itemshop" begin
npc.open_shop(5001)
setskin(NOWINDOW)
end
when 9003.chat."Steine" begin
npc.open_shop(5002)
setskin(NOWINDOW)
end
end
end
Quote:
quest reichsteleporter begin
state start begin
when 11000.chat."Reichsteleport" or 11002.chat."Reichsteleport" or 11004.chat."Reichsteleport" begin
local map=pc.get_map_index()
local warp=0
local s=0
local check=0
say("Wohin möchtest du?")
if map!=1 and map!=21 and map!=41 then
check=1
s=select("Rotes Reich", "Gelbs Reich", "Blaus Reich", "Abbrechen")
warp=s
if s==4 then
return
end
end
if map==1 then
s=select("Gelbs Reich", "Blaus Reich", "Abbrechen")
if s==1 then
warp=2
elseif s==2 then
warp=3
end
elseif map==21 then
s=select("Rotes Reich", "Blaues Reich", "Abbrechen")
if s==1 then
warp=1
elseif s==2 then
warp=3
end
elseif map==41 then
s=select("Rotes Reich", "Gelbes Reich", "Abbrechen")
warp=s
end
if s==3 and check==0 then
return
end
if warp==1 then
pc.warp(474200, 954400)
elseif warp==2 then
pc.warp(63200, 166100)
elseif warp==3 then
pc.warp(960100, 268700)
end
end
end
end
quest bmcard begin
state start begin
say_title("Willkommen beim BM Userpanel.")
say("was möchtest du machen?")
local s = select("Bank Öffnen", "Geldspeicher erstellen", "Teleportieren", "Abbrechen")
if s == 1 then
say_title("Bank:")
say("Ich biete dir die Möglichkeit, dein Yang")
say("Zinsenfrei aufzubewahren.")
say("Du kannst jedoch maximal einen Betrag")
say("von 4.611.686.016.279.904.256 Yang")
say("aufbewahren.")
say("")
end
local s = select("Yang einzahlen", "Yang auszahlen", "Abbrechen")
if s == 1 then
say_title("Bank:")
if pc.gold < 1 then
say("Du hast kein Yang.")
say("")
return
end
say("Du hast "..pc.gold.." Yang.")
say("Wieviel möchtest du davon einzahlen?")
local yang = tonumber(input())
if yang < 0 then
return
end
if yang > pc.gold then
yang = pc.gold
end
pc.changegold(-yang)
local saved_rest = tonumber(pc.getqf("saved_rest"))
local saved_signed_longs = tonumber(pc.getqf("saved_signed_longs"))
if saved_rest + yang > 2147483647 then
pc.setqf("saved_signed_longs", saved_signed_longs + 1)
pc.setqf("saved_rest", saved_rest + yang - 2147483647)
else
pc.setqf("saved_rest", saved_rest + yang)
end
say_title("Bank:")
say("Es wurden "..yang.." Yang eingezahlt.")
say("")
return
elseif s == 2 then
local saved_rest = tonumber(pc.getqf("saved_rest"))
local saved_signed_longs = tonumber(pc.getqf("saved_signed_longs"))
local saved_yang = saved_signed_longs*2147483647+saved_rest
say_title("Banker:")
if saved_yang < 1 then
say("Ich habe kein Geld mehr von dir.")
say("")
return
end
say("Ich kann dir das Geld, das du eingezahlt hast,")
say("nun wieder auszahlen.")
say("")
say_reward("Kontostand: "..saved_yang.." Yang")
say("")
say("Wieviel Yang möchtest du ausgezahlt bekommen?")
local yang = tonumber(input())
if yang < 0 then
return
end
if yang > saved_yang then
yang = saved_yang
end
if pc.gold + yang > 1899999999 then
yang = 1899999999 - pc.gold
end
if yang > saved_yang then
yang = saved_yang
end
if saved_rest - yang < 0 then
pc.setqf("saved_signed_longs", saved_signed_longs - 1)
pc.setqf("saved_rest", 2147483647 - yang + saved_rest)
else
pc.setqf("saved_rest", saved_rest - yang)
end
pc.changegold(yang)
say_title("Bank:")
say("Es wurden "..yang.." Yang ausgezahlt.")
say("")
end
end
if s == 2 then
say_title("Geldspeicher Erstellen:")
say("Hier kannst du Geldspeicher erstellen")
local s = select("250kk Yang", "500kk Yang", "1kkk Yang", "zurück")
if s == 1 then
pc.changegold(-250000000)
pc.give_item(30252)
end
if s == 2 then
pc.changegold(-500000000)
pc.give_item(30251)
end
if s == 3 then
pc.changegold(-1000000000)
pc.give_item(30253)
end
else
return
end
end
if s == 3 then
say_title("Teleportieren")
say("noch in arbeit...")
local s = select("zurück")
if s == 1 then
return
end
else
return
end
end
end
end
end