//#####################
// Classes
//#####################

// 10.10.2001, MoNK: file created

[FUNCTION f_vampire_only]
	if <src.plot1>&plotmask_vampire
		if <src.karma>>4000
			src.message Thy deeds have not sustained enough to forge your soul to be rigid!
			unequip
			return 1
		else		
			src.message Thau art wilst be protected by Blood God!
			return 1
		endif
	else
		src.message Thau does not belong to Bloodsucking Breed!
		src.damage {5 10}
		unequip
		return 1
	endif
	return 1

[FUNCTION f_vampire_knight_only]
	if <src.plot1>&plotmask_vampire
		if <src.karma>>2000
			src.message Thy deeds have not sustained enough to forge your soul to be rigid!
			unequip
			return 1
		endif
		if <src.fame><3500
			src.message Art thau realy Vampire Knight?
			unequip
			return 1
		endif
		src.message  Thau art wilst be guarded by Blood God you, Brave Bat!
		return 1
	else
		src.message Thau does not belong to Bloodsucking Breed!
		src.damage {10 20}		
		src.mana=(<src.mana>/2)
		src.stamina=(<src.stamina>/2)
		unequip
		return 1
	endif

[FUNCTION f_nosferatu_only]
	if <src.plot1>&plotmask_vampire
		if <src.karma>>0
			src.message Thy deeds have not sustained enough to forge your soul to be rigid!
			unequip
			return 1
		endif
		if <src.fame><7500
			src.message Art thau realy Nosferatu?
			unequip
			return 1
		endif
		src.message Blood God shalst bestow His hand on you, Master!
		return 1
	else
		src.message Thau does not belong to Bloodsucking Breed!
		src.damage {20 40}
		src.mana=0
		src.stamina=0
		unequip
		return 1
	endif

[FUNCTION f_old_vampire]
	if <src.plot1>&plotmask_vampire
		src.message Thy places armor on dy shoulders to recipicate enourmous force of perished Blood God Clan...
		src.sfx 0e6	// wolf
	else
		src.message Thy sure projects an image of a worthy vampire, wimp!
	endif
	return 1

[FUNCTION f_old_nosferatu]
	if <src.plot1>&plotmask_vampire
		src.message You wear this strange armor and feel the power of old Blood God Clan...
		src.sfx 0e6	// wolf
	else
		src.message Thy sure projects an image of a worthy Nosferatu, wimp!
	endif
	return 1

[FUNCTION f_light_only]
	if <src.plot1>&plotmask_paladin
		if <src.karma><2500
			src.message Thy soul exerts one of the low karma, not suitable for Follower of Light!
			unequip
			return 1
		else		
			src.message Tis <name> offers thee to be thy guardian!
			return 1
		endif
	else
		src.message Only those, who venture upon the way of Light may wear tis <name>!
		src.damage {5 10}
		unequip
		return 1
	endif
	return 1

[FUNCTION f_light_knight_only]
	if <src.plot1>&plotmask_paladin
		if <src.karma><5000
			src.message Thy soul exerts one of the low karma, not suitable for Knight of Light!
			unequip
			return 1
		endif
		if <src.fame><3500
			src.message Doest thau convinced, that he is the Knight of Light?
			unequip
			return 1
		endif
		src.message Tis <name> offers thee to be thy guardian!
		return 1
	else
		src.message Only those, who venture upon the way of Light may wear tis <name>!
		src.damage {10 20}
		src.mana=(<src.mana>/2)
		src.stamina=(<src.stamina>/2)
		unequip
		return 1
	endif

[FUNCTION f_light_lord_only]
	if <src.plot1>&plotmask_paladin
		if <src.karma><7500
			src.message Thy soul exerts one of the low karma, not suitable for Lord of Light!
			unequip
			return 1
		endif
		if <src.fame><7500
			src.message In order to wear armor of the Lord of Light, you must be one!
			unequip
			return 1
		endif
		src.message Tis <name> offers thee to be thy guardian!
		return 1
	else
		src.message Only those, who venture upon the way of Light may wear tis <name>!
		src.damage {20 40}
		src.mana=0
		src.stamina=0
		unequip
		return 1
	endif

//=================================================================================
// Materials
//=================================================================================
// Holy Silver Ingot
// Holy Gold Ingot

// Undead Blood
// Vial of Undead Blood

// Damned Gold Ingot

// Sacred Blood
// Vial of Sacred Blood

[ITEMDEF i_ingot_silver_holy]
NAME=Holy Silver Ingot%s
ID=i_ingot_silverSW

WEIGHT=0.8
VALUE=1000

RESOURCES=i_ingot_newsilver

CATEGORY=Races & Classes
SUBSECTION=Materials
DESCRIPTION=Holy Silver Ingot

[ITEMDEF i_ingot_gold_holy]
NAME=Holy Gold Ingot%s
ID=i_ingot_goldSW

WEIGHT=1.8
VALUE=1000

RESOURCES=i_ingot_newgold

CATEGORY=Races & Classes
SUBSECTION=Materials
DESCRIPTION=Holy Gold Ingot

[ITEMDEF i_ingot_gold_damned]
NAME=Damned Gold Ingot%s
ID=i_ingot_goldSW

WEIGHT=1.8
VALUE=1000

RESOURCES=i_ingot_newgold

CATEGORY=Races & Classes
SUBSECTION=Materials
DESCRIPTION=Damned Gold Ingot

[ITEMDEF i_blood_undead]
NAME=Undead Blood
ID=i_blood_pool_large

VALUE=1000

CATEGORY=Races & Classes
SUBSECTION=Materials
DESCRIPTION=Undead Blood

On=@Create
	color=color_o_verite

[ITEMDEF i_vial_blood_undead]
NAME=Undead Blood Vial%s
ID=i_vial_empty

VALUE=1000

RESOURCES=i_vial_empty, i_blood_undead

CATEGORY=Races & Classes
SUBSECTION=Materials
DESCRIPTION=Vial of Undead Blood

On=@Create
	color=color_o_verite

[ITEMDEF i_blood_sacred]
NAME=Sacred Blood
ID=i_blood_pool_large

VALUE=1000

CATEGORY=Races & Classes
SUBSECTION=Materials
DESCRIPTION=Sacred Blood

[ITEMDEF i_vial_blood_sacred]
NAME=Sacred Blood Vial%s
ID=i_vial_empty

VALUE=1000

RESOURCES=i_vial_empty, i_blood_sacred

CATEGORY=Races & Classes
SUBSECTION=Materials
DESCRIPTION=Vial of Sacred Blood

On=@Create
	color=020

[DEFNAME COLOR_LIGHT]
color_armor_light_follower	0
color_armor_light_knight	0
color_armor_light_lord	0

