[CHARDEF C_developer3]

NAME Developer

SOUND snd_ANIMALS_HORSE1

ID c_horse_brown_lt

CAN MT_WALK|MT_RUN

ICON i_pet_horse_brown_lt

DESCRIPTION=Mustang

SUBSECTION=Horses 

CATEGORY=Animals



on=@Click

message @07a1,,1 <name>

return 1



On=@Hit

if (rand(20) <= <eval (<anatomy> / 20)>) && !(<src.findid.i_mem_frozens>)

if !(<findlayer(1)> || <findlayer(2)>) 

src.damage {10 15}

src.skill fail

var.act <src.act.uid>

src.newitem i_mem_frozens

src.act.equip

src.act <var.act>

src.say @07a1,1,1 "Binek sayesinde sersemler''

return 1

endif

endif

endif



ON=@Create

COLOR=080a



	

STR={400 600}

DEX={100 250}

INT={6 10}





TACTICS={60.0 70.0}

WRESTLING={90.0 99.0}

SWORDSMANSHIP={80.0 90.0}

TAMING=120.0



NPC=brain_animal

FAME=7000

KARMA=0

KILLS=0



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

[itemdef i_mem_frozens]

name=frozen memorys

id=i_memory 

type=t_eq_script 

layer=layer_special 



on=@create 

attr=attr_decay | attr_newbie 



on=@equip 

timer 2

SRC.FLAGS=<SRC.FLAGS>|04 



on=@timer 

cont.flags=<cont.FLAGS>&~04 

cont.say @07a1,1,1" * Binek Affeder *

remove 

return 1