[CHARDEF c_dark_elf]
ID=c_man
NAME=#NAMES_ELF_MALE the Dark Elf
ICON=i_pet_man
CAN=MT_WALK|MT_USEHANDS|MT_EQUIP|MT_RUN
DAM=7,23
ARMOR=25
DESIRES=i_gold
SHELTER=r_spooky
BLOODCOLOR=0901

CATEGORY=Monsters
SUBSECTION=Dark Elf
DESCRIPTION=Dark Elf

ON=@Create
KARMA={-5000 -6000}
FAME={800 900}
NPC=brain_monster
COLOR=0901
STR={170 220}
DEX={70 90}
INT={160 200}
ARCHERY={75.0 100.0}
PARRYING={80.0 99.0}
MAGICRESISTANCE={45.0 60.0}
TACTICS={79.0 90.0}
WRESTLING={40.0 55.0}
MAGICRESISTANCE={65.0 88.0}
ITEM=i_beard_long_med
ATTR=014
COLOR=0901
ITEM=i_hair_long
ATTR=014
COLOR=0901

ON=@NPCRestock
ITEM=i_cape
COLOR=0901
ITEM=i_studded_tunic
COLOR=0901
ITEM=i_studded_sleeves
COLOR=0901
ITEM=i_bow_elven
NAME=Dark Elven Bow
COLOR=0411
ITEM=i_boots_thigh
HITPOINTS=100
ITEM=i_studded_gloves
COLOR=0901
ITEM=i_arrow,150
ITEM=i_black_dye
ITEM={ random_jewel 1 0 1 }
ITEM={ random_jewel 1 0 1 }
ITEM=i_gold,{100 200}

ON=@EnvironChange
if (<eval <SECTOR.LIGHT>> < 23)
   NEWITEM=i_fx_smoke
   ACT.P=<P>
   ACT.ATTR=attr_static|attr_decay
   ACT.SAY Gah the light!
   ACT.TIMER=2
   REMOVE
endif
return 1

ON=@NPCSeeNewPlayer
if (<eval <SECTOR.LIGHT>> < 23)
   NEWITEM=i_fx_smoke
   ACT.P=<P>
   ACT.ATTR=attr_static|attr_decay
   ACT.SAY Gah the light!
   ACT.TIMER=2
   REMOVE
endif

[ITEMDEF i_black_dye]
NAME=bottle of black dye
ID=i_bottle_4
TYPE=t_normal
WEIGHT=1

ON=@Create
COLOR=0901

ON=@DClick
TARGET Choose a dye tub to use this on.
return 1

ON=@TargOn_item
IF (<SRC.TARG.TYPE>=t_dye_vat)
   SRC.TARG.COLOR=01
   SRC.SYSMESSAGE You dye the vat black.
ELSE
   SRC.MESSAGE you must use this on a dying tub
endif
RETURN 1

ON=@TargOn_Char
SRC.SYSMESSAGE You must use this on a dying tub.
RETURN 1

ON=@TargOn_Ground
SRC.SYSMESSAGE You must use this on a dying tub.
RETURN 1