// Armor of Light
// Blessed Armor of Light
// Sacred Armor of Light

[ITEMDEF i_platemail_arms_light]
NAME=Arms of Light
ID=i_platemail_arms

RESOURCES=18 i_ingot_gold_holy, 18 i_vial_blood_undead

CATEGORY=Races & Classes
SUBSECTION=Light Stuff
DESCRIPTION=Platemail Arms of Light

On=@Spell
	if (<argn>==s_bless) || (<argn>==s_curse)
		return 1
	endif

On=@Equip
	f_light_only

On=@Create
	color = color_armor_light_follower
	attr = attr_magic | attr_identified
	morey = 210.0

[ITEMDEF i_platemail_legs_light]
NAME=Leggings of Light
ID=i_platemail_leggings

RESOURCES=20 i_ingot_gold_holy, 20 i_vial_blood_undead

CATEGORY=Races & Classes
SUBSECTION=Light Stuff
DESCRIPTION=Platemail Leggings of Light

On=@Spell
	if (<argn>==s_bless) || (<argn>==s_curse)
		return 1
	endif

On=@Equip
	f_light_only

On=@Create
	color = color_armor_light_follower
	attr = attr_magic | attr_identified
	morey = 210.0

[ITEMDEF i_platemail_gorget_light]
NAME=Gorget of Light
ID=i_platemail_gorget

RESOURCES=10 i_ingot_gold_holy, 10 i_vial_blood_undead

CATEGORY=Races & Classes
SUBSECTION=Light Stuff
DESCRIPTION=Platemail Gorget of Light

On=@Spell
	if (<argn>==s_bless) || (<argn>==s_curse)
		return 1
	endif

On=@Equip
	f_light_only

On=@Create
	color = color_armor_light_follower
	attr = attr_magic | attr_identified
	morey = 210.0

[ITEMDEF i_platemail_gloves_light]
NAME=Gauntlets of Light
ID=i_platemail_golves

RESOURCES=12 i_ingot_gold_holy, 12 i_vial_blood_undead

CATEGORY=Races & Classes
SUBSECTION=Light Stuff
DESCRIPTION=Platemail Gloves of Light

On=@Spell
	if (<argn>==s_bless) || (<argn>==s_curse)
		return 1
	endif

On=@Equip
	f_light_only

On=@Create
	color = color_armor_light_follower
	attr = attr_magic | attr_identified
	morey = 210.0

[ITEMDEF i_platemail_chest_light]
NAME=Platemail Chest of Light
ID=i_platemail_chest

RESOURCES=25 i_ingot_gold_holy, 25 i_vial_blood_undead

CATEGORY=Races & Classes
SUBSECTION=Light Stuff
DESCRIPTION=Platemail Chest of Light

On=@Spell
	if (<argn>==s_bless) || (<argn>==s_curse)
		return 1
	endif

On=@Equip
	f_light_only

On=@Create
	color = color_armor_light_follower
	attr = attr_magic | attr_identified
	morey = 210.0

[ITEMDEF i_helmet_light]
NAME=Helmet of Light
ID=i_helm_open

RESOURCES=15 i_ingot_gold_holy, 15 i_vial_blood_undead

CATEGORY=Races & Classes
SUBSECTION=Light Stuff
DESCRIPTION=Helmet of Light

On=@Spell
	if (<argn>==s_bless) || (<argn>==s_curse)
		return 1
	endif

On=@Equip
	f_light_only

On=@Create
	color = color_armor_light_follower
	attr = attr_magic | attr_identified
	morey = 210.0



[ITEMDEF i_platemail_arms_blessed]
NAME=Arms of Light
ID=i_platemail_arms

RESOURCES=9 i_ingot_silver_holy, 9 i_ingot_gold_holy, 18 i_vial_blood_undead

CATEGORY=Races & Classes
SUBSECTION=Light Stuff
DESCRIPTION=Blessed Platemail Arms of Light

On=@Spell
	if (<argn>==s_bless) || (<argn>==s_curse)
		return 1
	endif

On=@Equip
	f_light_only

On=@Create
	color = color_armor_light_knight
	attr = attr_magic | attr_blessed | attr_identified
	morey = 245.0

[ITEMDEF i_platemail_legs_blessed]
NAME=Leggings of Light
ID=i_platemail_leggings

RESOURCES=10 i_ingot_silver_holy, 10 i_ingot_gold_holy, 20 i_vial_blood_undead

CATEGORY=Races & Classes
SUBSECTION=Light Stuff
DESCRIPTION=Blessed Platemail Leggings of Light

On=@Spell
	if (<argn>==s_bless) || (<argn>==s_curse)
		return 1
	endif

On=@Equip
	f_light_only

On=@Create
	color = color_armor_light_knight
	attr = attr_magic | attr_blessed | attr_identified
	morey = 245.0

[ITEMDEF i_platemail_gorget_blessed]
NAME=Gorget of Light
ID=i_platemail_gorget

RESOURCES=5 i_ingot_silver_holy, 5 i_ingot_gold_holy, 10 i_vial_blood_undead

CATEGORY=Races & Classes
SUBSECTION=Light Stuff
DESCRIPTION=Blessed Platemail Gorget of Light

On=@Spell
	if (<argn>==s_bless) || (<argn>==s_curse)
		return 1
	endif

On=@Equip
	f_light_only

On=@Create
	color = color_armor_light_knight
	attr = attr_magic | attr_blessed | attr_identified
	morey = 245.0

[ITEMDEF i_platemail_gloves_blessed]
NAME=Gauntlets of Light
ID=i_platemail_golves

RESOURCES=6 i_ingot_silver_holy, 6 i_ingot_gold_holy, 12 i_vial_blood_undead

CATEGORY=Races & Classes
SUBSECTION=Light Stuff
DESCRIPTION=Blessed Platemail Gloves of Light

On=@Spell
	if (<argn>==s_bless) || (<argn>==s_curse)
		return 1
	endif

On=@Equip
	f_light_only

On=@Create
	color = color_armor_light_knight
	attr = attr_magic | attr_blessed | attr_identified
	morey = 245.0

[ITEMDEF i_platemail_chest_blessed]
NAME=Platemail Chest of Light
ID=i_platemail_chest

RESOURCES=12 i_ingot_silver_holy, 12 i_ingot_gold_holy, 25 i_vial_blood_undead

CATEGORY=Races & Classes
SUBSECTION=Light Stuff
DESCRIPTION=Blessed Platemail Chest of Light

On=@Spell
	if (<argn>==s_bless) || (<argn>==s_curse)
		return 1
	endif

On=@Equip
	f_light_only

On=@Create
	color = color_armor_light_knight
	attr = attr_magic | attr_blessed | attr_identified
	morey = 245.0

