PHP Code:
quest guthaben_script begin
state start begin
when 32527.use begin
if pc.getqf("pw_for_guthaben_panel")!=0 then
say("Gebe dein Passwort für den")
say("Guthaben Bereich ein:")
local pw=input()
if pw=="" then
say("Du must schon etwas eingeben!")
return
end
local pw=pw+0
if pw!=pc.getqf("pw_for_guthaben_panel") then
say("Das ist nicht dein Passwort!")
return
end
end
say("Wähle ein Aktion aus:")
say("Dein Guthaben: "..geld_get_from_name(pc.name).." Yang")
local s=select("Geld einzahlen", "Geld auszaheln", "Geld Senden", "Barren kaufen", "Barren einlösen", "Passwort", "Abbrechen")
if s==7 then
return
end
if s==1 then
say("Wie viel Geld willst du den einzahlen?")
local geld=input()
if geld=="" then
say("Du must schon etwas eintragen!")
return
end
local geld=geld+0
if geld==0 then
say("Mehr als 0 muss es schon sein")
return
end
if pc.get_gold()<geld then
say("So viel Geld besitzt du nicht!")
return
end
local geld_on_tresor=geld_get_from_name(pc.name)+geld
if geld_on_tresor>2000000000 then
say("Du kannst Maximal 2.000.000.000 Yang")
say("eingezahl haben!")
return
end
say("Willst du "..geld.." Yang einzahlen?")
local c=select("Ja", "Abbrechen")
if c==2 then
return
end
if pc.get_gold()<geld then
say("So viel Geld besitzt du nicht!")
return
end
geld_give_to_name(pc.name, geld)
pc.change_gold(-geld)
say("Das Geld wurde Erfolgreich eingezahlt!")
return
end
if s==2 then
say("Dein Guthaben beträgt: "..geld_get_from_name(pc.name).." Yang")
say("Wie viel willst du davon asugezahlt haben?")
local geld=input()
if geld=="" then
say("Du must schon etwas eintragen!")
return
end
local geld=geld+0
if geld==0 then
say("Mehr als 0 muss es schon sein")
return
end
local self_gold=pc.get_gold()
local check1=self_gold+geld
local check2=geld_get_from_name(pc.name)-geld
if check1>2000000000 then
say("So viel Geld kannst du nicht abheben!")
say("Es währe mehr als 2.000.000.000 Yang!")
say("Dann kommt ein Fluch über dich!")
return
end
if check2<0 then
say("Du hast nicht so viel Guthaben!")
return
end
if check1>=1800000000 then
say("Zusammengerechnet mit deinem momentanen")
say("Geld sind das fast 2.000.000.000 Yang!")
say("Wenn mehr Yang in deinem Inventar ist")
say("Kommt ein Fluch über dich!")
end
say("Willst du "..geld.." Yang")
say("ausgezahlt haben?")
local c=select("Ja", "Abbrechen")
if c==2 then
return
end
if check1>2000000000 then
say("So viel Geld kannst du nicht abheben!")
say("Es währe mehr als 2.000.000.000 Yang!")
say("Dann kommt ein Fluch über dich!")
return
end
if check2<0 then
say("Du hast nicht so viel Guthaben!")
return
end
local new_geld=pc.get_gold()+geld
geld_give_to_name(pc.name, -geld)
pc.change_gold(geld)
say("Du hast nun "..new_geld.." Yang!")
return
end
if s==3 then
say("Wem willst du den das Geld senden?")
say("Der jenige mus Online sein!")
local name=input()
local search = find_pc_by_name(name)
if name=="" then
say("Du must schon etwas eingeben!")
return
end
if name==pc.name then
say("Du kannst dir selbst kein Yang schiken!")
return
end
if search==0 then
say("Der Spieler existiert nicht oder ist Offline!")
return
end
if search>0 then
say("Wie viel Geld willst du ihm Senden?")
say("Dein Guthaben beträgt: "..geld_get_from_name(pc.name).." Yang")
local geld=input()
if geld=="" then
say("Du must schon etwas eingeben!")
return
end
local geld=geld+0
if geld<0 then
say("Du kannst ihm keine minusbeträge schiken!")
return
end
local self_geld=geld_get_from_name(pc.name)
local friend_geld=geld_get_from_name(name)
local check1=friend_geld+geld
local check2=self_geld-geld
if geld>self_geld then
say("Du hast nich so viel Guthaben!")
return
end
if check1>2000000000 then
say("Er hat leider schon zu viel Guthaben!")
say("Sag ihm er soll ein wenig Abheben!")
return
end
if check2<0 then
say("So viel Geld hast du nicht einmal selbst!")
return
end
say("Willst du "..name.." wirklich")
say(""..geld.." Yang senden?")
if geld<=100000000 then
say("")
elseif geld<=500000000 then
say("Das ist sehr viel Yang!")
elseif geld<=750000000 then
say("Ein batzen Geld, sehr viel!")
elseif geld<=1000000000 then
say("Unfassbar! Wirklich so viel?")
elseif geld<=1500000000 then
say("Woher bekommst du nur so viel Yang?")
say("Das ist mir echt ein Rätzel!")
elseif geld<=1750000000 then
say("OMG! So viel Geld habe ich noch nie gesehn!")
end
local c=select("Ja", "Abbrechen")
if c==2 then
return
end
if geld>self_geld then
say("Du hast nich so viel Guthaben!")
return
end
if check1>2000000000 then
say("Er hat leider schon zu viel Guthaben!")
say("Sag ihm er soll ein wenig Abheben!")
return
end
if check2<0 then
say("So viel Geld hast du nicht einmal selbst!")
return
end
geld_give_to_name(pc.name, -geld)
geld_give_to_name(name, geld)
say("Deine Sendung ist Erfolgreich angekommen!")
return
end
end
if s==4 then
say_titel("Barren kaufen")
say("")
say("Möchtes du Barren kaufen?")
say("")
local g=select("Ja", "Nein")
if g==1 then
npc.open_shop(15)
end
if g==2 then
return
end
end
if s==5 then
say_titel("Barren einlösen")
local t=select("250kk Barren", "500kk Barren", "1kkk Barren")
if t==1 then
say_title("250kk Barren")
say("")
say("Der Barren ist 250kk wert.")
say("")
say_reward("Möchtest du Baren jetzt einlösen?")
local z = select("Ja", "Nein")
if z == 1 and pc.count_item(80005) and pc.get_gold()<=1749999999 then
pc.change_money(250000000)
pc.remove_item(80005)
elseif z == 1 and pc.get_gold()>=1749999999 then
say("Du Trägst zu viel yang bei dir!")
say_reward("Versuche es wieder wenn du genug platz hast")
elseif z == 1 and pc.count_item(80005)==0 then
say("Die magische Kraft des Barrens ist erloschen")
say_reward("Versuche es wieder wenn du den Barren hast")
end
if z == 2 then
return
end
if t==2 then
say_title("500kk Barren")
say("")
say("Der Barren ist 500kk wert.")
say("")
say_reward("Möchtest du Baren jetzt einlösen?")
local o = select("Ja", "Nein")
if o == 1 and pc.count_item(80006) and pc.get_gold()<=1499999999 then
pc.change_money(500000000)
pc.remove_item(80006)
elseif o == 1 and pc.get_gold()>=1499999999 then
say("Du Trägst zu viel yang bei dir!")
say_reward("Versuche es wieder wenn du genug platz hast")
elseif o == 1 and pc.count_item(80006)==0 then
say("Die magische Kraft des Barrens ist erloschen")
say_reward("Versuche es wieder wenn du den Barren hast")
end
if o == 2 then
return
end
if t==3 then
say_title("1kkk Barren")
say("")
say("Der Barren ist 1kkk wert.")
say("")
say_reward("Möchtest du Baren jetzt einlösen?")
local p = select("Ja", "Nein")
if p == 1 and pc.count_item(80007) and pc.get_gold()<=999999999 then
pc.change_money(1000000000)
pc.remove_item(80007)
elseif p == 1 and pc.get_gold()>=999999999 then
say("Du Trägst zu viel yang bei dir!")
say_reward("Versuche es wieder wenn du genug platz hast")
elseif p == 1 and pc.count_item(80007)==0 then
say("Die magische Kraft des Barrens ist erloschen")
say_reward("Versuche es wieder wenn du den Barren hast")
end
if p == 2 then
return
end
if s==6 then
if 1==1 then --alles um eine zeile verschoben
if pc.getqf("pw_for_guthaben_panel")==0 then
say("Es gibt die Möglichkeit ein Passwort")
say("für den Guthaben Bereich festzulegen!")
say("")
say("Damit niemand an dein Guthaben ran kommt")
say("wenn du mal gehäckt wirst!")
say("")
local c=select("Passwort setzen", "Abbrechen")
if c==2 then
return
end
say("Gebe dein Passwort ein:")
say("")
say("Darf nur aus Ziffern bestehen!")
say("Min. 5 Zahlen! Max. 5 Zahlen!")
say("Mus zwischen 10000 und 99999 liegen")
say("")
local pw=input()
if pw=="" then
say("Du must schon etwas eingeben!")
return
end
local pw=pw+0
if pw>=10000 and pw<=99999 then
say("Dein gewähltes Passwort: "..pw.."")
say("")
say("Willst du es als Passwort setzen?")
local c2=select("Passwort setzen", "Abbrechen")
if c2==2 then
return
end
say("Dein Passwort wurde erfolgreich gespeichert!")
pc.setqf("pw_for_guthaben_panel", pw)
return
else
say("Das Passwort kannst du nicht wählen!")
say("Eingegebens Passwort: "..pw.."")
return
end
else
say("Das sicherheits Passwort ist momentan: Aktiv")
local c=select("Passwort deaktivieren", "Passwort ändern", "Abbrechen")
if c==3 then
return
end
if c==1 then
say("Bist du dir sicher das du das Passowort")
say("deaktivieren willst?")
local c2=select("Deaktivieren", "Abbrechen")
if c2==2 then
return
end
say("Das Passwort wurde deaktiviert!")
pc.setqf("pw_for_guthaben_panel", 0)
return
end
if c==2 then
say_reward("Passwort ändern")
say("Gebe dein Momentanes Passwort ein:")
local old_pw=input()
if old_pw=="" then
say("Du must schon etwas eingeben!")
return
end
local old_pw=old_pw+0
if old_pw!=pc.getqf("pw_for_guthaben_panel") then
say("Das ist nicht dein momentanes Passwort!")
return
end
if old_pw==pc.getqf("pw_for_guthaben_panel") then
say("Gebe dein neues Passwort ein:")
say("")
say("Darf nur aus Ziffern bestehen!")
say("Min. 5 Zahlen! Max. 5 Zahlen!")
say("Mus zwischen 10000 und 99999 liegen")
local new_pw=input()
if new_pw=="" then
say("Du must schon etwas eingeben!")
return
end
local new_pw=new_pw+0
if new_pw>=10000 and new_pw<=99999 then
say("Dein gewähltes Passwort: "..new_pw.."")
say("")
say("Willst du es als Passwort setzen?")
local c2=select("Passwort setzen", "Abbrechen")
if c2==2 then
return
end
say("Dein Passwort wurde erfolgreich gespeichert!")
pc.setqf("pw_for_guthaben_panel", new_pw)
return
else
say("Das Passwort kannst du nicht wählen!")
say("Eingegebens Passwort: "..pw.."")
return
end
else
say("Das ist nicht dein Passwort!")
return
end
end
end
end
end
end
end
end
Danke schon mal im Vorraus
MFG DarkNessWorld2
