Und es Padmak ma bischen schwerer zu machen, bis er das hinbekommt , den generierten Code auslesen zu lassen und dann eintippen zu lassen.
Falls es i-wo sowas schon geben sollte sorry. Habe nichts gefunden!
Hier die Quest:
PHP Code:
----(c) By Sanii----
----Random-Row-Funktion by Yoshix3---
quest verzaubern begin
state start begin
when ITEMVNUM.use begin
local accept=random_row()
local itemname = "ITEMNAME"
local servername = "SERVERNAME"
say_title("".. itemname ..":")
say("")
say("Beim öffnen der ".. itemname .." kannst du")
say_title("50 mal Gegenstand verstärken")
say("oder")
say_title("50 mal Gegenstand verzaubern")
say("erhalten. Bitte den Code eingeben :")
say_reward("".. accept .."")
local eingabe = input()
if eingabe == "" then
return
end
say_title("".. itemname ..":")
say("")
say_title("Also wähle aus was du haben möchtest!")
say("")
local s = select("50x Verstärken", "50x verzaubern", "Abbrechen")
if 1==s then
if pc.count_item(71085) >= 1 then
say_title("".. itemname ..":")
say("")
say("Du hast noch welche im Inventar!")
say("Brauche diese erst auf und öffne dann")
say("eine weitere ".. itemname ..".")
else
if eingabe == accept then
say_title("".. itemname ..":")
say("")
say("Wunderbar,")
say("Hier hast du deine 50 Gegenstand verstärken.")
say("")
say_reward("Viel Spaß weiterhin auf ".. servername .."!")
pc.give_item2(71085, 50)
pc.remove_item(ITEMVNUM, 1)
else
say_title("".. itemname ..":")
say("")
say("Der Code stimmte nicht!")
say("")
say_title("".. eingabe .." und ".. accept .." stimmen nicht überein!")
end
end
elseif 2==s then
if pc.count_item(71085) >= 1 then
say_title("".. itemname ..":")
say("")
say("Du hast noch welche im Inventar!")
say("Brauche diese erst auf und öffne dann")
say("eine weitere ".. itemname ..".")
else
if eingabe == accept then
say_title("".. itemname ..":")
say("")
say("Wunderbar,")
say("Hier hast du deine 50 Gegenstand verzaubern.")
say("")
say_reward("Viel Spaß weiterhin auf ".. servername .."!")
pc.give_item2(71084, 50)
pc.remove_item(ITEMVNUM, 1)
else
say_title("".. itemname ..":")
say("")
say("Der Code stimmte nicht!")
say("")
say_title("".. eingabe .." und ".. accept .." stimmen nicht überein!")
end
end
end
end
end
end
Dies in die Questlib ganz unten einfügen:
PHP Code:
function random_row()
local b,z1,z2,z3 = {'a','b','c','d','e','f','g','h','i','j','k','l','m','n','o','p','q','r','s','t','u','v','w','x','y','z'},number(1,26),number(100000,999999),number(1,26)
local s1 = b[z1]
local s2 = b[z3]
local s3 = z2
return s1..""..s2..""..s3
end
Code:
random_row
Schon generiert die Quest einen Code den ihr eingeben müsst gemischt aus Buchstaben und Zahlen.
Großes Danke hierbei an Yoshix3 der mir dir function gegeben hat !
Der Lagerverwalter der kein Lager öffnet sobald ihr Verstärken oder Vezaubern im Invi habt. !
Damit man die Switchen nicht sammeln kann.
PHP Code:
quest warehouse begin
state start begin
when 9005.click begin
if pc.getqf("pw")==0 then
say_title("Lagerverwalter")
say("Hallo Fremder,")
say("ich kann deine Items lagern")
say("allerdgins brauch ich dafür eine")
say("kleine Einrichtungsgebühr von")
say("500 Yang.")
say_reward("Möchtest du das bezahlen?")
local s=select("Bezahlen", "Nicht bezahlen")
if s==2 then
return
end
if pc.get_gold()<500 then
say_title("Lagerverwalter")
say("Du hast zu wenig Yang")
return
end
say_title("Lagerverwalter")
say("Du hast erfolgreich ein Lager")
say("eröffnet.")
say_reward("Dein Passwort ist 000000")
pc.change_gold(-500)
game.set_safebox_level(1)
pc.setqf("pw", 1)
elseif pc.getqf("pw")==1 then
say_title("Lagerverwalter")
say("Was kann ich für dich tun?")
local f = select("Lager öffnen", "Barren kaufen", "Itemshoplager öffnen", "Abbrechen")
if f == 1 then
if pc.count_item(71084) > 0 then
say_title("Lagerverwalter")
say("")
say("Du hast Gegenstand Verzaubern in deinem Inventar.")
say("Ich darf dir dein Lager leider nicht öffnen.")
say("Aus Sicherheitsmaßnahmen direkt vom Hauptmann.")
say("Tut mir leid. Brauche sie bitte erst auf.")
elseif pc.count_item(71085) > 0 then
say_title("Lagerverwalter")
say("")
say("Du hast Gegenstand Verstärken in deinem Inventar.")
say("Ich darf dir dein Lager leider nicht öffnen.")
say("Aus Sicherheitsmaßnahmen direkt vom Hauptmann.")
say("Tut mir leid. Brauche sie bitte erst auf.")
elseif pc.count_item(71085) == 0 and pc.count_item(71084) == 0 then
game.open_safebox()
setskin(NOWINDOW)
end
elseif f == 2 then
npc.open_shop()
setskin(NOWINDOW)
elseif f == 3 then
game.open_mall()
setskin(NOWINDOW)
end
end
end
end
end
PHP Code:
quest mulleimer begin
state start begin
when NPCVNUM.take with item.get_vnum() >= 1 and item.get_vnum() <= 999999 begin
local destroy = item.get_vnum()
say_title("Der Itemzerstörer.")
say("")
say_reward("Möchtest du deine/n")
say_item_vnum(destroy)
say_reward("wirklich zerstören lassen?")
local select=select("Ja", "Nein")
if 1==select then
local anzahl = item.get_count()
local id = item.get_vnum()
pc.remove_item(id, anzahl)
else
return
end
end
end
end
Viel Spaß damit