[ITEMDEF i_helmet_blessed]
NAME=Helmet of Light
ID=i_helm_open

RESOURCES=8 i_ingot_silver_holy, 8 i_ingot_gold_holy, 15 i_vial_blood_undead

CATEGORY=Races & Classes
SUBSECTION=Light Stuff
DESCRIPTION=Blessed Helmet of Light

On=@Spell
	if (<argn>==s_bless) || (<argn>==s_curse)
		return 1
	endif

On=@Equip
	f_light_only

On=@Create
	color = color_armor_light_knight
	attr = attr_magic | attr_blessed | attr_identified
	morey = 245.0





[ITEMDEF i_platemail_arms_sacred]
NAME=Arms of Light
ID=i_platemail_arms

RESOURCES=18 i_ingot_silver_holy, 18 i_vial_blood_undead

CATEGORY=Races & Classes
SUBSECTION=Light Stuff
DESCRIPTION=Sacred Platemail Arms of Light

On=@Spell
	if (<argn>==s_bless) || (<argn>==s_curse)
		return 1
	endif

On=@Equip
	f_light_only

On=@Create
	color = color_armor_light_lord
	attr = attr_magic | attr_blessed2 | attr_identified
	morey = 280.0

[ITEMDEF i_platemail_legs_sacred]
NAME=Leggings of Light
ID=i_platemail_leggings

RESOURCES=20 i_ingot_silver_holy, 20 i_vial_blood_undead

CATEGORY=Races & Classes
SUBSECTION=Light Stuff
DESCRIPTION=Sacred Platemail Leggings of Light

On=@Spell
	if (<argn>==s_bless) || (<argn>==s_curse)
		return 1
	endif

On=@Equip
	f_light_only

On=@Create
	color = color_armor_light_lord
	attr = attr_magic | attr_blessed2 | attr_identified
	morey = 280.0

[ITEMDEF i_platemail_gorget_sacred]
NAME=Gorget of Light
ID=i_platemail_gorget

RESOURCES=10 i_ingot_silver_holy, 10 i_vial_blood_undead

CATEGORY=Races & Classes
SUBSECTION=Light Stuff
DESCRIPTION=Sacred Platemail Gorget of Light

On=@Spell
	if (<argn>==s_bless) || (<argn>==s_curse)
		return 1
	endif

On=@Equip
	f_light_only

On=@Create
	color = color_armor_light_lord
	attr = attr_magic | attr_blessed2 | attr_identified
	morey = 280.0

[ITEMDEF i_platemail_gloves_sacred]
NAME=Gauntlets of Light
ID=i_platemail_golves

RESOURCES=12 i_ingot_silver_holy, 12 i_vial_blood_undead

CATEGORY=Races & Classes
SUBSECTION=Light Stuff
DESCRIPTION=Sacred Platemail Gloves of Light

On=@Spell
	if (<argn>==s_bless) || (<argn>==s_curse)
		return 1
	endif

On=@Equip
	f_light_only

On=@Create
	color = color_armor_light_lord
	attr = attr_magic | attr_blessed2 | attr_identified
	morey = 280.0

[ITEMDEF i_platemail_chest_sacred]
NAME=Platemail Chest of Light
ID=i_platemail_chest

RESOURCES=25 i_ingot_silver_holy, 25 i_vial_blood_undead

CATEGORY=Races & Classes
SUBSECTION=Light Stuff
DESCRIPTION=Sacred Platemail Chest of Light

On=@Spell
	if (<argn>==s_bless) || (<argn>==s_curse)
		return 1
	endif

On=@Equip
	f_light_only

On=@Create
	color = color_armor_light_lord
	attr = attr_magic | attr_blessed2 | attr_identified
	morey = 280.0

[ITEMDEF i_helmet_sacred]
NAME=Helmet of Light
ID=i_helm_open

RESOURCES=15 i_ingot_silver_holy, 15 i_vial_blood_undead

CATEGORY=Races & Classes
SUBSECTION=Light Stuff
DESCRIPTION=Sacred Helmet of Light

On=@Spell
	if (<argn>==s_bless) || (<argn>==s_curse)
		return 1
	endif

On=@Equip
	f_light_only

On=@Create
	color = color_armor_light_lord
	attr = attr_magic | attr_blessed2 | attr_identified
	morey = 280.0




[ITEMDEF i_shield_light]
NAME=Shield of Light
ID=i_shield_kite_metal
DYE=0

RESOURCES=20 i_ingot_gold_holy, 20 i_vial_blood_undead

CATEGORY=Races & Classes
SUBSECTION=Light Stuff
DESCRIPTION=Shield of Light

On=@Spell
	if (<argn>==s_bless) || (<argn>==s_curse)
		return 1
	endif

On=@Equip
	f_light_only

On=@Create
	color = color_armor_light_follower
	attr = attr_magic | attr_identified
	morey = 210.0

[ITEMDEF i_shield_blessed]
NAME=Shield of Light
ID=i_shield_kite_metal
DYE=0

RESOURCES=10 i_ingot_silver_holy, 10 i_ingot_gold_holy, 20 i_vial_blood_undead

CATEGORY=Races & Classes
SUBSECTION=Light Stuff
DESCRIPTION=Blessed Shield of Light

On=@Spell
	if (<argn>==s_bless) || (<argn>==s_curse)
		return 1
	endif

On=@Equip
	f_light_knight_only

On=@Create
	color = color_armor_light_knight
	attr = attr_magic | attr_blessed | attr_identified
	morey = 245.0

[ITEMDEF i_shield_sacred]
NAME=Shield of Light
ID=i_shield_kite_metal
DYE=0

RESOURCES=20 i_ingot_silver_holy, 20 i_vial_blood_undead

CATEGORY=Races & Classes
SUBSECTION=Light Stuff
DESCRIPTION=Sacred Shield of Light

On=@Spell
	if (<argn>==s_bless) || (<argn>==s_curse)
		return 1
	endif

On=@Equip
	f_light_lord_only

On=@Create
	color = color_armor_light_lord
	attr = attr_magic | attr_blessed2 | attr_identified
	morey = 280.0

[ITEMDEF i_sword_light]
NAME=Blade of Light
ID=i_sword_long

On=@Create
	color = color_armor_light_lord

On=@Targon_item
	return 1

On=@Targon_ground
	return 1

On=@Spell
	if (<argn>==s_bless) || (<argn>==s_curse)
		return 1
	endif

On=@Equip
	f_light_only

[ITEMDEF i_sword_exorcist]
NAME=Exorcist
ID=i_sword_viking

On=@Create
	color = color_armor_light_lord

On=@Targon_item
	return 1

