[defname biletstone]

biletstone_1 "eklenecek"

biletstone_2 "eklenecek"

biletstone_3 "eklenecek"

biletstone_4 "eklenecek"

biletstone_5 "eklenecek"

biletstone_6 "eklenecek"

biletstone_7 "eklenecek"

biletstone_8 "eklenecek"

biletstone_9 "eklenecek"

biletstone_10 "eklenecek"



[CHARDEF c_bilet_npc]

id = c_man

name = Bilet Npc

can = mt_walk|mt_run|mt_usehands

armor = 60

dam = 10,11

tevents = e_show_lastattacker



on=@deathcorpse

argo.tag0.degerli 1

argo.tag0.maxattacker <attacker.max>

argo.events +e_lock_corpse



On=@Create

color = 1

str = 150

dex = 100

int = 1



fame = 1000

karma = -9000



wrestling = 100.0

tactics = 100.0

swordsmanship = 100.0

fencing = 100.0



itemnewbie = i_blackrock_platemail

itemnewbie = i_blackrock_platemail_gorget

itemnewbie = i_blackrock_platemail_arms

itemnewbie = i_blackrock_platemail_gauntlets

itemnewbie = i_blackrock_heater_shield

itemnewbie = i_blackrock_platemail_leggings

itemnewbie = i_blackrock_plate_helm

itemnewbie = i_katana

itemnewbie = i_robe

color = 0799



On=@NpcRestock

item = i_gold,{2500 10000}

item = i_treasure_bottle,R10



[events e_show_lastattacker]

on=@click

ref1=<attacker.last>



message @48 [Son Saldiran:<ref1.name>]



[typedef e_lock_corpse]

on=@dclick

if !(<src.uid> == <tag0.maxattacker>)

src.sys_hata Bu Cesedin Sahidi siz degilsiniz.

return 1

endif



on=@click

ref2=<tag0.maxattacker>

message @48 [Cesedin Sahibi:<ref2.name>]



[events e_bilet]

on=@click

message @07a1 [<region.name>]





on=@death

src.resurrect

src.hits <src.str>

src.stam <src.dex>

src.mana <src.int>

src.go Safe Alan

return 1



on=@attack

if (<src.isplayer>)

src.sys_hata Bu alanda oyunculara saldiramazsiniz.

skill fail

endif



[function bilet]

targetf biletcevir

src.sys_ok Bilete Cevirmek istediginiz cesedi secin ?



[function biletcevir]

ref1= <argo.uid>

	if (<ref1.tag0.degerli> == 1)

	serv.newitem i_bilet,{1 5},<src>

	src.sys_ok Cesedi Basariyla Bilete cevirdiniz.

	ref1.remove

	gorev

	else

	src.sys_hata Ceset Yeterince degerli degil.

	ref1.remove

	endif



[itemdef i_bilet]

defname=i_bilet

id=i_gem_diamond

name=Bilet

type=t_bilet



[typedef t_bilet]

on=@click

message @048 [Newbified]

message @07a1 <amount> Adet <name>

return 1



on=@dclick

src.sys_ok Bilet Stoneden Esya Almak icin kullanilir.

return 1



on=@create

attr attr_newbie

color 0481



[itemdef i_bilet_stone]

defname=i_bilet_stone

id=i_gravestone_17

name=Bilet Stone



on=@click

message @48,,1 [<serv.name>]

message @07a1 <name>

return 1



on=@dclick

sdialog d_biletstone

return 1



on=@create

color 07a1

return 1



[dialog d_biletstone]

0,0

nomove

makebg 125,150,220,335

for x 1 10

	button 140 <eval (<local.x>*30)+140> 55 56 1 0 <dlocal.x>

	dtext 155 <eval (<local.x>*30)+140> 1153 <def.biletstone_<dlocal.x>>

endfor



[dialog d_biletstone Button]

on=1,10

src.sysmessage @07a1 <def.biletstone_<dargn>>.