Biologen Quest
 

hi, Ich habe da diese Bioquest.

Kann da mal wer rüberschauen, der sich mehr damit auskennt als ich...
Ich mach das erst seid 5 Tagen, drei Quests gingen und bei der gibts ne Fehlermeldung...... mag da mal bitte wer drüberschauen?



quest biologie_1 begin
state start begin
when login or levelup with pc.get_level() >=160 begin
set_state(information)
end
end

state information begin
when letter begin
local v = find_npc_by_vnum(20084)
if v != 0 then
target.vid("__TARGET__", v, "Quest")
end
send_letter("BioQuest 1")
end

when button or info begin
say_title("Suche den Biologen!")
say("")
say("Ey du, wenn du das liest, bist du sicher")
say("schon stark und bereit fuer eine neue Aufgabe!")
say("Der Biologe Chaegirab hat nach dir gefragt!")
say("Er braucht Hilfe, bei einer seiner Untersuchungen.")
say("Er mag es nicht zu warten, also suche")
say("ihn, sobald du Zeit hast, auf.")
say("Dein .Casa")
end

when __TARGET__.target.click or
20084.chat."Quest" begin
target.delete("__TARGET__")
say("Biologe:")
--- l
say("Endlich, ich warte schon den ganzen Tag auf dich.")
say("Ich bin mitten in meinen Untersuchungen und")
say("brauche deshalb deine Hilfe, also hoer gut zu!")
say("Ich hab fast alles, mir fehlen nur noch Steinstücke.")
say("10 Stück fehlen mir noch, woher du sie bekommst,")
say("sollte klar sein.")
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 Biologe")

end
when button or info begin
say_title("Quest")
--- l
say("")
say("Biologe gab euch den Auftrag")
say("10 Steinstücke zu sammeln!")
say("Viel Glueck!")
say("")
say_item_vnum(27990)
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(27990)==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 108.kill begin
if pc.count_item(27990)<10-pc.getqf("collect_count") then
pc.give_item2(30004, 1)
end
end

when 20084.chat."Quest" with pc.count_item(27990) >0 begin
say("Einen Moment!")
--- l
say("Ich werde das Item")
say("schnell mal ueberpruefen.")
say("Hoffentlich klappt alles!")
say("")
pc.remove_item(27990, 1)
wait()

local pass_percent
if pc.getqf("drink_drug")==0 then
pass_percent=70024
else
pass_percent=70024
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("Biologe:")
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("Biologe:")
say("Yuhu! Du hast mir")
say("alles gebracht!")
say("Dafür werde ich dich wie versprochen")
say("belohnen!")
say("")
say_reward("Du bekommst Passierschein!")
say_reward("Du bekommst 100000000 Yang!")
say_reward("Du bekommst 0 Erfahrung!")
pc.setqf("collect_count",0)
pc.setqf("drink_drug",0)
clear_letter()
set_state(__complete)

pc.give_item2(71095)
pc.change_money(100000000)
pc.give_exp2(5000000)
set_quest_state("levelup","run")


return
else
say("Biologe:")
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

-> [Only registered and activated users can see links. Click Here To Register...]