On=@Targon_ground
	return 1

On=@Spell
	if (<argn>==s_bless) || (<argn>==s_curse)
		return 1
	endif

On=@Equip
	f_light_lord_only

//=================================================================================
// Vampire items
//=================================================================================

[ITEMDEF 06008]
// blood bottle
DEFNAME=blood_bottle
NAME=Bottle of blood
ID=i_bottle_black
PILE=0
WEIGHT=1.0

On=@Create
	color 020

On=@Dclick
	if !(<src.plot1>&plotmask_vampire)
		src.sysmessage You are sick! Only vampires can drink blood...
		src.damage {1 5}
		src.spelleffect s_poison 1000
		src.sfx snd_spell_poison
		remove
		return 1
	elseif <src.hits> >= <src.str>
		src.message You are fully healed. Yet...
		return 1
	else
		src.sfx 30
		src.sfx 31
		src.hits = (<src.hits> + {10 1 15 5 20 5 25 1})
		remove
		src.newitem i_bottle_empty
		src.act.bounce
		src.sysmessage Blood refresh you!
		return 1
	endif

RESOURCE=i_bottle_empty, i_blood

CATEGORY=Races & Classes
SUBSECTIOn=Vampire stuff
DESCRIPTIOn=Blood Bottle

[ITEMDEF 06009]
DEFNAME=staff_of_blood
NAME=Staff of Blood
ID=013f8
DAM=10,30
SKILL=Mace Fighting
REQSTR=100
TWOHANDS=Y

On=@Create
	HITPOINTS={31 50}
	attr=020
	moreP=0 5 0

On=@Equip
	if (<src.plot1>&0100)
		src.message That was a great weapon for the Blood God Clan warriors...
	else
		src.message Do you fill the power of <name>? You must pay for it!
		src.damage {15 30}
	endif

On=@Damage
	if (<src.body>==0010)
		src.EFFECT 3,i_fx_explode,6,15,1
		sfx snd_ELEMENTL_WATREL1
		src.damage {20 40}
		say Blood!
	endif

On=@Spell
	if (<argn>==27) && <cont>
		src.sysmessage Curse fizzle!
		return 1
	endif

CATEGORY=Races & Classes
SUBSECTIOn=Vampire Suff (old)
DESCRIPTIOn=Staff of Blood

//###################
// old vampire stuff
//###################
[ITEMDEF 06010]
// Vampire Bone Arms
NAME=Vampire Bone Arms
ID=0144e
REQSTR=40
WEIGHT=2

On=@Create
	HITPOINTS={30 60}
	color=BLACKROCK_ARMOR_COLOR

On=@Equip
	src.f_old_vampire

On=@Spell
	if (<argn>==27) && <cont>
		src.sysmessage Curse fizzle!
		return 1
	endif

RESOURCES=2 i_bone, 2 i_vial_blood_sacred, 2 i_ingot_shadow, 2 i_ingot_gold_damned

CATEGORY=Races & Classes
SUBSECTIOn=Vampire Suff (old)
DESCRIPTIOn=Vampire Bone Arms

[ITEMDEF 06011]
// Vampire Bone Armor
NAME=Vampire Bone Armor
ID=0144f
REQSTR=40
WEIGHT=4

On=@Create
	HITPOINTS={30 60}
	color=BLACKROCK_ARMOR_COLOR

On=@Equip
	f_old_vampire

On=@Spell
	if (<argn>==27) && <cont>
		src.sysmessage Curse fizzle!
		return 1
	endif

RESOURCES=4 i_bone, 4 i_vial_blood_sacred, 4i_ingot_shadow, 4 i_ingot_gold_damned

CATEGORY=Races & Classes
SUBSECTIOn=Vampire Suff (old)
DESCRIPTIOn=Vampire Bone Chest

[ITEMDEF 06012]
// Vampire Bone Gloves
NAME=Vampire Bone Gloves
ID=01450
REQSTR=40
WEIGHT=2

On=@Create
	HITPOINTS={30 60}
	color=BLACKROCK_ARMOR_COLOR

On=@Equip
	f_old_vampire

On=@Spell
	if (<argn>==27) && <cont>
		src.sysmessage Curse fizzle!
		return 1
	endif

RESOURCES=2 i_bone, 2 i_vial_blood_sacred, 2 i_ingot_shadow, 2 i_ingot_gold_damned

CATEGORY=Races & Classes
SUBSECTIOn=Vampire Suff (old)
DESCRIPTIOn=Vampire Bone Gloves

[ITEMDEF 06013]
// Vampire Bone Helmet
NAME=Vampire Bone Helmet
ID=01451
REQSTR=40
WEIGHT=3

On=@Create
	HITPOINTS={30 60}
	color=BLACKROCK_ARMOR_COLOR

On=@Equip
	f_old_vampire

On=@Spell
	if (<argn>==27) && <cont>
		src.sysmessage Curse fizzle!
		return 1
	endif

RESOURCES=i_bone_skull, 3 i_vial_blood_sacred, 3 i_ingot_shadow, 3 i_ingot_gold_damned

CATEGORY=Races & Classes
SUBSECTIOn=Vampire Suff (old)
DESCRIPTIOn=Vampire Bone Helmet

[ITEMDEF 06014]
// Vampire Bone Leggings
NAME=Vampire Bone Leggings
ID=01452
REQSTR=40
WEIGHT=3

On=@Create
	HITPOINTS={30 60}
	color=BLACKROCK_ARMOR_COLOR

On=@Equip
	f_old_vampire

On=@Spell
	if (<argn>==27) && <cont>
		src.sysmessage Curse fizzle!
		return 1
	endif

RESOURCES=3 i_bone, 3 i_vial_blood_sacred, 3 i_ingot_shadow, 3 i_ingot_gold_damned

CATEGORY=Races & Classes
SUBSECTIOn=Vampire Suff (old)
DESCRIPTIOn=Vampire Bone Legs

[ITEMDEF 06015]
// Nosferatu Vampire Bone Arms
DEFNAME=nvamp_bone_arms
NAME=Nosferatu Vampire Bone Arms
ID=0144e
REQSTR=50
WEIGHT=2

On=@Create
	HITPOINTS={40 70}
	color=BLOODROCK_ARMOR_COLOR

On=@Equip
	f_old_nosferatu

On=@Spell
	if (<argn>==27) && <cont>
		src.sysmessage Curse fizzle!
		return 1
	endif

RESOURCES=2 i_bone, 2 i_vial_blood_sacred, 2 i_ingot_shadow, 2 i_ingot_gold_damned, 2 i_reag_daemon_bone

CATEGORY=Races & Classes
SUBSECTIOn=Vampire Suff (old)
DESCRIPTIOn=Vampire Bone Arms

