[EVENTS e_regionalguards]
ON=@SkillStart
IF (0<REGION.TAG.CUSTOMGUARDS>)
	TRYP 0 <REGION.TAG.GUARDFUNCTION>
ENDIF

ON=@Click
IF (0<REGION.TAG.CUSTOMGUARDS>)
	TRYP 0 <REGION.TAG.GUARDFUNCTION>
ENDIF

[CHARDEF 0438]
//Male GUARD
DEFNAME=C_H_GUARD
NAME=#NAMES_HUMANMALE the Guard
ID=C_MAN
DAM=15,20
ARMOR=20
DESIRES=i_gold,i_flesh_head
SHELTER=r_civilization,r_GUARDPOST
//AVERSIONS=ANYONE WITH NEGATIVITY (SHOWS AGGRESION)

TSPEECH=spk_human_prime
TSPEECH=jobGuard
TSPEECH=spk_needs
TSPEECH=spk_rehello
TSPEECH=spk_human_default
TSPEECH=guardquest

TEVENTS=e_regionalguards
TEVENTS=e_Human_HearUnk
TEVENTS=e_Human_Needs
TEVENTS=e_Human_ConvInit
TEVENTS=e_Human_Greet
TEVENTS=e_Human_Space
TEVENTS=e_Human_Refuse
TEVENTS=e_Human_Environ
TEVENTS=e_accepthead

CATEGORY=Civilized
SUBSECTION=Guards & Law
DESCRIPTION=Guard (male)

ON=@Create
NPC=brain_guard
//ALIGNMENT=GOOD
COLOR=colors_skin
STR={151 165}
DEX={151 165}
INT={151 165}

DETECTINGHIDDEN={90.0 100.0}
FORENSICS={90.0 100.0}
FENCING={90.0 100.0}
PARRYING={90.0 100.0}
SWORDSMANSHIP={90.0 100.0}
WRESTLING={90.0 100.0}
MACEFIGHTING={90.0 100.0}
MAGICRESISTANCE={90.0 100.0}
TACTICS={90.0 100.0}

//STANDARD GUARD EQUIPMENT=PLATE ARMOR,i_halberd
//BLACKTHORN GUARD EQUIPMENT=PLATE ARMOR,RED OVER-ARMOR,DOUBLE BATTLE AXE,CHAOS SHIELD
//LORDBRITISH GUARD EQUIPMENT=PLATE ARMOR,BLUE OVER-ARMOR,VIKING SWORD,ORDER SHIELD

ITEMNEWBIE=random_male_hair
COLOR=colors_hair
ITEMNEWBIE=random_facial_hair
COLOR=match_hair

ON=@NPCRestock
ITEM=i_shirt_plain
COLOR=colors_all
ITEM=random_pants
COLOR=colors_all
ITEMNEWBIE=i_platemail_chest
ITEMNEWBIE=i_platemail_leggings
ITEMNEWBIE=i_platemail_arms
ITEMNEWBIE=random_over_armor
COLOR=colors_all
ITEMNEWBIE=i_halberd
//ITEM=random_coin_purse
//ITEM=i_mt_horse_gray	// on horse.

ON=@NPCRefuseItem
	SAY I cannot be bribed. be gone.
	return 1

ON=@GETHIT
if (<SRC.ID>==c_blade_spirit)
SAY An Ort
ANIM 16
SRC.SUICIDE
endif

ON=@SpellEffect
IF <ARGN>=41
RETURN 1
ENDIF

ON=@HitTry
RETURN 0

IF (<SRC.NPC>=brain_thief)
IF (<FLAGS>&statf_conjured)
REMOVE
RETURN 1
ELSE
//GO <HOME>
RETURN 0
ENDIF
ENDIF

ON=@Hit
RETURN 0

IF (<SRC.NPC>=brain_thief)
IF (<FLAGS>&statf_conjured)
REMOVE
ELSE
//GO <HOME>
RETURN 0
ENDIF
RETURN 1
ENDIF

ON=@EnvironChange
IF (<MEMORYFINDTYPE.040>)
RETURN 0
//So a chase is not interrupted...
ELSE
IF (<MEMORYFINDTYPE.memory_ispawned>)
IF (<MEMORYFINDTYPE.memory_ispawned.LINK.DISTANCE> > <EVAL <HOMEDIST> * 2>)
IF !(<FLAGS> & statf_war)
GO <MEMORYFINDTYPE.memory_ispawned.LINK.P>
ENDIF
ENDIF
ENDIF
ENDIF

[CHARDEF 0439]
//Female GUARD
DEFNAME=c_h_guard_f
NAME=#NAMES_HUMANFEMALE the Guard
ID=C_WOMAN
DAM=15,20
ARMOR=20
DESIRES=i_gold,i_flesh_head
SHELTER=r_civilization,r_GUARDPOST
//AVERSIONS=ANYONE WITH NEGATIVITY (SHOWS AGGRESION)

TSPEECH=spk_human_prime
TSPEECH=jobGuard
TSPEECH=spk_needs
TSPEECH=spk_rehello
TSPEECH=spk_human_default
TSPEECH=guardquest

