Herkes binebiliyor?(BEAR)

[itemdef i_et_bear] 
name=Ethereal Bear 
id=i_mt_bear  
TDATA3=01bb
layer=25 

on=@create 
color=07a1

on=@equip 
link=<src.uid>  

on=@unequip
src.newnpc c_bear_polar_M
	link <src.act.uid>
	link.memorydel <src.uid>
	link.newitem i_memory
	link.act.more1 04
	link.act.more2 <serv.time>
	link.act.morep <link.p>
	link.act.color memory_ipet
	link.act.timer -1
	link.act.link <src.uid>
	link.act.cont <link.uid>
	link.flags <link.flags>&statf_pet
	link.update
	link.anim 5
	link.bark 3

[itemdef i_et_eb] 
NAME=Ethereal Bear 
id=i_pet_Bear 
type=t_normal 

CATEGORY=Other
SUBSECTION=Ethereal pets 
DESCRIPTION=Ethereal Bear 

on=@create 
color=00

on=@dclick 
IF (<SRC.FINDID.i_drum_timer>==1)
src.message You can't mout an etheral pet while A Spirit Is Within You! 
RETURN 1
elseif (<src.flags>&000000400)
src.message You can't mout an etheral pet while polymorphed!
return 1
elseif !(<src.findlayer.25.uid>) 
src.newitem i_et_bear 
src.act.equip 
src.update 
remove 
return 1 
else 
src.message you are already mounted 
return 1 
endif 

[CHARDEF c_bear_polar_M]
DEFNAME=c_bear_polar_M
NAME=Polar Bear
ID=c_bear_polar
ANIM=01fff
SOUND=snd_ANIMALS_BEAR1
ICON=i_pet_bear_polar
DAM=1,3
ARMOR=9
RESOURCES=11 i_ribs_raw,5 i_fur_light
CAN=MT_WALK|MT_RUN
FOODTYPE=6 t_FISH,5 t_fruit, 15 t_meat_raw
SHELTER=r_snow,r_caves,r_mountains
DESIRES=r_snow
AVERSIONS=r_civilization
tag.mountid i_mt_bear
tevents=e_mounts

CATEGORY=Mounts
SUBSECTION=Unusual Mounts
DESCRIPTION=Polar Bear

ON=@Create
NPC=brain_animal
COLOR=07a1
STR={4500 5000}
DEX={1250 1500}
INT={2000 2500}
PARRYING={50.0 60.0}
MAGICRESISTANCE={45.0 60.0}
TACTICS={70.0 100.0}
WRESTLING={90.0 95.0}
TAMING=50.0
FISHING=20.0
TAMING=99.9
AnimalLore=99.9
Veterinary=99.9
FAME=3000
KARMA=3000

on=@dclick
IF (<SRC.FINDID.i_drum_timer>==1)
src.message Oluyken binemezsiniz...
RETURN 1
flags>&000000400)
src.message Bu halde binemezsiniz...
return 1
elseif !(<src.findlayer.25.uid>) 
src.newitem i_et_bear 
src.act.equip 
src.update 
remove 
return 1 
else 
src.message Zaten biniyorsun ac gozlu...
return 1 
endif 


[EOF]