[ITEMDEF 06016]
// Nosferatu Vampire Bone Armor
DEFNAME=nvamp_bone_chest
NAME=Nosferatu Vampire Bone Armor
ID=0144f
REQSTR=50
WEIGHT=4

On=@Create
	HITPOINTS={40 70}
	color=BLOODROCK_ARMOR_COLOR

On=@Equip
	f_old_nosferatu

On=@Spell
	if (<argn>==27) && <cont>
		src.sysmessage Curse fizzle!
		return 1
	endif

RESOURCES=4 i_bone, 4 i_vial_blood_sacred, 4 i_ingot_shadow, 4 i_ingot_gold_damned, 4 i_reag_daemon_bone

CATEGORY=Races & Classes
SUBSECTIOn=Vampire Suff (old)
DESCRIPTIOn=Vampire Bone Chest

[ITEMDEF 06017]
// Nosferatu Vampire Bone Gloves
DEFNAME=nvamp_bone_gauntlets
NAME=Nosferatu Vampire Bone Gloves
ID=01450
REQSTR=50
WEIGHT=2

On=@Create
	HITPOINTS={40 70}
	color=BLOODROCK_ARMOR_COLOR

On=@Equip
	f_old_nosferatu

On=@Spell
	if (<argn>==27) && <cont>
		src.sysmessage Curse fizzle!
		return 1
	endif

RESOURCES=2 i_bone, 2 i_vial_blood_sacred, 2 i_ingot_shadow, 2 i_ingot_gold_damned, 2 i_reag_daemon_bone

CATEGORY=Races & Classes
SUBSECTIOn=Vampire Suff (old)
DESCRIPTIOn=Vampire Bone Gloves

[ITEMDEF 06018]
// Nosferatu Vampire Bone Helmet
DEFNAME=nvamp_bone_helm
NAME=Nosferatu Vampire Bone Helmet
ID=01451
REQSTR=50
WEIGHT=3

On=@Create
	HITPOINTS={40 70}
	color=BLOODROCK_ARMOR_COLOR

On=@Equip
	f_old_nosferatu

RESOURCES=i_bone_skull, 3 i_vial_blood_sacred, 3 i_ingot_shadow, 3 i_ingot_gold_damned, 3 i_reag_daemon_bone

CATEGORY=Races & Classes
SUBSECTIOn=Vampire Suff (old)
DESCRIPTIOn=Vampire Bone Helmet

[ITEMDEF 06019]
// Nosferatu Vampire Bone Leggings
DEFNAME=nvamp_bone_legs
NAME=Nosferatu Vampire Bone Leggings
ID=01452
REQSTR=50
WEIGHT=3

On=@Create
	HITPOINTS={40 70}
	color=BLOODROCK_ARMOR_COLOR

On=@Equip
	f_old_nosferatu

On=@Spell
	if (<argn>==27) && <cont>
		src.sysmessage Curse fizzle!
		return 1
	endif

RESOURCES=3 i_bone, 3 i_vial_blood_sacred, 3 i_ingot_shadow, 3 i_ingot_gold_damned, 3 i_reag_daemon_bone

CATEGORY=Races & Classes
SUBSECTIOn=Vampire Suff (old)
DESCRIPTIOn=Vampire Bone Legs

[ITEMDEF 06021]	// Blood Claw
DEFNAME=blood_claw
NAME=Blood Claw
ID=i_scimitar
DAM=17,47
REQSTR=100
VALUE=100000

On=@Create
	HITPOINTS={31 90}
	color=0641	// light rose

On=@Equip
	if (<src.plot1>&plotmask_vampire)
		if <src.swordsmanship><50.0
			src.message Go and train vampire! You must be much more expirienced to use this blade!
			unequip
			return 1
		elseif <src.swordsmanship><70.0
			src.message Your swordsmanship too poor!
			unequip
			return 1
		elseif <src.swordsmanship><90.0
			src.message Not bad... But not enough!
			unequip
			return 1
		elseif <src.swordsmanship><100.0
			src.message You are master of sword but it's not a reason to stop training!
			unequip
			return 1
		else
			src.say Blood for the Blood God!
			src.sfx 0e6	// wolf howl
			return 0
		endif
	else
		src.message Thau does not belong to Bloodsucking Breed!
		src.damage {10 20}
		unequip
		return 1
	endif

On=@Damage	// 6d6+11
	if !<cont>
		return 1
	elseif !<cont.ischar>
		return 1
	elseif <cont.serial>==<src.serial>
		return 1
	endif
	more2 = {17 47}
	f_damage_sword
	if rand(7)==1
		src.effect 3,i_fx_explode,6,15,1
		sfx snd_ELEMENTL_FIRELEM1
		more2 = (3 * <more2>) / 2
		say Blood!
	endif
	src.damage <more2>
	f_crash_sword
	more2 = 0
	return 1

On=@Targon_ground
	return 1

On=@Targon_item
	if <src.targ.type>==t_corpse
		if !((<src.targ.region.flags> & 04000) && (<src.targ.link>!=04fffffff))
			return 0
		endif
		src.sysmessage You can't carve <src.targ.name>
	endif
	return 1

On=@Spell
	if (<argn>==27) && <cont>
		src.sysmessage Curse fizzle!
		return 1
	endif

RESOURCES=2 i_vial_blood_sacred, 20 i_ingot_shadow, 20 i_ingot_gold_damned, 2 i_reag_dragon_blood, 1 i_fire

CATEGORY=Races & Classes
SUBSECTIOn=Vampire stuff
DESCRIPTIOn=Blood Claw

//###############
// Vampire items
//###############
[COMMENT ITEMDEF 06850]
//Vampire robe
DEFNAME=VAMPIRE_ROBE
NAME=Vampire robe
ID=01f03
DYE=0
ARMOR=20

On=@Create
	HITPOINTS={111 140}
	color=OBSIDIAN_ARMOR_COLOR

CATEGORY=Races & Classes
SUBSECTIOn=Vampire stuff
DESCRIPTIOn=Vampire robe

On=@Equip
	if !(<src.plot1> & plotmask_vampire)
		src.message Only vampire can wear this robe!
		src.damage {5 15}
		unequip
		return 1
	endif

On=@Spell
	if (<argn>==27) && <cont>
		src.sysmessage Curse fizzle!
		return 1
	endif

[ITEMDEF 06851]
//Vampire Shroud
DEFNAME=VAMPIRE_SHROUD
NAME=Vampire Shroud
ID=0204e
TYPE=t_clothing
ARMOR=10
DYE=0

On=@Create
	HITPOINTS={110 190}
	color=VAMPIRE_ARMOR_COLOR

