Problem mit Quest
Quest Thema:
Die Quest die nicht Funktioniert.
Code:
--------------------------------------
-- written by Kilroy. --
-- Benötigt Questlib Erweit. Mijago --
--------------------------------------
quest vip_return_login_shop begin
state start begin
when 20011.take with item.get_vnum()== 35004 and pc.getqf("is_vip") == 1 begin
say("Sehr Gut, du konntest dich mit deinem")
say("VIP-Ticket ausweisen, ich gewähre")
say("dir somit Einblick in den VIP-Shop")
wait()
setskin(NOWINDOW)
npc.open_shop(9003) -- natürlich Anpassen.
end
when 20009.take with item.get_vnum()== 35004 and pc.getqf("is_vip") == 1 begin
say("Sehr Gut, du konntest dich mit deinem")
say("VIP-Ticket ausweisen.")
say("")
say("Soll ich dich also zur VIP-Map bringen?")
if select("Ja", "Nein")==2 then return end
pc.warp( 402100, 673900) -- natürlich Anpassen.
end
when login with not npc.is_pc() and pc.getqf("is_vip") == 1 begin
timer("login_vip", 2)
end
when login_vip.timer begin
if pc.getqf("first_vip") == 0 then
say_title("VIP-Status")
say("")
say("Da diese Meldung erschienen ist, wurde der")
say("VIP-Vorgang erfolgreich abgeschlossen.")
say("")
say("Dir stehen nun einige Features zu, die andere")
say("Spieler nicht haben.")
wait()
say_title("VIP-Status")
say("")
say("Nun erhälst du erstmal weitere Informationen.")
say("")
say("Wie du bestimmt bemerkt hast, schwebt")
say("über dir ein VIP-Symbol, dieses kannst du")
say("durch die Chateingabe von (vip) rufen.")
say("")
say("Sehr Wichtig")
say_reward("- Nicht mehrmals das (vip) rufen.")
say("")
say("Solltest du mehrmals (vip) eingeben und")
say("somit mehr VIP Zeichen über dem Kopf haben")
say("werden alle deine Accounts gebannt!")
pc.setqf("first_vip", 1)
notice_all("Das VIP-Mitglied "..pc.get_name().. " ist Online!")
else
notice_all("Das VIP-Mitglied "..pc.get_name().. " ist Online!")
end
end
when 35002.use begin
if pc.getqf("is_vip") == 0 then
say_title("Hallo "..pc.get_name().."!")
say("Mit diesem Item kannst du den VIP Status aktivieren.")
say("")
say_title("Infos:")
say("Du wirst nach Aktivierung ausgeloggt!")
say("Du hast dann einen 20 Min block, nach der ")
say("Umstellungszeit ist dein Account wieder frei und")
say("du kannst dich einloggen!")
say("")
say("")
say("Möchtest du?")
say(pc.get_name(), " --------> (VIP)", pc.get_name())
if select("Ja", "Nein")==2 then return end
if string.len(pc.get_name())<= 7 and tonumber(mysql_query("select count(*) from player.player where name = '[VIP]"..pc.get_name().."';")[1][1]) == 0 then
if pc.is_married() then
say("Während du verheiratet bist kannst du")
say("kein VIP werden.")
return
elseif pc.is_polymorphed() then
say("Während du verwandelt bist kannst du")
say("kein VIP werden.")
return
elseif not pc.can_warp() then
say("Du hast vorkurzem gehandelt, so kannst du")
say("kein VIP werden.")
return
elseif pc.has_guild() then
say("Während du in einer Gilde bist kannst du")
say("kein VIP werden.")
return
elseif party.is_party() then
say("Während du in einer Gruppe bist kannst du")
say("kein VIP werden.")
return
elseif pc.count_item(35002) < 1 then
say("Buguser griegen kein VIP!")
return
end
say_title("Erfolgreich!")
say_reward("Du wirst nun ausgeloggt und bist 20Min")
say_reward("geblockt damit die Änderung zu (VIP)")
say_reward("abgeschlossen werden kann.")
wait()
-- ÃÖ°í±Þ °í´ëÀÇ Èæ·æ¼®
notice_all(pc.get_name(), " ist nun ein VIP-Mitglied auf Myruma2 - Evolution")
mysql_query("UPDATE player.player SET name='[VIP]"..pc.get_name().."' WHERE name='"..pc.get_name().."'")
mysql_query("UPDATE account.account SET availDt = NOW() + INTERVAL 20 MINUTE WHERE id = (SELECT account_id FROM player.player WHERE name='[VIP]"..pc.get_name().."');")
item.remove()
pc.setqf("is_vip", 1)
cmdchat("exit")
-- ÃÖ°í±Þ °í´ëÀÇ Èæ·æ¼®
else
say_title(pc.get_name().."!")
say("")
say("Die Vorraussetzungen zwingen dich einen")
say("neuen Namen zuwählen. Mögliche Gründe")
say("sind ein zu langer Name oder das dein")
say("Name mit VIP bereits existiert.")
say("")
say_reward("Möchtest du ihn ändern um VIP zuwerden?")
if select("Ja", "Nein")==2 then return end
say_title("Name wechseln")
say("Gib bitte deinen Wunschnamen ein:")
say_reward("Beachte!")
say_reward("Nicht mehr als 7 oder weniger als 2 Buchstaben.")
say_reward("Sonderzeichen sind nicht erlaubt.")
local inp = input()
if string.len(inp) > 7 or inp == "" or string.len(inp) < 2 or string.find(inp, "(%W)") ~= nil then
say("Dein neuer Name besitzt entweder mehr als 7,")
say("weniger als 2 Buchstaben oder enthält ein")
say("unzulässiges Zeichen")
return
elseif tonumber(mysql_query("select count(*) from player.player where name = '[VIP]"..inp.."';")[1][1]) >= 1 then
say("Dieser Name existiert bereits,")
say("versuch es mit einem neuen erneut!")
return
end
say_title("Super!")
say("Dein Name erfüllt alle Voraussetzungen.")
say("")
say_title("Letzter Check")
say("Möchtest du wirklich mit dem Namen")
say("(VIP)", inp," dein vip status aktivieren?")
if select("Ja", "Nein")==2 then return end
if pc.is_married() then
say("Während du verheiratet bist kannst du")
say("kein VIP werden.")
return
elseif pc.is_polymorphed() then
say("Während du verwandelt bist kannst du")
say("kein VIP werden.")
return
elseif not pc.can_warp() then
say("Du hast vorkurzem gehandelt, so kannst du")
say("kein VIP werden.")
return
elseif pc.has_guild() then
say("Während du in einer Gilde bist kannst du")
say("kein VIP werden.")
return
elseif party.is_party() then
say("Während du in einer Gruppe bist kannst du")
say("kein VIP werden.")
return
elseif pc.count_item(35002) < 1 then
say("Buguser griegen kein VIP!")
return
end
say_title("Erfolgreich!")
say_reward("Du wirst nun ausgeloggt und bist 20 Min")
say_reward("geblockt damit die Änderung zu (VIP)")
say_reward("abgeschlossen werden kann.")
wait()
-- ÃÖ°í±Þ °í´ëÀÇ Èæ·æ¼®
notice_all(pc.get_name(), " heißt jetzt ", inp, " und ist nun ein VIP-Mitglied auf Myruma2 - Evolution")
mysql_query("UPDATE player.player SET name='[VIP]"..inp.."' WHERE name='"..pc.get_name().."'")
mysql_query("UPDATE account.account SET availDt = NOW() + INTERVAL 20 MINUTE WHERE id = (SELECT account_id FROM player.player WHERE name='[VIP]"..inp.."');")
item.remove()
pc.setqf("is_vip", 1)
cmdchat("exit")
-- ÃÖ°í±Þ °í´ëÀÇ Èæ·æ¼®
end
else
say_title("Hallo "..pc.get_name().."!")
say("Du hast dein VIP-Status schon aktiviert,")
say("sollte dies nicht der Fall sein, kontaktiere")
say("bitte einen Teamler.")
say("")
say("Viel Spaß weiterhin!")
end
end
when 35003.use begin
if pc.getqf("is_vip") == 1 then
say_title("Hallo "..pc.get_name().."!")
say("Mit diesem Item kannst du den VIP Status")
say("zurücksetzen..")
say("")
say_title("Infos:")
say("Du wirst nach reAktivierung ausgeloggt!")
say("Du hast dann einen 20Min block, nach der ")
say("Umstellungszeit ist dein Account wieder frei und")
say("du kannst dich einloggen!")
say("")
say("")
say("VIP Status zurücksetzen?")
say("(VIP)", pc.get_name(), "---->", pc.get_name())
if select("Ja", "Nein")==2 then return end
if pc.is_married() then
say("Während du verheiratet bist kannst du")
say("kein VIP werden.")
return
elseif pc.is_polymorphed() then
say("Während du verwandelt bist kannst du")
say("kein VIP werden.")
return
elseif not pc.can_warp() then
say("Du hast vorkurzem gehandelt, so kannst du")
say("kein VIP werden.")
return
elseif pc.has_guild() then
say("Während du in einer Gilde bist kannst du")
say("kein VIP werden.")
return
elseif party.is_party() then
say("Während du in einer Gruppe bist kannst du")
say("kein VIP werden.")
return
elseif pc.count_item(35003) < 1 then
say("Bugusern wird kein VIP entzogen!")
return
end
spl = split(pc.get_name(), "VIP]") -- Split Name bei VIP]
if tonumber(mysql_query("select count(*) from player.player where name = '"..spl[2].."';")[1][1]) == 0 then
say_title("Erfolgreich!")
say_reward("Du wirst nun ausgeloggt und bist 20Min")
say_reward("geblockt damit die Änderung ")
say_reward("abgeschlossen werden kann.")
wait()
-- ÃÖ°í±Þ °í´ëÀÇ Èæ·æ¼®
spl = split(pc.get_name(), "VIP]")
mysql_query("UPDATE player.player SET name='"..spl[2].."' WHERE name='"..pc.get_name().."'")
mysql_query("UPDATE account.account SET availDt = NOW() + INTERVAL 20 MINUTE WHERE id = (SELECT account_id FROM player.player WHERE name='"..spl[2].."');")
item.remove()
pc.setqf("is_vip", 0)
cmdchat("exit")
-- ÃÖ°í±Þ °í´ëÀÇ Èæ·æ¼®
else
say_title("Dein Name!")
say("Es scheint so als würde dein Name.")
say("ohne das (VIP) bereits existieren,")
say("das ist aber nicht schlimm, denn du kannst")
say("ihn hier und jetzt ändern.")
say("")
say_reward("Möchtest du ihn ändern um VIP loszuwerden?")
if select("Ja", "Nein")==2 then return end
say_title("Name wechseln")
say("Gib bitte deinen Wunschnamen ein:")
say_reward("Beachte!")
say_reward("Nicht mehr als 7 oder weniger als 2 Buchstaben.")
say_reward("Sonderzeichen sind nicht erlaubt.")
local inp = input()
if string.len(inp) > 7 or inp == "" or string.len(inp) < 2 or string.find(inp, "(%W)") ~= nil then
say("Dein neuer Name besitzt entweder mehr als 7,")
say("weniger als 2 Buchstaben oder enthält ein")
say("unzulässiges Zeichen")
return
elseif tonumber(mysql_query("select count(*) from player.player where name = '"..inp.."';")[1][1]) == 0 then
say("Ich habe festgestellt das dein neuer Name bereits")
say("existiert, versuch es mit einem neuen erneut!")
return
end
say_title("Super!")
say("Dein Name erfüllt alle Voraussetzungen.")
say("")
say_title("Letzter Check")
say("Möchtest du wirklich mit dem Namen")
say(inp," dein vip status reaktivieren?")
if select("Ja", "Nein")==2 then return end
if pc.is_married() then
say("Während du verheiratet bist kannst du")
say("kein VIP werden.")
return
elseif pc.is_polymorphed() then
say("Während du verwandelt bist kannst du")
say("kein VIP werden.")
return
elseif not pc.can_warp() then
say("Du hast vorkurzem gehandelt, so kannst du")
say("kein VIP werden.")
return
elseif pc.has_guild() then
say("Während du in einer Gilde bist kannst du")
say("kein VIP werden.")
return
elseif party.is_party() then
say("Während du in einer Gruppe bist kannst du")
say("kein VIP werden.")
return
elseif pc.count_item(35003) < 1 then
say("Bugusern wird kein VIP entzogen!")
return
end
say_title("Erfolgreich!")
say_reward("Du wirst nun ausgeloggt und bist 20Min")
say_reward("geblockt damit die Änderung")
say_reward("abgeschlossen werden kann.")
wait()
-- ÃÖ°í±Þ °í´ëÀÇ Èæ·æ¼®
spl = split(pc.get_name(), "VIP]")
mysql_query("UPDATE player.player SET name='"..inp.."' WHERE name='"..pc.get_name().."'")
mysql_query("UPDATE account.account SET availDt = NOW() + INTERVAL 20 MINUTE WHERE id = (SELECT account_id FROM player.player WHERE name='"..inp.."');")
item.remove()
pc.setqf("is_vip", 0)
cmdchat("exit")
-- ÃÖ°í±Þ °í´ëÀÇ Èæ·æ¼®
end
else
say_title("Hallo "..pc.get_name().."!")
say("Du hast deinen VIP-Status")
say("noch garnicht aktiviert.")
end
end
end
end
--------------------------------------
-- written by Kilroy. --
-- Benötigt Questlib Erweit. Mijago --
--------------------------------------
Wenn man dann auf ja drücken möchte damit der VIP Status Aktiviert wird geht es einfach zu und nichts passiert.
