Hallo ich habe von _DownTime denn Biologen quset makr geladen und eine quset gemacht
Code:
----------------------------------------------------
--Eine neue Quest
--erstellt mit dem Biologen Quest Editor
--Made by _DownTime from elitepvpers.com
----------------------------------------------------
quest Ketten Herstellung begin
state start begin
when login or levelup with pc.get_level() >=29 begin
set_state(information)
end
end
state information begin
when letter begin
local v = find_npc_by_vnum(20364)
if v != 0 then
target.vid("__TARGET__", v, "Quest")
end
send_letter("Ketten Herstellung ")
end
when button or info begin
say_title("Ketten Herstellung ")
say("")
say("Bring mir bitte 30 Kriegsbeute.")
say("")
end
when __TARGET__.target.click or
20364.chat."Quest" begin
target.delete("__TARGET__")
say("Nakajima:")
--- l
say("Hallo ich suche Kriegsbeute ,")
say("ich brauche die Kriegsbeute")
say("um meiner Tocher eine hüpsche ")
say("Kette zu machen .")
say("Kannst du mir bitte ")
say("30 Kriegsbeute bringen .")
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 Nakajima")
end
when button or info begin
say_title("Quest")
--- l
say("")
say("Nakajima gab euch den Auftrag")
say("30 Kriegsbeute zu sammeln!")
say("Das Item bekommt ihr von Wilder General.")
say("Viel Glueck!")
say("")
say_item_vnum(30092)
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(30092)==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 504.kill begin
if pc.count_item(30092)<30-pc.getqf("collect_count") then
pc.give_item2(30092, 1)
end
end
when 20364.chat."Quest" with pc.count_item(30092) >0 begin
say("Einen Moment!")
--- l
say("Ich werde das Item")
say("schnell mal ueberpruefen.")
say("Hoffentlich klappt alles!")
say("")
pc.remove_item(30092, 1)
wait()
local pass_percent
if pc.getqf("drink_drug")==0 then
pass_percent=17106
else
pass_percent=17106
end
local s= number(1,100)
if s<= pass_percent then
if pc.getqf("collect_count")< 29 then --5*Ó¥H¤U
local index =pc.getqf("collect_count")+1
pc.setqf("collect_count",index) --¨ú±o¤@* +1
say("Nakajima:")
say("Perfekt! Das Item ist in Ordnung")
say("Du hast bis jetzt ".." "..30-pc.getqf("collect_count").. " abgegeben!")
say("Bring mir die restlichen!")
say("")
pc.setqf("drink_drug",0) --ÃĤôªì©l¤Æ
return
end
say("Nakajima:")
say("Yuhu! Du hast mir")
say("alles gebracht!")
say("Dafür werde ich dich wie versprochen")
say("belohnen!")
say("")
say_reward("Du bekommst ein Ebenholzohrringe!")
say_reward("Du bekommst ein Ebenholzarmband!")
say_reward("Du bekommst ein Ebenholzhalskette!")
say_reward("Du bekommst 5000000 Yang!")
say_reward("Du bekommst 1000000 Erfahrung!")
pc.setqf("collect_count",0)
pc.setqf("drink_drug",0)
clear_letter()
set_state(__complete)
pc.give_item2(17106)
pc.give_item2(14106)
pc.give_item2(16106)
pc.change_money(5000000)
pc.give_exp2(1000000)
set_quest_state("levelup","run")
return
else
say("Nakajima:")
say("Dieses Item ist von schlechter Qualität!")
say("Es kann nicht verwendet werden.")
say("Hole mir ein neues!")
say("")
pc.setqf("drink_drug",0) --ÃĤôªì©l¤Æ
return
end
end
end
state __complete begin
end
end
ich habe alles gemacht in d hongkong list eingetargen rechte gegeben (777)
und im VPC auch alles gemacht
weil der reste hatt allse geklappt ich habe die bio questen abgeändert und das geht
es ist nur das problem die queten die ich selber neu einfüge die sind net im game drine ..
und noch 2 kleine fragen was kann das sein das kommt immer nach einer weile wenn der server on ist ..
siehe bilder