On=@Equip
	f_vampire_only

CATEGORY=Races & Classes
SUBSECTIOn=Vampire stuff
DESCRIPTIOn=Vampire Shroud

On=@Spell
	if (<argn>==27) && <cont>
		src.sysmessage Curse fizzle!
		return 1
	endif

[ITEMDEF 06852]
// Vampire Bone Arms
DEFNAME=VAMP_BONE_ARMS
NAME=Vampire bone arms
ID=0144e
ARMOR=63	// full set will be 60
REQSTR=60
WEIGHT=5

On=@Create
	HITPOINTS={30 50}
	color=VAMPIRE_ARMOR_COLOR

On=@Equip
	f_vampire_only

CATEGORY=Races & Classes
SUBSECTIOn=Vampire stuff
DESCRIPTIOn=Vampire Bone Arms

On=@Spell
	if (<argn>==27) && <cont>
		src.sysmessage Curse fizzle!
		return 1
	endif

[ITEMDEF 06853]
// Vampire Bone Chest
DEFNAME=VAMP_BONE_CHEST
NAME=Vampire Bone Chest
ID=0144f
//TYPE=10
ARMOR=64
REQSTR=40
WEIGHT=4

On=@Create
	HITPOINTS={30 50}
	color=VAMPIRE_ARMOR_COLOR

On=@Equip
	f_vampire_only

On=@Spell
	if (<argn>==27) && <cont>
		src.sysmessage Curse fizzle!
		return 1
	endif

CATEGORY=Races & Classes
SUBSECTIOn=Vampire stuff
DESCRIPTIOn=Vampire Bone Chest

[ITEMDEF 06854]
// Vampire Bone Gloves
DEFNAME=VAMP_BONE_GLOVES
NAME=Vampire Bone Gloves
ID=01450
//TYPE=10
ARMOR=63
REQSTR=40
WEIGHT=2

On=@Create
	HITPOINTS={30 50}
	color=VAMPIRE_ARMOR_COLOR

On=@Equip
	f_vampire_only

On=@Spell
	if (<argn>==27) && <cont>
		src.sysmessage Curse fizzle!
		return 1
	endif

CATEGORY=Races & Classes
SUBSECTIOn=Vampire stuff
DESCRIPTIOn=Vampire Bone Gloves

[ITEMDEF 06855]
// Vampire Bone Helmet
DEFNAME=VAMP_BONE_HELM
NAME=Vampire Bone Helmet
ID=01451
//TYPE=10
ARMOR=63
REQSTR=40
WEIGHT=3

On=@Create
	color=VAMPIRE_ARMOR_COLOR
	HITPOINTS={30 50}

On=@Equip
	f_vampire_only

On=@Spell
	if (<argn>==27) && <cont>
		src.sysmessage Curse fizzle!
		return 1
	endif

CATEGORY=Races & Classes
SUBSECTIOn=Vampire stuff
DESCRIPTIOn=Vampire Bone Helmet

[ITEMDEF 06856]
// Vampire Bone Leggings
DEFNAME=VAMP_BONE_LEGS
NAME=Vampire Bone Leggings
ID=01452
//TYPE=10
ARMOR=63
REQSTR=40
WEIGHT=3

On=@Create
	HITPOINTS={30 50}
	color=VAMPIRE_ARMOR_COLOR

On=@Equip
	f_vampire_only

On=@Spell
	if (<argn>==27) && <cont>
		src.sysmessage Curse fizzle!
		return 1
	endif

CATEGORY=Races & Classes
SUBSECTIOn=Vampire stuff
DESCRIPTIOn=Vampire Bone Legs

[ITEMDEF 06857]
// Vampire Bone Gorget
DEFNAME=VAMP_BONE_GORGET
NAME=Vampire Bone Gorget
ID=013c7	// leather gorget
ARMOR=63
REQSTR=40
WEIGHT=3

On=@Create
	HITPOINTS={30 50}
	color=VAMPIRE_ARMOR_COLOR

On=@Equip
	f_vampire_only

On=@Spell
	if (<argn>==27) && <cont>
		src.sysmessage Curse fizzle!
		return 1
	endif

CATEGORY=Races & Classes
SUBSECTIOn=Vampire stuff
DESCRIPTIOn=Vampire Bone Gorget

[ITEMDEF 06858]
//Vampire shield
DEFNAME=VAMPIRE_SHIELD
NAME=Vampire shield
ID=01b78
ARMOR=30
WEIGHT=12

On=@Create
	color=VAMPIRE_ARMOR_COLOR
	HITPOINTS={70 100}

On=@Equip
	if <type>!=t_shield
		type=t_shield
	endif

	f_vampire_only

On=@Spell
	if (<argn>==27) && <cont>
		src.sysmessage Curse fizzle!
		return 1
	endif

CATEGORY=Races & Classes
SUBSECTIOn=Vampire stuff
DESCRIPTIOn=Vampire shield

// Vampire knight

[ITEMDEF 06860]
//Vampire Knight Shroud
DEFNAME=KNIGHT_SHROUD
NAME=Vampire Knight Shroud
ID=0204e
TYPE=t_clothing
DYE=0
ARMOR=20

On=@Create
	attr=attr_newbie
	HITPOINTS={110 190}
	color=KNIGHT_ARMOR_COLOR

CATEGORY=Races & Classes
SUBSECTIOn=Vampire stuff
DESCRIPTIOn=Vampire Knight Shroud

On=@Equip
	f_vampire_knight_only

On=@Spell
	if (<argn>==27) && <cont>
		src.sysmessage Curse fizzle!
		return 1
	endif

[ITEMDEF 06861]
// Vampire Knight Arms
DEFNAME=VAMP_KNIGHT_ARMS
NAME=Vampire Knight Arms
ID=0144e
//TYPE=10
ARMOR=69
REQSTR=40
WEIGHT=2

On=@Create
	HITPOINTS={30 60}
	color=KNIGHT_ARMOR_COLOR

On=@Equip
	f_vampire_knight_only

CATEGORY=Races & Classes
SUBSECTIOn=Vampire stuff
DESCRIPTIOn=Vampire Knight Arms

[ITEMDEF 06862]
// Vampire Knight Armor
DEFNAME=VAMP_KNIGHT_CHEST
NAME=Vampire Knight Armor
ID=0144f
//TYPE=10
ARMOR=69
REQSTR=40
WEIGHT=4

On=@Create
	color=KNIGHT_ARMOR_COLOR
	HITPOINTS={30 50}

On=@Equip
	f_vampire_knight_only

On=@Spell
	if (<argn>==27) && <cont>
		src.sysmessage Curse fizzle!
		return 1
	endif