TEVENTS=e_regionalguards
TEVENTS=e_Human_HearUnk
TEVENTS=e_Human_Needs
TEVENTS=e_Human_ConvInit
TEVENTS=e_Human_Greet
TEVENTS=e_Human_Space
TEVENTS=e_Human_Refuse
TEVENTS=e_Human_Environ
TEVENTS=e_accepthead

CATEGORY=Civilized
SUBSECTION=Guards & Law
DESCRIPTION=Guard (female)

ON=@Create
NPC=brain_guard
//ALIGNMENT=GOOD
COLOR=colors_skin
STR={151 165}
DEX={151 165}
INT={151 165}

DETECTINGHIDDEN={90.0 100.0}
FORENSICS={90.0 100.0}
FENCING={90.0 100.0}
PARRYING={90.0 100.0}
SWORDSMANSHIP={90.0 100.0}
WRESTLING={90.0 100.0}
MACEFIGHTING={90.0 100.0}
MAGICRESISTANCE={90.0 100.0}
TACTICS={90.0 100.0}

//STANDARD GUARD EQUIPMENT=PLATE ARMOR,i_halberd
//BLACKTHORN GUARD EQUIPMENT=PLATE ARMOR,RED OVER-ARMOR,DOUBLE BATTLE AXE,CHAOS SHIELD
//LORDBRITISH GUARD EQUIPMENT=PLATE ARMOR,BLUE OVER-ARMOR,VIKING SWORD,ORDER SHIELD

ITEMNEWBIE=random_female_hair
COLOR=colors_hair

ON=@NPCRestock
ITEM=i_shirt_plain
COLOR=colors_all
ITEM=random_pants
COLOR=colors_all
ITEMNEWBIE=i_platemail_chest
ITEMNEWBIE=i_platemail_leggings
ITEMNEWBIE=i_platemail_arms
ITEMNEWBIE=random_over_armor
COLOR=colors_all
ITEMNEWBIE=i_halberd
//ITEM=random_coin_purse
// ITEM=03EA0	// on horse.

ON=@HitTry
RETURN 0

IF (<SRC.NPC>=brain_thief)
IF (<FLAGS>&statf_conjured)
REMOVE
RETURN 1
ELSE
//GO <HOME>
RETURN 0
ENDIF
ENDIF

ON=@Hit
RETURN 0

IF (<SRC.NPC>=brain_thief)
IF (<FLAGS>&statf_conjured)
REMOVE
RETURN 1
ELSE
//GO <HOME>
RETURN 0
ENDIF
ENDIF

ON=@NPCRefuseItem
	SAY I cannot be bribed. be gone.
	return 1

ON=@GETHIT
if (<SRC.ID>==c_blade_spirit)
SAY An Ort
ANIM 16
SRC.SUICIDE
endif

ON=@SpellEffect
IF <ARGN>=41
RETURN 1
ENDIF

ON=@EnvironChange

IF (<MEMORYFINDTYPE.040>)
RETURN 0
//So a chase is not interrupted...
ELSE
IF (<MEMORYFINDTYPE.memory_ispawned>)
IF (<MEMORYFINDTYPE.memory_ispawned.LINK.DISTANCE> > <EVAL <HOMEDIST> * 2>)
IF !(<FLAGS> & statf_war)
GO <MEMORYFINDTYPE.memory_ispawned.LINK.P>
ENDIF
ENDIF
ENDIF
ENDIF

//Guard functions here.
[FUNCTION rf_undeadguards]
BODY={c_zombie 1 c_skeleton_w_axe 1 c_skeleton_w_sword 1 c_spectre 1 c_m_wraith 1 c_m_ghoul 1 c_m_mummy 1 c_m_skeletonarcher 1 c_m_skeleton_knight 1 }
KARMA=0
NPC=brain_undead
UPDATE

[FUNCTION rf_mageguards]
BODY={c_h_mage 1 c_h_mage_f 1}
MAGERY={85.0 100.0}
MAGICRESISTANCE={85.0 100.0}
INT=<EVAL <INT>+100>
MANA=<INT>

CONSUME 1 i_halberd
CONSUME 1 i_platemail_chest
CONSUME 1 i_platemail_arms
CONSUME 1 i_platemail_leggings
CONSUME 1 i_platemail_gloves
CONSUME 1 i_doublet

IF (<CAN> & mt_female)
	FINDLAYER.layer_beard.REMOVE
ENDIF

TAG.OLDACT=<ACT.UID>
NEWITEM i_robe
ACT.COLOR=colors_all
EQUIP <ACT.UID>

IF (RAND(2) == 1)
	NEWITEM i_hat_wizards
	ACT.COLOR=<FINDID.i_robe.COLOR>
	EQUIP <ACT.UID>
ENDIF

NEWITEM i_spellbook
ACT.ATTR=attr_newbie
ACT.ADDSPELL s_harm
ACT.ADDSPELL s_fireball
ACT.ADDSPELL s_lightning
ACT.ADDSPELL s_mind_blast
ACT.ADDSPELL s_paralyze
ACT.ADDSPELL s_energy_bolt
ACT.ADDSPELL s_flamestrike

EQUIP <ACT.UID>

NEWITEM {i_staff_gnarled 1 i_staff_black 1 i_staff_quarter 1 }
EQUIP <ACT.UID>

ACT=<EVAL <TAG.OLDACT>>
TAG.OLDACT=

TITLE=the Guard