PeloQ deine geht nicht
[SERVICE] Die Questkontrolle
11/24/2013 17:21
ExoBiTe™#9301
11/24/2013 20:04
tarif123#9302
quest warpring begin
state start begin
when 70007.use with pc.get_level() >= 10 begin
say_title("Warpring:")
say("Hallo, ich bin der Warpring!")
say("Ich freue mich, dass du mich gekauft hast.")
say("Ich biete dir viele Teleportmöglichkeiten,")
say("mit nur wenigen kleinen Klicks.")
say("Möchtest du wirklich teleportiert werden?")
local main_set = select("Ja","Nein")
if main_set == 2 then
return
end
if pc.get_level() <= 10 then
say_title("Warpring:")
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()
local cost = math.floor(level / 5) * 1000
if cost < 1000 then
cost = 1000
end
say_title("Warpring:")
say("Wohin möchtest du teleportiert werden?")
say_reward(string.format("Das kostet dich %d Yang.", cost))
if map == 1 or map == 3 or map == 21 or map == 23 or map == 43 then
local guild_map_names = {
"Jungrang",
"Waryong",
}
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,"Abbrechen")
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", "Abbrechen")
if sub_set == 7 then -- ??
return
end
if sub_set == 6 then -- ??
say_title("Warpring:")
say("Wohin möchtest du teleportiert warden?")
say_reward(string.format("Das kostet dich %d Yang.", cost))
sub_set = select("Doyyumhwaji", "Dämonenturm", "Roter Wald", "Kuahklo Dong", "Hwang-Tempel", "Zurück", "Abbrechen") + 5
if sub_set == 12 then -- ??
return
end
if sub_set == 11 then -- ??
say_title("Warpring:")
say("Wohin möchtest du teleportiert werden?")
say_reward(string.format("Das kostet dich %d Yang.", cost))
sub_set = select(guild_map_name, "Tal von Seungryong", "Yongbi-Wüste", "Berg Sohan", empire_castle,"Andere Gebiete")
if sub_set == 6 then -- ??
--- l
say_title("Warpring:")
say("Wohin möchtest du teleportiert werden?") say_reward(string.format("Die Reise kostet %d Yang.", cost))
sub_set = select("Doyyumhwaji", "Dämonenturm", "Roter Wald", "Kuahklo Dong", "Hwang-Tempel", "Abbrechen") + 5
if sub_set == 11 then -- ??
return
end
end
end
end
end
if pc.gold < cost then
say_title("Teleporter:")
say("Du hast nicht genug Geld,")
say("Ich würde dich auch kostenlos teleportieren,")
say("aber ich habe große Schulden. Um sie zu")
say("ernähren, muss ich Geld verdienen.")
say_reward(string.format("Es kostet %d Yang.", cost))
return
end
pc.changegold(-cost)
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 },
},
-- red_forest
{
{ 1119900, 70800 },
{ 1119900, 70800 },
{ 1119900, 70800 },
},
-- spider
{
{ 85000, 525000 },
{ 85000, 525000 },
{ 85000, 525000 },
},
--tempel
{
{ 553600, 143600 },
{ 553600, 143600 },
{ 553600, 143600 },
},
}
test_chat(warp[sub_set][empire][1]..warp[sub_set][empire][2])
say_title("Warpring:")
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 pc.gold < cost then
say_title("Warpring:")
say("Ich würde dich auch umsonst teleportieren,")
say("aber ich habe große Schulden. Um sie zu")
say("ernähren, muss ich Geld verdienen.")
say_reward(string.format("Es kostet %d Yang.", cost))
else
if sub_set2 == 1 then
say_title("Warpring")
say("Ich teleportiere dich dorthin.")
wait()
if empire == 1 then
pc.warp(469300,964200)
elseif empire == 2 then
pc.warp(55700,157900)
elseif empire == 3 then
pc.warp(969600,278400)
end
elseif sub_set2 == 2 then
say_title("Warpring:")
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
pc.changegold(-cost)
end
end
end
end -- end_of_chat
end -- end_of_state
end -- end_of_quest
ist die kaputt?
state start begin
when 70007.use with pc.get_level() >= 10 begin
say_title("Warpring:")
say("Hallo, ich bin der Warpring!")
say("Ich freue mich, dass du mich gekauft hast.")
say("Ich biete dir viele Teleportmöglichkeiten,")
say("mit nur wenigen kleinen Klicks.")
say("Möchtest du wirklich teleportiert werden?")
local main_set = select("Ja","Nein")
if main_set == 2 then
return
end
if pc.get_level() <= 10 then
say_title("Warpring:")
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()
local cost = math.floor(level / 5) * 1000
if cost < 1000 then
cost = 1000
end
say_title("Warpring:")
say("Wohin möchtest du teleportiert werden?")
say_reward(string.format("Das kostet dich %d Yang.", cost))
if map == 1 or map == 3 or map == 21 or map == 23 or map == 43 then
local guild_map_names = {
"Jungrang",
"Waryong",
}
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,"Abbrechen")
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", "Abbrechen")
if sub_set == 7 then -- ??
return
end
if sub_set == 6 then -- ??
say_title("Warpring:")
say("Wohin möchtest du teleportiert warden?")
say_reward(string.format("Das kostet dich %d Yang.", cost))
sub_set = select("Doyyumhwaji", "Dämonenturm", "Roter Wald", "Kuahklo Dong", "Hwang-Tempel", "Zurück", "Abbrechen") + 5
if sub_set == 12 then -- ??
return
end
if sub_set == 11 then -- ??
say_title("Warpring:")
say("Wohin möchtest du teleportiert werden?")
say_reward(string.format("Das kostet dich %d Yang.", cost))
sub_set = select(guild_map_name, "Tal von Seungryong", "Yongbi-Wüste", "Berg Sohan", empire_castle,"Andere Gebiete")
if sub_set == 6 then -- ??
--- l
say_title("Warpring:")
say("Wohin möchtest du teleportiert werden?") say_reward(string.format("Die Reise kostet %d Yang.", cost))
sub_set = select("Doyyumhwaji", "Dämonenturm", "Roter Wald", "Kuahklo Dong", "Hwang-Tempel", "Abbrechen") + 5
if sub_set == 11 then -- ??
return
end
end
end
end
end
if pc.gold < cost then
say_title("Teleporter:")
say("Du hast nicht genug Geld,")
say("Ich würde dich auch kostenlos teleportieren,")
say("aber ich habe große Schulden. Um sie zu")
say("ernähren, muss ich Geld verdienen.")
say_reward(string.format("Es kostet %d Yang.", cost))
return
end
pc.changegold(-cost)
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 },
},
-- red_forest
{
{ 1119900, 70800 },
{ 1119900, 70800 },
{ 1119900, 70800 },
},
-- spider
{
{ 85000, 525000 },
{ 85000, 525000 },
{ 85000, 525000 },
},
--tempel
{
{ 553600, 143600 },
{ 553600, 143600 },
{ 553600, 143600 },
},
}
test_chat(warp[sub_set][empire][1]..warp[sub_set][empire][2])
say_title("Warpring:")
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 pc.gold < cost then
say_title("Warpring:")
say("Ich würde dich auch umsonst teleportieren,")
say("aber ich habe große Schulden. Um sie zu")
say("ernähren, muss ich Geld verdienen.")
say_reward(string.format("Es kostet %d Yang.", cost))
else
if sub_set2 == 1 then
say_title("Warpring")
say("Ich teleportiere dich dorthin.")
wait()
if empire == 1 then
pc.warp(469300,964200)
elseif empire == 2 then
pc.warp(55700,157900)
elseif empire == 3 then
pc.warp(969600,278400)
end
elseif sub_set2 == 2 then
say_title("Warpring:")
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
pc.changegold(-cost)
end
end
end
end -- end_of_chat
end -- end_of_state
end -- end_of_quest
ist die kaputt?
11/25/2013 14:37
Yiv#9303
Eigentlich kann ich recht gut questen, jedoch unterläuft mir scheinbar hier ein Fehler:
Fehler (syserr -> Channel1):
Wer kann helfen? :o
MfG
PHP Code:
quest kill_test begin
state start begin
when kill with npc.is_pc() begin
local vid = npc.get_vid()
chat("<Development> VID: "..vid)
local old_pc = pc.select(vid)
if old_pc != 0 then
chat("<Development> Player ID: "..pc.get_player_id())
pc.select(old_pc)
end
end
end
end
Code:
SYSERR: Nov 25 14:35:46 :: RunState: LUA_ERROR: [string "kill_test"]:1: attempt to call field `get_vid' (a nil value) SYSERR: Nov 25 14:35:46 :: WriteRunningStateToSyserr: LUA_ERROR: quest kill_test.start click
MfG
11/26/2013 21:23
.Destro™#9304
Ich will auch so wie der Despero das dieQuote:
Ich habe eben mal Mijagos Ranglist Quest per Letter gemacht.. aber [GM] [SA]´s usw werden alle mit eingetragen .. :(
PHP Code:quest ingamerank15 begin
state start begin
when login begin
set_state(information)
end
end
state information begin
when letter begin
send_letter("Top 15 Rangliste by Mijago")
end
when button or info begin
say_title("Top 15 Rangliste")
local sel = select("Global","Rotes Reich","Gelbes Reich","Blaues Reich","Abbruch")
local pp
if sel == 5 then
return
elseif sel == 1 then
pp = mysql_query("select name,level from player.player ORDER BY level desc,exp desc,name asc LIMIT 15")
else
pp = mysql_query("select name,level from player.player where (SELECT empire from player.player_index where player.account_id =id) = "..(sel-1).." ORDER BY level desc,exp desc,name asc LIMIT 15")
end
if pp == nil or (pp[1] or {})[1] == nil then
say("Es gab einen Fehler.")
return
end
say("Rang - Name - Level")
table.foreachi(pp,function(i,l)
say(i.." - "..l[1].." - "..l[2])
end)
end
end
end
[GM]S usw nicht angezeigt werden .
#push
11/26/2013 23:11
Jоe#9305
Hast du den quest Befehl (npc.get_vid()) auch richtig in die Game gepatcht?Quote:
quest kill_test begin
state start begin
when kill with npc.is_pc() begin
local vid = npc.get_vid()
chat("<Development> VID: "..vid)
local old_pc = pc.select(vid)
if old_pc != 0 then
chat("<Development> Player ID: "..pc.get_player_id())
pc.select(old_pc)
end
end
end
end
Wer kann helfen? :oCode:SYSERR: Nov 25 14:35:46 :: RunState: LUA_ERROR: [string "kill_test"]:1: attempt to call field `get_vid' (a nil value) SYSERR: Nov 25 14:35:46 :: WriteRunningStateToSyserr: LUA_ERROR: quest kill_test.start click
MfG
Probier alternativ mal den pc.get_vid() Befehl.
Dann musst du den Query anpassen, bspw:Quote:
[GM]S usw nicht angezeigt werden .
#push
pp = mysql_query("select name,level from player.player where name != "[GM]" and name != "[SGM]" ORDER BY level desc,exp desc,name asc LIMIT 15")
11/27/2013 22:49
StyleZz1995#9306
Kann mir jemand bei der Quest Helfen ?
Mein Problem ist das es im Virtualbox immer ein Fehler anzeigt mit "end" immer.
Ich habe die Quest bissel bearbeitet sodas man das Event erst starten kann,
wenn man das richtige passwort hat.
Zumintest so soll sie Funktionieren :D
Mein Problem ist das es im Virtualbox immer ein Fehler anzeigt mit "end" immer.
Ich habe die Quest bissel bearbeitet sodas man das Event erst starten kann,
wenn man das richtige passwort hat.
Zumintest so soll sie Funktionieren :D
PHP Code:
quest item_drop begin
state start begin
when 20095.chat."Item_Drop" with pc.is_gm() begin
say("Der Laden ist aus sicherheit")
say("Passwort Geschützt")
say("Wenn du das Richtige Passwort hast,")
say("dann kannst du den Laden Benutzen.")
local y = input()
if y == "12345" then
if game.get_event_flag("item_open") == 0 then
say("Hallo "..pc.get_name().." hier kannst")
say("ein Item Drop Event starten")
say("Willst du das tun?")
if select("Ja","Nein") == 2 then return end
say("Bitte gib an welches Item gedroppt werden soll.")
kill_item = tonumber(input()) or 0
if kill_item == 0 then
say("Du musst schon was eingeben.")
return
end
say("Gibt bitte ein wie die Chance zu 100 sein soll das es gedroppt wird ?")
kill_prozent = tonumber(input()) or 0
if kill_prozent == 0 then
say("Du musst schon was eingeben")
return
end
say("Bitte gib an wie lange Das Event laufen soll ( in Minuten ) ")
zeit = tonumber(input()) or 0
if zeit == 0 then
say("Falsche eingabe")
return
end
game.set_event_flag("item_time", get_time()+zeit*60)
game.set_event_flag("item_open", 1)
notice_all("Das Item Drop Event wurde gestartet")
notice_all("Man kann das item "..item_name(kill_item).." von allen Monster droppen.")
notice_all("Für "..zeit.." Minute(n)")
else
say("Item Drop Event ist derzeit schon aktiv")
say("Beenden?")
if select("Ja", "Nein")==2 then return end
game.set_event_flag("item_open", 0)
kill_prozent, kill_item = nil, nil
end
end
when kill with game.get_event_flag("item_open") == 1 and not npc.is_pc() begin
if kill_prozent == nil then game.set_event_flag("item_open", 0) return end
if game.get_event_flag("item_time") < get_time() then
notice_all("Das Item Drop Event ist vorbei")
notice_all("Wir hoffen ihr hattet euren Spaß beim Farmen.")
notice_all("Euer UniversalMt2-Team.")
game.set_event_flag("item_open", 0)
kill_prozent, kill_item = nil, nil
return
end
local s=number(1, 101-kill_prozent)
if s==1 then
game.drop_item_with_ownership(kill_item, 1)
end
end
when login with game.get_event_flag("item_open") == 1 begin
notice("Das Item Drop Event laeuft du kannst das")
notice("Item "..item_name(kill_item).." von allen Monstern droppen")
say("Richtiges Passwort")
else
say("Falsches Passwort")
end
else
return
else
end
end
end
end
11/28/2013 12:11
x'Radon#9307
Würde die Quest so gehen?
Gibt keinen Fehler aus aber will wissen ob sie so gehen würde(Habe keinen Server zum testen)
Grüße
PHP Code:
quest spielminuten_rangliste begin
state start begin
when 9003.chat."Spielminuten Rangliste" begin
say_title("Spielminuten Rangliste")
pp = mysql_query("select name,playtime from player.player ORDER BY playtime desc,level desc,name asc")
if pp == nil or (pp[1] or {})[1] == nil then
say("Es gab einen Fehler.")
return
end
say("Rang - Name - Spielminuten")
table.foreachi(pp,function(i,l)
say(i.." - "..l[1].." - "..l[2])
end)
end
when login or levelup begin
local zeit = mysql_query("select playtime from play.player")
end
when login or levelup with zeit >= 100 begin
say_title("Blaaaa")
say("bla")
say("bla")
say("bla")
say("bla")
say("bla")
say("bla")
say("")
say_reward("Belohnung")
pc.give_item2(19, 1)
set_state("go")
end
end
state go begin
when login or levelup with zeit >= 200 begin
say_title("Blaaaa")
say("bla")
say("bla")
say("bla")
say("bla")
say("bla")
say("bla")
say("")
say_reward("Belohnung")
pc.give_item2(19, 1)
set_state("go1")
end
end
state go1 begin
when login or levelup with zeit >= 300 begin
say_title("Blaaaa")
say("bla")
say("bla")
say("bla")
say("bla")
say("bla")
say("bla")
say("")
say_reward("Belohnung")
pc.give_item2(19, 1)
set_state("go2")
end
end
state go2 begin
end
end
Grüße
11/28/2013 13:13
#Saiirex#9308
PHP Code:
when 71118.use begin
if pc.get_level() >=35 then
chat("Du hast nun einen Weißen Löwen als Reittier!")
chat("Dein Angriff und deine Verteidigung steigen um 200 Punkte!")
affect.remove_collect()
pc.mount(20114, 200000)
pc.mount_bonus(apply.ATT_GRADE_BONUS,200,200000)
pc.mount_bonus(apply.DEF_GRADE_BONUS,200,200000)
end
end
11/28/2013 15:23
.SliceR#9309
Ich habe mich gestern Abend dazu entschlossen ein Premium-System in meinen Server reinzuhauen. Nun stoße ich aber auf ein Problem..
Das Premium-Zeichen erscheint über dem Kopf wenn ich den Premium-Status aktiviere. Anfangs hats schon nicht mal mehr geklappt wenn ich eine Rüstung ausgezogen habe, schon war das Zeichen weg. Dann hab ich ne kleine Funktion rein gebastelt, damit er jetzt immer kontrolliert ob die Rüstung an-/aus gezogen wird. Dann erscheint das Zeichen wieder. Wenn ich jedoch die Rüstung ganz schnell an- und aus ziehe ist das Zeichen wieder weg.
Das Gleiche passiert auch wenn ich auf ein Mount steige. Weg iss'es.
Die Quest:
Danke im voraus ;)
Peace ;)
Das Premium-Zeichen erscheint über dem Kopf wenn ich den Premium-Status aktiviere. Anfangs hats schon nicht mal mehr geklappt wenn ich eine Rüstung ausgezogen habe, schon war das Zeichen weg. Dann hab ich ne kleine Funktion rein gebastelt, damit er jetzt immer kontrolliert ob die Rüstung an-/aus gezogen wird. Dann erscheint das Zeichen wieder. Wenn ich jedoch die Rüstung ganz schnell an- und aus ziehe ist das Zeichen wieder weg.
Das Gleiche passiert auch wenn ich auf ein Mount steige. Weg iss'es.
Die Quest:
Danke im voraus ;)
Peace ;)
11/29/2013 20:11
tarif123#9310
ist net meine quest hat mir einer in der quest erstellung gegeben also ich hab die quest EINGEFÜGT GEHT AUCH ALLES INGAME mach ich beim item rechtsklick geht noch bis hier hin dann stand da dein name ist zu groß ich soll ein neuen schreiben hab ich auch egal dann stand da du wirst in 10-20 min zum premium user werde ich aber net warte schon 2 tage glaube ich die quest:
Code:
quest vipname begin
state start begin
when 70021.use begin
say_title("Hallo "..pc.get_name().."!")
say("Mit diesem Item kannst du den (PU) Status aktivieren.")
say("")
say("")
say("Möchtest du?")
say(pc.get_name(), " -----------> (PU)", pc.get_name())
local aw = select("Ja", "Nein")
if aw == 2 then
say("Ok, trotzdem noch viel Spaß auf dem Server.")
end
zahl = string.len(pc.get_name())
if aw == 1 and zahl <= 7 then
mysql_query("UPDATE player.player SET name='[PU]"..pc.get_name().."' WHERE name='"..pc.get_name().."'")
say_title("Erfolgreich!")
say("Herzlichen Glückwunsch, du bist nun PU auf")
say("Servername!")
say("")
say("")
say("Info")
say_reward("Die Änderung des (PU) kann 10-20 Minuten dauern.")
notice_all(pc.get_name()," ist nun PU auf Servername")
elseif zahl > 7 then
say_title("Dein Name!")
say("Dein Name ist zu lang. Du hast ", zahl, ".")
say("Er darf nicht mehr als 7 Buchstaben haben.")
say("Es könnte sonst zum verschlingen von Buchtstaben")
say("kommen, z.B. Apfelsaftx3 --> (PU)Apfelsaft")
say("")
say("")
say_reward("Möchtest du ihn ändern um PU zuwerden?")
local a = select("Ja", "Nein")
if a == 2 then
return
end
say_title("Name wechseln")
say("Gib bitte deinen Wunschnamen ein:")
say_reward("Beachte! Nicht mehr als 7 Buchstaben.")
local inp = input()
if string.len(inp) > 7 or inp == "" then
say("Dein neuer Name hat mehr als 7 Buchstaben.")
say("Tut mir echt leid. Es sind ", string.len(inp), ".")
return
else
say_title("Ok")
say("Dein Name erfüllt alle Voraussetzungen.")
say("")
say("Letzter Check, möchtest du wirklich mit dem")
say("Namen (PU)", inp," dein pu status aktivieren?")
local b = select("Ja", "Nein")
if b == 2 then
say("Ok, trotzdem noch viel Spaß auf dem Server.")
else
mysql_query("UPDATE player.player SET name='[PU]"..inp.."' WHERE name='"..pc.get_name().."'")
say_title("Erfolgreich!")
say("Herzlichen Glückwunsch, du bist nun PU auf")
say("Servername!")
say("")
say("")
say("Info")
say_reward("Die Änderung des (PU) kann 10-20 Minuten dauern.")
notice_all(inp," ist nun PU auf Servername")
end
end
end
end
end
end
11/30/2013 04:11
rollback#9311
Das ist jetzt das erste mal, das ich eine Quest selber schreibe und wollte jetzt erstmal wissen, ob immerhin der Anfang richtig ist.
Gewollt ist, dass wenn man Lv 30 erreicht ein Textfenster aufgeht wo man sich dann für eine Questreihe entscheiden muss.
Gewollt ist, dass wenn man Lv 30 erreicht ein Textfenster aufgeht wo man sich dann für eine Questreihe entscheiden muss.
PHP Code:
quest bio begin
state start begin
when pc.get_level()>=30 begin
say_title("Eine wichtige Entscheidung")
say("Hallo "..pc.get_name()..",")
say("Du hast Level 30 erreicht.")
say("Du musst dich jetzt für den weiteren Verlauf")
say("deiner Ausbildung entscheiden. Du kannst zwischen")
say("zwei Bereichen wählen.")
say("Entweder entscheidest du dich dafür, im Kampf")
say("gegen starke Monster besser zu werden,")
say("oder andere Spieler in die Knie zu zwingen.")
say("Entscheide dich jetzt!")
local aw = select("PVM", "PVP")
if aw == 2 then
say("Du hast dich für die Ausbildung gegen Monster")
say("entschieden!")
begin
--- Hier kommt PVM BIO rein?! ---
if aw == 1 then
say("Du hast dich für die Ausbildung gegen Spieler")
say("entschieden!")
begin
--- Hier kommt PVP BIO rein?! ---
11/30/2013 10:32
x'Radon#9312
@[Sensemann]
PHP Code:
quest bio begin
state start begin
when login or levelup with pc.get_level() >=30 begin
say_title("Eine wichtige Entscheidung")
say("Hallo "..pc.get_name()..",")
say("Du hast Level 30 erreicht.")
say("Du musst dich jetzt für den weiteren Verlauf")
say("deiner Ausbildung entscheiden. Du kannst zwischen")
say("zwei Bereichen wählen.")
say("Entweder entscheidest du dich dafür, im Kampf")
say("gegen starke Monster besser zu werden,")
say("oder andere Spieler in die Knie zu zwingen.")
say("Entscheide dich jetzt!")
local aw = select("PVM", "PVP")
if aw == 2 then
say("Du hast dich für die Ausbildung gegen Monster")
say("entschieden!")
set_state("pvm")
send_letter("PVM")
end
--- Hier kommt PVM BIO rein?! ---
if aw == 1 then
say("Du hast dich für die Ausbildung gegen Spieler")
say("entschieden!")
set_state("pvp")
send_letter("pvp")
end
--- Hier kommt PVP BIO rein?! ---
end
end
state pvm begin
when button or info begin
say_title("Test")
say("Test")
say("Test")
end
end
state pvp begin
when button or info begin
say_title("Test")
say("Test")
say("Test")
end
end
end
11/30/2013 11:25
barisakar#9313
Hello,
This quest have no error but when i set time and 5min later server AUTH closed. Why i dont know, please help me.
This quest have no error but when i set time and 5min later server AUTH closed. Why i dont know, please help me.
PHP Code:
quest gunluksaat begin
state start begin
when login with pc.is_gm() begin
send_letter("GM:Saat ayari")
end
when button or info begin
say_title("Saati giriniz.")
local saat = input()
game.set_event_flag(saatimiz, saat)
say_title("Dakikayı giriniz.")
local dakika = input()
game.set_event_flag(dakikamiz, dakika )
server_loop_timer("sayac",60)
end
when sayac.server_timer begin
game.set_event_flag(dakikamiz, dakikamiz +1 )
end
when login or levelup or logout with game.get_event_flag("dakikamiz") == 60 begin
game.set_event_flag(saatimiz, saatimiz +1 )
game.set_event_flag(dakikamiz, 0 )
end
when login or levelup or logout with game.get_event_flag("saatimiz") == 24 begin
game.set_event_flag(saatimiz, 0 )
end
when 20087.chat."Saat kaç?" begin
say_title("Merhaba")
say("Saat şuan "..game.set_event_flag(saatimiz, saatimiz)..":"..game.set_event_flag(dakikamiz, dakikamiz).."")
end
end
end
12/01/2013 00:09
ExoBiTe™#9314
Magischer Stein
Hey ich habe eine Quest geschrieben bin da auch noch relativ neu in dem Gebiet,
könnt ihr mir den Fehler sagen?
Hey ich habe eine Quest geschrieben bin da auch noch relativ neu in dem Gebiet,
könnt ihr mir den Fehler sagen?
Code:
quest Magiestein begin
state start begin
when blacksmith.chat."Magischer Stein" begin
say_title("Magischer Stein")
say("Hallo! Wenn du willst das ich dir")
say("einen Magischen Stein herstellen")
say("soll, bringe mir bitte einen")
say("Regenbogenstein, und eine")
say("Segenschriftrolle!")
say("")
say_title("Soll ich dir einen herstellen?")
local s = select("Ja", "Nein")
if s == 1 then
if pc.count_item(25040) >= 1 and if pc.count_item(50512) >= 1 then
pc.remove_item(25040, 1)
pc.remove_item(50512, 1)
pc.give_item2(39001, 1)
say_title("Magischer Stein")
say("Ich habe den Stein erfolgreich")
say("hergestellt! Viel Spaß damit!")
say_reward(" Du hast einen Magischen Stein erhalten!")
end
end
if pc.count_item(25040) < 0
say_title("Magischer Stein")
say("Du hast keine Segenschriftrolle!")
say("")
end
end
if pc.count_item(50512) < 0
say_title("Magischer Stein")
say("Du hast keinen Regenbogenstein!")
say("")
end
end
end
end
end
end