CATEGORY=Races & Classes
SUBSECTIOn=Vampire stuff
DESCRIPTIOn=Vampire Knight Chest

[ITEMDEF 06863]
// Vampire Knight Gloves
DEFNAME=VAMP_KNIGHT_GLOVES
NAME=Vampire Knight Gloves
ID=01450
//TYPE=10
ARMOR=69
REQSTR=40
WEIGHT=2

On=@Create
	color=KNIGHT_ARMOR_COLOR
	HITPOINTS={30 50}

On=@Equip
	f_vampire_knight_only

On=@Spell
	if (<argn>==27) && <cont>
		src.sysmessage Curse fizzle!
		return 1
	endif

CATEGORY=Races & Classes
SUBSECTIOn=Vampire stuff
DESCRIPTIOn=Vampire Knight Gloves

[ITEMDEF 06864]
// Vampire Knight Helmet
DEFNAME=VAMP_KNIGHT_HELM
NAME=Vampire Knight Helmet
ID=01451
//TYPE=10
ARMOR=69
REQSTR=40
WEIGHT=3

On=@Create
	color=KNIGHT_ARMOR_COLOR
	HITPOINTS={30 50}

On=@Equip
	f_vampire_knight_only

On=@Spell
	if (<argn>==27) && <cont>
		src.sysmessage Curse fizzle!
		return 1
	endif

CATEGORY=Races & Classes
SUBSECTIOn=Vampire stuff
DESCRIPTIOn=Vampire Knight Helmet

[ITEMDEF 06865]
// Vampire Knight Leggings
DEFNAME=VAMP_KNIGHT_LEGS
NAME=Vampire Knight Leggings
ID=01452
//TYPE=10
ARMOR=69
REQSTR=40
WEIGHT=3

On=@Create
	HITPOINTS={30 50}
	color=KNIGHT_ARMOR_COLOR

On=@Equip
	f_vampire_knight_only

On=@Spell
	if (<argn>==27) && <cont>
		src.sysmessage Curse fizzle!
		return 1
	endif

CATEGORY=Races & Classes
SUBSECTIOn=Vampire stuff
DESCRIPTIOn=Vampire Knight Legs

[ITEMDEF 06866]
// Vampire Knight Gorget
DEFNAME=VAMP_KNIGHT_GORGET
NAME=Vampire Knight Gorget
ID=013c7	// leather gorget
//TYPE=10
ARMOR=69
REQSTR=40
WEIGHT=3

On=@Create
	HITPOINTS={30 50}
	color=KNIGHT_ARMOR_COLOR

On=@Equip
	f_vampire_knight_only

On=@Spell
	if (<argn>==27) && <cont>
		src.sysmessage Curse fizzle!
		return 1
	endif

CATEGORY=Races & Classes
SUBSECTIOn=Vampire stuff
DESCRIPTIOn=Vampire Knight Gorget

[ITEMDEF 06867]
//Vampire Knight shield
DEFNAME=KNIGHT_SHIELD
NAME=Vampire Knight shield
ID=01b78
ARMOR=35
WEIGHT=12

On=@Create
	color=KNIGHT_ARMOR_COLOR
	HITPOINTS={70 100}

On=@Equip
	if <type>!=t_shield
		type=t_shield
	endif

	f_vampire_knight_only

On=@Spell
	if (<argn>==27) && <cont>
		src.sysmessage Curse fizzle!
		return 1
	endif

CATEGORY=Races & Classes
SUBSECTIOn=Vampire stuff
DESCRIPTIOn=Vampire Kinght shield

// Nosferatu

[ITEMDEF 06870]
//Nosferatu Shroud
DEFNAME=NOSFERATU_SHROUD
NAME=Nosferatu Shroud
ID=0204e
DYE=0
TYPE=t_clothing
ARMOR=30

On=@Create
	attr=attr_newbie
	HITPOINTS={110 190}
	color=NOSFERATU_ARMOR_COLOR

CATEGORY=Races & Classes
SUBSECTIOn=Vampire stuff
DESCRIPTIOn=Nosferatu Shroud

On=@Equip
	f_nosferatu_only

On=@Spell
	if (<argn>==27) && <cont>
		src.sysmessage Curse fizzle!
		return 1
	endif

[ITEMDEF 06871]
// Nosferatu Arms
DEFNAME=NOSFERATU_ARMS
NAME=Nosferatu Arms
ID=0144e
//TYPE=10
ARMOR=79
REQSTR=40
WEIGHT=2

On=@Create
	HITPOINTS={30 60}
	color=NOSFERATU_ARMOR_COLOR

On=@Equip
	f_nosferatu_only

CATEGORY=Races & Classes
SUBSECTIOn=Vampire stuff
DESCRIPTIOn=Nosferatu Arms

[ITEMDEF 06872]
// Nosferatu Armor
DEFNAME=NOSFERATU_CHEST
NAME=Nosferatu Armor
ID=0144f
//TYPE=10
ARMOR=79
REQSTR=40
WEIGHT=4

On=@Create
	HITPOINTS={30 50}
	color=NOSFERATU_ARMOR_COLOR

On=@Equip
	f_nosferatu_only

On=@Spell
	if (<argn>==27) && <cont>
		src.sysmessage Curse fizzle!
		return 1
	endif

CATEGORY=Races & Classes
SUBSECTIOn=Vampire stuff
DESCRIPTIOn=Nosferatu Chest

[ITEMDEF 06873]
// Nosferatu Gloves
DEFNAME=NOSFERATU_GLOVES
NAME=Nosferatu Gloves
ID=01450
//TYPE=10
ARMOR=79
REQSTR=40
WEIGHT=2

On=@Create
	HITPOINTS={30 50}
	color=NOSFERATU_ARMOR_COLOR

On=@Equip
	f_nosferatu_only

On=@Spell
	if (<argn>==27) && <cont>
		src.sysmessage Curse fizzle!
		return 1
	endif

CATEGORY=Races & Classes
SUBSECTIOn=Vampire stuff
DESCRIPTIOn=Nosferatu Gloves

[ITEMDEF 06874]
// Nosferatu Helmet
DEFNAME=NOSFERATU_HELM
NAME=Nosferatu Helmet
ID=01451
//TYPE=10
ARMOR=79
REQSTR=40
WEIGHT=3

On=@Create
	HITPOINTS={30 50}
	color=NOSFERATU_ARMOR_COLOR

On=@Equip
	f_nosferatu_only

On=@Spell
	if (<argn>==27) && <cont>
		src.sysmessage Curse fizzle!
		return 1
	endif

CATEGORY=Races & Classes
SUBSECTIOn=Vampire stuff
DESCRIPTIOn=Nosferatu Helmet

