vérkő küldi (K)

[Madridista]

Sziasztok valakinek nincs meg véletlen a GF-es vérkő küldetés az amit minden nap egyszer meg lehet csinálni?
Mindenhol kerestem, de nem találtam meg sehol....

[Pisti95]

Tessék, lefordítod kell csak:

Kód Kijelölés Kibont


quest bloodystone_quest begin
state start begin
when login or levelup with pc.get_level() >= 75 and not pc.is_gm() begin

    if pc.count_item("80041") >= 1 then chat ( "In the Grotto: You're the GM. Item tests are blocked!") return end

local v=find_npc_by_vnum(20095)
if 0==v then
else
target.vid("__TARGET__", v, "Seon-Hae")
set_state(run)

end
end
end

state run begin
when letter begin

send_letter ( "In the caverns" )

end
when button or info begin

say ( "You want to explore the Watery Caverns?" )
say ( "To enter it, requires Bloody Stone." )
say ( "Seon-Hae is the only one who knows how to make." )
say ( "He has chosen you for a task now." )
say ( "His reward could be a Bloody Stone." )
say ( "" )

end

when __TARGET__.target.click or 20095.chat."Bloody Stone" begin
target.delete("__TARGET__")
if pc.get_level() < 75 then

say ( "You are too weak to give you a Bloody Stone!" )
say_reward ( "Come back when you've reached level 75!" )
say ( "" )

return
end

say ( "Oh well, that you came. I have a difficult" )
say ( "task for you. I will not make it alone." )
say ( "I mean you're just the right one to help me." )
say ( "" )

wait()

say ( "I can say you the secret of making bloody stone." )
say ( "But you need some ingredients. They are difficult" )
say ( "to obtain. I am too weak to get this pass.." )
say ( "You must help me.." )
say ( "" )

wait()

say ( "I'll mark points on the map where you will" )
say ( "find fossilized Tears of Baljit-Elvedin." )
say ( "Collect seven pieces and bring them to me." )
say ( "But that's not all! In addition to the tears" )
say ( "I still need four Obsidian." )
say ( "" )

wait()

say ( "Now, as a last word, I wish you good luck." )
say ( "" )

if pc.count_item(30186) >= 7 and pc.count_item(30188) >= 4 then

say ( "Now back to Hae-Seon." )
say ( "" )

set_state(backtoseon)
return

end

set_state(doyyumhwaji)

end
end

state doyyumhwaji begin
when letter begin
if pc.count_item(30186) >= 7 and pc.count_item(30188) >= 4 then
set_state(backtoseon)
return

end

send_letter ( "In the Land of Fire" )

end

when letter with pc.get_map_index() == 62 begin
--pc.remove_item(30186,anzahl1)
--pc.remove_item(30188,anzahl2)
local tropfen = {
{ 1333, 785},
{ 900,730},
{ 656,716},
{ 543,821},
{ 460,771},
{ 379,685},
{ 480,623},
{ 428,468},
{ 327,359},
{ 224,539},
{ 175,727},
{ 145,900},
{ 59,1000},
{ 176,1150},
{ 438,1112},
{ 646,1015},
{ 790,1183},
{ 1027,1043},
{ 1326, 1028},
{ 1376,1198},
{ 1408,1369},
{ 899,1396},
{ 539, 1338},
{ 574, 361},
{ 846, 455},
{ 1154, 498},
{ 1222, 440},
{ 1425,500},
{ 1283,347},
{ 1396,148},
{ 1100,159},
{ 787, 1083},
{ 610,175},
{ 500, 278},
{ 390,125},
}
local r =  number(1,30)
target.pos("p1", tropfen[r][1], tropfen[r][2], 62, "Tears of Baljit-Elvedin")
local r =  r+1
target.pos("p2", tropfen[r][1], tropfen[r][2], 62, "Tears of Baljit-Elvedin")
local r =  r+1
target.pos("p3", tropfen[r][1], tropfen[r][2], 62, "Tears of Baljit-Elvedin")
local r =  r+1
target.pos("p4", tropfen[r][1], tropfen[r][2], 62, "Tears of Baljit-Elvedin")
local r =  r+1
target.pos("p5", tropfen[r][1], tropfen[r][2], 62, "Tears of Baljit-Elvedin")
local r =  r+1
target.pos("p6", tropfen[r][1], tropfen[r][2], 62, "Tears of Baljit-Elvedin")
local r =  r+1
target.pos("p7", tropfen[r][1], tropfen[r][2], 62, "Tears of Baljit-Elvedin")
local r =  r+1

