/////////////////////////////////////////////////////////////////////////////////////////
/////////////////////////////////////////////////////////////////////////////////////////
/////////////////////////////////////////////////////////////////////////////////////////
//////////                     Paylaşım
/////////- Tarih : 30.08.2008 -
////////                       Coder KoinoT
///////
//////    - Erk Akdemir -
/////                          Groza Pvp
////
///       - koinot_scp@almancax.com
// İçerik : Kelle Teslim




[chardef c_head]
defname c_head
id c_man
can mt_equip|mt_nonmover
hiredaywage 52
desires i_gold

On=@Create
str 9500
dex 25
int 25
color colors_skin
speechcolor 0481
food 990
npc 1

itemnewbie random_male_hair
color 0481
itemnewbie random_facial_hair
color 0481
itemnewbie i_robe
color 0455
itemnewbie i_lantern
color 0481

on=@spelleffect
src.skill fail
return 1

on=@gethit
src.skill fail
return 1

on=@hit
return 1

On=@Click
message @33 [Head Hunter]
message @07a1 <name>
return 1

On=@Dclick
if (<distance> < 3)
src.dialog d_head_hunter
else
src.sysmessage @33 Yeterince yakin degilsiniz.
endif
return 1

[dialog d_head_hunter]
100,50

resizepic 20 40 3500 430 195

text 50 45 90 0
text 50 80 1000 1
text 50 115 1000 2
text 50 150 1000 3
text 90 190 0 4
text 290 190 0 5

button 70 190 2714 2715 1 0 1
button 270 190 2714 2715 1 0 2

[dialog d_head_hunter text]
Merhaba Hunter <src.name>!
Son Kurban : <uid.013467.tag.whohead>
En iyi hunter : <uid.013467.tag.whofirst>
Toplam <eval <tag.headsal>> kafa teslim ettiniz.
Kafa Teslim Et
Cikis

[dialog d_head_hunter button]
on=0

on=1
src.newitem i_teslimat
src.act.equip
return 1

[itemdef i_teslimat]
name=teslimci
id=i_memory
type=t_eq_script
weight=0
layer=layer_special

On=@Create
attr attr_invis|attr_decay

on=@equip
target @50 Hangi kafayi teslim edeceksiniz.
return 1

on=@targon_char
src.sysmessage @1100 Bunu yapamazsiniz.
remove
return 1

On=@Targon_Ground
src.sysmessage @1100 Bunu yapamazsiniz.
remove
return 1

on=@targon_cancel
remove
return 1

On=@Targon_Item
if (<src.targ.link.uid> == <src.uid>)
src.sysmessage @1100 Kendi kafanizi sallandiramazsiniz.
remove
return 1
endif
if (<src.targ.baseid> == i_flesh_head) || (<src.targ.baseid> == i_flesh_head_2) && !(<src.targ.link> == 04fffffff)
If (<src.targ.link.fame> == 0)
src.sysmessage @1100 Bu kafanin hicbir degeri yok.
remove
return 1
else
if (<eval <src.tag.headsal>> > <eval <uid.013467.tag.whofirstsay>>)
var.goldver <eval <src.targ.link.fame>*2>
src.tag.headsal +=1
try uid.013467.tag.whohead <src.targ.link.name>
try uid.013467.tag.whofirst <src.name>
try uid.013467.tag.whofirstsay <eval <src.tag.headsal>>
src.newitem i_gold
src.new.amount <var.goldver>
src.new.bounce
serv.allclients sysmessage @0481,,1 <src.targ.link.name> 'in kafasi , <src.name> tarafindan teslim edildi.
src.sysmessage @0481 Teslimat tamamlandi. <eval <var.goldver>> gold kazandiniz.
src.targ.remove
remove
else
var.goldver <eval <src.targ.link.fame>*2>
src.tag.headsal +=1
try uid.013467.tag.whohead <src.targ.link.name>
src.newitem i_gold
src.new.amount <var.goldver>
src.new.bounce
serv.allclients sysmessage @0481,,1 <src.targ.link.name> 'in kafasi , <src.name> tarafindan teslim edildi.
src.sysmessage @50 Teslimat tamamlandi. <eval <var.goldver>> gold kazandiniz.
src.targ.remove
remove
endif
endif
else
src.sysmessage @1100 Bunu yapamazsiniz.
remove
endif
return 1



[EOF]