Also die 1.Fehlerhafte:
PHP Code:
quest Special begin
state start begin
when login or levelup with pc.get_level() >=99 begin
set_state(information)
end
end
state information begin
when letter begin
local v = find_npc_by_vnum(9003)
if v != 0 then
target.vid("__TARGET__", v, "Quest")
end
send_letter("Special")
end
when button or info begin
say_title("Special")
say("")
say("Der Rüssihändler hat seine Spielchen mit der")
say("Gemi getrieben, er steckte das Stück Edelstein in den")
say("POPO der Dame.")
say("Sie lies einen Schieß, bumm schon war der Edelstein")
say("verschwunden. Kein Wunder wenn die Gemi furzt.")
say("Du bist der auserwählte, finde den Stein!!")
say("")
end
when __TARGET__.target.click or
9003.chat."Quest" begin
target.delete("__TARGET__")
say("Gemischi:")
--- l
say("Er trieb mit mir seine Spielchen,es macht natürlich")
say("uch Spaß, als er mir den Edelstein")
say("in den allerwertesten steckte,")
say("tritt das Gas aus-Rohrbruch,alles war zu spät!")
say("Der Korken platze,das Gas kommte")
say("PUUUM-Weg war er.Hilf Mir ich habe Angst das er mich vergewaltigt!!")
say("")
set_state(go_to_disciple)
pc.setqf("collect_count",0)
pc.setqf("drink_drug",0)
end
end
state go_to_disciple begin
when letter begin
send_letter("Auftrag von Gemischi")
end
when button or info begin
say_title("Quest")
--- l
say("")
say("Gemischi gab euch den Auftrag")
say("10 Stück Edelstein zu sammeln!")
say("Das Item bekommt ihr von Himmels Geistliche in der Grotte.")
say("Viel Glueck!")
say("")
say_item_vnum(30021)
say_reward(" Du hast".." "..pc.getqf("collect_count").." bis jetzt gesammelt!")
say("")
end
when 71035.use begin --°g´bÃĤô
if pc.getqf("drink_drug")==1 then
say("")
say("Bessere Droppchance!")
say("")
return
end
if pc.count_item(30021)==0 then
say("")
say("Du hast keine!")
say("Lauf los und besorg mir welche!")
say("")
return
end
item.remove()
pc.setqf("drink_drug",1)
end
when 2403.kill begin
if pc.count_item(30021)<10-pc.getqf("collect_count") then
pc.give_item2(30021, 1)
end
end
when 9003.chat."Quest" with pc.count_item(30021) >0 begin
say("Einen Moment!")
--- l
say("Ich werde das Item")
say("schnell mal ueberpruefen.")
say("Hoffentlich klappt alles!")
say("")
pc.remove_item(30021, 1)
wait()
local pass_percent
if pc.getqf("drink_drug")==0 then
pass_percent=900
else
pass_percent=900
end
local s= number(1,100)
if s<= pass_percent then
if pc.getqf("collect_count")< 9 then --5*Ó¥H¤U
local index =pc.getqf("collect_count")+1
pc.setqf("collect_count",index) --¨ú±o¤@* +1
say("Gemischi:")
say("Perfekt! Das Item ist in Ordnung")
say("Du hast bis jetzt ".." "..10-pc.getqf("collect_count").. " abgegeben!")
say("Bring mir die restlichen!")
say("")
pc.setqf("drink_drug",0) --ÃĤôªì©l¤Æ
return
end
say("Gemischi:")
say("Yuhu! Du hast mir")
say("alles gebracht!")
say("Dafür werde ich dich wie versprochen")
say("belohnen!")
say("")
say_reward("Du bekommst ein Keule+0!")
say_reward("Du bekommst ein Giftschwert+9!")
say_reward("Du bekommst ein Reittier Rufer!")
say_reward("Du bekommst 10.000.000 Yang!")
say_reward("Du bekommst 200.000.000 Erfahrung!")
pc.setqf("collect_count",0)
pc.setqf("drink_drug",0)
end
end
end
Die 2. Fehlerhafte:
PHP Code:
quest Rates begin
state start begin
when 20095.chat with pc.is_gm() begin
say_title("GM HILF-NPC")
say("Nur für GMs")
say("Es macht Rates auf ein klick online")
say("")
say("Auswählen")
locale main_set = select("Rates auf 1000", "Abbrechen")
if main_set == 2 then
return
end
elseif e == 1 then
say_title("GM Helfer:")
say("")
say("Du moechtest also die Rates einstellen??")
say("")
say("Möchtest du alle Rates auf 1000?")
local s =select ("Alle auf 1000","Abbrechen")
if s == 1 then
command("priv_empire 0 4:exp 1000 9999")
command("priv_empire 0 2:gold_drop 1000 9999")
command("priv_empire 0 3:gold10_drop 1000 9999")
command("priv_empire 0 1:item_drop 1000 9999")
elseif s == 2 then
return
end
end
end
PHP Code:
priv_empire 0 4:exp 1000 9999
priv_empire 0 2:gold_drop 1000 9999
priv_empire 0 3:gold10_drop 1000 9999
priv_empire 0 1:item_drop 1000 9999