PHP Code:
------------------------------------------------------
-- Geldstand
------------------------------------------------------
quest Yangbank begin
state start begin
when 50084.chat."Yangkonto" begin
local pin = pc.getqf("konto_pin")
local konto_yang = pc.getqf("konto_yang")
if pin == 0 then
--------------------------- PIN FESTLEGEN! ---------------------------
say_title(mob_name(50084).. " spricht zu ".. pc.get_name() ..".")
say("")
say("Hallo. Ich bin die Bank.")
say("Da du das erste mal mit mir sprichst möchte")
say("Ich dich bitten deine Pin fest zu legen.")
say("Nur eine Sichere 5 stellige Pin stellt")
say("sicher das dein Konto vor Dieben sicher")
say("ist.")
say("")
say_reward("Bitte 5 stellige Pin eingeben (Nur Zahlen)")
local pin_eing = tonumber(input("12345"))
if pin_eing > 9999 and pin_eing < 100000 then
say_title(mob_name(50084).. " spricht zu ".. pc.get_name() ..".")
say("")
say("Diese Pin ist ok!")
say("")
say_reward("Pin " ..pin_eing.. " Speichern?")
local sel=select("Ja", "Nein")
if sel==1 then
pc.setqf("konto_pin", pin_eing)
say_title(mob_name(50084).. " spricht zu ".. pc.get_name() ..".")
say("")
say("Pin wurde gespeichert.")
say("Bis bald mal.")
elseif sel==2 then
say_title(mob_name(50084).. " spricht zu ".. pc.get_name() ..".")
say("")
say("Bis bald mal.")
else
-- Fehler abfangen!
say("Unbekannter Fehler!")
say("Bitte umgehend mit ihren")
say("Fehler Code beim Serverleiter")
say("melden!")
say("Fehler Code: 1")
end
elseif pin_eing > 99999 or pin_eing == 0 or pin_eing < 10000 then
say_title(mob_name(50084).. " spricht zu ".. pc.get_name() ..".")
say("")
say("Tut mir leid doch irgendwas stimmt nicht mit")
say("deiner Pin.")
say("")
say_reward("Info: Pin darf nur Zahlen enthalten!")
say_reward("Info: Pin darf nicht größer als 99999")
say_reward("oder kleiner als 10000 sein!")
else
-- Fehler abfangen!
say("Unbekannter Fehler!")
say("Bitte umgehend mit ihren")
say("Fehler Code beim Serverleiter")
say("melden!")
say("Fehler Code: 2")
end
else
--------------------------- PIN VORHANDEN! ---------------------------
say_title(mob_name(50084).. " spricht zu ".. pc.get_name() ..".")
say("")
say("Hallo. Ich bin das Yang Lager.")
say("Auch du kannst Geld einzahlen und es wieder abholen.")
say("")
say_reward("Was möchtest du tun?")
say("")
local sel=select("Geld geben", "Geld nehmen", "Konto Abfragen", "Pin ändern", "Nichts")
if sel==1 then
---------------------------GELD GEBEN---------------------------
say_title(mob_name(50084).. " spricht zu ".. pc.get_name() ..".")
say("")
say("Bitte Pin eingeben.")
local pin_abf = tonumber(input(""))
if pin_abf == pc.getqf("konto_pin") then
say_title(mob_name(50084).. " spricht zu ".. pc.get_name() ..".")
say("")
say("Pin ist Korrekt.")
say("Wie viel Geld auf Konto einzahlen?")
say("Maximal 99.999.999.999!")
say("")
say_reward("Dabei: " ..pc.get_money())
say("")
local geld_auf_konto = tonumber(input(""))
local auf_konto_new = tonumber(geld_auf_konto) + pc.getqf("konto_yang")
if pc.get_money() < geld_auf_konto then
say_title(mob_name(50084).. " spricht zu ".. pc.get_name() ..".")
say("")
say("Soviel hast du garnicht dabei.")
else
if auf_konto_new < 999999999999 then
pc.change_money(-geld_auf_konto)
pc.setqf("konto_yang", auf_konto_new)
say_title(mob_name(50084).. " spricht zu ".. pc.get_name() ..".")
say("")
say("Ich habe " ..geld_auf_konto.. " Yang auf dein Konto getan.")
else
say_title(mob_name(50084).. " spricht zu ".. pc.get_name() ..".")
say("")
say("Soviel kannst du nicht aufs Konto.")
say("machen. Das würde die Maximal menge")
say("von 999.999.999.999 überschreiten.")
end
end
else
say_title(mob_name(50084).. " spricht zu ".. pc.get_name() ..".")
say("")
say("Falsche Pin.")
end
elseif sel==2 then
---------------------------GELD ABHEBEN---------------------------
say_title(mob_name(50084).. " spricht zu ".. pc.get_name() ..".")
say("")
say("Bitte Pin eingeben.")
local pin_abf = tonumber(input(""))
if pin_abf == pc.getqf("konto_pin") then
say_title(mob_name(50084).. " spricht zu ".. pc.get_name() ..".")
say("")
say("Pin ist Korrekt.")
say("Wie viel Geld vom Konto abheben?")
say("")
say_reward("Auf Konto: " ..pc.getqf("konto_yang"))
say("")
local geld_von_konto = tonumber(input(""))
if geld_von_konto > pc.getqf("konto_yang") then
say_title(mob_name(50084).. " spricht zu ".. pc.get_name() ..".")
say("")
say("Soviel hast du nicht auf deinem Konto.")
elseif geld_von_konto <= pc.getqf("konto_yang") then
local yang_bug_check = pc.get_money() + geld_von_konto
if yang_bug_check < 2000000000 then
local auf_konto_new = tonumber(pc.getqf("konto_yang") - geld_von_konto)
pc.setqf("konto_yang", auf_konto_new)
pc.change_money(geld_von_konto)
say_title(mob_name(50084).. " spricht zu ".. pc.get_name() ..".")
say("")
say("Ich habe dir " ..geld_von_konto.. " Yang gegeben.")
else
say_title(mob_name(50084).. " spricht zu ".. pc.get_name() ..".")
say("")
say("Soviel kann ich dir nicht geben. Das würde")
say("Dein Yang auf 0 Setzen! (0 YANG BUG)")
end
end
else
say_title(mob_name(50084).. " spricht zu ".. pc.get_name() ..".")
say("")
say("Falsche Pin.")
end
elseif sel==3 then
---------------------------GELD ABFRAGEN---------------------------
say_title(mob_name(50084).. " spricht zu ".. pc.get_name() ..".")
say("")
say("Du möchtest wissen wie viel Yang du auf deinem")
say("Konto hast? Nun gut du hast:")
say("")
say_reward("Yang auf Konto: " ..pc.getqf("konto_yang"))
elseif sel==4 then
---------------------------PIN ÄNDERN---------------------------
say_title(mob_name(50084).. " spricht zu ".. pc.get_name() ..".")
say("")
say("Bitte aktuelle Pin eingeben.")
local pin_abf = tonumber(input(""))
if pin_abf == pc.getqf("konto_pin") then
say_title(mob_name(50084).. " spricht zu ".. pc.get_name() ..".")
say("")
say("Pin ist Korrekt.")
say("Bitte Neue Pin eingeben. (Nur Zahlen)")
local pin_eing = tonumber(input("12345"))
if pin_eing > 9999 and pin_eing < 100000 then
say_title(mob_name(50084).. " spricht zu ".. pc.get_name() ..".")
say("")
say("Diese Pin ist ok!")
say("")
say_reward("Pin " ..pin_eing.. " Speichern?")
local sel=select("Ja", "Nein")
if sel==1 then
pc.setqf("konto_pin", pin_eing)
say_title(mob_name(50084).. " spricht zu ".. pc.get_name() ..".")
say("")
say("Pin wurde erfolgreich geändert.")
say("Bis bald mal.")
elseif sel==2 then
say_title(mob_name(50084).. " spricht zu ".. pc.get_name() ..".")
say("")
say("Bis bald mal.")
else
-- Fehler abfangen!
say("Unbekannter Fehler!")
say("Bitte umgehend mit ihren")
say("Fehler Code beim Serverleiter")
say("melden!")
say("Fehler Code: 3")
end
elseif pin_eing > 99999 or pin_eing == 0 or pin_eing < 10000 then
say_title(mob_name(50084).. " spricht zu ".. pc.get_name() ..".")
say("")
say("Tut mir leid doch irgendwas stimmt nicht mit")
say("deiner Pin. Deshalb habe ich sie nicht geändert.")
say("")
say("")
say_reward("Info: Pin darf nur Zahlen enthalten!")
say_reward("Info: Pin darf nicht größer als 99999")
say_reward("oder kleiner als 10000 sein!")
else
-- Fehler abfangen!
say("Unbekannter Fehler!")
say("Bitte umgehend mit ihren")
say("Fehler Code beim Serverleiter")
say("melden!")
say("Fehler Code: 4")
end
else
say_title(mob_name(50084).. " spricht zu ".. pc.get_name() ..".")
say("")
say("Falsche Pin.")
end
elseif sel==5 then
---------------------------Abbrechen---------------------------
say_title(mob_name(50084).. " spricht zu ".. pc.get_name() ..".")
say("")
say("Bis bald mal.")
else
-- Fehler abfangen!
say("Unbekannter Fehler!")
say("Bitte umgehend mit ihren")
say("Fehler Code beim Serverleiter")
say("melden!")
say("Fehler Code: 5")
end
end
end
when 50084.chat."Information" begin
say("Beim Yangkonto kannst du Yang ablegen wenn")
say("in dein Inventar kein Platz mehr für Yang ist.")
say("So kannst du auch dein Geld nochmals schützen")
say("Falls jemand deinen Account hackt da er die")
say("Pin nicht weiß")
end
end
end
