[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