cum adaug timp biolog
acesta este questul pentru dinti:


quest biologoul_chaegirab_sarcini begin
state start begin
function IncepeSarcina(Level, Item, ItemCount, Recompensa, Bonus1, BonusValue1, Bonus2, BonusValue2, ItemBonus, ItemBonusCount )
if pc.get_level()<Level then
say_title("Biologul Chaegirab:")
say ("Îmi pare rău, dar trebuie să ai nivelul "..Level.." pentru[ENTER]această misiune! Revin-o când atingi nivelul[ENTER]necesar.[ENTER]")
return
end

if pc.getqf("MisiuneBiolog_"..Level.."")==1 then
say_title("Biologul Chaegirab:")
say("Îmi pare rău, dar nu poti face o misiune de mai[ENTER]multe ori deoarece am terminat de studiat[ENTER]aceste obiecte.[ENTER]")
return
end

say_title("Biologul Chaegirab:")
say("Pentru a finaliza această misiune este nevoie de:")
local ItemCount2
if pc.getqf("MisiuneBiolog_"..Level..""..ItemCount.."")==0 then
ItemCount2=ItemCount
else
ItemCount2=ItemCount-pc.getqf("MisiuneBiolog_"..Level..""..ItemCount.."")
end

say (""..ItemCount2.." bucăti de "..item_name(Item).."[ENTER]")
say ("Recompensa pentru această misiune este:")
say_reward(Recompensa)
say ("")

local s = select( "Am adus "..item_name(Item).."", "Iesire")

if s==1 then
if pc.count_item(Item)==0 then
say_title("Biologul Chaegirab:")
say("Nu ai obiectele necesare.[ENTER]Pentru această misiune este nevoie de:")
say_orange(""..item_name(Item).."[ENTER]")
return
end

local Prob = number(1,2)
if Prob==1 then
say_title("Biologul Chaegirab:")
say("Îmi pare rău, dar acest exemplar nu este bun![ENTER]Revin-o cu un exemplar nou.[ENTER]")
pc.remove_item(Item, 1)
return
end

pc.setqf("MisiuneBiolog_"..Level..""..ItemCount.."", pc.getqf("MisiuneBiolog_"..Level..""..ItemCount.."")+1)
if pc.getqf("MisiuneBiolog_"..Level..""..ItemCount.."")==ItemCount then
pc.remove_item(Item, 1)

say_title ( "Biologul Chaegirab:" )
say ( "În sfârsit! Am terminat de studiat aceste obiecte." )
say ( "Multumesc pentru ajutor. Recompensa ta este" )

pc.setqf("MisiuneBiolog_"..Level.."", 1)

say_reward (Recompensa)
say ( "" )

affect.add_collect(Bonus1, BonusValue1, 60*60*24*365*60)
pc.give_item2 (ItemBonus, ItemBonusCount)
if Bonus2!=0 then
affect.add_collect(Bonus2, BonusValue2, 60*60*24*365*60)

end
else
say_title("Biologul Chaegirab:")
say("Excelent! Acest exemplar este de calitate.[ENTER]Mai trebuie să aduci doar "..ItemCount-pc.getqf("MisiuneBiolog_"..Level..""..ItemCount.."").." de exemplare.[ENTER]")
pc.remove_item(Item, 1)
end
end
end

Subiect inactiv. Arhivat !