|
You last visited: Today at 10:11
Advertisement
[SERVICE] Die Questkontrolle
Discussion on [SERVICE] Die Questkontrolle within the Metin2 Private Server forum part of the Metin2 category.
08/25/2013, 14:25
|
#8836
|
elite*gold: 98
Join Date: Apr 2013
Posts: 20,956
Received Thanks: 916
|
PHP Code:
quest find_item begin state start begin when 9009.chat."Item suchen" with isAdmin() begin say_title(string.format("%s:", mob_name(string.format("%d", npc.get_race())))) say() say("Was möchtest du tun?") local a = select("Namen suchen", "ID suchen", "Abbrechen") if a == 3 then return end if a == 1 then say_title("Namen suchen") say() say("Gib die ID ein!") local id_in = tonumber(input()) if type(id_in) ~= "number" then return end local name = mysql_query(string.format("SELECT name FROM player.item_proto WHERE vnum= %q;", id_in)) if name then say_title("Namen suchen") say() say() say("Der Name für die ID : "..id_in.." lautet:") say() say(name[1][1]) return else say_title("Namen suchen") say() say() say("Leider gab es kein Ergebniss!") return end elseif a == 2 then say_title("ID suchen") say() say("Gib den Namen ein!") local name_in = input() local id = mysql_query(string.format("SELECT vnum FROM player.item_proto WHERE name= %q", name_in)) if id then say_title("ID suchen") say() say("Die ID für den Namen : "..name_in.." lautet:") say() say(id[1][1]) return else say_title("Namen suchen") say() say() say("Leider gab es kein Ergebnis!") return end end end end end
|
|
|
08/25/2013, 14:35
|
#8837
|
elite*gold: 0
Join Date: Aug 2013
Posts: 117
Received Thanks: 23
|
@Golecz: ganz einfach, die questfunktion "mysql_query" gibts in der quest_function liste nicht.
Ich glaube das hier ist ein How To wie man die questfunktion einbaut:
|
|
|
08/25/2013, 16:25
|
#8838
|
elite*gold: 47
Join Date: Feb 2012
Posts: 2,282
Received Thanks: 2,579
|
Mal nach langer Zeit, wieder ein Fehler...
Code:
syntax error : [string "startgame . get_event_flag ( "monarch_election" ) == 1"]:43: `=' expected near `else'
monarch_election.quest:91:Error occured on compile monarch_election.quest
Quest:
PHP Code:
quest monarch_election begin state start begin when 20011.chat."Königswahl-Event" with pc.get_name() == "[SA]Risiss" begin say_title("Uriel:") say("") say("Was willst du machen?") say("") local gm = select("An-/Ausschalten", "Abbrechen") if 1 == gm then if game.get_event_flag("monarch_election") == 0 then game.set_event_flag("monarch_election", 1) elseif game.get_event_flag("monarch_election") == 1 then game.set_event_flag("monarch_election", 2) elseif game.get_event_flag("monarch_election") == 2 then game.set_event_flag("monarch_election", 0) end say_title("Uriel:") say("") say("Done") say("") return else return end end when 20011.chat."Für die Königswahlen kandidieren" with game.get_event_flag("monarch_election") == 1 begin if pc.get_level() <= 79 then say_title("Uriel:") say("") say("Du kannst dich erst ab Level 80 als") say("Kandidat aufstellen lassen.") say("") return end say_title("Uriel:") say("") say("Du möchtest dich also als Kandidat") say("aufstellen lassen?") say("") local b = select("Ja", "Nein") if 1 == b then local cnt = mysql_query(string.format("SELECT COUNT(*) FROM monarch.candidacy WHERE empire = %d;", pc.get_empire())) if cnt >= 5 then say_title("Uriel:") say("") say("Es tut mir leid, aber es gibt bereits") say("5 Kandidaten.") say("Villeicht hast du bei den nächsten") say("Wahlen mehr Glück.") say("") return else say_title("Uriel:") say("") say("Du hast Glück. Es sind noch Kandidaten-") say("plätze frei.") say("Möchtest du dich wirklich aufstellen?") say("") local c = select("Ja", "Nein") if 1 == c then if mysql_query(string.format("SELECT COUNT(*) FROM monarch.candidacy WHERE pid = %d", mysql_query(string.format("SELECT id FROM player.player WHERE name = '%s'", pc.get_name())))) < 1 then if mysql_query(string.format("SELECT COUNT(*) FROM monarch.candidacy WHERE empire = %d;", pc.get_empire())) < 5 then mysql_query(string.format("INSERT INTO monarch.candidacy(pid, often, empire) VALUES(%d, 0, %d);", mysql_query(string.format("SELECT id FROM player.player WHERE name = '%s'", pc.get_name())), pc.get_empire())) say_title("Uriel:") say("") say("Ich habe dich erfolgreich eingetragen.") say("") retrun else say_title("Uriel:") say("") say("Es tut mir leid, aber jemand war schneller.") say("") return end else say_title("Uriel:") say("") say("Ich kann dich leider nicht zwei mal") say("eintragen.") say("") return end else return end end else return end end when 20011.chat."König wählen" with game.get_event_flag("monarch_election") == 2 begin say_title("Uriel:") say("") say("Du möchtest also wählen?") say("Für eine Wahl musst du mindestens") say("Level 35 sein.") wait() if pc.get_level() >= 35 then say_title("Uriel:") say("") say("Du kannst dich über unser Forum oder") say("über unsere Homepage über die") say("Kandidaten informieren.") say("") wait() say("Wen möchtest du wählen?") local can_tab = {"", "", "", "", ""} local can_pid = mysql_query(string.format("SELECT pid FROM monarch.candidacy WHERE empire = %d", pc.get_empire())) for i = 1, 5, 1 do local can_name = mysql_query(string.format("SELECT name FROM player.player WHERE id = %d", can_pid[i][1])) table.insert(can_tab, i, can_name) end local sel = select(can_tab[1], can_tab[2], can_tab[3], can_tab[4], can_tab[5], "Abbrechen") if 1 == sel then say_title("Uriel:") say("") say(string.format("Möchtest du wirklich %s wählen?", can_tab[1])) say("") local b = select("Ja", "Nein") if 1 == b then mysql_query(string.format("UPDATE monarch.candidacy SET often = often + 1 WHERE pid = %d", can_pid[1][1])) say("Wahl erfolreich.") else return end elseif 2 == sel then say_title("Uriel:") say("") say(string.format("Möchtest du wirklich %s wählen?", can_tab[2])) say("") local b = select("Ja", "Nein") if 1 == b then mysql_query(string.format("UPDATE monarch.candidacy SET often = often + 1 WHERE pid = %d", can_pid[2][1])) say("Wahl erfolreich.") else return end elseif 3 == sel then say_title("Uriel:") say("") say(string.format("Möchtest du wirklich %s wählen?", can_tab[3])) say("") local b = select("Ja", "Nein") if 1 == b then mysql_query(string.format("UPDATE monarch.candidacy SET often = often + 1 WHERE pid = %d", can_pid[3][1])) say("Wahl erfolreich.") else return end elseif 4 == sel then say_title("Uriel:") say("") say(string.format("Möchtest du wirklich %s wählen?", can_tab[4])) say("") local b = select("Ja", "Nein") if 1 == b then mysql_query(string.format("UPDATE monarch.candidacy SET often = often + 1 WHERE pid = %d", can_pid[4][1])) say("Wahl erfolreich.") else return end elseif 5 == sel then say_title("Uriel:") say("") say(string.format("Möchtest du wirklich %s wählen?", can_tab[5])) say("") local b = select("Ja", "Nein") if 1 == b then mysql_query(string.format("UPDATE monarch.candidacy SET often = often + 1 WHERE pid = %d", can_pid[5][1])) say("Wahl erfolreich.") else return end else return end else say_title("Uriel:") say("") say("Du musst Level 35 sein um wählen") say("zu können.") end end end end
Wer kann helfen?
MfG
|
|
|
08/25/2013, 21:09
|
#8839
|
elite*gold: 0
Join Date: Aug 2013
Posts: 30
Received Thanks: 2
|
auch wenn ich grad keine quest habe vwollte nur sagen danke das ihr das macht echt top :*
|
|
|
08/25/2013, 23:41
|
#8840
|
elite*gold: 191
Join Date: May 2009
Posts: 1,214
Received Thanks: 2,594
|
Code:
quest monarch_election begin
state start begin
when 20011.chat."Königswahl-Event" with pc.get_name() == "[SA]Risiss" begin
say_title("Uriel:")
say("")
say("Was willst du machen?")
say("")
local gm = select("An-/Ausschalten", "Abbrechen")
if 1 == gm then
if game.get_event_flag("monarch_election") == 0 then
game.set_event_flag("monarch_election", 1)
elseif game.get_event_flag("monarch_election") == 1 then
game.set_event_flag("monarch_election", 2)
elseif game.get_event_flag("monarch_election") == 2 then
game.set_event_flag("monarch_election", 0)
end
say_title("Uriel:")
say("")
say("Done")
say("")
return
else
return
end
end
when 20011.chat."Für die Königswahlen kandidieren" with game.get_event_flag("monarch_election") == 1 begin
if pc.get_level() <= 79 then
say_title("Uriel:")
say("")
say("Du kannst dich erst ab Level 80 als")
say("Kandidat aufstellen lassen.")
say("")
return
end
say_title("Uriel:")
say("")
say("Du möchtest dich also als Kandidat")
say("aufstellen lassen?")
say("")
local b = select("Ja", "Nein")
if 1 == b then
local cnt = mysql_query(string.format("SELECT COUNT(*) FROM monarch.candidacy WHERE empire = %d;", pc.get_empire()))
if cnt >= 5 then
say_title("Uriel:")
say("")
say("Es tut mir leid, aber es gibt bereits")
say("5 Kandidaten.")
say("Villeicht hast du bei den nächsten")
say("Wahlen mehr Glück.")
say("")
return
else
say_title("Uriel:")
say("")
say("Du hast Glück. Es sind noch Kandidaten-")
say("plätze frei.")
say("Möchtest du dich wirklich aufstellen?")
say("")
local c = select("Ja", "Nein")
if 1 == c then
if mysql_query(string.format("SELECT COUNT(*) FROM monarch.candidacy WHERE pid = %d", mysql_query(string.format("SELECT id FROM player.player WHERE name = '%s'", pc.get_name())))) < 1 then
if mysql_query(string.format("SELECT COUNT(*) FROM monarch.candidacy WHERE empire = %d;", pc.get_empire())) < 5 then
mysql_query(string.format("INSERT INTO monarch.candidacy(pid, often, empire) VALUES(%d, 0, %d);", mysql_query(string.format("SELECT id FROM player.player WHERE name = '%s'", pc.get_name())), pc.get_empire()))
say_title("Uriel:")
say("")
say("Ich habe dich erfolgreich eingetragen.")
say("")
return
else
say_title("Uriel:")
say("")
say("Es tut mir leid, aber jemand war schneller.")
say("")
return
end
else
say_title("Uriel:")
say("")
say("Ich kann dich leider nicht zwei mal")
say("eintragen.")
say("")
return
end
else
return
end
end
else
return
end
end
when 20011.chat."König wählen" with game.get_event_flag("monarch_election") == 2 begin
say_title("Uriel:")
say("")
say("Du möchtest also wählen?")
say("Für eine Wahl musst du mindestens")
say("Level 35 sein.")
wait()
if pc.get_level() >= 35 then
say_title("Uriel:")
say("")
say("Du kannst dich über unser Forum oder")
say("über unsere Homepage über die")
say("Kandidaten informieren.")
say("")
wait()
say("Wen möchtest du wählen?")
local can_tab = {"", "", "", "", ""}
local can_pid = mysql_query(string.format("SELECT pid FROM monarch.candidacy WHERE empire = %d", pc.get_empire()))
for i = 1, 5, 1 do
local can_name = mysql_query(string.format("SELECT name FROM player.player WHERE id = %d", can_pid[i][1]))
table.insert(can_tab, i, can_name)
end
local sel = select(can_tab[1], can_tab[2], can_tab[3], can_tab[4], can_tab[5], "Abbrechen")
if 1 == sel then
say_title("Uriel:")
say("")
say(string.format("Möchtest du wirklich %s wählen?", can_tab[1]))
say("")
local b = select("Ja", "Nein")
if 1 == b then
mysql_query(string.format("UPDATE monarch.candidacy SET often = often + 1 WHERE pid = %d", can_pid[1][1]))
say("Wahl erfolreich.")
else
return
end
elseif 2 == sel then
say_title("Uriel:")
say("")
say(string.format("Möchtest du wirklich %s wählen?", can_tab[2]))
say("")
local b = select("Ja", "Nein")
if 1 == b then
mysql_query(string.format("UPDATE monarch.candidacy SET often = often + 1 WHERE pid = %d", can_pid[2][1]))
say("Wahl erfolreich.")
else
return
end
elseif 3 == sel then
say_title("Uriel:")
say("")
say(string.format("Möchtest du wirklich %s wählen?", can_tab[3]))
say("")
local b = select("Ja", "Nein")
if 1 == b then
mysql_query(string.format("UPDATE monarch.candidacy SET often = often + 1 WHERE pid = %d", can_pid[3][1]))
say("Wahl erfolreich.")
else
return
end
elseif 4 == sel then
say_title("Uriel:")
say("")
say(string.format("Möchtest du wirklich %s wählen?", can_tab[4]))
say("")
local b = select("Ja", "Nein")
if 1 == b then
mysql_query(string.format("UPDATE monarch.candidacy SET often = often + 1 WHERE pid = %d", can_pid[4][1]))
say("Wahl erfolreich.")
else
return
end
elseif 5 == sel then
say_title("Uriel:")
say("")
say(string.format("Möchtest du wirklich %s wählen?", can_tab[5]))
say("")
local b = select("Ja", "Nein")
if 1 == b then
mysql_query(string.format("UPDATE monarch.candidacy SET often = often + 1 WHERE pid = %d", can_pid[5][1]))
say("Wahl erfolreich.")
else
return
end
else
return
end
else
say_title("Uriel:")
say("")
say("Du musst Level 35 sein um wählen")
say("zu können.")
end
end
end
end
Du hattest
retrun statt return in Zeile 68
|
|
|
08/26/2013, 15:37
|
#8841
|
elite*gold: 0
Join Date: Aug 2013
Posts: 30
Received Thanks: 2
|
quest tele begin
state start begin
function warp_tab(warp)
local a,lvl={},pc.get_level()
table.foreach(warp,function(val,i)
if lvl >= val then table.insert(a,val) end
end)
return a
end
function local_table(warp)
--= tele.warp_tab(warp)???
local tabelle,main_menu,sel_table = tele.warp_tab(warp),{},{}
table.sort(tabelle)
table.foreach(tabelle,function(i,n) main_menu[i]={warp[n][1],warp[n][2]} sel_table[i]=warp[n][3] end)
return main_menu,sel_table
end
when 20041.chat."Teleport" begin
local warp={
--[lvl]={x,y,"Ort"},
[100]={3498900,3498900,"Run1"},
[120]={12470,12485,"Run2"},
[140]={5501,4925,"Buggy"},
}
say_title("Teleportieren:")
say()
say("Bitte sehr.")
say("Wohin möchtest du dich Teleportieren lassen?")
local ports,map_auswahl=tele.local_table(warp)
table.insert(map_auswahl,"Abbrechen")
local auswahl=select2(map_auswahl)--select_table(map_auswahl)
if auswahl==table.getn(map_auswahl) then return end
--pc.warp(ports[auswahl][1],ports[auswahl][2])
say(ports[auswahl][1].."x , "..ports[auswahl][2].." y")
end
end
end
man wird nicht geportet :O
|
|
|
08/26/2013, 17:10
|
#8842
|
elite*gold: 20
Join Date: Nov 2006
Posts: 172
Received Thanks: 70
|
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
Mein Problem ich kann die Items nicht kaufen.
|
|
|
08/26/2013, 18:06
|
#8843
|
elite*gold: 0
Join Date: May 2013
Posts: 605
Received Thanks: 580
|
Quote:
Originally Posted by german1337
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
Mein Problem ich kann die Items nicht kaufen.
|
hab eine alternative zu den bonis gefunden, somit sieht man auch die Sonderzeichen
PHP Code:
a={ {"%d%c Chance auf EXP Bonus",2}, {"Max TP %c%d",1}, } function translate_b(str,int,val) local b=int==1 and string.format(str,43,val) or string.format(str,val,37) return b end for i=1,#a do print(translate_b(a[i][1],a[i][2],40)) end
output kommt
>> 40% Chance auf EXP Bonus
>> Max TP +40
ist nur eine Verbesserung
|
|
|
08/26/2013, 18:24
|
#8844
|
elite*gold: 0
Join Date: Jul 2013
Posts: 193
Received Thanks: 11
|
PHP Code:
quest warpring begin state start begin when 70007.use with pc.get_level() >= 10 begin say_title("Ring:") say("Dies ist eine faszinierende Gegend. Aber") say("passiert hier denn auch mal etwas") say("Außergewöhnliches? Eher wohl nicht. In anderen") say("Teilen des Landes sieht es mitunter ganz anders.") say("aus! Es gibt daher sicher einen intressanten") say("Ort, an den ich dich teleportieren könnte. Da") say("jedoch die Kräfte des Bösen wieder stärker") say("geworden sind, wurden Raum und Zeit ins Chaos") say("gestürzt. Dadurch kann es passieren, dass deine") say("Rückkehr nicht immer augenblicklich funktioniert.") say("Möchtest du dennoch teleportiert werden?")
local main_set = select("Ja","Nein") if main_set == 2 then return end if pc.get_level() <= 10 then say_title("Ring:") say("Hm… Mit deinem derzeitigen Level bist du noch") say("zu schwach für die Reise durch Zeit und Raum.") say("Komm wieder, wenn du höher als Level 10 bist.") return end
local map = pc.get_map_index() local empire = pc.get_empire() local level = pc.get_level()
say_title("Ring:") say("Wohin möchtest du teleportiert werden?")
-- ?? ?? ???? ?? ?? (? ?? 1,2 ??) if map == 1 or map == 3 or map == 21 or map == 23 or map == 41 or map == 43 then
local guild_map_names = { "Gildenzone", "Gildenzone", "Gildenzone", }
guild_map_name = guild_map_names[empire] local empire_castle={ "Burgschlacht", "Burgschlacht", "Burgschlacht", } empire_castle =empire_castle[empire] local sub_set = 0 if level < 60 then -- 60?? : ?????, ???, ????, ??? sub_set = select(guild_map_name, "Tal von Seungryong", "Yongbi-Wüste", "Berg Sohan", empire_castle,"Andere Gebiete") if sub_set == 6 then -- ?? return end
else -- 61?? : ????, ???, ????, ???? sub_set = select(guild_map_name, "Tal von Seungryong", "Yongbi-Wüste", "Berg Sohan", empire_castle,"Andere Gebiete") if sub_set == 6 then -- ?? say_title("Teleporter:") say("Wohin möchtest du teleportiert werden?") sub_set = select("Doyyumhwaji", "Dämonenturm", "Zurück", "Abbrechen") + 5 if sub_set == 9 then -- ?? return end if sub_set == 8 then -- ?? say_title("Teleporter:") say("Wohin möchtest du teleportiert werden?") --- l sub_set = select(guild_map_name, "Tal von Seungryong", "Yongbi-Wüste", "Berg Sohan", empire_castle,"Andere Gebiete") if sub_set == 6 then -- ?? say_title("Teleporter:") say("Wohin möchtest du teleportiert werden?") sub_set = select("Doyyumhwaji", "Dämonenturm", "Abbrechen") + 5 if sub_set == 8 then -- ?? return end end end end end
local warp = { -- guild_map { { 128500, 1000 }, { 179500, 1000 }, { 271800, 13000 }, }, -- 64 map_n_threeway { { 402100, 673900 }, { 270400, 739900 }, { 321300, 808000 }, }, -- 63 metin2_map_n_desert_01 { { 217800, 627200 }, { 221900, 502700 }, { 344000, 502500 }, }, -- 61 map_n_snowm_01 { { 434200, 290600 }, { 375200, 174900 }, { 491800, 173600 }, }, --empire_castle { {975200, 133000}, {977200, 185000}, {923900, 183600}, } , -- 62 metin2_map_n_flame_01 { { 599400, 756300 }, { 597800, 622200 }, { 730700, 689800 }, }, -- devil_tower { { 590500, 110500 }, { 590500, 110500 }, { 590500, 110500 }, }, } test_chat(warp[sub_set][empire][1]..warp[sub_set][empire][2]) say_title("Ring:") say("Achtung, ich teleportiere dich jetzt. Du wirst") say("an einem gefährlichen Ort landen, also pass auf") say("dich auf. Viel Glück!") wait() pc.warp(warp[sub_set][empire][1], warp[sub_set][empire][2])
else -- ? ?? 1,2 ? ??? ?????? ? ?? 1,2 ? ??? ?? ?? local sub_set2 = 3
--sub_set2 = select(locale.vileage1_name[empire], locale.vileage2_name[empire], locale.cancel) if empire==1 then sub_set2 = select("Yongan","Jayang" , locale.cancel) elseif empire ==2 then sub_set2 = select("Joan","Bokjung" , locale.cancel) elseif empire ==3 then sub_set2 = select("Pyungmoo","Bakra" , locale.cancel) end if sub_set2 != 3 then if sub_set2 == 1 then say_title("Ring:") say("Ich teleportiere dich dorthin.") wait()
if empire == 1 then pc.warp(474300,954800) elseif empire == 2 then pc.warp(63800,166400) elseif empire == 3 then pc.warp(959900,269200) end elseif sub_set2 == 2 then say_title("Ring:") say("Ich teleportiere dich dorthin.")
wait() if empire == 1 then pc.warp(353100,882900) elseif empire == 2 then pc.warp(145500,240000) elseif empire == 3 then pc.warp(863900,246000) end end -- end sub set check2 if end -- end sub set check1 if end -- end map check if end -- end when use item end -- end state start end -- end quest warpring
Problem:Es ist nicht anklickbar.
|
|
|
08/26/2013, 18:51
|
#8845
|
elite*gold: 5
Join Date: Aug 2013
Posts: 192
Received Thanks: 10
|
Guide Quest
Moin, habe diese Quest hier:
PHP Code:
quest leveln begin state start begin when login or levelup with pc.level >= 1 begin set_state(information) end end state information begin when letter begin send_letter("Der Wython Guide!") end when button or info begin set_text_color("white") say("Hallo tapferer Krieger , dies ist") say("der Wython Begleiterguide. Er gibt dir Tipps") say(",wo du Leveln und Erfahrung sammeln kannst.") say_reward("Mit deinem Level solltest du bei den") say_reward("Wildhunden leveln bis ca. Level 20.") say_reward("") set_text_color("red") say("ACHTUNG!") say("Wenn du keine Icons ingame siehst, benutze eine andere") say(".exe (Alternative)") say(") set_text_color("dark orange") say("Supporter:") say_reward("[SGM]xDean") say_reward("[GM]Nexxo") say_reward("[GM]Speznas") end if pc.get_level() > 20 then set_state(information2) end end end state information2 begin when letter begin send_letter("Der Begleiterguide LVL 20-35") end when button or info begin set_text_color("white") say("Hallo tapferer Krieger , dies ist") say("der Wython Begleiterguide. Er gibt dir Tipps") say(",wo du Leveln und Erfahrung sammeln kannst.") say_reward("Mit deinem Level solltest du im") say_reward("2. Dorf Level , dort kannst du bist") say_reward("Level 35 leveln.") say_reward("TIPP: Benutze dein Reittier und Tapferkeitsumhaenge.") say("") say("") say_reward("Weiter so!") wait() say("") say_reward("Moechtest du zum 2. Dorf?") local b= select("Ja!","Nein") if 1==b then say("Du wirst nun teleportiert!") say("Viel Spass auf:") say_reward("Wython") if empire == 1 then pc . warp ( 353100 , 882900 ) elseif empire == 2 then pc . warp ( 145500 , 240000 ) elseif empire == 3 then pc . warp ( 863900 , 246000 ) elseif 2==b then say("Ok") say("Ist auch besser so...") return clear_letter() end if pc.get_level() > 36 then set_state(information3) end end end state information3 begin when letter begin send_letter("Der Begleiterguide LVL 35-50") end when button or info begin set_text_color("white") say("Hallo tapferer Krieger , dies ist") say("der Wython Begleiterguide.Er gibt dir Tipps") say(",wo du Leveln und Erfahrung sammeln kannst.") say_reward("Mit deinem Level solltest du im") say_reward("Orktal leveln. Dort ist es am besten") say_reward("Dort kannst du bist Level 50 leveln.") say_reward("TIPP: Benutze dein Kampfgaul und deine Tapferkeitsumhaenge.") say("") say("") say_reward("Weiter so!") wait() say("") say_reward("Moechtest du zum Orktal?") local a= select("Ja!","Nein") if 1==a then say("Du wirst nun teleportiert!") say("Viel Spass auf:") say_reward("Wython") pc . warp ( 333000 , 745000 ) elseif 2==a then say("Ok") say("Ist auch besser so...") return clear_letter() end if pc.get_level() > 50 then set_state(information4) end end end state information4 begin when letter begin send_letter("Der Begleiterguide LVL 50-70") end when button or info begin set_text_color("white") say("Hallo tapferer Krieger , dies ist") say("der Wython Begleiterguide. Er gibt dir Tipps") say(",wo du Leveln und Erfahrung sammeln kannst.") say_reward("Mit deinem Level solltest du im") say_reward("Spinnendungeon 2 leveln. Dort ist es am besten fuer dich.") say_reward("Dort kannst du bist Level 65 leveln.") say_reward("TIPP: Benutze dein Reittier!") say("") say("") say_reward("Du wirst immer besser") wait() say("") say_reward("Moechtest du zur Spinnendungeon2?") local f= select("Ja!","Nein") if 1==f then say("Du wirst nun teleportiert!") say("Viel Spass auf:") say_reward("Wython") pc . warp ( 705000 , 465000 ) elseif 2==f then say("Ok") say("Ist auch besser so...") return clear_letter() end if pc.get_level() > 70 then set_state(information5) end end end state information5 begin when letter begin send_letter("Der Begleiterguide LVL 70-80") end when button or info begin set_text_color("white") say("Hallo tapferer Krieger , dies ist") say("der Wython Begleiterguide. Er gibt dir Tipps") say(",wo du Leveln und Erfahrung sammeln kannst.") say_reward("Mit deinem Level solltest du bei den") say_reward("neuen Maps leveln. Dort geht es gut!") say_reward("Dort kannst du bis Level 130 leveln.") say_reward("TIPP: Benutze 7 Bonis!") say("") say("") say_reward("..Du entwickelst dich zum Gladiator") wait() say("") say_reward("Moechtest du zu den neuen Maps?") local d= select("Ok","Ok") if 1==d then say("Ok") return clear_letter() elseif 2==d then say("Ok") return clear_letter() end if pc.get_level() > 80 then set_state(information6) end end state information6 begin when letter begin send_letter("Der Begleiterguide LVL 80") end when button or info begin set_text_color("white") say("Hallo tapferer Krieger , dies ist") say("der Wython Begleiterguide.Er gibt dir Tipps") say(",wo du Leveln und Erfahrung sammeln kannst.") say_reward("Mit deinem Level solltest du immernoch bei den") say_reward("neuen Maps leveln. Dort geht es gut!") say_reward("TIPP: Benutze Neue Items aus dem Itemshop,") say_reward("und Blaustahl Ruestungen!") say("") say_reward("Dies war dein letzter Tipp vom Guide!") wait() say("") say_reward(".. Dein Gladiatoren Status waechst auf 2!") local e= select("Ok","Ok") if 1==e then say("Ok") return clear_letter() elseif 2==e then say("Ok") say("Ist auch besser so...") return clear_letter() end if pc.get_level() > 120 then set_state(information7) end end state information7 begin when letter begin send_letter("Der Gladiatoren Status") end when button or info begin set_text_color("white") say("Du hast das Level 120 erreicht!") say("") say_reward("Du erhaelst ein besonderes Item!") pc.give_item2(39001, 1) pc.give_item2(30185, 1) wait() say("") say_reward(".. Dein Gladiatoren Status waechst auf 3!") local e= select("Ok","Ok") if 1==e then say("Ok") return clear_letter() elseif 2==e then say("Ok") say("Ist auch besser so...") return clear_letter() end if pc.get_level() > 125 then set_state(information8) end end state information8 begin when letter begin send_letter("Der Gladiatoren Status") end when button or info begin set_text_color("white") say("Du hast das Level 125 erreicht!") say("") say_reward("Du erhaelst besondere Items!") pc.give_item2(71129, 5) pc.give_item2(71123, 5) pc.give_item2(39001, 1) pc.give_item2(39001, 1) pc.give_item2(39001, 1) pc.give_item2(39001, 1) pc.give_item2(39001, 1) wait() say("") say_reward(".. Dein Gladiatoren Status waechst auf 4!") local e= select("Ok","Ok") if 1==e then say("Ok") return clear_letter() elseif 2==e then say("Ok") say("Ist auch besser so...") return clear_letter() end if pc.get_level() > 130 then set_state(information8) end end state information8 begin when letter begin send_letter("Der Gladiatoren Status") end when button or info begin set_text_color("white") say("Du hast das Level 130 erreicht!") say("") say_reward("Du erhaelst besondere Items!") pc.give_item2(71129, 5) pc.give_item2(71123, 5) pc.give_item2(39001, 1) pc.give_item2(39001, 1) pc.give_item2(39001, 1) pc.give_item2(39001, 1) pc.give_item2(39001, 1) pc.give_item2(30185, 1) wait() say("") say_reward(".. Dein Gladiatoren Status waechst auf 5!") local e= select("Ok","Ok") if 1==e then say("Ok") return clear_letter() elseif 2==e then say("Ok") say("Ist auch besser so...") return clear_letter() end end end end end
Allerdings wenn ich die make.python ausführe, kommt ein Error..
Könnte mir jemand helfen?
|
|
|
08/26/2013, 19:04
|
#8846
|
elite*gold: 313
Join Date: Apr 2013
Posts: 585
Received Thanks: 122
|
Quote:
Originally Posted by J3igStar13
PHP Code:
quest warpring begin state start begin when 70007.use with pc.get_level() >= 10 begin say_title("Ring:") say("Dies ist eine faszinierende Gegend. Aber") say("passiert hier denn auch mal etwas") say("Außergewöhnliches? Eher wohl nicht. In anderen") say("Teilen des Landes sieht es mitunter ganz anders.") say("aus! Es gibt daher sicher einen intressanten") say("Ort, an den ich dich teleportieren könnte. Da") say("jedoch die Kräfte des Bösen wieder stärker") say("geworden sind, wurden Raum und Zeit ins Chaos") say("gestürzt. Dadurch kann es passieren, dass deine") say("Rückkehr nicht immer augenblicklich funktioniert.") say("Möchtest du dennoch teleportiert werden?") local main_set = select("Ja","Nein") if main_set == 2 then return end if pc.get_level() <= 10 then say_title("Ring:") say("Hm… Mit deinem derzeitigen Level bist du noch") say("zu schwach für die Reise durch Zeit und Raum.") say("Komm wieder, wenn du höher als Level 10 bist.") return end local map = pc.get_map_index() local empire = pc.get_empire() local level = pc.get_level() say_title("Ring:") say("Wohin möchtest du teleportiert werden?") -- ?? ?? ???? ?? ?? (? ?? 1,2 ??) if map == 1 or map == 3 or map == 21 or map == 23 or map == 41 or map == 43 then local guild_map_names = { "Gildenzone", "Gildenzone", "Gildenzone", } guild_map_name = guild_map_names[empire] local empire_castle={ "Burgschlacht", "Burgschlacht", "Burgschlacht", } empire_castle =empire_castle[empire] local sub_set = 0 if level < 60 then -- 60?? : ?????, ???, ????, ??? sub_set = select(guild_map_name, "Tal von Seungryong", "Yongbi-Wüste", "Berg Sohan", empire_castle,"Andere Gebiete") if sub_set == 6 then -- ?? return end else -- 61?? : ????, ???, ????, ???? sub_set = select(guild_map_name, "Tal von Seungryong", "Yongbi-Wüste", "Berg Sohan", empire_castle,"Andere Gebiete") if sub_set == 6 then -- ?? say_title("Teleporter:") say("Wohin möchtest du teleportiert werden?") sub_set = select("Doyyumhwaji", "Dämonenturm", "Zurück", "Abbrechen") + 5 if sub_set == 9 then -- ?? return end if sub_set == 8 then -- ?? say_title("Teleporter:") say("Wohin möchtest du teleportiert werden?") --- l sub_set = select(guild_map_name, "Tal von Seungryong", "Yongbi-Wüste", "Berg Sohan", empire_castle,"Andere Gebiete") if sub_set == 6 then -- ?? say_title("Teleporter:") say("Wohin möchtest du teleportiert werden?") sub_set = select("Doyyumhwaji", "Dämonenturm", "Abbrechen") + 5 if sub_set == 8 then -- ?? return end end end end end local warp = { -- guild_map { { 128500, 1000 }, { 179500, 1000 }, { 271800, 13000 }, }, -- 64 map_n_threeway { { 402100, 673900 }, { 270400, 739900 }, { 321300, 808000 }, }, -- 63 metin2_map_n_desert_01 { { 217800, 627200 }, { 221900, 502700 }, { 344000, 502500 }, }, -- 61 map_n_snowm_01 { { 434200, 290600 }, { 375200, 174900 }, { 491800, 173600 }, }, --empire_castle { {975200, 133000}, {977200, 185000}, {923900, 183600}, } , -- 62 metin2_map_n_flame_01 { { 599400, 756300 }, { 597800, 622200 }, { 730700, 689800 }, }, -- devil_tower { { 590500, 110500 }, { 590500, 110500 }, { 590500, 110500 }, }, } test_chat(warp[sub_set][empire][1]..warp[sub_set][empire][2]) say_title("Ring:") say("Achtung, ich teleportiere dich jetzt. Du wirst") say("an einem gefährlichen Ort landen, also pass auf") say("dich auf. Viel Glück!") wait() pc.warp(warp[sub_set][empire][1], warp[sub_set][empire][2]) else -- ? ?? 1,2 ? ??? ?????? ? ?? 1,2 ? ??? ?? ?? local sub_set2 = 3 --sub_set2 = select(locale.vileage1_name[empire], locale.vileage2_name[empire], locale.cancel) if empire==1 then sub_set2 = select("Yongan","Jayang" , locale.cancel) elseif empire ==2 then sub_set2 = select("Joan","Bokjung" , locale.cancel) elseif empire ==3 then sub_set2 = select("Pyungmoo","Bakra" , locale.cancel) end if sub_set2 != 3 then if sub_set2 == 1 then say_title("Ring:") say("Ich teleportiere dich dorthin.") wait() if empire == 1 then pc.warp(474300,954800) elseif empire == 2 then pc.warp(63800,166400) elseif empire == 3 then pc.warp(959900,269200) end elseif sub_set2 == 2 then say_title("Ring:") say("Ich teleportiere dich dorthin.") wait() if empire == 1 then pc.warp(353100,882900) elseif empire == 2 then pc.warp(145500,240000) elseif empire == 3 then pc.warp(863900,246000) end end -- end sub set check2 if end -- end sub set check1 if end -- end map check if end -- end when use item end -- end state start end -- end quest warpring
Problem:Es ist nicht anklickbar.
|
PHP Code:
quest warpring begin state start begin when 70007.use with pc.get_level() >= 10 begin say_title("Ring:") say("Dies ist eine faszinierende Gegend. Aber") say("passiert hier denn auch mal etwas") say("Außergewöhnliches? Eher wohl nicht. In anderen") say("Teilen des Landes sieht es mitunter ganz anders.") say("aus! Es gibt daher sicher einen intressanten") say("Ort, an den ich dich teleportieren könnte. Da") say("jedoch die Kräfte des Bösen wieder stärker") say("geworden sind, wurden Raum und Zeit ins Chaos") say("gestürzt. Dadurch kann es passieren, dass deine") say("Rückkehr nicht immer augenblicklich funktioniert.") say("Möchtest du dennoch teleportiert werden?") local main_set = select("Ja","Nein") if main_set == 2 then return end if pc.get_level() < 10 then say_title("Ring:") say("Hm… Mit deinem derzeitigen Level bist du noch") say("zu schwach für die Reise durch Zeit und Raum.") say("Komm wieder, wenn du höher als Level 10 bist.") return end local map = pc.get_map_index() local empire = pc.get_empire() local level = pc.get_level() say_title("Ring:") say("Wohin möchtest du teleportiert werden?") -- ?? ?? ???? ?? ?? (? ?? 1,2 ??) if map == 1 or map == 3 or map == 21 or map == 23 or map == 41 or map == 43 then local guild_map_names = { "Gildenzone", "Gildenzone", "Gildenzone", } guild_map_name = guild_map_names[empire] local empire_castle={ "Burgschlacht", "Burgschlacht", "Burgschlacht", } empire_castle =empire_castle[empire] local sub_set = 0 if level < 60 then -- 60?? : ?????, ???, ????, ??? sub_set = select(guild_map_name, "Tal von Seungryong", "Yongbi-Wüste", "Berg Sohan", empire_castle,"Andere Gebiete") if sub_set == 6 then -- ?? return end else -- 61?? : ????, ???, ????, ???? sub_set = select(guild_map_name, "Tal von Seungryong", "Yongbi-Wüste", "Berg Sohan", empire_castle,"Andere Gebiete") if sub_set == 6 then -- ?? say_title("Teleporter:") say("Wohin möchtest du teleportiert werden?") sub_set = select("Doyyumhwaji", "Dämonenturm", "Zurück", "Abbrechen") + 5 if sub_set == 9 then -- ?? return end if sub_set == 8 then -- ?? say_title("Teleporter:") say("Wohin möchtest du teleportiert werden?") --- l sub_set = select(guild_map_name, "Tal von Seungryong", "Yongbi-Wüste", "Berg Sohan", empire_castle,"Andere Gebiete") if sub_set == 6 then -- ?? say_title("Teleporter:") say("Wohin möchtest du teleportiert werden?") sub_set = select("Doyyumhwaji", "Dämonenturm", "Abbrechen") + 5 if sub_set == 8 then -- ?? return end end end end end local warp = { -- guild_map { { 128500, 1000 }, { 179500, 1000 }, { 271800, 13000 }, }, -- 64 map_n_threeway { { 402100, 673900 }, { 270400, 739900 }, { 321300, 808000 }, }, -- 63 metin2_map_n_desert_01 { { 217800, 627200 }, { 221900, 502700 }, { 344000, 502500 }, }, -- 61 map_n_snowm_01 { { 434200, 290600 }, { 375200, 174900 }, { 491800, 173600 }, }, --empire_castle { {975200, 133000}, {977200, 185000}, {923900, 183600}, } , -- 62 metin2_map_n_flame_01 { { 599400, 756300 }, { 597800, 622200 }, { 730700, 689800 }, }, -- devil_tower { { 590500, 110500 }, { 590500, 110500 }, { 590500, 110500 }, }, } test_chat(warp[sub_set][empire][1]..warp[sub_set][empire][2]) say_title("Ring:") say("Achtung, ich teleportiere dich jetzt. Du wirst") say("an einem gefährlichen Ort landen, also pass auf") say("dich auf. Viel Glück!") wait() pc.warp(warp[sub_set][empire][1], warp[sub_set][empire][2]) else -- ? ?? 1,2 ? ??? ?????? ? ?? 1,2 ? ??? ?? ?? local sub_set2 = 3 --sub_set2 = select(locale.vileage1_name[empire], locale.vileage2_name[empire], locale.cancel) if empire==1 then sub_set2 = select("Yongan","Jayang" , locale.cancel) elseif empire ==2 then sub_set2 = select("Joan","Bokjung" , locale.cancel) elseif empire ==3 then sub_set2 = select("Pyungmoo","Bakra" , locale.cancel) end if sub_set2 != 3 then if sub_set2 == 1 then say_title("Ring:") say("Ich teleportiere dich dorthin.") wait() if empire == 1 then pc.warp(474300,954800) elseif empire == 2 then pc.warp(63800,166400) elseif empire == 3 then pc.warp(959900,269200) end elseif sub_set2 == 2 then say_title("Ring:") say("Ich teleportiere dich dorthin.") wait() if empire == 1 then pc.warp(353100,882900) elseif empire == 2 then pc.warp(145500,240000) elseif empire == 3 then pc.warp(863900,246000) end end -- end sub set check2 if end -- end sub set check1 if end -- end map check if end -- end when use item end -- end state start end -- end quest warpring
MfG
|
|
|
08/26/2013, 19:18
|
#8847
|
elite*gold: 0
Join Date: May 2013
Posts: 605
Received Thanks: 580
|
Quote:
Originally Posted by Wython
Moin, habe diese Quest hier:
PHP Code:
quest leveln begin state start begin when login or levelup with pc.level >= 1 begin set_state(information) end end state information begin when letter begin send_letter("Der Wython Guide!") end when button or info begin set_text_color("white") say("Hallo tapferer Krieger , dies ist") say("der Wython Begleiterguide. Er gibt dir Tipps") say(",wo du Leveln und Erfahrung sammeln kannst.") say_reward("Mit deinem Level solltest du bei den") say_reward("Wildhunden leveln bis ca. Level 20.") say_reward("") set_text_color("red") say("ACHTUNG!") say("Wenn du keine Icons ingame siehst, benutze eine andere") say(".exe (Alternative)") say(") set_text_color("dark orange") say("Supporter:") say_reward("[SGM]xDean") say_reward("[GM]Nexxo") say_reward("[GM]Speznas") end if pc.get_level() > 20 then set_state(information2) end end end state information2 begin when letter begin send_letter("Der Begleiterguide LVL 20-35") end when button or info begin set_text_color("white") say("Hallo tapferer Krieger , dies ist") say("der Wython Begleiterguide. Er gibt dir Tipps") say(",wo du Leveln und Erfahrung sammeln kannst.") say_reward("Mit deinem Level solltest du im") say_reward("2. Dorf Level , dort kannst du bist") say_reward("Level 35 leveln.") say_reward("TIPP: Benutze dein Reittier und Tapferkeitsumhaenge.") say("") say("") say_reward("Weiter so!") wait() say("") say_reward("Moechtest du zum 2. Dorf?") local b= select("Ja!","Nein") if 1==b then say("Du wirst nun teleportiert!") say("Viel Spass auf:") say_reward("Wython") if empire == 1 then pc . warp ( 353100 , 882900 ) elseif empire == 2 then pc . warp ( 145500 , 240000 ) elseif empire == 3 then pc . warp ( 863900 , 246000 ) elseif 2==b then say("Ok") say("Ist auch besser so...") return clear_letter() end if pc.get_level() > 36 then set_state(information3) end end end state information3 begin when letter begin send_letter("Der Begleiterguide LVL 35-50") end when button or info begin set_text_color("white") say("Hallo tapferer Krieger , dies ist") say("der Wython Begleiterguide.Er gibt dir Tipps") say(",wo du Leveln und Erfahrung sammeln kannst.") say_reward("Mit deinem Level solltest du im") say_reward("Orktal leveln. Dort ist es am besten") say_reward("Dort kannst du bist Level 50 leveln.") say_reward("TIPP: Benutze dein Kampfgaul und deine Tapferkeitsumhaenge.") say("") say("") say_reward("Weiter so!") wait() say("") say_reward("Moechtest du zum Orktal?") local a= select("Ja!","Nein") if 1==a then say("Du wirst nun teleportiert!") say("Viel Spass auf:") say_reward("Wython") pc . warp ( 333000 , 745000 ) elseif 2==a then say("Ok") say("Ist auch besser so...") return clear_letter() end if pc.get_level() > 50 then set_state(information4) end end end state information4 begin when letter begin send_letter("Der Begleiterguide LVL 50-70") end when button or info begin set_text_color("white") say("Hallo tapferer Krieger , dies ist") say("der Wython Begleiterguide. Er gibt dir Tipps") say(",wo du Leveln und Erfahrung sammeln kannst.") say_reward("Mit deinem Level solltest du im") say_reward("Spinnendungeon 2 leveln. Dort ist es am besten fuer dich.") say_reward("Dort kannst du bist Level 65 leveln.") say_reward("TIPP: Benutze dein Reittier!") say("") say("") say_reward("Du wirst immer besser") wait() say("") say_reward("Moechtest du zur Spinnendungeon2?") local f= select("Ja!","Nein") if 1==f then say("Du wirst nun teleportiert!") say("Viel Spass auf:") say_reward("Wython") pc . warp ( 705000 , 465000 ) elseif 2==f then say("Ok") say("Ist auch besser so...") return clear_letter() end if pc.get_level() > 70 then set_state(information5) end end end state information5 begin when letter begin send_letter("Der Begleiterguide LVL 70-80") end when button or info begin set_text_color("white") say("Hallo tapferer Krieger , dies ist") say("der Wython Begleiterguide. Er gibt dir Tipps") say(",wo du Leveln und Erfahrung sammeln kannst.") say_reward("Mit deinem Level solltest du bei den") say_reward("neuen Maps leveln. Dort geht es gut!") say_reward("Dort kannst du bis Level 130 leveln.") say_reward("TIPP: Benutze 7 Bonis!") say("") say("") say_reward("..Du entwickelst dich zum Gladiator") wait() say("") say_reward("Moechtest du zu den neuen Maps?") local d= select("Ok","Ok") if 1==d then say("Ok") return clear_letter() elseif 2==d then say("Ok") return clear_letter() end if pc.get_level() > 80 then set_state(information6) end end state information6 begin when letter begin send_letter("Der Begleiterguide LVL 80") end when button or info begin set_text_color("white") say("Hallo tapferer Krieger , dies ist") say("der Wython Begleiterguide.Er gibt dir Tipps") say(",wo du Leveln und Erfahrung sammeln kannst.") say_reward("Mit deinem Level solltest du immernoch bei den") say_reward("neuen Maps leveln. Dort geht es gut!") say_reward("TIPP: Benutze Neue Items aus dem Itemshop,") say_reward("und Blaustahl Ruestungen!") say("") say_reward("Dies war dein letzter Tipp vom Guide!") wait() say("") say_reward(".. Dein Gladiatoren Status waechst auf 2!") local e= select("Ok","Ok") if 1==e then say("Ok") return clear_letter() elseif 2==e then say("Ok") say("Ist auch besser so...") return clear_letter() end if pc.get_level() > 120 then set_state(information7) end end state information7 begin when letter begin send_letter("Der Gladiatoren Status") end when button or info begin set_text_color("white") say("Du hast das Level 120 erreicht!") say("") say_reward("Du erhaelst ein besonderes Item!") pc.give_item2(39001, 1) pc.give_item2(30185, 1) wait() say("") say_reward(".. Dein Gladiatoren Status waechst auf 3!") local e= select("Ok","Ok") if 1==e then say("Ok") return clear_letter() elseif 2==e then say("Ok") say("Ist auch besser so...") return clear_letter() end if pc.get_level() > 125 then set_state(information8) end end state information8 begin when letter begin send_letter("Der Gladiatoren Status") end when button or info begin set_text_color("white") say("Du hast das Level 125 erreicht!") say("") say_reward("Du erhaelst besondere Items!") pc.give_item2(71129, 5) pc.give_item2(71123, 5) pc.give_item2(39001, 1) pc.give_item2(39001, 1) pc.give_item2(39001, 1) pc.give_item2(39001, 1) pc.give_item2(39001, 1) wait() say("") say_reward(".. Dein Gladiatoren Status waechst auf 4!") local e= select("Ok","Ok") if 1==e then say("Ok") return clear_letter() elseif 2==e then say("Ok") say("Ist auch besser so...") return clear_letter() end if pc.get_level() > 130 then set_state(information8) end end state information8 begin when letter begin send_letter("Der Gladiatoren Status") end when button or info begin set_text_color("white") say("Du hast das Level 130 erreicht!") say("") say_reward("Du erhaelst besondere Items!") pc.give_item2(71129, 5) pc.give_item2(71123, 5) pc.give_item2(39001, 1) pc.give_item2(39001, 1) pc.give_item2(39001, 1) pc.give_item2(39001, 1) pc.give_item2(39001, 1) pc.give_item2(30185, 1) wait() say("") say_reward(".. Dein Gladiatoren Status waechst auf 5!") local e= select("Ok","Ok") if 1==e then say("Ok") return clear_letter() elseif 2==e then say("Ok") say("Ist auch besser so...") return clear_letter() end end end end end
Allerdings wenn ich die make.python ausführe, kommt ein Error..
Könnte mir jemand helfen?
|
say(".exe (Alternative)")
say(")
beim letzten say fehlt was
|
|
|
08/26/2013, 19:26
|
#8848
|
elite*gold: 0
Join Date: Sep 2012
Posts: 269
Received Thanks: 125
|
Bin gerade zu inkompetent und kriege diese Funktion einfach nicht zum laufen:
PHP Code:
say_title(string.format("%s:", mob_name(string.format("%d", npc.get_race())))) say() say_reward("Bitte gib einen Benutzernamen ein.") say_reward("min. 4 Zeichen") say() local inp = input(); inp = mysql_escape(inp) if inp == "" or inp == pc.get_name() then say_title(string.format("%s:", mob_name(string.format("%d", npc.get_race())))) say() say_reward(locale.ban_panel.say_wrong2) say() return end local q = mysql_query("SELECT username FROM player.bank WHERE username = '"..inp.."'") if table.getn(q) == ""..inp.."" then say_title(string.format("%s:", mob_name(string.format("%d", npc.get_race())))) say() say("Dieser Name exestiert bereits!") say() return end
Hoffe mir kann jemand Helfen.
#Edit:
Also es kommt kein Error sondern er nimmt die if abfrage einfach nicht falls der Name existiert.
|
|
|
08/26/2013, 19:36
|
#8849
|
elite*gold: 0
Join Date: May 2013
Posts: 605
Received Thanks: 580
|
Quote:
Originally Posted by .CHJonas
Bin gerade zu inkompetent und kriege diese Funktion einfach nicht zum laufen:
PHP Code:
say_title(string.format("%s:", mob_name(string.format("%d", npc.get_race())))) say() say_reward("Bitte gib einen Benutzernamen ein.") say_reward("min. 4 Zeichen") say() local inp = input(); inp = mysql_escape(inp) if inp == "" or inp == pc.get_name() then say_title(string.format("%s:", mob_name(string.format("%d", npc.get_race())))) say() say_reward(locale.ban_panel.say_wrong2) say() return end local q = mysql_query("SELECT username FROM player.bank WHERE username = '"..inp.."'") if table.getn(q) == ""..inp.."" then say_title(string.format("%s:", mob_name(string.format("%d", npc.get_race())))) say() say("Dieser Name exestiert bereits!") say() return end
Hoffe mir kann jemand Helfen.
#Edit:
Also es kommt kein Error sondern er nimmt die if abfrage einfach nicht falls der Name existiert.
|
local q = mysql_query("SELECT username FROM player.bank WHERE username = '"..inp.."'")[1][1]
if type(q) == "string" then
say_title(string.format("%s:", mob_name(string.format("%d", npc.get_race()))))
say()
say("Dieser Name exestiert bereits!")
say()
return
end
|
|
|
08/26/2013, 20:01
|
#8850
|
elite*gold: 0
Join Date: Sep 2012
Posts: 269
Received Thanks: 125
|
Quote:
Originally Posted by ΞΠ∪Μ
local q = mysql_query("SELECT username FROM player.bank WHERE username = '"..inp.."'")[1][1]
if type(q) == "string" then
say_title(string.format("%s:", mob_name(string.format("%d", npc.get_race()))))
say()
say("Dieser Name exestiert bereits!")
say()
return
end
|
Währe es möglich das du mir erklärst was die [1] und alles was du geändert hast zu bedeuten haben?
|
|
|
All times are GMT +2. The time now is 10:11.
|
|