////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
//sistem sadece kill sayısı 50 ve üzeri olanlar içindir.
//sadece 1 adet c_headhunter npcsi cikarmalisiniz.
//dialoglardaki ve sysmessagelerdeki Χ,μ vs. gibi karakterler türkçe karakterlerdir. ü,ş gibi.
//<uid.0e47> kısımlarını kendi c_headhunter uidinize gore ayarlamalısınız.
//H.H top 10 sistemi için i_hh_puan id li taşı cıkarmanız ve çift tıkladıgınızda karsınıza cıkan dialogu onaylamaniz gerekir.
//c_headhunter npcsi 5201,3992,39 kordinatlarına gore ayarlanmıştır.Değiştirmek istediginiz zaman
//script içinde;
//dorand 3
//ref1.p 5204,3991,41
//ref1.p 5203,3993,39
//ref1.p 5207,3992,39
//enddo
//kısmını hh masterinin bulundugu bolgeye gore ayarlamalisiniz.
//c_headaraci npcsini istediginiz yere istediginiz kadar koyabilirsiniz.
//Bu npc birinin kellesine odul koymak için kullandıgınız deedi satar.
//
//-
//Boosterx
//-
//
///////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
[chardef c_headhunter]
//name #names_humanmale
name Peter Kurten
ID=c_man
can mt_nonmover
ON=@Create
STR=9111
INT=9111
DEX=9111
ALLSKILLS=0.0
COLOR=colors_skin
itemnewbie random_male_hair
color colors_hair
itemnewbie random_facial_hair
color match_hair
item i_shirt_plain
color colors_all
item random_pants
color colors_all
item random_shoes
color colors_neutral
item random_coin_purse
item i_robe
color 0455
itemnewbie i_backpack
itemnewbie i_bankbox
on=@click
message @0455,,1 [Master of H.H]
message @38,,1 <name>
return 1
on=@dclick
if (<src.kills> < 50)
message @38,,1 Git buradan <src.name>.·ok tecrμbesizsin..
return 1
elseif (<distance> > 3)
src.sms H.H masterinden cok uzaktasiniz.
return 1
elseif !(<src.isevent.e_headhunter>)
dialog d_headhunter
return 1
elseif (<src.isevent.e_headhunter>)
dialog d_headhunter_user
return 1
endif
[dialog d_headhunter]
50,50
resizepic 100 100 3600 412 300
dtext 250 120 52 Head Hunter[H.H]
dtext 115 180 38 <src.name>,
dtext 115 200 1000 Head Hunter birliğinin amacı British'e karşı bir kuvvet oluşturup,
dtext 115 220 1000 British ve askerlerini bozguna uğratmaktır.
dtext 115 250 72 Sende bu tecrμbeli katillerin arasına katılmak istermisin?
bbutton 115 320 4006 4007 1 0 1,152 320 72,Evet katılmak istiyorum.
bbutton 115 340 4017 4018 1 0 2,152 340 38,Hayır katılmak istemiyorum.
[dialog d_headhunter button]
on 1
if !(<src.kills> > 49)
message @38,,1 Git buradan <src.name>.·ok tecrμbesizsin..
return 1
elseif (<distance> > 3)
src.sms H.H masterinden cok uzaktasin.
return 1
else
src.events +e_headhunter
src.tag.hhpuan 0
message @73,,1 Aramıza hoşgeldin,<src.name>.
return 1
endif
on 2
dorand 3
message @38,,1 Git buradan korkak.
message @38,,1 Gelme birdaha buraya.
message @38,,1 Sen Head Hunter olacak cesarete sahip deÄŸilsin.
enddo
[dialog d_headhunter_user]
50,50
resizepic 100 100 3600 412 300
dtext 250 120 52 Head Hunter[H.H]
dtext 115 170 38 Selam yoldaÅŸ <src.name>,
dtext 115 200 72 Aktif masum katliyamın:
dtext 260 200 <qval (<src.kills> <= 53) ? 38 <eval <src.kills>> : 1000 <eval <src.kills>>>
dtext 115 220 72 Tecrμbe puanın:
dtext 210 220 1000 <eval <src.tag.hhpuan>>
dtext 115 250 1000 Para ve tecrμbe kazanmak iΧin değerli bir kelle getirdinmi?
bbutton 115 320 4006 4007 1 0 2,152 320 72,H.H Master'ına kelle ver.
bbutton 115 340 4006 4007 1 0 1,152 340 72,En iyi katiller.
bbutton 115 360 4017 4018 1 0 3,152 360 38,H.H'den ayrıl.
bbutton 115 300 4006 4007 1 0 4,152 300 72,Gorev al.
[function hhbankasi]
ref2 = <uid.0e47> //bu benim headhunter masterimin uidi/seriali siz kendinizinkine gore ayarlayin.
ref1 = <uid.<ref2>.findlayer.29.findid.i_olum_odul2>
[function trkdeneme]
src.sms Χ //ç
src.sms μ //ü
src.sms ı //ı
src.sms ÅŸ //ş
src.sms ÄŸ //ğ
src.sms ζ //ö
src.sms Îœ //Ü
src.sms Åž //Ş
src.sms · //Ç
src.sms Ä° //İ
src.sms Ζ //Ö
src.sms Äž //Ğ
[dialog d_headhunter_user button]
on 1
src.hhtop10
dialog d_headhunter_top10
on 4
call hhbankasi
if (<src.findid.i_olum_odul2>)
src.sms Zaten bir gorevin var.
return 1
elseif !(<ref1>)
src.sms H.H masterinde olum kontrati yok.
return 1
elseif (<distance> > 3)
src.sms H.H masterine cok uzaktasiniz.
return 1
else
src.sms Olum kontrati cantaniza eklenmistir oldureceginiz kisi: <ref1.link.name>.
ref1.bounce
ref1.contp 44,121
ref1.timer 86400
ref1.attr 010|attr_newbie
return 1
endif
on 3
if (<distance> > 3)
src.sms H.H masterine cok uzaktasiniz.
return 1
elseif (<src.tag.hhpuan> >= 0)
src.tag.hhpuan 0
src.events -e_headhunter
src.hhtop10
src.sysmessage @38,,1 Sayin <src.name> Head Hunter'dan ayrıldınız.
return 1
else
src.sysmessage @38,,1 Zaten bir H.H μyesi değilsin.
return 1
endif
on 2
if (<distance> > 3)
src.sms H.H masterine cok uzaktasiniz.
return 1
else
targetf f_kellevercem
src.smn H.H masterine vermek istediginiz kelleyi seciniz.
return 1
endif
[function f_kellevercem]
ref1 = <argo>
ref2 = <uid.0e47> //bu benim headhunter masterimin uidi/seriali siz kendinizinkine gore ayarlayin.
if (<ref1.cont> != <src.findlayer(layer_pack)>) || (<ref1.topobj.uid> != <src.uid>)
src.sms Kelle Χantanda değil.
return 1
elseif (<ref1.link.isevent.e_headhunter>)
ref2.message @38,,1 Bu yandaşının kellesi,ahmak!
ref2.salute
ref1.remove
return 1
elseif !(<ref1.baseid> = i_flesh_head) && !(<ref1.baseid> = i_flesh_head_2)
ref2.message @38,,1 Bu kelle bile değil.Dalgami geΧiyorsun benimle?!
ref2.salute
return 1
elseif (<ref1.link> = 04fffffff)
ref2.message @38,1,1 # Firlatir atar #
ref2.message @38,,1 Bu kelle bir insana bile ait deÄŸil,ahmak!
ref2.salute
ref2.anim 8
dorand 3
ref1.p 5204,3991,41
ref1.p 5203,3993,39
ref1.p 5207,3992,39
enddo
return 1
//elseif (<ref1.link.kills> >= 2)
//ref2.message @38,,1 Bu masum kellesi deÄŸil!
//return 1
elseif (<ref1.link.fame> <= 3500)
ref2.message @38,,1 Bunu kζpeklere atsam yemezler!
ref2.salute
ref1.remove
return 1
else
ref1.remove
src.newitem i_gold
src.tag.hhpuan +=3
src.hhtop10
new.amount <eval ((<ref1.link.fame> * 3) + ((<ref1.link.karma> / 2)>
new.bounce
ref2.salute
ref2.message @73,,1 Bu kelle karşılığı sana <new.amount>gp ve 3 tecrμbe puanı veriyorum aferin.
return 1
endif
[dialog d_headhunter_top10]
50,50
resizepic 100 100 3600 380 300
dtext 180 120 52 Head Hunter[H.H]'ın En İyi Katilleri
for c 1 10
obj = <uid.<uid.<var.headh>.tag.hhsira<eval <local.c>>>>
dtext 160 <hval (<local.c>*20)+160> 1000 <obj.name>
dtext 400 <hval (<local.c>*20)+160> 38 <eval <obj.tag.hhpuan>>
endfor
dtext 120 150 38 Sıra
dtext 165 150 38 Ä°sim
dtext 395 150 38 Puan
for 1 10
dtext 125 <eval (<dlocal._for>*20)+160> 73 <dlocal._for>.
endfor
[function bbutton]
button <argv[0]>
dtext <argv[1]> <argv[2]>
[events e_headhunter]
on=@click
message @38,,1 [H.H]
On=@Spellcast
If (<src.isevent.e_headhunter>) && (<act.isevent.e_headhunter> = <src.isevent.e_headhunter>) && !(<act.uid> == <src.uid>) && !((<argn> == 6) || (<argn> == 04) || (<argn> == 11) || (<argn> == 29))
src.sysmessage @38,,1 Head hunter μyeleri birbirine zarar veremez.
src.hits -=3
return 1
endif
On=@Attack
If (<src.isevent.e_headhunter>)
sysmessage @38,,1 Head hunter μyeleri birbiriyle savaşamaz.
return 1
endif
on=@gethit
if (<src.isevent.e_headhunter>)
src.sysmessage @38,,1 Head hunter μyeleri birbirine zarar veremez.
src.hits -=3
return 1
endif
On=@EnvironChange
if (<src.kills> < 50)
src.sysmessage @38,,1 Aktif masum katliyamınız 50'nin altina dμştμğμ iΧin Head Hunter birliğinden atıldınız.
src.events -e_headhunter
src.tag.hhpuan 0
src.hhtop10
return 1
endif
//on=@death
//if (<src.tag.hhpuan> = 0)
//src.sms 0 puana sahipsiniz.
//return 1
//else
//src.tag.hhpuan -=1
//src.sms Oldugunuz Icin 1 Puan kaybettiniz.
//src.hhtop10
//return 1
//endif
/////////////////Nixdorfun top10 sisteminden alıntıdır./////////////
///////////////////H.H sistemine gore uyarlanmıştır.////////////////
[function forhh]
for b 1 10
obj = <uid.<uid.<var.headh>.tag.hhsira<eval <local.b>>>>
if (<eval <obj.tag.hhpuan>> < <eval <var.hhpun>>)
var.hhtq=<eval (<eval <local.b>> +1)>
var.hhnumber=<eval <local.b>>
src.headfor
return 1
endif
endfor
[FUNCTION forhyk]
for y <eval <var.hht>> 10
try uid.<var.headh>.tag.hhsira<eval <local.y> - 1> = <uid.<var.headh>tag.hhsira<eval <local.y>>>
endfor
src.forhh
[FUNCTION headfor]
for y 10 <eval <var.hhtq>>
try uid.<var.headh>.tag.hhsira<eval <local.y>> = <eval <uid.<var.headh>tag.hhsira<eval <local.y> - 1>>>
endfor
try uid.<var.headh>.tag.hhsira<eval <var.hhnumber>> = <src.uid>
[FUNCTION hhtop10]
var.hhpun=<eval <src.tag.hhpuan>>
FOR X 1 10
obj = <uid.<uid.<var.headh>.tag.hhsira<eval <local.x>>>>
if (<obj> = <src.uid>)
var.hht=<eval (<eval <local.x>> +1)>
var.hhnumber=<eval <local.x>>
src.forhyk
return 1
endif
endfor
src.forhh
////////////////////////////////////////////////////////////////////
[itemdef i_hh_puan]
id i_grave_stone
type t_sign_gump
on=@create
attr 010
color 021,,1
on=@click
message @0481,,1 Head Hunter Puan Ayar
return 1
on=@dclick
if (<src.account.plevel> < 2)
src.sysmessage @38,,1 Buna mudahale etmek icin yetkiniz yok.
return 1
else
dialog d_hh_ayar
return 1
endif
[dialog d_hh_ayar]
100,100
resizepic 50 50 3600 450 330
dtext 185 70 53 <serv.name> hh puan tablosu ayarı
dtext 70 150 38 H.H Stone UID:
dtext 70 100 73 Sayın ''<src.name>'' lμtfen hh puan tablosunun ayarlarını doğru ve
dtext 70 120 73 eksiksiz bir biΧimde doldurunuz.
resizepic 70 175 2620 180 35
dtextentry 80 185 200 20 1000 1 <uid>
dtext 300 340 72 Onayla
dtext 430 340 38 VazgeΧ
button 350 340 4015 4016 1 0 1
button 400 340 4018 4019 1 0 2
[dialog d_hh_ayar button]
on 1
var.headh <argtxt[1]>
src.smn Teşekkμrler ayarlandı.
return 1
endif
on 2
src.sms Ayardan vazgeΧtin.
return 1
[chardef c_headaraci]
name #names_humanmale
ID=c_man
can mt_nonmover
ON=@Create
STR=9111
INT=9111
DEX=9111
ALLSKILLS=0.0
COLOR=colors_skin
itemnewbie random_male_hair
color colors_hair
itemnewbie random_facial_hair
color match_hair
item i_shirt_plain
color colors_all
item random_pants
color colors_all
item random_shoes
color colors_neutral
item random_coin_purse
item i_robe
color 0455
itemnewbie i_backpack
itemnewbie i_bankbox
on=@click
message @0455,,1 [User of H.H]
message @38,,1 <name>
return 1
on=@dclick
dialog d_headhunter_araci
return 1
[dialog d_headhunter_araci]
50,50
resizepic 100 100 3600 412 300
dtext 250 120 52 Head Hunter[H.H]
dtext 115 180 38 <src.name>,
dtext 115 200 1000 Birinin kellesine odulmu koymak istiyorsun?Tam yerine geldin.
dtext 115 220 1000 Birini bu tecrubeli katillere katlettirmek istiyorsan kontrat alman
dtext 115 240 1000 gerekli.
dtext 115 260 1000 Kontrat almak istiyormusun?
bbutton 115 320 4006 4007 1 0 1,152 320 72,Evet almak istiyorum.(65000gp)
bbutton 115 340 4017 4018 1 0 2,152 340 38,Hayır almak istemiyorum.
[dialog d_headhunter_araci button]
on 1
if (<distance> > 3)
src.sms H.H user'e yeterince yakin degilsiniz.
return 1
elseif !(<src.restest 65000 i_gold>)
src.sms Cantanizda yeterli miktarda mebla yok.
return 1
else
src.consume 65000 i_gold
src.newitem i_olum_odul
new.bounce
return 1
endif
[itemdef i_olum_odul]
id i_deed
type t_deed
name Olum kontrati
on=@create
color 0455
timer -1
on=@click
message @0481,,1 <name>
return 1
on=@dclick
if (<cont> != <src.findlayer(layer_pack)>) || (<topobj.uid> != <src.uid>)
src.sms Kullanabilmek icin cantanizda olmasi gerekiyor.
return 1
else
src.smn Kimin kellesine odul koymak istiyorsun?
targetf f_odul_koycam
return 1
endif
[itemdef i_olum_odul2]
id i_deed
on=@create
color 0455
timer 86400
on=@click
if !(<timer> <= 0)
message @38,,1 Katledilecek kisi: [<link.name>]
message @0481,,1 Odul: [<eval <link.tag.odul>>gp]
<qval (<link> = <more2>) ? message @73,,1 [Gorev Bitti] : message @38,,1 [Gorev Bitmedi]>
<qval (<timer> < 3600) ? src.sms Kalan zaman <eval (<timer>/60)>dk. : src.smn Kalan zaman <eval (<timer>/3600> saat>
return 1
else
link.tag.odul 0
remove
return 1
endif
on=@dclick
if (<cont> != <src.findlayer(layer_pack)>) || (<topobj.uid> != <src.uid>)
src.sms Kullanabilmek icin cantanizda olmasi gerekiyor.
return 1
elseif (<link> = <more2>)
src.newitem i_gold
new.amount <src.findid.i_olum_odul2.link.tag.odul>
new.bounce
src.findid.i_olum_odul2.link.tag.odul 0
remove
return 1
else
targetf f_eklicem
src.smn Lutfen <link.name> isimli sahsin kellesini seciniz.
return 1
[function f_eklicem]
ref1 <targ>
ref2 <argo>
if !(<ref2.baseid> = i_flesh_head) && !(<ref1.baseid> = i_flesh_head_2)
src.sms Bu bir kelle degil
return 1
elseif (<ref1.link> != <ref2.link>)
src.sms Bu kelle <ref1.link.name>'e ait degil.
return 1
elseif (<ref1.more2>)
src.sms Buna zaten kelleyi eklemissiniz.
return 1
else
ref1.more2 <ref2.link>
ref2.remove
src.smn <ref1.link.name> sahisli kisinin kellesini basariyla eklediniz.
return 1
endif
[function f_odul_koycam]
ref1 = <argo>
ref2 = <uid.0e47> //bu benim headhunter masterimin uidi/seriali siz kendinizinkine gore ayarlayin.
if (<ref1.isevent.e_headhunter>)
src.sms H.H uyelerinin kellelerine odul koyamazsiniz.
return 1
elseif !(<ref1.isplayer>)
src.sms Sadece oyuncularin kellelerine odul koyabilirsin.
return 1
elseif !(<ref1.tag.odul> = 0)
src.sms Bu oyuncunun kellesine odul koyulmus zaten.
return 1
elseif !(<src.restest 1 i_olum_odul>)
src.sms Olum kontratiniz yok.
return 1
else
src.consume 1 i_olum_odul
src.newitem i_olum_odul2
new.link <ref1.uid>
new.link.tag.odul 65000
new.cont <uid.<ref2>.findlayer.29.uid>
src.sms <ref1.name> in kellesine odul koydunuz.
return 1
endif
[function sms] //kırmızı renk sysmessage
sysmessage @38,,1 <args>
[function smn] //yeşil renk sysmessage
sysmessage @73,,1 <args>
ısrar ediyorum kelle avcılığı vardı ama sanırım aktif edilmemişti ?