end

when button or info begin

say ( "Seon-Hae told you where are fossilized tears" )
say ( "and Obsidian. Find these and then bring them" )
say ( "to him." )
say ( "" )


end

when p1.target.arrive begin
target.delete("p1")

say ( "This is the place marked by Seon-Hae." )
say_reward ( "You get Tears of Baljit-Elvedin!" )
say ( "" )

pc.give_item2(30186, 1)
if pc.count_item(30186) >= 7 then

say ( "That was the last tear." )
say ( "" )

if pc.count_item(30188) >= 4 then

say ( "Now back to Seon-Hae." )
say ( "" )

set_state(backtoseon)
else

say ( "Now get the four Obsidian." )
say_reward ( "* You get them from the flames." )
say ( "" )

end
end
end
when p2.target.arrive begin
target.delete("p2")

say ( "This is the place marked by Seon-Hae." )
say_reward ( "You get Tears of Baljit-Elvedin" )
say ( "" )

pc.give_item2(30186, 1)
if pc.count_item(30186) >= 7 then

say ( "That was the last tear." )
say ( "" )

if pc.count_item(30188) >= 4 then

say ( "Now back to Seon-Hae." )
say ( "" )

set_state(backtoseon)
else

say ( "Now get the four Obsidian." )
say_reward ( "* You get them from the flames." )
say ( "" )

end
end
end
when p3.target.arrive begin
target.delete("p3")

say ( "This is the place marked by Seon-Hae." )
say_reward ( "You get Tears of Baljit-Elvedin" )
say ( "" )

pc.give_item2(30186, 1)
if pc.count_item(30186) >= 7 then

say ( "That was the last tear." )
say ( "" )

if pc.count_item(30188) >= 4 then

say ( "Now back to Seon-Hae." )
say ( "" )

set_state(backtoseon)
else

say ( "Now get the four Obsidian." )
say_reward ( "* You get them from the flames." )
say ( "" )

end
end
end
when p4.target.arrive begin
target.delete("p4")

say ( "This is the place marked by Seon-Hae." )
say_reward ( "You get Tears of Baljit-Elvedin" )
say ( "" )

pc.give_item2(30186, 1)
if pc.count_item(30186) >= 7 then

say ( "That was the last tear." )
say ( "" )

if pc.count_item(30188) >= 4 then

say ( "Now back to Seon-Hae." )
say ( "" )

set_state(backtoseon)
else

say ( "Now get the four Obsidian." )
say_reward ( "* You get them from the flames." )
say ( "" )

end
end
end
when p5.target.arrive begin
target.delete("p5")

say ( "This is the place marked by Seon-Hae." )
say_reward ( "You get Tears of Baljit-Elvedin" )
say ( "" )

pc.give_item2(30186, 1)
if pc.count_item(30186) >= 7 then



if pc.count_item(30188) >= 4 then

say ( "Now back to Seon-Hae." )
say ( "" )

set_state(backtoseon)
else

say ( "Now get the four Obsidian." )
say_reward ( "* You get them from the flames." )
say ( "" )

end
end
end
when p6.target.arrive begin
target.delete("p6")

say ( "This is the place marked by Seon-Hae." )
say_reward ( "You get Tears of Baljit-Elvedin" )
say ( "" )

pc.give_item2(30186, 1)
if pc.count_item(30186) >= 7 then

say ( "That was the last tear." )
say ( "" )

if pc.count_item(30188) >= 4 then

say ( "Now back to Seon-Hae." )
say ( "" )

set_state(backtoseon)
else

say ( "Now get the four Obsidian." )
say_reward ( "* You get them from the flames." )
say ( "" )

end
end
end

when p7.target.arrive begin
target.delete("p7")

say ( "This is the place marked by Seon-Hae." )
say_reward ( "You get Tears of Baljit-Elvedin" )
say ( "" )

pc.give_item2(30186, 1)
if pc.count_item(30186) >= 7 then

say ( "That was the last tear." )
say ( "" )

if pc.count_item(30188) >= 4 then

say ( "Now back to Seon-Hae." )
say ( "" )

set_state(backtoseon)
else

say ( "Now get the four Obsidian." )
say_reward ( "* You get them from the flames." )
say ( "" )

end
end
end

when 2204.kill begin
local n = number(1,50)
if n <= 7 then
pc.give_item2(30188, 1)
if pc.count_item(30188) >= 4 then

say ( "That was the last Obsidian." )
say ( "" )

if pc.count_item(30186) >= 7 then