[ITEMDEF 06875]
// Nosferatu Legs
DEFNAME=NOSFERATU_LEGS
NAME=Nosferatu Legs
ID=01452
//TYPE=10
ARMOR=79
REQSTR=40
WEIGHT=3

On=@Create
	HITPOINTS={30 50}
	color=NOSFERATU_ARMOR_COLOR

On=@Equip
	f_nosferatu_only

On=@Spell
	if (<argn>==27) && <cont>
		src.sysmessage Curse fizzle!
		return 1
	endif

CATEGORY=Races & Classes
SUBSECTIOn=Vampire stuff
DESCRIPTIOn=Nosferatu Legs

[ITEMDEF 06876]
// Nosferatu Gorget
DEFNAME=NOSFERATU_GORGET
NAME=Nosferatu Gorget
ID=013c7
ARMOR=79
REQSTR=40
WEIGHT=3

On=@Create
	HITPOINTS={30 50}
	color=NOSFERATU_ARMOR_COLOR

On=@Equip
	f_nosferatu_only

On=@Spell
	if (<argn>==27) && <cont>
		src.sysmessage Curse fizzle!
		return 1
	endif

CATEGORY=Races & Classes
SUBSECTIOn=Vampire stuff
DESCRIPTIOn=Nosferatu Gorget

[ITEMDEF 06877]
//Nosferatu shield
DEFNAME=NOSFERATU_SHIELD
NAME=Nosferatu shield
ID=01b78
ARMOR=40
WEIGHT=12

On=@Create
	HITPOINTS={70 100}
	color=NOSFERATU_ARMOR_COLOR

On=@Equip
	if <type>!=t_shield
		type=t_shield
	endif

	f_nosferatu_only

On=@Spell
	if (<argn>==27) && <cont>
		src.sysmessage Curse fizzle!
		return 1
	endif

CATEGORY=Races & Classes
SUBSECTIOn=Vampire stuff
DESCRIPTIOn=Nosferatu shield

//###############################################################
// 11.11.2000 Blood God dungeon triggers
//	Entrance trigger:
//		link  = Serial of Exit trigger
//		moreP = Coordinates of start point in the BG dungeon
//	Exit trigger:
//		link  = Serial of support item
//		more2 = Serial of spawned NPC, if it presists
//	Support item:
//		moreP = Cooridnates of points to teleport on exit
//###############################################################

[TYPEDEF 2010]	// Entrance trigger
On=@Step
	if <src.NPC>
		// Not a player.
		return 1
	endif

	if <link>==04fffffff
		src.message Trigger damaged.
		return 1
	endif

	if <COLOR>!=0
		src.message Gate is closed.
		return 1
	endif

	if <more>==0
		more=1
		TIMER=10	// Wait for 10 seconds
		if <src.plot1>&0100
			//Some kind of Vampire
			src.SAY Some kind of Vampire:
			if <src.fame>>=7500
				if <link.more2>==0
					src.newnpc 04212
					src.act.go <link.moreX>,<link.moreY>,<link.moreZ>
					src.act.home <link.moreX>,<link.moreY>,<link.moreZ>
					src.act.homedist 5
					link.more2=<src.act.SERIAL>	// remember the serial of NPC
				endif
			elseif <src.fame>>=5000
				if <link.more2>==0
					src.newnpc 04211
					src.act.go <link.moreX>,<link.moreY>,<link.moreZ>
					src.act.home <link.moreX>,<link.moreY>,<link.moreZ>
					src.act.homedist 5
					link.more2=<src.act.SERIAL>	// remember the serial of NPC
				endif
			else
				if <link.more2>==0
					src.newnpc 04210
					src.act.go <link.moreX>,<link.moreY>,<link.moreZ>
					src.act.home <link.moreX>,<link.moreY>,<link.moreZ>
					src.act.homedist 5
					link.more2=<src.act.SERIAL>	// remember the serial of NPC
				endif
			endif
			src.go <moreX>,<moreY>,<moreZ>
			color=0676	// turn off gate
			update
		elseif <src.plot1>&080
			//Paladin
			src.SAY Paladin
		else
			//Nor Vampire or Paladin
//			src.SAY Not a Vampire or Paladin

			if (<src.weight>!=60)
				src.message Competitor must be fully naked! <src.weight>
				return 0
			endif

			if <link.more2>==0
				src.newnpc 04210
				src.act.go <link.moreX>,<link.moreY>,<link.moreZ>
				src.act.home <link.moreX>,<link.moreY>,<link.moreZ>
				src.act.homedist 5
				link.more2=<src.act.SERIAL>	// remember the serial of NPC
			endif
			src.go <moreX>,<moreY>,<moreZ>
			color=0676	// turn off gate
			update
		endif
	endif
	return 0

On=@Timer
	more=0	//Timer has gone
	return 1

[TYPEDEF 2011]	//Exit trigger
On=@Step
	if <src.NPC>
		// Not a player.
		return 1
	endif

	if (<link>==04fffffff) //Not linked
		src.message Trigger is damaged! Call GM now!
		return 1
	endif

	link.link.color=0	// turn entrance on
	link.link.update

	// remove blood god guard, if it presists
	more=<link>
	link=<more2>
	if (<link.id>==04210) || (<link.id>==04211) || (<link.id>==04212)
		link.remove
	endif
	link=<more>
	more=0
	more2=0		// NPC removed

	if <src.plot1>&0100
		// vampire come through
		if <src.flags>&2
			// dead vampire, resurrect him
			src.fix
			src.RESURRECT
			src.fix
			// give him a shroud
			if <src.fame>>=7500
				src.newitem NOSFERATU_SHROUD
			elseif <src.fame>>=3500
				src.newitem KNIGHT_SHROUD
			else
				src.newitem VAMPIRE_SHROUD
			endif
			src.act.attr 04
			src.act.bounce
		else
			// live vampire
		endif
	else
		// not a vampire
		if <src.flags>&2
			// dead
		else
			// live
			if (<src.restest 1 VAMP_BONE_CHEST> && <src.restest 1 VAMP_BONE_LEGS> && <src.restest 1 VAMP_BONE_GLOVES> && <src.restest 1 VAMP_BONE_GORGET> && <src.restest 1 BLOOD_CLAW> && <src.restest 1 VAMP_BONE_HELM>)

				src.plot1=(<src.plot1>|plotmask_vampire)
				src.message Welcome to the Brotherhood of Blood!
				src.newitem VAMPIRE_ROBE
				src.act.bounce
				src.newitem VAMPIRE_SHROUD
				src.act.attr 04
				src.act.bounce
			else
				src.fix
				src.KILL
				src.fix
			endif
		endif
	endif

	src.go <link.moreX>,<link.moreY>,<link.moreZ>

	return 0

[EOF]