HI hier meine verbuggte quest es kommen schon fehler bei vpc also mus ziemlich viel falsch sein :S
die texte und die vnums stimmen nicht ganz da ich aus 2 quest alles zusammengebsatelt habe ein thx an den der die korrigiert ;D:handsdown::handsdown:
PHP Code:
quest schmied2 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(20016)
if v != 0 then
target.vid("__TARGET__", v, "Quest")
end
send_letter("Götterwaffen")
end
when button or info begin
say_title("GötterWaffen")
say("")
say("Bitte gehe zum schmied!")
say("Er will dir unbedingt etwas sagen.")
say("Bringe viel Gedult mit.")
end
when __TARGET__.target.click or
20016.chat."schmied2" begin
target.delete("__TARGET__")
say("Hey,ho! Lieber Krieger")
say("da du nun level 99 bist")
say("wird es zeit dir eine Götterwaffe")
say("zu schmieden!")
say("Ich brauche dazu aber 10 rote Monokel.")
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("schmied2")
end
when button or info begin
say_title("Götterwaffen")
say("")
say("Du hast den Auftrag bekommen")
say("10 Rotes Monokel zu sammeln")
say("Das Item bekommt ihr von Den Eisgolems der Grotte!")
say("Viel Glück!")
say("")
say_item_vnum(10)
say_reward("Du hast".." "..pc.getqf("collect_count").." bis jetzt gesammelt!")
end
when 71035.use begin
if pc.getqf("drink_drug")==1 then
say("")
say("Bessere Droppchange!")
return
end
if pc.count_item(70030)==0 then
say("Du hast bisher noch keine")
say("Lauf los und besorg mir welche")
return
end
item.remove()
pc.setqf("drink_drug",1)
end
when 10.kill begin
if pc.count_item(70030) < 10-pc.getqf("collect_count") then
pc.give_item2(70030, 1)
end
end
when 20016.chat."schmied2" with pc.count_item(70030) > 0 begin
say("Ich werde das Item")
say("schnell überprüfen.")
pc.remove_item(70030, 1)
wait()
local pass_percent
if pc.getqf("drink_drug" == 0 then
pass_percent=50
else
pass_percent=50
end
local s= number(1,100)
if s <= pass_percent then
if pc.getqf("collect_count") < 11 then
local index =pc.getqf("collect_count")+1
pc.setqf("collect_count",index)
say("Perfekt! Das Item ist in Ordnung")
say("Du hast bis jetzt ".." "..10-pc.getqf("collect_count").. " abgegeben!")
say("Bring mir die restlichen!")
pc.setqf("drink_drug",0)
return
end
say("Glückwunsch!")
say("Die Waffe konnte")
say("erfolgreich geschmiedet ")
say("werden! Bitte melde dich bei")
say("einem [GM] und sag schmied2!")
pc.setqf("collect_count", 0)
pc.setqf("drink_drug", 0)
clear_letter()
set_state(__complete)
say_reward("Suche dir EINE Waffe aus:")
local b= select("Demoncial-Bogen", "Sonnenstrahlenmesser", "Blaudrachentöter", "Mondschwert")
if b==1 then
say_title("Schmied:")
say("")
say("Du hast eine Levis Rüstung erhalten.")
say("")
say_reward("Viel Spaß!")
pc.give_item2(41010, 1)
clear_letter()
set_state(__COMPLETE__)
elseif b==2 then
say_title("Schmied:")
say("")
say("Du hast eine Thors Rüstung erhalten.")
say("")
say_reward("Viel Spaß!")
pc.give_item2(41020, 1)
clear_letter()
set_state(__COMPLETE__)
elseif b==3 then
say_title("Schmied:")
say("")
say("Du hast eine Thugis Rüstung erhalten.")
say("")
say_reward("Viel Spaß!")
pc.give_item2(41030, 1)
clear_letter()
set_state(__COMPLETE__)
elseif b==4 then
say_title("Schmied:")
say("")
say("Du hast eine Saghys Rüstung erhalten.")
say("")
say_reward("Viel Spaß!")
pc.give_item2(41040, 1)
clear_letter()
set_quest_state("levelup","run")
return
else
say"Dieses Item ist von schlechter Qualität!")
say"Es kann nicht verwendet werden.")
say"Hole mir bitte ein neues!")
pc.setqf("drink_drug",0)
return
end
end
end
