@~Ok: The entry's in those select tables you make literally got to be seperated as following:
s = select("Red Forest","2","3")
Besides you need to write wait() without space!
Moreover your coding style is redundant. Instead of getting the map_index, declaring and saving it as variables and provide it into an array, you are trieing to handle all exceptions, which takes a lot of ressource. If you want to make a proper warp quest, i would suggest you to take a look into the ymir's default: neutral_warp.quest. There you can adopt the logical code.
--------------------------------------- -- Quest made by NexT³ and Remix -------------------------------------- quest auktions_haus begin state start begin function attr_list ( bonus ) local attr = { [1] = "Max. TP", [2] = "Max. MP", [3] = "Vitalität", [4] = "Intelligenz", [5] = "Stärke", [6] = "Beweglichkeit", [7] = "Angriffsgeschwindigkeit", [8] = "Bewegungsgeschw.", [9] = "Zaubergeschwindigkeit", [10] = "TP-Regeneration", [11] = "MP-Regeneration", [12] = "Vergiftungschance ", [13] = "Ohnmachtschance ", [14] = "Verlangsamungschance ", [15] = "Chance auf krit. Treffer +", [16] = "Chance auf durchbohrenden Treffer", [17] = "Stark gegen Halbmenschen +", [18] = "Stark gegen Tiere +", [19] = "Stark gegen Orks +", [20] = "Stark gegen Esoterische +", [21] = "Stark gegen Untote +", [22] = "Stark gegen Teufel +", [23] = "Schaden wird von TP absorbiert", [24] = "Schaden wird von MP absorbiert", [25] = "Chance auf Manaraub", [27] = "Chance, Nahkampf-Angriff abzublocken ", [28] = "Chance, Pfeilangriff auszuweichen", [29] = "Schwertverteidigung ", [30] = "Zweihänderverteidigung ", [31] = "Dolchverteidigung ", [32] = "Glockenverteidigung ", [33] = "Fächerverteidigung ", [34] = "Pfeilwiderstand ", [35] = "Feuerwiderstand ", [36] = "Blitzwiderstand ", [37] = "Magiewiderstand ", [38] = "Windwiderstand ", [39] = "Chance, Nahkampftreffer zu reflektieren", [40] = "Giftwiderstand", [41] = "Chance, MP wiederherzustellen", [42] = "Chance auf EXP-Bonus", [43] = "Chance, eine doppelte Menge Yang fallen zu lassen.", [44] = "Chance, eine doppelte Menge von Gegenständen fallen zu lassen.", [45] = "Chance, TP wiederherzustellen", [46] = "Abwehr gegen Ohnmacht", [47] = "Abwehr gegen Verlangsamen", [48] = "Angriffswert", [49] = "Stark gegen Monster", [50] = "Fertigkeitsschaden ", [51] = "Durchschn. Schaden ", [52] = "Widerstand gegen Fertigkeitsschaden ", [53] = "Durchschn. Schadenswiderstand ", [71] = "Fertigkeitsschaden", [72] = "Durchschn. Schaden", } return tostring(attr[bonus]) end
function stones ( vnum ) local steine = { [28030] = "Stein des Durchbruchs+0", [28031] = "Stein des Todesstoß+0", [28032] = "Stein der Wiederkehr+0", [28033] = "Stein gegen Krieger+0", [28034] = "Stein gegen Ninja+0", [28035] = "Stein gegen Sura+0", [28036] = "Stein gegen Schamanen+0", [28037] = "Stein der Monster+0", [28038] = "Stein des Ausweichens+0", [28039] = "Stein des Duckens+0", [28040] = "Stein der Magie+0", [28041] = "Stein der Vitalität+0", [28042] = "Stein des Schutzes+0", [28043] = "Stein der Hast+0", [28130] = "Stein des Durchbruchs+1", [28131] = "Stein des Todesstoß+1", [28132] = "Stein der Wiederkehr+1", [28133] = "Stein gegen Krieger+1", [28134] = "Stein gegen Ninja+1", [28135] = "Stein gegen Sura+1", [28136] = "Stein gegen Schamanen+1", [28137] = "Stein der Monster+1", [28138] = "Stein des Ausweichens+1", [28139] = "Stein des Duckens+1", [28140] = "Stein der Magie+1", [28141] = "Stein der Vitalität+1", [28142] = "Stein des Schutzes+1", [28143] = "Stein der Hast+1", [28230] = "Stein des Durchbruchs+2", [28231] = "Stein des Todesstoß+2", [28232] = "Stein der Wiederkehr+2", [28233] = "Stein gegen Krieger+2", [28234] = "Stein gegen Ninja+2", [28235] = "Stein gegen Sura+2", [28236] = "Stein gegen Schamanen+2", [28237] = "Stein der Monster+2", [28238] = "Stein des Ausweichens+2", [28239] = "Stein des Duckens+2", [28240] = "Stein der Magie+2", [28241] = "Stein der Vitalität+2", [28242] = "Stein des Schutzes+2", [28243] = "Stein der Hast+2", [28330] = "Stein des Durchbruchs+3", [28331] = "Stein des Todesstoß+3", [28332] = "Stein der Wiederkehr+3", [28333] = "Stein gegen Krieger+3", [28334] = "Stein gegen Ninja+3", [28335] = "Stein gegen Sura+3", [28336] = "Stein gegen Schamanen+3", [28337] = "Stein der Monster+3", [28338] = "Stein des Ausweichens+3", [28339] = "Stein des Duckens+3", [28340] = "Stein der Magie+3", [28341] = "Stein der Vitalität+3", [28342] = "Stein des Schutzes+3", [28343] = "Stein der Hast+3", [28430] = "Stein des Durchbruchs+4", [28431] = "Stein des Todesstoß+4", [28432] = "Stein der Wiederkehr+4", [28433] = "Stein gegen Krieger+4", [28434] = "Stein gegen Ninja+4", [28435] = "Stein gegen Sura+4", [28436] = "Stein gegen Schamanen+4", [28437] = "Stein der Monster+4", [28438] = "Stein des Ausweichens+4", [28439] = "Stein des Duckens+4", [28440] = "Stein der Magie+4", [28441] = "Stein der Vitalität+4", [28442] = "Stein des Schutzes+4", [28443] = "Stein der Hast+4", [28960] = "Steinsplitterstück", } return tostring(steine[vnum]) end
function insert_item ( vnum, name, preis, verkaufer , socket1, socket2, socket3, attrtype0, attrvalue0, attrtype1, attrvalue1, attrtype2, attrvalue2, attrtype3, attrvalue3) mysql_query("INSERT INTO player.auktionshaus (vnum,name,preis,verkaufer,offen,verkauft,socket1,socket2,socket3, attrtype0, attrvalue0, attrtype1, attrvalue1, attrtype2, attrvalue2, attrtype3, attrvalue3) VALUES ('"..vnum.."', '"..name.."', '"..preis.."', '"..verkaufer.."', '1', '0', '"..socket1.."', '"..socket2.."', '"..socket3.."', '"..attrtype0.."', '"..attrvalue0.."', '"..attrtype1.."', '"..attrvalue1.."', '"..attrtype2.."', '"..attrvalue2.."', '"..attrtype3.."', '"..attrvalue3.."');") say_title("Auktionshaus:") say("Dein Item : "..name.." steht nun zum Verkauf für "..preis) item.remove() end
function buy_item ( vnum, name, preis, verkaufer ) local sockets = mysql_query("SELECT socket1, socket2, socket3 FROM player.auktionshaus WHERE name = '"..name.."' and vnum = '"..vnum.."' and preis = '"..preis.."' and verkaufer = '"..verkaufer.."'") local tabelle = { [1] = sockets.socket1[1], [2] = sockets.socket2[1], [3] = sockets.socket3[1], } if verkaufer == pc.get_name() then return chat("Du kannst nicht deine eigenen Items kaufen") end say_size(350, 425) say_title("Auktionshaus:") say_item_vnum(vnum) say("Steine:") say("") for i = 1, 3, 1 do if tabelle[i] > 1 then say_reward(auktions_haus.stones(tabelle[i])) else say("Leer") end end say("") say("Bonis:") local bonis = mysql_query("SELECT attrtype0, attrvalue0, attrtype1, attrvalue1, attrtype2, attrvalue2, attrtype3, attrvalue3 FROM player.auktionshaus WHERE name = '"..name.."' and vnum = '"..vnum.."' and preis = '"..preis.."' and verkaufer = '"..verkaufer.."'") if tonumber(bonis.attrtype0[1]) > 0 then say_reward(auktions_haus.attr_list(tonumber(bonis.attrtype0[1])).." : "..bonis.attrvalue0[1]) else say("Leer") end if tonumber(bonis.attrtype1[1]) > 0 then say_reward(auktions_haus.attr_list(tonumber(bonis.attrtype1[1])).." : "..bonis.attrvalue1[1]) else say("Leer") end if tonumber(bonis.attrtype2[1]) > 0 then say_reward(auktions_haus.attr_list(tonumber(bonis.attrtype2[1])).." : "..bonis.attrvalue2[1]) else say("Leer") end if tonumber(bonis.attrtype3[1]) > 0 then say_reward(auktions_haus.attr_list(tonumber(bonis.attrtype3[1])).." : "..bonis.attrvalue3[1]) else say("Leer") end say("Möchtest du das Item Kaufen ?") say_reward("Es kostet dich "..preis.." yang.") say("") say("") local a = select("Kaufen", "Zurück") if a == 1 then if auktions_haus.get_money(pc.get_name()) >= preis then tabelle = {} for i = 0, 39, 1 do table.insert(tabelle, i) end table.insert(tabelle, "zurück") say_size(350, 375) say_title("Lager Slot aussuchen:") say("Hier kannst du aussuchen wo das Item im Lager") say("liegen soll") c = select_table(tabelle) if c == table.getn(tabelle) then auktions_haus.menu() end local check = mysql_query("SELECT COUNT(*) as count FROM player.item WHERE window = 'SAFEBOX' and owner_id = '"..pc.get_player_id().."' and pos = '"..c.."';") if tonumber(check[1][1]) == 0 then mysql_query("UPDATE player.auktionshaus SET offen = '0' WHERE name = '"..name.."' and vnum = '"..vnum.."' and preis = '"..preis.."' and verkaufer = '"..verkaufer.."'") local pc_name_33 = pc.get_name() mysql_query("UPDATE player.auktionshaus SET verkauft = '"..pc_name_33.."' WHERE name = '"..name.."' and vnum = '"..vnum.."' and preis = '"..preis.."' and verkaufer = '"..verkaufer.."'") pc.change_money(-preis) mysql_query("UPDATE player.auktionshaus_benutzer SET gold = gold + "..preis.." WHERE name = '"..verkaufer.."'") mysql_query("update player.auktionshaus_benutzer set gold = gold - "..preis.." where name = '"..pc.get_name().."'") mysql_query("INSERT INTO player.item (owner_id,window,pos,count,vnum,attrtype0, attrvalue0, attrtype1, attrvalue1, attrtype2, attrvalue2, attrtype3, attrvalue3, attrtype4, attrvalue4, attrtype5, attrvalue5, attrtype6, attrvalue6, socket0, socket1, socket2) VALUES ('"..pc.get_account_id().."', 'SAFEBOX', '"..c.."', '1', '"..vnum.."', '"..bonis.attrtype0[1].."', '"..bonis.attrvalue0[1].."', '"..bonis.attrtype1[1].."', '"..bonis.attrvalue1[1].."', '"..bonis.attrtype2[1].."', '"..bonis.attrvalue2[1].."', '"..bonis.attrtype3[1].."', '"..bonis.attrvalue3[1].."', '0', '0', '0', '0', '0', '0', '"..sockets.socket1[1].."', '"..sockets.socket2[1].."', '"..sockets.socket3[1].."');") say_title("Auktionshaus:") say("Deine neue Waffe befindet sich nun in deinem Lager.") elseif tonumber(check[1][1]) > 0 then say_title("Auktionshaus:") say_reward("Der ausgewählte Slot ist nichtmehr frei !") if select("zurück") == 1 then auktions_haus.menu() end end else say_title("Auktionshaus:") say_reward("Du hast nicht genug Geld bei dir um") say_reward("das Item zukaufen") if select("zurück") == 1 then auktions_haus.menu() end end elseif a == 2 then auktions_haus.menu() end end
function search_item ( Type, sinput ) if tostring(Type) == "String" then local count = mysql_query("SELECT COUNT(*) as count FROM player.auktionshaus WHERE name = '"..sinput.."' and offen = '1'") if tonumber(count[1][1]) > 0 then local auktion = mysql_query("SELECT name,preis,vnum,verkaufer FROM player.auktionshaus WHERE name = '"..sinput.."' and offen = '1'") local count = mysql_query("SELECT COUNT(*) as count FROM player.auktionshaus WHERE name = '"..sinput.."' and offen = '1'") local i = 1 while tonumber(count[1][1]) >= i do say_title("Auktionshaus:") say_item_vnum(tonumber(auktion.vnum[1])) say("") say("") say("Item : "..auktion.name[i]) say("Preis : "..auktion.preis[i]) say("") say("") if select("Kaufen", "Weiter") == 1 then auktions_haus.buy_item(auktion.vnum[i], auktion.name[i], auktion.preis[i], auktion.verkaufer[i]) i = count[1][1] + 1 break else if auktion[i + 1][3] == nil then i = count[1][1] + 1 say_title("Auktionshaus:") say("Keine weiteren Items gefunden") if select("zurück") == 1 then auktions_haus.menu() break end else i = i + 1 end end end else say_title("Auktionshaus:") say_reward("Kein Suchergebnis für "..sinput..".") if select("zurück") == 1 then auktions_haus.menu() end end elseif tostring(Type) == "Number" then local count = mysql_query("SELECT COUNT(*) as count FROM player.auktionshaus WHERE vnum = '"..sinput.."' and offen = '1'") if tonumber(count[1][1]) > 0 then local auktion = mysql_query("SELECT name,preis,vnum,verkaufer FROM player.auktionshaus WHERE vnum = '"..sinput.."' and offen = '1'") local count = mysql_query("SELECT COUNT(*) as count FROM player.auktionshaus WHERE vnum = '"..sinput.."' and offen = '1'") local i = 1 while tonumber(count[1][1]) >= i do say_title("Auktionshaus:") say_item_vnum(tonumber(auktion.vnum[1])) say("") say("") say("Item : "..auktion.name[i]) say("Preis : "..auktion.preis[i]) say("") say("") if select("Kaufen", "Weiter") == 1 then auktions_haus.buy_item(auktion.vnum[i], auktion.name[i], auktion.preis[i], auktion.verkaufer[i]) i = count[1][1] + 1 break else if auktion[i + 1][3] == nil then i = count[1][1] + 1 say_title("Auktionshaus:") say("Keine weiteren Items gefunden") if select("zurück") == 1 then auktions_haus.menu() break end else i = i + 1 end end end else say_title("Auktionshaus:") say_reward("Kein Suchergebnis für "..sinput..".") if select("zurück") == 1 then auktions_haus.menu() end end end end
function get_money ( name ) local guthaben = mysql_query("SELECT gold FROM player.auktionshaus_benutzer WHERE name = '"..name.."'") return tostring(guthaben[1][1]) end
function money_back( name ) say_title("Auktionshaus:") say("Dein Guthaben beträgt : "..auktions_haus.get_money(pc.get_name())) say_reward("Wie viel Möchtest du abheben ?") local abheben = tonumber(input()) if abheben < 1 or abheben > 1999999999 or type(abheben) ~= "number" then say_title("Auktionshaus:") say_reward("Fehler bei der Eingabe.") if select("Zurück") == 1 then auktions_haus.menu() return end end local check = mysql_query("SELECT gold FROM player.auktionshaus_benutzer WHERE name = '"..name.."'") if tonumber(check[1][1]) >= abheben then pc.change_money(abheben) say_title("Auktionshaus:") say("Du hast "..abheben.." Yang abgehoben.") mysql_query("UPDATE player.auktionshaus_benutzer SET gold = gold - "..abheben.." WHERE name = '"..name.."'") if select("Zurück") == 1 then auktions_haus.menu() end else say_title("Auktionshaus:") say_reward("Du hast nicht genug Geld auf deinem Konto.") if select("Zurück") == 1 then auktions_haus.menu() end end end
function last_auktionen ( name ) local count = mysql_query("SELECT COUNT(*) as count FROM player.auktionshaus WHERE verkaufer = '"..name.."' and offen = '0'") local infos = mysql_query("SELECT name,preis,verkauft FROM player.auktionshaus WHERE verkaufer = '"..name.."' and offen = '0'") local i = 1 if tonumber(count[1][1]) > 0 then say_title("Auktionshaus:") say("Hier kannst du die Letzen 8 Auktionen sehen") say("wer es gekauft hat und was du verkaufst hast") say_gold("~~~~~~~~~~~~~~~~~~~~~~") while tonumber(count[1][1]) >= i and i <= 8 do say_reward(""..i..". Item: "..infos.name[i].." // Preis "..infos.preis[i]) i = i +1 end say_gold("~~~~~~~~~~~~~~~~~~~~~~") if select("Zurück") == 1 then auktions_haus.menu() end else say_title("Auktionshaus:") say("Du hast noch nix Verkauft.") if select("Zurück") == 1 then auktions_haus.menu() end end end
function cancel_auktion() local count = mysql_query("SELECT count(*) FROM player.auktionshaus WHERE offen = '1' and verkaufer = '"..pc.get_name().."'") if tonumber(count[1][1]) < 1 then say_title("Auktion Beende:") say("Zurzeit hast du keine Laufende Auktionen.") if select("Zurück") == 1 then auktions_haus.menu() end else local count = mysql_query("SELECT count(*) FROM player.auktionshaus WHERE offen = '1' and verkaufer = '"..pc.get_name().."'") local s = mysql_query("SELECT vnum,name,preis,verkaufer,offen,verkauft,socket1,socket2,socket3,attrtype0, attrvalue0, attrtype1, attrvalue1, attrtype2, attrvalue2, attrtype3, attrvalue3 FROM player.auktionshaus WHERE verkaufer = '"..pc.get_name().."' and offen = '1'") say_title("Auktion Beenden:") say("Hier kannst deine Aktuellen Auktionen") say("Angucken und jeder zeit Abbrechen") say("") local i = 1 local c = select_table(s.name) say_size(350, 425) say_title(string.format("Auktion Beenden von %s", s.name[c])) say_item_vnum(s.vnum[c]) say("") say("Steine:") if s.socket1[c] > 1 then say_reward(auktions_haus.stones(s.socket1[c])) else say_reward("Leer") end if s.socket2[c] > 1 then say_reward(auktions_haus.stones(s.socket2[c])) else say_reward("Leer") end if s.socket3[c] > 1 then say_reward(auktions_haus.stones(s.socket3[c])) else say_reward("Leer") end say("") say("Bonis:") if tonumber(s.attrtype0[c]) > 0 then say_reward(auktions_haus.attr_list(tonumber(s.attrtype0[c])).." : "..s.attrvalue0[c]) else say("Leer") end if tonumber(s.attrtype1[c]) > 0 then say_reward(auktions_haus.attr_list(tonumber(s.attrtype1[c])).." : "..s.attrvalue1[c]) else say("Leer") end if tonumber(s.attrtype2[c]) > 0 then say_reward(auktions_haus.attr_list(tonumber(s.attrtype2[c])).." : "..s.attrvalue2[c]) else say("Leer") end if tonumber(s.attrtype3[c]) > 0 then say_reward(auktions_haus.attr_list(tonumber(s.attrtype3[c])).." : "..s.attrvalue3[c]) else say("Leer") end say("") say("") say("") if select("Auktion Beenden", "zurück") == 1 then say_size(350, 375) say_title("Lager-Slot:") say("Du musst noch einen Lager Slot auswählen") tabelle = {} for i = 0, 39, 1 do table.insert(tabelle, i) end d = select_table(tabelle) local check = mysql_query("SELECT COUNT(*) as count FROM player.item WHERE window = 'SAFEBOX' and owner_id = '"..pc.get_player_id().."' and pos = '"..d.."';") if tonumber(check[1][1]) == 0 then mysql_query("INSERT INTO player.item (owner_id,window,pos,count,vnum,attrtype0, attrvalue0, attrtype1, attrvalue1, attrtype2, attrvalue2, attrtype3, attrvalue3, attrtype4, attrvalue4, attrtype5, attrvalue5, attrtype6, attrvalue6, socket0, socket1, socket2) VALUES ('"..pc.get_account_id().."', 'SAFEBOX', '"..d.."', '1', '"..s.vnum[c].."', '"..s.attrtype0[c].."', '"..s.attrvalue0[c].."', '"..s.attrtype1[c].."', '"..s.attrvalue1[c].."', '"..s.attrtype2[c].."', '"..s.attrvalue2[c].."', '"..s.attrtype3[c].."', '"..s.attrvalue3[c].."', '0', '0', '0', '0', '0', '0', '"..s.socket1[c].."', '"..s.socket2[c].."', '"..s.socket3[c].."');") mysql_query("UPDATE player.auktionshaus SET offen = '0' and verkauft = '"..pc.get_name().."' WHERE vnum = '"..s.vnum[c].."' and name = '"..s.name[c].."' and preis = '"..s.preis[c].."' and verkaufer = '"..pc.get_name().."' and offen = '1' and verkauft = '"..s.verkauft[c].."' and socket1 = '"..s.socket1[c].."' and socket2 = '"..s.socket2[c].."' and socket3 = '"..s.socket3[c].."' and attrtype0 = '"..s.attrtype0[c].."' and attrvalue0 = '"..s.attrvalue0[c].."' and attrtype1 = '"..s.attrtype1[c].."' and attrvalue1 = '"..s.attrvalue1[c].."' and attrtype2 = '"..s.attrtype2[c].."' and attrvalue2 = '"..s.attrvalue2[c].."' and attrtype3 = '"..s.attrtype3[c].."' and attrvalue3 = '"..s.attrvalue3[c].."';") say_title("Auktion erfolgreich beendet") say("Das Item liegt nun wieder in deinem Lager.") elseif tonumber(check[1][1]) > 0 then say_reward("Der ausgewählte Slot ist nichtmehr frei !") if select("zurück") == 1 then auktions_haus.menu() end end else auktions_haus.menu() end end end
function menu() say_title("Auktionshaus:") say("Wie kann ich dir helfen ?") local s = select("Item Suchen", "Item Verkaufen", "Mein Guthaben", "Meine letzen Verkäufe", "Geld abheben" , "Auktion Beenden", "Raus hier") if s == 1 then say_title("Auktionshaus:") say("Bitte wähle aus womit du Suchen magst.") if select("Mit Name suchen", "Mit Vnum suchen") == 1 then say_title("Auktionshaus:") say("Bitte achte darauf das der Namen richtig geschrieben ist.") local vnum = tostring(input()) if vnum == nil then say_title("Auktionshaus:") say_reward("Falsche Eingabe.") if select("Zurück") == 1 then auktions_haus.menu() end end auktions_haus.search_item("String", vnum) else say_title("Auktionshaus:") say("Bitte gib nun das Vnum von dem gesuchten Item ein.") local vnum = tonumber(input()) if vnum < 1 or type(vnum) ~= "number" then say_title("Auktionshaus:") say_reward("Falsche Eingabe.") if select("Zurück") == 1 then auktions_haus.menu() end end auktions_haus.search_item("Number", vnum) end elseif s == 2 then say_title("Auktionshaus:") say("Zieh einfach ein Item auf mich um es zu") say("Verkaufen") if select("Zurück") == 1 then auktions_haus.menu() end elseif s == 3 then say_title("Auktionshaus:") say("Dein Guthaben beträgt : "..auktions_haus.get_money(pc.get_name())) if select("Zurück") == 1 then auktions_haus.menu() end elseif s == 4 then auktions_haus.last_auktionen(pc.get_name()) elseif s == 5 then auktions_haus.money_back(pc.get_name()) elseif s == 6 then auktions_haus.cancel_auktion() else chat("<Auktionshaus>: Einen schönen Tag/Abend noch.") end end
when 20092.chat."Auktionshaus" begin if pc.getqf("benutzer_in_auktionshaus") == 0 then mysql_query("INSERT INTO player.auktionshaus_benutzer (name,gold) VALUES ('"..pc.get_name().."', '0')") pc.setqf("benutzer_in_auktionshaus", 1) end auktions_haus.menu() end
when 20092.take begin local ex = mysql_query("select exists from player.item where id = '"..item.get_id().."';") if ex == "0" then return chat("Es ist ein Fehler aufgetreten") end local item_right = item.get_vnum() local itemname = item.get_name() local itemid = item.get_id() local sockets = { [1] = item.get_socket(0), [2] = item.get_socket(1), [3] = item.get_socket(2), } say_size(350, 400) say_title("Auktionshaus:") say_item_vnum(item_right) say("Steine:") say("") for i = 1, 3, 1 do if sockets[i] > 1 then say_reward(auktions_haus.stones(sockets[i])) else say("Leer") end end say("") say("Bonis:") local bonis = mysql_query("SELECT attrtype0, attrvalue0, attrtype1, attrvalue1, attrtype2, attrvalue2, attrtype3, attrvalue3 FROM player.item WHERE id = '"..itemid.."'") if tonumber(bonis.attrtype0[1]) > 0 then say_reward(auktions_haus.attr_list(tonumber(bonis.attrtype0[1])).." : "..bonis.attrvalue0[1]) else say("Leer") end if tonumber(bonis.attrtype1[1]) > 0 then say_reward(auktions_haus.attr_list(tonumber(bonis.attrtype1[1])).." : "..bonis.attrvalue1[1]) else say("Leer") end if tonumber(bonis.attrtype2[1]) > 0 then say_reward(auktions_haus.attr_list(tonumber(bonis.attrtype2[1])).." : "..bonis.attrvalue2[1]) else say("Leer") end if tonumber(bonis.attrtype3[1]) > 0 then say_reward(auktions_haus.attr_list(tonumber(bonis.attrtype3[1])).." : "..bonis.attrvalue3[1]) else say("Leer") end say("") say("") if select("Verkaufen", "Nein") == 1 then say_title("Auktionshaus:") say("Bitte gibt den Preis für das Item ein") say_reward("Minimal 1 Yang ; Maximal 2KKK Yang") local preis = tonumber(input()) if preis < 1 or preis > 1999999999 or type(preis) ~= "number" then say_title("Auktionshaus:") say("Fehler bei der Eingabe !") if select("Zurück") == 1 then auktions_haus.menu() end end say_title("Auktionshaus:") say_item_vnum(item_right) say("") say("") say_reward("Bist du dir Sicher dieses Item") say_reward("wirklich zuverkaufen ?") say("") say("") if select("Ja", "Nein") == 1 then auktions_haus.insert_item(item_right, itemname, preis, pc.get_name(), sockets[1], sockets[2], sockets[3], bonis.attrtype0[1], bonis.attrvalue0[1], bonis.attrtype1[1], bonis.attrvalue1[1], bonis.attrtype2[1], bonis.attrvalue2[1], bonis.attrtype3[1], bonis.attrvalue3[1]) end end end end end
hallo
ich hab grad ein problem mit einer quest
immer wenn ich make.py mache erscheint mir dieser fehler
ich weiss nur nicht was ich falsch gemacht habe
ich hoffe ihr könnt mir helfen thx im vorraus
PHP Code:
quest gemiwa begin
state start begin
when login or levelup with pc.level>29 begin
set_state(questt)
end
end
state questt begin
when letter begin
send_letter("Der Waffenhändler braucht dich")
end
when button or info begin
say("Gehe ganz schnell")
say("Zur Gemischtwarenhändlerin")
say("Sie möchte dir war zu dem")
say("Waffenhändler sagen")
local w=find_npc_by_vnum(9003)
if w!=0 then
target.vid("target1", w, "WH")
end
end
when target1.target.click begin
target.delete("target1")
clear_letter()
say_title("Der Waffenhändler braucht dich")
say("Gehe zum Waffenhändler .")
say("Da er etwas schüchtern ist, bat")
say("er mich dich anzusprechen")
say("um dir zu sagen das du zu ihm gehen sollst")
say("er wird dich reinchlich belohnen")
say("mach dich auf dem Weg!")
local a=find_npc_by_vnum(9001)
if a!=0 then
target.vid("target2", a, "WH")
end
end
when target2.target.click begin
target.delete("target2")
say_title("Waffenhändler:")
say("Oh, die Gemi hat dich zu mir geschickt?")
say("Ich gebe dir die Aufgabe ")
say("100x Schwarzer Ork")
say("und 30 Orkzähne und 30 Orkzähne + zu sammeln")
say("Wenn du diese Aufgabe erfüllt hast ")
say("kannste zu mir zurükkehren und ich werde dich wie ein")
say("König belohnen ")
say("Ich zähle auf dich!!!")
set_state("kill")
end
end
state kill begin
when kill begin
send_letter("Deine Aufgabe")
end
when button or info begin
say_title("Deine Aufgabe")
say("")
say("Du hast "..pc.getqf("fdm").." von 100 Schwarzen Orjs getötet.")
end
when 636.kill begin
locale count1 = pc.getqf("fdm") +1
if count1 <= 100
pc.setqf("fdm",count1)
q.set_counter("Schwarzer Ork",count1)
end
if count1 == 100 then
say_title("Du hast die Aufgabe abgeschlossen")
say("Geh zurück zum Waffenhändler")
local s=find_npc_by_vnum(9001)
if s!=0 then
target.vid("target3", s, "WH")
end
end
when button or info begin
say_title("Du hast die Aufgabe abgeschlossen")
say("Gehe zum Waffenhändler")
say("Er wird dich belohnen")
end
when target3.target.click begin
target.delete("target3")
say_title("Du hast die Schwarzen Orks getötet")
say("als belohnung erhälst du ein Schwert+0")
say("Tja jung verarscht dachtest du bekommst")
say("jetzt eine geile Belohnung")
say("aber da wird ja nichts draus")
say_reward("Schwert+0 erhalten")
clear_letter()
set_state(complete)
end
end
state complete begin
end
end
FEHLER:
PHP Code:
syntax error : [string "kill"]:1: `=' expected near `count1'
gemiwa.quest:92:Error occured on compile gemiwa.quest
root@root1867:/usr/home/game/share/locale/germany/quest #
hallo
danke das du mi4 geholfen hast aber jetzt kommt ein weiterer fehler
PHP Code:
quest gemiwa begin
state start begin
when levelup with pc.level>=30 begin
set_state(questt)
end
end
state questt begin
when letter begin
send_letter("Der Waffenhändler braucht dich")
end
when button or info begin
say("Gehe ganz schnell")
say("Zur Gemischtwarenhändlerin")
say("Sie möchte dir war zu dem")
say("Waffenhändler sagen")
local w=find_npc_by_vnum(9003)
if w!=0 then
target.vid("target1", w, "WH")
end
end
when target1.target.click begin
target.delete("target1")
clear_letter()
say_title("Der Waffenhändler braucht dich")
say("Gehe zum Waffenhändler.")
say("Da er etwas schüchtern ist, bat")
say("er mich dich anzusprechen")
say("um dir zu sagen das du zu ihm gehen sollst")
say("er wird dich reinchlich belohnen")
say("mach dich auf dem Weg!")
local a=find_npc_by_vnum(9001)
if a!=0 then
target.vid("target2", a, "WH")
end
end
when target2.target.click begin
target.delete("target2")
say_title("Waffenhändler:")
say("Oh, die Gemi hat dich zu mir geschickt?")
say("Ich gebe dir die Aufgabe ")
say("100x Schwarzer Ork")
say("und 30 Orkzähne und 30 Orkzähne + zu sammeln")
say("Wenn du diese Aufgabe erfüllt hast ")
say("kannste zu mir zurükkehren und ich werde dich wie ein")
say("König belohnen ")
say("Ich zähle auf dich!!!")
set_state("kill")
end
end
state kill begin
when kill begin
send_letter("Deine Aufgabe")
end
when 636.kill begin
local count1 = pc.getqf("fdm") +1
if count1 <= 100
pc.setqf("fdm",count1)
q.set_counter("Schwarzer Ork",count1)
end
if count1 == 100 then
say_title("Du hast die Aufgabe abgeschlossen")
say("Geh zurück zum Waffenhändler")
local s=find_npc_by_vnum(9001)
if s!=0 then
target.vid("target3", s, "WH")
end
end
when button or info begin
say_title("Du hast die Aufgabe abgeschlossen")
say("Gehe zum Waffenhändler")
say("Er wird dich belohnen")
end
when target3.target.click begin
target.delete("target3")
say_title("Du hast die Schwarzen Orks getötet")
say("als belohnung erhälst du ein Schwert+0")
say("Tja jung verarscht dachtest du bekommst")
say("jetzt eine geile Belohnung")
say("aber da wird ja nichts draus")
say_reward("Schwert+0 erhalten")
clear_letter()
set_state(complete)
end
end
state complete begin
end
end
PHP Code:
syntax error : [string "kill"]:3: `then' expected near `pc'
gemiwa.quest:88:Error occured on compile gemiwa.quest
root@root1867:/usr/home/game/share/locale/germany/quest #
hallo
danke das du mi4 geholfen hast aber jetzt kommt ein weiterer fehler
PHP Code:
quest gemiwa begin state start begin when levelup with pc.level>=30 begin set_state(questt) end end
state questt begin when letter begin send_letter("Der Waffenhändler braucht dich") end
when button or info begin say("Gehe ganz schnell") say("Zur Gemischtwarenhändlerin") say("Sie möchte dir war zu dem") say("Waffenhändler sagen") local w=find_npc_by_vnum(9003) if w!=0 then target.vid("target1", w, "WH") end end when target1.target.click begin target.delete("target1") clear_letter() say_title("Der Waffenhändler braucht dich") say("Gehe zum Waffenhändler.") say("Da er etwas schüchtern ist, bat") say("er mich dich anzusprechen") say("um dir zu sagen das du zu ihm gehen sollst") say("er wird dich reinchlich belohnen") say("mach dich auf dem Weg!") local a=find_npc_by_vnum(9001) if a!=0 then target.vid("target2", a, "WH") end end when target2.target.click begin target.delete("target2") say_title("Waffenhändler:") say("Oh, die Gemi hat dich zu mir geschickt?") say("Ich gebe dir die Aufgabe ") say("100x Schwarzer Ork") say("und 30 Orkzähne und 30 Orkzähne + zu sammeln") say("Wenn du diese Aufgabe erfüllt hast ") say("kannste zu mir zurükkehren und ich werde dich wie ein") say("König belohnen ") say("Ich zähle auf dich!!!") set_state("kill") end end state kill begin when kill begin send_letter("Deine Aufgabe") end
when 636.kill begin local count1 = pc.getqf("fdm") +1 if count1 <= 100 then pc.setqf("fdm",count1) q.set_counter("Schwarzer Ork",count1) end if count1 == 100 then say_title("Du hast die Aufgabe abgeschlossen") say("Geh zurück zum Waffenhändler") local s=find_npc_by_vnum(9001) if s!=0 then target.vid("target3", s, "WH") end end when button or info begin say_title("Du hast die Aufgabe abgeschlossen") say("Gehe zum Waffenhändler") say("Er wird dich belohnen") end when target3.target.click begin target.delete("target3") say_title("Du hast die Schwarzen Orks getötet") say("als belohnung erhälst du ein Schwert+0") say("Tja jung verarscht dachtest du bekommst") say("jetzt eine geile Belohnung") say("aber da wird ja nichts draus") say_reward("Schwert+0 erhalten") clear_letter() set_state(complete) end
end state complete begin end end
PHP Code:
syntax error : [string "kill"]:3: `then' expected near `pc' gemiwa.quest:88:Error occured on compile gemiwa.quest root@root1867:/usr/home/game/share/locale/germany/quest #
quest n begin
state start begin
when 70028.use begin
say_title("Ankündigung:")
say("Mach deine Ankündigung, gib den Text einfach")
say("unten ein.")
local e=input()
notice_all(""..pc.get_name()..": " e")
item.remove(70028)
end
end
end
Fehler:
EDIT: Habs hinbekommen^^
Code:
quest n begin
state start begin
when 70028.use begin
say_title("Ankündigung:")
say("Mach eine Ankündigung, gib den Text einfach")
say("unten ein. Viel Spaß!")
local c=input()
if c== "" then
return
end
notice_all(pc.get_name() , ": " , c)
item.remove(70028)
end
end
end
quest bann begin
state start begin
when letter with pc.is_gm() begin
send_letter("Ban panel")
end
when button or info begin
say_title'nonsense-text'
say_title'nonsense-text'
say'would you like ban a player?'
if select('Yes','No')==2 then return end
say_title'nonsense-text'
say''
say'enter the name of the player'
local TargetName = input()
local Name=mysql_query("select count(*) from player.player where name='"..TargetName.."';")[1][1]
say_title'nonsense-text'
say''
if tonumber(Name)==0 then
say'There are no player with these name'
return
end
if select('Ban some day s','permanent ban')==1 then
say'Write the ban time'
say'Notice: {only 1-7 day}'
local BanTime=tonumber(input())
say_title'nonsense-text'
say''
if BanTime>7 then
say'You can not ban player over 7d'
return
end
local ok,err=pcall(mysql_query("UPDATE account.account SET availDt = NOW() + INTERVAL "..BanTime.." DAY WHERE id = (SELECT account_id FROM player.player WHERE name='"..TargetName.."');"))
if not ok then
say(err)
end
say_reward('Player: '..TargetName..' Bantime: '..BanTime)
else
--set status 'BLOCK'
mysql_query("UPDATE account.account SET status='BLOCK' where id=(SELECT account_id FROM player.player WHERE name='"..TargetName.."');")
say_reward('the player: '..TargetName..' has been banned permanently')
end
say'Ban successful'
end
end
end
Wenn ich einen Namen in das feld schreibe und dann auf OK klicke kommt nichts >,<
fehler:
SYSSYSERR: Nov 9 17:15:15 :: WriteRunningStateToSyserr: LUA_ERROR: quest bann.start leave
ERR: Nov 9 17:15:15 :: RunState: LUA_ERROR: [string "bann"]:9: attempt to index a nil value
Hallo hab ne pet quest bei mir liegen aber wenn ich es in Putty reloade zeit der mir ein fehler an an der quest kann mir einer bitte helfen
PHP Code:
quest official_pets begin
state start begin
when 53001.use with pc.getqf("icephoenix") == 0 and pc.getqf("reindeer") == 0 and pc.getqf("pwahuang") == 0 and pc.getqf("dog") == 0 and pc.getqf("lion") == 0 and pc.getqf("pig") == 0 and pc.getqf("tiger") == 0 begin
if pc.getqf("firephoenix_use") == 0 then
local old_horse_name = horse.get_name() ;
if string.len(old_horse_name) == 0 then
chat("Dein Haustier hat noch keinen Namen!")
end
chat("Dein Haustier wurde gerufen!")
local your_horse_level = horse.get_level()
pc.setqf("horse_level_save", your_horse_level)
pc.setqf("firephoenix_use", 1)
pc.setqf("firephoenix", 1)
affect.add_collect(apply.ATT_GRADE_BONUS, 100, 60*60*8)
affect.add_collect(apply.DEF_GRADE_BONUS, 100, 60*60*8)
affect.add_collect(apply.ATT_MAX_HP, 100, 60*60*8)
horse.set_level("22")
horse.unsummon() horse.summon()
local horse_settings = pc.getqf("horse_level_save")
horse.set_level(horse_settings)
else
chat("Dein Haustier verabschiedet sich nun von dir!")
affect.remove_collect(apply.ATT_GRADE_BONUS, 100, 60*60*8)
affect.remove_collect(apply.DEF_GRADE_BONUS, 100, 60*60*8)
affect.remove_collect(apply.ATT_MAX_HP, 100, 60*60*8)
horse.unsummon()
pc.setqf("firephoenix_use", 0)
pc.setqf("firephoenix", 0)
local horse_settings = pc.getqf("horse_level_save")
horse.set_level(horse_settings)
end
end
when logout or login with pc.getqf("firephoenix_use") == 1 begin
local horse_settings = pc.getqf("horse_level_save")
horse.set_level(horse_settings)
chat("Dein Haustier ging alleine fort!")
affect.remove_collect(apply.ATT_GRADE_BONUS, 100, 60*60*8)
affect.remove_collect(apply.DEF_GRADE_BONUS, 100, 60*60*8)
affect.remove_collect(apply.MAX_HP, 1000, 60*60*8)
end
when 53003.use with pc.getqf("firephoenix") == 0 and pc.getqf("reindeer") == 0 and pc.getqf("pwahuang") == 0 and pc.getqf("dog") == 0 and pc.getqf("lion") == 0 and pc.getqf("pig") == 0 and pc.getqf("tiger") == 0 begin
if pc.getqf("icephoenix_use") == 0 then
local old_horse_name = horse.get_name() ;
if string.len(old_horse_name) == 0 then
chat("Dein Haustier hat noch keinen Namen!")
end
chat("Dein Haustier wurde gerufen!")
local your_horse_level = horse.get_level()
pc.setqf("horse_level_save", your_horse_level)
pc.setqf("icephoenix_use", 1)
pc.setqf("icephoenix", 1)
affect.add_collect(apply.DEF_GRADE_BONUS, 200, 60*60*8)
affect.add_collect(apply.MAX_HP, 5000, 60*60*8)
horse.set_level("23")
horse.unsummon() horse.summon()
local horse_settings = pc.getqf("horse_level_save")
horse.set_level(horse_settings)
else
chat("Dein Haustier verabschiedet sich nun von dir!")
affect.remove_collect(apply.DEF_GRADE_BONUS, 200, 60*60*8)
affect.remove_collect(apply.MAX_HP, 5000, 60*60*8)
horse.unsummon()
pc.setqf("icephoenix_use", 0)
pc.setqf("icephoenix", 0)
local horse_settings = pc.getqf("horse_level_save")
horse.set_level(horse_settings)
end
end
when logout or login with pc.getqf("icephoenix_use") == 1 begin
local horse_settings = pc.getqf("horse_level_save")
horse.set_level(horse_settings)
chat("Dein Eisphönix verlässt dich nun!")
affect.remove_collect(apply.DEF_GRADE_BONUS, 200, 60*60*8)
affect.remove_collect(apply.MAX_HP, 5000, 60*60*8)
end
when 53002.use with pc.getqf("firephoenix") == 0 and pc.getqf("icephoenix") == 0 and pc.getqf("pwahuang") == 0 and pc.getqf("dog") == 0 and pc.getqf("lion") == 0 and pc.getqf("pig") == 0 and pc.getqf("tiger") == 0 begin
if pc.getqf("reindeer") == 0 then
local old_horse_name = horse.get_name() ;
if string.len(old_horse_name) == 0 then
chat("Dein Haustier hat noch keinen Namen!")
end
chat("Dein Haustier wurde gerufen!")
local your_horse_level = horse.get_level()
pc.setqf("horse_level_save", your_horse_level)
pc.setqf("reindeer_use", 1)
pc.setqf("reindeer", 1)
affect.add_collect(apply.ATT_GRADE_BONUS, 100, 60*60*8)
affect.add_collect(apply.DEF_GRADE_BONUS, 100, 60*60*8)
affect.add_collect(apply.MAX_HP, 1000, 60*60*8)
horse.set_level("24")
horse.unsummon() horse.summon()
local horse_settings = pc.getqf("horse_level_save")
horse.set_level(horse_settings)
else
chat("Dein Haustier verabschiedet sich nun von dir!")
affect.remove_collect(apply.ATT_GRADE_BONUS, 100, 60*60*8)
affect.remove_collect(apply.DEF_GRADE_BONUS, 100, 60*60*8)
affect.remove_collect(apply.MAX_HP, 1000, 60*60*8)
horse.unsummon()
pc.setqf("reindeer_use", 0)
pc.setqf("reindeer", 0)
local horse_settings = pc.getqf("horse_level_save")
horse.set_level(horse_settings)
end
end
when logout or login with pc.getqf("reindeer_use") == 1 begin
local horse_settings = pc.getqf("horse_level_save")
horse.set_level(horse_settings)
chat("Dein Haustier verlässt dich nun!")
affect.remove_collect(apply.ATT_GRADE_BONUS, 100, 60*60*8)
affect.remove_collect(apply.DEF_GRADE_BONUS, 100, 60*60*8)
affect.remove_collect(apply.MAX_HP, 1000, 60*60*8)
end
when 53005.use with pc.getqf("firephoenix") == 0 and pc.getqf("icephoenix") == 0 and pc.getqf("reindeer") == 0 and pc.getqf("dog") == 0 and pc.getqf("lion") == 0 and pc.getqf("pig") == 0 and pc.getqf("tiger") == 0 begin
if pc.getqf("pwahuang") == 0 then
local old_horse_name = horse.get_name() ;
if string.len(old_horse_name) == 0 then
chat("Dein Haustier hat noch keinen Namen!")
end
chat("Dein Haustier wurde gerufen!")
local your_horse_level = horse.get_level()
pc.setqf("horse_level_save", your_horse_level)
pc.setqf("pwahuang_use", 1)
pc.setqf("pwahuang", 1)
affect.add_collect(apply.ATT_GRADE_BONUS, 100, 60*60*8)
affect.add_collect(apply.DEF_GRADE_BONUS, 100, 60*60*8)
affect.add_collect(apply.MAX_HP, 1000, 60*60*8)
horse.set_level("25")
horse.unsummon() horse.summon()
local horse_settings = pc.getqf("horse_level_save")
horse.set_level(horse_settings)
else
chat("Dein Haustier verabschiedet sich nun von dir!")
affect.remove_collect(apply.ATT_GRADE_BONUS, 100, 60*60*8)
affect.remove_collect(apply.DEF_GRADE_BONUS, 100, 60*60*8)
affect.remove_collect(apply.MAX_HP, 1000, 60*60*8)
horse.unsummon()
pc.setqf("pwahuang_use", 0)
pc.setqf("pwahuang", 0)
local horse_settings = pc.getqf("horse_level_save")
horse.set_level(horse_settings)
end
end
when logout or login with pc.getqf("pwahuang_use") == 1 begin
local horse_settings = pc.getqf("horse_level_save")
horse.set_level(horse_settings)
chat("Dein Haustier verlässt dich nun!")
affect.remove_collect(apply.ATT_GRADE_BONUS, 100, 60*60*8)
affect.remove_collect(apply.DEF_GRADE_BONUS, 100, 60*60*8)
affect.remove_collect(apply.MAX_HP, 1000, 60*60*8)
end
when 53006.use with pc.getqf("lion") == 0 and pc.getqf("pig") == 0 and pc.getqf("tiger") == 0 and pc.getqf("firephoenix") == 0 and pc.getqf("icephoenix") == 0 and pc.getqf("reindeer") == 0 and pc.getqf("pwahuang") == 0 begin
if pc.getqf("dog_use") == 0 then
local old_horse_name = horse.get_name() ;
if string.len(old_horse_name) == 0 then
chat("Dein Haustier hat noch keinen Namen!")
end
chat("Dein Haustier wurde gerufen!")
local your_horse_level = horse.get_level()
pc.setqf("horse_level_save", your_horse_level)
pc.setqf("dog_use", 1)
pc.setqf("dog", 1)
affect.add_collect(apply.ATT_GRADE_BONUS, 500, 60*60*8)
affect.add_collect(apply.MAX_HP, 10000, 60*60*8)
horse.set_level("26")
horse.unsummon() horse.summon()
local horse_settings = pc.getqf("horse_level_save")
horse.set_level(horse_settings)
else
chat("Dein Haustier verabschiedet sich nun von dir!")
affect.remove_collect(apply.ATT_GRADE_BONUS, 500, 60*60*8)
affect.remove_collect(apply.MAX_HP, 10000, 60*60*8)
horse.unsummon()
pc.setqf("dog_use", 0)
pc.setqf("dog", 0)
local horse_settings = pc.getqf("horse_level_save")
horse.set_level(horse_settings)
end
end
when logout or login with pc.getqf("dog_use") == 1 begin
pc.setqf("dog_use", 0)
pc.setqf("dog", 0)
local horse_settings = pc.getqf("horse_level_save")
horse.set_level(horse_settings)
chat("Dein Haustier verlässt dich nun!")
affect.remove_collect(apply.ATT_GRADE_BONUS, 500, 60*60*8)
affect.remove_collect(apply.MAX_HP, 10000, 60*60*8)
end
when 53007.use with pc.getqf("dog") == 0 and pc.getqf("pig") == 0 and pc.getqf("tiger") == 0 and pc.getqf("firephoenix") == 0 and pc.getqf("icephoenix") == 0 and pc.getqf("reindeer") == 0 and pc.getqf("pwahuang") == 0 begin
if pc.getqf("lion_use") == 0 then
local old_horse_name = horse.get_name() ;
if string.len(old_horse_name) == 0 then
chat("Dein Haustier hat noch keinen Namen!")
end
chat("Dein Haustier wurde gerufen!")
local your_horse_level = horse.get_level()
pc.setqf("horse_level_save", your_horse_level)
pc.setqf("lion_use", 1)
pc.setqf("lion", 1)
affect.add_collect(apply.ATT_GRADE_BONUS, 100, 60*60*8)
affect.add_collect(apply.MAX_HP, 3000, 60*60*8)
horse.set_level("27")
horse.unsummon() horse.summon()
local horse_settings = pc.getqf("horse_level_save")
horse.set_level(horse_settings)
else
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, 3000, 60*60*8)
horse.unsummon()
pc.setqf("lion_use", 0)
pc.setqf("lion", 0)
local horse_settings = pc.getqf("horse_level_save")
horse.set_level(horse_settings)
end
end
when logout or login with pc.getqf("lion_use") == 1 begin
pc.setqf("lion_use", 0)
pc.setqf("lion", 0)
local horse_settings = pc.getqf("horse_level_save")
horse.set_level(horse_settings)
chat("Dein Haustier verlässt dich nun!")
affect.remove_collect(apply.ATT_GRADE_BONUS, 100, 60*60*8)
affect.remove_collect(apply.MAX_HP, 3000, 60*60*8)
end
when 53008.use with pc.getqf("dog") == 0 and pc.getqf("lion") == 0 and pc.getqf("tiger") == 0 and pc.getqf("firephoenix") == 0 and pc.getqf("icephoenix") == 0 and pc.getqf("reindeer") == 0 and pc.getqf("pwahuang") == 0 begin
if pc.getqf("pig") == 0 then
local old_horse_name = horse.get_name() ;
if string.len(old_horse_name) == 0 then
chat("Dein Haustier hat noch keinen Namen!")
end
chat("Dein Haustier wurde gerufen!")
local your_horse_level = horse.get_level()
pc.setqf("horse_level_save", your_horse_level)
pc.setqf("pig_use", 1)
pc.setqf("pig", 1)
affect.add_collect(apply.ATT_GRADE_BONUS, 100, 60*60*8)
affect.add_collect(apply.MAX_HP, 3000, 60*60*8)
horse.set_level("28")
horse.unsummon() horse.summon()
local horse_settings = pc.getqf("horse_level_save")
horse.set_level(horse_settings)
else
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, 3000, 60*60*8)
horse.unsummon()
pc.setqf("pig_use", 0)
pc.setqf("pig", 0)
local horse_settings = pc.getqf("horse_level_save")
horse.set_level(horse_settings)
end
end
when logout or login with pc.getqf("pig_use") == 1 begin
pc.setqf("pig_use", 0)
pc.setqf("pig", 0)
local horse_settings = pc.getqf("horse_level_save")
horse.set_level(horse_settings)
chat("Dein Haustier verlässt dich nun!")
affect.remove_collect(apply.ATT_GRADE_BONUS, 100, 60*60*8)
affect.remove_collect(apply.MAX_HP, 3000, 60*60*8)
end
when 53009.use with pc.getqf("dog") == 0 and pc.getqf("lion") == 0 and pc.getqf("pig") == 0 and pc.getqf("firephoenix") == 0 and pc.getqf("icephoenix") == 0 and pc.getqf("reindeer") == 0 and pc.getqf("pwahuang") == 0 begin
if pc.getqf("tiger") == 0 then
local old_horse_name = horse.get_name() ;
if string.len(old_horse_name) == 0 then
chat("Dein Haustier hat noch keinen Namen!")
end
chat("Dein Haustier wurde gerufen!")
local your_horse_level = horse.get_level()
pc.setqf("horse_level_save", your_horse_level)
pc.setqf("tiger_use", 1)
pc.setqf("tiger", 1)
affect.add_collect(apply.ATT_GRADE_BONUS, 100, 60*60*8)
affect.add_collect(apply.MAX_HP, 3000, 60*60*8)
horse.set_level("29")
horse.unsummon() horse.summon()
local horse_settings = pc.getqf("horse_level_save")
horse.set_level(horse_settings)
else
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, 3000, 60*60*8)
horse.unsummon()
pc.setqf("tiger_use", 0)
pc.setqf("tiger", 0)
local horse_settings = pc.getqf("horse_level_save")
horse.set_level(horse_settings)
end
end
when logout or login with pc.getqf("tiger_use") == 1 begin
pc.setqf("tiger_use", 0)
pc.setqf("tiger", 0)
local horse_settings = pc.getqf("horse_level_save")
horse.set_level(horse_settings)
chat("Dein Haustier verlässt dich nun!")
affect.remove_collect(apply.ATT_GRADE_BONUS, 100, 60*60*8)
affect.remove_collect(apply.MAX_HP, 3000, 60*60*8)
end
end
end
quest n begin
state start begin
when 70028.use begin
say_title("Ankündigung:")
say("Mach deine Ankündigung, gib den Text einfach")
say("unten ein.")
local e=input()
if e == "" or nil then
return end
notice_all(""..pc.get_name()..": "..e)
pc.remove_item(70028)
end
end
end
Hallo ich habe eine quest geschrieben, aber immer wenn ich make.sh mache erscheint mir dieser fehler: bitte um hilfe
PHP Code:
quest dt begin state start begin when login or levelup with pc.level >=75 begin set_state(information) end
state information begin when letter begin send_letter("Eliminiere den Sensemann") end
when button or info begin say_title("Eliminiere den Sensemann") say("Hallo Kämpfer") say("Gehe zum Waffenhändler") say("Er hat eine sehr wichtige Aufgabe für dich") end when 9001.chat."Deine Aufgabe" begin say_title("Eliminiere den Sensemann") say("Hallo Krieger") say("ich erteile dir die Aufgabe") say("den Sensemann zu töten") say("Ich gebe dir einen guten Tipp:") say("Den Boss kannst im 8.Stock im Dämonenturm finden") say("Also wenn du diesen Auftrag annehmen möchtest") say("Dann rate ich dir mehrer Leute dafür zu finden") say("Denn es ist keine leichte Aufgabe") wait() say("Damit du diesen Auftrag nicht unterschätzt") say("sage ich dir für welche Belohnungen du dich") say("entscheiden kannst") say_reward("Wenn du diesen Auftrag abgeschlossen") say_reward("kannst du dich entscheiden zwischen") say_reward("2500 TP") say_reward("100 Angriffswert") say_reward("150 Verteidigung") say_reward("20% Schwertverteidigung") say("Möchtest du diesen Auftrag annehmen?") local b == select("Ja","Nein") if b == 2 then set_state(COMPLETE) else set_state(ANFANG) end
state ANFANG begin send_letter("Töte den Sensemann") end when button or info begin say_title("Töte den Sensemann") say("Töte den Sensemann") say("Du findest ihm im Dämonenturm,im 8.Stock") say("Tipp:Suche dir eine Gruppe und eliminiert") say("den Boss zusammen") say("ich wünsche dir viel Glück") end when 1093.kill begin local count1 = pc.getqf("state1") + 1 if count1 <= 1 then pc.setqf("state1", count1) q.set_counter("Sensemann", count1) if count1 == 1 set_state(JAWOLL)
end end state JAWOLL begin when letter begin send_letter("Du hast den Sensemann besiegt") say("Gehe zum Waffenhändler") say("eine Belohnung wartet schon auf dich") end when 9001.chat."Aufgabe abgeschlossen" begin say_title("Du hast es geschafft") say("BLA BLA TEST") say("DU KANNST JA REINSCHREIBEN AM BESTEN EMIL") wait() say("Wähle deine Belohnung aus") local h ==select("1000 TP","100 Verteidigung","100 Angriffswert","20% Schwertverteidigung") if h == 4 then say("Hier, deine Belohnung") affect.add_collect(apply.ATT_BONUS_TO_RESIST_DAGGER,20,60*60*24*365*60) -----¡V60¦~ set_state(COMPLETE) elseif h == 3 then say("Hier deine Belohnung") affect.add_collect(apply.ATT_BONUS_TO_STR,20,60*60*24*365*60) -----¡V60¦~ set_state(COMPLETE) elseif h == 2 then say("Hier deine Belohnung") affect.add_collect(apply.ATT_BONUS_TO_RESIST_DEX,20,60*60*24*365*60) -----¡V60¦~ set_state(COMPLETE) elseif h == 1 then say("Hier deine Belohnung") affect.add_collect(apply.ATT_BONUS_TO_MAX_HP,20,60*60*24*365*60) -----¡V60¦~ set_state(COMPLETE) end end end state COMPLETE begin clear_letter() end end
FEHLER IN VPC:
PHP Code:
expecting 'when' or 'function' dt.quest:8:Error occured on compile dt.quest
Hallo habe ein flammen run eingebaut leider wenn ich alle mobs gehauen hab portet der mich nicht in die 3te ebene bitte um hilfe
PHP Code:
quest flametower begin
state start begin
when 20090.chat."Flammenturm (lv.50)" begin
if pc.get_level() < 50 then
say_title("Flammenkrieger")
say("")
say_reward("Du musst lv.50 sein!")
say("")
else
say_title("Flammenkrieger")
say("")
say("")
say("")
say("")
say("")
wait()
say_title("Flammenkrieger")
say("")
say("Bisher haben "..game.get_event_flag("frgamer").." Soldaten es versucht ")
say("und "..game.get_event_flag("fr_geschaft").." haben es tatsächlich geschaft")
say("den Roten Drachen zu besiegen!")
wait()
say_title("Flammenkrieger")
say("")
say_reward("Willst du es versuchen?")
say_reward("du wärst der "..game.get_event_flag("fr_versuche")..". Kämpfer der es")
say_reward("versucht....")
say("")
local fr_login = select("Ja", "Nein")
if fr_login == 1 then
pc.warp(279700, 937900)
elseif fr_login == 2 then
return
end
end
end
--Ebene 1
when login with pc.get_map_index() == 66 begin
game.set_event_flag(("frgamer"), game.get_event_flag("frgamer")+1)
game.set_event_flag(("fr_versuche"), game.get_event_flag("fr_versuche")+1)
end
when 8036.kill with pc.get_map_index() == 66 begin
local jump11 = number(1,3)
if jump11==1 then
say_in_map(66, "~Der richtige Metin des Mordes wurde zerstört!~")
timer("flammenrun_goto_ebene2", 5)
else
chat("Dieser Metin hat nicht genug MAcht freigesetzt für die 2.Ebene!")
end
end
--Ebene 2
when flammenrun_goto_ebene2.timer begin
d.new_jump_all(66, 2797, 9180)
d.notice("~~Vernichtet alle Monster!~~")
d.regen_file("data/dungeon/feuerturm/flammenrun_ebene_2_mobs.txt")
d.setf("flammenrun", 1)
end
when kill with not npc.is_pc() and d.getf("flammenrun") == 1 begin
local KILL_COUNT_KING = 100
local n =d.getf("kingcounter") + 1
d.setf("kingcounter", n)
if n == KILL_COUNT_KING then
d.kill_all()
d.kill_all()
d.notice("~~Die Macht des Feuers ist erloschen ,Killt gleich auf der nächsten Ebene den Flammenkönig!~~")
d.setf("flammenrun", 2)
timer("flammenrun_goto_ebene3", 5)
end
end
--Ebene 3
when flammenrun_goto_ebene3.timer begin
d.new_jump_all(66, 2797, 9180)
d.regen_file("data/dungeon/feuerturm/flammenrun_ebene_2_mobs.txt")
d.spawn_mob(2206, 212, 400)
end
when 2206.kill with pc.in_dungeon() begin
d.notice("~~Der Flammenkönig wurde besiegt, ihr kommt gleich in die nächste Ebene!~~")
d.kill_all()
d.kill_all()
timer("flammenrun_goto_ebene4", 5)
end
--Ebene 4
when flammenrun_goto_ebene4.timer begin
d.new_jump_all(66, 3045, 8959)
d.regen_file("data/dungeon/feuerturm/flammenrun_ebene_der_metins.txt")
d.notice("Zerstört alle 6 Metins des Mordes!")
end
when 8037.kill with pc.in_dungeon() begin
local KILL_COUNT_METIN = 6
local n =d.getf("flamecounter") + 1
d.setf("flamecounter", n)
if n == KILL_COUNT_METIN then
d.kill_all()
d.kill_all()
d.notice("~~Das waren alle! ,Öffnet auf der nächsten Ebene alle 6 Siegel!~~")
d.setf("flammenrun", 5)
timer("flammenrun_goto_ebene5", 5)
end
end
--Ebene 5
when flammenrun_goto_ebene5.timer begin
d.new_jump_all(66, 3041, 9187)
d.set_regen_file("data/dungeon/feuerturm/flammenrun_siegel_ebene.txt")
d.notice("Öffnet alle 6 Siegel!")
d.setf("flammenrun", 5)
d.setf("stone_count", 5)
d.spawn_mob(20073, 421, 452)
d.spawn_mob(20073, 380, 460)
d.spawn_mob(20073, 428, 414)
d.spawn_mob(20073, 398, 392)
d.spawn_mob(20073, 359, 426)
end
when kill with not npc.is_pc() and d.getf("flammenrun") == 5 begin
local KILL_COUNT_FOR_DROP_KEY = 45
local n =d.getf("count") + 1
d.setf("count", n)
if n >= KILL_COUNT_FOR_DROP_KEY then
game.drop_item(50084, 1)
d.setf("count", 0)
end
end
when 20073.take with item.vnum == 50084 begin
npc.purge()
item.remove()
d.setf("stone_count", d.getf("stone_count") - 1)
if d.getf("stone_count") <= 0 then
d.setf("flammenrun", 6)
d.clear_regen()
d.kill_all()
d.kill_all()
d.notice("Glückwunsch ihr habt alle Säulen Geöffnet")
d.notice("Ihr werdet in die nächste Etage aufsteigen.")
timer("flammenrun_goto_ebene6", 5)
else
d.notice("Säule entfernt... Noch "..d.getf("stone_count").."Viel Glück")
end
end
--Ebene 6
when flammenrun_goto_ebene6.timer begin
d.new_jump_all(66, 3041, 9187)
d.setf("flammenrun", 6)
d.regen_file("data/dungeon/feuerturm/flammenrun_siegel_ebene.txt")
d.regen_file("data/dungeon/feuerturm/flammenrun_siegel_ebene.txt")
d.notice("Killt den Dunklen Flammenkönig!")
d.spawn_mob(2207, 433, 422)
end
when login with d.getf("flammenrun") == 6 begin
local mapto7= pc.count_item(50084)
pc.remove_item(50084,mapto7)
chat("Alle Schlüsselsteine wurden Entfernt!")
end
when 2207.kill with pc.in_dungeon() and d.getf("flammenrun") == 6 begin
d.notice("Ihr habt ihn besiegt!")
d.kill_all()
d.kill_all()
timer("flammenrun_goto_ebene7", 5)
d.spawn_mob(9012, 395, 436)
end
--GM Go To Ebene 7
when 9012.chat."In 5 Skeunden zur 7.Ebene!" with pc.in_dungeon() and d.getf("flammenrun") == 6 and pc.is_gm() begin
npc.purge()
say_title("Teleporter")
say("In 5 Skeunden gehts weiter...")
wait()
return
timer("flammenrun_goto_ebene7", 5)
end
--Spieler Go To Ebene 1
when 9012.chat."Ich will wieder zur 1.Ebene!" with pc.in_dungeon() and d.getf("flammenrun") == 6 begin
say_title("Teleporter")
say("")
say("Ok moment....")
say("")
wait()
pc.warp(279700, 937900)
end
--Ebene 7
when flammenrun_goto_ebene7.timer begin
d.new_jump_all(66, 3262, 9427)
d.setf("flammenrun", 7)
d.spawn_mob(30121, 626, 665)
d.spawn_mob(30121, 614, 654)
d.spawn_mob(30121, 608, 664)
d.spawn_mob(8038, 602, 682)
d.spawn_mob(8038, 638, 679)
d.spawn_mob(8038, 629, 637)
d.setf("stone_count_2", 3)
end
--when login with d.getf("flammenrun") == 7 begin
--if pc.get_level() < 75 then
--say_title("Flammenturm")
--say("")
--say_red("Für diese Ebene musst du lv.75 sein!")
--say("")
--wait()
--pc.warp(279700, 937900)
--else
--say_title("Flammenturm (7.Ebene)")
--say("Zerstör die Metins diese haben")
--say("eine Alte Karte zieh es wenn")
--say("du eins hast auf einen der Geister!")
--say("Tuh das solange bis alle 3 verschwunden sind!")
--say("")
--say_reward("Viel Glück!")
--end
--end
when 8038.kill with d.getf("flammenrun") == 7 begin
game.drop_item(30125, 1)
end
when 30121.take with item.vnum == 30125 begin
npc.purge()
item.remove()
d.setf("stone_count_2", d.getf("stone_count_2") - 1)
if d.getf("stone_count_2") <= 0 then
d.setf("flammenrun", 6)
d.clear_regen()
d.kill_all()
d.kill_all()
d.notice("Glückwunsch ihr habt alle Geister erlöst!")
d.notice("Bereitet euch auf den Kampf mit dem Roten Drachen vor!")
timer("flammenrun_goto_ebene8", 10)
else
d.notice("Säule entfernt... Noch "..d.getf("stone_count_2").."Viel Glück")
end
end
--Ebene 8
when flammenrun_goto_ebene8.timer begin
d.new_jump_all(66, 3262, 9427)
d.setf("flammenrun", 8)
d.spawn_mob(2291, 639, 668)
end
when 2291.kill with pc.in_dungeon() begin
local Reward = 15
local Achievement = "Roter Drache"
local killcount = pc.getqf("2291")
local actual_achievement_points = pc.getqf("achievement_points")
pc.setqf("2291", killcount + 1)
pc.setqf("achievement_points", actual_achievement_points + Reward)
cmdchat("achievement ".. Achievement .."_getötet#".. killcount + 1 .."%".. actual_achievement_points + Reward .."")
game.set_event_flag(("fr_geschaft"), game.get_event_flag("fr_geschaft")+1)
local level = pc.get_level()
d.notice("~~Ihr habt ihn Besiegt und euch eine Belohnung verdient!")
d.kill_all()
d.kill_all()
notice_all("~~Der Spieler "..pc.get_name().." hat mit lv."..(level).." den Roten Drachen besiegt!~~")
d.spawn_mob(20071, 626, 663)
pc.give_item2(30320)
pc.give_item2(50080)
d.setf("fr_belohnung", 1)
end
when 20071.chat."Belohnung" with pc.in_dungeon() and d.getf("fr_belohnung") == 1 begin
pc.setqf("dungeons_complete", pc.getqf("dungeons_complete")+1)
say_title("Dungeon-Meister")
say("")
say_reward("Du bekommst 50DP's")
say("")
game.set_event_flag((""..pc.get_name().."dp"), game.get_event_flag(""..pc.get_name().."dp") + 50)
wait()
pc.warp(619100, 133200)
end
end
end
quest achievement begin
state start begin
when 20094.chat."Achievement Shop" begin
local actual_achievement_points = pc.getqf("achievement_points")
if actual_achievement_points <= 0 then
say_title("".. mob_name(20094) ..":")
say("")
say("Hallo ".. pc.get_name() ..",")
say("")
say("Hier kannst du deine erworbenen Achievement-Points")
say("gegen tolle Items eintauschen, falls du möchtest.")
say("Leider hast du im Moment keine Achievement-Points,")
say("die du eintauschen könntest")
say("")
say("")
say("")
say_reward("Komme mit Achievement-Points erneut zu mir")
else
say_title("".. mob_name(20094) ..":")
say("")
say("Hallo ".. pc.get_name() ..",")
say("")
say("Ich sehe du hast Achievement-Points gesammelt.")
say("Möchtest du diese gegen tolle Items eintauschen?")
say("Ich habe einige Items, ")
say("die sehr wertvoll sein könnten.")
local achievement = select("Eintauschen","Abbrechen","Timestamp")
if achievement == 3 then
say_title("".. mob_name(20094) ..":")
say("")
say("Please enter hour difference")
local hours = input()
say_title("".. mob_name(20094) ..":")
say("")
say("Please enter minute difference")
local minutes = input()
say_title("".. mob_name(20094) ..":")
say("")
say("Please enter second difference")
local seconds = input()
local var = search_time(hours,minutes,seconds) --hour/minute/second/
local time = actual_time()
local timestamp = actual_timestamp()
say_title("".. mob_name(20094) ..":")
say("")
say("Actual Timestamp: ".. timestamp .."")
say("Actual Time: "..time)
say("Searched Time: ".. var.h ..":"..var.m..":"..var.s)
elseif achievement == 2 then
return
elseif achievement == 1 then
say_title("".. mob_name(20094) ..":")
say("")
say("Bitte wähle deine Kategorie.")
local selectcategory = select("Upp-Items","Hilfs-Items","Drachengott-Items","Bonus-Items","Shop verlassen")
if selectcategory == 5 then
return
elseif selectcategory == 1 then
say_title("".. mob_name(20094) ..":")
say("")
say("Du möchtest Upp-Items?")
say("Ich habe ein großes Sortiment an Upp-Items.")
local uppitems = select("Weiße Perle","Blaue Perle","Rote Perle","Magisches Metall","Shop verlassen")
if uppitems == 5 then
return
elseif uppitems == 1 then
local Price = 50
say_title("".. mob_name(20094) ..":")
say("")
say("Willst du eine Weiße Perle kaufen?")
say("Du kannst sie zum Verbessern von Gegenständen gebrauchen")
say("")
say("")
say("")
say_reward("Sie kostet dich ".. Price .." Achievement-Points.")
local buyselection = select("Weiße Perle kaufen","Abbrechen")
if buyselection == 2 then
return
elseif buyselection == 1 then
if pc.getqf("achievement_points") < Price then
say_title("".. mob_name(20094) ..":")
say("")
say("Du hast leider nicht genügend Achievement-Points.")
say("Bitte komme wieder, sobald du ".. Price - pc.getqf("achievement_points") .."")
say("weitere Achievement-Points gesammelt hast")
say("")
say("")
say("")
say_reward("Sammel noch mehr Achievement-Points für dieses Item")
return
else
say_title("".. mob_name(20094) ..":")
say("")
say("Hier bitte, deine Weiße Perle.")
say("Diese Achievement-Points sind mir diese Perle wert.")
say("Passe gut auf sie auf, sie ist sehr wertvoll.")
say("")
say("")
say("")
say_item_vnum(27992)
say_reward("Du hast eine Weiße Perle erhalten")
pc.setqf("achievement_points", pc.getqf("achievement_points") - Price)
cmdchat("achievementpoints ".. pc.getqf("achievement_points"))
pc.give_item2(27992, 1)
end
end
elseif uppitems == 2 then
local Price = 100
say_title("".. mob_name(20094) ..":")
say("")
say("Willst du eine Blaue Perle kaufen?")
say("Du kannst sie zum Verbessern von Gegenständen gebrauchen")
say("")
say("")
say("")
say_reward("Sie kostet dich ".. Price .." Achievement-Points.")
local buyselection = select("Blaue Perle kaufen","Abbrechen")
if buyselection == 2 then
return
elseif buyselection == 1 then
if pc.getqf("achievement_points") < Price then
say_title("".. mob_name(20094) ..":")
say("")
say("Du hast leider nicht genügend Achievement-Points.")
say("Bitte komme wieder, sobald du ".. Price - pc.getqf("achievement_points") .."")
say("weitere Achievement-Points gesammelt hast")
say("")
say("")
say("")
say_reward("Sammel noch mehr Achievement-Points für dieses Item")
return
else
say_title("".. mob_name(20094) ..":")
say("")
say("Hier bitte, deine Blaue Perle.")
say("Diese Achievement-Points sind mir diese Perle wert.")
say("Passe gut auf sie auf, sie ist sehr wertvoll.")
say_item_vnum(27993)
say("")
say("")
say("")
say_reward("Du hast eine Blaue Perle erhalten")
pc.setqf("achievement_points", pc.getqf("achievement_points") - Price)
cmdchat("achievementpoints ".. pc.getqf("achievement_points"))
pc.give_item2(27993, 1)
end
end
elseif uppitems == 3 then
local Price = 150
say_title("".. mob_name(20094) ..":")
say("")
say("Willst du eine Rote Perle kaufen?")
say("Du kannst sie zum Verbessern von Gegenständen gebrauchen")
say("")
say("")
say("")
say_reward("Sie kostet dich ".. Price .." Achievement-Points.")
local buyselection = select("Rote Perle kaufen","Abbrechen")
if buyselection == 2 then
return
elseif buyselection == 1 then
if pc.getqf("achievement_points") < Price then
say_title("".. mob_name(20094) ..":")
say("")
say("Du hast leider nicht genügend Achievement-Points.")
say("Bitte komme wieder, sobald du ".. Price - pc.getqf("achievement_points") .."")
say("weitere Achievement-Points gesammelt hast")
say("")
say("")
say("")
say_reward("Sammel noch mehr Achievement-Points für dieses Item")
return
else
say_title("".. mob_name(20094) ..":")
say("")
say("Hier bitte, deine Rote Perle.")
say("Diese Achievement-Points sind mir diese Perle wert.")
say("Passe gut auf sie auf, sie ist sehr wertvoll.")
say("")
say("")
say("")
say_item_vnum(27994)
say_reward("Du hast eine Rote Perle erhalten")
pc.setqf("achievement_points", pc.getqf("achievement_points") - Price)
cmdchat("achievementpoints ".. pc.getqf("achievement_points"))
pc.give_item2(27994, 1)
end
end
elseif uppitems == 4 then
local Price = 25
say_title("".. mob_name(20094) ..":")
say("")
say("Willst du einen Magischen Stein kaufen?")
say("Damit kannst du deine Items verbessern,")
say("ohne dass die Gefahr des Verlustes des Items besteht")
say("Auch verschlechtert sich bei einem Fehlschlag")
say("sich nicht die Qualität des Items")
say("")
say("")
say("")
say_reward("Das ganze kostet dich ".. Price .." Achievement-Points.")
local buyselection = select("Magischen Stein kaufen","Abbrechen")
if buyselection == 2 then
return
elseif buyselection == 1 then
if pc.getqf("achievement_points") < Price then
say_title("".. mob_name(20094) ..":")
say("")
say("Du hast leider nicht genügend Achievement-Points.")
say("Bitte komme wieder, sobald du ".. Price - pc.getqf("achievement_points") .."")
say("weitere Achievement-Points gesammelt hast")
say("")
say("")
say("")
say_reward("Sammel noch mehr Achievement-Points für dieses Item")
return
else
say_title("".. mob_name(20094) ..":")
say("")
say("Hier bitte, dein Magischer Stein.")
say("Du kannst dieses wertvolle Stück auch in einem Shop verkaufen,")
say("falls dir mal wenig Geld zur Verfügung steht.")
say("Diese Achievement-Points sind mir dieser Stein auf jeden Fall wert.")
say("Passe gut auf es auf.")
say_item_vnum(25041)
say_reward("Du hast ein Magischen Stein erhalten")
pc.setqf("achievement_points", pc.getqf("achievement_points") - Price)
cmdchat("achievementpoints ".. pc.getqf("achievement_points"))
pc.give_item2(25041, 1)
end
end
end
elseif selectcategory == 2 then
say_title("".. mob_name(20094) ..":")
say("")
say("Du brauchst also Items die dich im Spielverlauf")
say("weiterbringen und unterstützen?")
say("Sehr gern, auch hiervon hab ich einiges im Angebot")
local hilfsitems = select("Exp-Ring","Handschuh des Diebes","Medaille des Glücks","Buch des Anführers","Medaille des Drachen","Shop verlassen")
if hilfsitems == 6 then
return
elseif hilfsitems == 1 then
say_title("".. mob_name(20094) ..":")
say("")
say("Eine gute Wahl, allerdings gibt habe ich hiervon")
say("verschiedene Angebote für deine Achievement-Points.")
say("Einige sind natürlich besser und ")
say("kosten dich mehr als andere.")
local expringe = select("30 Minuten Exp-Ring","3 Stunden Exp-Ring","10 Stunden Exp-Ring","Abbrechen")
if expringe == 4 then
return
elseif expringe == 1 then
local Price = 10
say_title("".. mob_name(20094) ..":")
say("")
say("Dieser Exp-Ring hält 30 Minuten lang.")
say("Du kannst ihn jederzeit an- und ausziehen,")
say("sodass du ihn sehr effizient benutzen kannst.")
say("")
say("")
say("")
say_reward("Das ganze würde dich ".. Price .." Achievement-Points kosten.")
local buyselection = select("Exp-Ring kaufen","Abbrechen")
if buyselection == 2 then
return
elseif buyselection == 1 then
if pc.getqf("achievement_points") < Price then
say_title("".. mob_name(20094) ..":")
say("")
say("Du hast leider nicht genügend Achievement-Points.")
say("Bitte komme wieder, sobald du ".. Price - pc.getqf("achievement_points") .."")
say("weitere Achievement-Points gesammelt hast")
say("")
say("")
say("")
say_reward("Sammel noch mehr Achievement-Points für dieses Item")
return
else
say_title("".. mob_name(20094) ..":")
say("")
say("Hier bitte, dein 30 minütiger Exp-Ring.")
say("Du kannst dieses wertvolle Stück auch in einem Shop verkaufen,")
say("falls dir mal wenig Geld zur Verfügung steht.")
say("Aber ich denke du kannst diesen Exp-Ring auch so gut gebrauchen.")
say("Passe gut auf ihn auf.")
say_item_vnum(72002)
say_reward("Du hast einen 30 minütigen Exp-Ring erhalten")
pc.setqf("achievement_points", pc.getqf("achievement_points") - Price)
cmdchat("achievementpoints ".. pc.getqf("achievement_points"))
pc.give_item2(72002, 1)
end
end
elseif expringe == 2 then
local Price = 20
say_title("".. mob_name(20094) ..":")
say("")
say("Dieser Exp-Ring hält 3 Stunden lang.")
say("Du kannst ihn jederzeit an- und ausziehen,")
say("sodass du ihn sehr effizient benutzen kannst.")
say("")
say("")
say("")
say_reward("Das ganze würde dich ".. Price .." Achievement-Points kosten.")
local buyselection = select("Exp-Ring kaufen","Abbrechen")
if buyselection == 2 then
return
elseif buyselection == 1 then
if pc.getqf("achievement_points") < Price then
say_title("".. mob_name(20094) ..":")
say("")
say("Du hast leider nicht genügend Achievement-Points.")
say("Bitte komme wieder, sobald du ".. Price - pc.getqf("achievement_points") .."")
say("weitere Achievement-Points gesammelt hast")
say("")
say("")
say("")
say_reward("Sammel noch mehr Achievement-Points für dieses Item")
return
else
say_title("".. mob_name(20094) ..":")
say("")
say("Hier bitte, dein 3 stündiger Exp-Ring.")
say("Du kannst dieses wertvolle Stück auch in einem Shop verkaufen,")
say("falls dir mal wenig Geld zur Verfügung steht.")
say("Aber ich denke du kannst diesen Exp-Ring auch so gut gebrauchen.")
say("Passe gut auf ihn auf.")
say_item_vnum(72003)
say_reward("Du hast einen 3 stündigen Exp-Ring erhalten")
pc.setqf("achievement_points", pc.getqf("achievement_points") - Price)
cmdchat("achievementpoints ".. pc.getqf("achievement_points"))
pc.give_item2(72003, 1)
end
elseif expringe == 3 then
local Price = 30
say_title("".. mob_name(20094) ..":")
say("")
say("Dieser Exp-Ring hält 10 Stunden lang.")
say("Du kannst ihn jederzeit an- und ausziehen,")
say("sodass du ihn sehr effizient benutzen kannst.")
say("")
say("")
say("")
say_reward("Das ganze würde dich ".. Price .." Achievement-Points kosten.")
local buyselection = select("Exp-Ring kaufen","Abbrechen")
if buyselection == 2 then
return
elseif buyselection == 1 then
if pc.getqf("achievement_points") < Price then
say_title("".. mob_name(20094) ..":")
say("")
say("Du hast leider nicht genügend Achievement-Points.")
say("Bitte komme wieder, sobald du ".. Price - pc.getqf("achievement_points") .."")
say("weitere Achievement-Points gesammelt hast")
say("")
say("")
say("")
say_reward("Sammel noch mehr Achievement-Points für dieses Item")
return
else
say_title("".. mob_name(20094) ..":")
say("")
say("Hier bitte, dein 10 stündiger Exp-Ring.")
say("Du kannst dieses wertvolle Stück auch in einem Shop verkaufen,")
say("falls dir mal wenig Geld zur Verfügung steht.")
say("Aber ich denke du kannst diesen Exp-Ring auch so gut gebrauchen.")
say("Passe gut auf ihn auf.")
say_item_vnum(72001)
say_reward("Du hast einen 10 stündigen Exp-Ring erhalten")
pc.setqf("achievement_points", pc.getqf("achievement_points") - Price)
cmdchat("achievementpoints ".. pc.getqf("achievement_points"))
pc.give_item2(72001, 1)
end
end
end
end
elseif hilfsitems == 2 then
say_title("".. mob_name(20094) ..":")
say("")
say("Eine gute Wahl, allerdings gibt habe ich hiervon")
say("verschiedene Angebote für deine Achievement-Points.")
say("Einige sind natürlich besser und ")
say("kosten dich mehr als andere.")
local handschuhe = select("30 Minuten Diebeshandschuh","3 Stunden Diebeshandschuh","10 Stunden Diebeshandschuh","Abbrechen")
if handschuhe == 4 then
return
elseif handschuhe == 1 then
local Price = 7
say_title("".. mob_name(20094) ..":")
say("")
say("Dieser Diebeshandschuh hält 30 Minuten lang.")
say("Du kannst ihn jederzeit an- und ausziehen,")
say("sodass du ihn sehr effizient benutzen kannst.")
say("")
say("")
say("")
say_reward("Das ganze würde dich ".. Price .." Achievement-Points kosten.")
local buyselection = select("Diebeshandschuh kaufen","Abbrechen")
if buyselection == 2 then
return
elseif buyselection == 1 then
if pc.getqf("achievement_points") < Price then
say_title("".. mob_name(20094) ..":")
say("")
say("Du hast leider nicht genügend Achievement-Points.")
say("Bitte komme wieder, sobald du ".. Price - pc.getqf("achievement_points") .."")
say("weitere Achievement-Points gesammelt hast")
say("")
say("")
say("")
say_reward("Sammel noch mehr Achievement-Points für dieses Item")
return
else
say_title("".. mob_name(20094) ..":")
say("")
say("Hier bitte, dein 30 minütiger Diebeshandschuh.")
say("Du kannst dieses wertvolle Stück auch in einem Shop verkaufen,")
say("falls dir mal wenig Geld zur Verfügung steht.")
say("Aber ich denke du kannst diesen Diebeshandschuh auch so gut gebrauchen.")
say("Passe gut auf ihn auf.")
say_item_vnum(72005)
say_reward("Du hast einen 30 minütigen Diebeshandschuh erhalten")
pc.setqf("achievement_points", pc.getqf("achievement_points") - Price)
cmdchat("achievementpoints ".. pc.getqf("achievement_points"))
pc.give_item2(72005, 1)
end
end
elseif handschuhe == 2 then
local Price = 11
say_title("".. mob_name(20094) ..":")
say("")
say("Dieser Diebeshandschuh hält 3 Stunden lang.")
say("Du kannst ihn jederzeit an- und ausziehen,")
say("sodass du ihn sehr effizient benutzen kannst.")
say("")
say("")
say("")
say_reward("Das ganze würde dich ".. Price .." Achievement-Points kosten.")
local buyselection = select("Diebeshandschuh kaufen","Abbrechen")
if buyselection == 2 then
return
elseif buyselection == 1 then
if pc.getqf("achievement_points") < Price then
say_title("".. mob_name(20094) ..":")
say("")
say("Du hast leider nicht genügend Achievement-Points.")
say("Bitte komme wieder, sobald du ".. Price - pc.getqf("achievement_points") .."")
say("weitere Achievement-Points gesammelt hast")
say("")
say("")
say("")
say_reward("Sammel noch mehr Achievement-Points für dieses Item")
return
else
say_title("".. mob_name(20094) ..":")
say("")
say("Hier bitte, dein 3 stündiger Diebeshandschuh.")
say("Du kannst dieses wertvolle Stück auch in einem Shop verkaufen,")
say("falls dir mal wenig Geld zur Verfügung steht.")
say("Aber ich denke du kannst diesen Diebeshandschuh auch so gut gebrauchen.")
say("Passe gut auf ihn auf.")
say_item_vnum(72006)
say_reward("Du hast einen 3 stündigen Diebeshandschuh erhalten")
pc.setqf("achievement_points", pc.getqf("achievement_points") - Price)
cmdchat("achievementpoints ".. pc.getqf("achievement_points"))
pc.give_item2(72006, 1)
end
elseif handschuhe == 3 then
local Price = 15
say_title("".. mob_name(20094) ..":")
say("")
say("Dieser Diebeshandschuh hält 10 Stunden lang.")
say("Du kannst ihn jederzeit an- und ausziehen,")
say("sodass du ihn sehr effizient benutzen kannst.")
say("")
say("")
say("")
say_reward("Das ganze würde dich ".. Price .." Achievement-Points kosten.")
local buyselection = select("Diebeshandschuh kaufen","Abbrechen")
if buyselection == 2 then
return
elseif buyselection == 1 then
if pc.getqf("achievement_points") < Price then
say_title("".. mob_name(20094) ..":")
say("")
say("Du hast leider nicht genügend Achievement-Points.")
say("Bitte komme wieder, sobald du ".. Price - pc.getqf("achievement_points") .."")
say("weitere Achievement-Points gesammelt hast")
say("")
say("")
say("")
say_reward("Sammel noch mehr Achievement-Points für dieses Item")
return
else
say_title("".. mob_name(20094) ..":")
say("")
say("Hier bitte, dein 10 stündiger Diebeshandschuh.")
say("Du kannst dieses wertvolle Stück auch in einem Shop verkaufen,")
say("falls dir mal wenig Geld zur Verfügung steht.")
say("Aber ich denke du kannst diesen Diebeshandschuh auch so gut gebrauchen.")
say("Passe gut auf ihn auf.")
say_item_vnum(72004)
say_reward("Du hast einen 10 stündigen Diebeshandschuh erhalten")
pc.setqf("achievement_points", pc.getqf("achievement_points") - Price)
cmdchat("achievementpoints ".. pc.getqf("achievement_points"))
pc.give_item2(72004, 1)
end
end
end
end
elseif hilfsitems == 3 then
say_title("".. mob_name(20094) ..":")
say("")
say("Eine gute Wahl, allerdings gibt habe ich hiervon")
say("verschiedene Angebote für deine Achievement-Points.")
say("Einige sind natürlich besser und ")
say("kosten dich mehr als andere.")
local medaillen = select("30 Minuten Glücksmedaille","3 Stunden Glücksmedaille","10 Stunden Glücksmedaille","Abbrechen")
if medaillen == 4 then
return
elseif medaillen == 1 then
local Price = 7
say_title("".. mob_name(20094) ..":")
say("")
say("Dieser Medaille des Glücks hält 30 Minuten lang.")
say("Du kannst sie jederzeit an- und ausziehen,")
say("sodass du sie sehr effizient benutzen kannst.")
say("")
say("")
say("")
say_reward("Das ganze würde dich ".. Price .." Achievement-Points kosten.")
local buyselection = select("Medaille des Glücks kaufen","Abbrechen")
if buyselection == 2 then
return
elseif buyselection == 1 then
if pc.getqf("achievement_points") < Price then
say_title("".. mob_name(20094) ..":")
say("")
say("Du hast leider nicht genügend Achievement-Points.")
say("Bitte komme wieder, sobald du ".. Price - pc.getqf("achievement_points") .."")
say("weitere Achievement-Points gesammelt hast")
say("")
say("")
say("")
say_reward("Sammel noch mehr Achievement-Points für dieses Item")
return
else
say_title("".. mob_name(20094) ..":")
say("")
say("Hier bitte, deine 30 minütige Medaille des Glücks.")
say("Du kannst dieses wertvolle Stück auch in einem Shop verkaufen,")
say("falls dir mal wenig Geld zur Verfügung steht.")
say("Aber ich denke du kannst diese Medaille des Glücks auch so gut gebrauchen.")
say("Passe gut auf sie auf.")
say_item_vnum(72023)
say_reward("Du hast eine 30 minütigen Glücksmedaille erhalten")
pc.setqf("achievement_points", pc.getqf("achievement_points") - Price)
cmdchat("achievementpoints ".. pc.getqf("achievement_points"))
pc.give_item2(72023, 1)
end
end
elseif medaillen == 2 then
local Price = 11
say_title("".. mob_name(20094) ..":")
say("")
say("Diese Medaille des Glücks hält 3 Stunden lang.")
say("Du kannst sie jederzeit an- und ausziehen,")
say("sodass du sie sehr effizient benutzen kannst.")
say("")
say("")
say("")
say_reward("Das ganze würde dich ".. Price .." Achievement-Points kosten.")
local buyselection = select("Medaille des Glücks kaufen","Abbrechen")
if buyselection == 2 then
return
elseif buyselection == 1 then
if pc.getqf("achievement_points") < Price then
say_title("".. mob_name(20094) ..":")
say("")
say("Du hast leider nicht genügend Achievement-Points.")
say("Bitte komme wieder, sobald du ".. Price - pc.getqf("achievement_points") .."")
say("weitere Achievement-Points gesammelt hast")
say("")
say("")
say("")
say_reward("Sammel noch mehr Achievement-Points für dieses Item")
return
else
say_title("".. mob_name(20094) ..":")
say("")
say("Hier bitte, deine 3 stündige Medaille des Glücks.")
say("Du kannst dieses wertvolle Stück auch in einem Shop verkaufen,")
say("falls dir mal wenig Geld zur Verfügung steht.")
say("Aber ich denke du kannst diese Medaille des Glücks auch so gut gebrauchen.")
say("Passe gut auf sie auf.")
say_item_vnum(72024)
say_reward("Du hast eine 3 stündige Medaille des Glücks erhalten")
pc.setqf("achievement_points", pc.getqf("achievement_points") - Price)
cmdchat("achievementpoints ".. pc.getqf("achievement_points"))
pc.give_item2(72024, 1)
end
elseif medaillen == 3 then
local Price = 15
say_title("".. mob_name(20094) ..":")
say("")
say("Diese Medaille des Glücks hält 10 Stunden lang.")
say("Du kannst sie jederzeit an- und ausziehen,")
say("sodass du sie sehr effizient benutzen kannst.")
say("")
say("")
say("")
say_reward("Das ganze würde dich ".. Price .." Achievement-Points kosten.")
local buyselection = select("Medaille des Glücks kaufen","Abbrechen")
if buyselection == 2 then
return
elseif buyselection == 1 then
if pc.getqf("achievement_points") < Price then
say_title("".. mob_name(20094) ..":")
say("")
say("Du hast leider nicht genügend Achievement-Points.")
say("Bitte komme wieder, sobald du ".. Price - pc.getqf("achievement_points") .."")
say("weitere Achievement-Points gesammelt hast")
say("")
say("")
say("")
say_reward("Sammel noch mehr Achievement-Points für dieses Item")
return
else
say_title("".. mob_name(20094) ..":")
say("")
say("Hier bitte, deine 10 stündige Medaille des Glücks.")
say("Du kannst dieses wertvolle Stück auch in einem Shop verkaufen,")
say("falls dir mal wenig Geld zur Verfügung steht.")
say("Aber ich denke du kannst diese Medaille des Glücks auch so gut gebrauchen.")
say("Passe gut auf sie auf.")
say_item_vnum(72022)
say_reward("Du hast eine 10 stündige Medaille des Glücks erhalten")
pc.setqf("achievement_points", pc.getqf("achievement_points") - Price)
cmdchat("achievementpoints ".. pc.getqf("achievement_points"))
pc.give_item2(72022, 1)
end
end
end
end
elseif hilfsitems == 4 then
say_title("".. mob_name(20094) ..":")
say("")
say("Das Leveln in Gruppen macht doch am meisten Spaß.")
say("Aber die Exp zu teilen ist natürlich hart.")
say("Ein Buch des Anführers kann dir da abhelfen.")
say("Es gibt der Gruppe einen Exp-Bonus, damit ihr auch")
say("weiterhin Spaß am leveln haben könnt")
say("und schnell vorran kommt.")
local bucher = select("15 Minuten Buch des Anführers","30 Minuten Buch des Anführers","3 Stunden Buch des Anführers","Abbrechen")
if bucher == 4 then
return
elseif bucher == 1 then
local Price = 2
say_title("".. mob_name(20094) ..":")
say("")
say("Dieses Buch des Anführers dauert 15 Minuten lang an")
say("und gibt euch einen Exp-Bonus von 30%")
say("Du kannst es jederzeit an- und ausziehen,")
say("sodass du es sehr effizient benutzen kannst.")
say("")
say("")
say("")
say_reward("Das ganze würde dich ".. Price .." Achievement-Points kosten.")
local buyselection = select("Buch des Anführers","Abbrechen")
if buyselection == 2 then
return
elseif buyselection == 1 then
if pc.getqf("achievement_points") < Price then
say_title("".. mob_name(20094) ..":")
say("")
say("Du hast leider nicht genügend Achievement-Points.")
say("Bitte komme wieder, sobald du ".. Price - pc.getqf("achievement_points") .."")
say("weitere Achievement-Points gesammelt hast")
say("")
say("")
say("")
say_reward("Sammel noch mehr Achievement-Points für dieses Item")
return
else
say_title("".. mob_name(20094) ..":")
say("")
say("Hier bitte, dein 15 minütiges Buch des Anführers.")
say("Du kannst dieses wertvolle Buch auch ")
say("in einem Shop verkaufen,")
say("falls dir mal wenig Geld zur Verfügung steht.")
say("Aber ich denke du wirst dieses Buch ")
say("beim Leveln mehr benötigen.")
say("Passe gut auf es auf.")
say_item_vnum(72043)
say_reward("Du hast ein 15 minütiges Buch des Anführers erhalten")
pc.setqf("achievement_points", pc.getqf("achievement_points") - Price)
cmdchat("achievementpoints ".. pc.getqf("achievement_points"))
pc.give_item2(72043, 1)
end
end
elseif bucher == 2 then
local Price = 5
say_title("".. mob_name(20094) ..":")
say("")
say("Dieses Buch des Anführers dauert 30 Minuten lang an")
say("und gibt euch einen Exp-Bonus von 30%")
say("Du kannst es jederzeit an- und ausziehen,")
say("sodass du es sehr effizient benutzen kannst.")
say("")
say("")
say("")
say_reward("Das ganze würde dich ".. Price .." Achievement-Points kosten.")
local buyselection = select("Buch des Anführers","Abbrechen")
if buyselection == 2 then
return
elseif buyselection == 1 then
if pc.getqf("achievement_points") < Price then
say_title("".. mob_name(20094) ..":")
say("")
say("Du hast leider nicht genügend Achievement-Points.")
say("Bitte komme wieder, sobald du ".. Price - pc.getqf("achievement_points") .."")
say("weitere Achievement-Points gesammelt hast")
say("")
say("")
say("")
say_reward("Sammel noch mehr Achievement-Points für dieses Item")
return
else
say_title("".. mob_name(20094) ..":")
say("")
say("Hier bitte, dein 30 minütiges Buch des Anführers.")
say("Du kannst dieses wertvolle Buch auch ")
say("in einem Shop verkaufen,")
say("falls dir mal wenig Geld zur Verfügung steht.")
say("Aber ich denke du wirst dieses Buch ")
say("beim Leveln mehr benötigen.")
say("Passe gut auf es auf.")
say_item_vnum(72044)
say_reward("Du hast ein 30 minütiges Buch des Anführers erhalten")
pc.setqf("achievement_points", pc.getqf("achievement_points") - Price)
cmdchat("achievementpoints ".. pc.getqf("achievement_points"))
pc.give_item2(72044, 1)
end
end
elseif bucher == 3 then
local Price = 10
say_title("".. mob_name(20094) ..":")
say("")
say("Dieses Buch des Anführers dauert 3 Stunden lang an")
say("und gibt euch einen Exp-Bonus von 30%")
say("Du kannst es jederzeit an- und ausziehen,")
say("sodass du es sehr effizient benutzen kannst.")
say("")
say("")
say("")
say_reward("Das ganze würde dich ".. Price .." Achievement-Points kosten.")
local buyselection = select("Buch des Anführers","Abbrechen")
if buyselection == 2 then
return
elseif buyselection == 1 then
if pc.getqf("achievement_points") < Price then
say_title("".. mob_name(20094) ..":")
say("")
say("Du hast leider nicht genügend Achievement-Points.")
say("Bitte komme wieder, sobald du ".. Price - pc.getqf("achievement_points") .."")
say("weitere Achievement-Points gesammelt hast")
say("")
say("")
say("")
say_reward("Sammel noch mehr Achievement-Points für dieses Item")
return
else
say_title("".. mob_name(20094) ..":")
say("")
say("Hier bitte, dein 3 stündiges Buch des Anführers.")
say("Du kannst dieses wertvolle Buch auch ")
say("in einem Shop verkaufen,")
say("falls dir mal wenig Geld zur Verfügung steht.")
say("Aber ich denke du wirst dieses Buch ")
say("beim Leveln mehr benötigen.")
say("Passe gut auf es auf.")
say_item_vnum(72045)
say_reward("Du hast ein 3 stündiges Buch des Anführers erhalten")
pc.setqf("achievement_points", pc.getqf("achievement_points") - Price)
cmdchat("achievementpoints ".. pc.getqf("achievement_points"))
pc.give_item2(72045, 1)
end
end
end
elseif hilfsitems == 5 then
local Price = 10
say_title("".. mob_name(20094) ..":")
say("")
say("Im hohen Level schmerzt einen der Exp-Verlust")
say("teilweise viel mehr als im niedrigeren Level.")
say("Mit der Medaille des Drachen verlierst")
say("du keinen hart erkämpften Exp mehr.")
say("")
say("")
say("")
say_reward("Sie würde dich ".. Price .." Achievement-Points kosten.")
local buyselection = select("Medaille des Drachen kaufen","Abbrechen")
if buyselection == 2 then
return
elseif buyselection == 1 then
if pc.getqf("achievement_points") < Price then
say_title("".. mob_name(20094) ..":")
say("")
say("Du hast leider nicht genügend Achievement-Points.")
say("Bitte komme wieder, sobald du ".. Price - pc.getqf("achievement_points") .."")
say("weitere Achievement-Points gesammelt hast")
say("")
say("")
say("")
say_reward("Sammel noch mehr Achievement-Points für dieses Item")
return
else
say_title("".. mob_name(20094) ..":")
say("")
say("Hier bitte, deine Medaillen des Drachen.")
say("Diese Achievement-Points sind mir ")
say("diese Medaillen wert.")
say("Du kannst sie notfalls auf dem Markt verkaufen.")
say("Sie werden sicherlich gut verkauft werden, ")
say("schließlich sind teure und seltene Items beliebt.")
say_item_vnum(71004)
say_reward("Du hast 5 Medaillen des Drachen erhalten")
pc.setqf("achievement_points", pc.getqf("achievement_points") - Price)
cmdchat("achievementpoints ".. pc.getqf("achievement_points"))
pc.give_item2(71004, 5)
end
end
end
elseif selectcategory == 3 then
say_title("".. mob_name(20094) ..":")
say("")
say("Du verlangst Drachengott-Items für deine AchievementPoints?")
say("Die Drachengott-Items sind sehr selten und wertvoll,die gebe ich nur sehr ungern raus.")
local drachengott = select("Drachengott-Leben","Drachengott-Angriff","Drachengott-Verteidigung","Drachengott-Intelligenz","Shop verlassen")
if drachengott == 5 then
return
elseif drachengott == 1 then
local Price = 20
say_title("".. mob_name(20094) ..":")
say("")
say("Das Drachengott-Leben erhöht deine Lebenspunkte")
say("um 20% für eine geraume Zeit.")
say("Er ist allgemein sehr hilfreich.")
say("")
say("")
say("")
say_reward("Es kostet dich ".. Price .." Achievement-Points.")
local buyselection = select("Drachengott-Leben kaufen","Abbrechen")
if buyselection == 2 then
return
elseif buyselection == 1 then
if pc.getqf("achievement_points") < Price then
say_title("".. mob_name(20094) ..":")
say("")
say("Du hast leider nicht genügend Achievement-Points.")
say("Bitte komme wieder, sobald du ".. Price - pc.getqf("achievement_points") .."")
say("weitere Achievement-Points gesammelt hast")
say("")
say("")
say("")
say_reward("Sammel noch mehr Achievement-Points für dieses Item")
return
else
say_title("".. mob_name(20094) ..":")
say("")
say("Hier bitte, deine Drachengott-Leben.")
say("Ich trenne mich nur ungern davon....")
say("Passe gut auf sie auf, sie ist sehr wertvoll.")
say_item_vnum(71027)
say_reward("Du hast 3x Drachengott-Leben erhalten")
pc.setqf("achievement_points", pc.getqf("achievement_points") - Price)
cmdchat("achievementpoints ".. pc.getqf("achievement_points"))
pc.give_item2(71027, 3)
end
end
elseif drachengott == 2 then
local Price = 20
say_title("".. mob_name(20094) ..":")
say("")
say("Der Drachengott-Angriff erhöht deinen Angriff")
say("um 20% für eine geraume Zeit.")
say("Mit ihm wirst du im Kampf erfolgreich sein.")
say("")
say("")
say("")
say_reward("Er kostet dich ".. Price .." Achievement-Points.")
local buyselection = select("Drachengott-Angriff kaufen","Abbrechen")
if buyselection == 2 then
return
elseif buyselection == 1 then
if pc.getqf("achievement_points") < Price then
say_title("".. mob_name(20094) ..":")
say("")
say("Du hast leider nicht genügend Achievement-Points.")
say("Bitte komme wieder, sobald du ".. Price - pc.getqf("achievement_points") .."")
say("weitere Achievement-Points gesammelt hast")
say("")
say("")
say("")
say_reward("Sammel noch mehr Achievement-Points für dieses Item")
return
else
say_title("".. mob_name(20094) ..":")
say("")
say("Hier bitte, dein Drachengott-Angriff.")
say("Ich trenne mich nur ungern davon....")
say("Passe gut auf sie auf, sie ist sehr wertvoll.")
say_item_vnum(71028)
say_reward("Du hast 3x Drachengott-Angriff erhalten")
pc.setqf("achievement_points", pc.getqf("achievement_points") - Price)
cmdchat("achievementpoints ".. pc.getqf("achievement_points"))
pc.give_item2(71028, 3)
end
end
elseif drachengott == 3 then
local Price = 20
say_title("".. mob_name(20094) ..":")
say("")
say("Die Drachengott-Verteidigung erhöht deine Verteidigung")
say("um 20% für eine geraume Zeit.")
say("Mit ihm wirst du in der Verteidigung erfolgreich sein.")
say("")
say("")
say("")
say_reward("Sie kostet dich ".. Price .." Achievement-Points.")
local buyselection = select("Drachengott-Verteidigung kaufen","Abbrechen")
if buyselection == 2 then
return
elseif buyselection == 1 then
if pc.getqf("achievement_points") < Price then
say_title("".. mob_name(20094) ..":")
say("")
say("Du hast leider nicht genügend Achievement-Points.")
say("Bitte komme wieder, sobald du ".. Price - pc.getqf("achievement_points") .."")
say("weitere Achievement-Points gesammelt hast")
say("")
say("")
say("")
say_reward("Sammel noch mehr Achievement-Points für dieses Item")
return
else
say_title("".. mob_name(20094) ..":")
say("")
say("Hier bitte, deine Drachengott-Verteidigung.")
say("Ich trenne mich nur ungern davon....")
say("Passe gut auf sie auf, sie ist sehr wertvoll.")
say_item_vnum(71030)
say_reward("Du hast 3x Drachengott-Verteidigung erhalten")
pc.setqf("achievement_points", pc.getqf("achievement_points") - Price)
cmdchat("achievementpoints ".. pc.getqf("achievement_points"))
pc.give_item2(71030, 3)
end
end
elseif drachengott == 4 then
local Price = 15
say_title("".. mob_name(20094) ..":")
say("")
say("Die Drachengott-Intelligenz erhöht deine Intelligenz")
say("um 20% für eine geraume Zeit.")
say("Mit ihm wirst du im magischen Kampf erfolgreich sein.")
say("")
say("")
say("")
say_reward("Sie kostet dich ".. Price .." Achievement-Points.")
local buyselection = select("Drachengott-Intelligenz kaufen","Abbrechen")
if buyselection == 2 then
return
elseif buyselection == 1 then
if pc.getqf("achievement_points") < Price then
say_title("".. mob_name(20094) ..":")
say("")
say("Du hast leider nicht genügend Achievement-Points.")
say("Bitte komme wieder, sobald du ".. Price - pc.getqf("achievement_points") .."")
say("weitere Achievement-Points gesammelt hast")
say("")
say("")
say("")
say_reward("Sammel noch mehr Achievement-Points für dieses Item")
return
else
say_title("".. mob_name(20094) ..":")
say("")
say("Hier bitte, deine Drachengott-Intelligenz.")
say("Ich trenne mich nur ungern davon....")
say("Passe gut auf sie auf, sie ist sehr wertvoll.")
say_item_vnum(71029)
say_reward("Du hast 3x Drachengott-Intelligenz erhalten")
pc.setqf("achievement_points", pc.getqf("achievement_points") - Price)
cmdchat("achievementpoints ".. pc.getqf("achievement_points"))
pc.give_item2(71029, 3)
end
end
end
elseif selectcategory == 4 then
say_title("".. mob_name(20094) ..":")
say("")
say("Du hättest gerne Bonus-Items für")
say("deine Achievement-Points?")
say("Die Bonus-Items sind sehr wertvoll, da sie")
say("dich im Spielverlauf unterstützten.")
local bonusitems = select("Gegenstand verstärken","Gegenstand verzaubern","Segenskugel","Shop verlassen")
if bonusitems == 4 then
return
elseif bonusitems == 1 then
local Price = 5
say_title("".. mob_name(20094) ..":")
say("")
say("Das Item Gegenstand verstärken verstärkt")
say("deine Items, sodass sie einen Bonus erhalten.")
say("Er ist sehr begehrt, da die Items mit Bonis")
say("einen sehr großen Wert besitzen.")
say("")
say("")
say("")
say_reward("Es kostet dich ".. Price .." Achievement-Points.")
local buyselection = select("Gegenstand verstärken kaufen","Abbrechen")
if buyselection == 2 then
return
elseif buyselection == 1 then
if pc.getqf("achievement_points") < Price then
say_title("".. mob_name(20094) ..":")
say("")
say("Du hast leider nicht genügend Achievement-Points.")
say("Bitte komme wieder, sobald du ".. Price - pc.getqf("achievement_points") .."")
say("weitere Achievement-Points gesammelt hast")
say("")
say("")
say("")
say_reward("Sammel noch mehr Achievement-Points für dieses Item")
return
else
say_title("".. mob_name(20094) ..":")
say("")
say("Hier bitte, deine Gegenstand verstärken.")
say("Ich wünsche dir viel Erfolg mit den Bonis,")
say("immerhin waren das meine Gegenstand verstärken.")
say("")
say("")
say_item_vnum(71085)
say_reward("Du hast 10x Gegenstand verstärken erhalten")
pc.setqf("achievement_points", pc.getqf("achievement_points") - Price)
cmdchat("achievementpoints ".. pc.getqf("achievement_points"))
pc.give_item2(71085, 10)
end
end
elseif bonusitems == 2 then
local Price = 20
say_title("".. mob_name(20094) ..":")
say("")
say("Das Item Gegenstand verzaubern verzaubert")
say("deine bereits vorhanden Bonis eines Items.")
say("Eventuell hast du großes Glück damit.")
say("")
say("")
say("")
say_reward("Er kostet dich ".. Price .." Achievement-Points.")
local buyselection = select("Gegenstand verzaubern kaufen","Abbrechen")
if buyselection == 2 then
return
elseif buyselection == 1 then
if pc.getqf("achievement_points") < Price then
say_title("".. mob_name(20094) ..":")
say("")
say("Du hast leider nicht genügend Achievement-Points.")
say("Bitte komme wieder, sobald du ".. Price - pc.getqf("achievement_points") .."")
say("weitere Achievement-Points gesammelt hast")
say("")
say("")
say("")
say_reward("Sammel noch mehr Achievement-Points für dieses Item")
return
else
say_title("".. mob_name(20094) ..":")
say("")
say("Hier bitte, deine Gegenstand verzaubern.")
say("Sie sind nicht nur wertvoll, sondern auch")
say("sehr begehrt, sodass du beim Verkauf")
say("einen hohen Preis erzielen könntest.")
say("")
say_item_vnum(71084)
say_reward("Du hast 20x Gegenstand verzaubern erhalten")
pc.setqf("achievement_points", pc.getqf("achievement_points") - Price)
cmdchat("achievementpoints ".. pc.getqf("achievement_points"))
pc.give_item2(71084, 20)
end
end
elseif bonusitems == 3 then
local Price = 50
say_title("".. mob_name(20094) ..":")
say("")
say("Segenskugel sind sehr begehrt und haben")
say("einen hohen spielerischen, als auch")
say("wirtschaftlichen Wert.")
say("Sie versehen dein Item bei Erfolg")
say("mit einem 5. Bonus.")
say("")
say("")
say_reward("Sie kostet dich ".. Price .." Achievement-Points.")
local buyselection = select("Drachengott-Verteidigung kaufen","Abbrechen")
if buyselection == 2 then
return
elseif buyselection == 1 then
if pc.getqf("achievement_points") < Price then
say_title("".. mob_name(20094) ..":")
say("")
say("Du hast leider nicht genügend Achievement-Points.")
say("Bitte komme wieder, sobald du ".. Price - pc.getqf("achievement_points") .."")
say("weitere Achievement-Points gesammelt hast")
say("")
say("")
say("")
say_reward("Sammel noch mehr Achievement-Points für dieses Item")
return
else
say_title("".. mob_name(20094) ..":")
say("")
say("Hier bitte, deine Segenskugel.")
say("Du hast eine gute Wahl getroffen,")
say("immerhin kann sie jeder gut gebrauchen.")
say("")
say("")
say("")
say_item_vnum(70024)
say_reward("Du hast eine Segenskugel erhalten")
pc.setqf("achievement_points", pc.getqf("achievement_points") - Price)
cmdchat("achievementpoints ".. pc.getqf("achievement_points"))
pc.give_item2(70024, 3)
end
end
end
end
end
end
end
end
end
![[SERVICE] Die Questkontrolle](https://www.elitepvpers.com/forum/iconimages/metin2-private-server/service-die-questkontrolle_ltr.gif){kind=small}
thx im vorraus
