Biologen Quest

01/21/2015 21:22 Toluni#1
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 --迷惑藥水
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下
local index =pc.getqf("collect_count")+1
pc.setqf("collect_count",index) --取得一*荇� +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) --藥水初始化
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酹!")
say("Es kann nicht verwendet werden.")
say("Hole mir ein neues!")
say("")
pc.setqf("drink_drug",0) --藥水初始化
return
end
end
end
01/21/2015 21:34 Shigatu#2
-> [Only registered and activated users can see links. Click Here To Register...]