say ( "Now back to Seon-Hae." )
say ( "" )

set_state(backtoseon)
else

say ( "You still need the seven tears." )
say ( "" )

end
end
end
end
end

state backtoseon begin
when letter begin

send_letter("Back to Seon-Hae")

local v=find_npc_by_vnum(20095)
if 0==v then
else
target.vid("__TARGETs__", v, "Seon-Hae")

end

target.delete("__TARGET1__")
target.delete("__TARGET2__")
target.delete("__TARGET3__")
target.delete("__TARGET4__")
target.delete("__TARGET5__")
target.delete("__TARGET6__")
target.delete("__TARGET7__")

end

when button or info begin

say ( "You have the seven fossilized tears and" )
say ( "the four Obsidian. Now you can go back" )
say ( "to Seon-Hae." )
say ( "" )

end

when 20095.chat."I have the items" with pc.count_item(30186) >= 7 and  pc.count_item(30188) >= 4 begin
target.delete("__TARGETs__")
pc.remove_item(30186,7)
pc.remove_item(30188,4)

say ( "Well done. But that was not all. We need one more" )
say ( "drop of blood. You can find in the Red Forest." )
say ( "Only the fossilized tears, Obsidian and the " )
say ( "blood drops have the magic powers to create" )
say ( "the blood stone. I'll mark the spot of the place" )
say ( "on your map, so you can find easier." )
say ( "" )

set_state(gototrent02)
pc.give_item2(30189,1)
end
end

state gototrent02 begin
when letter begin
send_letter("In the Red Forest")

end

when letter begin
target.pos("__TARGETtr2__", 650, 633, 68, "Drop of Blood")

end

when button or info begin

say ( "A object is missing for making a bloodstone." )
say ( "A drop of blood, which you can find in" )
say ( "the Red Forest, should be enough." )
say ( "" )

end
when __TARGETtr2__.target.arrive begin
target.delete("__TARGETtr2__")

say ( "There is bottle with drops of blood." )
say_reward ( "Drop of blood obtained." )
say ( "" )

pc.give_item2(30187, 1)
set_state(backtoseon2)
end
end

state backtoseon2 begin
when letter begin
send_letter("Back to Seon-Hae")
target.vid("__TARGETseon2__", v, "Seon-Hae")

end
when button or info begin

say ( "You found the drop of blood. Go back to" )
say ( "Seon-Hae. Now he can now produce the stone." )
say ( "" )

end

when 20095.chat."The drop of blood" begin
if pc.count_item(30189) >= 1 then
pc.remove_item(30189,1)

end

if pc.count_item(30187) >= 1 then
pc.remove_item(30187,1)

end

target.delete("__TARGETseon2__")

say ( "So that was everything. Now I can make a stone." )
say ( "Give me a few minutes." )
say ( "" )

wait()

say ( "So, is ready! Take it." )
say_reward ("You gain " ..item_name(30190).."" )
say ( "" )



local serverid = game.get_event_flag("SERVERID")
if true == is_test_server() then

say_title("Current server ID: "..serverid.."")

end

if serverid == 2 then
pc.give_item2(30190,10)
else
pc.give_item2(30190,10)

end

clear_letter()
pc.setqf("time",get_global_time())
set_state(__COMPLETE__)

end
end

state __COMPLETE__ begin
when 20095.chat."I need a new stone" begin
local delay = 5000
if get_global_time() - pc.getqf("time") < delay and pc.getqf("time") != 0 then
local zeit = delay - (get_global_time() - pc.getqf("time"))

say ( "You can't get now a stone!" )
say ( "You must still wait "..zeit.." seconds!" )
say ( "" )

return
end
if pc.get_level() < 75 then


say ( "You are too weak to earn you a bloodstone!" )
say_reward ( "Come back when you've reached level 75!" )
        say ( "" )

return
end
target.delete("__TARGET__")

say ( "Oh well, I see you need again a stone." )
say ( "Unfortunately I have no longer available ingredients." )
say ( "I need new ingredients. You know the tasks already." )
say ( "" )

wait()

say ( "I need seven fossilized Tears of Baljit-Elvedin, " )
say ( "four Obsidian and one drop of blood." )
say ( "You will find tears in marked places on the map," )
say ( "and Obsidian drop at flames. Drop of Blood you will" )
say ( "find in Red Forest!" )
say ( "" )

wait()

say( "Well, I wish you good luck!" )
say( "" )

set_state(doyyumhwaji)

end
end
end


[Madridista]

köszönöm.