/////////////////////////////////////////////////////////////////////////////////////////

/////////////////////////////////////////////////////////////////////////////////////////

/////////////////////////////////////////////////////////////////////////////////////////

//////////                     Tüm Hakları Saklıdır  

/////////- Tarih : 30.08.2008 -

////////                       Coder KoinoT

///////

//////    - Erk Akdemir - 

////

///       - [email protected]

// İç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

Değerlendirmeler

0

Total votes: 0