HERAKLES Otomatik Avlı kalıcı sunucu. 19 Haziran'da açılıyor. Atius & Wizard güvencesiyle hemen kayıt ol, ön kayıt ödülleri aktif. HEMEN TIKLA!
Öncelikle merhabalar, herkese iyi forumlar diliyorum.
Quest dosyası yapamıyorum direk indirmek istiyorsan ;
Buyrun link :
Virüs total :
Kod:
-----------------------------------------------
--Hwa-Hee 127 Level Görevi
-----------------------------------------------
quest Lv50_quest begin
state start begin
when login or levelup or enter with pc.get_level() >= 127 begin
setstate( gototeacher )
end
when 20356.click with pc.get_level() < 127 begin
say_title("Hwa-Hee'nın görevi:")
say("Sırada Güçlü Buz Cadisi Var.")
say("Güçlü Buz Cadisi Öldürmelisin!.")
say("O Heryerde Olabilir!")
end
end
state gototeacher begin
when letter begin
send_letter("# Güçlü Buz Cadisi #")
local v=find_npc_by_vnum(20356)
if 0==v then
else
target.vid("__TARGET__", v, "¥h§ä·s§L±Ğ©x")
end
end
when button or info begin
say_title("# 1.Görev #")
say("127. seviyeye ulaştığın için mektup aldın.")
say("Tebrikler! Hwa-Hee'ın yanına git ve görevini al.")
say("")
end
when __TARGET__.target.click begin
target.delete("__TARGET__")
say_title("Hwa-Hee:")
say("Sonunda 127.Seviyeye gelmişsin!Tebrikler")
wait()
say_title("Hwa-Hee:")
say("Bu görevin sonunda kalıcı etkili")
say("Özellik alacaksın!")
wait()
say_title("Hwa-Hee:")
say("25 Adet Güçlü Buz Cadisi KES!")
say("Ama bu o özellikler için değecektir!")
say("Alacağın Ödül Şu ;")
say_reward("+60 Defans Bonusu Süresiz")
say_reward("+60 Atak Bonusu Süresiz")
say_reward("DarkLorD")
set_state( killcol )
pc.setqf("state", 0)
q.set_counter("Öldürmen gereken", 25)
end
end
state killcol begin
when letter begin
send_letter("# 1.Görev #")
end
when button or info begin
say_title("Güçlü Buz Cadisi Öldür!")
say("25 Adet Güçlü Buz Cadisi YOK ET.")
say( "Şimdiye kadar, "..pc.getqf("state").." tane öldürdün. ")
say("")
end
when 1192.kill begin
local count = pc.getqf("state") + 1
if count <= 25 then
pc.setqf("state", count)
q.set_counter("Öldürmen gereken", 25 - count)
if count == 25 then
say_title("Güçlü Buz Cadisi YOK ETME tamamlandı.")
say(" 25 Adet Güçlü Buz Cadisi Metni YOK Edildi Hwa-Hee'ye geri dön.")
set_state(gototeacher2)
end
end
end
end
state gototeacher2 begin
when letter begin
local v=find_npc_by_vnum(20356)
if 0==v then
else
target.vid("__TARGET__", v, "¥h§ä±Ğ©x")
end
end
when letter begin
send_letter("Güçlü Buz Cadisi YOK ET Görevi tamamlandı.")
end
when button or info begin
say_title("Güçlü Buz Cadisi Yok Et Görevi tamamlandı.")
say("25 Tane Güçlü Buz Cadisi Kesildi. Hwa-Hee'a geri dön.")
end
when __TARGET__.target.click begin
target.delete("__TARGET__")
say_title("Hwa-Hee:")
say("Bu görevi yapabildiysen çok güçlüsün demektir.")
say("+15 Atak Hızı ve +50 Hareket Hızı Bonusu kazandın")
say("DarkLorD !")
wait()
if 0==pc.job then
say_reward("+15 Atak Hızı Süresiz")
say_reward("+50 Hareket Hızı Süresiz")
pc.give_item2(299 , 1)
affect.add_collect(apply.ATT_SPEED,15,60*60*24*365*60) --¡V60¦~
affect.add_collect(apply.MOV_SPEED,50,60*60*24*365*60) --¡V60¦~
elseif 1==pc.job then
say_reward("+15 Atak Hızı Süresiz")
say_reward("+50 Hareket Hızı Süresiz")
pc.give_item2(299 , 1)
affect.add_collect(apply.DEF_GRADE_BONUS,60,60*60*24*365*60) --¡V60¦~
affect.add_collect(apply.ATT_GRADE_BONUS,60,60*60*24*365*60) --¡V60¦~
elseif 2==pc.job then
say_reward("+15 Atak Hızı Süresiz")
say_reward("+50 Hareket Hızı Süresiz")
pc.give_item2(299 , 1)
affect.add_collect(apply.DEF_GRADE_BONUS,60,60*60*24*365*60) --¡V60¦~
affect.add_collect(apply.ATT_GRADE_BONUS,60,60*60*24*365*60) --¡V60¦~
elseif 3==pc.job then
say_reward("+15 Atak Hızı Süresiz")
say_reward("+50 Hareket Hızı Süresiz")
pc.give_item2(299 , 1)
affect.add_collect(apply.DEF_GRADE_BONUS,60,60*60*24*365*60) --¡V60¦~
affect.add_collect(apply.ATT_GRADE_BONUS,60,60*60*24*365*60) --¡V60¦~
end
clear_letter()
set_quest_state("levelup","run")
set_state( __COMPLETE__ )
pc.setqf("state", 0) --¡V ¦pªG¦A³]©w¥ô°ÈÅܼƪº¸Ü, DB *t²ü¥i¥H¤U*°.
end
end
state __COMPLETE__ begin
end
endQuest dosyası yapamıyorum direk indirmek istiyorsan ;
Buyrun link :
Linkleri görebilmek için Turkmmo Forumuna ÜYE olmanız gerekmektedir.
Virüs total :
Linkleri görebilmek için Turkmmo Forumuna ÜYE olmanız gerekmektedir.
