// Counter Strike Source Dungeons and Dragons
// Created By J3ff Hoogland
// Starting Date of 04/10/2007
// Version 1.11
// Website www.dndsource.net
// Contact Email: blue_starsoar@yahoo.com

block load
{
	echo Loading Dungeons and Dragons Counter-Strike Source Mod
	es_xset dnd v1.11
	es_xmakepublic dnd
	es_setinfo dnd_dir "|dnd"
	es_keygroupdelete dndUsers
	es_keygroupload dndUsers server_var(dnd_dir)
	es_xset fort 0
	es_xset ref 0
	es_xset will 0
	es_doblock dnd/config
	es_doblock dnd/build_menus
//Main Menu
	
//Cleric Spells
	es_regclientcmd !light dnd/light "casts cure/inflict light wounds"
	es_regclientcmd !moderate dnd/moderate "casts cure/inflict moderate wounds"
	es_regclientcmd !serious dnd/serious "casts cure/inflict serious wounds"
	es_regclientcmd !critical dnd/critical "casts cure/inflict critical wounds"
	es_regclientcmd !curse dnd/curse "casts curse"
	es_regclientcmd !remove dnd/remove "casts remove curse"
	es_regclientcmd !bane dnd/bane "casts bane"
	es_regclientcmd !purge dnd/purge "casts purge"
	es_regclientcmd !stun dnd/stun "casts stun"
	es_regclientcmd !blasphemy dnd/blasphemy "casts blasphemy"
	es_regclientcmd !res dnd/res "returns 1 dead teamate to life"
	es_regclientcmd !storm dnd/storm "deals fire damage"
//	es_regclientcmd !astral dnd/astral "move onto another plane"
//CPC Spells
	es_regclientcmd !divine dnd/divine "Activate divine favor"
	es_regclientcmd !shield dnd/shield "Activate a shielding effect"
	es_regclientcmd !flame dnd/flame "Activate divine fire"
	es_regclientcmd !health dnd/health "Activate divine health"
	es_regclientcmd !armor dnd/armor "Activate divine armor"
	es_regclientcmd !healing dnd/cpcaoeheal "Activates divine healing"
//Cleric Commands
	es_regclientcmd !turn dnd/turnundead "Casts cleric turn undead"
//Wizard Spells
	es_regclientcmd !missile dnd/missile "casts magic missile"
	es_regclientcmd !sleep dnd/sleep "casts sleep"
	es_regclientcmd !stealth dnd/stealth "casts invisibility"
	es_regclientcmd !fire dnd/fire_ball "casts fire ball"
	es_exists exists command areafireball
  	if (server_var(exists) = 0) then es_regcmd areafireball dnd/areafireball "areafireball - usage: areafireball <userid> <targetid> <save dc> <damage> <burn time>"
	es_regclientcmd !killer dnd/killer "casts phantasmal killer"
	es_regclientcmd !save dnd/save_tele "saves a spot to teleport to"
	es_regclientcmd !tele dnd/tele "casts teleport"
	es_regclientcmd !force dnd/force "casts force"
//	es_regclientcmd !grab dnd/grab "casts grab"
	es_regclientcmd !freeze dnd/freeze "casts freeze"
	es_regclientcmd !god dnd/god "casts god"
//Necromancer Spells
	es_regclientcmd !burn dnd/aoefire "casts fire"
	es_regclientcmd !zombie dnd/zombie "zombie fye one of your allies"
	es_regclientcmd !slap dnd/slap "slap ur target"
//	es_regclientcmd !dawnofdead dnd/dawnofdead "Create a dawn of dead!"
	es_exists exists command zombiekill
  	if (server_var(exists) = 0) then es_regcmd zombiekill dnd/zombiekill "zombiekill - usage: zombiekill <userid> <necroid>"
	es_exists exists command zombieall
  	if (server_var(exists) = 0) then es_regcmd zombieall dnd/zombieall "zombieall - usage: zombieall <userid>"
//WPC Spells
	es_regclientcmd !shieldmage dnd/shieldmage "gives you a chance to take less damage"
	es_regclientcmd !ice dnd/ice "casts orb of cold"
	es_regclientcmd !arc dnd/arc "casts arc lightning"
	es_regclientcmd !transform dnd/transform "casts tenser's transformation"
	es_regclientcmd !pain dnd/pain "cast global pain"
	es_regclientcmd !blizzard dnd/blizzard "cast bizzard"
	es_exists exists command areablizzard
  	if (server_var(exists) = 0) then es_regcmd areablizzard dnd/areablizzard "areablizzard - usage: areablizzard <userid> <targetid> <save dc> <damage> <stun time>"
//Rogue and Rogue Prestige Commands
	es_regclientcmd !wait dnd/wait "starts preparing death attack."
	es_regclientcmd !move dnd/move "end your death attack."
	es_regclientcmd !sprint dnd/sprint "start your sprint."
	es_regclientcmd !jump dnd/jump "turn on or off gravity."
	es_regclientcmd !return dnd/return "use your shadow jump power."
//Ranger Spells
	es_regclientcmd !entangle dnd/entangle "cast entangle"
	es_exists exists command roots
	if (server_var(exists) = 0) then es_regcmd roots dnd/roots "roots - usage: roots <userid> <duration>"
	es_regclientcmd !track dnd/track "casts track"
//Bard Commands
	es_regclientcmd !boost dnd/boost "enhances your near by teamates damage"
	es_regclientcmd !charge dnd/charge "starts a charge"
	es_regclientcmd !shock dnd/shock "casts a shock wave"
	es_exists exists command anti_grav
  	if (server_var(exists) = 0) then es_regcmd anti_grav dnd/anti_grav "anti_grav - usage: anti_grav <userid> <radius>"
//Fighter Prestige Commands
	es_regclientcmd !he dnd/nade "spawn a grenade."
	es_regclientcmd !flash dnd/flash "spawn a flash"
	es_regclientcmd !defend dnd/defend "turn on/off your defensive power."
//Point Hurt
	es_exists exists command point_hurt
  	if (server_var(exists) = 0) then es_regcmd point_hurt dnd/point_hurt "point_hurt - usage: point_hurt <userid> <targetid> <damage>"
//Regen
	es_exists exists command regen
  	if (server_var(exists) = 0) then es_regcmd regen dnd/regen "regen - usage: regen <userid> <delay> <amount>"
//AreaHeal
	es_exists exists command targetregen
	if (server_var(exists) = 0) then es_regcmd targetregen dnd/targetregen "targetregen - usage: targetregen <userid> <amount>"
	es_exists exists command arearegen
	if (server_var(exists) = 0) then es_regcmd arearegen dnd/arearegen "arearegen - usage: arearegen <userid> <delay> <amount> <radius>"
//AreaDamage
	es_exists exists command areadamage
	if (server_var(exists) = 0) then es_regcmd areadamage dnd/areadamage "areadamage - usage: areadamage <userid> <delay> <amount> <radius>"
//Race Skills
	es_regclientcmd !save1 dnd/save1 "Save 1st tele spot"
	es_regclientcmd !save2 dnd/save2 "Save 2nd tele spot"
	es_regclientcmd !tele1 dnd/tele1 "Tele to spot one"
	es_regclientcmd !tele2 dnd/tele2 "Tele to spot two"
	es_regclientcmd !lev1 dnd/lev1 "50% grav"
	es_regclientcmd !lev2 dnd/lev2 "20% grav"
	es_regclientcmd !lev3 dnd/lev3 "01% grav"
	es_regclientcmd !lev0 dnd/lev0 "100% grav"
	es_regclientcmd !escape dnd/escape "run away"
	es_regclientcmd !cat dnd/cat "tibbit turns into a cat"
	es_regclientcmd !gaze dnd/gaze "uses stone gaze"
	es_regclientcmd !stomp dnd/stomp "uses the giants stomp"
	es_regclientcmd !vanish dnd/vanish "uses the vampires stealth"
//Item Activates
	es_regclientcmd !lightheal dnd/light_heal "use a healing potion"
	es_regclientcmd !lightmana dnd/light_mana "use a mana potion"
	es_regclientcmd !moderateheal dnd/moderate_heal "use a healing potion"
	es_regclientcmd !moderatemana dnd/moderate_mana "use a mana potion"
	es_regclientcmd !seriousheal dnd/serious_heal "use a healing potion"
	es_regclientcmd !seriousmana dnd/serious_mana "use a mana potion"
//bonus team health / neg enemy team 
	es_exists exists command bonushealth
  	if (server_var(exists) = 0) then es_regcmd bonushealth dnd/bonushealth "bonushealth - usage: bonushealth <userid> <amount>"
	es_exists exists command neghealth
  	if (server_var(exists) = 0) then es_regcmd neghealth dnd/neghealth "neghealth - usage: neghealth <userid> <amount>"
	es_exists exists command starthealth
  	if (server_var(exists) = 0) then es_regcmd starthealth dnd/starthealth "starthealth - usage: starthealth <userid>"
	es_exists exists command resethealth
	if (server_var(exists) = 0) then es_regcmd resethealth dnd/resethealth "resethealth - usage: resethealth <userid>"
//winning team exp
	es_exists exists command win_xp
	if (server_var(exists) = 0) then es_regcmd win_xp dnd/win_xp "win_xp - usage: win_xp <userid>"
//Stealth and Sneak Attack Reset
	es_exists exists command stealth_off
	if (server_var(exists) = 0) then es_regcmd stealth_off dnd/stealth_off "stealth_off - usage: stealth_off <userid>"
	es_exists exists command stealth_on
	if (server_var(exists) = 0) then es_regcmd stealth_on dnd/stealth_on "stealth_on - usage: stealth_on <userid>"
	es_exists exists command sneak_off
	if (server_var(exists) = 0) then es_regcmd sneak_off dnd/sneak_off "sneak_off - usage: sneak_off <userid>"
	es_exists exists command sneak_on
	if (server_var(exists) = 0) then es_regcmd sneak_on dnd/sneak_on "sneak_on - usage: sneak_on <userid>"
	echo Load Finished... Dungeons and Dragons CSS Running
}
event round_end
{
	if (event_var(winner) = 2) do 
	{
		es est_loop winner #t "es win_xp server_var(winner)"
	}
	if (event_var(winner) = 3) do
	{
		es est_loop winner #c "es win_xp server_var(winner)"
	}
	est_loop dude #all "es resethealth server_var(dude)"
	es_keygroupsave dndUsers server_var(dnd_dir)
	es_keygroupdelete dndUsers
	es_keygroupload dndUsers server_var(dnd_dir)
	es_setinfo zombie_start 0
}

block win_xp
{
	
	es_setinfo dnd_wtuserid 0
	
	

  	es_getargv dnd_wtuserid 1
	es_setinfo wtsteam 0
	es est_getsteam wtsteam server_var(dnd_wtuserid)
	es_setinfo xpcheck 0
	es_keygetvalue xpcheck dndUsers server_var(wtsteam) curxp
	es_setinfo currentxp 0
	es_keygetvalue currentxp dndUsers server_var(wtsteam) server_var(xpcheck)
	es_math currentxp + server_var(rnd_xp)
	es_keysetvalue dndUsers server_var(wtsteam) server_var(xpcheck) server_var(currentxp)
	es_tell server_var(dnd_wtuserid) #green You have gained server_var(rnd_xp) xp for your team winning the round.
}

event bomb_defused
{
	es_setinfo es_steamid 0
	es_setinfo es_steamid event_var(es_steamid)
	es_setinfo userid 0
	es_setinfo userid event_var(userid)
	es_setinfo xpcheck 0
	es_keygetvalue xpcheck dndUsers event_var(es_steamid) curxp
	es_setinfo currentxp 0
	es_keygetvalue currentxp dndUsers event_var(es_steamid) server_var(xpcheck)
	es_math currentxp + server_var(bombxp)
	es_setinfo ccheck 0
	es_keygetvalue ccheck dndUsers event_var(es_steamid) class
	if (server_var(ccheck) != 0) do
	{
		es_keysetvalue dndUsers event_var(es_steamid) server_var(xpcheck) server_var(currentxp)
		es_tell event_var(userid) #green You have gained server_var(bombxp) xp for defusing the bomb.
		es_doblock dnd/class_level
	}
}

event bomb_planted
{
	es_setinfo es_steamid 0
	es_setinfo es_steamid event_var(es_steamid)
	es_setinfo userid 0
	es_setinfo userid event_var(userid)
	es_setinfo xpcheck 0
	es_keygetvalue xpcheck dndUsers event_var(es_steamid) curxp
	es_setinfo currentxp 0
	es_keygetvalue currentxp dndUsers event_var(es_steamid) server_var(xpcheck)
	es_math currentxp + server_var(bombxp)
	es_setinfo ccheck 0
	es_keygetvalue ccheck dndUsers event_var(es_steamid) class
	if (server_var(ccheck) != 0) do
	{
		es_keysetvalue dndUsers event_var(es_steamid) server_var(xpcheck) server_var(currentxp)
		es_tell event_var(userid) #green You have gained server_var(bombxp) xp for planting the bomb.
		es_doblock dnd/class_level
	}
}

event hostage_rescued
{
	es_setinfo es_steamid 0
	es_setinfo es_steamid event_var(es_steamid)
	es_setinfo userid 0
	es_setinfo userid event_var(userid)
	es_setinfo xpcheck 0
	es_keygetvalue xpcheck dndUsers event_var(es_steamid) curxp
	es_setinfo currentxp 0
	es_keygetvalue currentxp dndUsers event_var(es_steamid) server_var(xpcheck)
	es_math currentxp + server_var(hostagexp)
	es_setinfo ccheck 0
	es_keygetvalue ccheck dndUsers event_var(es_steamid) class
	if (server_var(ccheck) != 0) do
	{
		es_keysetvalue dndUsers event_var(es_steamid) server_var(xpcheck) server_var(currentxp)
		es_tell event_var(userid) #green You have gained server_var(hostagexp) xp for rescuing the hostage.
		es_doblock dnd/class_level
	}
}

event server
{
	es_keygroupdelete dndExtra
	es_keygroupcreate dndExtra
}

block config
{
	es_setinfo killxp 50
	es_setinfo headshotxp 45
	es_setinfo knifexp 90
	es_setinfo bombxp 45
	es_setinfo hostagexp 25
	es_setinfo hexp 50
	es_setinfo tkpenxp 300
	es_setinfo classlevel 1000
	es_setinfo prestigelevel 1250
	es_setinfo humbxp 40
	es_setinfo zombiexp 90
	es_setinfo ks_xp 10
	es_setinfo high_xp 10
	es_setinfo rnd_xp 25
	es_setinfo monster_levelxp 30000
	es_setinfo forthxp 15
}

block build_menus
{
	popup create mainmenu
	popup addline mainmenu "Dungeons and Dragons CSS Main Menu:"
	popup addline mainmenu "-> 1. Race"
	popup submenu mainmenu 1 rchoice
	popup addline mainmenu "-> 2. Class"
	popup addline mainmenu "-> 3. Prestige"
	popup submenu mainmenu 3 prestigemenu
	popup addline mainmenu "-> 4. Items"
	popup submenu mainmenu 4 shopmenu
	popup addline mainmenu "-> 5. Info Menus"
	popup submenu mainmenu 5 infomenu
	popup addline mainmenu "-> 6. Class Weapon List"
	popup addline mainmenu "-> 7. Your Stats"
	popup addline mainmenu "-> 8. Extra Commands"
	popup addline mainmenu " 0. Exit"
	popup menuselect mainmenu dnd/main_choice

	popup create shopmenu
	popup addline shopmenu " Please choose a type of item to buy:"
	popup addline shopmenu "-> 1. Potions"
	popup submenu shopmenu 1 potionmenu
	popup addline shopmenu "-> 9. Back to Main Menu"
	popup submenu shopmenu mainmenu
	popup addline shopmenu " 0. Exit"

	popup create potionmenu
	popup addline potionmenu " Choose a potion to buy:"
	popup addline potionmenu "-> 1. Light Healing Potion ($500)"
	popup addline potionmenu "-> 2. Light Mana Potion ($500)"
	popup addline potionmenu "-> 3. Moderate Healing Potion ($1500)"
	popup addline potionmenu "-> 4. Moderate Mana Potion ($1500)"
	popup addline potionmenu "-> 5. Serious Healing Potion ($3000)"
	popup addline potionmenu "-> 6. Serious Mana Potion ($3000)"
	popup addline potionmenu "-> 9. Back to Shopmenu"
	popup submenu potionmenu 9 shopmenu
	popup addline potionmenu " 0. Exit"
	popup menuselect potionmenu dnd/potion_choice

	popup create racemenu
	popup addline racemenu "Dungeons and Dragons CSS Races:"
	popup addline racemenu "-> 1. Human"
	popup addline racemenu "-> 2. Dwarf"
	popup addline racemenu "-> 3. Elf"
	popup addline racemenu "-> 4. Orc"
	popup addline racemenu "-> 5. Halfling"
	popup addline racemenu "-> 6. Kobold"
	popup addline racemenu "-> 7. Grey Elf"
	popup addline racemenu "-> 9. Back to Race Menu"
	popup submenu racemenu 9 rchoice
	popup addline racemenu " 0. Exit"
	popup menuselect racemenu dnd/race_choice

	popup create lamenu
	popup addline lamenu "Dungeons and Dragons CSS Level Adjustment Races:"
	popup addline lamenu "-> 1. Aasimar (-1 Level)"
	popup addline lamenu "-> 2. Tiefling (-1 Level)"
	popup addline lamenu "-> 3. Minotaur (-2 Level)"
	popup addline lamenu "-> 4. Drow (-2 Level)"
	popup addline lamenu "-> 5. Avariel (-3 Level)"
	popup addline lamenu "-> 6. Doppelganger (-4 Level)"
	popup addline lamenu "-> 7. Troll (-9 Level)"
	popup addline lamenu "-> 8. Vampire (-8 Level)"
	popup addline lamenu "-> 9. Back to Race Menu"
	popup submenu lamenu 9 rchoice
	popup addline lamenu " 0. Exit"
	popup menuselect lamenu dnd/la_choice

	popup create mrace
	popup addline mrace "Dungeons and Dragons CSS Monster Races:"
	popup addline mrace "-> 1. Tibbit"
	popup addline mrace "-> 2. Ethreal Filcher (1 Bonus Point)"
	popup addline mrace "-> 3. Golem (3 Bonus Points)"
	popup addline mrace "-> 4. Rok (6 Bonus Points)"
	popup addline mrace "-> 5. Dragon (10 Bonus Points)"
	popup addline mrace "-> 6. Air Elemental (15 Bonus Points)"
	popup addline mrace "-> 7. Earth Elemental (15 Bonus Points)"
	popup addline mrace "-> 8. More Monster Races"
	popup submenu mrace 8 mraces
	popup addline mrace "-> 9. Back to Race Menu"
	popup submenu mrace 9 rchoice
	popup addline mrace " 0. Exit"
	popup menuselect mrace dnd/m_choice

	popup create mraces
	popup addline mraces "Dungeons and Dragons CSS Monster Races:"
	popup addline mraces "-> 1. Fire Elemental (15 Bonus Points)"
	popup addline mraces "-> 2. Water Elemental (15 Bonus Points)"
	popup addline mraces "-> 3. Chain Devil (21 Bonus Points)"
	popup addline mraces "-> 4. Gental Giant (28 Bonus Points)"
	popup addline mraces "-> 5. Basilisk (36 Bonus Points)"
	popup addline mraces "-> 6. Rabbit of Carrabanog (45 Bonus Points)"
	popup addline mraces "-> 9. Preivious Monster Races"
	popup submenu mraces 9 mrace
	popup addline mraces " 0. Exit"
	popup menuselect mraces dnd/m_choices

	popup create infomenu
	popup addline infomenu "Please Choose Something to see information About:"
	popup addline infomenu "-> 1. Races"
	popup submenu infomenu 1 rinfochoice
	popup addline infomenu "-> 2. Items"
	popup submenu infomenu 2 sinfochoice
	popup addline infomenu "-> 3. Classes"
	popup submenu infomenu 3 clinfochoice
	popup addline infomenu "-> 4. Commands"
	popup submenu infomenu 4 cmdinfochoice
	popup addline infomenu "-> 9. Back to Main Menu"
	popup submenu infomenu 9 mainmenu
	popup addline infomenu " 0. Exit"

	popup create sinfochoice
	popup addline sinfochoice "Please choose a type of item to see information about:"
	popup addline sinfochoice "-> 1. Potions"
	popup submenu sinfochoice 1 potioninfo
	popup addline sinfochoice "-> 9. Back to Info Menu"
	popup submenu sinfochoice 9 infomenu
	popup addline sinfochoice " 0. Exit"

	popup create potioninfo
	popup addline potioninfo "How to use potions:"
	popup addline potioninfo " Use !lightmana or !lightheal to use a light heal or mana potion"
	popup addline potioninfo " Use !moderatemana or !moderateheal to use a moderate heal or mana potion"
	popup addline potioninfo " Use !seriousmana or !seriousheal to use a serious heal or mana potion"
	popup addline potioninfo "What they do:"
	popup addline potioninfo " Light potions restore between 2 and 9"
	popup addline potioninfo " Moderate potions restore between 5 and 19"
	popup addline potioninfo " Serious potions restore between 8 and 29"
	popup addline potioninfo "-> 9. Back to Items Info"
	popup submenu potioninfo 9 sinfochoice
	popup addline potioninfo " 0. Exit"

	popup create rchoice
	popup addline rchoice "Please choose what type of race you wish to be:"
	popup addline rchoice "-> 1. Normal Races"
	popup submenu rchoice 1 racemenu
	popup addline rchoice "-> 2. Level Adjustment Races"
	popup submenu rchoice 2 lamenu
	popup addline rchoice "-> 3. Monster Races"
	popup submenu rchoice 3 mrace
	popup addline rchoice "-> 9. Back to Main Menu"
	popup submenu rchoice 9 mainmenu
	popup addline rchoice "0. Exit"

	popup create rinfochoice
	popup addline rinfochoice "Please Choose a type of race to see information About:"
	popup addline rinfochoice "-> 1. Normal Races"
	popup submenu rinfochoice 1 raceinfo
	popup addline rinfochoice "-> 2. Level Adjustment Races"
	popup submenu rinfochoice 2 lainfo
	popup addline rinfochoice "-> 3. Monster Races"
	popup submenu rinfochoice 3 minfo
	popup addline rinfochoice "-> 9. Back to Info Menu"
	popup submenu rinfochoice 9 infomenu
	popup addline rinfochoice " 0. Exit"

	popup create raceinfo
	popup addline raceinfo "Please Choose a race to see information about:"
	popup addline raceinfo "-> 1. Human"
	popup submenu raceinfo 1 human
	popup addline raceinfo "-> 2. Dwarf"
	popup submenu raceinfo 2 dwarf
	popup addline raceinfo "-> 3. Elf"
	popup submenu raceinfo 3 elf
	popup addline raceinfo "-> 4. Orc"
	popup submenu raceinfo 4 orc
	popup addline raceinfo "-> 5. Halfling"
	popup submenu raceinfo 5 halfling
	popup addline raceinfo "-> 6. Kobold"
	popup submenu raceinfo 6 kobold
	popup addline raceinfo "-> 7. GreyElf"
	popup submenu raceinfo 7 greyelf
	popup addline raceinfo "-> 9. Back to Info Menu"
	popup submenu raceinfo 9 rinfochoice
	popup addline raceinfo " 0. Exit"

	popup create lainfo
	popup addline lainfo "Please Choose a race to see information about:"
	popup addline lainfo "-> 1. Aasimar"
	popup submenu lainfo 1 aasimar
	popup addline lainfo "-> 2. Tiefling"
	popup submenu lainfo 2 tiefling
	popup addline lainfo "-> 3. Minotaur"
	popup submenu lainfo 3 minotaur
	popup addline lainfo "-> 4. Drow"
	popup submenu lainfo 4 drow
	popup addline lainfo "-> 5. Avariel"
	popup submenu lainfo 5 avariel
	popup addline lainfo "-> 6. Doppelganger"
	popup submenu lainfo 6 doppelganger
	popup addline lainfo "-> 7. Troll"
	popup submenu lainfo 7 troll
	popup addline lainfo "-> 8. Vampire"
	popup submenu lainfo 8 vampire
	popup addline lainfo "-> 9. Back to Info Menu"
	popup submenu lainfo 9 rinfochoice
	popup addline lainfo " 0. Exit"

	popup create aasimar
	popup addline aasimar " Race: Aasimar"
	popup addline aasimar " Level Adjustment: 1"
	popup addline aasimar " Passive Powers:"
	popup addline aasimar " +5 Team Health"
	popup addline aasimar " 5% Damage Reduction."
	popup addline aasimar " +10% Cash on spawn"
	popup addline aasimar " Bonus Weapon: UMP"
	popup addline aasimar "-> 9. Back to Race Info"
	popup submenu aasimar 9 lainfo
	popup addline aasimar " 0. Exit"

	popup create tiefling
	popup addline tiefling " Race: Tiefling"
	popup addline tiefling " Level Adjustment: 1"
	popup addline tiefling " Passive Powers:"
	popup addline tiefling " -5 Enemy Health"
	popup addline tiefling " +10 Mana on spawn"
	popup addline tiefling " -10% Cash on spawn"
	popup addline tiefling " If you have stealth -10 from your color."
	popup addline tiefling " If you don't have stealth +2% Speed on Spawn"
	popup addline tiefling " Bonus Weapon: MP5 Navy"
	popup addline tiefling "-> 9. Back to Race Info"
	popup submenu tiefling 9 lainfo
	popup addline tiefling " 0. Exit"

	popup create minotaur
	popup addline minotaur " Race: Minotaur"
	popup addline minotaur " Level Adjustment: 2"
	popup addline minotaur " Passive Powers:"
	popup addline minotaur " +20% Damage"
	popup addline minotaur " -20 Mana on spawn"
	popup addline minotaur " -20% Cash on spawn"
	popup addline minotaur " +60 Color"
	popup addline minotaur " 20% Damage Reduction"
	popup addline minotaur " Bonus Weapon: M249"
	popup addline minotaur "-> 9. Back to Race Info"
	popup submenu minotaur 9 lainfo
	popup addline minotaur " 0. Exit"

	popup create drow
	popup addline drow " Race: Drow"
	popup addline drow " Level Adjustment: 2"
	popup addline drow " Passive Powers:"
	popup addline drow " 4 Uses of Drow Poison"
	popup addline drow " +10 Mana on spawn"
	popup addline drow " +10% Cash on spawn"
	popup addline drow " -10 Health on spawn"
	popup addline drow " If you have stealth -10 from your color."
	popup addline drow " If you don't have stealth +2% Speed on Spawn"
	popup addline drow " Console Commands:"
	popup addline drow " !lev0 and !lev1"
	popup addline drow "-> 9. Back to Race Info"
	popup submenu drow 9 lainfo
	popup addline drow " 0. Exit"

	popup create avariel
	popup addline avariel " Race: Avariel"
	popup addline avariel " Level Adjustment: 3"
	popup addline avariel " Passive Powers:"
	popup addline avariel " +10 Mana on spawn"
	popup addline avariel " -10 Health on spawn"
	popup addline avariel " If you have stealth -20 from your color."
	popup addline avariel " If you don't have stealth +4% Speed on Spawn"
	popup addline avariel " Bonus Weapon: Scout"
	popup addline avariel " Console Commands:"
	popup addline avariel " !lev0, !lev1, lev2, and lev3"
	popup addline avariel "-> 9. Back to Race Info"
	popup submenu avariel 9 lainfo
	popup addline avariel " 0. Exit"

	popup create doppelganger
	popup addline doppelganger " Race: Doppelganger"
	popup addline doppelganger " Level Adjustment: 4"
	popup addline doppelganger " Passive Powers:"
	popup addline doppelganger " 20% Damage Reduction"
	popup addline doppelganger " +10 Mana on spawn"
	popup addline doppelganger " +10 Health on spawn"
	popup addline doppelganger " If you have stealth -10 from your color."
	popup addline doppelganger " If you don't have stealth +2% Speed on Spawn"
	popup addline doppelganger " Disguised"
	popup addline doppelganger " +10% Damage"
	popup addline doppelganger " +10% Cash on spawn"
	popup addline doppelganger "-> 9. Back to Race Info"
	popup submenu doppelganger 9 lainfo
	popup addline doppelganger " 0. Exit"

	popup create troll
	popup addline troll " Race: Troll"
	popup addline troll " Level Adjustment: 5"
	popup addline troll " Passive Powers:"
	popup addline troll " +60 Health on spawn"
	popup addline troll " Heal 5 every 6 seconds"
	popup addline troll " +33% Damage"
	popup addline troll " -20% Cash on spawn"
	popup addline troll " -20 Mana on spawn"
	popup addline troll " If you have stealth +20 from your color."
	popup addline troll "-> 9. Back to Race Info"
	popup submenu troll 9 lainfo
	popup addline troll " 0. Exit"

	popup create vampire
	popup addline vampire " Race: Vampire"
	popup addline vampire " Level Adjustment: 8"
	popup addline vampire " Passive Powers:"
	popup addline vampire " -90 Health on spawn"
	popup addline vampire " Heal 5 every 6 seconds"
	popup addline vampire " +15% Damage"
	popup addline vampire " +10% Cash on spawn"
	popup addline vampire " 40% Health Leech"
	popup addline vampire " If you have stealth -20 from your color."
	popup addline vampire " If you don't have stealth +4% Speed on Spawn"
	popup addline vampire " Console Commands:"
	popup addline vampire " !lev0, !lev1, lev2, and lev3"
	popup addline vampire " 2/Round !vanish"
	popup addline vampire "-> 9. Back to Race Info"
	popup submenu vampire 9 lainfo
	popup addline vampire " 0. Exit"

	popup create minfo
	popup addline minfo "Please Choose a race to see information about:"
	popup addline minfo "-> 1. Tibbit"
	popup submenu minfo 1 tibbit
	popup addline minfo "-> 2. Ethreal Filcher"
	popup submenu minfo 2 filcher
	popup addline minfo "-> 3. Golem"
	popup submenu minfo 3 golem
	popup addline minfo "-> 4. Rok"
	popup submenu minfo 4 rok
	popup addline minfo "-> 5. Dragon"
	popup submenu minfo 5 dragon
	popup addline minfo "-> 6. Air Elemental"
	popup submenu minfo 6 airele
	popup addline minfo "-> 7. Earth Elemental"
	popup submenu minfo 7 earthele
	popup addline minfo "-> 8. More Monster Race Info"
	popup submenu minfo 8 minfo2
	popup addline minfo "-> 9. Back to Info Menu"
	popup submenu minfo 9 rinfochoice
	popup addline minfo " 0. Exit"

	popup create minfo2
	popup addline minfo2 "Please Choose a race to see information about:"
	popup addline minfo2 "-> 1. Fire Elemental"
	popup submenu minfo2 1 fireele
	popup addline minfo2 "-> 2. Water Elemental"
	popup submenu minfo2 2 waterele
	popup addline minfo2 "-> 3. Chain Devil"
	popup submenu minfo2 3 chaindevil
	popup addline minfo2 "-> 4. Gental Giant"
	popup submenu minfo2 4 gental
	popup addline minfo2 "-> 5. Basilisk"
	popup submenu minfo2 5 basilisk
	popup addline minfo2 "-> 6. Rabbit of Carrabanog"
	popup submenu minfo2 6 rabbit
	popup addline minfo2 "-> 9. Back to Monster Info Menu"
	popup submenu minfo2 9 minfo
	popup addline minfo2 " 0. Exit"

	popup create gental
	popup addline gental " Race: Gental Giant"
	popup addline gental " Bonus Points Required: 28"
	popup addline gental " Passive Powers:"
	popup addline gental " Alot of Health"
	popup addline gental " Regeneration"
	popup addline gental " Your Attacks Deal No Damage"
	popup addline gental " Console Commands:"
	popup addline gental " !stomp"
	popup addline gental " Weapons: Knife"
	popup addline gental "-> 9. Back to Race Info"
	popup submenu gental 9 minfo2
	popup addline gental " 0. Exit"

	popup create basilisk
	popup addline basilisk " Race: Basilisk"
	popup addline basilisk " Bonus Points Required: 36"
	popup addline basilisk " Passive Powers:"
	popup addline basilisk " +400 Health"
	popup addline basilisk " 50% Damage Reduction"
	popup addline basilisk " Console Commands:"
	popup addline basilisk " !gaze - Turn your victim to stone."
	popup addline basilisk " !stealth 2/round"
	popup addline basilisk " Weapons: Knife"
	popup addline basilisk "-> 9. Back to Race Info"
	popup submenu basilisk 9 minfo2
	popup addline basilisk " 0. Exit"

	popup create rabbit
	popup addline rabbit " Race: Rabbit of Carrabanog"
	popup addline rabbit " Bonus Points Required: 45"
	popup addline rabbit " Passive Powers:"
	popup addline rabbit " +100 Health"
	popup addline rabbit " 75% Dodge"
	popup addline rabbit " Only Knife is Seen"
	popup addline rabbit " x4 Knife Damage"
	popup addline rabbit " Dies from HEDamage"
	popup addline rabbit " Weapons: Knife"
	popup addline rabbit "-> 9. Back to Race Info"
	popup submenu rabbit 9 minfo2
	popup addline rabbit " 0. Exit"

	popup create tibbit
	popup addline tibbit " Race: Tibbit"
	popup addline tibbit " Powers while in Tibbit form:"
	popup addline tibbit " Colored @ 30/255"
	popup addline tibbit " (4d6) Sneak Attack"
	popup addline tibbit " 70% Gravity"
	popup addline tibbit " -10 Health"
	popup addline tibbit " Weapons: USP, Knife, and Grenades"
	popup addline tibbit " Console: Use !cat to turn into a cat form."
	popup addline tibbit " ------------------------------------------"
	popup addline tibbit " Powers while in Cat form:"
	popup addline tibbit " Colored @ 30/255"
	popup addline tibbit " (4d6) Sneak Attack"
	popup addline tibbit " +30% Speed"
	popup addline tibbit " 70% Gravity"
	popup addline tibbit " -20 Health"
	popup addline tibbit " 75% Dodge"
	popup addline tibbit " Weapons: Knife Only"
	popup addline tibbit " Console: Use !cat to turn back into a tibbit."
	popup addline tibbit "-> 9. Back to Race Info"
	popup submenu tibbit 9 minfo
	popup addline tibbit " 0. Exit"

	popup create chaindevil
	popup addline chaindevil " Race: Chain Devil"
	popup addline chaindevil " Bonus Points Required: 20"
	popup addline chaindevil " Passive Powers:"
	popup addline chaindevil " 90% Dodge"
	popup addline chaindevil " Flicker Form"
	popup addline chaindevil " -30 Starting Health"
	popup addline chaindevil " Drugging Attacks"
	popup addline chaindevil " Disarming Attacks"
	popup addline chaindevil " Weapons: All Pistol cept the Deagle"
	popup addline chaindevil "-> 9. Back to Race Info"
	popup submenu chaindevil 9 minfo2
	popup addline chaindevil " 0. Exit"

	popup create filcher
	popup addline filcher " Race: Ethreal Filcher"
	popup addline filcher " Bonus Points Required: 1"
	popup addline filcher " Passive Powers:"
	popup addline filcher " Knife Only"
	popup addline filcher " They only see you knife."
	popup addline filcher " 25 Starting Health"
	popup addline filcher " 20% Speed Boost"
	popup addline filcher " Steal money from the person you hit = damage dealt^2"
	popup addline filcher " Console Commands:"
	popup addline filcher " !lev0, !lev1, and !lev2"
	popup addline filcher " !save1, !tele1, !save2, and !tele2"
	popup addline filcher "-> 9. Back to Race Info"
	popup submenu filcher 9 minfo
	popup addline filcher " 0. Exit"

	popup create golem
	popup addline golem " Race: Golem"
	popup addline golem " Bonus Points Required: 3"
	popup addline golem " Passive Powers:"
	popup addline golem " Knife Only"
	popup addline golem " 1600 Starting Health"
	popup addline golem " -50% Speed on spawn"
	popup addline golem " 50% Damage Reduction"
	popup addline golem " Deal 4 damage to the person who shoots you."
	popup addline golem " Have a chance to blind the person who shoots you."
	popup addline golem "-> 9. Back to Race Info"
	popup submenu golem 9 minfo
	popup addline golem " 0. Exit"

	popup create rok
	popup addline rok " Race: Rok"
	popup addline rok " Bonus Points Required: 6"
	popup addline rok " Passive Powers:"
	popup addline rok " Scout/Knife Only"
	popup addline rok " 70 Starting Health"
	popup addline rok " Colored @ 30/255"
	popup addline rok " Free Scout every round"
	popup addline rok " Regenerate lost health over time"
	popup addline rok " 50% chance to deal double damage with an attack."
	popup addline rok " Console Commands:"
	popup addline rok " !lev0, !lev1,!lev2, and !lev3"
	popup addline rok "-> 9. Back to Race Info"
	popup submenu rok 9 minfo
	popup addline rok " 0. Exit"

	popup create dragon
	popup addline dragon " Race: Dragon"
	popup addline dragon " Bonus Points Required: 10"
	popup addline dragon " Passive Powers:"
	popup addline dragon " +4000 Cash on spawn"
	popup addline dragon " 125 Starting Health"
	popup addline dragon " Regenerate lost health over time"
	popup addline dragon " Chance to set fire to the person you hit with your attack."
	popup addline dragon " Console Commands:"
	popup addline dragon " !lev0, !lev1,!lev2, and !lev3"
	popup addline dragon "-> 9. Back to Race Info"
	popup submenu dragon 9 minfo
	popup addline dragon " 0. Exit"

	popup create airele
	popup addline airele " Race: Air Elemental"
	popup addline airele " Bonus Points Required: 15"
	popup addline airele " Passive Powers:"
	popup addline airele " Disguised on Spawn"
	popup addline airele " 125 Starting Health"
	popup addline airele " Slap your victim"
	popup addline airele " Chance to set your victim gravity to really low."
	popup addline airele " Console Commands:"
	popup addline airele " !lev0, !lev1,!lev2, and !lev3"
	popup addline airele "-> 9. Back to Race Info"
	popup submenu airele 9 minfo
	popup addline airele " 0. Exit"

	popup create earthele
	popup addline earthele " Race: Earth Elemental"
	popup addline earthele " Bonus Points Required: 15"
	popup addline earthele " Passive Powers:"
	popup addline earthele " Chance to beacon your victim."
	popup addline earthele " 250 Starting Health"
	popup addline earthele " Return 5 damage to the person you hit."
	popup addline earthele " Chance to set your victim gravity to really high."
	popup addline earthele "-> 9. Back to Race Info"
	popup submenu earthele 9 minfo
	popup addline earthele " 0. Exit"

	popup create fireele
	popup addline fireele " Race: Fire Elemental"
	popup addline fireele " Bonus Points Required: 15"
	popup addline fireele " Passive Powers:"
	popup addline fireele " Chance to set fire to your victim."
	popup addline fireele " 125 Starting Health"
	popup addline fireele " Regenerate lost health over time"
	popup addline fireele " Your critical hits deal x3 damage instead of x2."
	popup addline fireele " Chance to set fire to your attcker."
	popup addline fireele "-> 9. Back to Race Info"
	popup submenu fireele 9 minfo2
	popup addline fireele " 0. Exit"

	popup create waterele
	popup addline waterele " Race: Water Elemental"
	popup addline waterele " Bonus Points Required: 15"
	popup addline waterele " Passive Powers:"
	popup addline waterele " Your Grenades Freeze people."
	popup addline waterele " Colored @ 50/255"
	popup addline waterele " 125 Starting Health"
	popup addline waterele " Have a chance to dodge attacks"
	popup addline waterele " Console Commands:"
	popup addline waterele " !save1, !tele1, !save2, and !tele2"
	popup addline waterele "-> 9. Back to Race Info"
	popup submenu waterele 9 minfo2
	popup addline waterele " 0. Exit"

	popup create human
	popup addline human " Race: Human"
	popup addline human " Passive Bonus: +20xp Per Kill"
	popup addline human "-> 9. Back to Race Info"
	popup submenu human 9 raceinfo
	popup addline human " 0. Exit"

	popup create dwarf
	popup addline dwarf " Race: Dwarf"
	popup addline dwarf " Passive Bonus: +10 Health on Spawn"
	popup addline dwarf " Passive Penalties: -10% Cash on Spawn"
	popup addline dwarf " -5% Speed on Spawn"
	popup addline dwarf "-> 9. Back to Race Info"
	popup submenu dwarf 9 raceinfo
	popup addline dwarf " 0. Exit"

	popup create elf
	popup addline elf " Race: Elf"
	popup addline elf " Passive Bonus: If you have stealth -10 from your color."
	popup addline elf " If you don't have stealth +2% Speed on Spawn"
	popup addline elf " Passive Penalties: -10 Health on Spawn"
	popup addline elf " Extra Weapons: Scout Sniper Rifle"
	popup addline elf " M4A1 and AK47"
	popup addline elf "-> 9. Back to Race Info"
	popup submenu elf 9 raceinfo
	popup addline elf " 0. Exit"

	popup create orc
	popup addline orc " Race: Orc"
	popup addline orc " Passive Bonus: 10% Bonus Damage on all weapons"
	popup addline orc " Passive Penalties: -10% Cash on Spawn"
	popup addline orc " -10 Mana on Spawn"
	popup addline orc "-> 9. Back to Race Info"
	popup submenu orc 9 raceinfo
	popup addline orc " 0. Exit"

	popup create halfling
	popup addline halfling " Race: Halfling"
	popup addline halfling " Passive Bonus: If you have stealth -50 from your color."
	popup addline halfling " If you don't have stealth +2% Speed on Spawn"
	popup addline halfling " Jump @ 70% Gravity"
	popup addline halfling " Passive Penalties: -20% Speed on Spawn"
	popup addline halfling " -5% Damage on all attacks"
	popup addline halfling "-> 9. Back to Race Info"
	popup submenu halfling 9 raceinfo
	popup addline halfling " 0. Exit"

	popup create kobold
	popup addline kobold " Race: Kobold"
	popup addline kobold " Passive Bonus: Gain Fire Grenades"
	popup addline kobold " Free HEGrenade on Spawn"
	popup addline kobold " Passive Penalties: -10 Health on Spawn"
	popup addline kobold " -10% Damage on all attacks"
	popup addline kobold " Console Commands: !escape"
	popup addline kobold "-> 9. Back to Race Info"
	popup submenu kobold 9 raceinfo
	popup addline kobold " 0. Exit"

	popup create greyelf
	popup addline greyelf " Race: GreyElf"
	popup addline greyelf " Passive Bonus: +10 Mana on Spawn"
	popup addline greyelf " If you have stealth -10 from your color."
	popup addline greyelf " If you don't have stealth +2% Speed on Spawn"
	popup addline greyelf " Passive Penalties: -10 Health on Spawn"
	popup addline greyelf " -5% Damage on all attacks"
	popup addline greyelf " Extra Weapons:"
	popup addline greyelf " UMP and P90"
	popup addline greyelf "-> 9. Back to Race Info"
	popup submenu greyelf 9 raceinfo
	popup addline greyelf " 0. Exit"

	popup create tkmenu
	popup addline tkmenu " Choose what to do to the person who has team killed you:"
	popup addline tkmenu "-> 1. Lose 300 Xp"
	popup addline tkmenu "-> 2. Drug"
	popup addline tkmenu "-> 3. Burn"
	popup addline tkmenu "-> 4. Freeze"
	popup addline tkmenu "-> 5. Slap"
	popup addline tkmenu "-> 6. Take 50% Cash"
	popup addline tkmenu " 0. Forgive"
	popup menuselect tkmenu dnd/tkmenu

	popup create kensaiweapons
	popup addline kensaiweapons " Choose an enhancement for your weapon this round:"
	popup addline kensaiweapons "-> 1. +10% Damage(1 Point)"
	popup addline kensaiweapons "-> 2. Drunken Attacks(1 Point)"
	popup addline kensaiweapons "-> 3. Freezing Attacks(2 Points)"
	popup addline kensaiweapons "-> 4. Disarming Attack(2 Points)"
	popup addline kensaiweapons "-> 5. Burning Strike(3 Points)"
	popup addline kensaiweapons "-> 6. Mana Drainer(4 Points)"
	popup addline kensaiweapons "-> 7. Leeching Weapon(5 Points)"
	popup addline kensaiweapons "-> 8. Destory Vision(6 Points)"
	popup addline kensaiweapons "-> 9. Purge Stealth(7 Points)"
	popup addline kensaiweapons "0. Exit"
	popup menuselect kensaiweapons dnd/kensaiweapons

	popup create zombieghoul
	popup addline zombieghoul " Choose to raise your teamate as a zombie or a ghoul:"
	popup addline zombieghoul "-> 1. Zombie"
	popup addline zombieghoul "-> 2. Ghoul"
	popup menuselect zombieghoul dnd/zombieghoul

	popup create clinfochoice
	popup addline clinfochoice "Please Choose a class to see information about:"
	popup addline clinfochoice "-> 1. Fighter info"
	popup submenu clinfochoice 1 fiinfo
	popup addline clinfochoice "-> 2. Rogue info"
	popup submenu clinfochoice 2 roinfo
	popup addline clinfochoice "-> 3. Wizard info"
	popup submenu clinfochoice 3 wiinfo
	popup addline clinfochoice "-> 4. Cleric info"
	popup submenu clinfochoice 4 cleinfo
	popup addline clinfochoice "-> 5. Paladin info"
	popup submenu clinfochoice 5 palinfo
	popup addline clinfochoice "-> 6. Ranger info"
	popup submenu clinfochoice 6 raninfo
	popup addline clinfochoice "-> 7. Monk info"
	popup submenu clinfochoice 7 moninfo
	popup addline clinfochoice "-> 8. Next"
	popup submenu clinfochoice 8 clminfochoice
	popup addline clinfochoice "-> 9. Back to Info Menu"
	popup submenu clinfochoice 9 infomenu
	popup addline clinfochoice " 0. Exit"

	popup create clminfochoice
	popup addline clminfochoice "-> 1. Necromancer info"
	popup submenu clminfochoice 1 necinfo
	popup addline clminfochoice "-> 2. Bard info"
	popup submenu clminfochoice 2 bardinfo
	popup addline clminfochoice "-> 8. Back to the previous menu"
	popup submenu clminfochoice 8 clinfochoice
	popup addline clminfochoice " 0. Exit"

	popup create fiinfo
	popup addline fiinfo "Class Info: Fighter"
	popup addline fiinfo "Weapons: All guns except AWP (obtain at level 10)"
 	popup addline fiinfo "and both Autosnipers (level 15 prestige)"
	popup addline fiinfo "Overview: Gives bonus damage, takes less damage,"
	popup addline fiinfo "along with drug and more health." 

	popup create roinfo
	popup addline roinfo "Class Info: Rogue"
	popup addline roinfo "Weapons: All pistols, MP5, TMP, Mac10,"
	popup addline roinfo "and scout."
	popup addline roinfo "Overview: Increased stealth with levels (comes out"
	popup addline roinfo "when shot or when shoots enemy), sneak attack,"
	popup addline roinfo "cripple, decreased gravity, dodge, steal money, and more."

	popup create wiinfo
	popup addline wiinfo "Class Info: Wizard"
	popup addline wiinfo "Weapons: Glock, USP, P228, fiveseven, duel elites"
	popup addline wiinfo "Overview: Has damage spells, sleep spell (stun + blind), can"
	popup addline wiinfo "teleport and has an insta-kill spell and a god mode spell."
	popup addline wiinfo "Increased mana with level."

	popup create cleinfo
	popup addline cleinfo "Class Info: Cleric"
	popup addline cleinfo "Weapons: All pistols, Famas, Galil, and M249"
	popup addline cleinfo "Overview: Has two sides, type !good to make"
	popup addline cleinfo "healign spells heal and !evil to make healing"
	popup addline cleinfo "spells do damage. Has stun, resurrect, purge"
	popup addline cleinfo "enemy spells (use !evil to make it partially"
	popup addline cleinfo "blind all enemies[bane]) and can burn enemies."

	popup create palinfo
	popup addline palinfo "Class Info: Paladin"
	popup addline palinfo "Weapons: All weapons"
	popup addline palinfo "Overview: Paladins can heal, are immune to"
	popup addline palinfo "critital hits, burn enemies they shoot, and gain more health."

	popup create raninfo
	popup addline raninfo "Class Info: Ranger"
	popup addline raninfo "Weapons: Dual Elites and Scout"
	popup addline raninfo "Overview: Ranger has two forms of attack,"
	popup addline raninfo "!archer (invisible, bonus damage, scout only)"
	popup addline raninfo "and !dual (speed, drug, damage). It also has an"
	popup addline raninfo "ability that lets the ranger beacon all enemies for"
	popup addline raninfo "a few seconds."

	popup create moninfo
	popup addline moninfo "Class Info: Monk"
	popup addline moninfo "Weapons: Knife Only"
	popup addline moninfo "Overview: Monk is an invisible knife class that has"
	popup addline moninfo "bonus damage and increased speed with each level."
	popup addline moninfo "It can also escape like a kobold without being a kobold."
	popup addline moninfo "Monk gets 1 teleport and gets decreased gravity."

	popup create necinfo
	popup addline necinfo "Class Info: Necromancer"
	popup addline necinfo "Weapons: Glock, USP, P228"
	popup addline necinfo "Overview: Necromancers use fire skills along with"
	popup addline necinfo "raising their teammates as zombies to help them."
 	popup addline necinfo "It also gains the ability to slap their target."

	popup create bardinfo
	popup addline bardinfo "Class Info: Bard"
	popup addline bardinfo "Weapons: All Pistols, All SMGs, Scout, Galil, Famas"
	popup addline bardinfo "Overview: Can buff the bard's team with speed and"
	popup addline bardinfo "damage, and can also make a shock wave."

	popup create cmdinfochoice
	popup addline cmdinfochoice "Some useful commands (must be said in chat):"
	popup addline cmdinfochoice "!menu - Used to get to the main menu of the mod."
	popup addline cmdinfochoice "!spells - Some classes have spells that they use."
	popup addline cmdinfochoice "!skills - Used to show your current abilities."
}

block potion_choice
{
	es_setinfo shopsteam 0
	es est_getsteam shopsteam server_var(_popup_userid)
	es_setinfo cash 0
	es_getmoney cash server_var(_popup_userid)
	if (server_var(_popup_choice) = 1) do
	{
		if (server_var(cash) >= 500) do
		{
			if (server_var(buy_end) = 1) do
			{
				es_setinfo healpot_count 0
				es_setinfo totalpot_count 0
				es_keygetvalue healpot_count dndExtra server_var(shopsteam) healing
				es_keygetvalue totalpot_count dndExtra server_var(shopsteam) totalpot
				if (server_var(totalpot_count) = 0) do
				{
					es_setinfo totalpot_count 1
				}
				else do
				{
					es_math totalpot_count + 1
				}
				if (server_var(totalpot_count) <= 4) do
				{
					es_keysetvalue dndExtra server_var(shopsteam) totalpot server_var(totalpot_count)
					if (server_var(healpot_count) = 0) do
					{
						es_setinfo healpot_count 1
					}
					else do
					{
						es_math healpot_count + 1
					}
					es_keysetvalue dndExtra server_var(shopsteam) healing server_var(healpot_count)
					es_tell server_var(_popup_userid) #green You now have server_var(healpot_count) light healing potions.
					es ma_takecash server_var(_popup_userid) 500
				}
			}
			else do
			{
				es_tell server_var(_popup_userid) #green It is to late to buy items from the shop!
			}	
		}
		else do
		{
			es_tell server_var(_popup_userid) #green You do not have enough money to buy that item.
		}
	}
	if (server_var(_popup_choice) = 2) do
	{
		if (server_var(cash) >= 500) do
		{
			if (server_var(buy_end) = 1) do
			{
				es_setinfo manapot_count 0
				es_setinfo totalpot_count 0
				es_keygetvalue manapot_count dndExtra server_var(shopsteam) manaing
				es_keygetvalue totalpot_count dndExtra server_var(shopsteam) totalpot
				if (server_var(totalpot_count) = 0) do
				{
					es_setinfo totalpot_count 1
				}
				else do
				{
					es_math totalpot_count + 1
				}
				if (server_var(totalpot_count) <= 4) do
				{
					es_keysetvalue dndExtra server_var(shopsteam) totalpot server_var(totalpot_count)
					if (server_var(manapot_count) = 0) do
					{
						es_setinfo manapot_count 1
					}
					else do
					{
						es_math manapot_count + 1
					}
					es_keysetvalue dndExtra server_var(shopsteam) manaing server_var(manapot_count)
					es_tell server_var(_popup_userid) #green You now have server_var(manapot_count) light mana potions.
					es ma_takecash server_var(_popup_userid) 500
				}
			}
			else do
			{
				es_tell server_var(_popup_userid) #green It is to late to buy items from the shop!
			}
		}
		else do
		{
			es_tell server_var(_popup_userid) #green You do not have enough money to buy that item.
		}
	}
	if (server_var(_popup_choice) = 3) do
	{
		if (server_var(cash) >= 1500) do
		{
			if (server_var(buy_end) = 1) do
			{
				es_setinfo healpot_count 0
				es_setinfo totalpot_count 0
				es_keygetvalue healpot_count dndExtra server_var(shopsteam) mhealing
				es_keygetvalue totalpot_count dndExtra server_var(shopsteam) totalpot
				if (server_var(totalpot_count) = 0) do
				{
					es_setinfo totalpot_count 1
				}
				else do
				{
					es_math totalpot_count + 1
				}
				if (server_var(totalpot_count) <= 4) do
				{
					es_keysetvalue dndExtra server_var(shopsteam) totalpot server_var(totalpot_count)
					if (server_var(healpot_count) = 0) do
					{
						es_setinfo healpot_count 1
					}
					else do
					{
						es_math healpot_count + 1
					}
					es_keysetvalue dndExtra server_var(shopsteam) mhealing server_var(healpot_count)
					es_tell server_var(_popup_userid) #green You now have server_var(healpot_count) modaerate healing potions.
					es ma_takecash server_var(_popup_userid) 1500
				}
			}
			else do
			{
				es_tell server_var(_popup_userid) #green It is to late to buy items from the shop!
			}	
		}
		else do
		{
			es_tell server_var(_popup_userid) #green You do not have enough money to buy that item.
		}
	}
	if (server_var(_popup_choice) = 4) do
	{
		if (server_var(cash) >= 1500) do
		{
			if (server_var(buy_end) = 1) do
			{
				es_setinfo manapot_count 0
				es_setinfo totalpot_count 0
				es_keygetvalue manapot_count dndExtra server_var(shopsteam) mmanaing
				es_keygetvalue totalpot_count dndExtra server_var(shopsteam) totalpot
				if (server_var(totalpot_count) = 0) do
				{
					es_setinfo totalpot_count 1
				}
				else do
				{
					es_math totalpot_count + 1
				}
				if (server_var(totalpot_count) <= 4) do
				{
					es_keysetvalue dndExtra server_var(shopsteam) totalpot server_var(totalpot_count)
					if (server_var(manapot_count) = 0) do
					{
						es_setinfo manapot_count 1
					}
					else do
					{
						es_math manapot_count + 1
					}
					es_keysetvalue dndExtra server_var(shopsteam) mmanaing server_var(manapot_count)
					es_tell server_var(_popup_userid) #green You now have server_var(manapot_count) moderate mana potions.
					es ma_takecash server_var(_popup_userid) 1500
				}
			}
			else do
			{
				es_tell server_var(_popup_userid) #green It is to late to buy items from the shop!
			}
		}
		else do
		{
			es_tell server_var(_popup_userid) #green You do not have enough money to buy that item.
		}
	}
	if (server_var(_popup_choice) = 5) do
	{
		if (server_var(cash) >= 3000) do
		{
			if (server_var(buy_end) = 1) do
			{
				es_setinfo healpot_count 0
				es_setinfo totalpot_count 0
				es_keygetvalue healpot_count dndExtra server_var(shopsteam) shealing
				es_keygetvalue totalpot_count dndExtra server_var(shopsteam) totalpot
				if (server_var(totalpot_count) = 0) do
				{
					es_setinfo totalpot_count 1
				}
				else do
				{
					es_math totalpot_count + 1
				}
				if (server_var(totalpot_count) <= 4) do
				{
					es_keysetvalue dndExtra server_var(shopsteam) totalpot server_var(totalpot_count)
					if (server_var(healpot_count) = 0) do
					{
						es_setinfo healpot_count 1
					}
					else do
					{
						es_math healpot_count + 1
					}
					es_keysetvalue dndExtra server_var(shopsteam) shealing server_var(healpot_count)
					es_tell server_var(_popup_userid) #green You now have server_var(healpot_count) serious healing potions.
					es ma_takecash server_var(_popup_userid) 3000
				}
			}
			else do
			{
				es_tell server_var(_popup_userid) #green It is to late to buy items from the shop!
			}	
		}
		else do
		{
			es_tell server_var(_popup_userid) #green You do not have enough money to buy that item.
		}
	}
	if (server_var(_popup_choice) = 6) do
	{
		if (server_var(cash) >= 3000) do
		{
			if (server_var(buy_end) = 1) do
			{
				es_setinfo manapot_count 0
				es_setinfo totalpot_count 0
				es_keygetvalue manapot_count dndExtra server_var(shopsteam) smanaing
				es_keygetvalue totalpot_count dndExtra server_var(shopsteam) totalpot
				if (server_var(totalpot_count) = 0) do
				{
					es_setinfo totalpot_count 1
				}
				else do
				{
					es_math totalpot_count + 1
				}
				if (server_var(totalpot_count) <= 4) do
				{
					es_keysetvalue dndExtra server_var(shopsteam) totalpot server_var(totalpot_count)
					if (server_var(manapot_count) = 0) do
					{
						es_setinfo manapot_count 1
					}
					else do
					{
						es_math manapot_count + 1
					}
					es_keysetvalue dndExtra server_var(shopsteam) smanaing server_var(manapot_count)
					es_tell server_var(_popup_userid) #green You now have server_var(manapot_count) serious mana potions.
					es ma_takecash server_var(_popup_userid) 3000
				}
			}
			else do
			{
				es_tell server_var(_popup_userid) #green It is to late to buy items from the shop!
			}
		}
		else do
		{
			es_tell server_var(_popup_userid) #green You do not have enough money to buy that item.
		}
	}
}

block zombieghoul
{
	if (server_var(_popup_choice) = 1) do
	{
		es_setinfo alive 0
		es est_isalive alive server_var(_popup_userid)
		if (server_var(alive) = 1) do
		{
			es_setinfo usersteam 0
			es_setinfo zsteamcheck 0
			es est_getsteam usersteam server_var(_popup_userid)
			es est_getsteam zsteamcheck server_var(zplayer)
			es_setinfo x 0
			es_setinfo y 0
			es_setinfo z 0
			es_keygetvalue x dndExtra server_var(zsteamcheck) d_x
			es_keygetvalue y dndExtra server_var(zsteamcheck) d_y
			es_keygetvalue z dndExtra server_var(zsteamcheck) d_z
			es_setinfo race 0
			es_setinfo class 0
			es_setinfo prestige 0
			es_setinfo monster 0
			es_setinfo curxp 0
			es_setinfo la 0
			es_keygetvalue la dndUsers server_var(zsteamcheck) la
			es_keygetvalue curxp dndUsers server_var(zsteamcheck) curxp
			es_keygetvalue race dndUsers server_var(zsteamcheck) race
			es_keygetvalue class dndUsers server_var(zsteamcheck) class
			es_keygetvalue prestige dndUsers server_var(zsteamcheck) prestige
			es_keygetvalue monster dndUsers server_var(zsteamcheck) monster
			es_keysetvalue dndExtra server_var(zsteamcheck) la server_var(la)
			es_keysetvalue dndExtra server_var(zsteamcheck) curxp server_var(curxp)
			es_keysetvalue dndExtra server_var(zsteamcheck) race server_var(race)
			es_keysetvalue dndExtra server_var(zsteamcheck) class server_var(class)
			es_keysetvalue dndExtra server_var(zsteamcheck) prestige server_var(prestige)
			es_keysetvalue dndExtra server_var(zsteamcheck) monster server_var(monster)
			es_keysetvalue dndUsers server_var(zsteamcheck) race Zombie
			es_keysetvalue dndExtra server_var(zsteamcheck) makersteam server_var(usersteam)
			es_keysetvalue dndExtra server_var(zsteamcheck) makeruser server_var(_popup_userid)
			es_keysetvalue dndUsers server_var(zsteamcheck) monster 1
			es_keysetvalue dndExtra server_var(zsteamcheck) zombie 1
			es est_spawn server_var(zplayer)
			es ma_teleport server_var(zplayer) server_var(x) server_var(y) server_var(z)
			es_setinfo mana 0
			es_keygetvalue mana dndExtra server_var(usersteam) mana
			es_math mana - 25
			es_keysetvalue dndExtra server_var(usersteam) mana server_var(mana)
			es_tell server_var(_popup_userid) #green You have rasied a teammate as a zombie to fight for you!
		}
	}
	if (server_var(_popup_choice) = 2) do
	{
		es_setinfo alive 0
		es est_isalive alive server_var(_popup_userid)
		if (server_var(alive) = 1) do
		{
			es_setinfo usersteam 0
			es_setinfo zsteamcheck 0
			es est_getsteam usersteam server_var(_popup_userid)
			es est_getsteam zsteamcheck server_var(zplayer)
			es_setinfo x 0
			es_setinfo y 0
			es_setinfo z 0
			es_keygetvalue x dndExtra server_var(zsteamcheck) d_x
			es_keygetvalue y dndExtra server_var(zsteamcheck) d_y
			es_keygetvalue z dndExtra server_var(zsteamcheck) d_z
			es_setinfo race 0
			es_setinfo class 0
			es_setinfo prestige 0
			es_setinfo monster 0
			es_setinfo curxp 0
			es_setinfo la 0
			es_keygetvalue la dndUsers server_var(zsteamcheck) la
			es_keygetvalue curxp dndUsers server_var(zsteamcheck) curxp
			es_keygetvalue race dndUsers server_var(zsteamcheck) race
			es_keygetvalue class dndUsers server_var(zsteamcheck) class
			es_keygetvalue prestige dndUsers server_var(zsteamcheck) prestige
			es_keygetvalue monster dndUsers server_var(zsteamcheck) monster
			es_keysetvalue dndExtra server_var(zsteamcheck) la server_var(la)
			es_keysetvalue dndExtra server_var(zsteamcheck) curxp server_var(curxp)
			es_keysetvalue dndExtra server_var(zsteamcheck) race server_var(race)
			es_keysetvalue dndExtra server_var(zsteamcheck) class server_var(class)
			es_keysetvalue dndExtra server_var(zsteamcheck) prestige server_var(prestige)
			es_keysetvalue dndExtra server_var(zsteamcheck) monster server_var(monster)
			es_keysetvalue dndUsers server_var(zsteamcheck) race Ghoul
			es_keysetvalue dndExtra server_var(zsteamcheck) makersteam server_var(usersteam)
			es_keysetvalue dndExtra server_var(zsteamcheck) makeruser server_var(_popup_userid)
			es_keysetvalue dndUsers server_var(zsteamcheck) monster 1
			es_keysetvalue dndExtra server_var(zsteamcheck) zombie 1
			es est_spawn server_var(zplayer)
			es ma_teleport server_var(zplayer) server_var(x) server_var(y) server_var(z)
			es_setinfo mana 0
			es_keygetvalue mana dndExtra server_var(usersteam) mana
			es_math mana - 25
			es_keysetvalue dndExtra server_var(usersteam) mana server_var(mana)
			es_tell server_var(_popup_userid) #green You have rasied a teammate as a ghoul to fight for you!
		}
	}
}

block kensaiweapons
{
	if (server_var(_popup_choice) = 1) do
	{
		es_setinfo kenid 0
		es est_getsteam kenid server_var(_popup_userid)
		es_setinfo pts 0
		es_keygetvalue pts dndExtra server_var(kenid) kensaipts
		if (server_var(pts) >= 1) do
		{
			es_setinfo check 0
			es_keygetvalue check dndExtra server_var(kenid) kendmg
			if (server_var(check) = 0) do
			{
				es_math pts - 1
				es_keysetvalue dndExtra server_var(kenid) kensaipts server_var(pts)
				es_keysetvalue dndExtra server_var(kenid) kendmg 1
				if (server_var(pts) >= 1) do
				{
					es popup send kensaiweapons server_var(_popup_userid)
				}
				es_tell server_Var(_popup_userid) #green Your attacks deal 10% more damage this round.
			}
			else do
			{
				es_tell server_var(_popup_userid) #green You already have that power up!
				es popup send kensaiweapons server_var(_popup_userid)
			}
		}
	}
	if (server_var(_popup_choice) = 2) do
	{
		es_setinfo kenid 0
		es est_getsteam kenid server_var(_popup_userid)
		es_setinfo pts 0
		es_keygetvalue pts dndExtra server_var(kenid) kensaipts
		if (server_var(pts) >= 1) do
		{
			es_setinfo check 0
			es_keygetvalue check dndExtra server_var(kenid) kendrunk
			if (server_var(check) = 0) do
			{
				es_math pts - 1
				es_keysetvalue dndExtra server_var(kenid) kensaipts server_var(pts)
				es_keysetvalue dndExtra server_var(kenid) kendrunk 1
				if (server_var(pts) >= 1) do
				{
					es popup send kensaiweapons server_var(_popup_userid)
				}
				es_tell server_Var(_popup_userid) #green Your attacks have a chance to drunk your victims for the rest of the round.
			}
			else do
			{
				es_tell server_var(_popup_userid) #green You already have that power up!
				es popup send kensaiweapons server_var(_popup_userid)
			}
		}
	}
	if (server_var(_popup_choice) = 3) do
	{
		es_setinfo kenid 0
		es est_getsteam kenid server_var(_popup_userid)
		es_setinfo pts 0
		es_keygetvalue pts dndExtra server_var(kenid) kensaipts
		if (server_var(pts) >= 2) do
		{
			es_setinfo check 0
			es_keygetvalue check dndExtra server_var(kenid) kenfreeze
			if (server_var(check) = 0) do
			{
				es_math pts - 2
				es_keysetvalue dndExtra server_var(kenid) kensaipts server_var(pts)
				es_keysetvalue dndExtra server_var(kenid) kenfreeze 1
				if (server_var(pts) >= 1) do
				{
					es popup send kensaiweapons server_var(_popup_userid)
				}
				es_tell server_Var(_popup_userid) #green Your attacks have a chance to freeze your victims for the rest of the round.
			}
			else do
			{
				es_tell server_var(_popup_userid) #green You already have that power up!
				es popup send kensaiweapons server_var(_popup_userid)
			}
		}
		else do
		{
			if (server_var(pts) >= 1) do
			{
				es popup send kensaiweapons server_var(_popup_userid)
			}
		}
	}
	if (server_var(_popup_choice) = 4) do
	{
		es_setinfo kenid 0
		es est_getsteam kenid server_var(_popup_userid)
		es_setinfo pts 0
		es_keygetvalue pts dndExtra server_var(kenid) kensaipts
		if (server_var(pts) >= 2) do
		{
			es_setinfo check 0
			es_keygetvalue check dndExtra server_var(kenid) kendisarm
			if (server_var(check) = 0) do
			{
				es_math pts - 2
				es_keysetvalue dndExtra server_var(kenid) kensaipts server_var(pts)
				es_keysetvalue dndExtra server_var(kenid) kendisarm 1
				if (server_var(pts) >= 1) do
				{
					es popup send kensaiweapons server_var(_popup_userid)
				}
				es_tell server_Var(_popup_userid) #green Your attacks have a chance to disarm your victims for the rest of the round.
			}
			else do
			{
				es_tell server_var(_popup_userid) #green You already have that power up!
				es popup send kensaiweapons server_var(_popup_userid)
			}
		}
		else do
		{
			if (server_var(pts) >= 1) do
			{
				es popup send kensaiweapons server_var(_popup_userid)
			}
		}
	}
	if (server_var(_popup_choice) = 5) do
	{
		es_setinfo kenid 0
		es est_getsteam kenid server_var(_popup_userid)
		es_setinfo pts 0
		es_keygetvalue pts dndExtra server_var(kenid) kensaipts
		if (server_var(pts) >= 3) do
		{
			es_setinfo check 0
			es_keygetvalue check dndExtra server_var(kenid) kenfire
			if (server_var(check) = 0) do
			{
				es_math pts - 3
				es_keysetvalue dndExtra server_var(kenid) kensaipts server_var(pts)
				es_keysetvalue dndExtra server_var(kenid) kenfire 1
				if (server_var(pts) >= 1) do
				{
					es popup send kensaiweapons server_var(_popup_userid)
				}
				es_tell server_Var(_popup_userid) #green Your attacks have a chance to burn your victims for the rest of the round.
			}
			else do
			{
				es_tell server_var(_popup_userid) #green You already have that power up!
				es popup send kensaiweapons server_var(_popup_userid)
			}
		}
		else do
		{
			if (server_var(pts) >= 1) do
			{
				es popup send kensaiweapons server_var(_popup_userid)
			}
		}
	}
	if (server_var(_popup_choice) = 6) do
	{
		es_setinfo kenid 0
		es est_getsteam kenid server_var(_popup_userid)
		es_setinfo pts 0
		es_keygetvalue pts dndExtra server_var(kenid) kensaipts
		if (server_var(pts) >= 4) do
		{
			es_setinfo check 0
			es_keygetvalue check dndExtra server_var(kenid) kenmana
			if (server_var(check) = 0) do
			{
				es_math pts - 4
				es_keysetvalue dndExtra server_var(kenid) kensaipts server_var(pts)
				es_keysetvalue dndExtra server_var(kenid) kenmana 1
				if (server_var(pts) >= 1) do
				{
					es popup send kensaiweapons server_var(_popup_userid)
				}
				es_tell server_Var(_popup_userid) #green Your attacks destory your victims mana.
			}
			else do
			{
				es_tell server_var(_popup_userid) #green You already have that power up!
				es popup send kensaiweapons server_var(_popup_userid)
			}
		}
		else do
		{
			if (server_var(pts) >= 1) do
			{
				es popup send kensaiweapons server_var(_popup_userid)
			}
		}
	}
	if (server_var(_popup_choice) = 7) do
	{
		es_setinfo kenid 0
		es est_getsteam kenid server_var(_popup_userid)
		es_setinfo pts 0
		es_keygetvalue pts dndExtra server_var(kenid) kensaipts
		if (server_var(pts) >= 5) do
		{
			es_setinfo check 0
			es_keygetvalue check dndExtra server_var(kenid) kenleech
			if (server_var(check) = 0) do
			{
				es_math pts - 5
				es_keysetvalue dndExtra server_var(kenid) kensaipts server_var(pts)
				es_keysetvalue dndExtra server_var(kenid) kenleech 1
				if (server_var(pts) >= 1) do
				{
					es popup send kensaiweapons server_var(_popup_userid)
				}
				es_tell server_Var(_popup_userid) #green Your attacks boost your health.
			}
			else do
			{
				es_tell server_var(_popup_userid) #green You already have that power up!
				es popup send kensaiweapons server_var(_popup_userid)
			}
		}
		else do
		{
			if (server_var(pts) >= 1) do
			{
				es popup send kensaiweapons server_var(_popup_userid)
			}
		}
	}
	if (server_var(_popup_choice) = 8) do
	{
		es_setinfo kenid 0
		es est_getsteam kenid server_var(_popup_userid)
		es_setinfo pts 0
		es_keygetvalue pts dndExtra server_var(kenid) kensaipts
		if (server_var(pts) >= 6) do
		{
			es_setinfo check 0
			es_keygetvalue check dndExtra server_var(kenid) kenvision
			if (server_var(check) = 0) do
			{
				es_math pts - 6
				es_keysetvalue dndExtra server_var(kenid) kensaipts server_var(pts)
				es_keysetvalue dndExtra server_var(kenid) kenvision 1
				if (server_var(pts) >= 1) do
				{
					es popup send kensaiweapons server_var(_popup_userid)
				}
				es_tell server_Var(_popup_userid) #green Your attacks might blind your victims.
			}
			else do
			{
				es_tell server_var(_popup_userid) #green You already have that power up!
				es popup send kensaiweapons server_var(_popup_userid)
			}
		}
		else do
		{
			if (server_var(pts) >= 1) do
			{
				es popup send kensaiweapons server_var(_popup_userid)
			}
		}
	}
	if (server_var(_popup_choice) = 9) do
	{
		es_setinfo kenid 0
		es est_getsteam kenid server_var(_popup_userid)
		es_setinfo pts 0
		es_keygetvalue pts dndExtra server_var(kenid) kensaipts
		if (server_var(pts) >= 7) do
		{
			es_math pts - 7
			es_keysetvalue dndExtra server_var(kenid) kensaipts server_var(pts)
			es_keysetvalue dndExtra server_var(kenid) kenantis 1
			if (server_var(pts) >= 1) do
			{
				es popup send kensaiweapons server_var(_popup_userid)
			}
			es_tell server_Var(_popup_userid) #green Your attacks now destory your victims stealth.
		}
		else do
		{
			if (server_var(pts) >= 1) do
			{
				es popup send kensaiweapons server_var(_popup_userid)
			}
		}
	}
}

block tkmenu
{
	if (server_var(_popup_choice) = 1) do
	{
		es_setinfo xpcheck 0
		es_keygetvalue xpcheck dndUsers server_var(tkid) curxp
		es_setinfo currentxp 0
		es_keygetvalue currentxp dndUsers server_var(tkid) server_var(xpcheck)
		es_math currentxp - 300
		if (server_var(currentxp) < 0) then es_setinfo currentxp 0
		es_keysetvalue dndUSers server_var(tkid) server_var(xpcheck) server_var(currentxp)
		es_tell server_var(tkuser) #lightgreen You have lost 300xp for team killing someone!
	}
	if (server_var(_popup_choice) = 2) do
	{
		es est_drunk server_var(tkuser) 10
		es_tell server_var(tkuser) #lightgreen You have drugged for team killing someone!
	}
	if (server_var(_popup_choice) = 3) do
	{
		es est_burn server_var(tkuser) 20
		es_tell server_var(tkuser) #lightgreen You have burned for team killing someone!
	}
	if (server_var(_popup_choice) = 4) do
	{
		es ma_freeze server_var(tkuser) 1
		es_tell server_var(tkuser) #lightgreen You have forzen for team killing someone!
	}
	if (server_var(_popup_choice) = 5) do
	{
		es ma_slap server_var(tkuser) 0
		es ma_slap server_var(tkuser) 0
		es ma_slap server_var(tkuser) 0
		es est_dropweapon server_var(tkuser) 1
		es est_dropweapon server_var(tkuser) 2
		es_tell server_var(tkuser) #lightgreen You have been slapped for team killing someone!
	}
	if (server_var(_popup_choice) = 6) do
	{
		es_setinfo cash 0
		es_getmoney cash server_var(tkuser)
		es_math cash / 2
		es ma_takecash server_var(tkuser)
		es ma_givecash server_var(_popup_userid)
	}
}

block m_choice
{
	es_setinfo menu_steam 0
	es est_getsteam menu_steam server_var(_popup_userid)
	es_setinfo bonus 0
	es_keygetvalue bonus dndUsers server_var(menu_steam) bonus
	if (server_var(_popup_choice) = 1) then es_doblock dnd/tibbit_pick
	if (server_var(_popup_choice) = 2) do
	{
		if (server_var(bonus) >= 1) do
		{
			es_doblock dnd/filcher_pick
		}
		else do
		{
			es_tell server_var(_popup_userid) #lightgreen You do not have enough bonus points to use that race.
		}
	}
	if (server_var(_popup_choice) = 3) do
	{
		if (server_var(bonus) >= 3) do
		{
			es_doblock dnd/golem_pick
		}
		else do
		{
			es_tell server_var(_popup_userid) #lightgreen You do not have enough bonus points to use that race.
		}
	}
	if (server_var(_popup_choice) = 4) do
	{
		if (server_var(bonus) >= 6) do
		{
			es_doblock dnd/rok_pick
		}
		else do
		{
			es_tell server_var(_popup_userid) #lightgreen You do not have enough bonus points to use that race.
		}
	}
	if (server_var(_popup_choice) = 5) do
	{
		if (server_var(bonus) >= 10) do
		{
			es_doblock dnd/dragon_pick
		}
		else do
		{
			es_tell server_var(_popup_userid) #lightgreen You do not have enough bonus points to use that race.
		}
	}
	if (server_var(_popup_choice) = 6) do
	{
		if (server_var(bonus) >= 15) do
		{
			es_doblock dnd/airele_pick
		}
		else do
		{
			es_tell server_var(_popup_userid) #lightgreen You do not have enough bonus points to use that race.
		}
	}
	if (server_var(_popup_choice) = 7) do
	{
		if (server_var(bonus) >= 15) do
		{
			es_doblock dnd/earthele_pick
		}
		else do
		{
			es_tell server_var(_popup_userid) #lightgreen You do not have enough bonus points to use that race.
		}
	}
}

block m_choices
{
	es_setinfo menu_steam 0
	es est_getsteam menu_steam server_var(_popup_userid)
	es_setinfo bonus 0
	es_keygetvalue bonus dndUsers server_var(menu_steam) bonus
	if (server_var(_popup_choice) = 1) do
	{
		if (server_var(bonus) >= 15) do
		{
			es_doblock dnd/fireele_pick
		}
		else do
		{
			es_tell server_var(_popup_userid) #lightgreen You do not have enough bonus points to use that race.
		}
	}
	if (server_var(_popup_choice) = 2) do
	{
		if (server_var(bonus) >= 15) do
		{
			es_doblock dnd/waterele_pick
		}
		else do
		{
			es_tell server_var(_popup_userid) #lightgreen You do not have enough bonus points to use that race.
		}
	}
	if (server_var(_popup_choice) = 3) do
	{
		if (server_var(bonus) >= 21) do
		{
			es_doblock dnd/chaindevil_pick
		}
		else do
		{
			es_tell server_var(_popup_userid) #lightgreen You do not have enough bonus points to use that race.
		}
	}
	if (server_var(_popup_choice) = 4) do
	{
		if (server_var(bonus) >= 28) do
		{
			es_doblock dnd/giant_pick
		}
		else do
		{
			es_tell server_var(_popup_userid) #lightgreen You do not have enough bonus points to use that race.
		}
	}
	if (server_var(_popup_choice) = 5) do
	{
		if (server_var(bonus) >= 36) do
		{
			es_doblock dnd/basilisk_pick
		}
		else do
		{
			es_tell server_var(_popup_userid) #lightgreen You do not have enough bonus points to use that race.
		}
	}
	if (server_var(_popup_choice) = 6) do
	{
		if (server_var(bonus) >= 45) do
		{
			es_doblock dnd/rabbit_pick
		}
		else do
		{
			es_tell server_var(_popup_userid) #lightgreen You do not have enough bonus points to use that race.
		}
	}
}

block rabbit_pick
{
	es_setinfo alive 0
	es est_isalive alive server_var(_popup_userid)
	es_setinfo menu_steam 0
	es est_getsteam menu_steam server_var(_popup_userid)
	if (server_var(alive) = 0) do
	{
		es_keysetvalue dndUsers server_var(menu_steam) race Rabbit
		es_tell server_var(_popup_userid) #green You are now a Rabbit of Carrabanog.
		es_keysetvalue dndUsers server_var(menu_steam) la 0
		es_keysetvalue dndUsers server_var(menu_steam) monster 1
		es_keysetvalue dndUsers server_var(menu_steam) curxp monxp	
	}
	else do
	{
		es_keysetvalue dndExtra server_var(menu_steam) delay_race Rabbit
		es_tell server_var(_popup_userid) #green You will be a Rabbit of Carrabanog next time you spawn.
		es_keysetvalue dndExtra server_var(menu_steam) delay_la 0
		es_keysetvalue dndExtra server_var(menu_steam) delay_monster 1
		es_keysetvalue dndExtra server_var(menu_steam) delay_xp monxp
	}
}

block basilisk_pick
{
	es_setinfo alive 0
	es est_isalive alive server_var(_popup_userid)
	es_setinfo menu_steam 0
	es est_getsteam menu_steam server_var(_popup_userid)
	if (server_var(alive) = 0) do
	{
		es_keysetvalue dndUsers server_var(menu_steam) race Basilisk
		es_tell server_var(_popup_userid) #green You are now a Basilisk.
		es_keysetvalue dndUsers server_var(menu_steam) la 0
		es_keysetvalue dndUsers server_var(menu_steam) monster 1
		es_keysetvalue dndUsers server_var(menu_steam) curxp monxp	
	}
	else do
	{
		es_keysetvalue dndExtra server_var(menu_steam) delay_race Basilisk
		es_tell server_var(_popup_userid) #green You will be a Basilisk next time you spawn.
		es_keysetvalue dndExtra server_var(menu_steam) delay_la 0
		es_keysetvalue dndExtra server_var(menu_steam) delay_monster 1
		es_keysetvalue dndExtra server_var(menu_steam) delay_xp monxp
	}
}

block giant_pick
{
	es_setinfo alive 0
	es est_isalive alive server_var(_popup_userid)
	es_setinfo menu_steam 0
	es est_getsteam menu_steam server_var(_popup_userid)
	if (server_var(alive) = 0) do
	{
		es_keysetvalue dndUsers server_var(menu_steam) race Giant
		es_tell server_var(_popup_userid) #green You are now a Gental Giant.
		es_keysetvalue dndUsers server_var(menu_steam) la 0
		es_keysetvalue dndUsers server_var(menu_steam) monster 1
		es_keysetvalue dndUsers server_var(menu_steam) curxp monxp	
	}
	else do
	{
		es_keysetvalue dndExtra server_var(menu_steam) delay_race Giant
		es_tell server_var(_popup_userid) #green You will be a Gental Giant next time you spawn.
		es_keysetvalue dndExtra server_var(menu_steam) delay_la 0
		es_keysetvalue dndExtra server_var(menu_steam) delay_monster 1
		es_keysetvalue dndExtra server_var(menu_steam) delay_xp monxp
	}
}

block filcher_pick
{
	es_setinfo alive 0
	es est_isalive alive server_var(_popup_userid)
	es_setinfo menu_steam 0
	es est_getsteam menu_steam server_var(_popup_userid)
	if (server_var(alive) = 0) do
	{
		es_keysetvalue dndUsers server_var(menu_steam) race Filcher
		es_tell server_var(_popup_userid) #green You are now a Ethreal Filcher.
		es_keysetvalue dndUsers server_var(menu_steam) la 0
		es_keysetvalue dndUsers server_var(menu_steam) monster 1
		es_keysetvalue dndUsers server_var(menu_steam) curxp monxp	
	}
	else do
	{
		es_keysetvalue dndExtra server_var(menu_steam) delay_race Filcher
		es_tell server_var(_popup_userid) #green You will be a Ethreal Filcher next time you spawn.
		es_keysetvalue dndExtra server_var(menu_steam) delay_la 0
		es_keysetvalue dndExtra server_var(menu_steam) delay_monster 1
		es_keysetvalue dndExtra server_var(menu_steam) delay_xp monxp
	}
}

block golem_pick
{
	es_setinfo alive 0
	es est_isalive alive server_var(_popup_userid)
	es_setinfo menu_steam 0
	es est_getsteam menu_steam server_var(_popup_userid)
	if (server_var(alive) = 0) do
	{
		es_keysetvalue dndUsers server_var(menu_steam) race Golem
		es_tell server_var(_popup_userid) #green You are now a Golem.
		es_keysetvalue dndUsers server_var(menu_steam) la 0
		es_keysetvalue dndUsers server_var(menu_steam) monster 1
		es_keysetvalue dndUsers server_var(menu_steam) curxp monxp	
	}
	else do
	{
		es_keysetvalue dndExtra server_var(menu_steam) delay_race Golem
		es_tell server_var(_popup_userid) #green You will be a Golem next time you spawn.
		es_keysetvalue dndExtra server_var(menu_steam) delay_la 0
		es_keysetvalue dndExtra server_var(menu_steam) delay_monster 1
		es_keysetvalue dndExtra server_var(menu_steam) delay_xp monxp
	}
}

block rok_pick
{
	es_setinfo alive 0
	es est_isalive alive server_var(_popup_userid)
	es_setinfo menu_steam 0
	es est_getsteam menu_steam server_var(_popup_userid)
	if (server_var(alive) = 0) do
	{
		es_keysetvalue dndUsers server_var(menu_steam) race Rok
		es_tell server_var(_popup_userid) #green You are now a Rok.
		es_keysetvalue dndUsers server_var(menu_steam) la 0
		es_keysetvalue dndUsers server_var(menu_steam) monster 1
		es_keysetvalue dndUsers server_var(menu_steam) curxp monxp		
	}
	else do
	{
		es_keysetvalue dndExtra server_var(menu_steam) delay_race Rok
		es_tell server_var(_popup_userid) #green You will be a Rok next time you spawn.
		es_keysetvalue dndExtra server_var(menu_steam) delay_la 0
		es_keysetvalue dndExtra server_var(menu_steam) delay_monster 1
		es_keysetvalue dndExtra server_var(menu_steam) delay_xp monxp
	}
}

block dragon_pick
{
	es_setinfo alive 0
	es est_isalive alive server_var(_popup_userid)
	es_setinfo menu_steam 0
	es est_getsteam menu_steam server_var(_popup_userid)
	if (server_var(alive) = 0) do
	{
		es_keysetvalue dndUsers server_var(menu_steam) race Dragon
		es_tell server_var(_popup_userid) #green You are now a Dragon.
		es_keysetvalue dndUsers server_var(menu_steam) la 0
		es_keysetvalue dndUsers server_var(menu_steam) monster 1
		es_keysetvalue dndUsers server_var(menu_steam) curxp monxp	
	}
	else do
	{
		es_keysetvalue dndExtra server_var(menu_steam) delay_race Dragon
		es_tell server_var(_popup_userid) #green You will be a Dragon next time you spawn.
		es_keysetvalue dndExtra server_var(menu_steam) delay_la 0
		es_keysetvalue dndExtra server_var(menu_steam) delay_monster 1
		es_keysetvalue dndExtra server_var(menu_steam) delay_xp monxp
	}
}

block airele_pick
{
	es_setinfo alive 0
	es est_isalive alive server_var(_popup_userid)
	es_setinfo menu_steam 0
	es est_getsteam menu_steam server_var(_popup_userid)
	if (server_var(alive) = 0) do
	{
		es_keysetvalue dndUsers server_var(menu_steam) race AirEle
		es_tell server_var(_popup_userid) #green You are now a Air Elemental.
		es_keysetvalue dndUsers server_var(menu_steam) la 0
		es_keysetvalue dndUsers server_var(menu_steam) monster 1
		es_keysetvalue dndUsers server_var(menu_steam) curxp monxp		
	}
	else do
	{
		es_keysetvalue dndExtra server_var(menu_steam) delay_race AirEle
		es_tell server_var(_popup_userid) #green You will be a Air Elemental next time you spawn.
		es_keysetvalue dndExtra server_var(menu_steam) delay_la 0
		es_keysetvalue dndExtra server_var(menu_steam) delay_monster 1
		es_keysetvalue dndExtra server_var(menu_steam) delay_xp monxp
	}
}

block earthele_pick
{
	es_setinfo alive 0
	es est_isalive alive server_var(_popup_userid)
	es_setinfo menu_steam 0
	es est_getsteam menu_steam server_var(_popup_userid)
	if (server_var(alive) = 0) do
	{
		es_keysetvalue dndUsers server_var(menu_steam) race EarthEle
		es_tell server_var(_popup_userid) #green You are now a Earth Elemental.
		es_keysetvalue dndUsers server_var(menu_steam) la 0
		es_keysetvalue dndUsers server_var(menu_steam) monster 1
		es_keysetvalue dndUsers server_var(menu_steam) curxp monxp
	}
	else do
	{
		es_keysetvalue dndExtra server_var(menu_steam) delay_race EarthEle
		es_tell server_var(_popup_userid) #green You will be a Earth Elemental next time you spawn.
		es_keysetvalue dndExtra server_var(menu_steam) delay_la 0
		es_keysetvalue dndExtra server_var(menu_steam) delay_monster 1
		es_keysetvalue dndExtra server_var(menu_steam) delay_xp monxp
	}
}

block fireele_pick
{
	es_setinfo alive 0
	es est_isalive alive server_var(_popup_userid)
	es_setinfo menu_steam 0
	es est_getsteam menu_steam server_var(_popup_userid)
	if (server_var(alive) = 0) do
	{
		es_keysetvalue dndUsers server_var(menu_steam) race FireEle
		es_tell server_var(_popup_userid) #green You are now a Fire Elemental.
		es_keysetvalue dndUsers server_var(menu_steam) la 0
		es_keysetvalue dndUsers server_var(menu_steam) monster 1
		es_keysetvalue dndUsers server_var(menu_steam) curxp monxp
	}
	else do
	{
		es_keysetvalue dndExtra server_var(menu_steam) delay_race FireEle
		es_tell server_var(_popup_userid) #green You will be a Fire Elemental next time you spawn.
		es_keysetvalue dndExtra server_var(menu_steam) delay_la 0
		es_keysetvalue dndExtra server_var(menu_steam) delay_monster 1
		es_keysetvalue dndExtra server_var(menu_steam) delay_xp monxp
	}
}

block waterele_pick
{
	es_setinfo alive 0
	es est_isalive alive server_var(_popup_userid)
	es_setinfo menu_steam 0
	es est_getsteam menu_steam server_var(_popup_userid)
	if (server_var(alive) = 0) do
	{
		es_keysetvalue dndUsers server_var(menu_steam) race WaterEle
		es_tell server_var(_popup_userid) #green You are now a Water Elemental.
		es_keysetvalue dndUsers server_var(menu_steam) la 0
		es_keysetvalue dndUsers server_var(menu_steam) monster 1
		es_keysetvalue dndUsers server_var(menu_steam) curxp monxp
	}
	else do
	{
		es_keysetvalue dndExtra server_var(menu_steam) delay_race WaterEle
		es_tell server_var(_popup_userid) #green You will be a Water Elemental next time you spawn.
		es_keysetvalue dndExtra server_var(menu_steam) delay_la 0
		es_keysetvalue dndExtra server_var(menu_steam) delay_monster 1
		es_keysetvalue dndExtra server_var(menu_steam) delay_xp monxp
	}
}

block chaindevil_pick
{
	es_setinfo alive 0
	es est_isalive alive server_var(_popup_userid)
	es_setinfo menu_steam 0
	es est_getsteam menu_steam server_var(_popup_userid)
	if (server_var(alive) = 0) do
	{
		es_keysetvalue dndUsers server_var(menu_steam) race ChainDevil
		es_tell server_var(_popup_userid) #green You are now a Chain Devil.
		es_keysetvalue dndUsers server_var(menu_steam) la 0
		es_keysetvalue dndUsers server_var(menu_steam) monster 1
		es_keysetvalue dndUsers server_var(menu_steam) curxp monxp
	}
	else do
	{
		es_keysetvalue dndExtra server_var(menu_steam) delay_race ChainDevil
		es_tell server_var(_popup_userid) #green You will be a Chain Devil next time you spawn.
		es_keysetvalue dndExtra server_var(menu_steam) delay_la 0
		es_keysetvalue dndExtra server_var(menu_steam) delay_monster 1
		es_keysetvalue dndExtra server_var(menu_steam) delay_xp monxp
	}
}

block tibbit_pick
{
	es_setinfo alive 0
	es est_isalive alive server_var(_popup_userid)
	es_setinfo menu_steam 0
	es est_getsteam menu_steam server_var(_popup_userid)
	if (server_var(alive) = 0) do
	{
		es_keysetvalue dndUsers server_var(menu_steam) race Tibbit
		es_tell server_var(_popup_userid) #green You are now a Tibbit.
		es_keysetvalue dndUsers server_var(menu_steam) la 0
		es_keysetvalue dndUsers server_var(menu_steam) monster 1
		es_keysetvalue dndUsers server_var(menu_steam) curxp monxp
	}
	else do
	{
		es_keysetvalue dndExtra server_var(menu_steam) delay_race Tibbit
		es_tell server_var(_popup_userid) #green You will be a Tibbit next time you spawn.
		es_keysetvalue dndExtra server_var(menu_steam) delay_la 0
		es_keysetvalue dndExtra server_var(menu_steam) delay_monster 1
		es_keysetvalue dndExtra server_var(menu_steam) delay_xp monxp
	}
}

block main_choice
{
	if (server_var(_popup_choice) = 2) then es_doblock dnd/cmenu_build
	if (server_var(_popup_choice) = 3) then es_doblock dnd/pmenu_build
	if (server_var(_popup_choice) = 6) then es_doblock dnd/weapons_list
	if (server_var(_popup_choice) = 7) then es_doblock dnd/player_stats
	if (server_var(_popup_choice) = 8) then esnq ma_msay 6 server_var(_popup_userid) "Extra Text Commands for Dungeons and Dragons Mod:\n !skills - Shows the skills you have from your class\n !spells - Shows the spells you have from your class\n !good - Be a good player.\n !evil - Be Evil!"
}

block cmenu_build
{
	es_setinfo steam 0
	es est_getsteam steam server_var(_popup_userid)
	es_setinfo c1levelcheck 0
	es_setinfo c2levelcheck 0
	es_setinfo c3levelcheck 0
	es_setinfo c4levelcheck 0
	es_setinfo c5levelcheck 0
	es_setinfo c6levelcheck 0
	es_setinfo c7levelcheck 0
	es_keygetvalue c1levelcheck dndUsers server_var(steam) fighter
	es_keygetvalue c2levelcheck dndUsers server_var(steam) rogue
	es_keygetvalue c3levelcheck dndUsers server_var(steam) wizard
	es_keygetvalue c4levelcheck dndUsers server_var(steam) cleric
	es_keygetvalue c5levelcheck dndUsers server_var(steam) paladin
	es_keygetvalue c6levelcheck dndUsers server_var(steam) ranger
	es_keygetvalue c7levelcheck dndUsers server_var(steam) monk

	popup delete classmenu
	popup create classmenu
	popup addline classmenu "Dungeons and Dragons CSS Classes:"
	popup addlinef classmenu "-> 1. Fighter (Level %1)" c1levelcheck
	popup addlinef classmenu "-> 2. Rogue (Level %1)" c2levelcheck
	popup addlinef classmenu "-> 3. Wizard (Level %1)" c3levelcheck
	popup addlinef classmenu "-> 4. Cleric (Level %1)" c4levelcheck
	if (server_var(c1levelcheck) > 6) do
	{
		if (server_var(c4levelcheck) > 6) do
		{
			popup addlinef classmenu "-> 5. Paladin (Level %1)" c5levelcheck
		}
		else do
		{
			popup addline classmenu " Unlockable Class: Paladin"
		}
	}
	else do
	{
		popup addline classmenu " Unlockable Class: Paladin"
	}
	if (server_var(c1levelcheck) > 8) do
	{
		if (server_var(c2levelcheck) > 4) do
		{
			popup addlinef classmenu "-> 6. Ranger (Level %1)" c6levelcheck
		}
		else do
		{
			popup addline classmenu " Unlockable Class: Ranger"
		}
	}
	else do
	{
		popup addline classmenu " Unlockable Class: Ranger"
	}
	if (server_var(c5levelcheck) > 10) do
	{
		if (server_var(c2levelcheck) > 6) do
		{
			popup addlinef classmenu "-> 7. Monk (Level %1)" c7levelcheck
		}
		else do
		{
			popup addline classmenu " Unlockable Class: Monk"
		}
	}
	else do
	{
		popup addline classmenu " Unlockable Class: Monk"
	}
	popup addline classmenu "-> 8. More Classes"
	popup addline classmenu "-> 9. Back to Main Menu"
	popup submenu classmenu 9 mainmenu
	popup addline classmenu " 0. Exit"
	popup menuselect classmenu dnd/class_choice
	es popup send classmenu server_var(_popup_userid)
}

block cmenu2_build
{
	es_setinfo steam 0
	es est_getsteam steam server_var(_popup_userid)
	popup delete classmenu2
	popup create classmenu2
	es_setinfo wizard 0
	es_setinfo cleric 0
	es_setinfo necromancer 0
	es_setinfo paladin 0
	es_setinfo bard 0
	es_setinfo fighter 0
	es_setinfo monk 0
	es_setinfo ranger 0
	es_keygetvalue fighter dndUsers server_var(steam) fighter
	es_keygetvalue wizard dndUsers server_var(steam) wizard
	es_keygetvalue cleric dndUsers server_var(steam) cleric
	es_keygetvalue necromancer dndUsers server_var(steam) necromancer
	es_keygetvalue paladin dndUsers server_var(steam) paladin
	es_keygetvalue monk dndUsers server_Var(steam) monk
	es_keygetvalue ranger dndUsers server_Var(steam) ranger
	es_keygetvalue bard dndUsers server_var(steam) bard
	popup addline classmenu2 "Dungeons and Dragons CSS Classes:"
	if (server_var(wizard) > 10) do
	{
		if (server_var(cleric) > 10) do
		{
			popup addlinef classmenu2 "-> 1. Necromancer (Level %1)" necromancer
		}
		else do
		{
			popup addline classmenu2 " Unlockable Class: Necromancer"
		}
	}
	else do
	{
		popup addline classmenu2 " Unlockable Class: Necromancer"
	}
	if (server_var(necromancer) > 6) do
	{
		if (server_var(ranger) > 6) do
		{
			if (server_var(monk) > 6) do
			{
				popup addlinef classmenu2 "-> 2. Bard (Level %1)" bard
			}
			else do
			{
				popup addline classmenu2 " Unlockable Class: Bard"
			}
		}
		else do
		{
			popup addline classmenu2 " Unlockable Class: Bard"
		}
	}
	else do
	{
		popup addline classmenu2 " Unlockable Class: Bard"
	}
	popup addline classmenu2 "-> 9. Back to other Classes"
	popup addline classmenu2 " 0. Exit"
	popup menuselect classmenu2 dnd/class2_choice
	es popup send classmenu2 server_var(_popup_userid)
}

block pmenu_build
{
	es_setinfo steam 0
	es est_getsteam steam server_var(_popup_userid)
	popup delete prestigemenu
	popup create prestigemenu
	es_setinfo class 0
	es_keygetvalue class dndUsers server_var(steam) class
	es_setinfo level 0
	es_keygetvalue level dndUsers server_var(steam) server_var(class)
	if (server_var(class) = fighter) do
	{
		if (server_var(level) >= 5) do
		{
			es_setinfo p1level 0
			es_keygetvalue p1level dndUsers server_var(steam) fpc1
			popup addlinef prestigemenu "-> 1. Grenadier (Level %1)" p1level
		}
		else do
		{
			popup addline prestigemenu " Grenadier (Required Level 5)"
		}
		if (server_var(level) >= 10) do
		{
			es_setinfo p2level 0
			es_keygetvalue p2level dndUsers server_var(steam) fpc2
			popup addlinef prestigemenu "-> 2. Kensai (Level %1)" p2level
		}
		else do
		{
			popup addline prestigemenu " Kensai (Required Level 10)"
		}
		if (server_var(level) >= 15) do
		{
			es_setinfo p3level 0
			es_keygetvalue p3level dndUsers server_var(steam) fpc3
			popup addlinef prestigemenu "-> 3. Exotic Weapon Master (Level %1)" p3level
		}
		else do
		{
			popup addline prestigemenu " Exotic Weapon Master (Required Level 15)"
		}
		popup addline prestigemenu "-> 9 - Back to Main Menu"
		popup submenu prestigemenu 9 mainmenu
		popup addline prestigemenu " 0 - Exit"
		popup menuselect prestigemenu dnd/fighter_choice
	}
	if (server_var(class) = rogue) do
	{
		if (server_var(level) >= 5) do
		{
			es_setinfo p1level 0
			es_keygetvalue p1level dndUsers server_var(steam) rpc1
			popup addlinef prestigemenu "-> 1. Acrobat (Level %1)" p1level
		}
		else do
		{
			popup addline prestigemenu " Acrobat (Required Level 5)"
		}
		if (server_var(level) >= 10) do
		{
			es_setinfo p2level 0
			es_keygetvalue p2level dndUsers server_var(steam) rpc2
			popup addlinef prestigemenu "-> 2. Assassin (Level %1)" p2level
		}
		else do
		{
			popup addline prestigemenu " Assassin (Required Level 10)"
		}
		if (server_var(level) >= 15) do
		{
			es_setinfo p3level 0
			es_keygetvalue p3level dndUsers server_var(steam) rpc3
			popup addlinef prestigemenu "-> 3. Shadow Dancer (Level %1)" p3level
		}
		else do
		{
			popup addline prestigemenu " Shadow Dancer (Required Level 15)"
		}
		popup addline prestigemenu "-> 9 - Back to Main Menu"
		popup submenu prestigemenu 9 mainmenu
		popup addline prestigemenu " 0 - Exit"
		popup menuselect prestigemenu dnd/rogue_choice
	}
	if (server_var(class) = cleric) do
	{
		if (server_var(level) >= 5) do
		{
			es_setinfo p1level 0
			es_keygetvalue p1level dndUsers server_var(steam) cpc1
			popup addlinef prestigemenu "-> 1. War Priest (Level %1)" p1level
		}
		else do
		{
			popup addline prestigemenu " War Priest (Required Level 5)"
		}
		if (server_var(level) >= 10) do
		{
			es_setinfo p2level 0
			es_keygetvalue p2level dndUsers server_var(steam) cpc2
			popup addlinef prestigemenu "-> 2. Divine Oracle (Level %1)" p2level
		}
		else do
		{
			popup addline prestigemenu " Divine Oracle (Required Level 10)"
		}
		if (server_var(level) >= 15) do
		{
			es_setinfo p3level 0
			es_keygetvalue p3level dndUsers server_var(steam) cpc3
			popup addlinef prestigemenu "-> 3. Hierophant (Level %1)" p3level
		}
		else do
		{
			popup addline prestigemenu " Hierophant (Required Level 15)"
		}
		popup addline prestigemenu "-> 9 - Back to Main Menu"
		popup submenu prestigemenu 9 mainmenu
		popup addline prestigemenu " 0 - Exit"
		popup menuselect prestigemenu dnd/cleric_choice	
	}
	if (server_var(class) = wizard) do
	{
		if (server_var(level) >= 5) do
		{
			es_setinfo p1level 0
			es_keygetvalue p1level dndUsers server_var(steam) wpc1
			popup addlinef prestigemenu "-> 1. War Mage (Level %1)" p1level
		}
		else do
		{
			popup addline prestigemenu " War Mage (Required Level 5)"
		}
		if (server_var(level) >= 10) do
		{
			es_setinfo p2level 0
			es_keygetvalue p2level dndUsers server_var(steam) wpc2
			popup addlinef prestigemenu "-> 2. Mage of Arcane Order (Level %1)" p2level
		}
		else do
		{
			popup addline prestigemenu " Mage of Arcane Order (Required Level 10)"
		}
		if (server_var(level) >= 15) do
		{
			es_setinfo p3level 0
			es_keygetvalue p3level dndUsers server_var(steam) wpc3
			popup addlinef prestigemenu "-> 3. Arch Mage (Level %1)" p3level
		}
		else do
		{
			popup addline prestigemenu " Arch Mage (Required Level 15)"
		}
		popup addline prestigemenu "-> 9. - Back to Main Menu"
		popup submenu prestigemenu 9 mainmenu
		popup addline prestigemenu " 0 - Exit"
		popup menuselect prestigemenu dnd/wizard_choice	
	}
	if (server_var(class) != fighter) do
	{
		if (server_var(class) != rogue) do
		{
			if (server_var(class) != cleric) do
			{
				if (server_var(class) != wizard) do
				{
					popup addline prestigemenu " Your Class Doesn't Have any prestige classes!"
					popup addline prestigemenu "-> 9. - Back to Main Menu"
					popup submenu prestigemenu 9 mainmenu
					popup addline prestigemenu " 0 - Exit"
				}
			}
		}
	}
}

block fighter_choice
{
	es_setinfo steam 0
	es est_getsteam steam server_var(_popup_userid)
	es_setinfo level 0
	es_keygetvalue level dndUsers server_var(steam) fighter
	if (server_var(_popup_choice) = 1) do
	{
		if (server_var(level) >= 5) do
		{
			es_doblock dnd/fpc1_pick
		}
		else do
		{
			es_tell server_var(_popup_userid) #lightgreen You are to low of a level to use that prestige class right now!
		}
	}
	if (server_var(_popup_choice) = 2) do
	{
		if (server_var(level) >= 10) do
		{
			es_doblock dnd/fpc2_pick
		}
		else do
		{
			es_tell server_var(_popup_userid) #lightgreen You are to low of a level to use that prestige class right now!
		}
	}
	if (server_var(_popup_choice) = 3) do
	{
		if (server_var(level) >= 15) do
		{
			es_doblock dnd/fpc3_pick
		}
		else do
		{
			es_tell server_var(_popup_userid) #lightgreen You are to low of a level to use that prestige class right now!
		}
	}	
}

block rogue_choice
{
	es_setinfo steam 0
	es est_getsteam steam server_var(_popup_userid)
	es_setinfo level 0
	es_keygetvalue level dndUsers server_var(steam) rogue
	if (server_var(_popup_choice) = 1) do
	{
		if (server_var(level) >= 5) do
		{
			es_doblock dnd/rpc1_pick
		}
		else do
		{
			es_tell server_var(_popup_userid) #lightgreen You are to low of a level to use that prestige class right now!
		}
	}
	if (server_var(_popup_choice) = 2) do
	{
		if (server_var(level) >= 10) do
		{
			es_doblock dnd/rpc2_pick
		}
		else do
		{
			es_tell server_var(_popup_userid) #lightgreen You are to low of a level to use that prestige class right now!
		}
	}
	if (server_var(_popup_choice) = 3) do
	{
		if (server_var(level) >= 15) do
		{
			es_doblock dnd/rpc3_pick
		}
		else do
		{
			es_tell server_var(_popup_userid) #lightgreen You are to low of a level to use that prestige class right now!
		}
	}
}

block cleric_choice
{
	es_setinfo steam 0
	es est_getsteam steam server_var(_popup_userid)
	es_setinfo level 0
	es_keygetvalue level dndUsers server_var(steam) cleric
	if (server_var(_popup_choice) = 1) do
	{
		if (server_var(level) >= 5) do
		{
			es_doblock dnd/cpc1_pick
		}
		else do
		{
			es_tell server_var(_popup_userid) #lightgreen You are to low of a level to use that prestige class right now!
		}
	}
	if (server_var(_popup_choice) = 2) do
	{
		if (server_var(level) >= 10) do
		{
			es_doblock dnd/cpc2_pick
		}
		else do
		{
			es_tell server_var(_popup_userid) #lightgreen You are to low of a level to use that prestige class right now!
		}
	}
	if (server_var(_popup_choice) = 3) do
	{
		if (server_var(level) >= 15) do
		{
			es_doblock dnd/cpc3_pick
		}
		else do
		{
			es_tell server_var(_popup_userid) #lightgreen You are to low of a level to use that prestige class right now!
		}
	}
}

block wizard_choice
{
	es_setinfo steam 0
	es est_getsteam steam server_var(_popup_userid)
	es_setinfo level 0
	es_keygetvalue level dndUsers server_var(steam) wizard
	if (server_var(_popup_choice) = 1) do
	{
		if (server_var(level) >= 5) do
		{
			es_doblock dnd/wpc1_pick
		}
		else do
		{
			es_tell server_var(_popup_userid) #lightgreen You are to low of a level to use that prestige class right now!
		}
	}
	if (server_var(_popup_choice) = 2) do
	{
		if (server_var(level) >= 10) do
		{
			es_doblock dnd/wpc2_pick
		}
		else do
		{
			es_tell server_var(_popup_userid) #lightgreen You are to low of a level to use that prestige class right now!
		}
	}
	if (server_var(_popup_choice) = 3) do
	{
		if (server_var(level) >= 15) do
		{
			es_doblock dnd/wpc3_pick
		}
		else do
		{
			es_tell server_var(_popup_userid) #lightgreen You are to low of a level to use that prestige class right now!
		}
	}
}

block fpc1_pick
{
	es_setinfo alive 0
	es est_isalive alive server_var(_popup_userid)
	es_setinfo menu_steam 0
	es est_getsteam menu_steam server_var(_popup_userid)
	if (server_var(alive) = 0) do
	{
		es_keysetvalue dndUsers server_var(menu_steam) prestige fpc1
		es_keysetvalue dndUsers server_var(menu_steam) curxp fpc1xp
		es_tell server_var(_popup_userid) #green You are now a Grenadier!
	}
	else do
	{
		es_keysetvalue dndExtra server_var(menu_steam) delay_prestige fpc1
		es_keysetvalue dndExtra server_var(menu_steam) delay_xp fpc1xp
		es_tell server_var(_popup_userid) #green You will be a Grenadier next time you spawn.
	}
}

block fpc2_pick
{
	es_setinfo alive 0
	es est_isalive alive server_var(_popup_userid)
	es_setinfo menu_steam 0
	es est_getsteam menu_steam server_var(_popup_userid)
	if (server_var(alive) = 0) do
	{
		es_keysetvalue dndUsers server_var(menu_steam) prestige fpc2
		es_keysetvalue dndUsers server_var(menu_steam) curxp fpc2xp
		es_tell server_var(_popup_userid) #green You are now a Kensai!
	}
	else do
	{
		es_keysetvalue dndExtra server_var(menu_steam) delay_prestige fpc2
		es_keysetvalue dndExtra server_var(menu_steam) delay_xp fpc2xp
		es_tell server_var(_popup_userid) #green You will be a Kensai next time you spawn.
	}
}

block fpc3_pick
{
	es_setinfo alive 0
	es est_isalive alive server_var(_popup_userid)
	es_setinfo menu_steam 0
	es est_getsteam menu_steam server_var(_popup_userid)
	if (server_var(alive) = 0) do
	{
		es_keysetvalue dndUsers server_var(menu_steam) prestige fpc3
		es_keysetvalue dndUsers server_var(menu_steam) curxp fpc3xp
		es_tell server_var(_popup_userid) #green You are now a Exotic Weapons Master!
	}
	else do
	{
		es_keysetvalue dndExtra server_var(menu_steam) delay_prestige fpc3
		es_keysetvalue dndExtra server_var(menu_steam) delay_xp fpc3xp
		es_tell server_var(_popup_userid) #green You will be a Exotic Weapons Master next time you spawn.
	}
}

block rpc1_pick
{
	es_setinfo alive 0
	es est_isalive alive server_var(_popup_userid)
	es_setinfo menu_steam 0
	es est_getsteam menu_steam server_var(_popup_userid)
	if (server_var(alive) = 0) do
	{
		es_keysetvalue dndUsers server_var(menu_steam) prestige rpc1
		es_keysetvalue dndUsers server_var(menu_steam) curxp rpc1xp
		es_tell server_var(_popup_userid) #green You are now a Acrobat!
	}
	else do
	{
		es_keysetvalue dndExtra server_var(menu_steam) delay_prestige rpc1
		es_keysetvalue dndExtra server_var(menu_steam) delay_xp rpc1xp
		es_tell server_var(_popup_userid) #green You will be a Acrobat next time you spawn.
	}
}

block rpc2_pick
{
	es_setinfo alive 0
	es est_isalive alive server_var(_popup_userid)
	es_setinfo menu_steam 0
	es est_getsteam menu_steam server_var(_popup_userid)
	if (server_var(alive) = 0) do
	{
		es_keysetvalue dndUsers server_var(menu_steam) prestige rpc2
		es_keysetvalue dndUsers server_var(menu_steam) curxp rpc2xp
		es_tell server_var(_popup_userid) #green You are now a Assassin!
	}
	else do
	{
		es_keysetvalue dndExtra server_var(menu_steam) delay_prestige rpc2
		es_keysetvalue dndExtra server_var(menu_steam) delay_xp rpc2xp
		es_tell server_var(_popup_userid) #green You will be a Assassin next time you spawn.
	}
}

block rpc3_pick
{
	es_setinfo alive 0
	es est_isalive alive server_var(_popup_userid)
	es_setinfo menu_steam 0
	es est_getsteam menu_steam server_var(_popup_userid)
	if (server_var(alive) = 0) do
	{
		es_keysetvalue dndUsers server_var(menu_steam) prestige rpc3
		es_keysetvalue dndUsers server_var(menu_steam) curxp rpc3xp
		es_tell server_var(_popup_userid) #green You are now a Shadow Dancer!
	}
	else do
	{
		es_keysetvalue dndExtra server_var(menu_steam) delay_prestige rpc3
		es_keysetvalue dndExtra server_var(menu_steam) delay_xp rpc3xp
		es_tell server_var(_popup_userid) #green You will be a Shadow Dancer next time you spawn.
	}
}

block cpc1_pick
{
	es_setinfo alive 0
	es est_isalive alive server_var(_popup_userid)
	es_setinfo menu_steam 0
	es est_getsteam menu_steam server_var(_popup_userid)
	if (server_var(alive) = 0) do
	{
		es_keysetvalue dndUsers server_var(menu_steam) prestige cpc1
		es_keysetvalue dndUsers server_var(menu_steam) curxp cpc1xp
		es_tell server_var(_popup_userid) #green You are now a War Priest!
	}
	else do
	{
		es_keysetvalue dndExtra server_var(menu_steam) delay_prestige cpc1
		es_keysetvalue dndExtra server_var(menu_steam) delay_xp cpc1xp
		es_tell server_var(_popup_userid) #green You will be a War Priest next time you spawn.
	}
}

block cpc2_pick
{
	es_setinfo alive 0
	es est_isalive alive server_var(_popup_userid)
	es_setinfo menu_steam 0
	es est_getsteam menu_steam server_var(_popup_userid)
	if (server_var(alive) = 0) do
	{
		es_keysetvalue dndUsers server_var(menu_steam) prestige cpc2
		es_keysetvalue dndUsers server_var(menu_steam) curxp cpc2xp
		es_tell server_var(_popup_userid) #green You are now a Divine Oracle!
	}
	else do
	{
		es_keysetvalue dndExtra server_var(menu_steam) delay_prestige cpc2
		es_keysetvalue dndExtra server_var(menu_steam) delay_xp cpc2xp
		es_tell server_var(_popup_userid) #green You will be a Divine Oracle next time you spawn.
	}
}

block cpc3_pick
{
	es_setinfo alive 0
	es est_isalive alive server_var(_popup_userid)
	es_setinfo menu_steam 0
	es est_getsteam menu_steam server_var(_popup_userid)
	if (server_var(alive) = 0) do
	{
		es_keysetvalue dndUsers server_var(menu_steam) prestige cpc3
		es_keysetvalue dndUsers server_var(menu_steam) curxp cpc3xp
		es_tell server_var(_popup_userid) #green You are now a Hierophant!
	}
	else do
	{
		es_keysetvalue dndExtra server_var(menu_steam) delay_prestige cpc3
		es_keysetvalue dndExtra server_var(menu_steam) delay_xp cpc3xp
		es_tell server_var(_popup_userid) #green You will be a Hierophant next time you spawn.
	}
}

block wpc1_pick
{
	es_setinfo alive 0
	es est_isalive alive server_var(_popup_userid)
	es_setinfo menu_steam 0
	es est_getsteam menu_steam server_var(_popup_userid)
	if (server_var(alive) = 0) do
	{
		es_keysetvalue dndUsers server_var(menu_steam) prestige wpc1
		es_keysetvalue dndUsers server_var(menu_steam) curxp wpc1xp
		es_tell server_var(_popup_userid) #green You are now a War Mage!
	}
	else do
	{
		es_keysetvalue dndExtra server_var(menu_steam) delay_prestige wpc1
		es_keysetvalue dndExtra server_var(menu_steam) delay_xp wpc1xp
		es_tell server_var(_popup_userid) #green You will be a War Mage next time you spawn.
	}
}

block wpc2_pick
{
	es_setinfo alive 0
	es est_isalive alive server_var(_popup_userid)
	es_setinfo menu_steam 0
	es est_getsteam menu_steam server_var(_popup_userid)
	if (server_var(alive) = 0) do
	{
		es_keysetvalue dndUsers server_var(menu_steam) prestige wpc2
		es_keysetvalue dndUsers server_var(menu_steam) curxp wpc2xp
		es_tell server_var(_popup_userid) #green You are now a Mage of Arcane Order!
	}
	else do
	{
		es_keysetvalue dndExtra server_var(menu_steam) delay_prestige wpc2
		es_keysetvalue dndExtra server_var(menu_steam) delay_xp wpc2xp
		es_tell server_var(_popup_userid) #green You will be a Mage of Arcane Order next time you spawn.
	}
}

block wpc3_pick
{
	es_setinfo alive 0
	es est_isalive alive server_var(_popup_userid)
	es_setinfo menu_steam 0
	es est_getsteam menu_steam server_var(_popup_userid)
	if (server_var(alive) = 0) do
	{
		es_keysetvalue dndUsers server_var(menu_steam) prestige wpc3
		es_keysetvalue dndUsers server_var(menu_steam) curxp wpc3xp
		es_tell server_var(_popup_userid) #green You are now a Arch Mage!
	}
	else do
	{
		es_keysetvalue dndExtra server_var(menu_steam) delay_prestige wpc3
		es_keysetvalue dndExtra server_var(menu_steam) delay_xp wpc3xp
		es_tell server_var(_popup_userid) #green You will be a Arch Mage next time you spawn.
	}
}

block race_choice
{
	if (server_var(_popup_choice) = 1) then es_doblock dnd/human_pick
	if (server_var(_popup_choice) = 2) then es_doblock dnd/dwarf_pick
	if (server_var(_popup_choice) = 3) then es_doblock dnd/elf_pick
	if (server_var(_popup_choice) = 4) then es_doblock dnd/orc_pick
	if (server_var(_popup_choice) = 5) then es_doblock dnd/halfling_pick
	if (server_var(_popup_choice) = 6) then es_doblock dnd/kobold_pick
	if (server_var(_popup_choice) = 7) then es_doblock dnd/greyelf_pick
}

block la_choice
{
	if (server_var(_popup_choice) = 1) then es_doblock dnd/aasimar_pick
	if (server_var(_popup_choice) = 2) then es_doblock dnd/tiefling_pick
	if (server_var(_popup_choice) = 3) then es_doblock dnd/minotaur_pick
	if (server_var(_popup_choice) = 4) then es_doblock dnd/drow_pick
	if (server_var(_popup_choice) = 5) then es_doblock dnd/avariel_pick
	if (server_var(_popup_choice) = 6) then es_doblock dnd/doppelganger_pick
	if (server_var(_popup_choice) = 7) then es_doblock dnd/troll_pick
	if (server_var(_popup_choice) = 8) then es_doblock dnd/vampire_pick
}

block class_choice
{
	if (server_var(_popup_choice) = 1) then es_doblock dnd/fighter_pick
	if (server_var(_popup_choice) = 2) then es_doblock dnd/rogue_pick
	if (server_var(_popup_choice) = 3) then es_doblock dnd/wizard_pick
	if (server_var(_popup_choice) = 4) then es_doblock dnd/cleric_pick
	if (server_var(_popup_choice) = 5) then es_doblock dnd/paladin_pick
	if (server_var(_popup_choice) = 6) then es_doblock dnd/ranger_pick
	if (server_var(_popup_choice) = 7) then es_doblock dnd/monk_pick
	if (server_var(_popup_choice) = 8) then es_doblock dnd/cmenu2_build
}

block class2_choice
{
	if (server_var(_popup_choice) = 1) then es_doblock dnd/necro_pick
	if (server_var(_popup_choice) = 2) then es_doblock dnd/bard_pick
	if (server_var(_popup_choice) = 9) then es_doblock dnd/cmenu_build
}

block fighter_pick
{
	es_setinfo alive 0
	es est_isalive alive server_var(_popup_userid)
	es_setinfo menu_steam 0
	es est_getsteam menu_steam server_var(_popup_userid)
	if (server_var(alive) = 0) do
	{
		es_keysetvalue dndUsers server_var(menu_steam) class Fighter
		es_keysetvalue dndUsers server_var(menu_steam) prestige 0
		es_keysetvalue dndUsers server_var(menu_steam) curxp fxp
		es_tell server_var(_popup_userid) #green You are now a Fighter.
	}
	else do
	{
		es_keysetvalue dndExtra server_var(menu_steam) delay_class Fighter
		es_keysetvalue dndExtra server_var(menu_steam) delay_xp fxp
		es_tell server_var(_popup_userid) #green You will be a Fighter next time you spawn.
		es_keysetvalue dndExtra server_var(menu_steam) delay_prestige 0
	}
}

block rogue_pick
{
	es_setinfo alive 0
	es est_isalive alive server_var(_popup_userid)
	es_setinfo menu_steam 0
	es est_getsteam menu_steam server_var(_popup_userid)
	if (server_var(alive) = 0) do
	{
		es_keysetvalue dndUsers server_var(menu_steam) class Rogue
		es_keysetvalue dndUsers server_var(menu_steam) prestige 0
		es_keysetvalue dndUsers server_var(menu_steam) curxp rxp
		es_tell server_var(_popup_userid) #green You are now a Rogue.	
	}
	else do
	{
		es_keysetvalue dndExtra server_var(menu_steam) delay_class Rogue
		es_keysetvalue dndExtra server_var(menu_steam) delay_xp rxp
		es_tell server_var(_popup_userid) #green You will be a Rogue next time you spawn.
		es_keysetvalue dndExtra server_var(menu_steam) delay_prestige 0
	}
}

block wizard_pick
{
	es_setinfo alive 0
	es est_isalive alive server_var(_popup_userid)
	es_setinfo menu_steam 0
	es est_getsteam menu_steam server_var(_popup_userid)
	if (server_var(alive) = 0) do
	{
		es_keysetvalue dndUsers server_var(menu_steam) class Wizard
		es_keysetvalue dndUsers server_var(menu_steam) prestige 0
		es_keysetvalue dndUsers server_var(menu_steam) curxp wxp
		es_tell server_var(_popup_userid) #green You are now a Wizard.	
	}
	else do
	{
		es_keysetvalue dndExtra server_var(menu_steam) delay_class Wizard
		es_keysetvalue dndExtra server_var(menu_steam) delay_xp wxp
		es_tell server_var(_popup_userid) #green You will be a Wizard next time you spawn.
		es_keysetvalue dndExtra server_var(menu_steam) delay_prestige 0	
	}
}

block cleric_pick
{
	es_setinfo alive 0
	es est_isalive alive server_var(_popup_userid)
	es_setinfo menu_steam 0
	es est_getsteam menu_steam server_var(_popup_userid)
	if (server_var(alive) = 0) do
	{
		es_keysetvalue dndUsers server_var(menu_steam) class Cleric
		es_keysetvalue dndUsers server_var(menu_steam) prestige 0
		es_keysetvalue dndUsers server_var(menu_steam) curxp cxp
		es_tell server_var(_popup_userid) #green You are now a Cleric.	
	}
	else do
	{
		es_keysetvalue dndExtra server_var(menu_steam) delay_class Cleric
		es_keysetvalue dndExtra server_var(menu_steam) delay_xp cxp
		es_tell server_var(_popup_userid) #green You will be a Cleric next time you spawn.
		es_keysetvalue dndExtra server_var(menu_steam) delay_prestige 0
	}
}

block paladin_pick
{
	es_setinfo alive 0
	es est_isalive alive server_var(_popup_userid)
	es_setinfo menu_steam 0
	es est_getsteam menu_steam server_var(_popup_userid)
	es_setinfo fighter 0
	es_setinfo cleric 0
	es_keygetvalue fighter dndUsers server_var(menu_steam) fighter
	es_keygetvalue cleric dndUsers server_var(menu_steam) cleric
	if (server_var(fighter) > 6) do
	{
		if (server_var(cleric) > 6) do
		{
			if (server_var(alive) = 0) do
			{
				es_keysetvalue dndUsers server_var(menu_steam) class Paladin
				es_keysetvalue dndUsers server_var(menu_steam) prestige 0
				es_keysetvalue dndUsers server_var(menu_steam) curxp pxp
				es_tell server_var(_popup_userid) #green You are now a Paladin.
			}
			else do
			{
				es_keysetvalue dndExtra server_var(menu_steam) delay_class Paladin
				es_tell server_var(_popup_userid) #green You will be a Paladin next time you spawn.
				es_keysetvalue dndExtra server_var(menu_steam) delay_xp pxp
				es_keysetvalue dndExtra server_var(menu_steam) delay_prestige 0
			}
		}
	}
}

block ranger_pick
{
	es_setinfo alive 0
	es est_isalive alive server_var(_popup_userid)
	es_setinfo menu_steam 0
	es est_getsteam menu_steam server_var(_popup_userid)
	es_setinfo fighter 0
	es_setinfo rogue 0
	es_keygetvalue fighter dndUsers server_var(menu_steam) fighter
	es_keygetvalue rogue dndUsers server_var(menu_steam) rogue
	if (server_var(fighter) > 8) do
	{
		if (server_var(rogue) > 4) do
		{
			if (server_var(alive) = 0) do
			{
				es_keysetvalue dndUsers server_var(menu_steam) class Ranger
				es_keysetvalue dndUsers server_var(menu_steam) prestige 0
				es_keysetvalue dndUsers server_var(menu_steam) curxp raxp
				es_tell server_var(_popup_userid) #green You are now a Ranger.
			}
			else do
			{
				es_keysetvalue dndExtra server_var(menu_steam) delay_class Ranger
				es_tell server_var(_popup_userid) #green You will be a Ranger next time you spawn.
				es_keysetvalue dndExtra server_var(menu_steam) delay_xp raxp
				es_keysetvalue dndExtra server_var(menu_steam) delay_prestige 0
			}
		}
	}
}

block monk_pick
{
	es_setinfo alive 0
	es est_isalive alive server_var(_popup_userid)
	es_setinfo menu_steam 0
	es est_getsteam menu_steam server_var(_popup_userid)
	es_setinfo pally 0
	es_setinfo rogue 0
	es_keygetvalue pally dndUsers server_var(menu_steam) paladin
	es_keygetvalue rogue dndUsers server_var(menu_steam) rogue
	if (server_var(paladin) > 10) do
	{
		if (server_var(rogue) > 6) do
		{
			if (server_var(alive) = 0) do
			{
				es_keysetvalue dndUsers server_var(menu_steam) class Monk
				es_keysetvalue dndUsers server_var(menu_steam) prestige 0
				es_keysetvalue dndUsers server_var(menu_steam) curxp mxp
				es_tell server_var(_popup_userid) #green You are now a Monk.
			}
			else do
			{
				es_keysetvalue dndExtra server_var(menu_steam) delay_class Monk
				es_tell server_var(_popup_userid) #green You will be a Monk next time you spawn.
				es_keysetvalue dndExtra server_var(menu_steam) delay_xp mxp
				es_keysetvalue dndExtra server_var(menu_steam) delay_prestige 0
			}
		}
	}
}

block necro_pick
{
	es_setinfo alive 0
	es est_isalive alive server_var(_popup_userid)
	es_setinfo menu_steam 0
	es est_getsteam menu_steam server_var(_popup_userid)
	es_setinfo var1 0
	es_setinfo var2 0
	es_keygetvalue var1 dndUsers server_var(menu_steam) wizard
	es_keygetvalue var2 dndUsers server_var(menu_steam) cleric
	if (server_var(var1) > 10) do
	{
		if (server_var(var2) > 10) do
		{
			if (server_var(alive) = 0) do
			{
				es_keysetvalue dndUsers server_var(menu_steam) class Necromancer
				es_keysetvalue dndUsers server_var(menu_steam) prestige 0
				es_keysetvalue dndUsers server_var(menu_steam) curxp nxp
				es_tell server_var(_popup_userid) #green You are now a Necromancer.
			}
			else do
			{
				es_keysetvalue dndExtra server_var(menu_steam) delay_class Necromancer
				es_tell server_var(_popup_userid) #green You will be a Necromancer next time you spawn.
				es_keysetvalue dndExtra server_var(menu_steam) delay_xp nxp
				es_keysetvalue dndExtra server_var(menu_steam) delay_prestige 0
			}
		}
	}
}

block bard_pick
{
	es_setinfo alive 0
	es est_isalive alive server_var(_popup_userid)
	es_setinfo menu_steam 0
	es est_getsteam menu_steam server_var(_popup_userid)
	es_setinfo var1 0
	es_setinfo var2 0
	es_setinfo var3 0
	es_keygetvalue var1 dndUsers server_var(menu_steam) necromancer
	es_keygetvalue var2 dndUsers server_var(menu_steam) ranger
	es_keygetvalue var3 dndUsers server_var(menu_steam) monk
	if (server_var(var1) > 6) do
	{
		if (server_var(var2) > 6) do
		{
			if (server_var(var3) > 6) do
			{
				if (server_var(alive) = 0) do
				{
					es_keysetvalue dndUsers server_var(menu_steam) class Bard
					es_keysetvalue dndUsers server_var(menu_steam) prestige 0
					es_keysetvalue dndUsers server_var(menu_steam) curxp bxp
					es_tell server_var(_popup_userid) #green You are now a Bard.
				}
				else do
				{
					es_keysetvalue dndExtra server_var(menu_steam) delay_class Bard
					es_tell server_var(_popup_userid) #green You will be a Bard next time you spawn.
					es_keysetvalue dndExtra server_var(menu_steam) delay_xp bxp
					es_keysetvalue dndExtra server_var(menu_steam) delay_prestige 0
				}
			}
		}
	}
}

block human_pick
{
	es_setinfo alive 0
	es est_isalive alive server_var(_popup_userid)
	es_setinfo menu_steam 0
	es est_getsteam menu_steam server_var(_popup_userid)
	if (server_var(alive) = 0) do
	{
		es_keysetvalue dndUsers server_var(menu_steam) race Human
		es_tell server_var(_popup_userid) #green You are now a Human.
		es_keysetvalue dndUsers server_var(menu_steam) la 0
		es_keysetvalue dndUsers server_var(menu_steam) monster 0		
	}
	else do
	{
		es_keysetvalue dndExtra server_var(menu_steam) delay_race Human
		es_tell server_var(_popup_userid) #green You will be a Human next time you spawn.
		es_keysetvalue dndExtra server_var(menu_steam) delay_la 0
		es_keysetvalue dndExtra server_var(menu_steam) delay_monster 0	
	}
}

block dwarf_pick
{
	es_setinfo alive 0
	es est_isalive alive server_var(_popup_userid)
	es_setinfo menu_steam 0
	es est_getsteam menu_steam server_var(_popup_userid)
	if (server_var(alive) = 0) do
	{
		es_keysetvalue dndUsers server_var(menu_steam) race Dwarf
		es_tell server_var(_popup_userid) #green You are now a Dwarf.
		es_keysetvalue dndUsers server_var(menu_steam) la 0
		es_keysetvalue dndUsers server_var(menu_steam) monster 0	
	}
	else do
	{
		es_keysetvalue dndExtra server_var(menu_steam) delay_race Dwarf
		es_tell server_var(_popup_userid) #green You will be a Dwarf next time you spawn.
		es_keysetvalue dndExtra server_var(menu_steam) delay_la 0
		es_keysetvalue dndExtra server_var(menu_steam) delay_monster 0	
	}
}

block elf_pick
{
	es_setinfo alive 0
	es est_isalive alive server_var(_popup_userid)
	es_setinfo menu_steam 0
	es est_getsteam menu_steam server_var(_popup_userid)
	if (server_var(alive) = 0) do
	{
		es_keysetvalue dndUsers server_var(menu_steam) race Elf
		es_tell server_var(_popup_userid) #green You are now a Elf.
		es_keysetvalue dndUsers server_var(menu_steam) la 0
		es_keysetvalue dndUsers server_var(menu_steam) monster 0	
	}
	else do
	{
		es_keysetvalue dndExtra server_var(menu_steam) delay_race Elf
		es_tell server_var(_popup_userid) #green You will be a Elf next time you spawn.
		es_keysetvalue dndExtra server_var(menu_steam) delay_la 0
		es_keysetvalue dndExtra server_var(menu_steam) delay_monster 0	
	}
}

block orc_pick
{
	es_setinfo alive 0
	es est_isalive alive server_var(_popup_userid)
	es_setinfo menu_steam 0
	es est_getsteam menu_steam server_var(_popup_userid)
	if (server_var(alive) = 0) do
	{
		es_keysetvalue dndUsers server_var(menu_steam) race Orc
		es_tell server_var(_popup_userid) #green You are now a Orc.
		es_keysetvalue dndUsers server_var(menu_steam) la 0
		es_keysetvalue dndUsers server_var(menu_steam) monster 0	
	}
	else do
	{
		es_keysetvalue dndExtra server_var(menu_steam) delay_race Orc
		es_tell server_var(_popup_userid) #green You will be a Orc next time you spawn.
		es_keysetvalue dndExtra server_var(menu_steam) delay_la 0
		es_keysetvalue dndExtra server_var(menu_steam) delay_monster 0	
	}
}

block halfling_pick
{
	es_setinfo alive 0
	es est_isalive alive server_var(_popup_userid)
	es_setinfo menu_steam 0
	es est_getsteam menu_steam server_var(_popup_userid)
	if (server_var(alive) = 0) do
	{
		es_keysetvalue dndUsers server_var(menu_steam) race Halfling
		es_tell server_var(_popup_userid) #green You are now a Halfling.
		es_keysetvalue dndUsers server_var(menu_steam) la 0
		es_keysetvalue dndUsers server_var(menu_steam) monster 0	
	}
	else do
	{
		es_keysetvalue dndExtra server_var(menu_steam) delay_race Halfling
		es_tell server_var(_popup_userid) #green You will be a Halfling next time you spawn.
		es_keysetvalue dndExtra server_var(menu_steam) delay_la 0
		es_keysetvalue dndExtra server_var(menu_steam) delay_monster 0	
	}
}

block kobold_pick
{
	es_setinfo alive 0
	es est_isalive alive server_var(_popup_userid)
	es_setinfo menu_steam 0
	es est_getsteam menu_steam server_var(_popup_userid)
	if (server_var(alive) = 0) do
	{
		es_keysetvalue dndUsers server_var(menu_steam) race Kobold
		es_tell server_var(_popup_userid) #green You are now a Kobold.
		es_keysetvalue dndUsers server_var(menu_steam) la 0
		es_keysetvalue dndUsers server_var(menu_steam) monster 0	
	}
	else do
	{
		es_keysetvalue dndExtra server_var(menu_steam) delay_race Kobold
		es_tell server_var(_popup_userid) #green You will be a Kobold next time you spawn.
		es_keysetvalue dndExtra server_var(menu_steam) delay_la 0
		es_keysetvalue dndExtra server_var(menu_steam) delay_monster 0	
	}
}

block greyelf_pick
{
	es_setinfo alive 0
	es est_isalive alive server_var(_popup_userid)
	es_setinfo menu_steam 0
	es est_getsteam menu_steam server_var(_popup_userid)
	if (server_var(alive) = 0) do
	{
		es_keysetvalue dndUsers server_var(menu_steam) race GreyElf
		es_tell server_var(_popup_userid) #green You are now a GreyElf.
		es_keysetvalue dndUsers server_var(menu_steam) la 0
		es_keysetvalue dndUsers server_var(menu_steam) monster 0	
	}
	else do
	{
		es_keysetvalue dndExtra server_var(menu_steam) delay_race GreyElf
		es_tell server_var(_popup_userid) #green You will be a GreyElf next time you spawn.
		es_keysetvalue dndExtra server_var(menu_steam) delay_la 0
		es_keysetvalue dndExtra server_var(menu_steam) delay_monster 0	
	}
}

block aasimar_pick
{
	es_setinfo alive 0
	es est_isalive alive server_var(_popup_userid)
	es_setinfo menu_steam 0
	es est_getsteam menu_steam server_var(_popup_userid)
	if (server_var(alive) = 0) do
	{
		es_keysetvalue dndUsers server_var(menu_steam) race Aasimar
		es_tell server_var(_popup_userid) #green You are now a Aasimar.
		es_keysetvalue dndUsers server_var(menu_steam) la 1
		es_keysetvalue dndUsers server_var(menu_steam) monster 0	
	}
	else do
	{
		es_keysetvalue dndExtra server_var(menu_steam) delay_race Aasimar
		es_tell server_var(_popup_userid) #green You will be a Aasimar next time you spawn.
		es_keysetvalue dndExtra server_var(menu_steam) delay_la 1
		es_keysetvalue dndExtra server_var(menu_steam) delay_monster 0	
	}
}

block tiefling_pick
{
	es_setinfo alive 0
	es est_isalive alive server_var(_popup_userid)
	es_setinfo menu_steam 0
	es est_getsteam menu_steam server_var(_popup_userid)
	if (server_var(alive) = 0) do
	{
		es_keysetvalue dndUsers server_var(menu_steam) race Tiefling
		es_tell server_var(_popup_userid) #green You are now a Tiefling.
		es_keysetvalue dndUsers server_var(menu_steam) la 1
		es_keysetvalue dndUsers server_var(menu_steam) monster 0	
	}
	else do
	{
		es_keysetvalue dndExtra server_var(menu_steam) delay_race Tiefling
		es_tell server_var(_popup_userid) #green You will be a Tiefling next time you spawn.
		es_keysetvalue dndExtra server_var(menu_steam) delay_la 1
		es_keysetvalue dndExtra server_var(menu_steam) delay_monster 0	
	}
}

block minotaur_pick
{
	es_setinfo alive 0
	es est_isalive alive server_var(_popup_userid)
	es_setinfo menu_steam 0
	es est_getsteam menu_steam server_var(_popup_userid)
	if (server_var(alive) = 0) do
	{
		es_keysetvalue dndUsers server_var(menu_steam) race Minotaur
		es_tell server_var(_popup_userid) #green You are now a Minotaur.
		es_keysetvalue dndUsers server_var(menu_steam) la 2
		es_keysetvalue dndUsers server_var(menu_steam) monster 0	
	}
	else do
	{
		es_keysetvalue dndExtra server_var(menu_steam) delay_race Minotaur
		es_tell server_var(_popup_userid) #green You will be a Minotaur next time you spawn.
		es_keysetvalue dndExtra server_var(menu_steam) delay_la 2
		es_keysetvalue dndExtra server_var(menu_steam) delay_monster 0	
	}
}

block drow_pick
{
	es_setinfo alive 0
	es est_isalive alive server_var(_popup_userid)
	es_setinfo menu_steam 0
	es est_getsteam menu_steam server_var(_popup_userid)
	if (server_var(alive) = 0) do
	{
		es_keysetvalue dndUsers server_var(menu_steam) race Drow
		es_tell server_var(_popup_userid) #green You are now a Drow.
		es_keysetvalue dndUsers server_var(menu_steam) la 2
		es_keysetvalue dndUsers server_var(menu_steam) monster 0	
	}
	else do
	{
		es_keysetvalue dndExtra server_var(menu_steam) delay_race Drow
		es_tell server_var(_popup_userid) #green You will be a Drow next time you spawn.
		es_keysetvalue dndExtra server_var(menu_steam) delay_la 2
		es_keysetvalue dndExtra server_var(menu_steam) delay_monster 0	
	}
}

block avariel_pick
{
	es_setinfo alive 0
	es est_isalive alive server_var(_popup_userid)
	es_setinfo menu_steam 0
	es est_getsteam menu_steam server_var(_popup_userid)
	if (server_var(alive) = 0) do
	{
		es_keysetvalue dndUsers server_var(menu_steam) race Avariel
		es_tell server_var(_popup_userid) #green You are now a Avariel.
		es_keysetvalue dndUsers server_var(menu_steam) la 3
		es_keysetvalue dndUsers server_var(menu_steam) monster 0	
	}
	else do
	{
		es_keysetvalue dndExtra server_var(menu_steam) delay_race Avariel
		es_tell server_var(_popup_userid) #green You will be a Avariel next time you spawn.
		es_keysetvalue dndExtra server_var(menu_steam) delay_la 3
		es_keysetvalue dndExtra server_var(menu_steam) delay_monster 0	
	}
}

block doppelganger_pick
{
	es_setinfo alive 0
	es est_isalive alive server_var(_popup_userid)
	es_setinfo menu_steam 0
	es est_getsteam menu_steam server_var(_popup_userid)
	if (server_var(alive) = 0) do
	{
		es_keysetvalue dndUsers server_var(menu_steam) race Doppelganger
		es_tell server_var(_popup_userid) #green You are now a Doppelganger.
		es_keysetvalue dndUsers server_var(menu_steam) la 4
		es_keysetvalue dndUsers server_var(menu_steam) monster 0	
	}
	else do
	{
		es_keysetvalue dndExtra server_var(menu_steam) delay_race Doppelganger
		es_tell server_var(_popup_userid) #green You will be a Doppelganger next time you spawn.
		es_keysetvalue dndExtra server_var(menu_steam) delay_la 4
		es_keysetvalue dndExtra server_var(menu_steam) delay_monster 0	
	}
}

block troll_pick
{
	es_setinfo alive 0
	es est_isalive alive server_var(_popup_userid)
	es_setinfo menu_steam 0
	es est_getsteam menu_steam server_var(_popup_userid)
	if (server_var(alive) = 0) do
	{
		es_keysetvalue dndUsers server_var(menu_steam) race Troll
		es_tell server_var(_popup_userid) #green You are now a Troll.
		es_keysetvalue dndUsers server_var(menu_steam) la 9
		es_keysetvalue dndUsers server_var(menu_steam) monster 0	
	}
	else do
	{
		es_keysetvalue dndExtra server_var(menu_steam) delay_race Troll
		es_tell server_var(_popup_userid) #green You will be a Troll next time you spawn.
		es_keysetvalue dndExtra server_var(menu_steam) delay_la 9
		es_keysetvalue dndExtra server_var(menu_steam) delay_monster 0	
	}
}

block vampire_pick
{
	es_setinfo alive 0
	es est_isalive alive server_var(_popup_userid)
	es_setinfo menu_steam 0
	es est_getsteam menu_steam server_var(_popup_userid)
	if (server_var(alive) = 0) do
	{
		es_keysetvalue dndUsers server_var(menu_steam) race Vampire
		es_tell server_var(_popup_userid) #green You are now a Vampire.
		es_keysetvalue dndUsers server_var(menu_steam) la 8
		es_keysetvalue dndUsers server_var(menu_steam) monster 0	
	}
	else do
	{
		es_keysetvalue dndExtra server_var(menu_steam) delay_race Vampire
		es_tell server_var(_popup_userid) #green You will be a Vampire next time you spawn.
		es_keysetvalue dndExtra server_var(menu_steam) delay_la 8
		es_keysetvalue dndExtra server_var(menu_steam) delay_monster 0	
	}
}

block gaze
{
	es_setinfo es_guserid 0
  	es_getcmduserid es_guserid
	es_setinfo es_gsteamid 0
	es est_getsteam es_gsteamid server_var(es_guserid)
	es_setinfo rcheck 0
	es_keygetvalue rcheck dndUsers server_var(es_gsteamid) race
	if (server_var(rcheck) = basilisk) do
	{
		es_setinfo baalive 0
		es est_isalive baalive server_var(es_guserid)
		if (server_var(baalive) = 1) do
		{
			es_setinfo delay 0
			es_keygetvalue delay dndExtra server_var(es_gsteamid) delay_gaze
			if (server_var(delay) = 0) do
			{
				es_setinfo point z7
				es est_getviewplayer server_var(es_guserid) point
				if (server_var(point) != z7) do
				{
					es_keysetvalue dndExtra server_var(es_gsteamid) delay_gaze 1
					es_delayed 10 es_keysetvalue dndExtra server_var(es_gsteamid) delay_gaze 0
					es_setinfo gsave 0
					es_rand gsave 1 20
					if (server_var(gsave) != 20) do
					{
						es_setinfo gvsteam 0
						es_getsteam gvsteam server_var(point)
						es_setinfo fort 0
						es_keygetvalue fort dndExtra server_var(gvsteam) fortsave
						es_math gsave + server_var(fort)
						if (server_var(gsave) < 18) do
						{
							es ma_freeze server_var(point) 1
							es_delayed 10 es ma_freeze server_var(point) 0
							es est_Fade server_var(point) 0 server_var(level) 1 0 0 0 250
							es_delayed 10 es est_Fade server_var(point) 0 server_var(level) 1 0 0 0 0
							es_tell server_var(point) #lightgreen You have been turned to stone for the next 10 seconds!
						}
					}
				}
			}
			else do
			{
				es_tell server_var(es_guserid) #green You must wait to use your gaze attack again.
			}
		}
	}
}

block stomp
{
	es_setinfo es_suserid 0
  	es_getcmduserid es_suserid
	es_setinfo es_ssteamid 0
	es est_getsteam es_ssteamid server_var(es_suserid)
	es_setinfo userrcheck 0
	es_keygetvalue userrcheck dndUsers server_var(es_ssteamid) race
	if (server_var(userrcheck) = giant) do
	{
		es_setinfo useralive 0
		es est_isalive useralive server_var(es_suserid)
		if (server_var(useralive) = 1) do
		{
			es_setinfo sdelay 0
			es_keygetvalue sdelay dndExtra server_var(es_ssteamid) stomp_delay
			es_setinfo stompvic 0
			if (server_var(sdelay) = 0) do
			{
				es_keysetvalue dndExtra server_var(es_ssteamid) stomp_delay 1
				es_delayed 5 es_keysetvalue dndExtra server_var(es_ssteamid) stomp_delay 0
				es est_Near stompvic #a 160 server_var(es_suserid) "if (server_var(es_suserid) != server_var(stompvic)) then es_doblock dnd/stompshock"
			}
			else do
			{
				es_tell server_var(es_suserid) #green Your stomp skill is still recharging.
			}
		}
	}
}

block stompshock
{
	es ma_slap server_var(stompvic) 0
	es_delayed .2 ma_slap server_var(stompvic) 0
	es_delayed .4 ma_slap server_var(stompvic) 0
	es_delayed .6 ma_slap server_var(stompvic) 0
	es_delayed .8 ma_slap server_var(stompvic) 0
	es_delayed 1 ma_slap server_var(stompvic) 0
	es_delayed 1.2 ma_slap server_var(stompvic) 0
	es_delayed 1.4 ma_slap server_var(stompvic) 0
}

block turnundead
{
	es_setinfo es_tuserid 0
  	es_getcmduserid es_tuserid
	es_setinfo es_tsteamid 0
	es est_getsteam es_tsteamid server_var(es_tuserid)
	es_setinfo userccheck 0
	es_keygetvalue userccheck dndUsers server_var(es_tsteamid) class
	if (server_var(userccheck) = cleric) do
	{
		es_setinfo turnuses 0
		es_keygetvalue turnuses dndExtra server_var(es_tsteamid) truns
		if (server_var(turnuses) > 0) do
		{
			es_setinfo turnlevel 0
			es_keygetvalue turnlevel dndUsers server_var(es_tsteamid) cleric
			es_math turnuses - 1
			es_setinfo turnvic
			es est_Near turnvic #a 600 server_var(es_tuserid) "es_doblock dnd/hurtundead"
			es_keysetvalue dndExtra server_var(es_tsteamid) turns server_var(turnuses)
		}
	}
}

block hurtundead
{
	es_setinfo racecheck 0
	es_setinfo zcheck 0
	es_setinfo zsteam 0
	es est_getsteam zsteam server_var(turnvic)
	es_keygetvalue zcheck dndExtra server_var(zsteam) zombie
	es_keygetvalue racecheck dndUsers server_var(zsteam) race
	if (server_var(zcheck) = 1) do
	{
		es_setinfo hits 0
		es_keygetvalue hits dndExtra server_var(zsteam) hitcount
		es_rand random 1 20
		es_math random + server_var(turnlevel)
		if (server_var(hits) = 0) do
		{
			es_setinfo hits server_var(random)
		}
		else do
		{
			es_math hits + server_var(random)
		}
		es_keysetvalue dndExtra server_var(zsteam) hitcount server_var(hits)
		es_tell server_var(turnvic) #green A cleric has blasted you with holy power and add server_var(random) to your hit count!
	}
}

block cat
{
	es_setinfo es_cuserid 0
  	es_getcmduserid es_cuserid
	es_setinfo es_csteamid 0
	es est_getsteam es_csteamid server_var(es_cuserid)
	es_setinfo rcheck 0
	es_keygetvalue rcheck dndUsers server_var(es_csteamid) race
	if (server_var(rcheck) = tibbit) do
	{
		es_setinfo delayed 0
		es_keygetvalue delayed dndExtra server_var(es_csteamid) catdelay
		if (server_var(delayed) = 0) do
		{
			es_keysetvalue dndExtra server_var(es_csteamid) catdelay 1
			es_delayed 2 es_keysetvalue dndExtra server_var(es_csteamid) catdelay 0
			es_setinfo cat_check 0
			es_keygetvalue cat_check dndExtra server_var(es_csteamid) cat
			if (server_var(cat_check) = 0) do
			{
				es_tell server_var(es_cuserid) #green Turning into a cat....
				es_delayed 2 es_doblock dnd/catmode
			}
			else do
			{
				es_tell server_var(es_cuserid) #green Turning back into a tibbit....
				es_delayed 2 es_doblock dnd/tibbitmode
			}
		}
	}
}

block catmode
{
	es_setinfo hcheck 0
	es est_gethealth hcheck server_var(es_cuserid)
	if (server_var(hcheck) > 20) do
	{
		es est_removeweapon server_var(es_cuserid) 2
		es est_removeweapon server_var(es_cuserid) 4
		es est_removeweapon server_var(es_cuserid) 4
		es est_removeweapon server_var(es_cuserid) 4
		es est_removeweapon server_var(es_cuserid) 4
		es_keysetvalue dndExtra server_var(es_csteamid) cat 1
		es_setinfo speed_check 1.3
		es_keysetvalue dndExtra server_var(es_csteamid) speed server_var(speed_check)
		es est_speed server_var(es_cuserid) server_var(speed_check)
		es ma_takehealth server_var(es_cuserid) 20
		es_setinfo bhealth 0
		es_keygetvalue bhealth dndExtra server_var(es_csteamid) maxhealth
		es_math bhealth - 20
		es_keysetvalue dndExtra server_var(es_csteamid) maxhealth server_var(bhealth)			
		es_tell server_var(es_cuserid) #green Your are now in a cat mode!
	}
	else do
	{
		es_tell server_var(es_cuserid) #green You do not have enough health to turn into a cat right now!
	}
}

block tibbitmode
{
	es_keysetvalue dndExtra server_var(es_csteamid) cat 0
	es ma_give server_var(es_cuserid) weapon_usp
	es_setinfo speed_check 1
	es_keysetvalue dndExtra server_var(es_csteamid) speed server_var(speed_check)
	es est_speed server_var(es_cuserid) server_var(speed_check)
	es_tell server_var(es_cuserid) #green You have returned to a tibbit!
	es_setinfo bhealth 0
	es_keygetvalue bhealth dndExtra server_var(es_csteamid) maxhealth
	if (server_var(bhealth) < 90) do
	{
		es ma_givehealth server_var(es_cuserid) 20
		es_math bhealth + 20
		es_keysetvalue dndExtra server_var(es_csteamid) maxhealth server_var(bhealth)
	}
}

block menu
{
	es_setinfo es_userid 0
	es_getcmduserid es_userid
	es popup send mainmenu server_var(es_userid)
}

block point_hurt
{
	es_setinfo dnd_dduserid 0
	es_setinfo dnd_ddtargetid 0
  	es_setinfo dnd_dddamage 0

  	es_getargv dnd_dduserid 1
  	es_getargv dnd_ddtargetid 2
  	es_getargv dnd_dddamage 3
 	es_setinfo dnd_health 0
  	
	es_setinfo drandom 0
	es_setinfo dr 0
	es_setinfo dr2 0
	es_setinfo phsteamcheck 0
	es est_getsteam phsteamcheck server_var(dnd_ddtargetid)
	es_setinfo phclass 0
	es_keygetvalue phclass dndUsers server_var(phsteamcheck) class
	es_setinfo phlevel 0
	es_keygetvalue phlevel dndUsers server_var(phsteamcheck) server_var(phclass)
	es_setinfo phcheck 0
	es_keygetvalue phcheck dndUsers server_var(phsteamcheck) prestige
	es_setinfo phrace 0
	es_keygetvalue phrace dndUsers server_var(phsteamcheck) race
	if (server_var(phrace) = tibbit) do
	{
		es_setinfo cat_check 0
		es_keygetvalue cat_check dndExtra server_var(phsteamcheck) cat
		if (server_var(cat_check) = 1) do
		{
			es_rand random 1 4
			if (server_var(random) != 1) do
			{
				es_tell server_var(dnd_ddtargetid) #green You have just dodged server_var(dnd_dddamage) damage from an attack.
				es_setinfo dnd_dddamage 0
			}
		}
	}
	if (server_var(phrace) = chaindevil) do
	{
		es_rand random 1 10
		if (server_var(random) != 1) do
		{
			es_tell server_var(dnd_ddtargetid) #green You have just dodged server_var(dnd_dddamage) damage from an attack.
			es_setinfo dnd_dddamage 0
		}
	}
	if (server_var(phrace) = rabbit) do
	{
		es_rand random 1 4
		if (server_var(random) != 1) do
		{
			es_tell server_var(dnd_ddtargetid) #green You have just dodged server_var(dnd_dddamage) damage from an attack.
			es_setinfo dnd_dddamage 0
		}
	}
	if (server_var(phclass) = ranger) do
	{
		if (server_var(lcheck) >= 6) do
		{
			es_rand random 1 5
			if (server_var(random) = 1) do
			{
				es_tell server_var(dnd_ddtargetid) #green You have just dodged server_var(dnd_dddamage) damage from an attack.
				es_setinfo dnd_dddamage 0
			}
		}
	}
	if (server_var(phclass) = ranger) do
	{
		es_setinfo scheck 0
		es_keygetvalue scheck dndExtra server_var(phsteamcheck) style
		if (server_var(scheck) = 0) do
		{
			es_setinfo scheck dual	
		}
		if (server_var(scheck) = dual) do
		{
			if (server_var(phlevel) >= 2) do
			{
				if (server_var(phlevel) < 11) do
				{
					es_rand random 1 5
					if (server_var(random) = 1) do
					{
						es_tell server_var(dnd_ddtargetid) #green You have dodged server_var(dnd_dddamage) from an attack.
						es_setinfo dnd_dddamage 0
					}
				}
			}
			if (server_var(phlevel) >= 12) do
			{
				es_rand random 1 3
				if (server_var(random) = 1) do
				{
					es_tell server_var(dnd_ddtargetid) #green You have dodged server_var(dnd_dddamage) from an attack.
					es_setinfo dnd_dddamage 0
				}
			}		
		}
		if (server_var(scheck) = archer) do
		{
			if (server_var(phlevel) >= 8) do
			{
				es_rand random 1 4
				if (server_var(random) = 1) do
				{
					es_tell server_var(dnd_ddtargetid) #green You have dodged server_var(dnd_dddamage) from an attack.
					es_setinfo dnd_dddamage 0
				}		
		}
	}	
	}
	if (server_var(phclass) = monk) do
	{
		if (server_var(phlevel) >= 2) do
		{
			if (server_var(phlevel) < 9) do
			{
				es_rand random 1 5
				if (server_var(random) = 1) do
				{
					es_tell server_var(dnd_ddtargetid) #green You have dodged server_var(dnd_dddamage) from an attack.
					es_setinfo dnd_dddamage 0
				}
			}
		}
		if (server_var(phlevel) >= 9) do
		{
			es_rand random 1 3
			if (server_var(random) = 1) do
			{
				es_tell server_var(dnd_ddtargetid) #green You have dodged server_var(dnd_dddamage) from an attack.
				es_setinfo dnd_dddamage 0
			}
		}
		if (server_var(phlevel) >= 20) do
		{
			es_setinfo dr 0
			es_setinfo dr event_Var(dmg_health)
			es_math dr / 5
			es_math dnd_dddamage - server_var(dr)
		}
	}
	if (server_var(phclass) = fighter) do
	{
		if (server_var(phcheck) = fpc1) do
		{
			es_setinfo phlevel 5
		}
		if (server_var(phcheck) = fpc2) do
		{
			es_setinfo phlevel 10
		}
		if (server_var(phcheck) = fpc3) do
		{
			es_setinfo phlevel 15
		}
	
		if (server_var(phlevel) >= 4) do
		{
			es_setinfo dr server_var(dnd_dddamage)
			es_math dr / 10
			es_math dnd_dddamage - server_var(dr)
		}
		if (server_var(phlevel) >= 14) do
		{
			es_setinfo dr2 server_var(dnd_dddamage)
			es_math dr2 / 10
			es_math dnd_dddamage - server_var(dr2)
		}
	}
	if (server_var(phclass) = rogue) do
	{
		if (server_var(phcheck) = rpc1) do
		{
			es_setinfo phlevel 5
		}
		if (server_var(phcheck) = rpc2) do
		{
			es_setinfo phlevel 10
		}
		if (server_var(phcheck) = rpc3) do
		{
			es_setinfo phlevel 15
		}
	
		if (server_var(phlevel) >= 2) do
		{
			if (server_var(phlevel) < 10) do
			{
				es_rand drandom 1 5
				if (server_var(drandom) = 1) do
				{
					es_tell server_var(dnd_ddtargetid) #green You have dodged server_var(dnd_dddamage) from an attack.
					es_setinfo dnd_dddamage 0
				
				}
			}
		}

		if (server_var(phlevel) >= 10) do
		{
			es_rand drandom 1 3
			if (server_var(drandom) = 1) do
			{
				es_tell server_var(dnd_ddtargetid) #green You have dodged server_var(dnd_dddamage) from an attack.
				es_setinfo dnd_dddamage 0
			}
		}
	}
  	
	if (server_var(phcheck) = cpc1) do
	{
		es_setinfo scheck 0
		es_keygetvalue scheck dndExtra server_var(phsteamcheck) shield
		if (server_var(scheck) = 1) do
		{
			es_setinfo dr server_var(dnd_dddamage)
			es_math dr / 10
			es_math dnd_dddamage - server_var(dr)
		}
	}
	es est_GetHealth dnd_health server_var(dnd_ddtargetid) 
	if (server_var(dnd_health) > server_var(dnd_dddamage)) do
	{
		es ma_takehealth server_var(dnd_ddtargetid) server_var(dnd_dddamage)
		//es est_damage server_var(dnd_dduserid) server_var(dnd_ddtargetid) 0
	}
      	else do
	{
		es_give server_var(dnd_ddtargetid) point_hurt
		es_fire server_var(dnd_ddtargetid) !self addoutput "targetname badboy"
		es_fire server_var(dnd_ddtargetid) point_hurt addoutput "targetname rps_damage"
		es_format dmg "Damage %1" server_var(dnd_dddamage)
		es_fire server_var(dnd_ddtargetid) rps_damage addoutput server_var(dmg)
		es_fire server_var(dnd_ddtargetid) rps_damage addoutput "DamageType 32"
		es_fire server_var(dnd_ddtargetid) rps_damage addoutput "DamageDelay 0.1"
		es_fire server_var(dnd_dduserid) rps_damage addoutput "DamageTarget badboy"
		es_fire server_var(dnd_ddtargetid) rps_damage TurnOn
		es_fire server_var(dnd_dduserid) rps_damage Hurt
		es_fire server_var(dnd_ddtargetid) rps_damage kill
		es_fire server_var(dnd_ddtargetid) !self addoutput "targetname notbad"
	}
}	

block stealth_off
{
	es_setinfo userid 0
	
	es_getargv userid 1

	es_setinfo es_steamid 0
	es est_getsteam es_steamid server_var(userid)
	es_setinfo allow_color 0
	es_keygetvalue allow_color dndExtra server_var(es_steamid) allow_color
	if (server_var(allow_color) = 0) do
	{
		es_setinfo allow_color 1
		es_tell server_var(userid) #green You have come out of your stealth!!
	}
	else do
	{
		es_math allow_color + 1
	}
	es_keysetvalue dndExtra server_var(es_steamid) allow_color server_var(allow_color)
	es est_setplayercolor server_var(userid) 255 255 255 255 1
	es_delayed 4 es stealth_on server_var(userid)
}

block stealth_on
{
	es_setinfo userid 0
	
	es_getargv userid 1

	es_setinfo es_steamid 0
	es est_getsteam es_steamid server_var(userid)

	es_setinfo allow_color 0
	es_keygetvalue allow_color dndExtra server_var(es_steamid) allow_color
	es_math allow_color - 1
	es_keysetvalue dndExtra server_var(es_steamid) allow_color server_var(allow_color)
	if (server_var(allow_color) <= 0) do
	{
		es_tell server_var(userid) #green You have gone back into stealth mode!!
		es_keysetvalue dndExtra server_var(es_steamid) allow_color 0
		es_setinfo color_check 0
		es_keygetvalue color_check dndExtra server_var(es_steamid) color
		es est_setplayercolor server_var(userid) 255 255 255 server_var(color_check) 1
	}
}

block sneak_off
{
	es_setinfo userid 0
	
	es_getargv userid 1

	es_setinfo es_steamid 0
	es est_getsteam es_steamid server_var(userid)

	es_setinfo allow 0
	es_keygetvalue allow dndExtra server_var(es_steamid) sneak
	if (server_var(allow) = 0) do
	{
		es_setinfo allow 1
	}
	else do
	{
		es_math allow + 1
	}
	es_keysetvalue dndExtra server_var(es_steamid) sneak server_var(allow)
	es_delayed 4 es sneak_on server_var(userid)
}

block sneak_on
{
	es_setinfo userid 0
	
	es_getargv userid 1

	es_setinfo es_steamid 0
	es est_getsteam es_steamid server_var(userid)

	es_setinfo allow 0
	es_keygetvalue allow dndExtra server_var(es_steamid) sneak
	es_math allow - 1
	if (server_var(allow) <= 0) do
	{
		es_keysetvalue dndExtra server_var(es_steamid) sneak 0
	}
	else do
	{
		es_keysetvalue dndExtra server_var(es_steamid) sneak server_var(allow)
	}
}

event player_activate
{
	es_keycreate dndUsers event_var(es_steamid)
	es_keycreate dndExtra event_var(es_steamid)
	es_doblock dnd/player_reset
	es_keysetvalue dndExtra event_var(es_steamid) nhealth 0
	es_keysetvalue dndExtra event_var(es_steamid) bhealth 0
	es_setinfo ccheck 0
	es_keygetvalue ccheck dndUsers event_var(es_steamid) class
	es_keysetvalue dndExtra event_var(es_steamid) algin good
	es_setinfo pname 0
	es est_getname pname event_var(userid)
	es_keysetvalue dndUsers event_var(es_steamid) name server_var(pname)
	if (server_var(ccheck) = 0) do
	{
		es_setinfo mcheck 0
		es_keygetvalue mcheck dndUsers event_var(es_steamid) monster
		if (server_var(mcheck) = 0) do
		{
			es_keysetvalue dndUsers event_var(es_steamid) race Human
			es_keysetvalue dndUsers event_var(es_steamid) class Fighter
			es_keysetvalue dndUsers event_var(es_steamid) curxp fxp
		}
	}
	es_setinfo fcheck 0
	es_keygetvalue fcheck dndUsers event_var(es_steamid) fighter
	if (server_var(fcheck) = 0) do
	{
		es_keysetvalue dndUsers event_var(es_steamid) fighter 1
	}
	es_setinfo rcheck 0
	es_keygetvalue rcheck dndUsers event_var(es_steamid) rogue
	if (server_var(rcheck) = 0) do
	{
		es_keysetvalue dndUsers event_var(es_steamid) rogue 1
	}
	es_setinfo wcheck 0
	es_keygetvalue wcheck dndUsers event_var(es_steamid) wizard
	if (server_var(wcheck) = 0) do
	{
		es_keysetvalue dndUsers event_var(es_steamid) wizard 1
	}
	es_setinfo ccheck 0
	es_keygetvalue ccheck dndUsers event_var(es_steamid) cleric
	if (server_var(ccheck) = 0) do
	{
		es_keysetvalue dndUsers event_var(es_steamid) cleric 1
	}
	es_setinfo pcheck 0
	es_keygetvalue pcheck dndUsers event_var(es_steamid) paladin
	if (server_var(pcheck) = 0) do
	{
		es_keysetvalue dndUsers event_var(es_steamid) paladin 1
	}
	es_setinfo racheck 0
	es_keygetvalue racheck dndUsers event_var(es_steamid) ranger
	if (server_var(racheck) = 0) do
	{
		es_keysetvalue dndUsers event_var(es_steamid) ranger 1
	}
	es_setinfo mcheck 0
	es_keygetvalue mcheck dndUsers event_var(es_steamid) monk
	if (server_var(mcheck) = 0) do
	{
		es_keysetvalue dndUsers event_var(es_steamid) monk 1
	}
	es_setinfo ncheck 0
	es_keygetvalue ncheck dndUsers event_var(es_steamid) necromancer
	if (server_var(ncheck) = 0) do
	{
		es_keysetvalue dndUsers event_var(es_steamid) necromancer 1
	}
	es_setinfo bcheck 0
	es_keygetvalue bcheck dndUsers event_var(es_steamid) bard
	if (server_var(bcheck) = 0) do
	{
		es_keysetvalue dndUsers event_var(es_steamid) bard 1
	}
}

block escape
{
	es_setinfo es_userid 0
  	es_getcmduserid es_userid
	es_setinfo es_steamid 0
	es est_getsteam es_steamid server_var(es_userid)
	es_setinfo rcheck 0
	es_keygetvalue rcheck dndUsers server_var(es_steamid) race
	es_setinfo ccheck 0
	es_keygetvalue ccheck dndUsers server_var(es_steamid) class
	es_setinfo lcheck 0
	es_keygetvalue lcheck dndUsers server_var(es_steamid) server_var(ccheck)
	if (server_var(rcheck) = kobold) do
	{
		es_setinfo timer 0
		es_keygetvalue timer dndExtra server_var(es_steamid) escape_timer
		if (server_var(timer) = 0) do
		{
			es_keysetvalue dndExtra server_var(es_steamid) escape_timer 1
			es_rand random 1 4
			if (server_var(random) = 1) do
			{
				es est_physPush server_var(es_userid) 1500 1500 10
			}
			if (server_var(random) = 2) do
			{
				es est_physPush server_var(es_userid) -1500 -1500 10
			}
			if (server_var(random) = 3) do
			{
				es est_physPush server_var(es_userid) -1500 1500 10
			}
			if (server_var(random) = 4) do
			{
				es est_physPush server_var(es_userid) 1500 -1500 10
			}
			es_delayed 3 es_keysetvalue dndExtra server_var(es_steamid) escape_timer 0
		}
	}
	if (server_var(ccheck) = monk) do
	{
		if (server_var(lcheck) >= 14) do
		{
			es_setinfo timer 0
			es_keygetvalue timer dndExtra server_var(es_steamid) escape_timer
			if (server_var(timer) = 0) do
			{
				es_keysetvalue dndExtra server_var(es_steamid) escape_timer 1
				es_rand random 1 4
				if (server_var(random) = 1) do
				{
					es est_physPush server_var(es_userid) 2000 2000 10
				}
				if (server_var(random) = 2) do
				{
					es est_physPush server_var(es_userid) -2000 -2000 10
				}
				if (server_var(random) = 3) do
				{
					es est_physPush server_var(es_userid) -2000 2000 10
				}
				if (server_var(random) = 4) do
				{
					es est_physPush server_var(es_userid) 2000 -2000 10
				}
				es_delayed 3 es_keysetvalue dndExtra server_var(es_steamid) escape_timer 0
			}
		}
	}	
}

block save1
{
	es_setinfo es_userid 0
  	es_getcmduserid es_userid
	es_setinfo es_steamid 0
	es est_getsteam es_steamid server_var(es_userid)
	es_setinfo rcheck 0
	es_keygetvalue rcheck dndUsers server_var(es_steamid) race
	es_setinfo ccheck 0
	es_keygetvalue ccheck dndUsers server_var(es_steamid) class
	es_setinfo lcheck 0
	es_keygetvalue lcheck dndUsers server_var(es_steamid) server_var(ccheck)
	es_setinfo alive 0
	es est_isalive alive server_var(es_userid)
	if (server_var(alive) = 1) do
	{
		if (server_var(rcheck) = filcher) do
		{
			es_setinfo x 0
			es_setinfo y 0
			es_setinfo z 0
			es_getplayerlocation x y z server_var(es_userid)
			es_keysetvalue dndExtra server_var(es_steamid) x1_var server_var(x)
			es_keysetvalue dndExtra server_var(es_steamid) y1_var server_var(y)
			es_keysetvalue dndExtra server_var(es_steamid) z1_var server_var(z)
			es_tell server_var(es_userid) #green Location saved use !tele1 to return to it.
		}
		if (server_var(rcheck) = waterele) do
		{
			es_setinfo x 0
			es_setinfo y 0
			es_setinfo z 0
			es_getplayerlocation x y z server_var(es_userid)
			es_keysetvalue dndExtra server_var(es_steamid) x1_var server_var(x)
			es_keysetvalue dndExtra server_var(es_steamid) y1_var server_var(y)
			es_keysetvalue dndExtra server_var(es_steamid) z1_var server_var(z)
			es_tell server_var(es_userid) #green Location saved use !tele1 to return to it.
		}
		if (server_var(ccheck) = monk) do
		{
			if (server_var(lcheck) >= 12) do
			{
				es_setinfo x 0
				es_setinfo y 0
				es_setinfo z 0
				es_getplayerlocation x y z server_var(es_userid)
				es_keysetvalue dndExtra server_var(es_steamid) x1_var server_var(x)
				es_keysetvalue dndExtra server_var(es_steamid) y1_var server_var(y)
				es_keysetvalue dndExtra server_var(es_steamid) z1_var server_var(z)
				es_tell server_var(es_userid) #green Location saved use !tele1 to return to it.
			}
		}
	}
}

block save2
{
	es_setinfo es_userid 0
  	es_getcmduserid es_userid
	es_setinfo es_steamid 0
	es est_getsteam es_steamid server_var(es_userid)
	es_setinfo rcheck 0
	es_keygetvalue rcheck dndUsers server_var(es_steamid) race
	es_setinfo ccheck 0
	es_keygetvalue ccheck dndUsers server_var(es_steamid) class
	es_setinfo lcheck 0
	es_keygetvalue lcheck dndUsers server_var(es_steamid) server_var(ccheck)
	es_setinfo alive 0
	es est_isalive alive server_var(es_userid)
	if (server_var(alive) = 1) do
	{
		if (server_var(rcheck) = filcher) do
		{
			es_setinfo x 0
			es_setinfo y 0
			es_setinfo z 0
			es_getplayerlocation x y z server_var(es_userid)
			es_keysetvalue dndExtra server_var(es_steamid) x2_var server_var(x)
			es_keysetvalue dndExtra server_var(es_steamid) y2_var server_var(y)
			es_keysetvalue dndExtra server_var(es_steamid) z2_var server_var(z)
			es_tell server_var(es_userid) #green Location saved use !tele2 to return to it.
		}
		if (server_var(rcheck) = waterele) do
		{
			es_setinfo x 0
			es_setinfo y 0
			es_setinfo z 0
			es_getplayerlocation x y z server_var(es_userid)
			es_keysetvalue dndExtra server_var(es_steamid) x2_var server_var(x)
			es_keysetvalue dndExtra server_var(es_steamid) y2_var server_var(y)
			es_keysetvalue dndExtra server_var(es_steamid) z2_var server_var(z)
			es_tell server_var(es_userid) #green Location saved use !tele2 to return to it.
		}
		if (server_var(ccheck) = monk) do
		{
			if (server_var(lcheck) >= 12) do
			{
				es_setinfo x 0
				es_setinfo y 0
				es_setinfo z 0
				es_getplayerlocation x y z server_var(es_userid)
				es_keysetvalue dndExtra server_var(es_steamid) x2_var server_var(x)
				es_keysetvalue dndExtra server_var(es_steamid) y2_var server_var(y)
				es_keysetvalue dndExtra server_var(es_steamid) z2_var server_var(z)
				es_tell server_var(es_userid) #green Location saved use !tele2 to return to it.
			}
		}		
	}
}

block tele1
{
	es_setinfo es_userid 0
  	es_getcmduserid es_userid
	es_setinfo es_steamid 0
	es est_getsteam es_steamid server_var(es_userid)
	es_setinfo rcheck 0
	es_keygetvalue rcheck dndUsers server_var(es_steamid) race
	es_setinfo ccheck 0
	es_keygetvalue ccheck dndUsers server_var(es_steamid) class
	es_setinfo lcheck 0
	es_keygetvalue lcheck dndUsers server_var(es_steamid) server_var(ccheck)
	if (server_var(rcheck) = filcher) do
	{
		es_setinfo tcheck 0
		es_keygetvalue tcheck dndExtra server_var(es_steamid) tele_count
		es_setinfo x 0
		es_setinfo y 0
		es_setinfo z 0
		es_keygetvalue x dndExtra server_var(es_steamid) x1_var
		es_keygetvalue y dndExtra server_var(es_steamid) y1_var
		es_keygetvalue z dndExtra server_var(es_steamid) z1_var
		if (server_var(tcheck) >= 1) do
		{		
			if (server_var(x) != 0) do
			{
				if (server_var(tele_allow) = 1) do
				{
					es ma_teleport server_var(es_userid) server_var(x) server_var(y) server_var(z)
					es_tell server_var(es_userid) #green You have teleport to your saved location.
					es_math tcheck - 1
				}
				else do
				{
					es_tell server_var(es_userid) #green It is still to early to teleport yet!
				}
			}
			else do
			{
				es_tell server_var(es_userid) #green Use !save1 to pick a spot to retun to first!
			}
		}
		else do
		{
			es_tell server_var(es_userid) #green You do not have any teleport uses left.
		}		
		es_keysetvalue dndExtra server_var(es_steamid) tele_count server_var(tcheck)
	}
	if (server_var(rcheck) = waterele) do
	{
		es_setinfo tcheck 0
		es_keygetvalue tcheck dndExtra server_var(es_steamid) tele_count
		es_setinfo x 0
		es_setinfo y 0
		es_setinfo z 0
		es_keygetvalue x dndExtra server_var(es_steamid) x1_var
		es_keygetvalue y dndExtra server_var(es_steamid) y1_var
		es_keygetvalue z dndExtra server_var(es_steamid) z1_var
		if (server_var(tcheck) >= 1) do
		{		
			if (server_var(x) != 0) do
			{
				if (server_var(tele_allow) = 1) do
				{
					es ma_teleport server_var(es_userid) server_var(x) server_var(y) server_var(z)
					es_tell server_var(es_userid) #green You have teleport to your saved location.
					es_math tcheck - 1
				}
				else do
				{
					es_tell server_var(es_userid) #green It is still to early to teleport yet!
				}
			}
			else do
			{
				es_tell server_var(es_userid) #green Use !save1 to pick a spot to retun to first!
			}
		}
		else do
		{
			es_tell server_var(es_userid) #green You do not have any teleport uses left.
		}		
		es_keysetvalue dndExtra server_var(es_steamid) tele_count server_var(tcheck)
	}
	if (server_var(ccheck) = monk) do
	{
		es_setinfo tcheck 0
		es_keygetvalue tcheck dndExtra server_var(es_steamid) tele_count
		es_setinfo x 0
		es_setinfo y 0
		es_setinfo z 0
		es_keygetvalue x dndExtra server_var(es_steamid) x1_var
		es_keygetvalue y dndExtra server_var(es_steamid) y1_var
		es_keygetvalue z dndExtra server_var(es_steamid) z1_var
		if (server_var(tcheck) >= 1) do
		{		
			if (server_var(x) != 0) do
			{
				if (server_var(tele_allow) = 1) do
				{
					es ma_teleport server_var(es_userid) server_var(x) server_var(y) server_var(z)
					es_tell server_var(es_userid) #green You have teleported to your saved location.
					es_math tcheck - 1
				}
				else do
				{
					es_tell server_var(es_userid) #green It is still to early to teleport yet!
				}
			}
			else do
			{
				es_tell server_var(es_userid) #green Use !save1 to pick a spot to retun to first!
			}
		}
		else do
		{
			es_tell server_var(es_userid) #green You do not have any teleport uses left.
		}		
		es_keysetvalue dndExtra server_var(es_steamid) tele_count server_var(tcheck)
	}
}

block tele2
{
	es_setinfo es_userid 0
  	es_getcmduserid es_userid
	es_setinfo es_steamid 0
	es est_getsteam es_steamid server_var(es_userid)
	es_setinfo rcheck 0
	es_keygetvalue rcheck dndUsers server_var(es_steamid) race
	es_setinfo ccheck 0
	es_keygetvalue ccheck dndUsers server_var(es_steamid) class
	es_setinfo lcheck 0
	es_keygetvalue lcheck dndUsers server_var(es_steamid) server_var(ccheck)
	if (server_var(rcheck) = filcher) do
	{
		es_setinfo tcheck 0
		es_keygetvalue tcheck dndExtra server_var(es_steamid) tele_count
		es_setinfo x 0
		es_setinfo y 0
		es_setinfo z 0
		es_keygetvalue x dndExtra server_var(es_steamid) x2_var
		es_keygetvalue y dndExtra server_var(es_steamid) y2_var
		es_keygetvalue z dndExtra server_var(es_steamid) z2_var
		if (server_var(tcheck) >= 1) do
		{		
			if (server_var(x) != 0) do
			{
				if (server_var(tele_allow) = 1) do
				{
					es ma_teleport server_var(es_userid) server_var(x) server_var(y) server_var(z)
					es_tell server_var(es_userid) #green You have teleported to your saved location.
					es_math tcheck - 1
				}
				else do
				{
					es_tell server_var(es_userid) #green It is still to early to teleport yet!
				}
			}
			else do
			{
				es_tell server_var(es_userid) #green Use !save2 to pick a spot to retun to first!
			}
		}
		else do
		{
			es_tell server_var(es_userid) #green You do not have any teleport uses left.
		}		
		es_keysetvalue dndExtra server_var(es_steamid) tele_count server_var(tcheck)
	}
	if (server_var(rcheck) = waterele) do
	{
		es_setinfo tcheck 0
		es_keygetvalue tcheck dndExtra server_var(es_steamid) tele_count
		es_setinfo x 0
		es_setinfo y 0
		es_setinfo z 0
		es_keygetvalue x dndExtra server_var(es_steamid) x2_var
		es_keygetvalue y dndExtra server_var(es_steamid) y2_var
		es_keygetvalue z dndExtra server_var(es_steamid) z2_var
		if (server_var(tcheck) >= 1) do
		{		
			if (server_var(x) != 0) do
			{
				if (server_var(lcheck) >= 12) do
				{
					if (server_var(tele_allow) = 1) do
					{
						es ma_teleport server_var(es_userid) server_var(x) server_var(y) server_var(z)
						es_tell server_var(es_userid) #green You have teleported to your saved location.
						es_math tcheck - 1
					}
					else do
					{
						es_tell server_var(es_userid) #green It is still to early to teleport yet!
					}
				}
			}
			else do
			{
				es_tell server_var(es_userid) #green Use !save2 to pick a spot to retun to first!
			}
		}
		else do
		{
			es_tell server_var(es_userid) #green You do not have any teleport uses left.
		}		
		es_keysetvalue dndExtra server_var(es_steamid) tele_count server_var(tcheck)
	}
	if (server_var(ccheck) = monk) do
	{
		es_setinfo tcheck 0
		es_keygetvalue tcheck dndExtra server_var(es_steamid) tele_count
		es_setinfo x 0
		es_setinfo y 0
		es_setinfo z 0
		es_keygetvalue x dndExtra server_var(es_steamid) x2_var
		es_keygetvalue y dndExtra server_var(es_steamid) y2_var
		es_keygetvalue z dndExtra server_var(es_steamid) z2_var
		if (server_var(tcheck) >= 1) do
		{		
			if (server_var(x) != 0) do
			{
				if (server_var(lcheck) >= 12) do
				{
					if (server_var(tele_allow) = 1) do
					{
						es ma_teleport server_var(es_userid) server_var(x) server_var(y) server_var(z)
						es_tell server_var(es_userid) #green You have teleport to your saved location.
						es_math tcheck - 1
					}
					else do
					{
						es_tell server_var(es_userid) #green It is still to early to teleport yet!
					}
				}
			}
			else do
			{
				es_tell server_var(es_userid) #green Use !save2 to pick a spot to retun to first!
			}
		}
		else do
		{
			es_tell server_var(es_userid) #green You do not have any teleport uses left.
		}		
		es_keysetvalue dndExtra server_var(es_steamid) tele_count server_var(tcheck)
	}
}

block anti_grav
{
	es_setinfo dnd_sruserid 0
	es_setinfo dnd_sradius 0


  	es_getargv dnd_sruserid 1
  	es_getargv dnd_sradius 2
	es_setinfo team 0
	es est_getteam team dnd_sruserid
	if (server_var(team) = 2) do
	{
		es est_Near dnd_stargetid #c server_var(dnd_sradius) server_var(dnd_sruserid) "es est_gravity server_var(dnd_stargetid) 1.00"
	}
	if (server_var(team) = 3) do
	{
		es est_Near dnd_stargetid #t server_var(dnd_sradius) server_var(dnd_sruserid) "es est_gravity server_var(dnd_stargetid) 1.00"
	}
	es_setinfo grav_alive 0
	es est_isalive grav_alive server_var(dnd_sruserid)
	if (server_var(grav_alive) = 1) do
	{
		es_delayed 4 es anti_grav server_var(dnd_ruserid) server_var(dnd_sradius)
	}
}

block regen
{
	es_setinfo dnd_ruserid 0
	es_setinfo dnd_delay 0
  	es_setinfo dnd_amount 0

  	es_getargv dnd_ruserid 1
  	es_getargv dnd_delay 2
  	es_getargv dnd_amount 3
 	
	es_setinfo dnd_health 0
	es_setinfo maxhealth 0
	
	es_setinfo regensteamcheck 0
	es est_getsteam regensteamcheck server_var(dnd_ruserid)
	es_setinfo alive 0
	
	es_setinfo rcheck 0
	es_keygetvalue rcheck dndExtra server_var(regensteamcheck) regen
	if (server_var(rcheck) = 1) do
	{
		es est_GetHealth dnd_health server_var(dnd_ruserid) 
		es_math dnd_health + server_var(dnd_amount)
		es_keygetvalue maxhealth dndExtra server_var(regensteamcheck) maxhealth
		if (server_var(dnd_health) >= server_var(maxhealth)) do
		{
			es ma_sethealth server_var(dnd_ruserid) server_var(maxhealth)
			es_delayed server_var(dnd_delay) regen server_var(dnd_ruserid) server_var(dnd_delay) server_var(dnd_amount)
		}
		if (server_var(dnd_health) < server_var(maxhealth)) do
		{
			es ma_givehealth server_var(dnd_ruserid) server_var(dnd_amount)
			es_delayed server_var(dnd_delay) regen server_var(dnd_ruserid) server_var(dnd_delay) server_var(dnd_amount)
		}
	}
}

block areadamage
{
	es_setinfo dnd_aduserid 0
	es_setinfo dnd_addelay 0
  	es_setinfo dnd_adamount 0
	es_setinfo dnd_adradius 0
	es_setinfo dnd_adtargetid 0

  	es_getargv dnd_aduserid 1
  	es_getargv dnd_addelay 2
  	es_getargv dnd_adamount 3
	es_getargv dnd_adradius 4
 	
	es_setinfo dnd_arhealth 0
	es_setinfo armaxhealth 0
	
			
	es_setinfo adsteamcheck 0
	es est_getsteam adsteamcheck server_var(dnd_aduserid)
	es_setinfo alive 0
	
	es_setinfo adcheck 0
	es_keygetvalue adcheck dndExtra server_var(adsteamcheck) areadmg
	if (server_var(adcheck) = 1) do
	{
		es_setinfo dnd_team 0
		es est_getteam dnd_team server_var(dnd_arruserid)
		if (server_var(dnd_team) = 3) then es_setinfo dnd_adteam "#t"
		if (server_var(dnd_team) = 2) then es_setinfo dnd_adteam "#c"
		es est_Near dnd_adtargetid server_var(dnd_adteam) server_var(dnd_adradius) server_var(dnd_aduserid) "es point_hurt server_var(dnd_aduserid) server_var(dnd_adtargetid) server_var(dnd_adamount)"
		es_delayed server_var(dnd_ardelay) areadamage server_var(dnd_aduserid) server_var(dnd_addelay) server_var(dnd_adamount) server_var(dnd_adradius)
	}
}

block arearegen
{
	es_setinfo dnd_arruserid 0
	es_setinfo dnd_ardelay 0
  	es_setinfo dnd_aramount 0
	es_setinfo dnd_radius 0
	es_setinfo dnd_targetid 0

  	es_getargv dnd_arruserid 1
  	es_getargv dnd_ardelay 2
  	es_getargv dnd_aramount 3
	es_getargv dnd_radius 4
 	
	es_setinfo dnd_arhealth 0
	es_setinfo armaxhealth 0
	
			
	es_setinfo arregensteamcheck 0
	es est_getsteam arregensteamcheck server_var(dnd_arruserid)
	es_setinfo alive 0
	
	es_setinfo arrcheck 0
	es_keygetvalue arrcheck dndExtra server_var(arregensteamcheck) arearegen
	if (server_var(arrcheck) = 1) do
	{	
		es_setinfo dnd_team 0
		es est_getteam dnd_team server_var(dnd_arruserid)
		if (server_var(dnd_team) = 2) then es_setinfo dnd_team "#t"
		if (server_var(dnd_team) = 3) then es_setinfo dnd_team "#c"
		es est_Near dnd_targetid server_var(dnd_team) server_var(dnd_radius) server_var(dnd_arruserid) "es targetregen server_var(dnd_targetid) server_var(dnd_aramount)"
		es_delayed server_var(dnd_ardelay) arearegen server_var(dnd_arruserid) server_var(dnd_ardelay) server_var(dnd_aramount) server_var(dnd_radius)	
	}
}

block targetregen
{
	es_setinfo dnd_truserid 0
	es_setinfo dnd_tramount 0

	es_getargv dnd_truserid 1
	es_getargv dnd_tramount 2
	es_setinfo dnd_trarhealth 0
	es_setinfo trarmaxhealth 0
	es_setinfo dnd_tarsteam 0

	es est_gethealth dnd_trarhealth server_var(dnd_truserid)
	es_math dnd_trarhealth + server_var(dnd_tramount)
	es est_getsteam dnd_tarsteam server_var(dnd_truserid)
	es_keygetvalue trarmaxhealth dndExtra server_var(dnd_tarsteam) maxhealth
	if (server_var(trarmaxhealth) > server_var(dnd_trarhealth)) do
	{
		es ma_givehealth server_var(dnd_truserid) server_var(dnd_tramount)
	}
	if (server_var(trarmaxhealth) <= server_var(dnd_trarhealth)) do
	{
		es est_sethealth server_var(dnd_truserid) server_var(trarmaxhealth)
	}
}

block bonushealth
{
	es_setinfo dnd_bhruserid 0
	es_setinfo dnd_bhamount 0
	es_setinfo targetid 0

  	es_getargv dnd_bhruserid 1
  	es_getargv dnd_bhamount 2
	
	
	es_setinfo bhsteam 0
	es est_getsteam bhsteam server_var(dnd_bhruserid)
	es_setinfo bhealth 0
	es_keygetvalue bhealth dndExtra server_var(bhsteam) bhealth
	if (server_var(bhealth) = 0) do
	{
		es_keysetvalue dndExtra server_var(bhsteam) bhealth server_var(dnd_bhamount)
	}
	else do 
	{
		es_math bhealth + server_var(dnd_bhamount)
		es_keysetvalue dndExtra server_var(bhsteam) bhealth server_var(bhealth)
	}
}

block neghealth
{
	es_setinfo dnd_nhruserid 0
	es_setinfo dnd_nhamount 0
	es_setinfo targetid 0

  	es_getargv dnd_nhruserid 1
  	es_getargv dnd_nhamount 2
	es_getargv dnd_nhteam 3
	
	es_setinfo nhsteam 0
	es est_getsteam nhsteam server_var(dnd_nhruserid)
	es_setinfo nhealth 0
	es_keygetvalue nhealth dndExtra server_var(nhsteam) nhealth
	if (server_var(nhealth) = 0) do
	{
		es_keysetvalue dndExtra server_var(nhsteam) nhealth server_var(dnd_nhamount)
	}
	else do 
	{
		es_math nhealth + server_var(dnd_nhamount)
		es_keysetvalue dndExtra server_var(nhsteam) nhealth server_var(nhealth)
	}	
}

block lev0
{
	es_setinfo es_userid 0
  	es_getcmduserid es_userid
	es_setinfo es_steamid 0
	es est_getsteam es_steamid server_var(es_userid)
	es_setinfo rcheck 0
	es_keygetvalue rcheck dndUsers server_var(es_steamid) race
	if (server_var(rcheck) = filcher) do
	{
		es est_setgravity server_var(es_userid) 1.00
		es_tell server_var(es_userid) #green You gravity is now normal.
	}
	if (server_var(rcheck) = drow) do
	{
		es est_setgravity server_var(es_userid) 1.00
		es_tell server_var(es_userid) #green You gravity is now normal.
	}
	if (server_var(rcheck) = rok) do
	{
		es est_setgravity server_var(es_userid) 1.00
		es_tell server_var(es_userid) #green You gravity is now normal.
	}
	if (server_var(rcheck) = dragon) do
	{
		es est_setgravity server_var(es_userid) 1.00
		es_tell server_var(es_userid) #green You gravity is now normal.
	}
	if (server_var(rcheck) = vampire) do
	{
		es est_setgravity server_var(es_userid) 1.00
		es_tell server_var(es_userid) #green You gravity is now normal.
	}
	if (server_var(rcheck) = airele) do
	{
		es est_setgravity server_var(es_userid) 1.00
		es_tell server_var(es_userid) #green You gravity is now normal.
	}
	if (server_var(rcheck) = avariel) do
	{
		es est_setgravity server_var(es_userid) 1.00
		es_tell server_var(es_userid) #green You gravity is now normal.
	}
}

block light_heal
{
	es_setinfo es_userid 0
  	es_getcmduserid es_userid
	es_setinfo es_steamid 0
	es est_getsteam es_steamid server_var(es_userid)
	es_setinfo healcount 0
	es_keygetvalue healcount dndExtra server_var(es_steamid) healing
	es_setinfo totalcount 0
	es_keygetvalue totalcount dndExtra server_var(es_steamid) totalpot
	es_setinfo maxlife 0
	es_keygetvalue maxlife dndExtra server_var(es_steamid) maxhealth
	es_setinfo currentlife 0
	es est_gethealth currentlife server_var(es_userid)
	if (server_var(healcount) >= 1) do
	{
		es_setinfo bonus 0
		es_rand bonus 2 9
		es_math currentlife + server_var(bonus)
		if (server_var(currentlife) <= server_var(maxlife)) do
		{
			es ma_sethealth server_var(es_userid) server_var(currentlife)
		}
		else do
		{
			es ma_sethealth server_var(es_userid) server_var(maxlife)
		}
		es_tell server_var(es_userid) #green You have gained server_var(bonus) health from your healing potion.
		es_math healcount - 1
		es_math totalcount - 1
		es_keysetvalue dndExtra server_var(es_steamid) healing server_var(healcount)
		es_keysetvalue dndExtra server_var(es_steamid) totalpot server_var(totalcount)
	}
}

block light_mana
{
	es_setinfo es_userid 0
  	es_getcmduserid es_userid
	es_setinfo es_steamid 0
	es est_getsteam es_steamid server_var(es_userid)
	es_setinfo manacount 0
	es_keygetvalue manacount dndExtra server_var(es_steamid) manaing
	es_setinfo totalcount 0
	es_keygetvalue totalcount dndExtra server_var(es_steamid) totalpot
	es_setinfo maxmana 0
	es_keygetvalue maxmana dndExtra server_var(es_steamid) max_mana
	es_setinfo currentmana 0
	es_keygetvalue currentmana dndExtra server_var(es_steamid) mana
	if (server_var(manacount) >= 1) do
	{
		es_setinfo bonus 0
		es_rand bonus 2 9
		es_math currentmana + server_var(bonus)
		if (server_var(currentmana) <= server_var(maxmana)) do
		{
			es_keysetvalue dndExtra server_var(es_steamid) mana server_var(currentmana)
		}
		else do
		{
			es_keysetvalue dndExtra server_var(es_steamid) mana server_var(maxmana)
		}
		es_tell server_var(es_userid) #green You have gained server_var(bonus) mana from your mana potion.
		es_math manacount - 1
		es_math totalcount - 1
		es_keysetvalue dndExtra server_var(es_steamid) manaing server_var(manacount)
		es_keysetvalue dndExtra server_var(es_steamid) totalpot server_var(totalcount)
	}
}

block moderate_heal
{
	es_setinfo es_userid 0
  	es_getcmduserid es_userid
	es_setinfo es_steamid 0
	es est_getsteam es_steamid server_var(es_userid)
	es_setinfo healcount 0
	es_keygetvalue healcount dndExtra server_var(es_steamid) mhealing
	es_setinfo totalcount 0
	es_keygetvalue totalcount dndExtra server_var(es_steamid) totalpot
	es_setinfo maxlife 0
	es_keygetvalue maxlife dndExtra server_var(es_steamid) maxhealth
	es_setinfo currentlife 0
	es est_gethealth currentlife server_var(es_userid)
	if (server_var(healcount) >= 1) do
	{
		es_setinfo bonus 0
		es_rand bonus 5 19
		es_math currentlife + server_var(bonus)
		if (server_var(currentlife) <= server_var(maxlife)) do
		{
			es ma_sethealth server_var(es_userid) server_var(currentlife)
		}
		else do
		{
			es ma_sethealth server_var(es_userid) server_var(maxlife)
		}
		es_tell server_var(es_userid) #green You have gained server_var(bonus) health from your healing potion.
		es_math healcount - 1
		es_math totalcount - 1
		es_keysetvalue dndExtra server_var(es_steamid) mhealing server_var(healcount)
		es_keysetvalue dndExtra server_var(es_steamid) totalpot server_var(totalcount)
	}
}

block moderate_mana
{
	es_setinfo es_userid 0
  	es_getcmduserid es_userid
	es_setinfo es_steamid 0
	es est_getsteam es_steamid server_var(es_userid)
	es_setinfo manacount 0
	es_keygetvalue manacount dndExtra server_var(es_steamid) mmanaing
	es_setinfo totalcount 0
	es_keygetvalue totalcount dndExtra server_var(es_steamid) totalpot
	es_setinfo maxmana 0
	es_keygetvalue maxmana dndExtra server_var(es_steamid) max_mana
	es_setinfo currentmana 0
	es_keygetvalue currentmana dndExtra server_var(es_steamid) mana
	if (server_var(manacount) >= 1) do
	{
		es_setinfo bonus 0
		es_rand bonus 5 19
		es_math currentmana + server_var(bonus)
		if (server_var(currentmana) <= server_var(maxmana)) do
		{
			es_keysetvalue dndExtra server_var(es_steamid) mana server_var(currentmana)
		}
		else do
		{
			es_keysetvalue dndExtra server_var(es_steamid) mana server_var(maxmana)
		}
		es_tell server_var(es_userid) #green You have gained server_var(bonus) mana from your mana potion.
		es_math manacount - 1
		es_math totalcount - 1
		es_keysetvalue dndExtra server_var(es_steamid) mmanaing server_var(manacount)
		es_keysetvalue dndExtra server_var(es_steamid) totalpot server_var(totalcount)
	}
}

block serious_heal
{
	es_setinfo es_userid 0
  	es_getcmduserid es_userid
	es_setinfo es_steamid 0
	es est_getsteam es_steamid server_var(es_userid)
	es_setinfo healcount 0
	es_keygetvalue healcount dndExtra server_var(es_steamid) shealing
	es_setinfo totalcount 0
	es_keygetvalue totalcount dndExtra server_var(es_steamid) totalpot
	es_setinfo maxlife 0
	es_keygetvalue maxlife dndExtra server_var(es_steamid) maxhealth
	es_setinfo currentlife 0
	es est_gethealth currentlife server_var(es_userid)
	if (server_var(healcount) >= 1) do
	{
		es_setinfo bonus 0
		es_rand bonus 8 29
		es_math currentlife + server_var(bonus)
		if (server_var(currentlife) <= server_var(maxlife)) do
		{
			es ma_sethealth server_var(es_userid) server_var(currentlife)
		}
		else do
		{
			es ma_sethealth server_var(es_userid) server_var(maxlife)
		}
		es_tell server_var(es_userid) #green You have gained server_var(bonus) health from your healing potion.
		es_math healcount - 1
		es_math totalcount - 1
		es_keysetvalue dndExtra server_var(es_steamid) shealing server_var(healcount)
		es_keysetvalue dndExtra server_var(es_steamid) totalpot server_var(totalcount)
	}
}

block serious_mana
{
	es_setinfo es_userid 0
  	es_getcmduserid es_userid
	es_setinfo es_steamid 0
	es est_getsteam es_steamid server_var(es_userid)
	es_setinfo manacount 0
	es_keygetvalue manacount dndExtra server_var(es_steamid) smanaing
	es_setinfo totalcount 0
	es_keygetvalue totalcount dndExtra server_var(es_steamid) totalpot
	es_setinfo maxmana 0
	es_keygetvalue maxmana dndExtra server_var(es_steamid) max_mana
	es_setinfo currentmana 0
	es_keygetvalue currentmana dndExtra server_var(es_steamid) mana
	if (server_var(manacount) >= 1) do
	{
		es_setinfo bonus 0
		es_rand bonus 8 29
		es_math currentmana + server_var(bonus)
		if (server_var(currentmana) <= server_var(maxmana)) do
		{
			es_keysetvalue dndExtra server_var(es_steamid) mana server_var(currentmana)
		}
		else do
		{
			es_keysetvalue dndExtra server_var(es_steamid) mana server_var(maxmana)
		}
		es_tell server_var(es_userid) #green You have gained server_var(bonus) mana from your mana potion.
		es_math manacount - 1
		es_math totalcount - 1
		es_keysetvalue dndExtra server_var(es_steamid) smanaing server_var(manacount)
		es_keysetvalue dndExtra server_var(es_steamid) totalpot server_var(totalcount)
	}
}

block lev1
{
	es_setinfo es_userid 0
  	es_getcmduserid es_userid
	es_setinfo es_steamid 0
	es est_getsteam es_steamid server_var(es_userid)
	es_setinfo rcheck 0
	es_keygetvalue rcheck dndUsers server_var(es_steamid) race
	if (server_var(rcheck) = filcher) do
	{
		es est_setgravity server_var(es_userid) .50
		es_tell server_var(es_userid) #green You gravity is now at 50%.
	}
	if (server_var(rcheck) = drow) do
	{
		es est_setgravity server_var(es_userid) .50
		es_tell server_var(es_userid) #green You gravity is now at 50%.
	}
	if (server_var(rcheck) = rok) do
	{
		es est_setgravity server_var(es_userid) .50
		es_tell server_var(es_userid) #green You gravity is now at 50%.
	}
	if (server_var(rcheck) = dragon) do
	{
		es est_setgravity server_var(es_userid) .50
		es_tell server_var(es_userid) #green You gravity is now at 50%.
	}
	if (server_var(rcheck) = vampire) do
	{
		es est_setgravity server_var(es_userid) .50
		es_tell server_var(es_userid) #green You gravity is now at 50%.
	}
	if (server_var(rcheck) = airele) do
	{
		es est_setgravity server_var(es_userid) .50
		es_tell server_var(es_userid) #green You gravity is now at 50%.
	}
	if (server_var(rcheck) = avariel) do
	{
		es est_setgravity server_var(es_userid) .50
		es_tell server_var(es_userid) #green You gravity is now at 50%.
	}
}

block lev2
{
	es_setinfo es_userid 0
  	es_getcmduserid es_userid
	es_setinfo es_steamid 0
	es est_getsteam es_steamid server_var(es_userid)
	es_setinfo rcheck 0
	es_keygetvalue rcheck dndUsers server_var(es_steamid) race
	if (server_var(rcheck) = filcher) do
	{
		es est_setgravity server_var(es_userid) .20
		es_tell server_var(es_userid) #green You gravity is now at 20%.
	}
	if (server_var(rcheck) = rok) do
	{
		es est_setgravity server_var(es_userid) .20
		es_tell server_var(es_userid) #green You gravity is now at 20%.
	}
	if (server_var(rcheck) = dragon) do
	{
		es est_setgravity server_var(es_userid) .20
		es_tell server_var(es_userid) #green You gravity is now at 20%.
	}
	if (server_var(rcheck) = vampire) do
	{
		es est_setgravity server_var(es_userid) .20
		es_tell server_var(es_userid) #green You gravity is now at 20%.
	}
	if (server_var(rcheck) = airele) do
	{
		es est_setgravity server_var(es_userid) .20
		es_tell server_var(es_userid) #green You gravity is now at 20%.
	}
	if (server_var(rcheck) = avariel) do
	{
		es est_setgravity server_var(es_userid) .20
		es_tell server_var(es_userid) #green You gravity is now at 20%.
	}
}

block lev3
{
	es_setinfo es_userid 0
  	es_getcmduserid es_userid
	es_setinfo es_steamid 0
	es est_getsteam es_steamid server_var(es_userid)
	es_setinfo rcheck 0
	es_keygetvalue rcheck dndUsers server_var(es_steamid) race
	if (server_var(rcheck) = rok) do
	{
		es est_setgravity server_var(es_userid) .01
		es_tell server_var(es_userid) #green You gravity is now at 01%.
	}
	if (server_var(rcheck) = dragon) do
	{
		es est_setgravity server_var(es_userid) .01
		es_tell server_var(es_userid) #green You gravity is now at 01%.
	}
	if (server_var(rcheck) = vampire) do
	{
		es est_setgravity server_var(es_userid) .01
		es_tell server_var(es_userid) #green You gravity is now at 01%.
	}
	if (server_var(rcheck) = airele) do
	{
		es est_setgravity server_var(es_userid) .01
		es_tell server_var(es_userid) #green You gravity is now at 01%.
	}
	if (server_var(rcheck) = avariel) do
	{
		es est_setgravity server_var(es_userid) .01
		es_tell server_var(es_userid) #green You gravity is now at 01%.
	}
}

event item_pickup
{
	if (event_var(item) = m3) do
	{
		es est_removeweapon event_var(userid) 1
		es_tell event_var(userid) #green That weapon is not aloud in this mod
	}
	if (event_var(item) = xm1014) do
	{		
		es est_removeweapon event_var(userid) 1
		es_tell event_var(userid) #green That weapon is not aloud in this mod
	}
	es_setinfo ccheck 0
	es_keygetvalue ccheck dndUsers event_var(es_steamid) class
	if (server_var(ccheck) = rogue) then es_doblock dnd/rogue_weapons
	if (server_var(ccheck) = wizard) then es_doblock dnd/wizard_weapons
	if (server_var(ccheck) = cleric) then es_doblock dnd/cleric_weapons
	if (server_var(ccheck) = fighter) then es_doblock dnd/fighter_weapons
	if (server_var(ccheck) = ranger) then es_doblock dnd/ranger_weapons
	if (server_var(ccheck) = monk) then es_doblock dnd/knife_only
	if (server_var(ccheck) = necromancer) then es_doblock dnd/necro_weapons
	if (server_var(ccheck) = bard) then es_doblock dnd/bard_weapons
	es_setinfo rcheck 0
	es_keygetvalue rcheck dndUsers event_var(es_steamid) race
	if (server_var(rcheck) = filcher) then es_doblock dnd/knife_only
	if (server_var(rcheck) = golem) then es_doblock dnd/knife_only
	if (server_var(rcheck) = giant) then es_doblock dnd/giant_weapons
	if (server_var(rcheck) = rabbit) then es_doblock dnd/knife_only
	if (server_var(rcheck) = basilisk) then es_doblock dnd/knife_only
	es_setinfo pcheck 0
	es_keygetvalue pcheck dndUsers event_var(es_steamid) prestige
	if (server_var(pcheck) = rpc3) then es_doblock dnd/knife_only
	if (server_var(pcheck) != rpc3) do
	{
		if (server_var(rcheck) != filcher) do
		{
			if (server_var(rcheck) != rabbit) do
			{
				es_doblock dnd/color
			}
			else do
			{
				es est_setplayercolor event_var(userid) 255 255 255 0
			}
		}
		else do
		{
			es est_setplayercolor event_var(userid) 255 255 255 0
		}
	}
	else do
	{
		es est_setplayercolor event_var(userid) 255 255 255 0
	}
	if (server_var(rcheck) = rok) then es_doblock dnd/rok_weapons
	if (server_var(rcheck) = tibbit) then es_doblock dnd/tibbit_weapons
	if (server_var(rcheck) = chaindevil) then es_doblock dnd/devil_weapons
	if (server_var(rcheck) = zombie) do
	{
		es est_setplayercolor event_var(userid) 0 0 0 255 1
		es_doblock dnd/knife_only
	}
	if (server_var(rcheck) = ghoul) do
	{
		es est_setplayercolor event_var(userid) 0 0 0 255 1
		es_doblock dnd/knife_only
	}
}

block giant_weapons
{
	es est_Removeweapon event_Var(userid) 1
	es est_Removeweapon event_Var(userid) 2
	es est_Removeweapon event_Var(userid) 3
	es est_Removeweapon event_Var(userid) 4
}

block devil_weapons
{
	es_setinfo gun2 0
	es est_GetSecondary gun2 event_var(userid)
	if (server_var(gun2) = weapon_deagle) do
	{
		es est_Removeweapon event_var(userid) 2
		es_tell event_var(userid) #green No deagle for the chain devil.
	}
	es est_Removeweapon event_var(userid) 1
}

block tibbit_weapons
{
	es_setinfo gun2 0
	es est_GetSecondary gun2 event_var(userid)
	es est_removeweapon event_var(userid) 1
	es_setinfo cat_check 0
	es_keygetvalue cat_check dndExtra event_var(es_steamid) cat
	if (server_var(gun2) != weapon_usp) do
	{
		if (server_var(cat_check) = 0) do
		{
			es est_removeweapon event_var(userid) 2
			es_tell event_var(userid) #green You may only use the USP and the knife!
		}
	}
	if (server_var(cat_check) = 1) do
	{
		es est_removeweapon event_var(userid) 2
		es est_removeweapon event_var(userid) 4
		es_tell event_var(userid) #green You may only use the knife when playing as a cat!
	}
}

block rok_weapons
{
	if (event_var(item) != scout) do
	{
		es est_removeweapon event_var(userid) 1
		es est_removeweapon event_var(userid) 2
		es est_removeweapon event_var(userid) 4
		es_tell event_var(userid) #green You race is not allowed to use that gun!
		es ma_give event_var(userid) weapon_scout
	}
}

block color
{
	es_setinfo stealth 0
	es_keygetvalue stealth dndExtra event_var(es_steamid) color
	es_setinfo allow 0
	es_keygetvalue allow dndExtra event_var(es_steamid) allow_color
	if (server_var(allow) = 0) do
	{
		es est_setplayercolor event_var(userid) 255 255 255 server_var(stealth) 1
	}
}

block color_attacker
{
	es_setinfo stealth 0
	es_keygetvalue stealth dndExtra event_var(es_attackersteamid) color
	es_setinfo allow 0
	es_keygetvalue allow dndExtra event_var(es_attackersteamid) allow_color
	if (server_var(allow) = 1) do
	{
		es est_setplayercolor event_var(attacker) 255 255 255 server_var(stealth) 1
	}
}

block knife_only
{
	es est_removeweapon event_var(userid) 1
	es est_removeweapon event_var(userid) 2
	es est_removeweapon event_var(userid) 4
	es_tell event_var(userid) #green You may only use the knife!	
}

block necro_weapons
{
	es_setinfo rcheck 0
	es_keygetvalue rcheck dndUsers event_var(es_steamid) race
	es_setinfo lcheck 0
	es_keygetvalue lcheck dndUsers event_var(es_steamid) necromancer
	if (event_var(item) = fiveseven) do
	{
		if (server_var(lcheck) < 15) do
		{
			es est_removeweapon event_var(userid) 2
		}
	}
	if (event_var(item) = elite) do
	{
		if (server_var(lcheck) < 15) do
		{
			es est_removeweapon event_var(userid) 2
		}
	}
	if (event_var(item) = deagle) do
	{
		es est_removeweapon event_var(userid) 2
	}
	if (event_var(item) = scout) do
	{
		if (server_var(rcheck) != elf) do
		{
			if (server_var(rcheck) != avariel) do
			{
				es est_removeweapon event_var(userid) 1
				es_tell event_var(userid) #green Your class is not allowed to use that gun!
			}
		}
	}
	if (event_var(item) = ak47) do
	{
		if (server_var(rcheck) != elf) do
		{
			es est_removeweapon event_var(userid) 1
			es_tell event_var(userid) #green Your class is not allowed to use that gun!
		}
	}
	if (event_var(item) = m4a1) do
	{
		if (server_var(rcheck) != elf) do
		{
			es est_removeweapon event_var(userid) 1
			es_tell event_var(userid) #green Your class is not allowed to use that gun!
		}
	}
	if (event_var(item) = awp) do
	{
		es est_removeweapon event_var(userid) 1
		es_tell event_var(userid) #green Your class is not allowed to use that gun!
	}
	if (event_var(item) = g3sg1) do
	{
		es est_removeweapon event_var(userid) 1
		es_tell event_var(userid) #green Your class is not allowed to use that gun!
	}
	if (event_var(item) = sg550) do
	{
		es est_removeweapon event_var(userid) 1
		es_tell event_var(userid) #green Your class is not allowed to use that gun!
	}
	if (event_var(item) = galil) do
	{
		es est_removeweapon event_var(userid) 1
		es_tell event_var(userid) #green Your class is not allowed to use that gun!
	}
	if (event_var(item) = famas) do
	{
		es est_removeweapon event_var(userid) 1
		es_tell event_var(userid) #green Your class is not allowed to use that gun!
	}
	if (event_var(item) = sg552) do
	{
		es est_removeweapon event_var(userid) 1
		es_tell event_var(userid) #green Your class is not allowed to use that gun!
	}
	if (event_var(item) = aug) do
	{
		es est_removeweapon event_var(userid) 1
		es_tell event_var(userid) #green Your class is not allowed to use that gun!
	}
	if (event_var(item) = m3) do
	{
		if (server_var(rcheck) != minotaur) do
		{
			es est_removeweapon event_var(userid) 1
			es_tell event_var(userid) #green Your class is not allowed to use that gun!
		}
	}
	if (event_var(item) = xm1014) do
	{
		if (server_var(rcheck) != minotaur) do
		{
			es est_removeweapon event_var(userid) 1
			es_tell event_var(userid) #green Your class is not allowed to use that gun!
		}
	}
	if (event_var(item) = mac10) do
	{
		es est_removeweapon event_var(userid) 1
		es_tell event_var(userid) #green Your class is not allowed to use that gun!
	}
	if (event_var(item) = tmp) do
	{
		es est_removeweapon event_var(userid) 1
		es_tell event_var(userid) #green Your class is not allowed to use that gun!
	}
	if (event_var(item) = mp5navy) do
	{
		if (server_var(rcheck) != tiefling) do
		{
			es est_removeweapon event_var(userid) 1
			es_tell event_var(userid) #green Your class is not allowed to use that gun!
		}
	}
	if (event_var(item) = ump45) do
	{
		if (server_var(rcheck) != aasimar) do
		{
			if (server_var(rcheck) != greyelf) do
			{
				es est_removeweapon event_var(userid) 1
				es_tell event_var(userid) #green Your class is not allowed to use that gun!
			}
		}
	}
	if (event_var(item) = p90) do
	{
		if (server_var(rcheck) != greyelf) do
		{
			es est_removeweapon event_var(userid) 1
			es_tell event_var(userid) #green Your class is not allowed to use that gun!
		}
	}
	if (event_var(item) = m249) do
	{
		if (server_var(rcheck) != minotaur) do
		{
			es est_removeweapon event_var(userid) 1
			es_tell event_var(userid) #green Your class is not allowed to use that gun!
		}
	}
}

block ranger_weapons
{
	es_setinfo scheck 0
	es_keygetvalue scheck dndExtra event_var(es_steamid) style
	if (server_var(scheck) = 0) do
	{
		es_setinfo scheck dual
		es_tell event_var(userid) #green You do not have a weapon style choosen! Use !dual or !archer in chat, while dead, to choose a combat style!
		es_tell event_var(userid) #green No weapon type choosen.... defaulting to dual
	}
	if (server_var(scheck) = dual) do
	{
		if (event_var(item) != knife) do
		{
			es est_removeweapon event_var(userid) 1
			es est_removeweapon event_var(userid) 4
			es_tell event_var(userid) #green You can only use elites and the knife as a dual weapons combatant!
		}
		if (event_var(item) = fiveseven) do
		{
			es est_removeweapon event_var(userid) 2
		}
		if (event_var(item) = usp) do
		{
			es est_removeweapon event_var(userid) 2
		}
		if (event_var(item) = glock) do
		{
			es est_removeweapon event_var(userid) 2
		}
		if (event_var(item) = deagle) do
		{
			es est_removeweapon event_var(userid) 2
		}
		if (event_var(item) = p228) do
		{
			es est_removeweapon event_var(userid) 2
		}
	}	
	if (server_var(scheck) = archer) do
	{
		if (event_var(item) != knife) do
		{
			es est_removeweapon event_var(userid) 2
			es est_removeweapon event_var(userid) 4
			es_tell event_var(userid) #green You may only use the scout and the knife as a archer combatant!
			if (event_var(item) != scout) do
			{
				es est_removeweapon event_var(userid) 1
				es ma_give event_var(userid) weapon_scout
			}
		}
	}
}


block fighter_weapons
{
	es_setinfo acheck 0
	es_keygetvalue acheck dndExtra event_var(es_steamid) awp
	if (event_var(item) = awp) do
	{
		if (server_var(acheck) = 0) do
		{
			es est_removeweapon event_var(userid) 1
			es_tell event_var(userid) #green Your class is not allowed to use that gun!
		}
	}
	es_setinfo pcheck 0
	es_keygetvalue pcheck dndUsers event_var(es_steamid) prestige
	es_setinfo lcheck 0
	if (server_var(pcheck) = fpc3) do
	{
		es_keygetvalue lcheck dndUsers event_var(es_steamid) server_var(pcheck)
	}
	if (event_var(item) = g3sg1) do
	{
		if (server_var(lcheck) = 0) do
		{
			es est_removeweapon event_var(userid) 1
			es_tell event_var(userid) #green Your class is not allowed to use that gun!
		}
	}
	if (event_var(item) = sg550) do
	{
		if (server_var(lcheck) = 0) do
		{
			es est_removeweapon event_var(userid) 1
			es_tell event_var(userid) #green Your class is not allowed to use that gun!
		}
	}
}

block rogue_weapons
{
	es_setinfo pcheck 0
	es_keygetvalue pcheck dndUsers event_var(es_steamid) prestige
	if (server_var(pcheck) = rpc3) do
	{
		es_setinfo plcheck 0
		es_keygetvalue plcheck dndUsers event_var(es_steamid) server_var(pcheck)
		if (server_var(plcheck) >= 1) do
		{
			es_doblock dnd/knife_only
		}
	}

	es_setinfo rcheck 0
	es_keygetvalue rcheck dndUsers event_var(es_steamid) race
	if (event_var(item) = ak47) do
	{
		if (server_var(rcheck) != elf) do
		{
			es est_removeweapon event_var(userid) 1
			es_tell event_var(userid) #green Your class is not allowed to use that gun!
		}
	}
	if (event_var(item) = p90) do
	{
		if (server_var(rcheck) != greyelf) do
		{
			es est_removeweapon event_var(userid) 1
			es_tell event_var(userid) #green Your class is not allowed to use that gun!
		}
	}
	if (event_var(item) = m4a1) do
	{
		if (server_var(rcheck) != elf) do
		{
			es est_removeweapon event_var(userid) 1
			es_tell event_var(userid) #green Your class is not allowed to use that gun!
		}
	}
	if (event_var(item) = awp) do
	{
		es est_removeweapon event_var(userid) 1
		es_tell event_var(userid) #green Your class is not allowed to use that gun!
	}
	if (event_var(item) = g3sg1) do
	{
		es est_removeweapon event_var(userid) 1
		es_tell event_var(userid) #green Your class is not allowed to use that gun!
	}
	if (event_var(item) = sg550) do
	{
		es est_removeweapon event_var(userid) 1
		es_tell event_var(userid) #green Your class is not allowed to use that gun!
	}
	if (event_var(item) = galil) do
	{
		es est_removeweapon event_var(userid) 1
		es_tell event_var(userid) #green Your class is not allowed to use that gun!
	}
	if (event_var(item) = famas) do
	{
		es est_removeweapon event_var(userid) 1
		es_tell event_var(userid) #green Your class is not allowed to use that gun!
	}
	if (event_var(item) = sg552) do
	{
		es est_removeweapon event_var(userid) 1
		es_tell event_var(userid) #green Your class is not allowed to use that gun!
	}
	if (event_var(item) = aug) do
	{
		es est_removeweapon event_var(userid) 1
		es_tell event_var(userid) #green Your class is not allowed to use that gun!
	}
	if (event_var(item) = m3) do
	{
		if (server_var(rcheck) != minotaur) do
		{
			es est_removeweapon event_var(userid) 1
			es_tell event_var(userid) #green Your class is not allowed to use that gun!
		}
	}
	if (event_var(item) = xm1014) do
	{
		if (server_var(rcheck) != minotaur) do
		{
			es est_removeweapon event_var(userid) 1
			es_tell event_var(userid) #green Your class is not allowed to use that gun!
		}
	}
	if (event_var(item) = m249) do
	{
		if (server_var(rcheck) != minotaur) do
		{
			es est_removeweapon event_var(userid) 1
			es_tell event_var(userid) #green Your class is not allowed to use that gun!
		}
	}
}

block bard_weapons
{
	es_setinfo rcheck 0
	es_keygetvalue rcheck dndUsers event_var(es_steamid) race
	if (event_var(item) = ak47) do
	{
		if (server_var(rcheck) != elf) do
		{
			es est_removeweapon event_var(userid) 1
			es_tell event_var(userid) #green Your class is not allowed to use that gun!
		}
	}
	if (event_var(item) = m4a1) do
	{
		if (server_var(rcheck) != elf) do
		{
			es est_removeweapon event_var(userid) 1
			es_tell event_var(userid) #green Your class is not allowed to use that gun!
		}
	}
	if (event_var(item) = awp) do
	{
		es est_removeweapon event_var(userid) 1
		es_tell event_var(userid) #green Your class is not allowed to use that gun!
	}
	if (event_var(item) = g3sg1) do
	{
		es est_removeweapon event_var(userid) 1
		es_tell event_var(userid) #green Your class is not allowed to use that gun!
	}
	if (event_var(item) = sg550) do
	{
		es est_removeweapon event_var(userid) 1
		es_tell event_var(userid) #green Your class is not allowed to use that gun!
	}
	if (event_var(item) = sg552) do
	{
		es est_removeweapon event_var(userid) 1
		es_tell event_var(userid) #green Your class is not allowed to use that gun!
	}
	if (event_var(item) = aug) do
	{
		es est_removeweapon event_var(userid) 1
		es_tell event_var(userid) #green Your class is not allowed to use that gun!
	}
	if (event_var(item) = m3) do
	{
		if (server_var(rcheck) != minotaur) do
		{
			es est_removeweapon event_var(userid) 1
			es_tell event_var(userid) #green Your class is not allowed to use that gun!
		}
	}
	if (event_var(item) = xm1014) do
	{
		if (server_var(rcheck) != minotaur) do
		{
			es est_removeweapon event_var(userid) 1
			es_tell event_var(userid) #green Your class is not allowed to use that gun!
		}
	}
	if (event_var(item) = m249) do
	{
		if (server_var(rcheck) != minotaur) do
		{
			es est_removeweapon event_var(userid) 1
			es_tell event_var(userid) #green Your class is not allowed to use that gun!
		}
	}
}

block wizard_weapons
{
	es_setinfo pcheck 0
	es_keygetvalue pcheck dndUsers event_var(es_steamid) prestige
	es_setinfo rcheck 0
	es_keygetvalue rcheck dndUsers event_var(es_steamid) race
	if (event_var(item) = scout) do
	{
		if (server_var(rcheck) != elf) do
		{
			if (server_var(rcheck) != avariel) do
			{
				es est_removeweapon event_var(userid) 1
				es_tell event_var(userid) #green Your class is not allowed to use that gun!
			}
		}
	}
	if (event_var(item) = ak47) do
	{
		if (server_var(rcheck) != elf) do
		{
			es est_removeweapon event_var(userid) 1
			es_tell event_var(userid) #green Your class is not allowed to use that gun!
		}
	}
	if (event_var(item) = m4a1) do
	{
		if (server_var(rcheck) != elf) do
		{
			es est_removeweapon event_var(userid) 1
			es_tell event_var(userid) #green Your class is not allowed to use that gun!
		}
	}
	if (event_var(item) = awp) do
	{
		es est_removeweapon event_var(userid) 1
		es_tell event_var(userid) #green Your class is not allowed to use that gun!
	}
	if (event_var(item) = g3sg1) do
	{
		es est_removeweapon event_var(userid) 1
		es_tell event_var(userid) #green Your class is not allowed to use that gun!
	}
	if (event_var(item) = sg550) do
	{
		es est_removeweapon event_var(userid) 1
		es_tell event_var(userid) #green Your class is not allowed to use that gun!
	}
	if (event_var(item) = galil) do
	{
		es est_removeweapon event_var(userid) 1
		es_tell event_var(userid) #green Your class is not allowed to use that gun!
	}
	if (event_var(item) = famas) do
	{
		es est_removeweapon event_var(userid) 1
		es_tell event_var(userid) #green Your class is not allowed to use that gun!
	}
	if (event_var(item) = sg552) do
	{
		es est_removeweapon event_var(userid) 1
		es_tell event_var(userid) #green Your class is not allowed to use that gun!
	}
	if (event_var(item) = aug) do
	{
		es est_removeweapon event_var(userid) 1
		es_tell event_var(userid) #green Your class is not allowed to use that gun!
	}
	if (event_var(item) = m3) do
	{
		if (server_var(rcheck) != minotaur) do
		{
			es est_removeweapon event_var(userid) 1
			es_tell event_var(userid) #green Your class is not allowed to use that gun!
		}
	}
	if (event_var(item) = xm1014) do
	{
		if (server_var(rcheck) != minotaur) do
		{
			es est_removeweapon event_var(userid) 1
			es_tell event_var(userid) #green Your class is not allowed to use that gun!
		}
	}
	if (event_var(item) = mac10) do
	{
		if (server_var(pcheck) != wpc1) do
		{
			es est_removeweapon event_var(userid) 1
			es_tell event_var(userid) #green Your class is not allowed to use that gun!
		}
	}
	if (event_var(item) = tmp) do
	{
		if (server_var(pcheck) != wpc1) do
		{
			es est_removeweapon event_var(userid) 1
			es_tell event_var(userid) #green Your class is not allowed to use that gun!
		}
	}
	if (event_var(item) = mp5navy) do
	{
		if (server_var(rcheck) != tiefling) do
		{
			es est_removeweapon event_var(userid) 1
			es_tell event_var(userid) #green Your class is not allowed to use that gun!
		}
	}
	if (event_var(item) = ump45) do
	{
		if (server_var(rcheck) != aasimar) do
		{
			if (server_var(rcheck) != greyelf) do
			{
				es est_removeweapon event_var(userid) 1
				es_tell event_var(userid) #green Your class is not allowed to use that gun!
			}
		}
	}
	if (event_var(item) = p90) do
	{
		if (server_var(rcheck) != greyelf) do
		{
			es est_removeweapon event_var(userid) 1
			es_tell event_var(userid) #green Your class is not allowed to use that gun!
		}
	}
	if (event_var(item) = m249) do
	{
		if (server_var(rcheck) != minotaur) do
		{
			es est_removeweapon event_var(userid) 1
			es_tell event_var(userid) #green Your class is not allowed to use that gun!
		}
	}
	if (event_var(item) = deagle) do
	{
		es est_removeweapon event_var(userid) 2
		es_tell event_var(userid) #green Your class is not allowed to use that gun!
	}
}

block cleric_weapons
{
	es_setinfo rcheck 0
	es_keygetvalue rcheck dndUsers event_var(es_steamid) race
	if (event_var(item) = scout) do
	{
		if (server_var(rcheck) != elf) do
		{
			if (server_var(rcheck) != avariel) do
			{
				es est_removeweapon event_var(userid) 1
				es_tell event_var(userid) #green Your class is not allowed to use that gun!
			}
		}
	}
	es_setinfo astral_check 0
	es_keygetvalue astral_check dndExtra event_var(es_steamid) astral
	if (server_var(astral_check) = 1) do
	{
		es est_removeweapon event_var(userid) 1
		es est_removeweapon event_var(userid) 2
		es est_removeweapon event_var(userid) 3
		es est_removeweapon event_var(userid) 4
	}
	es_setinfo weapons 0
	es_setinfo pcheck 0
	es_keygetvalue pcheck dndUsers event_var(es_steamid) prestige
	if (server_var(pcheck) = cpc1) do
	{
		es_setinfo plcheck 0
		es_keygetvalue plcheck dndUsers event_var(es_steamid) server_var(pcheck)
		if (server_var(plcheck) >= 1) do
		{
			es_setinfo weapons 1
		}
		if (server_var(plcheck) >= 5) do
		{
			es_math weapons + 1
		}
		if (server_var(plcheck) >= 10) do
		{
			es_math weapons + 1
		}
	}
	if (event_var(item) = mac10) do
	{
		es est_removeweapon event_var(userid) 1
		es_tell event_var(userid) #green Your class is not allowed to use that gun!
	}
	if (event_var(item) = tmp) do
	{
		es est_removeweapon event_var(userid) 1
		es_tell event_var(userid) #green Your class is not allowed to use that gun!
	}
	if (event_var(item) = mp5navy) do
	{
		if (server_var(rcheck) != tiefling) do
		{
			es est_removeweapon event_var(userid) 1
			es_tell event_var(userid) #green Your class is not allowed to use that gun!
		}
	}
	if (event_var(item) = ump45) do
	{
		if (server_var(rcheck) != aasimar) do
		{
			if (server_var(rcheck) != greyelf) do
			{
				es est_removeweapon event_var(userid) 1
				es_tell event_var(userid) #green Your class is not allowed to use that gun!
			}
		}
	}
	if (event_var(item) = p90) do
	{
		if (server_var(weapons) <= 0) do
		{
			if (server_var(rcheck) != greyelf) do
			{
				es est_removeweapon event_var(userid) 1
				es_tell event_var(userid) #green Your class is not allowed to use that gun!
			}
		}
	}
	if (event_var(item) = awp) do
	{
		if (server_var(weapons) <= 2) do
		{
			es est_removeweapon event_var(userid) 1
			es_tell event_var(userid) #green Your class is not allowed to use that gun!
		}
	}
	if (event_var(item) = g3sg1) do
	{
		es est_removeweapon event_var(userid) 1
		es_tell event_var(userid) #green Your class is not allowed to use that gun!
	}
	if (event_var(item) = sg550) do
	{
		es est_removeweapon event_var(userid) 1
		es_tell event_var(userid) #green Your class is not allowed to use that gun!
	}
	if (event_var(item) = m4a1) do
	{
		if (server_var(rcheck) != elf) do
		{
			if (server_var(weapons) <= 1) do
			{
				es est_removeweapon event_var(userid) 1
				es_tell event_var(userid) #green Your class is not allowed to use that gun!
			}
		}
	}
	if (event_var(item) = sg552) do
	{
		es est_removeweapon event_var(userid) 1
		es_tell event_var(userid) #green Your class is not allowed to use that gun!
	}
	if (event_var(item) = aug) do
	{
		es est_removeweapon event_var(userid) 1
		es_tell event_var(userid) #green Your class is not allowed to use that gun!
	}
	if (event_var(item) = ak47) do
	{
		if (server_var(rcheck) != elf) do
		{
			if (server_var(weapons) <= 1) do
			{
				es est_removeweapon event_var(userid) 1
				es_tell event_var(userid) #green Your class is not allowed to use that gun!
			}
		}
	}
}

event player_say
{
	es_setinfo ccheck 0
	es_keygetvalue ccheck dndUsers event_var(es_steamid) class
	if (server_var(ccheck) = fighter) then es_doblock dnd/fighter_say
	if (server_var(ccheck) = rogue) then es_doblock dnd/rogue_say
	if (server_var(ccheck) = wizard) then es_doblock dnd/wizard_say
	if (server_var(ccheck) = cleric) then es_doblock dnd/cleric_say
	if (server_var(ccheck) = paladin) then es_doblock dnd/paladin_say
	if (server_var(ccheck) = ranger) then es_doblock dnd/ranger_say
	if (server_var(ccheck) = monk) then es_doblock dnd/monk_say
	if (server_var(ccheck) = necromancer) then es_doblock dnd/necro_say
	if (server_var(ccheck) = bard) then es_doblock dnd/bard_say
	es_setinfo rcheck 0
	if (event_var(text) = !menu) do
	{
                es unsend event_var(userid)
		es popup send mainmenu event_var(userid)
	}
	if (event_var(text) = !good) do
	{
		if (event_var(es_userdead) = 1) do
		{
			es_keysetvalue dndExtra event_var(es_steamid) algin good
			es_tell event_var(userid) #green You are now good!
		}
		else do
		{
			es_tell event_var(userid) #green You can't change alginment while alive!
		}
	}
	if (event_var(text) = !evil) do
	{
		if (event_var(es_userdead) = 1) do
		{
			es_keysetvalue dndExtra event_var(es_steamid) algin evil
			es_tell event_var(userid) #green You are now evil!
		}
		else do
		{
			es_tell event_var(userid) #green You can't change alginment while alive!
		}
	}
}

block player_stats
{
	es_setinfo menu_steam 0
	es est_getsteam menu_steam server_var(_popup_userid)
	es_setinfo xpcheck 0
	es_keygetvalue xpcheck dndUsers server_var(menu_steam) curxp
	es_setinfo currentxp 0
	es_keygetvalue currentxp dndUsers server_var(menu_steam) server_var(xpcheck)
	es_setinfo rcheck 0
	es_keygetvalue rcheck dndUsers server_var(menu_steam) race
	es_setinfo ccheck 0
	es_keygetvalue ccheck dndUsers server_var(menu_steam) class
	es_setinfo pcheck 0
	es_keygetvalue pcheck dndUsers server_var(menu_steam) prestige
	es_setinfo lcheck 0
	es_keygetvalue lcheck dndUsers server_var(menu_steam) server_var(ccheck)
	es_setinfo lacheck 0
	es_keygetvalue lacheck dndUsers server_var(menu_steam) la
	es_setinfo player_stats "Player Stats:\n"
	if (server_var(pcheck) != 0) do
	{
		es_setinfo plcheck 0
		es_keygetvalue plcheck dndUsers server_var(menu_steam) server_var(pcheck)
		es_setinfo plevel 0
		es_setinfo plevel server_var(plcheck)
		es_math plevel - server_var(lacheck)
		if (server_var(pcheck) = fpc1) then es_setinfo lcheck 5
		if (server_var(pcheck) = rpc1) then es_setinfo lcheck 5
		if (server_var(pcheck) = wpc1) then es_setinfo lcheck 5
		if (server_var(pcheck) = cpc1) then es_setinfo lcheck 5
		if (server_var(pcheck) = fpc2) then es_setinfo lcheck 10
		if (server_var(pcheck) = rpc2) then es_setinfo lcheck 10
		if (server_var(pcheck) = wpc2) then es_setinfo lcheck 10
		if (server_var(pcheck) = cpc2) then es_setinfo lcheck 10
		if (server_var(pcheck) = fpc3) then es_setinfo lcheck 15
		if (server_var(pcheck) = rpc3) then es_setinfo lcheck 15
		if (server_var(pcheck) = wpc3) then es_setinfo lcheck 15
		if (server_var(pcheck) = cpc3) then es_setinfo lcheck 15
	}
	es_setinfo level server_var(lcheck)
	if (server_var(pcheck) = 0) do
	{
		es_math level - server_var(lacheck)
	}
	if (server_var(ccheck) != 0) do
	{
		es_format player_stats "%1 Race: %2\n Class: %3\n Level: %4\n" server_var(player_stats) server_var(rcheck) server_var(ccheck) server_var(level)
	}
	else do
	{
		es_format player_stats "%1 Race: %2\n" server_var(player_stats) server_var(rcheck)
	}
	es_setinfo mcheck 0
	es_keygetvalue mcheck dndUsers server_var(menu_steam) monster
	if (server_var(pcheck) = 0) do
	{
		if (server_var(ccheck) != 0) do
		{
			es_setinfo xpneeded server_var(lcheck)
			es_math xpneeded * server_var(classlevel)
			es_format player_stats "%1 Xp: %2 / %3\n" server_var(player_stats) server_var(currentxp) server_var(xpneeded)
		}
		if (server_var(mcheck) = 1) do
		{
			es_setinfo xpneeded server_var(monster_levelxp)
			es_format player_stats "%1 Xp: %2 / %3\n" server_var(player_stats) server_var(currentxp) server_var(xpneeded)
		}
	}
	if (server_var(pcheck) != 0) do
	{
		es_setinfo xpneeded 0
		es_setinfo xpneeded server_var(plcheck)
		es_math xpneeded + server_var(lcheck)
		es_math xpneeded * server_var(prestigelevel)
		if (server_var(pcheck) = fpc1) then es_setinfo pcheck Grenadier
		if (server_var(pcheck) = rpc1) then es_setinfo pcheck Acrobat
		if (server_var(pcheck) = wpc1) then es_setinfo pcheck "War Mage"
		if (server_var(pcheck) = cpc1) then es_setinfo pcheck "War Priest"
		if (server_var(pcheck) = fpc2) then es_setinfo pcheck "Kensai"
		if (server_var(pcheck) = rpc2) then es_setinfo pcheck Assassin
		if (server_var(pcheck) = wpc2) then es_setinfo pcheck "Mage of Arcane Order"
		if (server_var(pcheck) = cpc2) then es_setinfo pcheck "Divine Oracle"
		if (server_var(pcheck) = fpc3) then es_setinfo pcheck "Exotic Weapons Master"
		if (server_var(pcheck) = rpc3) then es_setinfo pcheck "Shadow Dancer"
		if (server_var(pcheck) = wpc3) then es_setinfo pcheck "Arch Mage"
		if (server_var(pcheck) = cpc3) then es_setinfo pcheck Hierophant
		es_format player_stats "%1 Prestige: %2\n Level: %3\n Xp: %4 / %5\n" server_var(player_stats) server_var(pcheck) server_var(plevel) server_var(currentxp) server_var(xpneeded)
	}
	es_setinfo bcheck 0
	es_keygetvalue bcheck dndUsers server_var(menu_steam) bonus
	es_format player_stats "%1 Bonus Points: %2" server_var(player_stats) server_var(bcheck)
	esnq ma_msay 0 server_var(_popup_userid) server_var(player_stats)
}

block weapons_list
{
	es_setinfo menu_steam 0
	es est_getsteam menu_steam server_var(_popup_userid)
	es_setinfo ccheck 0
	es_keygetvalue ccheck dndUsers server_var(menu_steam) class
	es_setinfo lcheck 0
	es_keygetvalue lcheck dndUsers server_var(menu_steam) server_var(ccheck)
	es_setinfo lacheck 0
	es_keygetvalue lacheck dndUsers server_var(menu_steam) la
	es_math lcheck - server_var(lacheck)
	es_setinfo rcheck 0
	es_keygetvalue rcheck dndUsers server_var(menu_steam) race
	es_setinfo pcheck 0
	es_keygetvalue pcheck dndUsers server_var(menu_steam) prestige
	es_setinfo plcheck 0
	es_keygetvalue plcheck dndUsers server_var(menu_steam) server_var(pcheck)
	es_setinfo weapons 0
	if (server_var(ccheck) = fighter) do
	{
		es_setinfo weapons "Fighter's Weapons Allowed:\n Fighter's can use any guns excluding the following:\n"
		if (server_var(lcheck) < 10) do
		{
			es_format weapons "%1 AWP\n" server_var(weapons)
		}
		if (server_var(pcheck) != fpc3) do
		{
			if (server_var(plcheck) >= 1) do
			{
				es_format weapons "%1 Auto Snipers\n" server_var(weapons)
			}
		}
	}
	if (server_var(ccheck) = rogue) do
	{
		es_setinfo weapons "Rogue's Weapons Allowed:\n All Pistols\n Mp5\n UMP\n TMP\n Mac10\n Scout Sniper Rifle\n"
		if (server_var(rcheck) = elf) do
		{
			es_format weapons "%1 M4A1\n AK47\n" server_var(weapons)
		}
		if (server_var(rcheck) = minotaur) do
		{
			es_format weapons "%1 M249\n" server_var(weapons)
		}
		if (server_var(rcheck) = greyelf) do
		{
			es_format weapons "%1 P90\n" server_var(weapons)
		}
		if (server_var(pcheck) = rpc3) do
		{
			if (server_var(plcheck) >= 1) do
			{
				es_format weapons "You may only use the knife!"
			}
		}
	}
	if (server_var(ccheck) = wizard) do
	{
		es_setinfo weapons "Wizard's Weapons Allowed:\n USP\n Glock\n P228\n Dual Elites\n Fiveseven\n"
		if (server_var(rcheck) = elf) do
		{
			es_format weapons "%1 M4A1\n AK47\n Scout Sniper Rifle\n" server_var(weapons)
		}
		if (server_var(rcheck) = greyelf) do
		{
			es_format weapons "%1 P90\n UMP\n" server_var(weapons)
		}
		if (server_var(rcheck) = minotaur) do
		{
			es_format weapons "%1 M249\n" server_var(weapons)
		}
		if (server_var(rcheck) = aasimar) do
		{
			es_format weapons "%1 Ump45\n" server_var(weapons)			
		}
		if (server_var(rcheck) = tiefling) do
		{
			es_format weapons "%1 Mp5Navy\n" server_var(weapons)			
		}
		if (server_var(rcheck) = avariel) do
		{
			es_format weapons "%1 Scout\n" server_var(weapons)
		}
		if (server_var(pcheck) = wpc1) do
		{
			es_format weapons "%1 TMP\n Mac10\n Scout Sniper Rifle\n" server_var(weapons)
		}
	}
	if (server_var(ccheck) = cleric) do
	{
		es_setinfo weapons "Cleric's Weapons Allowed:\n All Pistols\n Famas\n Galil\n M249\n"
		if (server_var(rcheck) = elf) do
		{
			es_format weapons "%1 M4A1\n AK47\n Scout Sniper Rifle\n" server_var(weapons)
		}
		if (server_var(rcheck) = aasimar) do
		{
			es_format weapons "%1 Ump45\n" server_var(weapons)			
		}
		if (server_var(rcheck) = tiefling) do
		{
			es_format weapons "%1 Mp5Navy\n" server_var(weapons)			
		}
		if (server_var(rcheck) = greyelf) do
		{
			es_format weapons "%1 P90\n UMP\n" server_var(weapons)
		}
		if (server_var(rcheck) = avariel) do
		{
			es_format weapons "%1 Scout\n" server_var(weapons)
		}
		if (server_var(pcheck) = cpc1) do
		{
			if (server_var(plcheck) >= 1) do
			{
				es_format weapons "%1 P90\n" server_var(weapons)
			}
			if (server_var(plcheck) >= 5) do
			{
				es_format weapons "%1 M4\n Ak47\n" server_var(weapons)
			}
			if (server_var(plcheck) >= 10) do
			{
				es_format weapons "%1 AWP Sniper Rifle\n" server_var(weapons)
			}
		}
	}
	if (server_var(ccheck) = paladin) do
	{
		es_setinfo weapons "Paladin Weapons:\n All Weapons"
	}
	if (server_var(ccheck) = monk) do
	{
		es_setinfo weapons "Knife Only"
	}
	if (server_var(ccheck) = ranger) do
	{
		es_setinfo weapons "Ranger Weapons:\n Knife\n"
		es_Setinfo scheck 0
		es_keygetvalue scheck dndExtra server_var(menu_steam) style
		if (server_var(scheck) = 0) then es_setinfo scheck dual
		if (server_var(scheck) = dual) do
		{
			es_format weapons "%1 Dualies\n" server_var(weapons)
		}
		if (server_var(scheck) = archer) do
		{
			es_format weapons "%1 Scout Sniper Rifle\n" server_var(weapons)
		}
	}
	if (server_var(ccheck) = necromancer) do
	{
		es_setinfo weapons "NecroMancer's Weapons Allowed:\n USP\n Glock\n P228\n"
		if (server_var(lcheck) >= 15) do
		{
			es_format weapons "%1 Fiveseven\n Elite\n" server_var(weapons)
		}
		if (server_var(rcheck) = elf) do
		{
			es_format weapons "%1 M4A1\n AK47\n Scout Sniper Rifle\n" server_var(weapons)
		}
		if (server_var(rcheck) = greyelf) do
		{
			es_format weapons "%1 P90\n UMP\n" server_var(weapons)
		}
		if (server_var(rcheck) = minotaur) do
		{
			es_format weapons "%1 M249\n" server_var(weapons)
		}
		if (server_var(rcheck) = aasimar) do
		{
			es_format weapons "%1 Ump45\n" server_var(weapons)			
		}
		if (server_var(rcheck) = tiefling) do
		{
			es_format weapons "%1 Mp5Navy\n" server_var(weapons)			
		}
		if (server_var(rcheck) = avariel) do
		{
			es_format weapons "%1 Scout\n" server_var(weapons)
		}
	}
	if (server_var(ccheck) = bard) do
	{
		es_setinfo weapons "Bard's Weapons Allowed:\n All Pistols\n All SMGs\n Scout Sniper Rifle\n Gali\n Famas\n"
		if (server_var(rcheck) = elf) do
		{
			es_format weapons "%1 M4A1\n AK47\n Scout Sniper Rifle\n" server_var(weapons)
		}
		if (server_var(rcheck) = minotaur) do
		{
			es_format weapons "%1 M249\n" server_var(weapons)
		}
	}
	esnq ma_msay 0 server_var(_popup_userid) server_var(weapons)
}

block player_reset
{
	es_setinfo random 0
	es_keysetvalue dndExtra event_var(es_steamid) mana 0
	es_keysetvalue dndExtra event_var(es_steamid) color 255
	es_keysetvalue dndExtra event_var(es_steamid) speed 1.01
	es_keysetvalue dndExtra event_var(es_steamid) sneakdice 0
	es_keysetvalue dndExtra event_var(es_steamid) divine 0
	es_keysetvalue dndExtra event_var(es_steamid) shield 0
	es_keysetvalue dndExtra event_var(es_steamid) flame 0
	es_keysetvalue dndExtra event_var(es_steamid) health 0
	es_keysetvalue dndExtra event_var(es_steamid) armor 0
	es_keysetvalue dndExtra event_var(es_steamid) regen 0
	es_keysetvalue dndExtra event_var(es_steamid) cat 0
	es_keysetvalue dndExtra event_var(es_steamid) escape_timer 0
	es_keysetvalue dndExtra event_var(es_steamid) delay_speed 0
	es_keysetvalue dndExtra event_var(es_steamid) delay_gaze 0
	es_keysetvalue dndExtra event_var(es_steamid) arearegen 0
	es_keysetvalue dndExtra event_var(es_steamid) maxhealth 100
	es_keysetvalue dndExtra event_var(es_steamid) allow_color 0
	es_keysetvalue dndExtra event_var(es_steamid) sneak 0
	es_keysetvalue dndExtra event_var(es_steamid) kendmg 0
	es_keysetvalue dndExtra event_var(es_steamid) kendrunk 0
	es_keysetvalue dndExtra event_var(es_steamid) kendisarm 0
	es_keysetvalue dndExtra event_var(es_steamid) kenfreeze 0
	es_keysetvalue dndExtra event_var(es_steamid) kenfire 0
	es_keysetvalue dndExtra event_var(es_steamid) kenvision 0
	es_keysetvalue dndExtra event_var(es_steamid) kenantis 0
	es_keysetvalue dndExtra event_var(es_steamid) kenleech 0
	es_keysetvalue dndExtra event_var(es_steamid) kenmana 0
	es_setinfo gun1 0
	es_setinfo gun2 0
	es est_GetPrimary gun1 event_var(userid)
	es est_GetSecondary gun2 event_var(userid)
	es est_removeweapon event_var(userid) 1
	es est_removeweapon event_var(userid) 2
	es ma_give event_var(userid) server_var(gun1)
	es ma_give event_var(userid) server_var(gun2)
	es est_setgravity event_var(userid) 1.00
	es est_god event_var(userid) 0
}

event player_spawn
{	
	es_doblock dnd/player_reset
	es_tell event_var(userid) #lightgreen Use !menu in console to bring up the command menu.
	if (server_var(zombie_start) = 0) do
	{
		es_keysetvalue dndExtra event_var(es_steamid) res_count 0
		es_setinfo zcheck 0
		es_keygetvalue zcheck dndExtra event_var(es_steamid) zombie
		if (server_var(zcheck) = 1) do
		{
			es_setinfo race 0
			es_setinfo class 0
			es_setinfo prestige 0
			es_setinfo monster 0
			es_setinfo curxp 0
			es_setinfo la 0
			es_keygetvalue la dndExtra event_var(es_steamid) la
			es_keygetvalue race dndExtra event_var(es_steamid) race
			es_keygetvalue class dndExtra event_var(es_steamid) class
			es_keygetvalue prestige dndExtra event_var(es_steamid) prestige
			es_keygetvalue monster dndExtra event_var(es_steamid) monster
			es_keygetvalue curxp dndExtra event_var(es_steamid) curxp
			es_keysetvalue dndUsers event_var(es_steamid) la server_var(la)
			es_keysetvalue dndUsers event_var(es_steamid) race server_var(race)
			es_keysetvalue dndUsers event_var(es_steamid) class server_var(class)
			es_keysetvalue dndUsers event_var(es_steamid) prestige server_var(prestige)
			es_keysetvalue dndUsers event_var(es_steamid) monster server_var(monster)
			es_keysetvalue dndUsers event_var(es_steamid) curxp server_var(curxp)
			es_keysetvalue dndExtra event_var(es_steamid) zombie 0
			es_tell event_var(userid) #green You are no longer a zombie.
			if (event_var(es_userteam) = 2) then es ma_give event_var(userid) weapon_glock
			if (event_var(es_userteam) = 3) then es ma_give event_var(userid) weapon_usp
			es_setinfo rcheck server_var(race)
			es_setinfo ccheck server_var(class)
			es_setinfo pcheck server_var(prestige)
		}
		es_setinfo delay_race 0
		es_keygetvalue delay_race dndExtra event_var(es_steamid) delay_race
		if (server_var(delay_race) != 0) do
		{
			es_setinfo delay_la 0
			es_setinfo delay_monster 0
			es_setinfo delay_xp 0
			es_keygetvalue delay_la dndExtra event_var(es_steamid) delay_la
			es_keygetvalue delay_monster dndExtra event_var(es_steamid) delay_monster
			es_keygetvalue delay_xp dndExtra event_var(es_steamid) delay_xp
			es_keysetvalue dndUsers event_var(es_steamid) race server_var(delay_race)
			es_keysetvalue dndUsers event_var(es_steamid) la server_var(delay_la)
			es_keysetvalue dndUsers event_var(es_steamid) monster server_var(delay_monster)
			es_keysetvalue dndExtra event_var(es_steamid) delay_race 0
			es_keysetvalue dndExtra event_var(es_steamid) delay_la 0
			es_keysetvalue dndExtra event_var(es_steamid) delay_monster 0
			if (server_var(delay_xp) != 0) do
			{
				es_keysetvalue dndUsers event_var(es_steamid) curxp server_var(delay_xp)
				es_keysetvalue dndExtra event_var(es_steamid) delay_xp 0
			}
		}
		es_setinfo delay_class 0
		es_keygetvalue delay_class dndExtra event_var(es_steamid) delay_class
		if (server_var(delay_class) != 0) do
		{
			es_setinfo delay_xp 0
			es_setinfo delay_prestige 0
			es_keygetvalue delay_xp dndExtra event_var(es_steamid) delay_xp
			es_keygetvalue delay_prestige dndExtra event_var(es_steamid) delay_prestige
			es_keysetvalue dndUsers event_var(es_steamid) class server_var(delay_class)
			es_keysetvalue dndUsers event_var(es_steamid) curxp server_var(delay_xp)
			es_keysetvalue dndUsers event_var(es_steamid) prestige server_var(delay_prestige)
			es_keysetvalue dndExtra event_var(es_steamid) delay_class 0
			es_keysetvalue dndExtra event_var(es_steamid) delay_xp 0
			es_keysetvalue dndExtra event_var(es_steamid) delay_prestige 0
		}
		es_setinfo delay_prestige 0
		es_keygetvalue delay_prestige dndExtra event_var(es_steamid) delay_prestige
		if (server_var(delay_prestige) != 0) do
		{
			es_setinfo delay_xp 0
			es_keygetvalue delay_xp dndExtra event_var(es_steamid) delay_xp
			es_keysetvalue dndUsers event_var(es_steamid) curxp server_var(delay_xp)
			es_keysetvalue dndUsers event_var(es_steamid) prestige server_var(delay_prestige)
			es_keysetvalue dndExtra event_var(es_steamid) delay_xp 0
			es_keysetvalue dndExtra event_var(es_steamid) delay_prestige 0
		}
		es_setinfo playerrace 0
		es_keygetvalue playerrace dndUsers event_var(es_steamid) race
		if (server_var(playerrace) = zombie) do
		{
			es_keysetvalue dndUsers event_var(es_steamid) race Human
			es_keysetvalue dndUsers event_var(es_steamid) class Fighter
			es_keysetvalue dndUsers event_var(es_steamid) curxp fxp
			es_keysetvalue dndUsers event_var(es_steamid) monster 0
		}
		if (server_var(playerrace) = ghoul) do
		{
			es_keysetvalue dndUsers event_var(es_steamid) race Human
			es_keysetvalue dndUsers event_var(es_steamid) class Fighter
			es_keysetvalue dndUsers event_var(es_steamid) curxp fxp
			es_keysetvalue dndUsers event_var(es_steamid) monster 0
		}
	}
	es_setinfo mcheck 0
	es_keygetvalue mcheck dndUsers event_var(es_steamid) monster
	if (server_var(mcheck) = 1) do
	{
		es_keysetvalue dndUsers event_var(es_steamid) class 0
		es_keysetvalue dndUsers event_var(es_steamid) prestige 0
		es_keysetvalue dndUsers event_var(es_steamid) curxp monxp
	}
	es_setinfo pcheck 0
	es_keygetvalue pcheck dndUsers event_var(es_steamid) prestige
	es_setinfo ccheck 0
	es_keygetvalue ccheck dndUsers event_var(es_steamid) class
	es_setinfo rcheck 0
	es_keygetvalue rcheck dndUsers event_var(es_steamid) race
	if (server_var(ccheck) = fighter) then es_doblock dnd/fighter_spawn
	if (server_var(ccheck) = rogue) then es_doblock dnd/rogue_spawn
	if (server_var(ccheck) = wizard) then es_doblock dnd/wizard_spawn
	if (server_var(ccheck) = cleric) then es_doblock dnd/cleric_spawn
	if (server_var(ccheck) = paladin) then es_doblock dnd/paladin_spawn
	if (server_var(ccheck) = ranger) then es_doblock dnd/ranger_spawn
	if (server_var(ccheck) = monk) then es_doblock dnd/monk_spawn
	if (server_var(ccheck) = necromancer) then es_doblock dnd/necro_spawn
	if (server_var(ccheck) = bard) then es_doblock dnd/bard_spawn
	if (server_var(rcheck) = dwarf) then es_doblock dnd/dwarf_spawn
	if (server_var(rcheck) = elf) then es_doblock dnd/elf_spawn
	if (server_var(rcheck) = halfling) then es_doblock dnd/halfling_spawn
	if (server_var(rcheck) = orc) then es_doblock dnd/orc_spawn
	if (server_var(rcheck) = kobold) then es_doblock dnd/kobold_spawn
	if (server_var(rcheck) = greyelf) then es_doblock dnd/greyelf_spawn
	if (server_var(rcheck) = tiefling) then es_doblock dnd/tiefling_spawn
	if (server_var(rcheck) = aasimar) then es_doblock dnd/aasimar_spawn
	if (server_var(rcheck) = drow) then es_doblock dnd/drow_spawn
	if (server_var(rcheck) = minotaur) then es_doblock dnd/minotaur_spawn
	if (server_var(rcheck) = avariel) then es_doblock dnd/avariel_spawn
	if (server_var(rcheck) = doppelganger) then es_doblock dnd/doppelganger_spawn
	if (server_var(rcheck) = troll) then es_doblock dnd/troll_spawn
	if (server_var(rcheck) = vampire) then es_doblock dnd/vampire_spawn
	if (server_var(rcheck) = filcher) then es_doblock dnd/filcher_spawn
	if (server_var(rcheck) = golem) then es_doblock dnd/golem_spawn
	if (server_var(rcheck) = rok) then es_doblock dnd/rok_spawn
	if (server_var(rcheck) = dragon) then es_doblock dnd/dragon_spawn
	if (server_var(rcheck) = airele) then es_doblock dnd/airele_spawn
	if (server_var(rcheck) = fireele) then es_doblock dnd/fireele_spawn
	if (server_var(rcheck) = waterele) then es_doblock dnd/waterele_spawn
	if (server_var(rcheck) = earthele) then es_doblock dnd/earthele_spawn
	if (server_var(rcheck) = tibbit) then es_doblock dnd/tibbit_spawn
	if (server_var(rcheck) = chaindevil) then es_doblock dnd/chaindevil_spawn
	if (server_var(rcheck) = rabbit) then es_doblock dnd/rabbit_spawn
	if (server_var(rcheck) = giant) then es_doblock dnd/giant_spawn
	if (server_var(rcheck) = basilisk) then es_doblock dnd/basilisk_spawn
	if (server_var(rcheck) = zombie) then es_doblock dnd/zombie_spawn
	if (server_var(rcheck) = ghoul) then es_doblock dnd/ghoul_spawn
	es_doblock dnd/fortsave
	es_doblock dnd/willsave
	es_doblock dnd/reflexsave
	es_setinfo speed_check 0
	es_setinfo color_check 0
	es_setinfo max_mana 0
	es_keygetvalue max_mana dndExtra event_var(es_steamid) mana
	es_keysetvalue dndExtra event_var(es_steamid) max_mana server_var(max_mana)
	es_keygetvalue speed_check dndExtra event_var(es_steamid) speed
	es_keygetvalue color_check dndExtra event_var(es_steamid) color
	es est_speed event_var(userid) server_var(speed_check)
	if (server_var(pcheck) != rpc3) do
	{
		if (server_var(rcheck) != filcher) do
		{
			if (server_var(rcheck) != rabbit) do
			{
				if (server_var(color_check) >= 256) do
				{
					es_setinfo color_check 255
					es_keysetvalue dndExtra event_var(es_steamid) color 255
				}
				if (server_var(color_check) <= 14) do
				{
					es_keysetvalue dndExtra event_var(es_steamid) color 15
					es_setinfo color_check 15
				}
				es_delayed 4 es est_setplayercolor event_var(userid) 255 255 255 server_var(color_check) 1
			}
		}
	}
	es_setinfo rescheck 0
	es_keygetvalue rescheck dndExtra event_var(es_steamid) res_count
	if (server_var(rescheck) >= 1) do
	{
		es_setinfo maxlife 0
		es_keygetvalue maxlife dndExtra event_var(es_steamid) maxhealth
		es_setinfo lose 0
		es_setinfo lose server_var(maxlife)
		es_math lose / 5
		es_math lose * server_var(rescheck)
		es_math maxlife - server_var(lose)
		es_keysetvalue dndExtra event_var(es_steamid) maxhealth server_var(maxlife)
		es ma_takehealth event_var(userid) server_var(lose)
	}
}

block rabbit_spawn
{
	es ma_givehealth event_var(userid) 100
	es_setinfo bhealth 0
	es_keygetvalue bhealth dndExtra event_var(es_steamid) maxhealth
	es_math bhealth + 100
	es_keysetvalue dndExtra event_var(es_steamid) maxhealth server_var(bhealth)
	es est_setplayercolor event_var(userid) 255 255 255 0
	es_setinfo speed_check 0
	es_keygetvalue speed_check dndExtra event_var(es_steamid) speed
	es_math speed_check + .2
	es_keysetvalue dndExtra event_var(es_steamid) speed server_var(speed_check)
}

block basilisk_spawn
{
	es ma_givehealth event_var(userid) 400
	es_setinfo bhealth 0
	es_keygetvalue bhealth dndExtra event_var(es_steamid) maxhealth
	es_math bhealth + 400
	es_keysetvalue dndExtra event_var(es_steamid) maxhealth server_var(bhealth)
	es_keysetvalue dndExtra event_var(es_steamid) stealth 2
}

block giant_spawn
{
	es ma_givehealth event_var(userid) 1900
	es_setinfo bhealth 0
	es_keygetvalue bhealth dndExtra event_var(es_steamid) maxhealth
	es_math bhealth + 1900
	es_keysetvalue dndExtra event_var(es_steamid) maxhealth server_var(bhealth)
	es_delayed 10 es_keysetvalue dndExtra event_Var(es_steamid) regen 1
	es_delayed 10 es regen event_var(userid) 4 20
}

block dwarf_spawn
{
	es_setinfo cash 0
	es_getmoney cash event_var(userid)
	es_math cash / 10
	es ma_takecash event_var(userid) server_var(cash)
	es_tell event_var(userid) #green You have gained 10 bonus health for being a dwarf.
	es ma_givehealth event_var(userid) 10
	es_setinfo bhealth 0
	es_keygetvalue bhealth dndExtra event_var(es_steamid) maxhealth
	es_math bhealth + 10
	es_keysetvalue dndExtra event_var(es_steamid) maxhealth server_var(bhealth) 
	es_setinfo speed_check 0
	es_keygetvalue speed_check dndExtra event_var(es_steamid) speed
	es_math speed_check - .05
	es_keysetvalue dndExtra event_var(es_steamid) speed server_var(speed_check)
}

block elf_spawn
{
	es_tell event_var(userid) #green For being a frail elf you have lost 10 health.
	es ma_takehealth event_var(userid) 10
	es_setinfo bhealth 0
	es_keygetvalue bhealth dndExtra event_var(es_steamid) maxhealth
	es_math bhealth - 10
	es_keysetvalue dndExtra event_var(es_steamid) maxhealth server_var(bhealth)
	es_setinfo color_check 0
	es_keygetvalue color_check dndExtra event_var(es_steamid) color
	if (server_var(color_check) = 255) do
	{
		es_setinfo speed_check 0
		es_keygetvalue speed_check dndExtra event_var(es_steamid) speed
		es_math speed_check + .02
		es_keysetvalue dndExtra event_var(es_steamid) speed server_var(speed_check)
	}
	else do
	{
		es_math color_check - 10
		es_keysetvalue dndExtra event_var(es_steamid) color server_var(color_check)			
	}
}

block halfling_spawn
{
	es_setinfo speed_check 0
	es_keygetvalue speed_check dndExtra event_var(es_steamid) speed
	es_math speed_check - .2
	es_setinfo color_check 0
	es_keygetvalue color_check dndExtra event_var(es_steamid) color
	if (server_var(color_check) = 255) do
	{
		es_math speed_check + .02
	}
	else do
	{
		es_math color_check - 50
		es_keysetvalue dndExtra event_var(es_steamid) color server_var(color_check)			
	}
	es_keysetvalue dndExtra event_var(es_steamid) speed server_var(speed_check)
}

block orc_spawn
{
	es_setinfo cash 0
	es_getmoney cash event_var(userid)
	es_math cash / 10
	es ma_takecash event_var(userid) server_var(cash)
	es_setinfo mana 0
	es_keygetvalue mana dndExtra event_var(es_steamid) mana
	es_math mana - 10
	es_keysetvalue dndExtra event_var(es_steamid) mana server_var(mana)
}

block kobold_spawn
{
	es_tell event_var(userid) #green For being a frail kobold you have lost 10 health.
	es ma_takehealth event_var(userid) 10
	es_setinfo bhealth 0
	es_keygetvalue bhealth dndExtra event_var(es_steamid) maxhealth
	es_math bhealth - 10
	es_keysetvalue dndExtra event_var(es_steamid) maxhealth server_var(bhealth) 
	es ma_give event_var(userid) weapon_hegrenade
	es_delayed 10 es_keysetvalue dndExtra event_Var(es_steamid) regen 1
	es_delayed 10 es regen event_var(userid) 3 1
}

block greyelf_spawn
{
	es_tell event_var(userid) #green For being a frail grey elf you have lost 10 health.
	es ma_takehealth event_var(userid) 10
	es_setinfo bhealth 0
	es_keygetvalue bhealth dndExtra event_var(es_steamid) maxhealth
	es_math bhealth - 10
	es_keysetvalue dndExtra event_var(es_steamid) maxhealth server_var(bhealth) 
	es_setinfo mana 0
	es_keygetvalue mana dndExtra event_var(es_steamid) mana
	es_math mana + 10
	es_keysetvalue dndExtra event_var(es_steamid) mana server_var(mana)
	es_setinfo color_check 0
	es_keygetvalue color_check dndExtra event_var(es_steamid) color
	if (server_var(color_check) = 255) do
	{
		es_setinfo speed_check 0
		es_keygetvalue speed_check dndExtra event_var(es_steamid) speed
		es_math speed_check + .02
		es_keysetvalue dndExtra event_var(es_steamid) speed server_var(speed_check)
	}
	else do
	{
		es_math color_check - 10
		es_keysetvalue dndExtra event_var(es_steamid) color server_var(color_check)			
	}
}

block tibbit_spawn
{
	es_tell event_var(userid) #green For being a frail tibbit you have lost 10 health.
	es ma_takehealth event_var(userid) 10
	es_setinfo bhealth 0
	es_keygetvalue bhealth dndExtra event_var(es_steamid) maxhealth
	es_math bhealth - 10
	es_keysetvalue dndExtra event_var(es_steamid) maxhealth server_var(bhealth)
	es_setinfo color_check 0
	es_keygetvalue color_check dndExtra event_var(es_steamid) color
	es_math color_check - 225
	es_keysetvalue dndExtra event_var(es_steamid) color server_var(color_check)
	es_keysetvalue dndExtra event_var(es_steamid) sneakdice 4
	es ma_give event_var(userid) weapon_usp
}

block tiefling_spawn
{
	es_setinfo cash 0
	es_getmoney cash event_var(userid)
	es_math cash / 10
	es ma_takecash event_var(userid) server_var(cash)
	es_setinfo color_check 0
	es_keygetvalue color_check dndExtra event_var(es_steamid) color
	if (server_var(color_check) = 255) do
	{
		es_setinfo speed_check 0
		es_keygetvalue speed_check dndExtra event_var(es_steamid) speed
		es_math speed_check + .02
		es_keysetvalue dndExtra event_var(es_steamid) speed server_var(speed_check)
	}
	else do
	{
		es_math color_check - 10
		es_keysetvalue dndExtra event_var(es_steamid) color server_var(color_check)			
	}
	if (event_var(es_userteam) = 2) do
	{
		es est_loop player #c "es neghealth server_var(player) 5"
	}
	if (event_var(es_userteam) = 3) do
	{
		es est_loop player #t "es neghealth server_var(player) 5"			
	}
	es_setinfo mana 0
	es_keygetvalue mana dndExtra event_var(es_steamid) mana
	es_math mana + 10
	es_keysetvalue dndExtra event_var(es_steamid) mana server_var(mana)
}

block aasimar_spawn
{
	es_setinfo cash 0
	es_getmoney cash event_var(userid)
	es_math cash / 10
	es ma_givecash event_var(userid) server_var(cash)
	if (event_var(es_userteam) = 2) do
	{
		es est_loop player #t "es bonushealth server_var(player) 5" 
	}
	if (event_var(es_userteam) = 3) do
	{
		es est_loop player #c "es bonushealth server_var(player) 5" 
	}
}

block drow_spawn
{
	es_setinfo cash 0
	es_getmoney cash event_var(userid)
	es_math cash / 10
	es ma_givecash event_var(userid) server_var(cash)
	es_tell event_var(userid) #green Use !lev1 and !lev0 for different gravity types.
	es_setinfo color_check 0
	es_keygetvalue color_check dndExtra event_var(es_steamid) color
	if (server_var(color_check) = 255) do
	{
		es_setinfo speed_check 0
		es_keygetvalue speed_check dndExtra event_var(es_steamid) speed
		es_math speed_check + .02
		es_keysetvalue dndExtra event_var(es_steamid) speed server_var(speed_check)
	}
	else do
	{
		es_math color_check - 10
		es_keysetvalue dndExtra event_var(es_steamid) color server_var(color_check)			
	}
	es ma_takehealth event_var(userid) 10
	es_setinfo bhealth 0
	es_keygetvalue bhealth dndExtra event_var(es_steamid) maxhealth
	es_math bhealth - 10
	es_keysetvalue dndExtra event_var(es_steamid) maxhealth server_var(bhealth) 
	es_setinfo mana 0
	es_keygetvalue mana dndExtra event_var(es_steamid) mana
	es_math mana + 10
	es_keysetvalue dndExtra event_var(es_steamid) mana server_var(mana)
	es_keysetvalue dndExtra event_var(es_steamid) poisonuses 4
}

block minotaur_spawn
{
	es_setinfo cash 0
	es_getmoney cash event_var(userid)
	es_math cash / 10
	es ma_takecash event_var(userid) server_var(cash)
	es_setinfo color_check 0
	es_keygetvalue color_check dndExtra event_var(es_steamid) color
	es_math color_check + 60
	es_keysetvalue dndExtra event_var(es_steamid) color server_var(color_check)
	es_setinfo mana 0
	es_keygetvalue mana dndExtra event_var(es_steamid) mana
	es_math mana - 20
	es_keysetvalue dndExtra event_var(es_steamid) mana server_var(mana) 
}

block avariel_spawn
{
	es_setinfo color_check 0
	es_keygetvalue color_check dndExtra event_var(es_steamid) color
	if (server_var(color_check) = 255) do
	{
		es_setinfo speed_check 0
		es_keygetvalue speed_check dndExtra event_var(es_steamid) speed
		es_math speed_check + .04
		es_keysetvalue dndExtra event_var(es_steamid) speed server_var(speed_check)
	}
	else do
	{
		es_math color_check - 20
		es_keysetvalue dndExtra event_var(es_steamid) color server_var(color_check)			
	}
	es_setinfo mana 0
	es_keygetvalue mana dndExtra event_var(es_steamid) mana
	es_math mana + 10
	es_keysetvalue dndExtra event_var(es_steamid) mana server_var(mana)
	es_tell event_var(userid) #green For being a frail avariel you have lost 10 health.
	es ma_takehealth event_var(userid) 10
	es_setinfo bhealth 0
	es_keygetvalue bhealth dndExtra event_var(es_steamid) maxhealth
	es_math bhealth - 10
	es_keysetvalue dndExtra event_var(es_steamid) maxhealth server_var(bhealth) 
}

block doppelganger_spawn
{
	es_setinfo cash 0
	es_getmoney cash event_var(userid)
	es_math cash / 10
	es ma_givecash event_var(userid) server_var(cash)
	es ma_givehealth event_var(userid) 10
	es_setinfo bhealth 0
	es_keygetvalue bhealth dndExtra event_var(es_steamid) maxhealth
	es_math bhealth + 10
	es_keysetvalue dndExtra event_var(es_steamid) maxhealth server_var(bhealth) 
	if (event_var(es_userteam) = 2) do
	{
		es_doblock dnd/ct_mask
	}
	if (event_var(es_userteam) = 3) do
	{
		es_doblock dnd/t_mask
	}
	es_setinfo color_check 0
	es_keygetvalue color_check dndExtra event_var(es_steamid) color
	if (server_var(color_check) = 255) do
	{
		es_setinfo speed_check 0
		es_keygetvalue speed_check dndExtra event_var(es_steamid) speed
		es_math speed_check + .02
		es_keysetvalue dndExtra event_var(es_steamid) speed server_var(speed_check)
	}
	else do
	{
		es_math color_check - 10
		es_keysetvalue dndExtra event_var(es_steamid) color server_var(color_check)			
	}
	es_setinfo mana 0
	es_keygetvalue mana dndExtra event_var(es_steamid) mana
	es_math mana + 10
	es_keysetvalue dndExtra event_var(es_steamid) mana server_var(mana)
}

block chaindevil_spawn
{
	es_keysetvalue dndExtra event_var(es_steamid) allow_color 1
	es ma_takehealth event_var(userid) 30
	es_setinfo bhealth 0
	es_keygetvalue bhealth dndExtra event_var(es_steamid) maxhealth
	es_math bhealth - 30
	es_keysetvalue dndExtra event_var(es_steamid) maxhealth server_var(bhealth) 
	es_delayed 5 es ma_render_fx event_var(userid) 12
}

block troll_spawn
{
	es_setinfo cash 0
	es_getmoney cash event_var(userid)
	es_math cash / 5
	es ma_takecash event_var(userid) server_var(cash)
	es ma_givehealth event_var(userid) 60
	es_setinfo bhealth 0
	es_keygetvalue bhealth dndExtra event_var(es_steamid) maxhealth
	es_math bhealth + 60
	es_keysetvalue dndExtra event_var(es_steamid) maxhealth server_var(bhealth) 
	es_setinfo color_check 0
	es_keygetvalue color_check dndExtra event_var(es_steamid) color
	es_math color_check + 20
	es_keysetvalue dndExtra event_var(es_steamid) color server_var(color_check)
	es_delayed 10 es_keysetvalue dndExtra event_Var(es_steamid) regen 1
	es_delayed 10 regen event_var(userid) 6 5
	es_setinfo mana 0
	es_keygetvalue mana dndExtra event_var(es_steamid) mana
	es_math mana - 20
	es_keysetvalue dndExtra event_var(es_steamid) mana server_var(mana)
}

block vampire_spawn
{
	es_setinfo cash 0
	es_getmoney cash event_var(userid)
	es_math cash / 5
	es ma_givecash event_var(userid) server_var(cash)
	es_keysetvalue dndExtra event_var(es_steamid) vanish 2
	es_delayed 10 es_keysetvalue dndExtra event_Var(es_steamid) regen 1
	es_delayed 5 regen event_var(userid) 6 5
	es_setinfo color_check 0
	es_keygetvalue color_check dndExtra event_var(es_steamid) color
	if (server_var(color_check) = 255) do
	{
		es_setinfo speed_check 0
		es_keygetvalue speed_check dndExtra event_var(es_steamid) speed
		es_math speed_check + .04
		es_keysetvalue dndExtra event_var(es_steamid) speed server_var(speed_check)
	}
	else do
	{
		es_math color_check - 20
		es_keysetvalue dndExtra event_var(es_steamid) color server_var(color_check)			
	}
	es ma_takehealth event_var(userid) 90
	es_setinfo bhealth 0
	es_keygetvalue bhealth dndExtra event_var(es_steamid) maxhealth
	es_math bhealth - 90
	es_keysetvalue dndExtra event_var(es_steamid) maxhealth server_var(bhealth) 
}

block filcher_spawn
{
	es est_setplayercolor event_var(userid) 255 255 255 0
	es_keysetvalue dndExtra event_var(es_steamid) tele_count 7
	es ma_takehealth event_var(userid) 75
	es_setinfo bhealth 0
	es_keygetvalue bhealth dndExtra event_var(es_steamid) maxhealth
	es_math bhealth - 75
	es_keysetvalue dndExtra event_var(es_steamid) maxhealth server_var(bhealth) 
	es_setinfo speed_check 0
	es_keygetvalue speed_check dndExtra event_var(es_steamid) speed
	es_math speed_check + .2
	es_keysetvalue dndExtra event_var(es_steamid) speed server_var(speed_check)
}

block golem_spawn
{
	es ma_givehealth event_var(userid) 1500
	es_setinfo bhealth 0
	es_keygetvalue bhealth dndExtra event_var(es_steamid) maxhealth
	es_math bhealth + 1500
	es_keysetvalue dndExtra event_var(es_steamid) maxhealth server_var(bhealth) 
	es_setinfo speed_check 0
	es_keygetvalue speed_check dndExtra event_var(es_steamid) speed
	es_math speed_check - .5
	es_keysetvalue dndExtra event_var(es_steamid) speed server_var(speed_check)
}

block rok_spawn
{
	es ma_give event_var(userid) weapon_scout
	es_keysetvalue dndExtra event_var(es_steamid) color 30
	es ma_takehealth event_var(userid) 30
	es_setinfo bhealth 0
	es_keygetvalue bhealth dndExtra event_var(es_steamid) maxhealth
	es_math bhealth - 30
	es_keysetvalue dndExtra event_var(es_steamid) maxhealth server_var(bhealth) 
	es_delayed 10 es_keysetvalue dndExtra event_var(es_steamid) regen 1
	es_delayed 10 es regen event_var(userid) 1 2
}

block dragon_spawn
{
	es ma_givecash event_var(userid) 4000
	es ma_givehealth event_var(userid) 25
	es_setinfo bhealth 0
	es_keygetvalue bhealth dndExtra event_var(es_steamid) maxhealth
	es_math bhealth + 25
	es_keysetvalue dndExtra event_var(es_steamid) maxhealth server_var(bhealth) 
	es_delayed 10 es_keysetvalue dndExtra event_var(es_steamid) regen 1
	es_delayed 10 es regen event_var(userid) 1 2
}

block airele_spawn
{
	es ma_givehealth event_var(userid) 25
	es_setinfo bhealth 0
	es_keygetvalue bhealth dndExtra event_var(es_steamid) maxhealth
	es_math bhealth + 25
	es_keysetvalue dndExtra event_var(es_steamid) maxhealth server_var(bhealth) 
	if (event_var(es_userteam) = 2) do
	{
		es_doblock dnd/ct_mask
	}
	if (event_var(es_userteam) = 3) do
	{
		es_doblock dnd/t_mask
	}
}

block fireele_spawn
{
	es ma_givehealth event_var(userid) 25
	es_setinfo bhealth 0
	es_keygetvalue bhealth dndExtra event_var(es_steamid) maxhealth
	es_math bhealth + 25
	es_keysetvalue dndExtra event_var(es_steamid) maxhealth server_var(bhealth) 
	es_delayed 10 es_keysetvalue dndExtra event_var(es_steamid) regen 1
	es_delayed 10 es regen event_var(userid) 1 3
}

block waterele_spawn
{
	es ma_givehealth event_var(userid) 25
	es_setinfo bhealth 0
	es_keygetvalue bhealth dndExtra event_var(es_steamid) maxhealth
	es_math bhealth + 25
	es_keysetvalue dndExtra event_var(es_steamid) maxhealth server_var(bhealth) 	
	es_keysetvalue dndExtra event_var(es_steamid) color 50
	es_keysetvalue dndExtra event_var(es_steamid) tele_count 4
}

block earthele_spawn
{
	es ma_givehealth event_var(userid) 150
	es_setinfo bhealth 0
	es_keygetvalue bhealth dndExtra event_var(es_steamid) maxhealth
	es_math bhealth + 150
	es_keysetvalue dndExtra event_var(es_steamid) maxhealth server_var(bhealth) 
}

block zombie_spawn
{
	es ma_sethealth event_Var(userid) 5000
	es_setinfo bhealth 0
	es_keygetvalue bhealth dndExtra event_var(es_steamid) maxhealth
	es_math bhealth + 5000
	es_keysetvalue dndExtra event_var(es_steamid) maxhealth server_var(bhealth) 
	es_keysetvalue dndExtra event_var(es_steamid) hitcount 0
	es_setinfo speed_check 0
	es_keygetvalue speed_check dndExtra event_var(es_steamid) speed
	es_math speed_check - .3
	es_keysetvalue dndExtra event_var(es_steamid) speed server_var(speed_check)
	es_tell event_var(userid) #green You have been returned to life as a zombie! When you respawn you shall return to your race and class.
	es est_setplayercolor event_var(userid) 0 0 0 255 1
	es_delayed 5 es est_setplayercolor event_var(userid) 0 0 0 255 1
}

block ghoul_spawn
{
	es ma_sethealth event_Var(userid) 5000
	es_setinfo bhealth 0
	es_keygetvalue bhealth dndExtra event_var(es_steamid) maxhealth
	es_math bhealth + 5000
	es_keysetvalue dndExtra event_var(es_steamid) maxhealth server_var(bhealth) 
	es_keysetvalue dndExtra event_var(es_steamid) hitcount 0
	es_setinfo speed_check 0
	es_keygetvalue speed_check dndExtra event_var(es_steamid) speed
	es_math speed_check + .3
	es_keysetvalue dndExtra event_var(es_steamid) speed server_var(speed_check)
	es_tell event_var(userid) #green You have been returned to life as a ghoul! When you respawn you shall return to your race and class.
	es est_setplayercolor event_var(userid) 0 0 0 255 1
	es_delayed 5 es est_setplayercolor event_var(userid) 0 0 0 255 1
}

block ct_mask
{
	es_rand random 1 4
	if (server_var(random) = 1) then es est_SetModel event_var(userid) player/ct_urban
	if (server_var(random) = 2) then es est_SetModel event_var(userid) player/ct_sas
	if (server_var(random) = 3) then es est_SetModel event_var(userid) player/ct_gsg9
	if (server_var(random) = 4) then es est_SetModel event_var(userid) player/ct_gign
}

block t_mask
{
	es_rand random 1 4
	if (server_var(random) = 1) then es est_SetModel event_var(userid) player/t_phoenix
	if (server_var(random) = 2) then es est_SetModel event_var(userid) player/t_leet
	if (server_var(random) = 3) then es est_SetModel event_var(userid) player/t_guerilla
	if (server_var(random) = 4) then es est_SetModel event_var(userid) player/t_arctic
}

event player_hurt
{
	es_setinfo userclass 0
	es_setinfo attackerclass 0
	es_keygetvalue userclass dndUsers event_var(es_steamid) class
	es_keygetvalue attackerclass dndUsers event_var(es_attackersteamid) class
	if (server_var(userclass) = fighter) then es_doblock dnd/fighter_victim
	if (server_var(attackerclass) = fighter) then es_doblock dnd/fighter_attacker
	if (server_var(userclass) = rogue) then es_doblock dnd/rogue_victim
	if (server_var(attackerclass) = rogue) then es_doblock dnd/rogue_attacker
	if (server_var(userclass) = wizard) then es_doblock dnd/wizard_victim
	if (server_var(attackerclass) = wizard) then es_doblock dnd/wizard_attacker
	if (server_var(userclass) = cleric) then es_doblock dnd/cleric_victim
	if (server_var(attackerclass) = cleric) then es_doblock dnd/cleric_attacker
	if (server_var(userclass) = paladin) then es_doblock dnd/paladin_victim
	if (server_var(attackerclass) = paladin) then es_doblock dnd/paladin_attacker
	if (server_var(userclass) = ranger) then es_doblock dnd/ranger_victim
	if (server_var(attackerclass) = ranger) then es_doblock dnd/ranger_attacker
	if (server_var(userclass) = monk) then es_doblock dnd/monk_victim
	if (server_var(attackerclass) = monk) then es_doblock dnd/monk_attacker
	if (server_var(attackerclass) = necromancer) then es_doblock dnd/necro_attacker
	if (server_var(userclass) = bard) then es_doblock dnd/bard_victim
	if (server_var(attackerclass) = bard) then es_doblock dnd/bard_attacker
	es_setinfo userrace 0
	es_keygetvalue userrace dndUsers event_var(es_steamid) race
	es_setinfo attackerrace 0
	es_keygetvalue attackerrace dndUsers event_var(es_attackersteamid) race
	if (server_var(userrace) = golem) then es_doblock dnd/golem_victim
	if (server_var(attackerrace) = orc) then es_doblock dnd/orc_attacker
	if (server_var(attackerrace) = rok) then es_doblock dnd/rok_attacker
	if (server_var(attackerrace) = dragon) then es_doblock dnd/dragon_attacker
	if (server_var(attackerrace) = fireele) then es_doblock dnd/fireele_attacker
	if (server_var(attackerrace) = waterele) then es_doblock dnd/waterele_attacker
	if (server_var(attackerrace) = airele) then es_doblock dnd/airele_attacker
	if (server_var(attackerrace) = earthele) then es_doblock dnd/earthele_attacker
	if (server_var(attackerrace) = kobold) then es_doblock dnd/kobold_attacker
	if (server_var(attackerrace) = halfling) then es_doblock dnd/halfling_attacker
	if (server_var(attackerrace) = greyelf) then es_doblock dnd/greyelf_attacker
	if (server_var(attackerrace) = vampire) then es_doblock dnd/vampire_attacker
	if (server_var(attackerrace) = minotaur) then es_doblock dnd/minotaur_attacker
	if (server_var(attackerrace) = doppelganger) then es_doblock dnd/doppelganger_attacker
	if (server_var(attackerrace) = troll) then es_doblock dnd/troll_attacker
	if (server_var(attackerrace) = drow) then es_doblock dnd/drow_attacker
	if (server_var(attackerrace) = filcher) then es_doblock dnd/filcher_attacker
	if (server_var(attackerrace) = tibbit) then es_doblock dnd/tibbit_attacker
	if (server_var(attackerrace) = chaindevil) then es_doblock dnd/chaindevil_attacker
	if (server_var(attackerrace) = giant) then es_doblock dnd/giant_attacker
	if (server_var(attackerrace) = rabbit) then es_doblock dnd/rabbit_attacker
	if (server_var(attackerrace) = ghoul) then es_doblock dnd/ghoul_attacker
	if (server_var(userrace) = vampire) then es_doblock dnd/vampire_victim
	if (server_var(userrace) = earthele) then es_doblock dnd/earthele_victim
	if (server_var(userrace) = fireele) then es_doblock dnd/fireele_victim
	if (server_var(userrace) = waterele) then es_doblock dnd/waterele_victim
	if (server_var(userrace) = minotaur) then es_doblock dnd/minotaur_victim
	if (server_var(userrace) = doppelganger) then es_doblock dnd/doppelganger_victim
	if (server_var(userrace) = aasimar) then es_doblock dnd/aasimar_victim
	if (server_var(userrace) = filcher) then es_doblock dnd/filcher_victim
	if (server_var(userrace) = tibbit) then es_doblock dnd/tibbit_victim
	if (server_var(userrace) = chaindevil) then es_doblock dnd/chaindevil_victim
	if (server_var(userrace) = basilisk) then es_doblock dnd/basilisk_victim
	if (server_var(userrace) = rabbit) then es_doblock dnd/rabbit_victim
	if (server_var(userrace) = zombie) then es_doblock dnd/zombie_victim
	if (server_var(userrace) = ghoul) then es_doblock dnd/ghoul_victim
	es_rand random 1 20
	if (server_var(random) = 1) do
	{
		es_setinfo crit_imune 0
		es_keygetvalue crit_imune dndExtra event_var(es_steamid) crit_imune
		if (server_var(crit_imune) != 1) do
		{
			if (event_var(weapon) != point_hurt) do
			{
				es point_hurt event_var(attacker) event_var(userid) event_var(dmg_health)
				es_tell event_var(attacker) #green You dealt event_var(dmg_health) bonus damage with a critical hit.
				if (server_var(vrcheck) = fireele) do
				{
					es point_hurt event_var(attacker) event_var(userid) event_var(dmg_health)
					es_tell event_var(attacker) #green You dealt event_var(dmg_health) bonus damage because you are a fire elemental.
				}
			}
		}
	}
	es_setinfo bonus 0
	es_keygetvalue bonus dndExtra event_var(es_attackersteamid) bard_dmg
	if (server_var(bonus) = 1) do
	{
		es_setinfo dmg 0
		es_setinfo dmg event_var(dmg_health)
		es_math dmg / 5
		es point_hurt event_var(attacker) event_var(userid) server_var(dmg)
	}
}

block rabbit_victim
{
	es_rand random 1 4
	if (server_var(random) != 1) do
	{
		if (event_var(weapon) != hegrenade) do
		{
			es ma_givehealth event_var(userid) event_var(dmg_health)
			es_tell event_var(userid) #green You have evaded event_var(dmg_health) damage from an attack.
		}
		else do
		{
			es_tell event_var(userid) #green You have been struck by a holy hand grenade!
			es est_drunk event_var(userid) 5
			es ma_blind event_var(userid) 200
			es ma_slap event_Var(userid) 15
			es est_speed event_var(userid) .7
		}
	}
	
}

block rabbit_attacker
{
	es_setinfo knifedmg event_var(dmg_health)
	es_math knifedmg * 3
	es point_hurt event_var(attacker) event_var(userid) server_var(knifedmg)
}

block basilisk_victim
{
	es_setinfo dr event_var(dmg_health)
	es_math dr / 2
	es ma_givehealth event_var(userid) server_var(dr)
}

block giant_attacker
{
	es ma_givehealth event_var(userid) event_var(dmg_health)
	es ma_slap event_var(userid) 0
	es ma_slap event_var(userid) 0
	es ma_slap event_var(userid) 0
	es_delayed .5 es ma_slap event_var(userid) 0
	es_delayed 1 es ma_slap event_var(userid) 0
	es_delayed 1.5 es ma_slap event_var(userid) 0
	es_delayed 2 es ma_slap event_var(userid) 0
	es_delayed 2.5 es ma_slap event_var(userid) 0
	es_delayed 3 es ma_slap event_var(userid) 0
	es_delayed 3.5 es ma_slap event_var(userid) 0
	es_delayed 4 es ma_slap event_var(userid) 0
}

block chaindevil_victim
{
	es_rand random 1 10
	if (server_var(random) != 1) do
	{
		es ma_givehealth event_var(userid) event_var(dmg_health)
		es_tell event_var(userid) #green You have evaded event_var(dmg_health) damage from an attack.
	}
}

block chaindevil_attacker
{
	es_rand random 1 6
	if (server_var(random) = 1) do
	{
		es ma_drug event_var(userid) 1
		es_delayed 4 es ma_drug event_var(userid) 0
	}
	es_rand random 1 6
	if (server_var(random) = 1) do
	{
		es_setinfo save 0
		es_rand save 1 20
		if (server_va(save) != 20) do
		{
			es_setinfo ref 0
			es_keygetvalue ref dndExtra event_var(es_steamid) reflexsave
			es_math save + server_var(ref)
			if (server_var(save) < 17) do
			{
				es est_dropweapon event_var(userid) 1
				es est_dropweapon event_var(userid) 2
				es_tell event_var(attacker) #green Your attack has disarmed your victim.
			}
		}
	}
}

block tibbit_victim
{
	es sneak_off event_var(userid)
	es stealth_off event_var(userid)
	es_setinfo cat_check 0
	es_keygetvalue cat_check dndExtra event_var(es_steamid) cat
	if (server_var(cat_check) = 1) do
	{
		es_rand random 1 4
		if (server_var(random) != 1) do
		{
			es ma_givehealth event_var(userid) event_var(dmg_health)
			es_tell event_var(userid) #green You have evaded event_var(dmg_health) damage from an attack.
		}
	}
}

block tibbit_attacker
{
	es stealth_off event_var(attacker)
	es_rand random 1 5
	if (server_var(random) = 1) do
	{
		es_setinfo cash 400
		es ma_takecash event_var(userid) server_var(cash)
		es ma_givecash event_var(attacker) server_var(cash)
		es_tell event_var(attacker) #green You have stolen $ server_var(cash) from event_var(es_username).
	}
	es_setinfo scheck 0
	es_keygetvalue scheck dndExtra event_var(es_attackersteamid) sneak
	if (server_var(scheck) = 0) do
	{
		es sneak_off event_var(attacker)
		es_setinfo sneak 0
		es_keygetvalue sneak dndExtra event_var(es_attackersteamid) sneakdice
		es_setinfo random 0
		es_rand random 1 6
		es_math random * server_var(sneak)
		es point_hurt event_var(attacker) event_var(userid) server_var(random)
		es_tell event_var(attacker) #green You dealt server_var(random) bonus damage with a sneak attack.
	}
}

block golem_victim
{
	es point_hurt event_var(userid) event_var(attacker) 4
	es_setinfo dmg_dr 0
	es_setinfo dmg_dr event_var(dmg_health)
	es_math dmg_dr / 2
	es ma_givehealth event_var(userid) server_var(dmg_dr)
	es_rand random 1 5
	if (server_var(random) = 1) do
	{
		es ma_blind event_var(attacker)
		es_delayed 7 es ma_blind event_var(attacker) 0
	}
}

block earthele_victim
{
	es point_hurt event_var(userid) event_var(attacker) 5
}

block waterele_victim
{
	es_rand random 1 3
	if (server_var(random) = 1) do
	{
		es ma_givehealth event_var(userid) event_var(dmg_health)
	}
}

block fireele_victim
{
	es_rand random 1 6
	if (server_var(random) = 1) do
	{
		es est_burn event_var(attacker) 5
	}
}

block orc_attacker
{
	es_setinfo bonus 0
	es_setinfo bonus event_var(dmg_health)
	es_math bonus / 10
	es point_hurt event_var(attacker) event_var(userid) server_var(bonus)
}

block rok_attacker
{
	es_rand random 1 2
	if (server_var(random) = 1) do
	{
		es point_hurt event_var(attacker) event_var(userid) event_var(dmg_health)
	}
}

block dragon_attacker
{
	es_rand random 1 5
	if (server_var(random) = 1) do
	{
		es_setinfo vrcheck 0
		es_keygetvalue vrcheck dndUsers event_var(es_steamid) race
		if (server_var(vrcheck) = troll) do
		{
			es point_hurt event_var(attacker) event_var(userid) event_var(dmg_health)
		}
		es est_burn event_var(userid) 6
	}
}

block filcher_attacker
{
	es_setinfo cash 0
	es_setinfo cash event_var(dmg_health)
	es_math cash * event_var(dmg_health)
	es ma_givecash event_var(attacker) server_var(cash)
	es ma_takecash event_var(userid) server_var(cash)
}

block airele_attacker
{
	es_rand random 1 5
	if (server_var(random) = 1) do
	{
		es est_drunk event_var(userid) 4
	}
	es ma_slap event_var(userid)
	es_rand random 1 5
	if (server_var(random) = 1) do
	{
		es est_SetGravity event_var(userid) 0.01
		es_delayed 15 es est_SetGravity event_var(userid) 1.00
	}
}

block waterele_attacker
{
	if (event_var(weapon) = hegrenade) do
	{
		es ma_freeze event_var(userid) 1
		es_delayed 5 es ma_freeze event_var(userid) 0
	}
}

block fireele_attacker
{
	es_rand random 1 6
	if (server_var(random) = 1) do
	{
		es_setinfo vrcheck 0
		es_keygetvalue vrcheck dndUsers event_var(es_steamid) race
		if (server_var(vrcheck) = troll) do
		{
			es point_hurt event_var(attacker) event_var(userid) event_var(dmg_health)
		}
		es est_burn event_var(userid) 5
	}
}

block earthele_attacker
{
	es_rand random 1 4
	if (server_var(random) = 1) do
	{
		es ma_beacon event_var(userid)
	}
	es_rand random 1 4
	if (server_var(random) = 1) do
	{
		es est_SetGravity event_var(userid) 3.00
		es_delayed 15 es est_SetGravity event_var(userid) 1.00
	}
}

block kobold_attacker
{
	if (event_var(weapon) = hegrenade) do
	{
		es_setinfo vrcheck 0
		es_keygetvalue vrcheck dndUsers event_var(es_steamid) race
		if (server_var(vrcheck) = troll) do
		{
			es point_hurt event_var(attacker) event_var(userid) event_var(dmg_health)
		}
		es est_burn event_var(userid) 2
	}
	es_setinfo bonus 0
	es_setinfo bonus event_var(dmg_health)
	es_math bonus / 10
	es ma_givehealth event_var(userid) server_var(bonus)
}

block halfling_attacker
{
	es_setinfo bonus 0
	es_setinfo bonus event_var(dmg_health)
	es_math bonus / 20
	es ma_givehealth event_var(userid) server_var(bonus)
}

block greyelf_attacker
{
	es_setinfo bonus 0
	es_setinfo bonus event_var(dmg_health)
	es_math bonus / 20
	es ma_givehealth event_var(userid) server_var(bonus)
}

block vampire_attacker
{
	es_setinfo bonus 0
	es_setinfo bonus event_var(dmg_health)
	es_math bonus / 5
	es_math bonus * 2
	es_setinfo vicrcheck 0
	es_keygetvalue vicrcheck dndUsers event_var(es_steamid) race
	if (event_var(weapon) != point_hurt) do
	{
		if (server_var(vicrcheck) != zombie) do
		{
			if (server_var(vicrcheck) != vampire) do
			{
				if (server_var(vicrcheck) != ghoul) do
				{
					es_setinfo health 0
					es est_gethealth health event_var(attacker)
					es_math health + server_var(bonus)
					es_setinfo maxcheck 0
					es_keygetvalue maxcheck dndExtra event_var(es_attackersteamid) maxhealth
					es_math maxcheck + server_var(bonus)
					if (server_var(maxcheck) > 250) do
					{
						es_setinfo maxcheck 250
					}
					if (server_var(health) <= 250) do
					{
						es ma_givehealth event_var(attacker) server_var(bonus)
					}
					else do
					{
						es ma_sethealth event_var(attacker) 250
					}
					es_keysetvalue dndExtra event_var(es_attackersteamid) maxhealth server_var(maxcheck)
				}
			}
		}
	}
	es_setinfo bonus 0
	es_setinfo bonus event_var(dmg_health)
	es_math bonus / 20
	es_math bonus * 3
	es point_hurt event_var(attacker) event_var(userid) server_var(bonus)
}

block doppelganger_attacker
{
	es_setinfo bonus 0
	es_setinfo bonus event_var(dmg_health)
	es_math bonus / 20
	es point_hurt event_var(attacker) event_var(userid) server_var(bonus)
}

block minotaur_attacker
{
	es_setinfo bonus 0
	es_setinfo bonus event_var(dmg_health)
	es_math bonus / 5
	es point_hurt event_var(attacker) event_var(userid) server_var(bonus)
}

block troll_attacker
{
	es_setinfo bonus 0
	es_setinfo bonus event_var(dmg_health)
	es_math bonus / 10
	es_math bonus * 3
	es point_hurt event_var(attacker) event_var(userid) server_var(bonus)
}

block drow_attacker
{
	es_setinfo fbonus 0
	es_rand fbonus 1 20
	es_setinfo uses 0
	es_keygetvalue uses dndExtra event_var(es_attackersteamid) poisonuses
	if (server_var(uses) >= 1) do
	{
		es_math uses - 1
		es_keysetvalue dndExtra event_var(es_attackersteamid) poisonuses server_var(uses)
		if (server_var(fbonus) != 20) do
		{
			es_setinfo fortbonus 0
			es_keygetvalue fortbonus dndExtra event_var(es_steamid) fortsave
			es_math fbonus + server_var(fortbonus)
			if (server_var(fbonus) < 13) do
			{
				if (server_var(rcheck) != vampire) do
				{
					es_setinfo check 0
					es_keygetvalue check dndExtra event_var(es_steamid) nopoison
					if (server_var(check) = 0) do
					{
						es_setinfo timer 0
						es_keygetvalue timer dndExtra event_var(es_steamid) poison_timer
						if (server_var(timer) = 0) do
						{

							es_tell event_var(attacker) #green Your drow poison has hurt event_var(es_username) for the next 5 seconds.
							es_keysetvalue dndExtra event_var(es_steamid) poison_timer 1
							es_setinfo bonus 0
							es_setinfo bonus event_var(dmg_health)
							es_math bonus / 5
							es_delayed 1 es point_hurt event_var(attacker) event_var(userid) server_var(bonus)
							es_delayed 2 es point_hurt event_var(attacker) event_var(userid) server_var(bonus)
							es_delayed 3 es point_hurt event_var(attacker) event_var(userid) server_var(bonus)
							es_delayed 4 es point_hurt event_var(attacker) event_var(userid) server_var(bonus)
							es_delayed 5 es point_hurt event_var(attacker) event_var(userid) server_var(bonus)
							es_delayed 5 es_keysetvalue dndExtra event_var(es_steamid) poison_timer 0
						}
					}
				}
			}
		}
	}
}

block vampire_victim
{
	es_setinfo dmg_dr 0
	es_setinfo dmg_dr event_var(dmg_health)
	es_math dmg_dr / 5
	es ma_givehealth event_var(userid) server_var(dmg_dr)
}

block minotaur_victim
{
	es_setinfo dmg_dr 0
	es_setinfo dmg_dr event_var(dmg_health)
	es_math dmg_dr / 5
	es ma_givehealth event_var(userid) server_var(dmg_dr)
}

block doppelganger_victim
{
	es_setinfo dmg_dr 0
	es_setinfo dmg_dr event_var(dmg_health)
	es_math dmg_dr / 5
	es ma_givehealth event_var(userid) server_var(dmg_dr)
}

block filcher_victim
{
	es est_setplayercolor event_var(userid) 255 255 255 0
}

block aasimar_victim
{
	es_setinfo dmg_dr 0
	es_setinfo dmg_dr event_var(dmg_health)
	es_math dmg_dr / 20
	es ma_givehealth event_var(userid) server_var(dmg_dr)
}

block zombie_victim
{
	es_setinfo hits 0
	es_keygetvalue hits dndExtra event_var(es_steamid) hitcount
	if (server_var(hits) >= 1) do
	{
		es_math hits + 1
	}
	else do
	{
		es_setinfo hits 1
	}
	es_keysetvalue dndExtra event_var(es_steamid) hitcount server_var(hits)
	es point_hurt event_var(userid) event_var(attacker) 1
	es ma_givehealth event_var(userid) event_var(dmg_health)
	if (server_var(hits) >= 35) then es point_hurt event_var(attacker) event_var(userid) 5000
}

block ghoul_victim
{
	es_setinfo hits 0
	es_keygetvalue hits dndExtra event_var(es_steamid) hitcount
	if (server_var(hits) >= 1) do
	{
		es_math hits + 1
	}
	else do
	{
		es_setinfo hits 1
	}
	es_keysetvalue dndExtra event_var(es_steamid) hitcount server_var(hits)
	es ma_givehealth event_var(userid) event_var(dmg_health)
	if (server_var(hits) >= 7) then es point_hurt event_var(attacker) event_var(userid) 5000
}

block ghoul_attacker
{
	es_setinfo psave 0
	es_rand psave 1 20
	if (server_var(psave) != 20) do
	{
		es_setinfo pfort 0
		es_keygetvalue pfort dndUsers event_var(es_steamid) fortsave
		es_math psave + server_var(pfort)
		if (server_var(psave) < 14) do
		{
			es est_freeze event_var(userid) 1
			es_setinfo dacheck 0
			es_keygetvalue dacheck dndExtra event_var(es_steamid) death_attack
			if (server_var(dacheck) = 0) do
			{
				es_delayed 3 es est_freeze event_var(userid) 0
			}
		}
	}
}

block la_low
{
	es_keysetvalue dndUsers event_var(es_steamid) race Human
	es_keysetvalue dndUsers event_var(es_steamid) la 0
	es_tell event_var(userid) #green Your race has been set to human because your level adjustment is higher than your class levels!
	es_xset rcheck Human
}

block bard_spawn
{
	es_setinfo lcheck 0
	es_keygetvalue lcheck dndUsers event_var(es_steamid) bard
	es_setinfo lacheck 0
	es_keygetvalue lacheck dndUsers event_var(es_steamid) la
	es_math lcheck - server_var(lacheck)
	es_setinfo color 0
	es_keygetvalue color dndExtra event_var(es_steamid) color
	es_setinfo songs 0
	if (server_var(lcheck) <= 0) do
	{
		es_doblock dnd/la_low
		es_math lcheck + server_var(lacheck)
	}
	if (server_var(lcheck) >= 1) do
	{
		es_math color - 105
		es_setinfo songs 1
		es_delayed 10 es_keysetvalue dndExtra event_var(es_steamid) arearegen 1
		if (server_var(lcheck) < 4) do
		{
			es_delayed 10 es arearegen event_var(userid) 4 1 960
		}
	}
	if (server_var(lcheck) >= 2) do
	{
		es_math color - 10
	}
	if (server_var(lcheck) >= 4) do
	{
		es_math color - 10
		if (server_var(lcheck) < 7) do
		{
			es_delayed 10 es arearegen event_var(userid) 4 2 960
		}
	}
	if (server_var(lcheck) >= 5) do
	{
		es_math songs + 1
	}
	if (server_var(lcheck) >= 6) do
	{
		es_math color - 10
	}
	if (server_var(lcheck) >= 7) do
	{
		if (server_var(lcheck) < 10) do
		{
			es_delayed 10 es arearegen event_var(userid) 4 3 960
		}
	}
	if (server_var(lcheck) >= 8) do
	{
		es_math color - 10
	}
	if (server_var(lcheck) >= 9) do
	{
		//es anti_grav event_var(userid) 2000
		es_math songs + 1
	}
	if (server_var(lcheck) >= 10) do
	{
		es_math color - 10
		if (server_var(lcheck) < 13) do
		{
			es_delayed 10 es arearegen event_var(userid) 4 4 960
		}
	}
	if (server_var(lcheck) >= 12) do
	{
		es_math color - 10
	}
	if (server_var(lcheck) >= 13) do
	{
		es_math songs + 1
		if (server_var(lcheck) < 16) do
		{
			es_delayed 10 es arearegen event_var(userid) 4 5 960
		}
	}
	if (server_var(lcheck) >= 14) do
	{
		es_math color - 10
	}
	if (server_var(lcheck) >= 16) do
	{
		es_math color - 10
		if (server_var(lcheck) < 19) do
		{
			es_delayed 10 es arearegen event_var(userid) 4 6 960
		}
	}
	if (server_var(lcheck) >= 17) do
	{
		es_math songs + 1
	}
	if (server_var(lcheck) >= 18) do
	{
		es_math color - 10
	}
	if (server_var(lcheck) >= 19) do
	{
		es_delayed 10 es arearegen event_var(userid) 4 7 960
	}
	if (server_var(lcheck) >= 20) do
	{
		es_math songs + 1
		es_math color - 10
	}
	es_keysetvalue dndExtra event_var(es_steamid) songs server_var(songs)
	es_keysetvalue dndExtra event_var(es_steamid) color server_var(color)
}

block bard_victim
{
	es_setinfo lcheck 0
	es_keygetvalue lcheck dndUsers event_var(es_steamid) bard
	es_setinfo lacheck 0
	es_keygetvalue lacheck dndUsers event_var(es_steamid) la
	es_math lcheck - server_var(lacheck)
	es stealth_off event_var(userid)
	if (server_var(lcheck) >= 6) do
	{
		es_rand random 1 5
		if (server_var(random) = 1) do
		{
			es ma_givehealth event_var(userid) event_var(dmg_health)
			es_tell event_var(userid) #green You have just dodged event_var(dmg_health) damage from an attack.
		}
	}
}

block bard_attacker
{
	es_setinfo lcheck 0
	es_keygetvalue lcheck dndUsers event_var(es_attackersteamid) bard
	es_setinfo lacheck 0
	es_keygetvalue lacheck dndUsers event_var(es_attackersteamid) la
	es_math lcheck - server_var(lacheck)
	es_setinfo cash 75
	es_math cash * server_var(lcheck)
	es_rand random 1 5
	es stealth_off event_var(attacker)
	if (server_var(random) = 1) do
	{
		es ma_takecash event_var(userid) server_var(cash)
		es ma_givecash event_var(attacker) server_var(cash)
		es_tell event_var(attacker) #green You have stolen $ server_var(cash) from your victim.
	}
	if (server_var(lcheck) >= 18) do
	{
		es_rand random 1 6
		if (server_var(random) = 1) do
		{
			if (event_var(es_userteam) = 2) do
			{
				es est_near vic #t 240 event_var(userid) "es ma_drug server_var(vic);es_delayed 2 es ma_drug server_var(vic) 0"
			}
			if (event_var(es_userteam) = 3) do
			{
				es est_near vic #c 240 event_var(userid) "es ma_drug server_var(vic);es_delayed 2 es ma_drug server_var(vic) 0"
			}
		}
	}
}

block bard_say
{
	es_setinfo lcheck 0
	es_keygetvalue lcheck dndUsers event_var(es_steamid) bard
	es_setinfo lacheck 0
	es_keygetvalue lacheck dndUsers event_var(es_steamid) la
	es_math lcheck - server_var(lacheck)
	if (event_var(text) = !skills) do
	{
		es_setinfo skills "Bard Skills:\n"
		if (server_var(lcheck) >= 1) do	
		{
			es_format skills "%1 Use !boost to AOE Damage Boost\n" server_var(skills) server_var(song)
			if (server_var(lcheck) < 4) do
			{
				es_format skills "%1 1pt AOE Healing\n" server_var(skills)
			}
		}
		if (server_var(lcheck) >= 4) do	
		{
			if (server_var(lcheck) < 7) do
			{
				es_format skills "%1 2pt AOE Healing\n" server_var(skills)
			}
		}
		if (server_var(lcheck) >= 5) do
		{
			es_format skills "%1 Use !charge to AOE Speed Boost\n" server_var(skills) server_var(song)
		}
		if (server_var(lcheck) >= 6) do
		{
			es_format skills "%1 Dodge\n" server_var(skills)
		}
		if (server_var(lcheck) >= 7) do	
		{
			if (server_var(lcheck) < 10) do
			{
				es_format skills "%1 3pt AOE Healing\n" server_var(skills)
			}
		}
		if (server_var(lcheck) >= 9) do
		{
			es_format skills "%1 AOE Anti Gravity\n" server_var(skills)
		}
		if (server_var(lcheck) >= 10) do	
		{
			if (server_var(lcheck) < 13) do
			{
				es_format skills "%1 4pt AOE Healing\n" server_var(skills)
			}
		}
		if (server_var(lcheck) >= 11) do
		{
			es_format skills "%1 Use !shock to AOE Damage/Stunt\n" server_var(skills) server_var(song)
		}
		if (server_var(lcheck) >= 13) do	
		{
			if (server_var(lcheck) < 16) do
			{
				es_format skills "%1 5pt AOE Healing\n" server_var(skills)
			}
		}
		if (server_var(lcheck) >= 16) do	
		{
			if (server_var(lcheck) < 19) do
			{
				es_format skills "%1 6pt AOE Healing\n" server_var(skills)
			}
		}
		if (server_var(lcheck) >= 18) do
		{
			es_format skills "%1 AOE Drugging Hits\n" server_var(skills)
		}
		if (server_var(lcheck) >= 19) do	
		{
			es_format skills "%1 7pt AOE Healing\n" server_var(skills)
		}
		if (server_var(lcheck) >= 20) do
		{
			es_format skills "%1 Extend Song(Double all Song Durations)\n" server_var(skills)
		}
		es_setinfo cash 75
		es_math cash * server_var(lcheck)
		es_format skills "%1 Chance to Steal %2 cash on hit.\n" server_var(skills) server_var(cash)
		es_setinfo song 0
		es_keygetvalue song dndExtra event_var(es_steamid) songs
		es_format skills "%1 (%2) Song Uses Left\n" server_var(skills) server_var(song)
		es_setinfo color 0
		es_keygetvalue color dndExtra event_var(es_steamid) color
		es_format skills "%1 Stealth\n Colored @ %2 / 255\n" server_var(skills) server_var(color)
		esnq ma_msay 0 event_var(userid) server_var(skills)
	}
}

block boost
{
	es_setinfo es_userid 0
  	es_getcmduserid es_userid
	es_setinfo es_steamid 0
	es est_getsteam es_steamid server_var(es_userid)
	es_setinfo ccheck 0
	es_keygetvalue ccheck dndUsers server_var(es_steamid) class
	es_setinfo lcheck 0
	es_keygetvalue lcheck dndUsers server_var(es_steamid) server_var(ccheck)	
	es_setinfo lacheck 0
	es_keygetvalue lacheck dndUsers server_var(es_steamid) la
	es_math lcheck - server_var(lacheck)
	if (server_var(ccheck) = bard) do
	{
		if (server_var(lcheck) >= 1) do
		{
			es_setinfo song 0
			es_keygetvalue song dndExtra server_var(es_steamid) songs
			es_setinfo caster_alive 0
			es est_isalive caster_alive server_var(es_userid)
			if (server_var(caster_alive) = 0) then es_setinfo song 0
			if (server_var(song) > 0) do
			{
				es_setinfo active 0
				es_keygetvalue active dndExtra server_var(es_steamid) active_song
				if (server_var(active) = 0) do
				{
					es_keysetvalue dndExtra server_var(es_steamid) active_song 1
					if (server_var(lcheck) < 20) do
					{
						es_delayed 10 es_keysetvalue dndExtra server_Var(es_steamid) active_song 0
					}
					else do
					{
						es_delayed 20 es_keysetvalue dndExtra server_Var(es_steamid) active_song 0
					}
					es_setinfo team 0
					es est_getteam team server_var(es_userid)
					if (server_var(team) = 2) do
					{
						es est_near user #t 480 server_var(es_userid) "es_doblock dnd/damage_boost"
					}
					if (server_var(team) = 3) do
					{
						es est_near user #c 480 server_var(es_userid) "es_doblock dnd/damage_boost"
					}
					es_math song - 1
					es_keysetvalue dndExtra server_var(es_steamid) songs server_var(song)
				}
				else do
				{
					es_tell server_var(es_userid) #green You can only have one song active at a time!
				}
			}
			else do
			{
				es_tell server_var(es_userid) #green You have no more song uses for today!
			}
		}
	}
}

block damage_boost
{
	es_setinfo steam 0
	es est_getsteam steam server_var(user)
	es_keysetvalue dndExtra server_var(steam) bard_dmg 1
	if (server_var(lcheck) < 20) do
	{
		es_delayed 10 es_keysetvalue dndExtra server_var(steam) bard_dmg 0
		es_delayed 10 es_tell server_var(user) #green Your bonus damage from the bard boost has ended.
		es_tell server_var(user) #green A friendly bard has boosted your damage for the next 10 seconds!
	}
	else do
	{
		es_delayed 20 es_keysetvalue dndExtra server_var(steam) bard_dmg 0
		es_delayed 20 es_tell server_var(user) #green Your bonus damage from the bard boost has ended.
		es_tell server_var(user) #green A friendly bard has boosted your damage for the next 20 seconds!
	}
}

block charge
{
	es_setinfo es_userid 0
  	es_getcmduserid es_userid
	es_setinfo es_steamid 0
	es est_getsteam es_steamid server_var(es_userid)
	es_setinfo ccheck 0
	es_keygetvalue ccheck dndUsers server_var(es_steamid) class
	es_setinfo lcheck 0
	es_keygetvalue lcheck dndUsers server_var(es_steamid) server_var(ccheck)	
	es_setinfo lacheck 0
	es_keygetvalue lacheck dndUsers server_var(es_steamid) la
	es_math lcheck - server_var(lacheck)
	if (server_var(ccheck) = bard) do
	{
		if (server_var(lcheck) >= 5) do
		{
			es_setinfo song 0
			es_keygetvalue song dndExtra server_var(es_steamid) songs
			es_setinfo caster_alive 0
			es est_isalive caster_alive server_var(es_userid)
			if (server_var(caster_alive) = 0) then es_setinfo song 0
			if (server_var(song) > 0) do
			{
				es_setinfo active 0
				es_keygetvalue active dndExtra server_var(es_steamid) active_song
				if (server_var(active) = 0) do
				{
					es_keysetvalue dndExtra server_var(es_steamid) active_song 1
					if (server_var(lcheck) < 20) do
					{
						es_delayed 4 es_keysetvalue dndExtra server_Var(es_steamid) active_song 0
					}
					else do
					{
						es_delayed 8 es_keysetvalue dndExtra server_Var(es_steamid) active_song 0
					}
					es_setinfo team 0
					es est_getteam team server_var(es_userid)
					if (server_var(team) = 2) do
					{
						es est_near user #t 480 server_var(es_userid) "es_doblock dnd/charge_boost"
					}
					if (server_var(team) = 3) do
					{
						es est_near user #c 480 server_var(es_userid) "es_doblock dnd/charge_boost"
					}
					es_math song - 1
					es_keysetvalue dndExtra server_var(es_steamid) songs server_var(song)
				}
				else do
				{
					es_tell server_var(es_userid) #green You can only have one song active at a time!
				}
			}
			else do
			{
				es_tell server_var(es_userid) #green You have no more song uses for today!
			}
		}
	}
}

block charge_boost
{
	es_setinfo steam 0
	es est_getsteam steam server_var(user)
	es_setinfo pcheck 0
	es_keygetvalue pcheck dndUsers server_var(steam) prestige
	if (server_var(pcheck) != rpc2) do
	{
		es_setinfo old_speed 0
		es_setinfo new_speed 0
		es_keygetvalue old_speed dndExtra server_var(steam) speed
		es_setinfo new_speed server_var(old_speed)
		es_math new_speed + .25
		es est_speed server_var(user) server_var(new_speed)
		if (server_var(lcheck) < 20) do
		{
			es_delayed 4 es est_speed server_var(user) server_var(old_speed)
			es_tell server_var(user) #green A friendly bard has boosted your speed for the next 4 seconds!
			es_delayed 4 es_tell server_var(user) #green Your bard speed boost has ended.
		}
		else do
		{
			es_delayed 8 es est_speed server_var(user) server_var(old_speed)
			es_tell server_var(user) #green A friendly bard has boosted your speed for the next 8 seconds!
			es_delayed 8 es_tell server_var(user) #green Your bard speed boost has ended.
		}
	}
}

block shock
{
	es_setinfo es_userid 0
  	es_getcmduserid es_userid
	es_setinfo es_steamid 0
	es est_getsteam es_steamid server_var(es_userid)
	es_setinfo ccheck 0
	es_keygetvalue ccheck dndUsers server_var(es_steamid) class
	es_setinfo lcheck 0
	es_keygetvalue lcheck dndUsers server_var(es_steamid) server_var(ccheck)	
	es_setinfo lacheck 0
	es_keygetvalue lacheck dndUsers server_var(es_steamid) la
	es_math lcheck - server_var(lacheck)
	if (server_var(ccheck) = bard) do
	{
		if (server_var(lcheck) >= 11) do
		{
			es_setinfo song 0
			es_keygetvalue song dndExtra server_var(es_steamid) songs
			es_setinfo caster_alive 0
			es est_isalive caster_alive server_var(es_userid)
			if (server_var(caster_alive) = 0) then es_setinfo song 0
			if (server_var(song) > 0) do
			{
				es_setinfo active 0
				es_keygetvalue active dndExtra server_var(es_steamid) active_song
				if (server_var(active) = 0) do
				{
					es_keysetvalue dndExtra server_var(es_steamid) active_song 1
					es_delayed 5 es_keysetvalue dndExtra server_Var(es_steamid) active_song 0
					es_setinfo team 0
					es est_getteam team server_var(es_userid)
					if (server_var(team) = 2) do
					{
						if (server_var(lcheck) < 20) do
						{
							es_delayed 1 es est_near user #c 360 server_var(es_userid) "es_doblock dnd/stunning"
							es_delayed 2 es est_near user #c 360 server_var(es_userid) "es_doblock dnd/stunning"
							es_delayed 3 es est_near user #c 360 server_var(es_userid) "es_doblock dnd/stunning"
							es_tell server_var(es_userid) #green Your song of stunning is active for the next 3 seconds!
							es_delayed 3 es_tell server_var(es_userid) #green Your song of stunning has ended.
						}
						else do
						{
							es_delayed 1 es est_near user #c 360 server_var(es_userid) "es_doblock dnd/stunning"
							es_delayed 2 es est_near user #c 360 server_var(es_userid) "es_doblock dnd/stunning"
							es_delayed 3 es est_near user #c 360 server_var(es_userid) "es_doblock dnd/stunning"
							es_delayed 4 es est_near user #c 360 server_var(es_userid) "es_doblock dnd/stunning"
							es_delayed 5 es est_near user #c 360 server_var(es_userid) "es_doblock dnd/stunning"
							es_delayed 6 es est_near user #c 360 server_var(es_userid) "es_doblock dnd/stunning"
							es_tell server_var(es_userid) #green Your song of stunning is active for the next 6 seconds!
							es_delayed 6 es_tell server_var(es_userid) #green Your song of stunning has ended.
						}
					}
					if (server_var(team) = 3) do
					{
						if (server_var(lcheck) < 20) do
						{
							es_delayed 1 es est_near user #t 360 server_var(es_userid) "es_doblock dnd/stunning"
							es_delayed 2 es est_near user #t 360 server_var(es_userid) "es_doblock dnd/stunning"
							es_delayed 3 es est_near user #t 360 server_var(es_userid) "es_doblock dnd/stunning"
							es_tell server_var(es_userid) #green Your song of stunning is active for the next 3 seconds!
							es_delayed 3 es_tell server_var(es_userid) #green Your song of stunning has ended.
						}
						else do
						{
							es_delayed 1 es est_near user #t 360 server_var(es_userid) "es_doblock dnd/stunning"
							es_delayed 2 es est_near user #t 360 server_var(es_userid) "es_doblock dnd/stunning"
							es_delayed 3 es est_near user #t 360 server_var(es_userid) "es_doblock dnd/stunning"
							es_delayed 4 es est_near user #t 360 server_var(es_userid) "es_doblock dnd/stunning"
							es_delayed 5 es est_near user #t 360 server_var(es_userid) "es_doblock dnd/stunning"
							es_delayed 6 es est_near user #t 360 server_var(es_userid) "es_doblock dnd/stunning"
							es_tell server_var(es_userid) #green Your song of stunning is active for the next 6 seconds!
							es_delayed 6 es_tell server_var(es_userid) #green Your song of stunning has ended.
						}
					}
					es_math song - 1
					es_keysetvalue dndExtra server_var(es_steamid) songs server_var(song)
				}
				else do
				{
					es_tell server_var(es_userid) #green You can only have one song active at a time!
				}
			}
			else do
			{
				es_tell server_var(es_userid) #green You have no more song uses for today!
			}
		}
	}
}

block stunning
{
	es_setinfo save 0
	es_rand save 1 20
	if (server_var(save) != 20) do
	{
		es_setinfo fort 0
		es_setinfo steam 0
		es est_getsteam steam server_var(user)
		es_keygetvalue fort dndExtra server_var(steam) fortsave
		es_math save + server_var(fort)
		if (server_var(lcheck) > 10) then es_setinfo level 10
		es_setinfo dmg server_var(lcheck)
		if (server_var(save) > 16) do
		{
			es_math dmg / 2
		}
		if (server_var(user) != server_var(es_userid)) do
		{
			es point_hurt server_var(es_userid) server_var(user) server_var(dmg)
			if (server_var(save) <= 16) do
			{
				es est_freeze server_var(user) 1
				es_setinfo dacheck 0
				es_keygetvalue dacheck dndExtra server_var(steam) death_attack
				if (server_var(dacheck) = 0) do
				{
					es_delayed .9 es est_freeze server_var(user) 0
				}
			}
		}
	}
}

block necro_spawn
{
	es_setinfo lcheck 0
	es_keygetvalue lcheck dndUsers event_var(es_steamid) necromancer
	es_setinfo lacheck 0
	es_keygetvalue lacheck dndUsers event_var(es_steamid) la
	es_math lcheck - server_var(lacheck)
	if (server_var(lcheck) <= 0) do
	{
		es_doblock dnd/la_low
		es_math lcheck + server_var(lacheck)
	}
	es_setinfo mana 0
	es_keygetvalue mana dndExtra event_var(es_steamid) mana
	if (server_var(lcheck) >= 1) do
	{
		es_math mana + 15
		es_setinfo spell 0
		es_keysetvalue dndExtra event_var(es_steamid) spell server_var(spell)
	}

	if (server_var(lcheck) >= 2) do
	{
		es_math mana + 10
	}

	if (server_var(lcheck) >= 3) do
	{
		es_math mana + 5
	}

	if (server_var(lcheck) >= 4) do
	{
		es_math mana + 10
	}

	if (server_var(lcheck) >= 5) do
	{
		es_math mana + 5
	}

	if (server_var(lcheck) >= 6) do
	{
		es_math mana + 10
	}

	if (server_var(lcheck) >= 7) do
	{
		es_math mana + 5
	}

	if (server_var(lcheck) >= 8) do
	{
		es_math mana + 10
	}

	if (server_var(lcheck) >= 9) do
	{
		es_math mana + 5
	}

	if (server_var(lcheck) >= 10) do
	{
		es_math mana + 10
	}

	if (server_var(lcheck) >= 11) do
	{
		es_math mana + 5
	}

	if (server_var(lcheck) >= 12) do
	{
		es_math mana + 10
	}

	if (server_var(lcheck) >= 13) do
	{
		es_math mana + 5
	}

	if (server_var(lcheck) >= 14) do
	{
		es_math mana + 10
	}

	if (server_var(lcheck) >= 15) do
	{
		es_math mana + 5
		es_tell event_var(userid) #green You can now use the Fiveseven and the elites!
	}

	if (server_var(lcheck) >= 16) do
	{
		es_math mana + 10
	}

	if (server_var(lcheck) >= 17) do
	{
		es_math mana + 5
	}

	if (server_var(lcheck) >= 18) do
	{
		es_math mana + 10
	}

	if (server_var(lcheck) >= 19) do
	{
		es_math mana + 10
	}

	if (server_var(lcheck) >= 20) do
	{
		es_math mana + 10
	}
	es_keysetvalue dndExtra event_var(es_steamid) mana server_var(mana)
	es_doblock dnd/show_mana	
}

block necro_attacker
{
	es_setinfo lcheck 0
	es_keygetvalue lcheck dndUsers event_var(es_attackersteamid) necromancer
	es_setinfo lacheck 0
	es_keygetvalue lacheck dndUsers event_var(es_attackersteamid) la
	es_math lcheck - server_var(lacheck)
	if (server_var(lcheck) >= 11) do
	{
		es_setinfo mana 0
		es_setinfo mana event_var(dmg_health)
		es_math mana / 10
		es_setinfo usermana 0
		es_setinfo victimmana 0
		es_keygetvalue usermana dndExtra event_var(es_attackersteamid) mana
		es_keygetvalue victimmana dndExtra event_var(es_steamid) mana
		es_math usermana + server_var(mana)
		es_math victimmana - server_var(mana)
		es_keysetvalue dndExtra event_var(es_attackersteamid) mana server_var(usermana)
		es_keysetvalue dndExtra event_var(es_steamid) mana server_var(victimmana)
		es_tell event_var(attcker) #green You have gained server_var(mana) mana.
		if (server_var(victimmana) > 0) do
		{
			es_tell event_var(userid) #green You have lost server_var(mana) mana.
		}
	}	
}

block necro_say
{
	es_setinfo lcheck 0
	es_keygetvalue lcheck dndUsers event_var(es_steamid) necromancer
	es_setinfo lacheck 0
	es_keygetvalue lacheck dndUsers event_var(es_steamid) la
	es_math lcheck - server_var(lacheck)
	if (event_var(text) = !spells) do
	{
		es_setinfo spells "NecroMancer Spells:\n"
		if (server_var(lcheck) >= 1) do
		{
			es_format spells "%1 !burn 7 Mana - AOE Fire/Damage\n" server_var(spells)
		}
		if (server_var(lcheck) >= 5) do
		{
			es_format spells "%1 !zombie 25 Mana - Rasie a teamate as a zombie\n" server_var(spells)
		}
		if (server_var(lcheck) >= 9) do
		{
			es_format spells "%1 !fire 15 Mana - Burn/Dmg\n" server_var(spells)
		}
		if (server_var(lcheck) >= 13) do
		{
			es_format spells "%1 !slap 15 Mana - Slap, High\n" server_var(spells)
		}
		if (server_var(lcheck) >= 17) do
		{
			es_format spells "%1 !dawnofdead 50 Mana - Rasie all dead players as zombies.\n" server_var(spells)
		}
		esnq ma_msay 0 event_var(userid) server_var(spells)
	}
	if (event_Var(text) = !skills) do
	{
		es_setinfo skills "NecroMancer Skills:\n" server_Var(skills)
		if (server_var(lcheck) >= 7) do
		{
			es_format skills "%1 Leeching Death\n" server_var(skills)
		}
		if (server_var(lcheck) >= 3) do
		{
			es_format skills "%1 Exploding Death\n" server_var(skills)
		}
		if (server_var(lcheck) >= 11) do
		{
			es_format skills "%1 Syphon Mana\n" server_var(skills)
		}
		esnq ma_msay 0 event_var(userid) server_var(skills)
	}
	if (event_var(text) = !mana) then es_doblock dnd/show_mana	
}

block necro_death
{
	es_setinfo lcheck 0
	es_keygetvalue lcheck dndUsers event_var(es_steamid) necromancer
	es_setinfo lacheck 0
	es_keygetvalue lacheck dndUsers event_var(es_steamid) la
	es_math lcheck - server_var(lacheck)
	if (server_var(lcheck) >= 3) do
	{
		es est_near bang #all 360 event_var(userid) "es point_hurt event_var(userid) server_var(bang) 35"
	}
	if (event_var(es_userteam) = 2) do
	{
		est_loop zombie #t "es zombiekill server_var(zombie) event_var(userid)"
	}
	if (event_var(es_userteam) = 3) do
	{
		est_loop zombie #c "es zombiekill server_var(zombie) event_var(userid)"
	}
}

block dawnofdead
{
	es_setinfo es_userid 0
  	es_getcmduserid es_userid
	es_setinfo es_steamid 0
	es est_getsteam es_steamid server_var(es_userid)
	es_setinfo ccheck 0
	es_keygetvalue ccheck dndUsers server_var(es_steamid) class
	es_setinfo lcheck 0
	es_keygetvalue lcheck dndUsers server_var(es_steamid) server_var(ccheck)	
	es_setinfo lacheck 0
	es_keygetvalue lacheck dndUsers server_var(es_steamid) la
	es_math lcheck - server_var(lacheck)
	if (server_var(ccheck) = necromancer) do
	{
		if (server_var(lcheck) >= 17) do
		{
			es_setinfo mana 0
			es_keygetvalue mana dndExtra server_var(es_steamid) mana
			es_setinfo caster_alive 0
			es est_isalive caster_alive server_var(es_userid)
			if (server_var(caster_alive) = 0) then es_setinfo mana 0
			if (server_var(mana) >= 50) do
			{	
				es est_loop deaduser #d "es zombieall server_var(deaduser) server_var(es_userid)"
				es_math mana - 50
				es_keysetvalue dndExtra server_var(es_steamid) mana server_var(mana)
			}
			else do
			{
				es_tell server_var(es_userid) #green You don't have the mana to cast dawn of dead.
			}
		}
	}
}

block zombieall
{
	es_setinfo userid 0
	es_setinfo maker

  	es_getargv userid 1
	es_getargv maker 2

	es_setinfo steamcheck 0
	es est_getsteam steamcheck server_var(userid)
	es_setinfo x 0
	es_setinfo y 0
	es_setinfo z 0
	es_keygetvalue x dndExtra server_var(steamcheck) d_x
	es_keygetvalue y dndExtra server_var(steamcheck) d_y
	es_keygetvalue z dndExtra server_var(steamcheck) d_z
	es_setinfo race 0
	es_setinfo class 0
	es_setinfo prestige 0
	es_setinfo monster 0
	es_setinfo curxp 0
	es_setinfo la 0
	es_keygetvalue race dndUsers server_var(steamcheck) race
	es_keygetvalue class dndUsers server_var(steamcheck) class
	es_keygetvalue prestige dndUsers server_var(steamcheck) prestige
	es_keygetvalue curxp dndUsers server_var(steamcheck) curxp
	es_keygetvalue la dndUsers server_var(steamcheck) la
	es_keygetvalue monster dndUsers server_var(steamcheck) monster
	es_keysetvalue dndExtra server_var(steamcheck) race server_var(race)
	es_keysetvalue dndExtra server_var(steamcheck) class server_var(class)
	es_keysetvalue dndExtra server_var(steamcheck) prestige server_var(prestige)
	es_keysetvalue dndExtra server_var(steamcheck) la server_var(la)
	es_keysetvalue dndExtra server_var(steamcheck) monster server_var(monster)
	es_keysetvalue dndExtra server_var(steamcheck) curxp server_var(curxp)
	es_keysetvalue dndExtra server_var(steamcheck) zombie 1
	es_keysetvalue dndUsers server_var(steamcheck) race Zombie
	es_keysetvalue dndExtra server_var(steamcheck) makeruser server_var(maker)
	es_keysetvalue dndUsers server_var(steamcheck) monster 1
	es est_spawn server_var(userid)
	es ma_teleport server_var(userid) server_var(x) server_var(y) server_var(z)
}

block zombiekill
{
	es_setinfo userid 0
	es_setinfo necroid 0

  	es_getargv userid 1
  	es_getargv necroid 2

	es_setinfo es_steamid 0
	es est_getsteam es_steamid server_var(userid)
	es_setinfo necro_steamid 0
	es est_getsteam necro_steamid server_var(necroid)
	es_setinfo zcheck 0
	es_keygetvalue zcheck dndExtra server_var(es_steamid) zombie

	if (server_var(zcheck) = 1) do
	{
		es_setinfo makersteam 0
		es_keygetvalue makersteam dndExtra server_var(es_steamid) makersteam
		if (server_var(makersteam) = server_var(necro_steamid)) do
		{
			es est_burn server_var(userid) 30
			es_tell server_var(userid) #green You have burst into flames because the person who made you has died!
		}
	}
}

block necro_death_attacker
{
	es_setinfo lcheck 0
	es_keygetvalue lcheck dndUsers event_var(es_attackersteamid) necromancer
	es_setinfo lacheck 0
	es_keygetvalue lacheck dndUsers event_var(es_attackersteamid) la
	es_math lcheck - server_var(lacheck)
	if (server_var(lcheck) >= 7) do
	{
		es_setinfo maxhealth 0
		es_keygetvalue maxhealth dndExtra event_var(es_attackersteamid) maxhealth
		if (event_var(headshot) = 1) do
		{
			es ma_givehealth event_var(attacker) 25
			es_math maxhealth + 25
			es_tell event_var(attacker) #green You have gained 25 health for scoring a head shot as a necromancer!
		}
		else do
		{
			es ma_givehealth event_var(attacker) 15
			es_math maxhealth + 15
			es_tell event_var(attacker) #green You have gained 15 health for scoring a kill as a necromancer!
		}
		es_keysetvalue dndExtra event_var(es_attackersteamid) maxhealth server_var(maxhealth)
	}
}

block slap
{
	es_setinfo es_userid 0
  	es_getcmduserid es_userid
	es_setinfo es_steamid 0
	es est_getsteam es_steamid server_var(es_userid)
	es_setinfo ccheck 0
	es_keygetvalue ccheck dndUsers server_var(es_steamid) class
	es_setinfo lcheck 0
	es_keygetvalue lcheck dndUsers server_var(es_steamid) server_var(ccheck)	
	es_setinfo lacheck 0
	es_keygetvalue lacheck dndUsers server_var(es_steamid) la
	es_math lcheck - server_var(lacheck)
	if (server_var(ccheck) = necromancer) do
	{
		if (server_var(lcheck) >= 13) do
		{
			es_setinfo mana 0
			es_keygetvalue mana dndExtra server_var(es_steamid) mana
			es_setinfo caster_alive 0
			es est_isalive caster_alive server_var(es_userid)
			if (server_var(caster_alive) = 0) then es_setinfo mana 0
			if (server_var(mana) >= 15) do
			{
				es_setinfo point z7
				es est_getviewplayer server_var(es_userid) point
				if (server_var(point) != z7) do
				{
					es_math mana - 15
					es_setinfo save 0
					es_setinfo ref 0
					es_rand save 1 20
					es_tell server_var(es_userid) #green You have cast entangling roots!
					if (server_var(save) != 20) do
					{
						es_keygetvalue ref dndExtra server_var(es_steamid) reflexsave
						es_math save + server_var(ref)
						if (server_var(save) < 19) do
						{
							es ma_slap server_var(point) 0
							es ma_slap server_var(point) 0
							es ma_slap server_var(point) 0
							es ma_slap server_var(point) 0
							es ma_slap server_var(point) 0
							es ma_slap server_var(point) 0
						}
						else do
						{
							es ma_slap server_var(point) 0
							es ma_slap server_var(point) 0
							es ma_slap server_var(point) 0
						}
						es_tell server_Var(es_userid) #green You have cast forceful hand!
					}
				}
			}
			es_keysetvalue dndExtra server_var(es_steamid) mana server_var(mana)
		}
	}	
}

block zombie
{
	es_setinfo es_userid 0
  	es_getcmduserid es_userid
	es_setinfo es_steamid 0
	es est_getsteam es_steamid server_var(es_userid)
	es_setinfo ccheck 0
	es_keygetvalue ccheck dndUsers server_var(es_steamid) class
	es_setinfo lcheck 0
	es_keygetvalue lcheck dndUsers server_var(es_steamid) server_var(ccheck)	
	es_setinfo lacheck 0
	es_keygetvalue lacheck dndUsers server_var(es_steamid) la
	es_math lcheck - server_var(lacheck)
	if (server_var(ccheck) = necromancer) do
	{
		if (server_var(lcheck) >= 5) do
		{
			es_setinfo mana 0
			es_keygetvalue mana dndExtra server_var(es_steamid) mana
			es_setinfo caster_alive 0
			es est_isalive caster_alive server_var(es_userid)
			if (server_var(caster_alive) = 0) then es_setinfo mana 0
			{
				if (server_var(mana) >= 25) do
				{
					es_keysetvalue dndExtra server_var(es_steamid) 1 0
					es_keysetvalue dndExtra server_var(es_steamid) 2 0
					es_keysetvalue dndExtra server_var(es_steamid) 3 0
					es_keysetvalue dndExtra server_var(es_steamid) 4 0
					es_keysetvalue dndExtra server_var(es_steamid) 5 0
					es_keysetvalue dndExtra server_var(es_steamid) 6 0
					es_keysetvalue dndExtra server_var(es_steamid) 7 0
					es_keysetvalue dndExtra server_var(es_steamid) 8 0
					es_keysetvalue dndExtra server_var(es_steamid) 9 0
					popup delete zombiemenu
					popup create zombiemenu
					popup addline zombiemenu " Choose a dead teamate to turn into a undead:"
					es_setinfo zplayer 0
					es_setinfo team_check 0
					es est_getteam team_check server_var(es_userid)
					es_setinfo znumber 0
					if (server_var(team_check) = 3) do
					{
						es est_loop zplayer #d!t!s!u "es_doblock dnd/zmenuadd"
					}
					if (server_var(team_check) = 2) do
					{
						es est_loop zplayer #d!c!s!u "es_doblock dnd/zmenuadd"
					}
					popup menuselect zombiemenu dnd/raiseplayer
					es_setinfo 1check 0
					es_keygetvalue 1check dndExtra server_var(es_steamid) 1
					if (server_var(1check) != 0) do
					{
						es popup send zombiemenu server_var(es_userid)
					}
					else do
					{
						es_tell server_var(es_userid) #green You have no dead teamates right now!
					}
				}
			}
		}
	}
}

block zmenuadd
{
	es_setinfo zsteam 0
	es est_getsteam zsteam server_var(zplayer)
	es_setinfo zcheck 0
	es_keygetvalue zcheck dndExtra server_var(zsteam) zombie
	if (server_var(zcheck) = 0) do
	{
		es_setinfo zteam 0
		es est_getteam zteam server_var(zplayer)
		if (server_var(zteam) >= 2) do
		{
			es_setinfo zname 0
			es est_getname zname server_var(zplayer)
			if (server_var(znumber) = 0) do
			{
				es_setinfo znumber 1
			}
			else do
			{
				es_math znumber + 1
			}
			popup addlinef zombiemenu "-> %1. %2" znumber zname
			es_keysetvalue dndExtra server_var(es_steamid) server_var(znumber) server_var(zplayer)
		}
	}
}

block raiseplayer
{
	es_setinfo necsteam 0
	es est_getsteam necsteam server_var(_popup_userid)
	es_setinfo zplayer 0
	if (server_var(_popup_choice) = 1) do
	{
		es_keygetvalue zplayer dndExtra server_var(necsteam) 1
		es popup send zombieghoul server_var(_popup_userid)
	}
	if (server_var(_popup_choice) = 2) do
	{
		es_keygetvalue zplayer dndExtra server_var(necsteam) 2
		if (server_var(zplayer) != 0) do
		{
			es popup send zombieghoul server_var(_popup_userid)
		}
	}
	if (server_var(_popup_choice) = 3) do
	{
		es_keygetvalue zplayer dndExtra server_var(necsteam) 3
		if (server_var(zplayer) != 0) do
		{
			es popup send zombieghoul server_var(_popup_userid)
		}
	}
	if (server_var(_popup_choice) = 4) do
	{
		es_keygetvalue zplayer dndExtra server_var(necsteam) 4
		if (server_var(zplayer) != 0) do
		{
			es popup send zombieghoul server_var(_popup_userid)
		}
	}
	if (server_var(_popup_choice) = 5) do
	{
		es_keygetvalue zplayer dndExtra server_var(necsteam) 5
		if (server_var(zplayer) != 0) do
		{
			es popup send zombieghoul server_var(_popup_userid)
		}
	}
	if (server_var(_popup_choice) = 6) do
	{
		es_keygetvalue zplayer dndExtra server_var(necsteam) 6
		if (server_var(zplayer) != 0) do
		{
			es popup send zombieghoul server_var(_popup_userid)
		}
	}
	if (server_var(_popup_choice) = 7) do
	{
		es_keygetvalue zplayer dndExtra server_var(necsteam) 7
		if (server_var(zplayer) != 0) do
		{
			es popup send zombieghoul server_var(_popup_userid)
		}
	}
	if (server_var(_popup_choice) = 8) do
	{
		es_keygetvalue zplayer dndExtra server_var(necsteam) 8
		if (server_var(zplayer) != 0) do
		{
			es popup send zombieghoul server_var(_popup_userid)
		}
	}
	if (server_var(_popup_choice) = 9) do
	{
		es_keygetvalue zplayer dndExtra server_var(necsteam) 9
		if (server_var(zplayer) != 0) do
		{
			es popup send zombieghoul server_var(_popup_userid)
		}
	}
}

block aoefire
{
	es_setinfo es_userid 0
  	es_getcmduserid es_userid
	es_setinfo es_steamid 0
	es est_getsteam es_steamid server_var(es_userid)
	es_setinfo ccheck 0
	es_keygetvalue ccheck dndUsers server_var(es_steamid) class
	es_setinfo lcheck 0
	es_keygetvalue lcheck dndUsers server_var(es_steamid) server_var(ccheck)	
	es_setinfo lacheck 0
	es_keygetvalue lacheck dndUsers server_var(es_steamid) la
	es_math lcheck - server_var(lacheck)
	if (server_var(ccheck) = necromancer) do
	{
		if (server_var(lcheck) >= 1) do
		{	
			es_setinfo spell 0
			es_keygetvalue spell dndExtra server_var(es_steamid) spell
			if(server_var(spell) = 0) do
			{
				if (server_var(lcheck) > 10) then es_setinfo lcheck 10
				es_setinfo delay server_var(lcheck)
				es_math delay / 2
				if (server_var(delay) >= 5) then es_setinfo delay 4.5
				es_keysetvalue dndExtra server_var(es_steamid) spell 1
				es_delayed server_var(delay) es_keysetvalue dndExtra server_var(es_steamid) spell 0
				es_setinfo mana 0
				es_keygetvalue mana dndExtra server_var(es_steamid) mana
				es_setinfo caster_alive 0
				es est_isalive caster_alive server_var(es_userid)
				if (server_var(caster_alive) = 0) then es_setinfo mana 0
				if (server_var(mana) >= 7) do
				{
					es_math mana - 7
					es_keysetvalue dndExtra server_var(es_steamid) mana server_var(mana)
					es est_Near burnvic #all 480 server_var(es_userid) "es_doblock dnd/burn"
					es_tell server_var(es_userid) #green You have cast hellfire! BURN!
				}
			}
		}
	}
}

block burn
{
	es_setinfo save 0
	es_setinfo ref 0
	es_rand save 1 20
	if (server_var(save) != 20) do
	{
		if (server_var(es_userid) != server_var(burnvic)) do
		{
			es_setinfo steamcheck 0
			es est_getsteam steamcheck server_var(burnvic)
			es_keygetvalue ref dndExtra server_var(steamcheck) reflexsave
			es_math save + server_var(ref)
			es_setinfo dmg 5
			es_math dmg * server_var(lcheck)
			es_setinfo vrcheck 0
			es_keygetvalue vrcheck dndUsers server_var(steamcheck) race
			if (server_var(vrcheck) = troll) do
			{
				es_math dmg * 2
			}
			if (server_var(save) < 15) do
			{
				es est_burn server_var(burnvic) 6
				es point_hurt server_var(es_userid) server_var(burnvic) server_var(dmg)
			}
			else do
			{
				es_math dmg / 2
				es point_hurt server_var(es_userid) server_var(burnvic) server_var(dmg)
			}
		}
	}
}

block monk_spawn
{
	es_setinfo lcheck 0
	es_keygetvalue lcheck dndUsers event_var(es_steamid) monk
	es_setinfo lacheck 0
	es_keygetvalue lacheck dndUsers event_var(es_steamid) la
	es_math lcheck - server_var(lacheck)
	if (server_var(lcheck) <= 0) do
	{
		es_doblock dnd/la_low
		es_math lcheck + server_var(lacheck)
	}
	es_setinfo color 0
	es_keygetvalue color dndExtra event_var(es_steamid) color
	es_setinfo speed 0
	es_keygetvalue speed dndExtra event_var(es_steamid) speed
	es_math color - 230
	if (server_var(lcheck) >= 3) do
	{
		es_math speed + .05
	}
	if (server_var(lcheck) >= 6) do
	{
		es_math speed + .05
	}
	if (server_var(lcheck) >= 7) do
	{
		es_delayed 9 es_keysetvalue dndExtra event_Var(es_steamid) regen 1
		es_delayed 10 es regen event_var(userid) 2 2
	}
	if (server_var(lcheck) >= 9) do
	{
		es_math speed + .05
	}
	if (server_var(lcheck) >= 11) do
	{
		es_keysetvalue dndExtra event_var(es_steamid) nopoison 1
	}
	if (server_var(lcheck) >= 12) do
	{
		es_keysetvalue dndExtra event_var(es_steamid) tele_count 1
		es_tell event_var(userid) #green Use !tele1/!tele2 and !save1/!save2 1/Rnd
		es_math speed + .05
	}
	if (server_var(lcheck) >= 14) do
	{
		es_tell event_var(userid) #green Use !escape in console to get away.
	}
	if (server_var(lcheck) >= 15) do
	{
		es_math speed + .05
	}
	if (server_var(lcheck) >= 18) do
	{
		es_math speed + .05
	}
	es_keysetvalue dndExtra event_var(es_steamid) color server_var(color)
	es_keysetvalue dndExtra event_var(es_steamid) speed server_var(speed)
}

block monk_attacker
{
	es_setinfo lcheck 0
	es_keygetvalue lcheck dndUsers event_var(es_attackersteamid) monk
	es_setinfo lacheck 0
	es_keygetvalue lacheck dndUsers event_var(es_attackersteamid) la
	es_math lcheck - server_var(lacheck)
	es_setinfo bonus 0
	es_setinfo bonus event_Var(dmg_health)
	es_math bonus / 3
	es stealth_off event_var(attacker)
	if (server_var(lcheck) >= 4) do
	{
		es point_hurt event_var(attacker) event_var(userid) server_var(bonus)
	}
	if (server_var(lcheck) >= 10) do
	{
		es point_hurt event_var(attacker) event_var(userid) server_var(bonus)
	}
	if (server_var(lcheck) >= 16) do
	{
		es point_hurt event_var(attacker) event_var(userid) server_var(bonus)
	}
}

block monk_victim
{
	es_setinfo lcheck 0
	es_keygetvalue lcheck dndUsers event_var(es_steamid) monk
	es_setinfo lacheck 0
	es_keygetvalue lacheck dndUsers event_var(es_steamid) la
	es_math lcheck - server_var(lacheck)
	if (server_var(lcheck) <= 0) do
	{
		es_doblock dnd/la_low
		es_math lcheck + server_var(lacheck)
	}
	es stealth_off event_var(userid)
	if (server_var(lcheck) >= 2) do
	{
		if (server_var(lcheck) < 9) do
		{
			es_rand random 1 5
			if (server_var(random) = 1) do
			{
				es ma_givehealth event_var(userid) event_var(dmg_health)
				es_tell event_var(userid) #green You have dodged event_var(dmg_health) from an attack.
			}
		}
	}
	if (server_var(lcheck) >= 9) do
	{
		es_rand random 1 3
		if (server_var(random) = 1) do
		{
			es ma_givehealth event_var(userid) event_var(dmg_health)
			es_tell event_var(userid) #green You have dodged event_var(dmg_health) from an attack.
		}
	}
	if (server_var(lcheck) >= 20) do
	{
		es_setinfo dr 0
		es_setinfo dr event_Var(dmg_health)
		es_math dr / 5
		es ma_givehealth event_var(userid) server_var(dr)
	}
}

block monk_say
{
	es_setinfo lcheck 0
	es_keygetvalue lcheck dndUsers event_var(es_steamid) monk
	es_setinfo lacheck 0
	es_keygetvalue lacheck dndUsers event_var(es_steamid) la
	es_math lcheck - server_var(lacheck)
	if (server_var(lcheck) <= 0) do
	{
		es_doblock dnd/la_low
		es_math lcheck + server_var(lacheck)
	}
	if (event_var(text) = !skills) do
	{
		es_setinfo monk_skills "Monk's Skills:\n"
		es_setinfo color 0
		es_keygetvalue color dndExtra event_var(es_steamid) color
		es_format monk_skills "%1 Colored @ %2 / 255\n" server_var(monk_skills) server_var(color)
		es_format monk_skills "%1 Knife Only.\n" server_var(monk_skills)
		es_setinfo speed 0
		es_setinfo dmg 0
		if (server_var(lcheck) >= 2) do
		{
			if (server_var(lcheck) < 9) do
			{
				es_format monk_skills "%1 Dodge\n" server_var(monk_skills)
			}
		}
		if (server_var(lcheck) >= 3) do
		{
			es_setinfo speed 5
		}
		if (server_var(lcheck) >= 4) do
		{
			es_setinfo dmg 33
		}
		if (server_var(lcheck) >= 6) do
		{
			es_math speed + 5
		}
		if (server_var(lcheck) >= 7) do
		{
			es_format monk_skills "%1 Regenaration\n" server_var(monk_skills)
		}
		if (server_var(lcheck) >= 9) do
		{
			es_math speed + 5
			es_format monk_skills "%1 High Level Dodge\n" server_var(monk_skills)
		}
		if (server_var(lcheck) >= 10) do
		{
			es_math dmg + 33
		}
		if (server_var(lcheck) >= 11) do
		{
			es_format monk_skills "%1 Immune to Poison\n" server_var(monk_skills)
		}
		if (server_var(lcheck) >= 12) do
		{
			es_format monk_skills "%1 !tele1/!tele2 and !save1/!save2 1/Rnd\n" server_var(monk_skills)
			es_math speed + 5
		}
		if (server_var(lcheck) >= 14) do
		{
			es_format monk_skills "%1 !escape - run away\n" server_var(monk_skills)
		}
		if (server_var(lcheck) >= 15) do
		{
			es_math speed + 5
		}
		if (server_var(lcheck) >= 16) do
		{
			es_math dmg + 34
		}
		if (server_var(lcheck) >= 18) do
		{
			es_math speed + 5
		}
		if (server_var(lcheck) >= 20) do
		{
			es_format monk_skills "%1 20% Damage Reduction" server_var(monk_skills)
		}
		es_format monk_skills "%1 %2 % Speed Boost\n" server_var(monk_skills) server_var(speed)
		es_format monk_skills "%1 %2 % Damage Boost\n" server_var(monk_skills) server_var(dmg)
		esnq ma_msay 0 event_var(userid) server_var(monk_skills)
	}
}

block ranger_spawn
{
	es_setinfo lcheck 0
	es_keygetvalue lcheck dndUsers event_var(es_steamid) ranger
	es_setinfo lacheck 0
	es_keygetvalue lacheck dndUsers event_var(es_steamid) la
	es_math lcheck - server_var(lacheck)
	es_setinfo mana 0
	es_keygetvalue mana dndExtra event_var(es_steamid) mana
	if (server_var(lcheck) <= 0) do
	{
		es_doblock dnd/la_low
		es_math lcheck + server_var(lacheck)
	}
	es_setinfo scheck 0
	es_keygetvalue scheck dndExtra event_var(es_steamid) style
	if (server_var(scheck) = 0) do
	{
		es_setinfo scheck dual
		es_tell event_var(userid) #green You do not have a weapon style choosen! Use !dual or !archer in chat, while dead, to choose a combat style!
		es_tell event_var(userid) #green No weapon type choosen.... defaulting to dual
	}
	if (server_var(lcheck) >= 4) do
	{
		es_doblock dnd/show_mana
	}
	if (server_var(scheck) = dual) do
	{
		es_setinfo speed_check 0
		es_keygetvalue speed_check dndExtra event_var(es_steamid) speed
		es ma_give event_var(userid) weapon_elite
		if (server_var(lcheck) >= 1) do
		{
			es_math speed_check + .04
		}
		if (server_var(lcheck) >= 2) do
		{
			es_tell event_var(userid) #green You have a chance to dodge attacks now!
		}
		if (server_var(lcheck) >= 5) do
		{
			es_math speed_check + .04
		}
		if (server_var(lcheck) >= 9) do
		{
			es_math speed_check + .04
		}
		if (server_var(lcheck) >= 13) do
		{
			es_math speed_check + .04
		}
		if (server_var(lcheck) >= 17) do
		{
			es_math speed_check + .04
		}
		if (server_var(lcheck) >= 19) do
		{
			es est_SetAmmo event_var(userid) weapon_elite 300 
		}
		es_keysetvalue dndExtra event_var(es_steamid) speed server_var(speed_check)
	}
	if (server_var(scheck) = archer) do
	{
		es_setinfo color_check 0
		es_keygetvalue color_check dndExtra event_var(es_steamid) color
		es ma_give event_var(userid) weapon_scout
		if (server_var(lcheck) >= 1) do
		{
			es_math color_check - 130
		}
		if (server_var(lcheck) >= 3) do
		{
			es_math color_check - 6
		}
		if (server_var(lcheck) >= 5) do
		{
			es_math color_check - 6
		}
		if (server_var(lcheck) >= 7) do
		{
			es_math color_check - 6
		}
		if (server_var(lcheck) >= 9) do
		{
			es_math color_check - 6
		}
		if (server_var(lcheck) >= 11) do
		{
			es_math color_check - 6
		}
		if (server_var(lcheck) >= 13) do
		{
			es_math color_check - 6
		}
		if (server_var(lcheck) >= 15) do
		{
			es_math color_check - 6
		}
		if (server_var(lcheck) >= 17) do
		{
			es_math color_check - 6
		}
		if (server_var(lcheck) >= 19) do
		{
			es_math color_check - 6
		}
		es_keysetvalue dndExtra event_var(es_steamid) color server_var(color_check)
	}
	if (server_var(lcheck) >= 4) do
	{
		es_setinfo mana 5
	}
	if (server_var(lcheck) >= 6) do
	{
		es_math mana + 5
	}
	if (server_var(lcheck) >= 8) do
	{
		es_math mana + 5
	}
	if (server_var(lcheck) >= 10) do
	{
		es_math mana + 5
	}
	if (server_var(lcheck) >= 12) do
	{
		es_math mana + 5
	}
	if (server_var(lcheck) >= 14) do
	{
		es_math mana + 5
	}
	if (server_var(lcheck) >= 16) do
	{
		es_math mana + 5
	}
	if (server_var(lcheck) >= 18) do
	{
		es_math mana + 5
	}
	if (server_var(lcheck) >= 20) do
	{
		es_math mana + 5
	}
	es_keysetvalue dndExtra event_var(es_steamid) mana server_var(mana)
}

block ranger_say
{
	es_setinfo lcheck 0
	es_keygetvalue lcheck dndUsers event_var(es_steamid) ranger
	es_setinfo lacheck 0
	es_keygetvalue lacheck dndUsers event_var(es_steamid) la
	es_math lcheck - server_var(lacheck)
	es_setinfo mana 0
	es_setinfo scheck 0
	es_keygetvalue scheck dndExtra event_var(es_steamid) style
	if (server_var(scheck) = 0) do
	{
		es_setinfo scheck dual
		es_tell event_var(userid) #green You do not have a weapon style choosen! Use !dual or !archer in chat, while dead, to choose a combat style!
		es_tell event_var(userid) #green No weapon type choosen.... defaulting to dual
	}
	if (event_var(text) = !dual) do
	{
		if (event_var(es_userdead) = 1) do
		{
			es_keysetvalue dndExtra event_var(es_steamid) style dual
			es_tell event_var(userid) #green You are now a Two Weapon Fighting Style! Use !archer to change!		
		}
		else do
		{
			es_tell event_var(userid) #green You cannot change fighting style while alive!
		}
	}
	if (event_var(text) = !archer) do
	{
		if (event_var(es_userdead) = 1) do
		{
			es_keysetvalue dndExtra event_var(es_steamid) style archer
			es_tell event_var(userid) #green You are now a Ranged Fighting Style! Use !dual to change!		
		}
		else do
		{
			es_tell event_var(userid) #green You cannot change fighting style while alive!
		}
	}
	if (server_var(scheck) = dual) do
	{
		if (event_var(text) = !skills) do
		{
			es_setinfo ranger_skills "Ranger Skills:\n"
			if (server_var(lcheck) >= 1) do
			{
				es_setinfo speed 4
			}
			if (server_var(lcheck) >= 2) do
			{
				if (server_var(lcheck) < 12) do
				{
					es_format ranger_skills "%1 Dodge\n" server_var(ranger_skills)
				}
			}
			if (server_var(lcheck) >= 5) do
			{
				es_math speed + 4
			}
			if (server_var(lcheck) >= 6) do
			{
				es_format ranger_skills "%1 Bonus Damage\n" server_var(ranger_skills)
			}
			if (server_var(lcheck) >= 9) do
			{
				es_math speed + 4
			}
			if (server_var(lcheck) >= 12) do
			{
				es_format ranger_skills "%1 High Level Dodge\n" server_var(ranger_skills)
			}
			if (server_var(lcheck) >= 13) do
			{
				es_math speed + 4
			}
			if (server_var(lcheck) >= 14) do
			{
				es_format ranger_skills "%1 Drunken Blows\n" server_var(ranger_skills)
			}
			if (server_var(lcheck) >= 17) do
			{
				es_math speed + 4
			}
			if (server_var(lcheck) >= 19) do
			{
				es_format ranger_skills "%1 Bonus Dualie Ammo\n" server_var(ranger_skills)
			}
			es_format ranger_skills "%1 %2 % Speed Boost\n" server_var(ranger_skills) server_var(speed)
			esnq ma_msay 0 event_var(userid) server_var(ranger_skills)
		}
	}
	if (server_var(scheck) = archer) do
	{
		if (event_var(text) = !skills) do
		{
			es_setinfo ranger_skills "Ranger Skills:\n"
			es_setinfo color_check 0
			es_keygetvalue color_check dndExtra event_var(es_steamid) color
			es_format ranger_skills "%1 Colored @ %2 / 255\n" server_var(ranger_skills) server_var(color_check)
			if (server_var(lcheck) >= 2) do
			{
				es_format ranger_skills "%1 Stunning Attack\n" server_var(ranger_skills)
			}
			if (server_var(lcheck) >= 6) do
			{
				es_format ranger_skills "%1 Bonus Damage\n" server_var(ranger_skills)
			}
			if (server_var(lcheck) >= 8) do
			{
				es_format ranger_skills "%1 Dodge\n" server_var(ranger_skills)
			}
			if (server_var(lcheck) >= 14) do
			{
				es_format ranger_skills "%1 Mark those you hit\n" server_var(ranger_skills)
			}
			if (server_var(lcheck) >= 19) do
			{
				es_format ranger_skills "%1 Adrenaline\n" server_var(ranger_skills)
			}
			esnq ma_msay 0 event_var(userid) server_var(ranger_skills)
		}
	}
	if (event_var(text) = !spells) do
	{
		es_format spells "Ranger Spells:\n"
		if (server_var(lcheck) >= 4) do
		{
			es_format spells "%1 !entangle 5 Mana - AOE target freeze.\n" server_var(spells)
		}
		if (server_var(lcheck) >= 8) do
		{
			es_format spells "%1 !moderate 10 Mana - Heal.\n" server_var(spells)
		}
		if (server_var(lcheck) >= 12) do
		{
			es_format spells "%1 !track 15 Mana - Beacon other team.\n" server_var(spells)
		}
		esnq ma_msay 0 event_var(userid) server_var(spells)
	}
	if (server_var(lcheck) >= 4) do
	{
		if (event_var(text) = !mana) do
		{
			es_doblock dnd/show_mana
		}
	}
}

block ranger_victim
{
	es_setinfo lcheck 0
	es_keygetvalue lcheck dndUsers event_var(es_steamid) ranger
	es_setinfo lacheck 0
	es_keygetvalue lacheck dndUsers event_var(es_steamid) la
	es_math lcheck - server_var(lacheck)
	es_setinfo scheck 0
	es_keygetvalue scheck dndExtra event_var(es_steamid) style
	if (server_var(scheck) = 0) do
	{
		es_setinfo scheck dual
		es_tell event_var(userid) #green You do not have a weapon style choosen! Use !dual or !archer in chat, while dead, to choose a combat style!
		es_tell event_var(userid) #green No weapon type choosen.... defaulting to dual
	}
	if (server_var(scheck) = dual) do
	{
		if (server_var(lcheck) >= 2) do
		{
			if (server_var(lcheck) < 11) do
			{
				es_rand random 1 5
				if (server_var(random) = 1) do
				{
					es ma_givehealth event_var(userid) event_var(dmg_health)
					es_tell event_var(userid) #green You have dodged event_var(dmg_health) from an attack.
				}
			}
		}
		if (server_var(lcheck) >= 12) do
		{
			es_rand random 1 3
			if (server_var(random) = 1) do
			{
				es ma_givehealth event_var(userid) event_var(dmg_health)
				es_tell event_var(userid) #green You have dodged event_var(dmg_health) from an attack.
			}
		}		
	}
	if (server_var(scheck) = archer) do
	{
		if (server_var(lcheck) >= 8) do
		{
			es_rand random 1 4
			if (server_var(random) = 1) do
			{
				es ma_givehealth event_var(userid) event_var(dmg_health)
				es_tell event_var(userid) #green You have dodged event_var(dmg_health) from an attack.
			}		
		}
	}
}

block ranger_attacker
{
	es_setinfo lcheck 0
	es_keygetvalue lcheck dndUsers event_var(es_attackersteamid) ranger
	es_setinfo lacheck 0
	es_keygetvalue lacheck dndUsers event_var(es_attackersteamid) la
	es_math lcheck - server_var(lacheck)
	es_setinfo scheck 0
	es_keygetvalue scheck dndExtra event_var(es_attackersteamid) style
	if (server_var(scheck) = 0) do
	{
		es_setinfo scheck dual
		es_tell event_var(attacker) #green You do not have a weapon style choosen! Use !dual or !archer in chat, while dead, to choose a combat style!
		es_tell event_var(attacker) #green No weapon type choosen.... defaulting to dual
	}
	if (server_var(scheck) = dual) do
	{
		if (server_var(lcheck) >= 6) do
		{
			es point_hurt event_var(attacker) event_var(userid) 10
		}
		if (server_var(lcheck) >= 14) do
		{
			es_setinfo save 0
			es_setinfo fort 0
			es_rand save 1 20
			if (server_var(save) != 20) do
			{
				es_keygetvalue fort dndExtra event_var(es_steamid) fortsave
				es_math save + server_var(refsave)
				if (server_var(save) < 18) do
				{
					es est_drunk event_var(userid) 5
				}
			}
		}
	}
	if (server_var(scheck) = archer) do
	{
		if (server_var(lcheck) >= 2) do
		{
			es_setinfo save 0
			es_setinfo refsave 0
			es_rand save 1 20
			if (server_var(save) != 20) do
			{
				es_keygetvalue refsave dndExtra event_var(es_steamid) reflexsave
				es_math save + server_var(refsave)
				if (server_var(save) < 13) do
				{
					es est_freeze event_var(userid) 1
					es_setinfo dacheck 0
					es_keygetvalue dacheck dndExtra event_var(es_steamid) death_attack
					if (server_var(dacheck) = 0) do
					{
						es_delayed 3.5 es est_freeze event_var(userid) 0
					}
				}
			}
		}
		if (server_var(lcheck) >= 6) do
		{
			es point_hurt event_var(attacker) event_var(userid) 60
		}
		if (server_var(lcheck) >= 14) do
		{
			es ma_beacon event_var(userid) 1
			es_delayed 6 es ma_beacon event_var(userid) 0
		}
		if (server_var(lcheck) >= 19) do
		{
			es_setinfo speed 0
			es_keygetvalue speed dndExtra event_var(es_attackersteamid) speed
			es_math speed + .03
			es_keysetvalue dndExtra event_var(es_attackersteamid) speed server_var(speed)
			es est_Speed event_Var(attacker) server_var(speed)
		}
	}
}

block track
{
	es_setinfo es_userid 0
  	es_getcmduserid es_userid
	es_setinfo es_steamid 0
	es est_getsteam es_steamid server_var(es_userid)
	es_setinfo ccheck 0
	es_keygetvalue ccheck dndUsers server_var(es_steamid) class
	es_setinfo lcheck 0
	es_keygetvalue lcheck dndUsers server_var(es_steamid) server_var(ccheck)	
	es_setinfo lacheck 0
	es_keygetvalue lacheck dndUsers server_var(es_steamid) la
	es_math lcheck - server_var(lacheck)
	if (server_var(ccheck) = ranger) do
	{
		if (server_var(lcheck) >= 12) do
		{
			es_setinfo mana 0
			es_keygetvalue mana dndExtra server_var(es_steamid) mana
			es_setinfo caster_alive 0
			es est_isalive caster_alive server_var(es_userid)
			if (server_var(caster_alive) = 0) then es_setinfo mana 0
			if (server_var(mana) >= 15) do
			{
				es_math mana - 15
				es_setinfo team 0
				es est_getteam team server_var(es_userid)
				if (server_var(team) = 2) do
				{
					es ma_beacon #ct 1
					es_delayed 2 ma_beacon #ct 0
					es_delayed 3 est_setplayercolor <userid> 255 255 255 <alpha> 1
				}
				if (server_var(team) = 3) do
				{
					es ma_beacon #t 1
					es_delayed 2 ma_beacon #t 0	
					es_delayed 3 est_setplayercolor <userid> 255 255 255 <alpha> 1				
				}
			}
			es_keysetvalue dndExtra server_var(es_steamid) mana server_var(mana)
		}
	}
}

block entangle
{
	es_setinfo es_userid 0
  	es_getcmduserid es_userid
	es_setinfo es_steamid 0
	es est_getsteam es_steamid server_var(es_userid)
	es_setinfo ccheck 0
	es_keygetvalue ccheck dndUsers server_var(es_steamid) class
	es_setinfo lcheck 0
	es_keygetvalue lcheck dndUsers server_var(es_steamid) server_var(ccheck)	
	es_setinfo lacheck 0
	es_keygetvalue lacheck dndUsers server_var(es_steamid) la
	es_math lcheck - server_var(lacheck)
	if (server_var(ccheck) = ranger) do
	{
		if (server_var(lcheck) >= 4) do
		{
			es_setinfo spell 0
			es_keygetvalue spell dndExtra server_var(es_steamid) spell
			if(server_var(spell) = 0) do
			{
				es_setinfo mana 0
				es_keygetvalue mana dndExtra server_var(es_steamid) mana
				es_setinfo caster_alive 0
				es est_isalive caster_alive server_var(es_userid)
				if (server_var(caster_alive) = 0) then es_setinfo mana 0
				if (server_var(mana) >= 5) do
				{
					es_setinfo point z7
					es est_getviewplayer server_var(es_userid) point
					es_setinfo steam 0
					es est_getsteam steam server_var(point)
					if (server_var(point) != z7) do
					{
						es_keysetvalue dndExtra server_var(es_steamid) spell 1
						es_delayed .5 es_keysetvalue dndExtra server_var(es_steamid) spell 0
						es_math mana - 5
						es_setinfo save 0
						es_setinfo ref 0
						es_rand save 1 20
						if (server_var(save) != 20) do
						{
							es_keygetvalue ref dndExtra server_var(steam) reflexsave
							es_math save + server_var(ref)
							if (server_var(save) < 15) do
							{
								es est_freeze server_var(point) 1
								es_setinfo dacheck 0
								es_keygetvalue dacheck dndExtra server_var(steam) death_attack
								if (server_var(dacheck) = 0) do
								{
									es_delayed 5 es est_freeze server_var(point) 0
								}
								es_tell server_var(es_userid) #green You have stunned your target for 5 seconds!	
							}
							else do
							{
								es_tell server_var(es_userid) #green They have resisted your entangle.
							}
							es est_Near rootstarget #all 250 server_var(point) "es roots server_var(rootstarget) 5"
						}
					}
				}
			}
			es_keysetvalue dndExtra server_var(es_steamid) mana server_var(mana)
		}
	}	
}

block roots
{
	es_setinfo dnd_ruserid 0
	es_setinfo dnd_rduration 0

  	es_getargv dnd_ruserid 1
  	es_getargv dnd_rduration 2
	
	es_setinfo rsteamcheck 0
	es est_getsteam rsteamcheck server_var(dnd_ruserid)
	es_setinfo save 0
	es_setinfo ref 0
	es_rand save 1 20
	if (server_var(save) != 20) do
	{
		es_keygetvalue ref dndExtra server_var(rsteamcheck) reflexsave
		es_math save + server_var(ref)
		if (server_var(save) < 15) do
		{
			es est_freeze server_var(dnd_ruserid) 1
			es_setinfo dacheck 0
			es_keygetvalue dacheck dndExtra server_var(rsteamcheck) death_attack
			if (server_var(dacheck) = 0) do
			{
				es_delayed server_var(dnd_rduration) es est_freeze server_var(dnd_ruserid) 0
			}
		}
	}
}

block paladin_spawn
{
	es_setinfo lcheck 0
	es_keygetvalue lcheck dndUsers event_var(es_steamid) paladin
	es_setinfo lacheck 0
	es_keygetvalue lacheck dndUsers event_var(es_steamid) la
	es_math lcheck - server_var(lacheck)
	es_setinfo mana 0
	if (server_var(lcheck) <= 0) do
	{
		es_doblock dnd/la_low
		es_math lcheck + server_var(lacheck)
	}
	es_setinfo health 0
	es_setinfo thealth 0
	if (server_var(lcheck) >= 1) do
	{
		es_setinfo health 1
		es_setinfo thealth 1
		es_keysetvalue dndExtra event_var(es_steamid) crit_imune 1
		es_tell event_var(userid) #green You are now immune to critical hits.
	}
	if (server_var(lcheck) >= 2) do
	{
		es_math health + 1
		es_math thealth + 1
	}
	if (server_var(lcheck) >= 3) do
	{
		es_math health + 1
		es_math thealth + 1
	}
	if (server_var(lcheck) >= 4) do
	{
		es_setinfo mana 5
		es_math health + 1
		es_math thealth + 1
	}
	if (server_var(lcheck) >= 5) do
	{
		es_delayed 10 es_keysetvalue dndExtra event_var(es_steamid) arearegen 1
		if (server_var(lcheck) < 10) do
		{
			es_delayed 10 es arearegen event_var(userid) 3 1 375
		}
		es_math health + 1
		es_math thealth + 1
	}
	if (server_var(lcheck) >= 6) do
	{
		es_math mana + 5
		es_math health + 1
		es_math thealth + 1
	}
	if (server_var(lcheck) >= 7) do
	{
		es_math health + 1
		es_math thealth + 1
	}
	if (server_var(lcheck) >= 8) do
	{
		es_math mana + 5
		es_math health + 1
		es_math thealth + 1
	}
	if (server_var(lcheck) >= 9) do
	{
		es_math health + 1
		es_math thealth + 1
	}
	if (server_var(lcheck) >= 10) do
	{
		es_math mana + 5
		if (server_var(lcheck) < 15) do
		{
			es_delayed 10 es arearegen event_var(userid) 3 2 375
		}
		es_math health + 1
		es_math thealth + 1
	}
	if (server_var(lcheck) >= 11) do
	{
		es_math health + 1
		es_math thealth + 1
	}
	if (server_var(lcheck) >= 12) do
	{
		es_math mana + 5
		es_math health + 1
		es_math thealth + 1
	}
	if (server_var(lcheck) >= 13) do
	{
		es_math health + 1
		es_math thealth + 1
	}
	if (server_var(lcheck) >= 14) do
	{
		es_math mana + 5
		es_math health + 1
		es_math thealth + 1
	}
	if (server_var(lcheck) >= 15) do
	{
		if (server_var(lcheck) < 20) do
		{
			es_delayed 10 es arearegen event_var(userid) 3 3 375
		}
		es_math health + 1
		es_math thealth + 1
	}
	if (server_var(lcheck) >= 16) do
	{
		es_math mana + 5
		es_math health + 1
		es_math thealth + 1
	}
	if (server_var(lcheck) >= 17) do
	{
		es_math health + 1
		es_math thealth + 1
	}
	if (server_var(lcheck) >= 18) do
	{
		es_math mana + 5
		es_math health + 1
		es_math thealth + 1
	}
	if (server_var(lcheck) >= 19) do
	{
		es_math mana + 5
		es_math health + 1
		es_math thealth + 1
	}
	if (server_var(lcheck) >= 20) do
	{
		es_math mana + 5
		es_delayed 10 es arearegen event_var(userid) 3 4 375
		es_math health + 1
		es_math thealth + 1
	}
	if (event_var(es_userteam) = 2) do
	{
		es est_loop player #t "es bonushealth server_var(player) server_var(thealth)"
	}
	if (event_var(es_userteam) = 3) do
	{
		es est_loop player #c "es bonushealth server_var(player) server_var(thealth)"
	}
	es_keysetvalue dndExtra event_var(es_steamid) mana server_var(mana)
	es_doblock dnd/show_mana
	es ma_givehealth event_var(userid) server_var(health)
	es_setinfo bhealth 0
	es_keygetvalue bhealth dndExtra event_var(es_steamid) maxhealth
	es_math bhealth + server_var(health)
	es_keysetvalue dndExtra event_var(es_steamid) maxhealth server_var(bhealth) 
}

block paladin_say
{
	es_setinfo lcheck 0
	es_keygetvalue lcheck dndUsers event_var(es_steamid) paladin
	es_setinfo lacheck 0
	es_keygetvalue lacheck dndUsers event_var(es_steamid) la
	es_math lcheck - server_var(lacheck)
	if (event_var(text) = !skills) do
	{
		es_setinfo paladin_skills "Paladin's Skills:\n"
		es_format paladin_skills "%1 Bonus Health: %2\n Bonus Team Health: %3\n" server_var(paladin_skills) server_var(lcheck) server_var(lcheck)
		es_format paladin_skills "%1 Immune to critical hits.\n" server_var(paladin_skills)
		if (server_var(lcheck) >= 2) do
		{
			es_format paladin_skills "%1 Divine Fire.\n" server_var(paladin_skills)
		}
		if (server_var(lcheck) >= 5) do
		{
			if (server_var(lcheck) < 10) do
			{
				es_format paladin_skills "%1 Area Heal 1 Health every 4 seconds.\n" server_var(paladin_skills)
			}
		}
		if (server_var(lcheck) >= 6) do
		{
			es_format paladin_skills "%1 10% Damage Reduction.\n" server_var(paladin_skills)
		}
		if (server_var(lcheck) >= 10) do
		{
			es_format paladin_skills "%1 10% Bonus Damage.\n" server_var(paladin_skills)
			if (server_var(lcheck) < 15) do
			{
				es_format paladin_skills "%1 Area Heal 2 Health every 4 seconds.\n" server_var(paladin_skills)
			}
		}
		if (server_var(lcheck) >= 14) do
		{
			es_format paladin_skills "%1 Smite Vision.\n" server_var(paladin_skills)
		}
		if (server_var(lcheck) >= 15) do
		{
			if (server_var(lcheck) < 20) do
			{
				es_format paladin_skills "%1 Area Heal 3 Health every 4 seconds.\n" server_var(paladin_skills)
			}
		}
		if (server_var(lcheck) >= 18) do
		{
			es_format paladin_skills "%1 Return Damage to those who have hit you.\n" server_var(paladin_skills)
		}
		if (server_var(lcheck) >= 20) do
		{
			es_format paladin_skills "%1 Area Heal 4 Health every 4 seconds.\n" server_var(paladin_skills)
		}
		esnq ma_msay 0 event_var(userid) server_var(paladin_skills)
	}
	if (event_var(text) = !spells) do
	{
		es_setinfo spelllist "Spells Known:\n"
		if (server_var(lcheck) >= 4) do
		{
			es_format spelllist "%1 !light - 5 Mana: Heal.\n" server_var(spelllist)
		}
		if (server_var(lcheck) >= 8) do
		{
			es_format spelllist "%1 !moderate - 10 Mana: Heal.\n" server_var(spelllist)
		}
		if (server_var(lcheck) >= 12) do
		{
			es_format spelllist "%1 !serious - 15 Mana: Heal.\n" server_var(spelllist)
		}
		esnq ma_msay 0 event_var(userid) server_var(spelllist)
	}
	if (server_var(lcheck) >= 4) do
	{
		if (event_var(text) = !mana) do
		{
			es_doblock dnd/show_mana
		}
	}
}

block paladin_victim
{
	es_setinfo lcheck 0
	es_keygetvalue lcheck dndUsers event_var(es_steamid) paladin
	es_setinfo lacheck 0
	es_keygetvalue lacheck dndUsers event_var(es_steamid) la
	es_math lcheck - server_var(lacheck)
	if (server_var(lcheck) <= 0) do
	{
		es_doblock dnd/la_low
		es_math lcheck + server_var(lacheck)
	}
	if (server_var(lcheck) >= 6) do
	{
		es_setinfo dr 0
		es_setinfo dr event_var(dmg_health)
		es_math dr / 10
		es ma_givehealth event_var(userid) server_var(dr)
	}
	if (server_var(lcheck) >= 18) do
	{
		if (event_var(weapon) != point_hurt) do
		{
			es_setinfo thorns 0
			es_setinfo thorns event_var(dmg_health)
			es_math thorns / 10
			es point_hurt event_var(userid) event_var(attacker) server_var(thorns)
		}
	}
}

block paladin_attacker
{
	es_setinfo lcheck 0
	es_keygetvalue lcheck dndUsers event_var(es_attackersteamid) paladin
	es_setinfo lacheck 0
	es_keygetvalue lacheck dndUsers event_var(es_attackersteamid) la
	es_math lcheck - server_var(lacheck)
	if (server_var(lcheck) >= 2) do
	{
		es_rand random 1 6
		if (server_var(random) = 1) do
		{
			es_setinfo vrcheck 0
			es_keygetvalue vrcheck dndUsers event_var(es_steamid) race
			if (server_var(vrcheck) = troll) do
			{
				es point_hurt event_var(attacker) event_var(userid) event_var(dmg_health)
			}
			if (server_var(vrcheck) = vampire) do 
			{
				es point_hurt event_var(attacker) event_var(userid) event_var(dmg_health)
			}
			es est_burn event_var(userid) 4
		}
	}
	if (server_var(lcheck) >= 10) do
	{
		es_setinfo bouns 0
		es_setinfo bonus event_var(dmg_health)
		es_math bonus / 10
		es point_hurt event_var(attacker) event_var(userid) server_var(bonus)
	}
	if (server_Var(lcheck) >= 14) do
	{
		es_rand random 1 5
		if (server_var(random) = 1) do
		{
			es est_drunk event_var(userid) 4
		}
	}
}

block fighter_spawn
{
	es_setinfo lcheck 0
	es_keygetvalue lcheck dndUsers event_var(es_steamid) fighter
	es_setinfo lacheck 0
	es_keygetvalue lacheck dndUsers event_var(es_steamid) la
	es_setinfo health 0
	es_setinfo pcheck 0
	es_keygetvalue pcheck dndUsers event_var(es_steamid) prestige
	if (server_var(lcheck) < 3) then es popup send mainmenu event_var(userid)
	if (server_var(pcheck) = 0) do
	{
		es_math lcheck - server_var(lacheck)
	}
	if (server_var(lcheck) <= 0) do
	{
		es_doblock dnd/la_low
		es_math lcheck + server_var(lacheck)
	}
	if (server_var(pcheck) = fpc1) do
	{
		es_doblock dnd/fpc1_spawn
		es_setinfo lcheck 5
	}
	if (server_var(pcheck) = fpc2) do
	{
		es_doblock dnd/fpc2_spawn
		es_setinfo lcheck 10
	}
	if (server_var(pcheck) = fpc3) do
	{
		es_doblock dnd/fpc3_spawn
		es_setinfo lcheck 15
	}

	if (server_var(lcheck) >= 1) do
	{
		es_math health + 15
	}	
	
	if (server_var(lcheck) >= 2) do
	{
		es_tell event_var(userid) #green You deal bonus damage on attacks with your pistols!
	}

	if (server_var(lcheck) >= 4) do
	{
		es_tell event_var(userid) #green You now take 10% less damage from attacks!
		es_math health + 5
	}

	if (server_var(lcheck) >= 5) do
	{
		es_tell event_var(userid) #green You grenades deal bonus damage.
	}

	if (server_var(lcheck) >= 6) do
	{
		es_tell event_var(userid) #green Your powerful hits blur your victims vision.
	}

	if (server_var(lcheck) >= 7) do
	{
		es_math health + 5
	}

	if (server_var(lcheck) >= 8) do
	{
		es_tell event_var(userid) #green You gain bonus damage with you M4A1 and AK47.
	}

	if (server_var(lcheck) >= 10) do
	{
		es_tell event_var(userid) #green You can now use the AWP Sniper Rifle!
		es_keysetvalue dndExtra event_var(es_steamid) awp 1
		es_math health + 5
	}

	if (server_var(lcheck) >= 12) do
	{
		es_keysetvalue dndExtra event_var(es_steamid) crit_imune 1
		es_tell event_var(userid) #green You are now immune to critical hits.
	}

	if (server_var(lcheck) >= 13) do
	{
		es_math health + 5
	}

	if (server_var(lcheck) >= 14) do
	{
		es_tell event_var(userid) #green You now take another 10% less damage from attacks.
	}

	if (server_var(lcheck) >= 16) do
	{
		es_tell event_var(userid) #green Your M249 attacks stun the person you hit.
		es_math health + 5
	}

	if (server_var(lcheck) >= 18) do
	{
		es est_setarmor event_var(userid) 175
	}

	if (server_var(lcheck) >= 19) do
	{
		es_math health + 5
	}
	
	es ma_givehealth event_var(userid) server_var(health)
	es_setinfo bhealth 0
	es_keygetvalue bhealth dndExtra event_var(es_steamid) maxhealth
	es_math bhealth + server_var(health)
	es_keysetvalue dndExtra event_var(es_steamid) maxhealth server_var(bhealth)  
	es_tell event_var(userid) #green You have gained server_var(health) bonus health for being a server_var(lcheck) Fighter.
}

block fpc1_spawn
{
	es_setinfo lcheck 0
	es_keygetvalue lcheck dndUsers event_var(es_steamid) fpc1
	es_setinfo lacheck 0
	es_keygetvalue lacheck dndUsers event_var(es_steamid) la
	es_math lcheck - server_var(lacheck)
	es_setinfo mana 0
	if (server_var(lcheck) < 0) do
	{
		es_doblock dnd/la_low
		es_math lcheck + server_var(lacheck)
	}
	es_setinfo nades 0
	es_setinfo flash 0
	if (server_var(lcheck) >= 1) do
	{
		es_setinfo nades 1
		es_tell event_var(userid) #green You can use !he to spawn a hegrenade.
	}
	if (server_var(lcheck) >= 3) do
	{
		es_setinfo flash 1
		es_tell event_var(userid) #green You can now use !flash to spawn a flashbang
	}
	if (server_var(lcheck) >= 4) do
	{
		es_math flash + 1
	}
	if (server_var(lcheck) >= 5) do
	{
		es_math nades + 1
	}
	if (server_var(lcheck) >= 7) do
	{
		es_math flash + 1
	}
	if (server_var(lcheck) >= 8) do
	{
		es_math flash + 1
	}
	if (server_var(lcheck) >= 9) do
	{
		es_math flash + 1
	}
	if (server_var(lcheck) >= 10) do
	{
		es_math nades + 1
	}
	if (server_var(lcheck) >= 12) do
	{
		es_math flash + 1
	}
	if (server_var(lcheck) >= 13) do
	{
		es_math flash + 1
	}
	if (server_var(lcheck) >= 14) do
	{
		es_math flash + 1
	}
	if (server_var(lcheck) >= 15) do
	{
		es_math nades + 1
	}
	es_tell event_var(userid) #green You can spawn server_var(nades) hegrenades per round.
	es_tell event_var(userid) #green You can spawn server_var(flash) flashbangs per round.
	es_keysetvalue dndExtra event_var(es_steamid) nades server_var(nades)
	es_keysetvalue dndExtra event_Var(es_steamid) flash server_Var(flash)
}

block fpc2_spawn
{
	es_setinfo lcheck 0
	es_keygetvalue lcheck dndUsers event_var(es_steamid) fpc2
	es_setinfo lacheck 0
	es_keygetvalue lacheck dndUsers event_var(es_steamid) la
	es_math lcheck - server_var(lacheck)
	es_setinfo mana 0
	es_setinfo kensaipts 0
	if (server_var(lcheck) < 0) do
	{
		es_doblock dnd/la_low
		es_math lcheck + server_var(lacheck)
	}
	es_setinfo dcount 0
	if (server_var(lcheck) >= 1) do
	{
		es_setinfo kensaipts 1
		es popup send kensaiweapons event_var(userid)
	}
	if (server_var(lcheck) >= 2) do
	{
		es_math kensaipts + 1
	}
	if (server_var(lcheck) >= 3) do
	{
		es_tell event_var(userid) #green You now have an AOE damage effect.
//		es_delayed 5 es_keysetvalue dndExtra event_var(es_steamid) areadmg 1
		if (server_var(lcheck) < 8) do
		{
//			es_delayed 5 es areadamage event_var(userid) 3 5 275 
		}
		es_math kensaipts + 1
	}
	if (server_var(lcheck) >= 4) do
	{
		es_math kensaipts + 1
	}
	if (server_var(lcheck) >= 5) do
	{
		es_math kensaipts + 1
	}
	if (server_var(lcheck) >= 6) do
	{
		es_math kensaipts + 1
	}
	if (server_var(lcheck) >= 7) do
	{
		es_math kensaipts + 1
	}
	if (server_var(lcheck) >= 8) do
	{
		es_math kensaipts + 1
//		es_delayed 5 es areadamage event_var(userid) 3 10 275
	}
	if (server_var(lcheck) >= 9) do
	{
		es_math kensaipts + 1
	}
	if (server_var(lcheck) >= 10) do
	{
		es_math kensaipts + 1
	}
	es_keysetvalue dndExtra event_var(es_steamid) kensaipts server_var(kensaipts)
	es_tell event_var(userid) #green You have server_var(kensaipts) points to enhance your weapon with.
}

block fpc3_spawn
{
	es_setinfo lcheck 0
	es_keygetvalue lcheck dndUsers event_var(es_steamid) fpc3
	es_setinfo lacheck 0
	es_keygetvalue lacheck dndUsers event_var(es_steamid) la
	es_math lcheck - server_var(lacheck)
	es_setinfo mana 0
	if (server_var(lcheck) < 0) do
	{
		es_doblock dnd/la_low
		es_math lcheck + server_var(lacheck)
	}
	if (server_var(lcheck) >= 1) do
	{
		es_tell event_var(userid) #green You can now use the auto snipers!
	}

	if (server_var(lcheck) >= 3) do
	{
		es_tell event_var(userid) #green Your snipers now do bonus damage.
	}

	if (server_var(lcheck) >= 4) do
	{
		es_tell event_var(userid) #green You sniper shots now stun you victim.
	}

	if (server_var(lcheck) >= 5) do
	{
		es_setinfo speed 0
		es_keygetvalue speed dndExtra event_var(es_steamid) speed
		es_math speed + .1
		es_keysetvalue dndExtra event_var(es_steamid) speed server_var(speed)
		es est_speed event_var(userid) server_var(speed)
	}
}

block fighter_victim
{
	es_setinfo lcheck 0
	es_keygetvalue lcheck dndUsers event_var(es_steamid) fighter
	es_setinfo lacheck 0
	es_keygetvalue lacheck dndUsers event_var(es_steamid) la
	es_setinfo pcheck 0
	es_keygetvalue pcheck dndUsers event_var(es_steamid) prestige
	if (server_var(pcheck) = 0) do
	{
		es_math lcheck - server_var(lacheck)
	}
	if (server_var(lcheck) <= 0) do
	{
		es_doblock dnd/la_low
		es_math lcheck + server_var(lacheck)
	}
	if (server_var(pcheck) = fpc1) do
	{
		es_doblock dnd/fpc1_victim
		es_setinfo lcheck 5
	}
	if (server_var(pcheck) = fpc2) do
	{
		es_doblock dnd/fpc2_victim
		es_setinfo lcheck 10
	}
	if (server_var(pcheck) = fpc3) do
	{
		es_doblock dnd/fpc3_victim
		es_setinfo lcheck 15
	}

	if (server_var(lcheck) >= 4) do
	{
		es_setinfo dmg 0
		es_setinfo dmg event_var(dmg_health)
		es_math dmg / 10
		es ma_givehealth event_var(userid) server_var(dmg)
	}

	if (server_var(lcheck) >= 14) do
	{
		es_setinfo dmg 0
		es_setinfo dmg event_var(dmg_health)
		es_math dmg / 10
		es ma_givehealth event_var(userid) server_var(dmg)
	}
}

block fpc1_victim
{
	es_setinfo lcheck 0
	es_keygetvalue lcheck dndUsers event_var(es_steamid) fpc1
}

block fpc2_victim
{
	es_setinfo lcheck 0
	es_keygetvalue lcheck dndUsers event_var(es_steamid) fpc2
	es_setinfo lacheck 0
	es_keygetvalue lacheck dndUsers event_var(es_steamid) la
	es_math lcheck - server_var(lacheck)
	es_setinfo mana 0
	if (server_var(lcheck) < 0) do
	{
		es_doblock dnd/la_low
		es_math lcheck + server_var(lacheck)
	}
	es_setinfo dcheck 0
	es_keygetvalue dcheck dndExtra event_var(es_steamid) defend
	if (server_var(dcheck) = 1) do
	{
		es_setinfo dmg 0
		es_setinfo dmg event_var(dmg_health)
		es_math dmg / 11
		es_math dmg * server_var(lcheck)
		es ma_givehealth event_var(userid) server_var(dmg)
		es est_freeze event_var(userid) 1	
	}

	if (server_var(lcheck) >= 2) do
	{
		es est_setarmor event_var(userid) 100
	}
}

block fpc3_victim
{
	es_setinfo lcheck 0
	es_keygetvalue lcheck dndUsers event_var(es_steamid) fpc3	
}

block fighter_attacker
{
	es_setinfo lcheck 0
	es_keygetvalue lcheck dndUsers event_var(es_attackersteamid) fighter
	es_setinfo lacheck 0
	es_keygetvalue lacheck dndUsers event_var(es_attackersteamid) la
	es_setinfo pcheck 0
	es_keygetvalue pcheck dndUsers event_var(es_attackersteamid) prestige
	if (server_var(pcheck) = 0) do
	{
		es_math lcheck - server_var(lacheck)
	}
	if (server_var(pcheck) = fpc1) do
	{
		es_doblock dnd/fpc1_attacker
		es_setinfo lcheck 5
	}
	if (server_var(pcheck) = fpc2) do
	{
		es_doblock dnd/fpc2_attacker
		es_setinfo lcheck 10
	}
	if (server_var(pcheck) = fpc3) do
	{
		es_doblock dnd/fpc3_attacker
		es_setinfo lcheck 15
	}

	if (server_var(lcheck) >= 2) do
	{
		es_doblock dnd/bonus_damage_pistol	
	}

	if (server_var(lcheck) >= 5) do
	{
		if (event_var(weapon) = hegrenade) do
		{
			es point_hurt event_var(attacker) event_var(userid) 20
		}
	}

	if (server_var(lcheck) >= 6) do
	{
		es_setinfo refsave 0
		es_setinfo save 0
		es_rand save 1 20
		if (server_var(save) != 20) do
		{
			es_keygetvalue refsave dndExtra event_var(es_steamid) reflexsave
			es_math save + server_var(refsave)
			if (server_var(save) < 14) do
			{
				es ma_drug event_var(userid)
				es_delayed 2 es ma_drug event_var(userid) 0
			}
		}
	}

	if (server_var(lcheck) >= 8) do
	{
		if (event_var(weapon) = ak47) do
		{
			es point_hurt event_var(attacker) event_var(userid) 10
		}

		if (event_var(weapon) = m4a1) do
		{
			es point_hurt event_var(attacker) event_var(userid) 20
		}
	}

	if (server_var(lcheck) >= 16) do
	{
		if (event_var(weapon) = m249) do
		{
			es_setinfo fortsave 0
			es_setinfo save 0
			es_rand save 1 20
			if (server_var(save) != 20) do
			{
				es_keygetvalue fortsave dndExtra event_var(es_steamid) fortsave
				es_math save + server_var(fortsave)
				if (server_var(save) < 15) do
				{
					es est_freeze event_var(userid) 1
					es_setinfo dacheck 0
					es_keygetvalue dacheck dndExtra event_var(es_steamid) death_attack
					if (server_var(dacheck) = 0) do
					{
						es_delayed 4 es est_freeze event_var(userid) 0
					}
				}
			}
		}
	}
	
	if (server_var(lcheck) >= 20) do
	{
		es_setinfo dmg 0
		es_setinfo dmg event_var(dmg_health)
		es_math dmg / 5
		es point_hurt event_var(attacker) event_var(userid) server_var(dmg)
	}
}

block fpc1_attacker
{
	es_setinfo lcheck 0
	es_keygetvalue lcheck dndUsers event_var(es_attackersteamid) fpc1
	es_setinfo lacheck 0
	es_keygetvalue lacheck dndUsers event_var(es_attackersteamid) la
	es_math lcheck - server_var(lacheck)
	es_setinfo mana 0
	if (server_var(lcheck) >= 2) do
	{
		if (event_var(weapon) = hegrenade) do
		{
			es est_drunk event_var(userid) 6
		}
	}

	if (server_var(lcheck) >= 6) do
	{
		if (event_var(weapon) = hegrenade) do
		{
			es est_burn event_var(userid) 6
		}
	}

	if (server_var(lcheck) >= 11) do
	{
		if (event_var(weapon) = hegrenade) do
		{
			es ma_freeze event_var(userid) 1
			es_delayed 6 es ma_freeze event_var(userid) 0
		}
	}
}

block fpc2_attacker
{
	es_setinfo lcheck 0
	es_keygetvalue lcheck dndUsers event_var(es_attackersteamid) fpc2
	es_setinfo dmgcheck 0
	es_setinfo drunkcheck 0
	es_setinfo freezecheck 0
	es_setinfo disarmcheck 0
	es_setinfo firecheck 0
	es_setinfo manacheck 0
	es_setinfo leechcheck 0
	es_setinfo visioncheck 0
	es_setinfo antischeck 0
	es_keygetvalue dmgcheck dndExtra event_var(es_attackersteamid) kendmg
	es_keygetvalue drunkcheck dndExtra event_var(es_attackersteamid) kendrunk
	es_keygetvalue freezecheck dndExtra event_var(es_attackersteamid) kenfreeze
	es_keygetvalue disarmcheck dndExtra event_var(es_attackersteamid) kendisarm
	es_keygetvalue firecheck dndExtra event_var(es_attackersteamid) kenfire
	es_keygetvalue manacheck dndExtra event_var(es_attackersteamid) kenmana
	es_keygetvalue leechcheck dndExtra event_var(es_attackersteamid) kenleech
	es_keygetvalue visioncheck dndExtra evnet_var(es_attackersteamid) kenvision
	es_keygetvalue antischeck dndExtra event_var(es_attackersteamid) kenantis
	if (server_var(dmgcheck) = 1) do
	{
		es_setinfo dmgbonus event_var(dmg_health)
		es_math dmgbonus / 10
		es point_hurt event_var(attacker) event_var(userid) server_var(dmgbonus)
	}
	if (server_var(drunkcheck) = 1) do
	{
		es_rand random 1 2
		if (server_var(random) = 1) do
		{
			es_setinfo save 0
			es_rand save 1 20
			if (server_va(save) != 20) do
			{
				es_setinfo fort 0
				es_keygetvalue fort dndExtra event_var(es_steamid) fortsave
				es_math save + server_var(fort)
				if (server_var(save) < 15) do
				{
					es est_drunk event_var(userid) 5
					es_tell event_var(attacker) #green Your attack has caused your victim to go into a drunken state.
				}
			}
		}
	}
	if (server_var(freezecheck) = 1) do
	{
		es_rand random 1 4
		if (server_var(random) = 1) do
		{
			es_setinfo save 0
			es_rand save 1 20
			if (server_va(save) != 20) do
			{
				es_setinfo fort 0
				es_keygetvalue fort dndExtra event_var(es_steamid) fortsave
				es_math save + server_var(fort)
				if (server_var(save) < 16) do
				{
					es est_freeze event_var(userid) 1
					es_delayed 4 es est_freeze event_var(userid) 0
					es_tell event_var(attacker) #green Your attack has stunned your victim.
				}
			}
		}
	}
	if (server_var(disarmcheck) = 1) do
	{
		es_rand random 1 4
		if (server_var(random) = 1) do
		{
			es_setinfo save 0
			es_rand save 1 20
			if (server_va(save) != 20) do
			{
				es_setinfo ref 0
				es_keygetvalue ref dndExtra event_var(es_steamid) reflexsave
				es_math save + server_var(ref)
				if (server_var(save) < 17) do
				{
					es est_dropweapon event_var(userid) 1
					es est_dropweapon event_var(userid) 2
					es_tell event_var(attacker) #green Your attack has disarmed your victim.
				}
			}
		}
	}
	if (server_var(firecheck) = 1) do
	{
		es_rand random 1 4
		if (server_var(random) = 1) do
		{
			es_setinfo save 0
			es_rand save 1 20
			if (server_va(save) != 20) do
			{
				es_setinfo ref 0
				es_keygetvalue ref dndExtra event_var(es_steamid) reflexsave
				es_math save + server_var(ref)
				if (server_var(save) < 18) do
				{
					es est_burn event_var(userid) 5
					es_tell event_var(attacker) #green Your attack has burned your victim.
				}
			}
		}
	}
	if (server_var(manacheck) = 1) do
	{
		es_setinfo mana 0
		es_keygetvalue mana dndExtra event_var(es_steamid) mana
		es_math mana - 10
		if (server_var(mana) < 0) then es_setinfo mana 0
		es_keysetvalue dndExtra event_var(es_steamid) mana server_var(mana)
	}
	if (server_var(leechcheck) = 1) do
	{
		es_setinfo rviccheck 0
		es_keygetvalue rviccheck dndUsers event_var(es_steamid) race
		if (server_var(rviccheck) != zombie) do
		{
			if (server_var(rviccheck) != vampire) do
			{
				if (server_var(rviccheck) != ghoul) do
				{
					es_setinfo vamp 0
					es_setinfo vamp event_var(dmg_health)
					es_math vamp / 2
					es_setinfo curhealth 0
					es est_gethealth curhealth event_var(attacker)
					es_math curhealth + server_var(vamp)
					if (server_var(curhealth) <= 200) do
					{
						es ma_givehealth event_var(attacker) server_var(vamp)
					}
					else do
					{
						es ma_sethealth event_var(attacker) 200
					}
					es_setinfo mhealth 0
					es_keygetvalue mhealth dndExtra event_var(es_attackersteamid) maxhealth
					es_math mhealth + server_var(vamp)
					if (server_var(mhealth) > 200) then es_setinfo mhealth 200
					es_keysetvalue dndExtra event_var(es_attackersteamid) maxhealth server_var(mhealth)
				}
			}
		}
	}
	if (server_var(visioncheck) = 1) do
	{
		es_rand random 1 5
		if (server_var(random) = 1) do
		{
			es_setinfo save 0
			es_rand save 1 20
			if (server_va(save) != 20) do
			{
				es_setinfo fort 0
				es_keygetvalue fort dndExtra event_var(es_steamid) fortsave
				es_math save + server_var(fort)
				if (server_var(save) < 20) do
				{
					es est_Fade server_var(point) 0 server_var(level) 1 0 0 0 250
					es_delayed 5 es est_Fade server_var(point) 0 server_var(level) 1 0 0 0 0
					es_tell event_var(attacker) #green Your attack has blinded your victim.
				}
			}
		}
	}
	if (server_var(antischeck) = 1) do
	{
		es_keysetvalue dndExtra event_var(es_steamid) allow_color 10
	}
}

block fpc3_attacker
{
	es_setinfo lcheck 0
	es_keygetvalue lcheck dndUsers event_var(es_attackersteamid) fpc3
	es_setinfo lacheck 0
	es_keygetvalue lacheck dndUsers event_var(es_attackersteamid) la
	es_math lcheck - server_var(lacheck)
	es_setinfo mana 0
	if (server_var(lcheck) >= 3) do
	{
		if (event_var(weapon) = awp) do
		{
			es_rand random 1 3
			if (server_var(random) = 1) do
			{
				es point_hurt event_var(attacker) event_var(userid) 100
			}
		}
		
		if (event_var(weapon) = g3sg1) do
		{
			es point_hurt event_var(attacker) event_var(userid) 20
		}

		if (event_var(weapon) = sg550) do
		{
			es point_hurt event_var(attacker) event_var(userid) 20
		}
	}

	if (server_var(lcheck) >= 4) do
	{
		es_setinfo dacheck 0
		es_keygetvalue dacheck dndExtra event_var(es_steamid) death_attack
		if (event_var(weapon) = awp) do
		{
			es est_freeze event_var(userid) 1
			if (server_var(dacheck) = 0) do
			{
				es_delayed 3 es est_freeze event_var(userid) 0
			}
		}

		if (event_var(weapon) = g3sg1) do
		{
			es est_freeze event_var(userid) 1
			if (server_var(dacheck) = 0) do
			{
				es_delayed 1 es est_freeze event_var(userid) 0
			}
		}

		if (event_var(weapon) = sg550) do
		{
			es est_freeze event_var(userid) 1
			if (server_var(dacheck) = 0) do
			{
				es_delayed 1 es est_freeze event_var(userid) 0
			}
		}
	}
}

block fighter_say
{
	es_setinfo lcheck 0
	es_keygetvalue lcheck dndUsers event_var(es_steamid) fighter
	es_setinfo lacheck 0
	es_keygetvalue lacheck dndUsers event_var(es_steamid) la
	es_setinfo pcheck 0
	es_keygetvalue pcheck dndUsers event_var(es_steamid) prestige
	if (server_var(pcheck) = 0) do
	{
		es_math lcheck - server_var(lacheck)
	}
	if (server_var(lcheck) <= 0) do
	{
		es_doblock dnd/la_low
		es_math lcheck + server_var(lacheck)
	}
	es_setinfo plcheck 0
	es_keygetvalue plcheck dndUsers event_var(es_steamid) server_var(pcheck)
	if (server_var(pcheck) = fpc1) do
	{
		es_setinfo lcheck 5
	}
	if (server_var(pcheck) = fpc2) do
	{
		es_setinfo lcheck 10
	}
	if (server_var(pcheck) = fpc3) do
	{
		es_setinfo lcheck 15
	}

	if (event_var(text) = !skills) do
	{
		es_setinfo fighter_skills "Fighter's Skills:\n"
		if (server_var(lcheck) >= 1) do
		{
			es_setinfo health 15
		}
		if (server_var(lcheck) >= 2) do
		{
			es_format fighter_skills "%1 Bonus Damage with all pistols.\n" server_var(fighter_skills)
		}
		if (server_var(lcheck) >= 4) do
		{
			es_math health + 5
			es_setinfo dr 10
		}
		if (server_var(lcheck) >= 5) do
		{
			es_format fighter_skills "%1 Bonus Damage with HE Grenades.\n" server_var(fighter_skills)
		}
		if (server_var(lcheck) >= 6) do
		{
			es_format fighter_skills "%1 Powerful Strike(Drug).\n" server_var(fighter_skills)
		}
		if (server_var(lcheck) >= 7) do
		{
			es_math health + 5
		}
		if (server_var(lcheck) >= 8) do
		{
			es_format fighter_skills "%1 Bonus M4/AK Damage.\n" server_var(fighter_skills)
		}
		if (server_var(lcheck) >= 10) do
		{
			es_math health + 5
			es_format fighter_skills "%1 Gain the power to use the AWP Sniper Rifle.\n" server_var(fighter_skills)
		}
		if (server_var(lcheck) >= 12) do
		{
			es_format fighter_skills "%1 Immune to critical hits.\n" server_var(fighter_skills)
		}
		if (server_var(lcheck) >= 13) do
		{
			es_math health + 5
		}
		if (server_var(lcheck) >= 14) do
		{
			es_math dr + 10
		}
		if (server_var(lcheck) >= 16) do
		{
			es_math health + 5
			es_format fighter_skills "%1 Stunning M249.\n" server_var(fighter_skills)
		}
		if (server_var(lcheck) >= 18) do
		{
			es_format fighter_skills "%1 175 Armor.\n" server_var(fighter_skills)
		}
		if (server_var(lcheck) >= 19) do
		{
			es_math health + 5
		}
		if (server_var(lcheck) >= 20) do
		{
			es_format fighter_skills "%1 +20% Damage.\n" server_var(fighter_skills)
		}
		es_format fighter_skills "%1 Bonus Health + %2\n" server_var(fighter_skills) server_var(health)
		if (server_var(lcheck) >= 4) do
		{
			es_format fighter_skills "%1 %2% Damage Reduction.\n" server_var(fighter_skills) server_var(dr)
		}
		if (server_var(pcheck) = fpc1) do
		{
			es_setinfo nades 0
			es_setinfo flash 0
			if (server_var(plcheck) >= 1) do
			{
				es_setinfo nades 1
			}
			if (server_var(plcheck) >= 2) do
			{
				es_format fighter_skills "%1 Drug Nades.\n" server_var(fighter_skills)
			}
			if (server_var(plcheck) >= 3) do
			{
				es_setinfo flash 1
			}
			if (server_var(plcheck) >= 4) do
			{
				es_math flash + 1
			}
			if (server_var(plcheck) >= 5) do
			{
				es_math nades + 1
			}
			if (server_var(plcheck) >= 6) do
			{
				es_format fighter_skills "%1 Fire Nades.\n" server_var(fighter_skills)
			}
			if (server_var(plcheck) >= 7) do
			{
				es_math flash + 1
			}
			if (server_var(plcheck) >= 8) do
			{
				es_math flash + 1
			}
			if (server_var(plcheck) >= 9) do
			{
				es_math flash + 1
			}
			if (server_var(plcheck) >= 10) do
			{
				es_math nades + 1
			}
			if (server_var(plcheck) >= 11) do
			{
				es_format fighter_skills "%1 Freeze Nades.\n" server_var(fighter_skills)
			}
			if (server_var(plcheck) >= 12) do
			{
				es_math flash + 1
			}
			if (server_var(plcheck) >= 13) do
			{
				es_math flash + 1
			}
			if (server_var(plcheck) >= 14) do
			{
				es_math flash + 1
			}
			if (server_var(plcheck) >= 15) do
			{
				es_math nades + 1
			}
			es_format fighter_skills "%1 !he - (%2) Per Round.\n" server_var(fighter_skills) server_var(nades)
			es_format fighter_skills "%1 !flash - (%2) Per Round.\n" server_var(fighter_skills) server_var(flash)
		}
		if (server_var(pcheck) = fpc2) do
		{
			es_setinfo dcount 0
			if (server_var(plcheck) >= 1) do
			{
				es_format fighter_skills "%1 (%2) Weapon Enhancement Points per round.\n" server_var(fighter_skills) server_var(plcheck)
			}
			if (server_var(plcheck) >= 3) do
			{
				if (server_var(plcheck) < 8) do
				{
//					es_format fighter_skills "%1 5 Points of AOE Damage.\n" server_var(fighter_skills)
				}
			}
			if (server_var(plcheck) >= 8) do
			{
//				es_format fighter_skills "%1 10 Points of AOE Damage.\n" server_var(fighter_skills)
			}
		}
		if (server_var(pcheck) = fpc3) do
		{
			if (server_var(plcheck) >= 3) do
			{
				es_format fighter_skills "%1 Bonus Sniper Damage.\n" server_var(fighter_skills)
			}
			if (server_var(plcheck) >= 4) do
			{
				es_format fighter_skills "%1 Stunning Sniper.\n" server_var(fighter_skills)
			}
			if (server_var(plcheck) >= 5) do
			{
				es_format fighter_skills "%1 10% Bonus Speed.\n" server_var(fighter_skills)
			}
		}
		esnq ma_msay 0 event_var(userid) server_var(fighter_skills)
	}
}

block nade
{
	es_setinfo es_userid 0
  	es_getcmduserid es_userid
	es_setinfo es_steamid 0
	es est_getsteam es_steamid server_var(es_userid)
	es_setinfo pcheck 0
	es_keygetvalue pcheck dndUsers server_var(es_steamid) prestige
	es_setinfo lcheck 0
	es_keygetvalue lcheck dndUsers server_var(es_steamid) server_var(pcheck)
	if (server_var(pcheck) = fpc1) do
	{
		if (server_var(lcheck) >= 1) do
		{
			es_setinfo ncheck 0
			es_keygetvalue ncheck dndExtra server_var(es_steamid) nades
			if (server_var(ncheck) > 0) do
			{
				es ma_give server_var(es_userid) weapon_hegrenade
				es_math ncheck - 1
				es_keysetvalue dndExtra server_var(es_steamid) nades server_var(ncheck)
				es_tell server_var(es_userid) #green You have obtained a hegrenade!
			}
		}
	}
}

block flash
{
	es_setinfo es_userid 0
  	es_getcmduserid es_userid
	es_setinfo es_steamid 0
	es est_getsteam es_steamid server_var(es_userid)
	es_setinfo pcheck 0
	es_keygetvalue pcheck dndUsers server_var(es_steamid) prestige
	es_setinfo lcheck 0
	es_keygetvalue lcheck dndUsers server_var(es_steamid) server_var(pcheck)
	if (server_var(pcheck) = fpc1) do
	{
		if (server_var(lcheck) >= 3) do
		{
			es_setinfo fcheck 0
			es_keygetvalue fcheck dndExtra server_var(es_steamid) flash
			if (server_var(fcheck) > 0) do
			{
				es ma_give server_var(es_userid) weapon_flashbang
				es_math fcheck - 1
				es_keysetvalue dndExtra server_var(es_steamid) flash server_var(fcheck)
				es_tell server_var(es_userid) #green You have obtained a flashbang!
			}
		}
	}
}

block defend
{
	es_setinfo userid 0
  	es_getcmduserid userid
	es_setinfo es_steamid 0
	es est_getsteam es_steamid server_var(userid)
	es_setinfo pcheck 0
	es_keygetvalue pcheck dndUsers server_var(es_steamid) prestige
	es_setinfo lcheck 0
	es_keygetvalue lcheck dndUsers server_var(es_steamid) server_var(pcheck)
	es_setinfo lacheck 0
	es_keygetvalue lacheck dndUsers server_var(es_steamid) la
	es_math lcheck - server_var(lacheck)
	es_setinfo mana 0
	if (server_var(pcheck) = fpc2) do
	{
		if (server_var(lcheck) >= 1) do
		{
			es_setinfo dcount 0
			es_keygetvalue dcount dndExtra server_var(es_steamid) dcounter
			if (sever_var(dcount) > 0) do
			{
				es_setinfo dcheck 0
				es_keygetvalue dcheck dndExtra server_var(es_steamid) defend
				if (server_var(dcheck) = 0)
				{
					es_setinfo dcounter 0
					es_keygetvalue dcounter dndExtra server_var(es_steamid) dcounter
					if (server_var(dcounter) > 0) do
					{
						es_math dcounter - 1
						es_keysetvalue dndExtra server_var(es_steamid) dcounter server_var(dcounter)
						es_keysetvalue dndExtra server_var(es_steamid) defend 1
						es_tell server_var(userid) #green You have entered a defensive stance. Use !defend to return to normal.
						es est_freeze server_var(userid) 1
					}
				}
				else do
				{
					es_keysetvalue dndExtra server_var(es_steamid) defend 0
					es_tell server_var(userid) #green You have ended your defensive stance.
					es est_freeze server_var(userid) 0
				}
			}
		}
	}
}

block fighter_death
{
	es_setinfo lcheck 0
	es_keygetvalue lcheck dndUsers event_var(es_steamid) fighter
}

block bonus_damage_pistol
{
	if (event_var(weapon) = glock) do
	{
		es point_hurt event_var(attacker) event_var(userid) 5
	}
	
	if (event_var(weapon) = usp) do
	{
		es point_hurt event_var(attacker) event_var(userid) 10
	}

	if (event_var(weapon) = p228) do
	{
		es point_hurt event_var(attacker) event_var(userid) 15
	}
	
	if (event_var(weapon) = deagle) do
	{
		es point_hurt event_var(attacker) event_var(userid) 20
	}
	
	if (event_var(weapon) = elite) do
	{
		es point_hurt event_var(attacker) event_var(userid) 5
	}

	if (event_var(weapon) = fiveseven) do
	{
		es point_hurt event_var(attacker) event_var(userid) 5
	}
}

block rogue_spawn
{
	es_setinfo lcheck 0
	es_keygetvalue lcheck dndUsers event_var(es_steamid) rogue
	es_setinfo lacheck 0
	es_keygetvalue lacheck dndUsers event_var(es_steamid) la
	es_setinfo sneak 0
	es_setinfo stealth 0
	es_keygetvalue stealth dndExtra event_var(es_steamid) color
	es_setinfo pcheck 0
	es_keygetvalue pcheck dndUsers event_var(es_steamid) prestige
	if (server_var(lcheck) < 3) then es popup send mainmenu event_var(userid)
	if (server_var(pcheck) = 0) do
	{
		es_math lcheck - server_var(lacheck)
	}
	if (server_var(lcheck) <= 0) do
	{
		es_doblock dnd/la_low
		es_math lcheck + server_var(lacheck)
	}
	if (server_var(pcheck) = rpc1) do
	{
		es_doblock dnd/rpc1_spawn
		es_setinfo lcheck 5
	}
	if (server_var(pcheck) = rpc2) do
	{
		es_doblock dnd/rpc2_spawn
		es_setinfo lcheck 10
	}
	if (server_var(pcheck) = rpc3) do
	{
		es_doblock dnd/rpc3_spawn
		es_setinfo lcheck 15
	}
	
	es_keygetvalue stealth dndExtra event_var(es_steamid) color
	es_keygetvalue sneak dndExtra event_var(es_steamid) sneakdice
	if (server_var(lcheck) >= 1) do
	{
		es_math sneak + 1
		es_math stealth - 145
	}

	if (server_var(lcheck) >= 2) do
	{
		es_tell event_var(userid) #green You now have a chance to dodge attacks.
		es_math stealth - 7
	}

	if (server_var(lcheck) >= 3) do
	{
		es_math sneak + 1
	}

	if (server_var(lcheck) >= 4) do
	{
		es_math stealth - 7
	}

	if (server_var(lcheck) >= 5) do
	{
		es_math sneak + 1
	}

	if (server_var(lcheck) >= 6) do
	{
		es_math stealth - 7
	}

	if (server_var(lcheck) >= 7) do
	{
		es_math sneak + 1
	}

	if (server_var(lcheck) >= 8) do
	{
		es_math stealth - 7
	}

	if (server_var(lcheck) >= 9) do
	{
		es_math sneak + 1
	}

	if (server_var(lcheck) >= 10) do
	{
		es_tell event_var(userid) #green You have an increased dodge chance!
		es_math stealth - 7
	}

	if (server_var(lcheck) >= 11) do
	{
		es_math sneak + 1
	}

	if (server_var(lcheck) >= 12) do
	{
		es_math stealth - 7
	}

	if (server_var(lcheck) >= 13) do
	{
		es_math sneak + 1
	}

	if (server_var(lcheck) >= 14) do
	{
		es_math stealth - 7
	}

	if (server_var(lcheck) >= 15) do
	{
		es_math sneak + 1
	}

	if (server_var(lcheck) >= 16) do
	{
		es_math stealth - 7
	}

	if (server_var(lcheck) >= 17) do
	{
		es_math sneak + 1
	}

	if (server_var(lcheck) >= 18) do
	{
		es_math stealth - 7
	}

	if (server_var(lcheck) >= 19) do
	{
		es_tell event_var(userid) #green Cripple the person you hit with you sneak attacks.
		es_math sneak + 1
	}

	if (server_var(lcheck) >= 20) do
	{
		es_math stealth - 7
	}
	es_tell event_var(userid) #green Your are now stealthed as a rogue!
	es_keysetvalue dndExtra event_var(es_steamid) color server_var(stealth)
	es_keysetvalue dndExtra event_var(es_steamid) sneakdice server_var(sneak)
}

block rpc1_spawn
{
	es_setinfo lcheck 0
	es_keygetvalue lcheck dndUsers event_var(es_steamid) rpc1
	es_setinfo lacheck 0
	es_keygetvalue lacheck dndUsers event_var(es_steamid) la
	es_math lcheck - server_var(lacheck)
	es_setinfo mana 0
	if (server_var(lcheck) < 0) do
	{
		es_doblock dnd/la_low
		es_math lcheck + server_var(lacheck)
	}
	es_setinfo speed_check 0
	es_keygetvalue speed_check dndExtra event_var(es_steamid) speed
	es_setinfo stealth 0
	es_keygetvalue stealth dndExtra event_var(es_steamid) color
	if (server_var(lcheck) >= 1) do
	{
		es_tell event_var(userid) #green Use !jump to turn high jumping on or off.
		es_keysetvalue dndExtra event_var(es_steamid) jump 1
		es_math stealth - 5
	}
	
	if (server_var(lcheck) >= 2) do
	{
		es_math speed_check + .05
	}

	if (server_var(lcheck) >= 3) do
	{
		es_math stealth - 5
	}

	if (server_var(lcheck) >= 5) do
	{
		es_math stealth - 6
		es_tell event_var(userid) #green Use !sprint to gain a short speed boost.
		es_math speed_check + .05
	}

	if (server_var(lcheck) >= 7) do
	{
		es_math stealth - 5
	}
	
	if (server_var(lcheck) >= 8) do
	{
		es_math speed_check + .05
	}

	if (server_var(lcheck) >= 9) do
	{
		es_math stealth - 5
	}

	if (server_var(lcheck) >= 11) do
	{
		es_math speed_check + .05
		es_math stealth - 5
	}

	if (server_var(lcheck) >= 13) do
	{
		es_math stealth - 5
	}

	if (server_var(lcheck) >= 14) do
	{
		es_math speed_check + .05
	}

	if (server_var(lcheck) >= 15) do
	{
		es_math stealth - 5
	}
	es_keysetvalue dndExtra event_var(es_steamid) color server_var(stealth)
	es_keysetvalue dndExtra event_var(es_steamid) speed server_var(speed_check)
}

block rpc2_spawn
{
	es_setinfo lcheck 0
	es_keygetvalue lcheck dndUsers event_var(es_steamid) rpc2
	es_setinfo lacheck 0
	es_keygetvalue lacheck dndUsers event_var(es_steamid) la
	es_math lcheck - server_var(lacheck)
	es_setinfo mana 0
	if (server_var(lcheck) < 0) do
	{
		es_doblock dnd/la_low
		es_math lcheck + server_var(lacheck)
	}
	es_setinfo sdice 0
	es_setinfo stealth 0
	es_keygetvalue stealth dndExtra event_var(es_steamid) color
	es_delayed 6 es_keysetvalue dndExtra event_var(es_steamid) death_attack 0
	if (server_var(lcheck) >= 1) do
	{
		es_tell event_var(userid) #green You can use !wait to wait to perform a death attack.
		es_math sdice + 1
	}

	if (server_var(lcheck) >= 2) do
	{
		es_math stealth - 9
	}

	if (server_var(lcheck) >= 3) do
	{
		es_math sdice + 1
		if (event_var(es_userteam) = 2) do
		{
			es_doblock dnd/ct_mask
		}
		if (event_var(es_userteam) = 3) do
		{
			es_doblock dnd/t_mask
		}
	}

	if (server_var(lcheck) >= 4) do
	{
		es_math stealth - 9
	}

	if (server_var(lcheck) >= 5) do
	{
		es_math sdice + 1
	}

	if (server_var(lcheck) >= 6) do
	{
		es_math stealth - 9
		es_keysetvalue dndExtra event_var(es_steamid) slowuses 4
	}

	if (server_var(lcheck) >= 7) do
	{
		es_math sdice + 1
	}

	if (server_var(lcheck) >= 8) do
	{
		es_math stealth - 9
	}

	if (server_var(lcheck) >= 9) do
	{
		es_math sdice + 1
	}

	if (server_var(lcheck) >= 10) do
	{
		es_math stealth - 9
	}
	es_keysetvalue dndExtra event_var(es_steamid) color server_var(stealth)
	es_keysetvalue dndExtra event_var(es_steamid) sneakdice server_var(sdice)
}

block rpc3_spawn
{
	es_setinfo lcheck 0
	es_keygetvalue lcheck dndUsers event_var(es_steamid) rpc3
	es_setinfo lacheck 0
	es_keygetvalue lacheck dndUsers event_var(es_steamid) la
	es_math lcheck - server_var(lacheck)
	es_setinfo mana 0
	if (server_var(lcheck) < 0) do
	{
		es_doblock dnd/la_low
		es_math lcheck + server_var(lacheck)
	}
	if (server_var(lcheck) >= 1) do
	{
		es_setinfo rcheck 0
		es_keygetvalue rcheck dndUsers event_var(es_steamid) race
		if (server_var(rcheck) != troll) do
		{
			es est_setplayercolor event_var(userid) 255 255 255 0
			es_tell event_var(userid) #green Only your knife can be seen!
		}
		if (server_var(rcheck) = troll) do
		{
			es est_setplayercolor event_var(userid) 255 255 255 20
			es_tell event_var(userid) #green As a troll shadow dancer you are mostly stealthed!
		}
	}
	if (server_var(lcheck) >= 3) do
	{
		es_setinfo x 0
		es_setinfo y 0
		es_setinfo z 0
		es_getplayerlocation x y z event_var(userid)
		es_keysetvalue dndExtra event_var(es_steamid) x_var server_var(x)
		es_keysetvalue dndExtra event_var(es_steamid) y_var server_var(y)
		es_keysetvalue dndExtra event_var(es_steamid) z_var server_var(z)
		es_tell event_var(userid) #green Use !return to shadow jump back to your spawn.
		
	}
	if (server_var(lcheck) >= 5) do
	{
		es_setinfo speed_check 0
		es_keygetvalue speed_check dndExtra event_var(es_steamid) speed
		es_math speed_check + .2
		es_keysetvalue dndExtra event_var(es_steamid) speed server_var(speed_check)
	}
}

block rogue_victim
{
	es_setinfo lcheck 0
	es_keygetvalue lcheck dndUsers event_var(es_steamid) rogue
	es_setinfo lacheck 0
	es_keygetvalue lacheck dndUsers event_var(es_steamid) la
	es_setinfo pcheck 0
	es_keygetvalue pcheck dndUsers event_var(es_steamid) prestige
	if (server_var(pcheck) = 0) do
	{
		es_math lcheck - server_var(lacheck)
	}
	if (server_var(lcheck) <= 0) do
	{
		es_doblock dnd/la_low
		es_math lcheck + server_var(lacheck)
	}
	if (server_var(pcheck) = rpc1) do
	{
		es_doblock dnd/rpc1_victim
		es_setinfo lcheck 5
	}
	if (server_var(pcheck) = rpc2) do
	{
		es_doblock dnd/rpc2_victim
		es_setinfo lcheck 10
	}
	if (server_var(pcheck) = rpc3) do
	{
		es_doblock dnd/rpc3_victim
		es_setinfo lcheck 15
	}
	if (server_var(pcheck) != rpc3) do
	{
		es stealth_off event_var(userid)
		es sneak_off event_var(userid)
	}

	if (server_var(lcheck) >= 2) do
	{
		if (server_var(lcheck) < 10) do
		{
			es_rand random 1 5
			if (server_var(random) = 1) do
			{
				es ma_givehealth event_var(userid) event_var(dmg_health)
				es_tell event_var(userid) #green You have just dodged event_var(dmg_health) damage from an attack.
			}
		}
	}

	if (server_var(lcheck) >= 10) do
	{
		es_rand random 1 3
		if (server_var(random) = 1) do
		{
			es ma_givehealth event_var(userid) event_var(dmg_health)
			es_tell event_var(userid) #green You have just dodged event_var(dmg_health) damage from an attack.
		}
	}
}

block rpc1_victim
{
	es_setinfo lcheck 0
	es_keygetvalue lcheck dndUsers event_var(es_steamid) rpc1
}

block rpc2_victim
{
	es_setinfo lcheck 0
	es_keygetvalue lcheck dndUsers event_var(es_steamid) rpc2	
}

block rpc3_victim
{
	es_setinfo lcheck 0
	es_keygetvalue lcheck dndUsers event_var(es_steamid) rpc3
	es est_setplayercolor event_var(userid) 255 255 255 0	
}

block rogue_attacker
{
	es_setinfo lcheck 0
	es_keygetvalue lcheck dndUsers event_var(es_attackersteamid) rogue
	es_setinfo lacheck 0
	es_keygetvalue lacheck dndUsers event_var(es_attackersteamid) la
	es_setinfo pcheck 0
	es_keygetvalue pcheck dndUsers event_var(es_attackersteamid) prestige
	if (server_var(pcheck) = 0) do
	{
		es_math lcheck - server_var(lacheck)
	}
	if (server_var(pcheck) = rpc1) do
	{
		es_doblock dnd/rpc1_attacker
		es_setinfo lcheck 5
	}
	if (server_var(pcheck) = rpc2) do
	{
		es_doblock dnd/rpc2_attacker
		es_setinfo lcheck 10
	}
	if (server_var(pcheck) = rpc3) do
	{
		es_doblock dnd/rpc3_attacker
		es_setinfo lcheck 15
	}
	if (server_var(pcheck) != rpc3) do
	{
		es stealth_off event_var(attacker)
	}
	es_rand random 1 5
	if (server_var(random) = 1) do
	{
		es_setinfo cash server_var(lcheck)
		es_math cash * 50
		es ma_takecash event_var(userid) server_var(cash)
		es ma_givecash event_var(attacker) server_var(cash)
		es_tell event_var(attacker) #green You have stolen $ server_var(cash) from event_var(es_username).
	}
	es_setinfo scheck 0
	es_keygetvalue scheck dndExtra event_var(es_attackersteamid) sneak
	if (server_var(scheck) = 0) do
	{
		es sneak_off event_var(attacker)
		es_setinfo sneak 0
		es_keygetvalue sneak dndExtra event_var(es_attackersteamid) sneakdice
		es_setinfo random 0
		es_rand random 1 6
		es_math random * server_var(sneak)
		es point_hurt event_var(attacker) event_var(userid) server_var(random)
		es_tell event_var(attacker) #green You dealt server_var(random) bonus damage with a sneak attack.

		if (server_var(lcheck) >= 19) do
		{
			es_setinfo save 0
			es_setinfo fort 0
			es_rand save 1 20
			if (server_var(save) != 20) do
			{
				es_keygetvalue fort dndExtra event_var(es_steamid) fortsave
				es_math save + server_var(fort)
				if (server_var(save) < 20) do
				{
					es est_freeze event_var(userid) 1
					es_setinfo dacheck 0
					es_keygetvalue dacheck dndExtra event_var(es_steamid) death_attack
					if (server_var(dacheck) = 0) do
					{
						es_delayed 3 es est_freeze event_var(userid) 0
					}
				}
			}
		}
	}
}

event player_jump
{
	es_setinfo pcheck 0
	es_keygetvalue pcheck dndUsers event_var(es_steamid) prestige
	if (server_var(pcheck) = rpc1) do
	{
		es_doblock dnd/rpc1_jump
	}
	else do
	{
		es_setinfo rcheck 0
		es_keygetvalue rcheck dndUsers event_var(es_steamid) race
		if (server_var(rcheck) = halfling) do
		{
			es est_setgravity event_var(userid) .70
		}
		if (server_var(rcheck) = tibbit) do
		{
			es est_setgravity event_var(userid) .70
		}
		if (server_var(rcheck) = ghoul) do
		{
			es est_speed event_var(userid) 2.1
			es est_setplayercolor event_var(userid) 0 0 0 0
			es est_PhysPush event_var(userid) 0 0 500
			es_delayed 1 es est_speed event_var(userid) 1.3
			es_delayed 1 es est_setplayercolor event_var(userid) 0 0 0 255 1
		}
	}
}

block rpc1_jump
{
	es_setinfo lcheck 0
	es_keygetvalue lcheck dndUsers event_var(es_steamid) rpc1
	es_setinfo lacheck 0
	es_keygetvalue lacheck dndUsers event_var(es_steamid) la
	es_math lcheck - server_var(lacheck)
	es_setinfo mana 0
	if (server_var(lcheck) <= 0) do
	{
		es_doblock dnd/la_low
		es_math lcheck + server_var(lacheck)
	}
	es_setinfo rcheck 0
	es_keygetvalue rcheck dndUsers event_var(es_steamid) race
	es_setinfo grav 1.00
	if (server_var(lcheck) >= 1) do
	{
		es_math grav - .20
		if (server_var(rcheck) = halfling) do
		{
			es_math grav - .20
		}
	}

	if (server_var(lcheck) >= 2) do
	{
		es_math grav - .05
		if (server_var(rcheck) = halfling) do
		{
			es_math grav + .01
		}
	}

	if (server_var(lcheck) >= 3) do
	{
		es_math grav - .05
		if (server_var(rcheck) = halfling) do
		{
			es_math grav + .01
		}
	}

	if (server_var(lcheck) >= 4) do
	{
		es_math grav - .05
		if (server_var(rcheck) = halfling) do
		{
			es_math grav + .01
		}
	}

	if (server_var(lcheck) >= 5) do
	{
		es_math grav - .05
		if (server_var(rcheck) = halfling) do
		{
			es_math grav + .01
		}
	}

	if (server_var(lcheck) >= 6) do
	{
		es_math grav - .05
		if (server_var(rcheck) = halfling) do
		{
			es_math grav + .01
		}
	}

	if (server_var(lcheck) >= 7) do
	{
		es_math grav - .05
		if (server_var(rcheck) = halfling) do
		{
			es_math grav + .01
		}
	}

	if (server_var(lcheck) >= 8) do
	{
		es_math grav - .05
		if (server_var(rcheck) = halfling) do
		{
			es_math grav + .01
		}
	}

	if (server_var(lcheck) >= 9) do
	{
		es_math grav - .05
		if (server_var(rcheck) = halfling) do
		{
			es_math grav + .01
		}
	}
	
	if (server_var(lcheck) >= 10) do
	{
		es_math grav - .05
		if (server_var(rcheck) = halfling) do
		{
			es_math grav + .01
		}
	}

	if (server_var(lcheck) >= 11) do
	{
		es_math grav - .05
		if (server_var(rcheck) = halfling) do
		{
			es_math grav + .01
		}
	}
	
	if (server_var(lcheck) >= 12) do
	{
		es_math grav - .05
		if (server_var(rcheck) = halfling) do
		{
			es_math grav + .01
		}
	}

	if (server_var(lcheck) >= 13) do
	{
		es_math grav - .05
		if (server_var(rcheck) = halfling) do
		{
			es_math grav + .01
		}
	}

	if (server_var(lcheck) >= 14) do
	{
		es_math grav - .05
		if (server_var(rcheck) = halfling) do
		{
			es_math grav + .01
		}
	}

	if (server_var(lcheck) >= 15) do
	{
		es_math grav - .05
		if (server_var(rcheck) = halfling) do
		{
			es_math grav + .01
		}
	}
	es_setinfo jcheck 0
	es_keygetvalue jcheck dndExtra event_var(es_steamid) jump
	if (server_var(jcheck) = 1) do
	{
		es est_setgravity event_var(userid) server_var(grav)
	}
	else do
	{
		es est_setgravity event_var(userid) 1.00
	}
}

block rpc1_attacker
{
	es_setinfo lcheck 0
	es_keygetvalue lcheck dndUsers event_var(es_attackersteamid) rpc1
}

block rpc2_attacker
{
	es_setinfo lcheck 0
	es_keygetvalue lcheck dndUsers event_var(es_attackersteamid) rpc2
	es_setinfo lacheck 0
	es_keygetvalue lacheck dndUsers event_var(es_attackersteamid) la
	es_math lcheck - server_var(lacheck)
	es_setinfo mana 0
	es_setinfo dcheck 0
	es_keygetvalue dcheck dndExtra event_var(es_attackersteamid) death_attack
	if (event_var(weapon) != hegrenade) do
	{
		if (server_var(dcheck) = 1) do
		{
			es est_freeze event_var(attacker) 0
			es_setinfo vclass 0
			es_keygetvalue vclass dndUsers event_var(es_steamid) class
			es_setinfo vlevel 0
			es_keygetvalue vlevel dndUsers event_var(es_steamid) server_var(vclass)
			es_setinfo vrandom 0
			es_rand vrandom 1 20
			if (server_var(vrandom) != 20) do
			{
				es_setinfo reflexsave 0
				es_keygetvalue reflexsave dndExtra event_var(es_steamid) reflexsave
				es_math vrandom + server_var(reflexsave)
				
				es_setinfo wrandom 12
				es_math wrandom + server_var(lcheck)
				if (event_var(weapon) = usp) do
				{
					es_math wrandom + 2
				}
				if (event_var(weapon) = scout) do
				{
					es_math wrandom + 1
				}
				if (server_var(vrandom) >= server_var(wrandom)) do
				{
					es_tell event_var(attacker) #green Your victim has resisted your death attack.
				}
				else do
				{
					es_setinfo vrandom 0
					es_rand vrandom 1 20
					es_setinfo fortsave 0
					es_keygetvalue fortsave dndExtra event_var(es_steamid) fortsave
					es_math vrandom + server_var(fortsave)
					
					if (server_var(vrandom) >= server_var(wrandom)) do
					{
						es est_freeze event_var(userid) 1
						es_delayed 8 es est_freeze event_var(userid) 0
						es_tell event_var(attacker) #green Your death attack has stunned your target for 8 seconds.
					}
					else do
					{
						es point_hurt event_var(attacker) event_var(userid) 1000
						es_tell event_var(attacker) #green You have killed your victim with your death attack.
					}
				}
			}
			es_keysetvalue dndExtra event_var(es_attackersteamid) death_attack 0
		}
	}
	es_setinfo scheck 0
	es_keygetvalue scheck dndExtra event_var(es_attackersteamid) sneak
	if (server_var(scheck) = 1) do
	{
		if (server_var(lcheck) >= 9) do
		{
			es_setinfo save 0
			es_setinfo fort 0
			es_rand save 1 20
			if (server_var(save) != 20) do
			{
				es_keygetvalue fort dndExtra event_var(es_steamid) fortsave
				es_math save + server_var(fort)
				if (server_var(save) < 18) do
				{
					es est_freeze event_var(userid) 1
					es_setinfo dacheck 0
					es_keygetvalue dacheck dndExtra event_var(es_steamid) death_attack
					if (server_var(dacheck) = 0) do
					{
						es_delayed 3 es est_freeze event_var(userid) 0
					}
				}
			}
		}
	}
	es_setinfo slowcheck 0
	es_keygetvalue slowcheck dndExtra event_var(es_steamid) slowpoison
	if (server_var(slowcheck) = 0) do
	{
		es_setinfo uses 0
		es_keygetvalue uses dndExtra event_var(es_attackersteamid) slowuses
		if (server_var(uses) > 0) do
		{
			es_math uses - 1
			es_keysetvalue dndExtra event_var(es_attackersteamid) slowuses server_var(uses)
			es_setinfo save 0
			es_rand save 1 20
			if (server_var(save) != 20) do
			{
				es_setinfo fort 0
				es_keygetvalue fort dndExtra event_var(es_steamid) fortsave
				es_math save + server_var(fort)
				if (server_var(save) < 18) do
				{
					es_keysetvalue dndExtra event_var(es_steamid) slowcheck 1
					es_setinfo oldspeed 0
					es_keygetvalue oldspeed dndExtra event_var(es_steamid) speed
					es_setinfo newspeed server_var(oldspeed)
					es_math newspeed - .07
					es est_speed event_var(userid) server_var(newspeed)
					es_delayed 1 es_math newspeed - .07
					es_delayed 1 es est_speed event_var(userid) server_var(newspeed)
					es_delayed 2 es_math newspeed - .07
					es_delayed 2 es est_speed event_var(userid) server_var(newspeed)
					es_delayed 3 es_math newspeed - .07
					es_delayed 3 es est_speed event_var(userid) server_var(newspeed)
					es_delayed 4 es_math newspeed - .07
					es_delayed 4 es est_speed event_var(userid) server_var(newspeed)
					es_delayed 5 es_math newspeed - .07
					es_delayed 5 es est_speed event_var(userid) server_var(newspeed)
					es_delayed 6 es est_speed event_var(userid) server_var(oldspeed)
					es_delayed 6 es_keysetvalue dndExtra event_var(es_steamid) slowcheck 0
				}
			}
		}
	}
}

block rpc3_attacker
{
	es_setinfo lcheck 0
	es_keygetvalue lcheck dndUsers event_var(es_attackersteamid) rpc3
}

block rogue_say
{
	es_setinfo lcheck 0
	es_keygetvalue lcheck dndUsers event_var(es_steamid) rogue
	es_setinfo lacheck 0
	es_keygetvalue lacheck dndUsers event_var(es_steamid) la
	es_setinfo pcheck 0
	es_keygetvalue pcheck dndUsers event_var(es_steamid) prestige
	if (server_var(pcheck) = 0) do
	{
		es_math lcheck - server_var(lacheck)
	}
	if (server_var(lcheck) <= 0) do
	{
		es_doblock dnd/la_low
		es_math lcheck + server_var(lacheck)
	}
	es_setinfo plcheck 0
	es_keygetvalue plcheck dndUsers  event_var(es_steamid) server_var(pcheck)
	if (server_var(pcheck) = rpc1) do
	{
		es_setinfo lcheck 5
	}
	if (server_var(pcheck) = rpc2) do
	{
		es_setinfo lcheck 10
	}
	if (server_var(pcheck) = rpc3) do
	{
		es_setinfo lcheck 15
	}

	if (event_var(text) = !skills) do
	{
		es_setinfo rogue_skills "Rogue's Skills:\n"
		if (server_var(lcheck) >= 1) do
		{
			es_format rogue_skills "%1 Stealth\n" server_var(rogue_skills)
		}
		if (server_var(lcheck) >= 2) do
		{
			if (server_var(lcheck) < 10) do
			{
				es_format rogue_skills "%1 Dodge\n" server_var(rogue_skills)
			}
		}
		if (server_var(lcheck) >= 10) do
		{
			es_format rogue_skills "%1 High level Dodge\n" server_var(rogue_skills)
		}
		if (server_var(lcheck) >= 19) do
		{
			es_format rogue_skills "%1 Crippling Sneak Attack\n" server_var(rogue_skills)
		}
		if (server_var(pcheck) = rpc1) do
		{
			es_setinfo grav 100
			es_setinfo speed 0
			if (server_var(plcheck) >= 1) do
			{
				es_math grav - 20
			}
			if (server_var(plcheck) >= 2) do
			{
				es_math grav - 5
				es_setinfo speed 5
			}
			if (server_var(plcheck) >= 3) do
			{
				es_math grav - 5
			}
			if (server_var(plcheck) >= 4) do
			{
				es_math grav - 5
			}
			if (server_var(plcheck) >= 5) do
			{
				es_format rogue_skills "%1 Use !sprint to run.\n" server_var(rogue_skills)
				es_math grav - 5
				es_math speed + 5
			}
			if (server_var(plcheck) >= 6) do
			{
				es_math grav - 5
			}
			if (server_var(plcheck) >= 7) do
			{
				es_math grav - 5
			}
			if (server_var(plcheck) >= 8) do
			{
				es_math grav - 5
				es_math speed + 5
			}
			if (server_var(plcheck) >= 9) do
			{
				es_math grav - 5
			}
			if (server_var(plcheck) >= 10) do
			{
				es_math grav - 5
			}
			if (server_var(plcheck) >= 11) do
			{
				es_math grav - 5
				es_math speed + 5
			}
			if (server_var(plcheck) >= 12) do
			{
				es_math grav - 5
			}
			if (server_var(plcheck) >= 13) do
			{
				es_math grav - 5
			}
			if (server_var(plcheck) >= 14) do
			{
				es_math grav - 5
				es_math speed + 5
			}
			if (server_var(plcheck) >= 15) do
			{
				es_math grav - 5
			}
			es_format rogue_skills "%1 High Jumping at (%2)% Gravity.\n (%3)% Bonus Speed.\n" server_var(rogue_skills) server_var(grav) server_var(speed)
		}
		if (server_var(pcheck) = rpc2) do
		{
			if (server_var(plcheck) >= 1) do
			{
				es_format rogue_skills "%1 Death Attack - !wait and !move to start or end.\n" server_var(rogue_skills)
			}
			if (server_var(plcheck) >= 3) do
			{
				es_format rogue_skills "%1 Disguised\n" server_var(rogue_skills)
			}
			if (server_var(plcheck) >= 6) do
			{
				es_format rogue_skills "%1 Poison\n" server_var(rogue_skills)
			}
			if (server_var(plcheck) >= 9) do
			{
				es_format rogue_skills "%1 Stunning Sneak Attack.\n" server_var(rogue_skills)
			}
		}
		if (server_var(pcheck) = rpc3) do
		{
			if (server_var(plcheck) >= 1) do
			{
				es_format rogue_skills "%1 Only your knife shows.\n" server_var(rogue_skills)
			}
			if (server_var(plcheck) >= 3) do
			{
				es_format rogue_skills "%1 Use !return to go back to spawn.\n" server_var(rogue_skills)
			}
			if (server_VaR(plcheck) >= 5) do
			{
				es_format rogue_skills "%1 20% Speed Boost.\n" server_var(rogue_skills)
			}
		}
		es_setinfo cash server_var(lcheck)
		es_math cash * 50
		es_format rogue_skills "%1 Have a chance to steal %2 cash on hit.\n" server_var(rogue_skills) server_var(cash)
		es_setinfo sdice 0
		es_setinfo color 0
		es_keygetvalue sdice dndExtra event_var(es_steamid) sneakdice
		es_keygetvalue color dndExtra event_var(es_steamid) color
		es_format rogue_skills "%1 Colored at %2 / 255\n (%3d6) Sneak Attack Dice\n" server_var(rogue_skills) server_var(color) server_var(sdice)
		esnq ma_msay 0 event_var(userid) server_var(rogue_skills)
	}
}

block sprint
{
	es_setinfo es_userid 0
  	es_getcmduserid es_userid
	es_setinfo es_steamid 0
	es est_getsteam es_steamid server_var(es_userid)
	es_setinfo pcheck 0
	es_keygetvalue pcheck dndUsers server_var(es_steamid) prestige
	es_setinfo lcheck 0
	es_keygetvalue lcheck dndUsers server_var(es_steamid) server_var(pcheck)
	es_setinfo lacheck 0
	es_keygetvalue lacheck dndUsers server_var(es_steamid) la
	es_math lcheck - server_var(lacheck)
	es_setinfo mana 0
	if (server_var(pcheck) = rpc1) do
	{
		if (server_var(lcheck) >= 5) do
		{
			es_setinfo timer 0
			es_keygetvalue timer dndExtra server_var(es_steamid) delay_speed
			if (server_var(timer) != 1) do
			{
				es_setinfo old_speed 0
				es_keygetvalue old_speed dndExtra server_var(es_steamid) speed
				es_setinfo new_speed server_var(old_speed)
				es_math new_speed * 1.5
				es est_speed server_var(es_userid) server_var(new_speed)
				es_delayed 3 es est_speed server_var(es_userid) server_var(old_speed)
				es_tell server_var(es_userid) #green You have a speed boost for the next 3 seconds.
				es_keysetvalue dndExtra server_var(es_steamid) delay_speed 1
				es_delayed 13 es_keysetvalue dndExtra server_var(es_steamid) delay_speed 0
			}
			else do
			{
				es_tell server_var(es_userid) #green Your sprint power is still recharging.
			}
		}
	}
}

block jump
{
	es_setinfo es_userid 0
  	es_getcmduserid es_userid
	es_setinfo es_steamid 0
	es est_getsteam es_steamid server_var(es_userid)
	es_setinfo pcheck 0
	es_keygetvalue pcheck dndUsers server_var(es_steamid) prestige
	es_setinfo lcheck 0
	es_keygetvalue lcheck dndUsers server_var(es_steamid) server_var(pcheck)
	if (server_var(pcheck) = rpc1) do
	{
		if (server_var(lcheck) >= 1) do
		{
			es_setinfo jcheck 0
			es_keygetvalue jcheck dndExtra server_var(es_steamid) jump
			if (server_var(jcheck) = 0) do
			{
				es_keysetvalue dndExtra server_var(es_steamid) jump 1
				es_tell server_var(es_es_userid) #green High jumping on.
			}
			else do
			{
				es_keysetvalue dndExtra server_var(es_steamid) jump 0
				es_tell server_var(es_userid) #green High jumping off.
			}			
		}
	}
}

block wait
{	
	es_setinfo es_userid 0
  	es_getcmduserid es_userid
	es_setinfo es_steamid 0
	es est_getsteam es_steamid server_var(es_userid)
	es_setinfo pcheck 0
	es_keygetvalue pcheck dndUsers server_var(es_steamid) prestige
	es_setinfo lcheck 0
	es_keygetvalue lcheck dndUsers server_var(es_steamid) rpc2
	es_setinfo lacheck 0
	es_keygetvalue lacheck dndUsers server_var(es_steamid) la
	es_math lcheck - server_var(lacheck)
	es_setinfo mana 0
	if (server_var(pcheck) = rpc2) do
	{
		if (server_var(lcheck) >= 1) do
		{
			es_setinfo timer 0
			es_keygetvalue timer dndExtra server_var(es_steamid) delay_counter
			if (server_var(timer) != 1) do
			{
				es_setinfo dcheck 0
				es_keygetvalue dcheck dndExtra server_var(es_steamid) death_attack
				if (server_var(dcheck) != 1) do
				{
					es_keysetvalue dndExtra server_var(es_steamid) delay_counter 1
					es est_freeze server_var(es_userid) 1
					es_tell server_var(es_userid) #green Death Attack preparing.
					es_delayed 6 es_keysetvalue dndExtra server_var(es_steamid) death_attack 1
					es_delayed 6 es_tell server_var(es_userid) #green Your next attack will deal a death blow.
					es_delayed 6 es_keysetvalue dndExtra server_var(es_steamid) delay_counter 0
				}
				else do
				{
					es_tell server_var(es_userid) #green Your death attack is already prepared!
				}
			}
			else do
			{
				es_tell server_var(es_userid) #green Your death attack is still preparing.
			}
		}
	}
}

block move
{
	es_setinfo es_userid 0
  	es_getcmduserid es_userid
	es_setinfo es_steamid 0
	es est_getsteam es_steamid server_var(es_userid)
	es_setinfo pcheck 0
	es_keygetvalue pcheck dndUsers server_var(es_steamid) prestige
	es_setinfo lcheck 0
	es_keygetvalue lcheck dndUsers server_var(es_steamid) rpc2
	if (server_var(pcheck) = rpc2) do
	{
		if (server_var(lcheck) >= 1) do
		{
			es_setinfo timer 0
			es_keygetvalue timer dndExtra server_var(es_steamid) delay_counter
			if (server_var(timer) != 1) do
			{
				es_setinfo dcheck 0
				es_keygetvalue dcheck dndExtra server_var(es_steamid) death_attack
				if (server_var(dcheck) = 1) do
				{
					es_keysetvalue dndExtra server_var(es_steamid) death_attack 0
					es est_freeze server_var(es_userid) 0
					es_tell server_var(es_userid) #green You have ended your death attack.
				}
			
			}
			else do
			{
				es_tell server_var(es_userid) #green Your death attack is still preparing.
			}
		}
	}
}

block return
{
	es_setinfo es_userid 0
  	es_getcmduserid es_userid
	es_setinfo es_steamid 0
	es est_getsteam es_steamid server_var(es_userid)
	es_setinfo pcheck 0
	es_keygetvalue pcheck dndUsers server_var(es_steamid) prestige
	es_setinfo lcheck 0
	es_keygetvalue lcheck dndUsers server_var(es_steamid) rpc3
	es_setinfo lacheck 0
	es_keygetvalue lacheck dndUsers server_var(es_steamid) la
	es_math lcheck - server_var(lacheck)
	es_setinfo mana 0
	if (server_var(pcheck) = rpc3) do
	{
		if (server_var(lcheck) >= 3) do
		{
			es_setinfo x 0
			es_setinfo y 0
			es_setinfo z 0
			es_keygetvalue x dndExtra server_var(es_steamid) x_var
			es_keygetvalue y dndExtra server_var(es_steamid) y_var
			es_keygetvalue z dndExtra server_var(es_steamid) z_var
			es ma_teleport server_var(es_userid) server_var(x) server_var(y) server_var(z)
			es_tell server_var(es_userid) #green You have returned to your spawn.
		}
	}
}

block rogue_death
{
	es_setinfo lcheck 0
	es_keygetvalue lcheck dndUsers event_var(es_steamid) rogue
	es_setinfo pcheck 0
	es_keygetvalue pcheck dndUsers event_var(es_steamid) prestige
	if (server_var(pcheck) = rpc1) do
	{
		es_doblock dnd/rpc1_death
		es_setinfo lcheck 5
	}
	if (server_var(pcheck) = rpc2) do
	{
		es_doblock dnd/rpc2_death
		es_setinfo lcheck 10
	}
	if (server_var(pcheck) = rpc3) do
	{
		es_doblock dnd/rpc3_death
		es_setinfo lcheck 15
	}
}

block rpc1_death
{
	es_setinfo lcheck 0
	es_keygetvalue lcheck dndUsers event_var(es_steamid) rpc1
}

block rpc2_death
{
	es_setinfo lcheck 0
	es_keygetvalue lcheck dndUsers event_var(es_steamid) rpc2
	es_keysetvalue dndExtra event_var(es_steamid) death_attack 0
}

block rpc3_death
{
	es_setinfo lcheck 0
	es_keygetvalue lcheck dndUsers event_var(es_steamid) rpc3
}

block wizard_spawn
{
	es_setinfo lcheck 0
	es_keygetvalue lcheck dndUsers event_var(es_steamid) wizard
	es_setinfo lacheck 0
	es_keygetvalue lacheck dndUsers event_var(es_steamid) la
	es_setinfo pcheck 0
	es_keygetvalue pcheck dndUsers event_var(es_steamid) prestige
	if (server_var(lcheck) < 3) then es popup send mainmenu event_var(userid)
	if (server_var(pcheck) = 0) do
	{
		es_math lcheck - server_var(lacheck)
	}
	if (server_var(lcheck) <= 0) do
	{
		es_doblock dnd/la_low
		es_math lcheck + server_var(lacheck)
	}
	if (server_var(pcheck) = wpc1) do
	{
		es_setinfo lcheck 5
		es_doblock dnd/wpc1_spawn
	}
	if (server_var(pcheck) = wpc2) do
	{
		es_setinfo lcheck 10
		es_doblock dnd/wpc2_spawn
	}
	if (server_var(pcheck) = wpc3) do
	{
		es_setinfo lcheck 15
		es_doblock dnd/wpc3_spawn
	}
	es_setinfo mana 0
	es_keygetvalue mana dndExtra event_var(es_steamid) mana
	if (server_var(lcheck) >= 1) do
	{
		es_math mana + 15
		es_setinfo spell 0
		es_keysetvalue dndExtra event_var(es_steamid) spell server_var(spell)
	}

	if (server_var(lcheck) >= 2) do
	{
		es_math mana + 10
	}

	if (server_var(lcheck) >= 3) do
	{
		es_math mana + 5
	}

	if (server_var(lcheck) >= 4) do
	{
		es_math mana + 10
	}

	if (server_var(lcheck) >= 5) do
	{
		es_math mana + 5
	}

	if (server_var(lcheck) >= 6) do
	{
		es_math mana + 10
	}

	if (server_var(lcheck) >= 7) do
	{
		es_math mana + 5
	}

	if (server_var(lcheck) >= 8) do
	{
		es_math mana + 10
	}

	if (server_var(lcheck) >= 9) do
	{
		es_math mana + 5
	}

	if (server_var(lcheck) >= 10) do
	{
		es_math mana + 10
	}

	if (server_var(lcheck) >= 11) do
	{
		es_math mana + 5
	}

	if (server_var(lcheck) >= 12) do
	{
		es_math mana + 10
	}

	if (server_var(lcheck) >= 13) do
	{
		es_math mana + 5
	}

	if (server_var(lcheck) >= 14) do
	{
		es_math mana + 10
	}

	if (server_var(lcheck) >= 15) do
	{
		es_math mana + 5
	}

	if (server_var(lcheck) >= 16) do
	{
		es_math mana + 10
	}

	if (server_var(lcheck) >= 17) do
	{
		es_math mana + 5
	}

	if (server_var(lcheck) >= 18) do
	{
		es_math mana + 10
	}

	if (server_var(lcheck) >= 19) do
	{
		es_math mana + 10
	}

	if (server_var(lcheck) >= 20) do
	{
		es_math mana + 10
	}
	es_keysetvalue dndExtra event_var(es_steamid) mana server_var(mana)
	es_doblock dnd/show_mana
}

block wpc1_spawn
{
	es_setinfo lcheck 5
	es_setinfo plcheck 0
	es_keygetvalue plcheck dndUsers event_var(es_steamid) wpc1
	es_setinfo lacheck 0
	es_keygetvalue lacheck dndUsers event_var(es_steamid) la
	es_math plcheck - server_var(lacheck)
	es_setinfo mana 0
	if (server_var(plcheck) < 0) do
	{
		es_doblock dnd/la_low
		es_math plcheck + server_var(lacheck)
	}
	es_setinfo mana 0
	es_keygetvalue mana dndExtra event_var(es_steamid) mana
	if (server_var(plcheck) >= 1) do
	{
		es_math mana + 10
	}

	if (server_var(plcheck) >= 2) do
	{
		es_math mana + 10
	}

	if (server_var(plcheck) >= 3) do
	{
		es_math mana + 5
	}

	if (server_var(plcheck) >= 4) do
	{
		es_math mana + 10
	}

	if (server_var(plcheck) >= 5) do
	{
		es_math mana + 5
	}

	if (server_var(plcheck) >= 6) do
	{
		es_math mana + 10
	}

	if (server_var(plcheck) >= 7) do
	{
		es_math mana + 5
	}

	if (server_var(plcheck) >= 8) do
	{
		es_math mana + 10
	}

	if (server_var(plcheck) >= 9) do
	{
		es_math mana + 5
	}

	if (server_var(plcheck) >= 10) do
	{
		es_math mana + 10
	}

	if (server_var(plcheck) >= 11) do
	{
		es_math mana + 5
	}

	if (server_var(plcheck) >= 12) do
	{
		es_math mana + 10
	}

	if (server_var(plcheck) >= 13) do
	{
		es_math mana + 10
	}

	if (server_var(plcheck) >= 14) do
	{
		es_math mana + 10
	}

	if (server_var(plcheck) >= 15) do
	{
		es_math mana + 10
	}
	es_keysetvalue dndExtra event_var(es_steamid) mana server_var(mana)
}

block wpc2_spawn
{
	es_setinfo lcheck 10
	es_setinfo plcheck 0
	es_keygetvalue plcheck dndUsers event_var(es_steamid) wpc2
	es_setinfo mana 0
	es_keygetvalue mana dndExtra event_var(es_steamid) mana
	es_setinfo lacheck 0
	es_keygetvalue lacheck dndUsers event_var(es_steamid) la
	es_math plcheck - server_var(lacheck)
	es_setinfo mana 0
	if (server_var(plcheck) < 0) do
	{
		es_doblock dnd/la_low
		es_math plcheck + server_var(lacheck)
	}
	if (server_var(plcheck) >= 1) do
	{
		es_math mana + 10
	}

	if (server_var(plcheck) >= 2) do
	{
		es_math mana + 15
	}

	if (server_var(plcheck) >= 3) do
	{
		es_math mana + 10
	}

	if (server_var(plcheck) >= 4) do
	{
		es_math mana + 15
	}

	if (server_var(plcheck) >= 5) do
	{
		es_math mana + 10
	}

	if (server_var(plcheck) >= 6) do
	{
		es_math mana + 15
	}

	if (server_var(plcheck) >= 7) do
	{
		es_math mana + 10
	}

	if (server_var(plcheck) >= 8) do
	{
		es_math mana + 15
	}

	if (server_var(plcheck) >= 9) do
	{
		es_math mana + 10
	}

	if (server_var(plcheck) >= 10) do
	{
		es_math mana + 15
	}
	es_keysetvalue dndExtra event_var(es_steamid) mana server_var(mana)
}

block wpc3_spawn
{
	es_setinfo plcheck 0
	es_keygetvalue plcheck dndUsers event_var(es_steamid) wpc3
	es_setinfo lacheck 0
	es_keygetvalue lacheck dndUsers event_var(es_steamid) la
	es_math plcheck - server_var(lacheck)
	es_setinfo mana 0
	if (server_var(plcheck) < 0) do
	{
		es_doblock dnd/la_low
		es_math plcheck + server_var(lacheck)
	}
	es_setinfo mana 0
	es_keygetvalue mana dndExtra event_var(es_steamid) mana
	if (server_var(plcheck) >= 1) do
	{
		es_math mana + 10
	}

	if (server_var(plcheck) >= 2) do
	{
		es_math mana + 10
	}

	if (server_var(plcheck) >= 3) do
	{
		es_math mana + 10
	}

	if (server_var(plcheck) >= 4) do
	{
		es_math mana + 10
	}

	if (server_var(plcheck) >= 5) do
	{
		es_math mana + 10
	}
	es_tell event_var(userid) #green All of your spell save DC's are increased by server_var(plcheck).
	es_keysetvalue dndExtra event_var(es_steamid) mana server_var(mana)	
}

block wizard_victim
{
	es_setinfo lcheck 0
	es_keygetvalue lcheck dndUsers event_var(es_steamid) wizard
	es_setinfo pcheck 0
	es_keygetvalue pcheck dndUsers event_var(es_steamid) prestige
	if (server_var(pcheck) = wpc1) do
	{
		es_doblock dnd/wpc1_victim
	}
	if (server_var(pcheck) = wpc2) do
	{
		es_doblock dnd/wpc2_victim
	}
	if (server_var(pcheck) = wpc3) do
	{
		es_doblock dnd/wpc3_victim
	}
}

block wpc1_victim
{
	es_setinfo lcheck 0
	es_keygetvalue lcheck dndUsers event_var(es_steamid) wpc1
	es_setinfo shieldcheck 0
	es_keygetvalue shieldcheck dndExtra event_var(es_steamid) shield
	if (server_var(shieldcheck) = 1) do
	{
		es_rand random 1 4
		if (server_var(random) != 1) do
		{
			es ma_givehealth event_var(userid) event_var(dmg_health)
			es_tell event_var(userid) #green Your shield has blocked event_var(dmg_health) damage from an attack.
		}
	}
}

block wpc2_victim
{
	es_setinfo lcheck 0
	es_keygetvalue lcheck dndUsers event_var(es_steamid) wpc2	
}

block wpc3_victim
{
	es_setinfo lcheck 0
	es_keygetvalue lcheck dndUsers event_var(es_steamid) wpc3	
}

block wizard_attacker
{
	es_setinfo lcheck 0
	es_keygetvalue lcheck dndUsers event_var(es_attackersteamid) wizard
	es_setinfo pcheck 0
	es_keygetvalue pcheck dndUsers event_var(es_steamid) prestige
	if (server_var(pcheck) = wpc1) do
	{
		es_doblock dnd/wpc1_attacker
	}
	if (server_var(pcheck) = wpc2) do
	{
		es_doblock dnd/wpc2_attacker
	}
	if (server_var(pcheck) = wpc3) do
	{
		es_doblock dnd/wpc3_attacker
	}
}

block wpc1_attacker
{
	es_setinfo lcheck 0
	es_keygetvalue lcheck dndUsers event_var(es_attackersteamid) wpc1
}

block wpc2_attacker
{
	es_setinfo lcheck 0
	es_keygetvalue lcheck dndUsers event_var(es_attackersteamid) wpc2
}

block wpc3_attacker
{
	es_setinfo lcheck 0
	es_keygetvalue lcheck dndUsers event_var(es_attackersteamid) wpc3	
}

block shieldmage
{
	es_setinfo es_userid 0
  	es_getcmduserid es_userid
	es_setinfo es_steamid 0
	es est_getsteam es_steamid server_var(es_userid)
	es_setinfo pcheck 0
	es_keygetvalue pcheck dndUsers server_var(es_steamid) prestige
	if (server_var(pcheck) = wpc1) do
	{
		es_setinfo lcheck 0
		es_keygetvalue lcheck dndUsers server_var(es_steamid) server_var(pcheck)
		es_setinfo lacheck 0
		es_keygetvalue lacheck dndUsers server_var(es_steamid) la
		es_math lcheck - server_var(lacheck)
		es_setinfo mana 0
		if (server_var(lcheck) >= 3) do
		{

			es_setinfo spell 0
			es_keygetvalue spell dndExtra server_var(es_steamid) spell
			if(server_var(spell) = 0) do
			{
				es_setinfo mana 0
				es_keygetvalue mana dndExtra server_var(es_steamid) mana
				es_setinfo caster_alive 0
				es est_isalive caster_alive server_var(es_userid)
				if (server_var(caster_alive) = 0) then es_setinfo mana 0
				if (server_var(mana) >= 15) do
				{
					es_keysetvalue dndExtra server_var(es_steamid) shield 1
					es_delayed 10 es_keysetvalue dndExtra server_var(es_steamid) shield 0
					es_tell server_var(es_userid) #green You have the power to dodge many attacks for the next 10 seconds.
					es_math mana - 15
					es_keysetvalue dndExtra server_var(es_steamid) mana server_var(mana)
				}
			}
		}
	}
}

block ice
{
	es_setinfo es_userid 0
  	es_getcmduserid es_userid
	es_setinfo es_steamid 0
	es est_getsteam es_steamid server_var(es_userid)
	es_setinfo pcheck 0
	es_keygetvalue pcheck dndUsers server_var(es_steamid) prestige
	if (server_var(pcheck) = wpc1) do
	{
		es_setinfo lcheck 0
		es_keygetvalue lcheck dndUsers server_var(es_steamid) server_var(pcheck)
		es_setinfo lacheck 0
		es_keygetvalue lacheck dndUsers server_var(es_steamid) la
		es_math lcheck - server_var(lacheck)
		es_setinfo mana 0
		if (server_var(lcheck) >= 3) do
		{

			es_setinfo spell 0
			es_keygetvalue spell dndExtra server_var(es_steamid) spell
			if(server_var(spell) = 0) do
			{
				es_setinfo mana 0
				es_keygetvalue mana dndExtra server_var(es_steamid) mana
				es_setinfo caster_alive 0
				es est_isalive caster_alive server_var(es_userid)
				if (server_var(caster_alive) = 0) then es_setinfo mana 0
				if (server_var(mana) >= 10) do
				{
					es_setinfo point z7
					es est_getviewplayer server_var(es_userid) point
					if (server_var(point) != z7) do
					{	
						es_keysetvalue dndExtra server_var(es_steamid) spell 1
						es_delayed 2 es_keysetvalue dndExtra server_var(es_steamid) spell 0
						es_setinfo level server_var(lcheck)
						es_math level + 5
						es_rand random 1 8
						es_math random * server_var(level)
						es_math level / 2
						es_setinfo steamcheck 0
						es est_getsteam steamcheck server_var(point)
						es_setinfo vclass 0
						es_keygetvalue vclass dndUsers server_var(steamcheck) class
						es_setinfo vlevel 0
						es_keygetvalue vlevel dndUsers server_var(steamcheck) server_var(vclass)
						es_setinfo vrandom 0
						es_rand vrandom 1 20
						if (server_var(vrandom) != 20) do
						{
							
							es_setinfo bonus 0
							es_keygetvalue bonus dndExtra server_var(steamcheck) fortsave
							es_math vrandom + server_var(bonus)
						
							es_setinfo wrandom 10
							es_math wrandom + 6
							
							if (server_var(vrandom) >= server_var(wrandom)) do
							{
								es_math random / 2
								es_setinfo level 0
								es_tell server_var(es_userid) #green Your victim has resisted some of your Orb of Cold!
							}
							else do
							{
								es_tell server_var(es_userid) #green You have used Orb of Cold! They can't see!
								es est_Fade server_var(point) 0 server_var(level) 1 0 0 0 250
								es_delayed server_var(level) es est_Fade server_var(point) 0 server_var(level) 1 0 0 0 0
								es_math level + 3
							}
							es point_hurt server_var(es_userid) server_var(point) server_var(random)
							es_math mana - 10
						}
					}
				}
				else do
				{
					es_tell server_var(es_userid) #green You do not have enough mana to cast Orb of Cold right now.
				}
				es_keysetvalue dndExtra server_var(es_steamid) mana server_var(mana)
			}
			else do
			{
				es_tell server_var(es_userid) #green You must wait longer to cast orb of cold again.
			}
		}	
	}
}

block transform
{
	es_setinfo es_userid 0
  	es_getcmduserid es_userid
	es_setinfo es_steamid 0
	es est_getsteam es_steamid server_var(es_userid)
	es_setinfo pcheck 0
	es_keygetvalue pcheck dndUsers server_var(es_steamid) prestige
	if (server_var(pcheck) = wpc1) do
	{
		es_setinfo lcheck 0
		es_keygetvalue lcheck dndUsers server_var(es_steamid) server_var(pcheck)
		es_setinfo lacheck 0
		es_keygetvalue lacheck dndUsers server_var(es_steamid) la
		es_math lcheck - server_var(lacheck)
		es_setinfo mana 0
		if (server_var(lcheck) >= 7) do
		{
			es_setinfo mana 0
			es_keygetvalue mana dndExtra server_var(es_steamid) mana
			es_setinfo caster_alive 0
			es est_isalive caster_alive server_var(es_userid)
			if (server_var(caster_alive) = 0) then es_setinfo mana 0
			if (server_var(mana) >= 20) do
			{
				es_math mana - 20
				es_setinfo speed_check 0
				es_keygetvalue speed_check dndExtra server_var(es_steamid) speed
				es_setinfo new_speed server_var(speed_check)
				es_math new_speed + .35
				es ma_givehealth server_var(es_userid) 100
				es_setinfo pcheck 0
				es est_gethealth pcheck server_var(es_userid)
				es_keysetvalue dndExtra server_var(es_steamid) maxhealth server_var(pcheck)
				es est_speed server_var(es_userid) server_var(new_speed)
				es_delayed 6 es est_speed server_var(es_userid) server_var(speed_check)
				es_tell server_var(es_userid) #green You have 6 seconds of power.
				es_delayed 6 es_tell server_var(es_userid) #green Your power has ended.
				es_delayed 6 es ma_takehealth server_var(es_userid) 100
			}
			else do
			{
				es_tell server_var(es_userid) #green You do not have enough mana to cast transfomation right now.
			}
			es_keysetvalue dndExtra server_var(es_steamid) mana server_var(mana)
		}
	}
}

block pain
{
	es_setinfo es_userid 0
  	es_getcmduserid es_userid
	es_setinfo caster_alive 0
	es est_isalive caster_alive server_var(es_userid)
	if (server_var(caster_alive) != 0) do
	{
		es_setinfo es_steamid 0
		es est_getsteam es_steamid server_var(es_userid)
		es_setinfo pcheck 0
		es_keygetvalue pcheck dndUsers server_var(es_steamid) prestige
		if (server_var(pcheck) = wpc1) do
		{	
			es_setinfo spell 0
			es_keygetvalue spell dndExtra server_var(es_steamid) spell
			if(server_var(spell) = 0) do
			{
				es_keygetvalue lcheck dndUsers server_var(es_steamid) server_var(pcheck)	
				es_setinfo lacheck 0
				es_keygetvalue lacheck dndUsers server_var(es_steamid) la
				es_math lcheck - server_var(lacheck)
				if (server_var(lcheck) >= 9) do
				{
					es_setinfo mana 0
					es_keygetvalue mana dndExtra server_var(es_steamid) mana
					if (server_var(mana) >= 25) do
					{
						es_setinfo userlife 0
						es est_gethealth userlife server_var(es_userid)
						if (server_var(userlife) > server_var(lcheck)) do
						{
							es_keysetvalue dndExtra server_var(es_steamid) spell 1
							es_delayed 3.5 es_keysetvalue dndExtra server_var(es_steamid) spell 0
							es ma_takehealth server_var(es_userid) server_var(lcheck)
							es_setinfo team 0
							es est_getteam team server_var(es_userid)
							es_setinfo player 0
							if (server_var(team) = 2) do
							{
								est_loop player #c "es point_hurt server_var(es_userid) server_var(player) server_var(lcheck);es_tell server_var(player) #green You have been hurt by a global pain spell."
							}
							if (server_var(team) = 3) do
							{
								est_loop player #t "es point_hurt server_var(es_userid) server_var(player) server_var(lcheck);es_tell server_var(player) #green You have been hurt by a global pain spell."
							}
							es_math mana - 40
							es_keysetvalue dndExtra server_var(es_steamid) mana server_var(mana)
						}
						else do
						{
							es_tell server_var(es_userid) #green Casting global pain right now would kill you!
						}
					}
					else do
					{
						es_tell server_var(es_userid) #green You do not have enough mana to cast global pain right now.
					}
				}
			}
		}
	}
}

block blizzard
{
	es_setinfo es_userid 0
  	es_getcmduserid es_userid
	es_setinfo caster_alive 0
	es est_isalive caster_alive server_var(es_userid)
	if (server_var(caster_alive) != 0) do
	{
		es_setinfo es_steamid 0
		es est_getsteam es_steamid server_var(es_userid)
		es_setinfo pcheck 0
		es_keygetvalue pcheck dndUsers server_var(es_steamid) prestige
		if (server_var(pcheck) = wpc1) do
		{	
			es_setinfo spell 0
			es_keygetvalue spell dndExtra server_var(es_steamid) spell
			if(server_var(spell) = 0) do
			{
				es_keygetvalue lcheck dndUsers server_var(es_steamid) server_var(pcheck)	
				es_setinfo lacheck 0
				es_keygetvalue lacheck dndUsers server_var(es_steamid) la
				es_math lcheck - server_var(lacheck)
				if (server_var(lcheck) >= 11) do
				{
					es_setinfo mana 0
					es_keygetvalue mana dndExtra server_var(es_steamid) mana
					if (server_var(mana) >= 30) do
					{
						es_setinfo point z7
						es est_getviewplayer server_var(es_userid) point
						if (server_var(point) != z7) do
						{
							es_keysetvalue dndExtra server_var(es_steamid) spell 1
							es_delayed 4 es_keysetvalue dndExtra server_var(es_steamid) spell 0
							es_setinfo level server_var(lcheck)
							es_rand random 1 8
							if (server_var(level) > 15) then es_setinfo level 15
							es_math random * server_var(level)
							es_math level / 2
							es_setinfo wrandom 10
							es_math wrandom + 11
							es est_Near target #all 240 server_var(point) "es areablizzard server_var(es_userid) server_var(target) server_var(wrandom) server_var(random) server_var(level)"
							es_math mana - 30
							es_keysetvalue dndExtra server_var(es_steamid) mana server_var(mana)	
						}
					}
					else do
					{
						es_tell server_var(es_userid) #green You do not have enough mana to cast blizzard right now.
					}
				}
			}
		}
	}
}

block areablizzard
{
	es_setinfo fire_user 0
	es_setinfo fire_targetid 0
	es_setinfo fire_dc 0
  	es_setinfo fire_damage 0
	es_setinfo fire_time 0
	
	es_getargv fire_user 1
  	es_getargv fire_targetid 2
  	es_getargv fire_dc 3
  	es_getargv fire_damage 4
	es_getargv fire_time 5
 	
	es_setinfo fire_save 0
	es_setinfo targ_save 0
	es_setinfo fire_steamcheck 0
	es est_getsteam fire_steamcheck server_var(fire_targetid)
	
	es_rand fire_save 1 20
	if (server_var(fire_save) != 20) do
	{
		es_keygetvalue targ_save dndExtra server_var(fire_steamcheck) fortsave
		es_math fire_save + server_var(targ_save)
		if (server_var(fire_save) >= server_var(fire_dc)) do
		{
			es_math fire_damage / 2
			es_setinfo fire_time 0
			es_tell server_var(fire_user) #green Your victim has dodged some of your blizzard!
		}
		else do
		{
			es_tell server_var(fire_user) #green You have used blizzard! They have been stunned!
			es est_freeze server_var(fire_targetid) 1
			es_delayed server_var(fire_time) es est_freeze server_var(targetid) 0
		}
		es_tell server_var(fire_targetid) #green You have been hit by blizzard!
		es point_hurt server_var(fire_user) server_var(fire_targetid) server_var(fire_damage)
		//es est_damage server_var(fire_user) server_var(fire_targetid) 0
	}
}

block arc
{	
	es_setinfo es_userid 0
  	es_getcmduserid es_userid
	es_setinfo es_steamid 0
	es est_getsteam es_steamid server_var(es_userid)
	es_setinfo pcheck 0
	es_keygetvalue pcheck dndUsers server_var(es_steamid) prestige
	if (server_var(pcheck) = wpc1) do
	{
		es_setinfo lcheck 0
		es_keygetvalue lcheck dndUsers server_var(es_steamid) server_var(pcheck)
		es_setinfo lacheck 0
		es_keygetvalue lacheck dndUsers server_var(es_steamid) la
		es_math lcheck - server_var(lacheck)
		es_setinfo mana 0
		if (server_var(lcheck) >= 5) do
		{
			es_setinfo mana 0
			es_keygetvalue mana dndExtra server_var(es_steamid) mana
			es_setinfo caster_alive 0
			es est_isalive caster_alive server_var(es_userid)
			if (server_var(caster_alive) = 0) then es_setinfo mana 0
			if (server_var(mana) >= 20) do
			{
				es_setinfo spell 0
				es_keygetvalue spell dndExtra server_var(es_steamid) spell
				if(server_var(spell) = 0) do
				{
					es_setinfo point z7
					es est_getviewplayer server_var(es_userid) point
					if (server_var(point) != z7) do
					{	
						es_keysetvalue dndExtra server_var(es_steamid) spell 1
						es_delayed 2.5 es_keysetvalue dndExtra server_var(es_steamid) spell 0
						es_math mana - 20
						es_setinfo team_check 0
						es est_getteam team_check server_var(point)
						if (server_var(team_check) = 3) do
						{
							es_setinfo rand_player 0
							es est_RandPlayer rand_player #c!d
						}
						if (server_var(team_check) = 2) do
						{
							es_setinfo rand_player 0
							es est_RandPlayer rand_player #t!d
						}
						es_setinfo level server_var(lcheck)
						es_math level + 5
						if (server_var(level) > 15) do
						{
							es_setinfo level 15
						}
						es_rand random 1 6
						es_math random * server_var(level)
						es_setinfo steamcheck 0
						es est_getsteam steamcheck server_var(point)
						es_setinfo vclass 0
						es_keygetvalue vclass dndUsers server_var(steamcheck) class
						es_setinfo vlevel 0
						es_keygetvalue vlevel dndUsers server_var(steamcheck) server_var(vclass)
						es_setinfo wrandom 10
						es_math wrandom + 8
						es_setinfo vrandom 0
						es_rand vrandom 1 20
						if (server_var(vrandom) != 20) do
						{
							es_setinfo bonus 0
							es_keygetvalue bonus dndExtra server_var(steamcheck) reflexsave
							es_math vrandom + server_var(bonus)
							
							if (server_var(vrandom) >= server_var(wrandom)) do
							{
								es_math random / 2
							}
							
							es point_hurt server_var(es_userid) server_var(point) server_var(random)
							es_setinfo vname 0
							es est_getname vname server_var(steamcheck)
							es_tell server_var(es_userid) #green Your arc lightning dealt server_var(random) damage to server_var(vname).
						}
						
						es_setinfo randomd 0
						es_rand randomd 1 6
						es_math randomd * server_var(level)
						es_setinfo steamcheckv 0
						es est_getsteam steamcheckv server_var(rand_player)
						es_setinfo vvclass 0
						es_keygetvalue vvclass dndUsers server_var(steamcheckv) class
						es_setinfo vvlevel 0
						es_keygetvalue vvlevel dndUsers server_var(steamcheckv) server_var(vvclass)
						es_setinfo vvrandom 0
						es_rand vvrandom 1 20
						if (server_var(vvrandom) != 20) do
						{
							es_setinfo vvbonus 0
							es_keygetvalue vvbonus dndExtra server_var(steamcheck) reflexsave
							es_math vvrandom + server_var(vvbonus)
			
							if (server_var(vvrandom) >= server_var(wrandom)) do
							{
								es_math randomd / 2
							}
						
							es point_hurt server_var(es_userid) server_var(rand_player) server_var(randomd)
							es_setinfo vvname 0
							es est_getname vvname server_var(steamcheckv)
							es_tell server_var(es_userid) #green Your arc lightning dealt server_var(randomd) damage to server_var(vvname).
						}
					}
				}
				else do
				{
					es_tell server_var(es_userid) #green You have to wait longer to cast arc lightning again.
				}

			}
			else do
			{
				es_tell server_var(es_userid) #green You don't have the mana to cast arc lightning.
			}
			es_keysetvalue dndExtra server_var(es_steamid) mana server_var(mana)
		}
	}
}					

block missile
{
	es_setinfo es_userid 0
  	es_getcmduserid es_userid
	es_setinfo caster_alive 0
	es est_isalive caster_alive server_var(es_userid)
	if (server_var(caster_alive) != 0) do
	{
		es_setinfo es_steamid 0
		es est_getsteam es_steamid server_var(es_userid)
		es_setinfo ccheck 0
		es_keygetvalue ccheck dndUsers server_var(es_steamid) class
		if (server_var(ccheck) = wizard) do
		{	
			es_setinfo spell 0
			es_keygetvalue spell dndExtra server_var(es_steamid) spell
			if(server_var(spell) = 0) do
			{
				es_keygetvalue lcheck dndUsers server_var(es_steamid) server_var(ccheck)	
				es_setinfo lacheck 0
				es_keygetvalue lacheck dndUsers server_var(es_steamid) la
				es_math lcheck - server_var(lacheck)
				es_setinfo pcheck 0
				es_keygetvalue pcheck dndUsers server_var(es_steamid) prestige
				if (server_var(pcheck) = wpc1) then es_setinfo lcheck 5
				if (server_var(pcheck) = wpc2) then es_setinfo lcheck 10
				if (server_var(pcheck) = wpc3) then es_setinfo lcheck 15
				if (server_var(lcheck) >= 1) do
				{		
					es_setinfo mana 0
					es_keygetvalue mana dndExtra server_var(es_steamid) mana
					if (server_var(mana) >= 2) do
					{
						es_setinfo point z7
						es est_getviewplayer server_var(es_userid) point
						if (server_var(point) != z7) do
						{
							es_keysetvalue dndExtra server_var(es_steamid) spell 1
							es_delayed .5 es_keysetvalue dndExtra server_var(es_steamid) spell 0
							es_keysetvalue dndExtra server_var(es_steamid) spell 1
							es_delayed .5 es_keysetvalue dndExtra server_var(es_steamid) spell 0
							es_setinfo level server_var(lcheck)
							es_math level / 2
							if (server_var(level) > 5) then es_setinfo level 5
							if (server_var(level) < 1) then es_setinfo level 1
							es_rand random 2 5
							es_math random * server_var(level)		
							es_setinfo steamcheck 0
							es est_getsteam steamcheck server_var(point)
							es_setinfo scheck 0
							es_keygetvalue shcheck dndExtra server_var(steamcheck) shield
							if (server_var(scheck) = 0) do
							{
								es point_hurt server_var(es_userid) server_var(point) server_var(random)
							}
							es_math mana - 2
							es_tell server_var(es_userid) #green You have dealt server_var(random) damage with a magic missle.
							es_tell server_var(point) #green You have been hit by a magic missile!
						}
					}
					else do
					{
						es_tell server_var(es_userid) #green You do not have enough mana left to cast magic missile.
					}
					es_keysetvalue dndExtra server_var(es_steamid) mana server_var(mana)
				}
			}
			else do
			{
				es_tell server_var(es_userid) #green You have to wait longer to cast magic missile.
			}
		}
	}
}

block sleep
{
	es_setinfo es_userid 0
  	es_getcmduserid es_userid
	es_setinfo caster_alive 0
	es est_isalive caster_alive server_var(es_userid)
	if (server_var(caster_alive) != 0) do
	{
		es_setinfo es_steamid 0
		es est_getsteam es_steamid server_var(es_userid)
		es_setinfo ccheck 0
		es_keygetvalue ccheck dndUsers server_var(es_steamid) class
		if (server_var(ccheck) = wizard) do
		{	
			es_setinfo spell 0
			es_keygetvalue spell dndExtra server_var(es_steamid) spell
			if(server_var(spell) = 0) do
			{
				es_keygetvalue lcheck dndUsers server_var(es_steamid) server_var(ccheck)	
				es_setinfo lacheck 0
				es_keygetvalue lacheck dndUsers server_var(es_steamid) la
				es_math lcheck - server_var(lacheck)
				es_setinfo pcheck 0
				es_keygetvalue pcheck dndUsers server_var(es_steamid) prestige
				if (server_var(pcheck) = wpc1) then es_setinfo lcheck 5
				if (server_var(pcheck) = wpc2) then es_setinfo lcheck 10
				if (server_var(pcheck) = wpc3) then es_setinfo lcheck 15
				if (server_var(lcheck) >= 1) do
				{		
					es_setinfo mana 0
					es_keygetvalue mana dndExtra server_var(es_steamid) mana
					if (server_var(mana) >= 5) do
					{
						es_setinfo point z7
						es est_getviewplayer server_var(es_userid) point
						if (server_var(point) != z7) do
						{
							es_keysetvalue dndExtra server_var(es_steamid) spell 1
							es_delayed .5 es_keysetvalue dndExtra server_var(es_steamid) spell 0
							es_math mana - 5
							es_setinfo steamcheck 0
							es est_getsteam steamcheck server_var(point)
							es_setinfo rcheck 0
							es_keygetvalue rcheck dndUsers server_var(steamcheck) race
							if (server_var(vrcheck) != elf) do
							{
								if (server_var(vrcheck) != drow) do
								{	
									if (server_var(vrcheck) != greyelf) do
									{
										es_setinfo vrandom 0
										es_rand vrandom 1 20
										if (server_var(vrandom) != 20) do
										{
											es_setinfo bonus 0
											es_keygetvalue bonus dndExtra server_var(steamcheck) willsave
											es_math vrandom + server_var(bonus)
											es_setinfo wrandom 10
											es_math wrandom + 4
											if (server_var(pcheck) = wpc3) do
											{
												if (server_var(plcheck) != 0) then es_math wrandom + server_var(plcheck)
											}
											if (server_var(vrandom) >= server_var(wrandom)) do
											{
												es_setinfo level server_var(lcheck)
												if (server_var(level) > 5) then es_setinfo level 5
												es est_Fade server_var(point) 3 server_var(level) 1 0 0 0 250
												es_delayed server_var(level) es est_Fade server_var(point) 0 server_var(level) 1 0 0 0 0
												es est_freeze server_var(point) 1
												es_delayed server_var(level) es est_freeze server_var(point) 0
												es_tell server_var(es_userid) #green You have put your target to sleep for the next server_var(level) seconds.
												es_tell server_var(point) #green You have been put to sleep for server_var(level) seconds.
											}
											else do
											{
												es_tell server_var(es_userid) #green They resisted your sleep spell!
											}
										}
										else do
										{
											es_tell server_var(es_userid) #green They resisted your sleep spell!
										}
									}
									else do
									{
										es_tell server_var(es_userid) #green They resisted your sleep spell!
									}
								}
								else do
								{
									es_tell server_var(es_userid) #green They resisted your sleep spell!
								}
							}
							else do
							{
								es_tell server_var(es_userid) #green They resisted your sleep spell!
							}
						}
					es_keysetvalue dndExtra server_var(es_steamid) mana server_var(mana)
					}
					else do
					{
						es_tell server_var(es_userid) #green You do not have enough mana left to cast sleep.
					}
				}
			}
			else do
			{
				es_tell server_var(es_userid) #green you half to wait longer to cast that spell again
			}
		}
	}
}

block stealth
{
	es_setinfo es_userid 0
  	es_getcmduserid es_userid
	es_setinfo caster_alive 0
	es est_isalive caster_alive server_var(es_userid)
	if (server_var(caster_alive) != 0) do
	{
		es_setinfo es_steamid 0
		es est_getsteam es_steamid server_var(es_userid)
		es_setinfo ccheck 0
		es_keygetvalue ccheck dndUsers server_var(es_steamid) class
		if (server_var(ccheck) = wizard) do
		{	
			es_setinfo spell 0
			es_keygetvalue timer dndExtra server_var(es_steamid) invis_timer
			if(server_var(timer) = 0) do
			{
				es_keygetvalue lcheck dndUsers server_var(es_steamid) server_var(ccheck)	
				es_setinfo lacheck 0
				es_keygetvalue lacheck dndUsers server_var(es_steamid) la
				es_math lcheck - server_var(lacheck)
				es_setinfo pcheck 0
				es_keygetvalue pcheck dndUsers server_var(es_steamid) prestige
				if (server_var(pcheck) = wpc1) then es_setinfo lcheck 5
				if (server_var(pcheck) = wpc2) then es_setinfo lcheck 10
				if (server_var(pcheck) = wpc3) then es_setinfo lcheck 15
				if (server_var(lcheck) >= 3) do
				{		
					es_setinfo mana 0
					es_keygetvalue mana dndExtra server_var(es_steamid) mana
					if (server_var(mana) >= 10) do
					{
						es_keysetvalue dndExtra server_var(es_steamid) invis_timer 1
						es_setinfo color_check 0
						es_keygetvalue color_check dndExtra server_var(es_steamid) color
						es est_setplayercolor server_var(es_userid) 255 255 255 0
						if (server_var(color_check) >= 256) do
						{
							es_setinfo color_check 255
						}
						es_tell server_var(es_userid) #green You are invisible for the next 5 seconds.
						es_delayed 5 es est_setplayercolor server_var(es_userid) 255 255 255 server_var(color_check) 1
						es_delayed 5 es_tell server_var(es_userid) #green You are visible again!
						es_delayed 5 es_keysetvalue dndExtra server_var(es_steamid) invis_timer 0
						es_math mana - 10
					}
					else do
					{
						es_tell server_var(es_userid) #green You do not have enough mana to cast invisibily right now.
					}
					es_keysetvalue dndExtra server_var(es_steamid) mana server_var(mana)
				}
			}
		}
		else do
		{
			es_setinfo rcheck 0
			es_keygetvalue rcheck dndUsers server_var(es_steamid) race
			if (server_var(rcheck) = basilisk) do
			{
				es_setinfo scheck 0
				es_keygetvalue scheck dndExtra server_var(es_steamid) stealth
				if (server_var(scheck) > 0) do
				{
					es_keygetvalue timer dndExtra server_var(es_steamid) invis_timer
					if (server_var(timer) = 0) do
					{
						es_math scheck - 1
						es_keysetvalue dndExtra server_var(es_steamid) stealth server_var(scheck)
						es_keysetvalue dndExtra server_var(es_steamid) invis_timer 1
						es_setinfo color_check 0
						es_keygetvalue color_check dndExtra server_var(es_steamid) color
						es est_setplayercolor server_var(es_userid) 255 255 255 0
						if (server_var(color_check) >= 256) do
						{
							es_setinfo color_check 255
						}
						es_tell server_var(es_userid) #green You are invisible for the next 10 seconds.
						es_delayed 10 es est_setplayercolor server_var(es_userid) 255 255 255 server_var(color_check) 1
						es_delayed 10 es_tell server_var(es_userid) #green You are visible again!
						es_delayed 10 es_keysetvalue dndExtra server_var(es_steamid) invis_timer 0
					}
					else do
					{
						es_tell server_var(es_userid) #green Your invisibiltiy is already active.
					}
				}
				else do
				{
					es_tell server_var(es_userid) #green You do not have any more uses of invisibily this round.
				}
			}
		}
	}
}	

block vanish
{
	es_setinfo rcheck 0
	es_keygetvalue rcheck dndUsers server_var(es_steamid) race
	if (server_var(rcheck) = vampire) do
	{
		es_setinfo scheck 0
		es_keygetvalue scheck dndExtra server_var(es_steamid) vanish
		if (server_var(scheck) > 0) do
		{
			es_keygetvalue timer dndExtra server_var(es_steamid) invis_timer
			if (server_var(timer) = 0) do
			{
				es_math scheck - 1
				es_keysetvalue dndExtra server_var(es_steamid) vanish server_var(scheck)
				es_keysetvalue dndExtra server_var(es_steamid) invis_timer 1
				es_setinfo color_check 0
				es_keygetvalue color_check dndExtra server_var(es_steamid) color
				es est_setplayercolor server_var(es_userid) 255 255 255 0
				if (server_var(color_check) >= 256) do
				{
					es_setinfo color_check 255
				}
				es_tell server_var(es_userid) #green You have vanished for the next 10 seconds.
				es_delayed 10 es est_setplayercolor server_var(es_userid) 255 255 255 server_var(color_check) 1
				es_delayed 10 es_tell server_var(es_userid) #green You are visible again!
				es_delayed 10 es_keysetvalue dndExtra server_var(es_steamid) invis_timer 0
			}
			else do
			{
				es_tell server_var(es_userid) #green Your invisibiltiy is already active.
			}
		}
		else do
		{
			es_tell server_var(es_userid) #green You do not have any more uses of invisibily this round.
		}
	}
}
block fire_ball
{
	es_setinfo es_userid 0
  	es_getcmduserid es_userid
	es_setinfo caster_alive 0
	es est_isalive caster_alive server_var(es_userid)
	if (server_var(caster_alive) != 0) do
	{
		es_setinfo es_steamid 0
		es est_getsteam es_steamid server_var(es_userid)
		es_setinfo ccheck 0
		es_keygetvalue ccheck dndUsers server_var(es_steamid) class
		if (server_var(ccheck) = wizard) do
		{	
			es_setinfo spell 0
			es_keygetvalue spell dndExtra server_var(es_steamid) spell
			if(server_var(spell) = 0) do
			{
				es_keygetvalue lcheck dndUsers server_var(es_steamid) server_var(ccheck)	
				es_setinfo lacheck 0
				es_keygetvalue lacheck dndUsers server_var(es_steamid) la
				es_math lcheck - server_var(lacheck)
				es_setinfo pcheck 0
				es_keygetvalue pcheck dndUsers server_var(es_steamid) prestige
				if (server_var(pcheck) = wpc1) then es_setinfo lcheck 5
				if (server_var(pcheck) = wpc2) then es_setinfo lcheck 10
				if (server_var(pcheck) = wpc3) then es_setinfo lcheck 15
				if (server_var(lcheck) >= 5) do
				{		
					es_setinfo mana 0
					es_keygetvalue mana dndExtra server_var(es_steamid) mana
					if (server_var(mana) >= 15) do
					{
						es_setinfo point z7
						es est_getviewplayer server_var(es_userid) point
						if (server_var(point) != z7) do
						{
							es_keysetvalue dndExtra server_var(es_steamid) spell 1
							es_delayed 1.5 es_keysetvalue dndExtra server_var(es_steamid) spell 0
							es_setinfo level server_var(lcheck)
							es_rand random 1 6
							if (server_var(level) > 10) then es_setinfo level 10
							es_math random * server_var(level)
							es_math level / 2
							es_setinfo wrandom 10
							es_math wrandom + 6
							if (server_var(pcheck) = wpc3) do
							{
								if (server_var(plcheck) != 0) then es_math wrandom + server_var(plcheck)
							}
							es est_Near firetarget #all 240 server_var(point) "es areafireball server_var(es_userid) server_var(firetarget) server_var(wrandom) server_var(random) server_var(level)"
							es_math mana - 15	
						}
					}
					else do
					{
						es_tell server_var(es_userid) #green You do not have enough mana to cast fire ball right now.
					}
					es_keysetvalue dndExtra server_var(es_steamid) mana server_var(mana)
				}
			}
			else do
			{
				es_tell server_var(es_userid) #green You have to wait longer to cast Fireball.
			}
		}
		if (server_var(ccheck) = necromancer) do
		{
			es_setinfo spell 0
			es_keygetvalue spell dndExtra server_var(es_steamid) spell
			if(server_var(spell) = 0) do
			{
				es_keygetvalue lcheck dndUsers server_var(es_steamid) server_var(ccheck)	
				es_setinfo lacheck 0
				es_keygetvalue lacheck dndUsers server_var(es_steamid) la
				es_math lcheck - server_var(lacheck)
				if (server_var(lcheck) >= 9) do
				{		
					es_setinfo mana 0
					es_keygetvalue mana dndExtra server_var(es_steamid) mana
					if (server_var(mana) >= 15) do
					{
						es_setinfo point z7
						es est_getviewplayer server_var(es_userid) point
						if (server_var(point) != z7) do
						{
							es_keysetvalue dndExtra server_var(es_steamid) spell 1
							es_delayed 1.5 es_keysetvalue dndExtra server_var(es_steamid) spell 0
							es_setinfo level server_var(lcheck)
							es_rand random 1 6
							if (server_var(level) > 10) then es_setinfo level 10
							es_math random * server_var(level)
							es_math level / 2
							es_setinfo wrandom 10
							es_math wrandom + 6
							es est_Near firetarget #all 240 server_var(point) "es areafireball server_var(es_userid) server_var(firetarget) server_var(wrandom) server_var(random) server_var(level)"
							//es est_damage server_var(es_userid) server_var(point) server_var(random)
							es_math mana - 15
							
						}
					}
					else do
					{
						es_tell server_var(es_userid) #green You do not have enough mana to cast fire ball right now.
					}
					es_keysetvalue dndExtra server_var(es_steamid) mana server_var(mana)
				}
			}
			else do
			{
				es_tell server_var(es_userid) #green You have to wait longer to cast Fireball.
			}
		}
	}
}
block areafireball
{
	es_setinfo fire_user 0
	es_setinfo fire_targetid 0
	es_setinfo fire_dc 0
  	es_setinfo fire_damage 0
	es_setinfo fire_time 0
	
	es_getargv fire_user 1
  	es_getargv fire_targetid 2
  	es_getargv fire_dc 3
  	es_getargv fire_damage 4
	es_getargv fire_time 5
 	
	es_setinfo fire_save 0
	es_setinfo targ_save 0
	es_setinfo fire_steamcheck 0
	es est_getsteam fire_steamcheck server_var(fire_targetid)
	
	es_rand fire_save 1 20
	if (server_var(fire_save) != 20) do
	{
		
		es_keygetvalue targ_save dndExtra server_var(fire_steamcheck) reflexsave
		es_math fire_save + server_var(targ_save)
		es_setinfo fire_vrcheck 0
		es_keygetvalue fire_vrcheck dndUsers server_var(fire_steamcheck) race
		if (server_var(fire_vrcheck) = troll) do
		{
			es_math fire_damage * 2
		}
		if (server_var(fire_save) >= server_var(fire_dc)) do
		{
			es_math fire_damage / 2
			es_setinfo fire_time 0
			es_tell server_var(fire_user) #green Your victim has taken server_var(fire_damage) form your fire ball!
		}
		else do
		{
			es_tell server_var(fire_user) #green You have used fire ball dealing server_var(fire_damage)! Watch them burn!
			es est_burn server_var(fire_targetid) server_var(fire_time)
		}
		es_tell server_var(fire_targetid) #green You have been hit by a fire ball!
		es point_hurt server_var(fire_user) server_var(fire_targetid) server_var(fire_damage)
	}
}
block killer
{
	es_setinfo es_userid 0
  	es_getcmduserid es_userid
	es_setinfo caster_alive 0
	es est_isalive caster_alive server_var(es_userid)
	if (server_var(caster_alive) != 0) do
	{
		es_setinfo es_steamid 0
		es est_getsteam es_steamid server_var(es_userid)
		es_setinfo ccheck 0
		es_keygetvalue ccheck dndUsers server_var(es_steamid) class
		if (server_var(ccheck) = wizard) do
		{	
			es_setinfo spell 0
			es_keygetvalue spell dndExtra server_var(es_steamid) spell
			if(server_var(spell) = 0) do
			{
				es_keygetvalue lcheck dndUsers server_var(es_steamid) server_var(ccheck)	
				es_setinfo lacheck 0
				es_keygetvalue lacheck dndUsers server_var(es_steamid) la
				es_math lcheck - server_var(lacheck)
				es_setinfo pcheck 0
				es_keygetvalue pcheck dndUsers server_var(es_steamid) prestige
				if (server_var(pcheck) = wpc1) then es_setinfo lcheck 5
				if (server_var(pcheck) = wpc2) then es_setinfo lcheck 10
				if (server_var(pcheck) = wpc3) then es_setinfo lcheck 15
				if (server_var(lcheck) >= 7) do
				{		
					es_setinfo mana 0
					es_keygetvalue mana dndExtra server_var(es_steamid) mana
					if (server_var(mana) >= 40) do
					{
						es_setinfo point z7
						es est_getviewplayer server_var(es_userid) point
						if (server_var(point) != z7) do
						{
							es_keysetvalue dndExtra server_var(es_steamid) spell 1
							es_delayed 2 es_keysetvalue dndExtra server_var(es_steamid) spell 0
							es_setinfo level server_var(lcheck)
							es_math mana - 40
							es_setinfo steamcheck 0
							es est_getsteam steamcheck server_var(point)
							es_setinfo vrandom 0
							es_rand vrandom 1 20
							if (server_var(vrandom) != 20) do
							{
								es_setinfo bonus 0
								es_keygetvalue bonus dndExtra server_var(steamcheck) willsave
								es_math vrandom + server_var(bonus)
								es_setinfo wrandom 10
								es_math wrandom + 7
								if (server_var(pcheck) = wpc3) do
								{	
									if (server_var(plcheck) != 0) then es_math wrandom + server_var(plcheck)
								}
								if (server_var(vrandom) >= server_var(wrandom)) do
								{
									es_tell server_var(es_userid) #green Your target has resisted your phantasmal     .
								}
								else do
								{
									es_setinfo vrandom 0
									es_rand vrandom 1 20
									if (server_var(vrandom) != 20) do
									{		
										es_setinfo bonus 0
										es_keygetvalue bonus dndExtra server_var(steamcheck) fortsave
										es_math vrandom + server_var(bonus)
										if (server_var(vrandom) >= server_var(wrandom)) do
										{
											es_tell server_var(point) #green You have been hurt by phantasmal killer.
											es_rand random 3 18
											es point_hurt server_var(es_userid) server_var(point) server_var(random)
											es_tell server_var(es_userid) #green You have dealt server_var(random) damage to your target.
										}
										else do
										{
											es_tell server_var(point) #green You have been killed by phantasmal killer!
											es point_hurt server_var(es_userid) server_var(point) 1000
											es_tell server_var(es_userid) #green You have killed your victim with Phantasmal Killer!
										}
									
										
									}
								}
							}
						}
						es_keysetvalue dndExtra server_var(es_steamid) mana server_var(mana)
					}
					else do
					{
						es_tell server_var(es_userid) #green You don't have enough mana to cast killer.
					}
				}
			}
			else do
			{
				es_tell server_var(es_userid) #green You have to wait longer before useing killer again.
			}
		}
	}
}

block save_tele
{
	es_setinfo es_userid 0
  	es_getcmduserid es_userid
	es_setinfo es_steamid 0
	es est_getsteam es_steamid server_var(es_userid)
	es_setinfo ccheck 0
	es_keygetvalue ccheck dndUsers server_var(es_steamid) class
	es_setinfo lcheck 0
	es_keygetvalue lcheck dndUsers server_var(es_steamid) server_var(ccheck)	
	es_setinfo lacheck 0
	es_keygetvalue lacheck dndUsers server_var(es_steamid) la
	es_math lcheck - server_var(lacheck)
	if (server_var(ccheck) = wizard) do
	{
		es_setinfo pcheck 0
		es_keygetvalue pcheck dndUsers server_var(es_steamid) prestige
		if (server_var(pcheck) = wpc1) do
		{
			es_setinfo lcheck 5
		}
		if (server_var(pcheck) = wpc2) do
		{
			es_setinfo lcheck 10
		}
		if (server_var(pcheck) = wpc3) do
		{
			es_setinfo lcheck 15
		}
		if (server_var(lcheck) >= 9) do
		{
			es_setinfo mana 0
			es_keygetvalue mana dndExtra server_var(es_steamid) mana
			es_setinfo caster_alive 0
			es est_isalive caster_alive server_var(es_userid)
			if (server_var(caster_alive) = 0) then es_setinfo mana 0
			if (server_var(mana) >= 5) do
			{	
				es_setinfo x 0
				es_setinfo y 0
				es_setinfo z 0
				es_getplayerlocation x y z server_var(es_userid)
				es_keysetvalue dndExtra server_var(es_steamid) x_var server_var(x)
				es_keysetvalue dndExtra server_var(es_steamid) y_var server_var(y)
				es_keysetvalue dndExtra server_var(es_steamid) z_var server_var(z)
				es_tell server_var(es_userid) #green Location saved use !tele to return to it.
				es_math mana - 5
			}
			else do
			{
				es_tell server_var(es_userid) #green Not enough mana to pick a new teleport location
			}
			es_keysetvalue dndExtra server_var(es_steamid) mana server_var(mana)
		}
	}
}

block tele
{
	es_setinfo es_userid 0
  	es_getcmduserid es_userid
	es_setinfo es_steamid 0
	es est_getsteam es_steamid server_var(es_userid)
	es_setinfo ccheck 0
	es_keygetvalue ccheck dndUsers server_var(es_steamid) class
	es_setinfo lcheck 0
	es_keygetvalue lcheck dndUsers server_var(es_steamid) server_var(ccheck)	
	es_setinfo lacheck 0
	es_keygetvalue lacheck dndUsers server_var(es_steamid) la
	es_math lcheck - server_var(lacheck)
	if (server_var(ccheck) = wizard) do
	{
		es_setinfo pcheck 0
		es_keygetvalue pcheck dndUsers server_var(es_steamid) prestige
		if (server_var(pcheck) = wpc1) do
		{
			es_setinfo lcheck 5
		}
		if (server_var(pcheck) = wpc2) do
		{
			es_setinfo lcheck 10
		}
		if (server_var(pcheck) = wpc3) do
		{
			es_setinfo lcheck 15
		}
		if (server_var(lcheck) >= 9) do
		{
			es_setinfo mana 0
			es_keygetvalue mana dndExtra server_var(es_steamid) mana
			es_setinfo caster_alive 0
			es est_isalive caster_alive server_var(es_userid)
			if (server_var(caster_alive) = 0) then es_setinfo mana 0
			es_setinfo x 0
			es_setinfo y 0
			es_setinfo z 0
			es_keygetvalue x dndExtra server_var(es_steamid) x_var
			es_keygetvalue y dndExtra server_var(es_steamid) y_var
			es_keygetvalue z dndExtra server_var(es_steamid) z_var
			if (server_var(mana) >= 5) do
			{		
				if (server_var(x) != 0) do
				{
					if (server_var(tele_allow) = 1) do
					{
						es ma_teleport server_var(es_userid) server_var(x) server_var(y) server_var(z)
						es_tell server_var(es_userid) #green You have teleport to your saved location.
						es_math mana - 5
					}
					else do
					{
						es_tell server_var(es_userid) #green It is still to early to teleport yet!
					}
				}
				else do
				{
					es_tell server_var(es_userid) #green Use !save to pick a spot to retun to first!
				}
			}
			else do
			{
				es_tell server_var(es_userid) #green You do not have enough mana to use teleport.
			}		
			es_keysetvalue dndExtra server_var(es_steamid) mana server_var(mana)
		}
	}
}

block force 
{
	es_setinfo es_userid 0
  	es_getcmduserid es_userid
	es_setinfo es_steamid 0
	es est_getsteam es_steamid server_var(es_userid)
	es_setinfo ccheck 0
	es_keygetvalue ccheck dndUsers server_var(es_steamid) class
	es_setinfo lcheck 0
	es_keygetvalue lcheck dndUsers server_var(es_steamid) server_var(ccheck)	
	es_setinfo lacheck 0
	es_keygetvalue lacheck dndUsers server_var(es_steamid) la
	es_math lcheck - server_var(lacheck)
	if (server_var(ccheck) = wizard) do
	{
		es_setinfo pcheck 0
		es_keygetvalue pcheck dndUsers server_var(es_steamid) prestige
		if (server_var(pcheck) = wpc1) do
		{
			es_setinfo lcheck 5
		}
		if (server_var(pcheck) = wpc2) do
		{
			es_setinfo lcheck 10
		}
		if (server_var(pcheck) = wpc3) do
		{
			es_setinfo lcheck 15
			es_setinfo plcheck 0
			es_keygetvalue plcheck dndUsers server_var(es_steamid) server_var(pcheck)
		}
		if (server_var(lcheck) >= 11) do
		{
			es_setinfo spell 0
			es_keygetvalue spell dndExtra server_var(es_steamid) spell
			if(server_var(spell) = 0) do
			{	
				es_setinfo mana 0
				es_keygetvalue mana dndExtra server_var(es_steamid) mana
				es_setinfo caster_alive 0
				es est_isalive caster_alive server_var(es_userid)
				if (server_var(caster_alive) = 0) then es_setinfo mana 0
				if (server_var(mana) >= 20) do
				{
					es_setinfo point z7
					es est_getviewplayer server_var(es_userid) point
					if (server_var(point) != z7) do
					{
						es_keysetvalue dndExtra server_var(es_steamid) spell 1
						es_delayed 3 es_keysetvalue dndExtra server_var(es_steamid) spell 0
						es_setinfo steamcheck 0
						es est_getsteam steamcheck server_var(point)					
						es_setinfo vrandom 0
						es_rand vrandom 1 20
						if (server_var(vrandom) != 20) do
						{
							es_setinfo bonus 0
							es_keygetvalue bonus dndExtra server_var(steamcheck) reflexsave
							es_math vrandom + server_var(bonus)
							es_setinfo wrandom 10
							es_math wrandom + 9
							if (server_var(pcheck) = wpc3) do
							{
								if (server_var(plcheck) != 0) then es_math wrandom + server_var(plcheck)
							}
							if (server_var(vrandom) >= server_var(wrandom)) do
							{
								es_tell server_var(es_userid) #green Your target has resisted your spell!
							}
							else do
							{
								es ma_slap server_var(point) 0
								es ma_slap server_var(point) 0
								es ma_slap server_var(point) 0
								es est_dropweapon server_var(point) 1
								es est_dropweapon server_var(point) 2
								es_tell server_var(es_userid) #green You have slapped and dropped your target.
								es_tell server_var(point) #green You have been hit by forceful hand!
							}
						}
						es_math mana - 30
					}
				}
				else do
				{
					es_tell server_var(es_userid) #green You do not have enough mana to cast Forceful Hand right now!
				}
				es_keysetvalue dndExtra server_var(es_steamid) mana server_var(mana)
			}
			else do 
			{
				es_tell server_var(es_userid) #green you half to wait longer to cast that spell again.
			}
		}
	}
}

block grab
{
	es_setinfo es_userid 0
  	es_getcmduserid es_userid
	es_setinfo es_steamid 0
	es est_getsteam es_steamid server_var(es_userid)
	es_setinfo ccheck 0
	es_keygetvalue ccheck dndUsers server_var(es_steamid) class
	es_setinfo lcheck 0
	es_keygetvalue lcheck dndUsers server_var(es_steamid) server_var(ccheck)	
	es_setinfo lacheck 0
	es_keygetvalue lacheck dndUsers server_var(es_steamid) la
	es_math lcheck - server_var(lacheck)
	if (server_var(ccheck) = wizard) do
	{
		es_setinfo pcheck 0
		es_keygetvalue pcheck dndUsers server_var(es_steamid) prestige
		if (server_var(pcheck) = wpc1) do
		{
			es_setinfo lcheck 5
		}
		if (server_var(pcheck) = wpc2) do
		{
			es_setinfo lcheck 10
		}
		if (server_var(pcheck) = wpc3) do
		{
			es_setinfo lcheck 15
		}
		if (server_var(lcheck) >= 13) do
		{
			es_setinfo spell 0
			es_keygetvalue spell dndExtra server_var(es_steamid) spell
			if (server_var(spell) = 0) do
			{
				es_setinfo mana 0
				es_keygetvalue mana dndExtra server_var(es_steamid) mana
				es_setinfo caster_alive 0
				es est_isalive caster_alive server_var(es_userid)
				if (server_var(caster_alive) = 0) then es_setinfo mana 35
				if (server_var(mana) >= 35) do
				{
					es_keysetvalue dndExtra server_var(es_steamid) spell 1
					es_setinfo blackhole_time 3
					es_setinfo blackhole_x 0
					es_setinfo blackhole_y 0
					es_setinfo blackhole_z 0
 				
					es est_freeze server_var(es_userid) 1
					es_delayed 3 es est_freeze server_var(es_userid) 0
					es est_GetviewCoord server_var(es_userid) blackhole_x blackhole_y blackhole_z
					es est_blackhole server_var(blackhole_x) server_var(blackhole_y) server_var(blackhole_z) server_var(blackhole_time)
					es ma_effect 3 server_var(blackhole_x) server_var(blackhole_y) server_var(blackhole_z)
					es_delayed 1 es ma_effect 3 server_var(blackhole_x) server_var(blackhole_y) server_var(blackhole_z) 200 30
					es_delayed 2 es ma_effect 3 server_var(blackhole_x) server_var(blackhole_y) server_var(blackhole_z) 200 30
					es_delayed 3 es ma_effect 3 server_var(blackhole_x) server_var(blackhole_y) server_var(blackhole_z) 200 30
				}
				else do
				{
					es_tell server_var(es_userid) #green You do not have enough mana to cast Grasping Hand right now!
				}
				es_keysetvalue dndExtra server_var(es_steamid) mana server_var(mana)
			}
		}
	}
}

block freeze
{
	es_setinfo es_userid 0
  	es_getcmduserid es_userid
	es_setinfo es_steamid 0
	es est_getsteam es_steamid server_var(es_userid)
	es_setinfo ccheck 0
	es_keygetvalue ccheck dndUsers server_var(es_steamid) class
	es_setinfo lcheck 0
	es_keygetvalue lcheck dndUsers server_var(es_steamid) server_var(ccheck)	
	es_setinfo lacheck 0
	es_keygetvalue lacheck dndUsers server_var(es_steamid) la
	es_math lcheck - server_var(lacheck)
	if (server_var(ccheck) = wizard) do
	{
		es_setinfo pcheck 0
		es_keygetvalue pcheck dndUsers server_var(es_steamid) prestige
		if (server_var(pcheck) = wpc1) do
		{
			es_setinfo lcheck 5
		}
		if (server_var(pcheck) = wpc2) do
		{
			es_setinfo lcheck 10
		}
		if (server_var(pcheck) = wpc3) do
		{
			es_setinfo lcheck 15
			es_setinfo plcheck 0
			es_keygetvalue plcheck dndUsers server_var(es_steamid) server_var(pcheck)
		}
		if (server_var(lcheck) >= 15) do
		{
			es_setinfo mana 0
			es_keygetvalue mana dndExtra server_var(es_steamid) mana
			es_setinfo caster_alive 0
			es est_isalive caster_alive server_var(es_userid)
			if (server_var(caster_alive) = 0) then es_setinfo mana 0
			if (server_var(mana) >= 40) do
			{
				es_setinfo point z7
				es est_getviewplayer server_var(es_userid) point
				if (server_var(point) != z7) do
				{
					es_keysetvalue dndExtra server_var(es_steamid) spell 1
					es_delayed 2 es_keysetvalue dndExtra server_var(es_steamid) spell 0
					es_setinfo level server_var(lcheck)
					es_math mana - 40
					es_setinfo steamcheck 0
					es est_getsteam steamcheck server_var(point)
					es_setinfo vrandom 0
					es_rand vrandom 1 20
					if (server_var(vrandom) != 20) do
					{
						es_setinfo bonus 0
						es_keygetvalue bonus dndExtra server_var(steamcheck) fortsave
						es_math vrandom + server_var(bonus)
						es_setinfo wrandom 0
						es_rand wrandom 1 20
						es_math wrandom + 11
						if (server_var(pcheck) = wpc3) do
						{
							if (server_var(plcheck) != 0) then es_math wrandom + server_var(plcheck)
						}
						if (server_var(vrandom) >= server_var(wrandom)) do
						{
							es_tell server_var(es_userid) #green They resisted your power word stun!
						}
						else do
						{
							es_tell server_var(es_userid) #green You have frozen your target for the next 5 seconds.
							es_tell server_var(point) #green You have been frozen!
							es ma_freeze server_var(point) 1
							es_delayed 5 es ma_freeze server_var(point) 0
						}
					}
				}
			}
			else do
			{
				es_tell server_var(userid) #green You do not have enough mana to cast power word stun right now!
			}
			es_keysetvalue dndExtra server_var(es_steamid) mana server_var(mana)
		}
	}
}

block god
{
	es_setinfo es_userid 0
  	es_getcmduserid es_userid
	es_setinfo es_steamid 0
	es est_getsteam es_steamid server_var(es_userid)
	es_setinfo ccheck 0
	es_keygetvalue ccheck dndUsers server_var(es_steamid) class
	es_setinfo lcheck 0
	es_keygetvalue lcheck dndUsers server_var(es_steamid) server_var(ccheck)	
	es_setinfo lacheck 0
	es_keygetvalue lacheck dndUsers server_var(es_steamid) la
	es_math lcheck - server_var(lacheck)
	if (server_var(ccheck) = wizard) do
	{
		es_setinfo pcheck 0
		es_keygetvalue pcheck dndUsers server_var(es_steamid) prestige
		if (server_var(pcheck) = wpc1) do
		{
			es_setinfo lcheck 5
		}
		if (server_var(pcheck) = wpc2) do
		{
			es_setinfo lcheck 10
		}
		if (server_var(pcheck) = wpc3) do
		{
			es_setinfo lcheck 15
		}
		if (server_var(lcheck) >= 17) do
		{
			es_setinfo mana 0
			es_keygetvalue mana dndExtra server_var(es_steamid) mana
			es_setinfo caster_alive 0
			es est_isalive caster_alive server_var(es_userid)
			if (server_var(caster_alive) = 0) then es_setinfo mana 0
			if (server_var(mana) >= 45) do
			{
				es_math mana - 45
				es est_god server_var(es_userid) 1
				es_delayed 3 es est_god server_var(es_userid) 0
				es_tell server_var(es_userid) #green You can not die for the next 3 seconds.
			}
			else do
			{
				es_tell server_var(es_userid) #green You do not have enough mana to cast wish spell right now!
			}
			es_keysetvalue dndExtra server_var(es_steamid) mana server_var(mana)
		}
	}
}

block wizard_say
{
	es_setinfo lcheck 0
	es_keygetvalue lcheck dndUsers event_var(es_steamid) wizard
	es_setinfo pcheck 0
	es_keygetvalue pcheck dndUsers event_var(es_steamid) prestige
	if (server_var(pcheck) = wpc1) do
	{
		es_doblock dnd/wpc1_say
	}
	if (server_var(pcheck) = wpc2) do
	{
		es_doblock dnd/wpc2_say
	}
	if (server_var(pcheck) = wpc3) do
	{
		es_doblock dnd/wpc3_say
	}
	if (event_var(text) = !spells) then es_doblock dnd/wizard_spelllist
	if (event_var(text) = !mana) then es_doblock dnd/show_mana

	
}

block wpc1_say
{
	es_setinfo lcheck 0
	es_keygetvalue lcheck dndUsers event_var(es_steamid) wpc1
	es_setinfo lcheck 5
}

block wpc2_say
{
	es_setinfo lcheck 0
	es_keygetvalue lcheck dndUsers event_var(es_steamid) wpc2
	es_setinfo lcheck 10	
}

block wpc3_say
{
	es_setinfo lcheck 0
	es_keygetvalue lcheck dndUsers event_var(es_steamid) wpc3
	es_setinfo lcheck 15	
}

block wizard_spelllist
{
	es_setinfo lcheck 0
	es_keygetvalue lcheck dndUsers event_var(es_steamid) wizard
	es_setinfo lacheck 0
	es_keygetvalue lacheck dndUsers event_var(es_steamid) la
	es_math lcheck - server_var(lacheck)
	if (server_var(lcheck) <= 0) do
	{
		es_doblock dnd/la_low
		es_math lcheck + server_var(lacheck)
	}
	es_setinfo pcheck 0
	es_keygetvalue pcheck dndUsers event_var(es_steamid) prestige
	es_setinfo plcheck 0
	es_keygetvalue plcheck dndUsers event_var(es_steamid) server_var(pcheck)
	es_setinfo spelllist "Spells Known:\n"
	if (server_var(lcheck) >= 1) do
	{
		es_format spelllist "%1 !missile - 2 Mana: Damage.\n" server_var(spelllist)
		es_format spelllist "%1 !sleep - 5 Mana: Blind/Stun.\n" server_var(spelllist)
	}
	if (server_var(lcheck) >= 3) do
	{
		es_format spelllist "%1 !stealth - 10 Mana: Invisible.\n" server_var(spelllist)
	}
	if (server_var(lcheck) >= 5) do
	{
		es_format spelllist "%1 !fire - 15 Mana: Damage/Burn.\n" server_var(spelllist)
	}
	if (server_var(lcheck) >= 7) do
	{
		es_format spelllist "%1 !killer - 40 Mana: Death.\n" server_var(spelllist)
	}
	if (server_var(lcheck) >= 9) do
	{
		es_format spelllist "%1 !save/!tele - 5 Mana: Save a location. Return to that location.\n" server_var(spelllist)
	}
	if (server_var(lcheck) >= 11) do
	{
		es_format spelllist "%1 !force - 30 Mana: Slap your target.\n" server_var(spelllist)
	}
	if (server_var(lcheck) >= 13) do
	{
		es_format spelllist "%1 !grab - 35 Mana: Create a black hole of doom.\n" server_var(spelllist)
	}
	if (server_var(lcheck) >= 15) do
	{
		es_format spelllist "%1 !freeze - 40 Mana: Freeze." server_var(spelllist)
	}
	if (server_var(lcheck) >= 17) do
	{
		es_format spelllist "%1 !god - 45 Mana: God Mode." server_var(spelllist)
	}
	if (server_var(pcheck) = wpc1) do
	{
		if (server_var(plcheck) >= 1) do
		{
			es_format spelllist "%1 !shieldmage - 15 Mana: Negates Damage From Attacks\n" server_var(spelllist)
		}
		if (server_var(plcheck) >= 3) do
		{
			es_format spelllist "%1 !ice - 10 Mana: Damage/Stun.\n" server_var(spelllist)
		}
		if (server_var(plcheck) >= 5) do
		{
			es_format spelllist "%1 !arc - 20 Mana: Damage Multiplu Hits.\n" server_var(spelllist)
		}
		if (server_var(plcheck) >= 7) do
		{
			es_format spelllist "%1 !transform - 20 Mana: Gain Bonuses.\n" server_var(spelllist)
		}
		if (server_var(plcheck) >= 9) do
		{
			es_format spelllist "%1 !pain - 40 Mana: Hurt other team.\n" server_var(spelllist)
		}
		if (server_var(plcheck) >= 11) do
		{
			es_format spelllist "%1 !blizzard - 30 Mana: AOE Hurt/Stun.\n" server_var(spelllist)
		}
	}
	esnq ma_msay 0 event_var(userid) server_var(spelllist)
}

block wizard_death
{
	es_setinfo lcheck 0
	es_keygetvalue lcheck dndUsers event_var(es_steamid) wizard
}

block cleric_spawn
{
	es_setinfo lcheck 0
	es_keygetvalue lcheck dndUsers event_var(es_steamid) cleric
	es_setinfo lacheck 0
	es_keygetvalue lacheck dndUsers event_var(es_steamid) la
	es_setinfo pcheck 0
	es_keygetvalue pcheck dndUsers event_var(es_steamid) prestige
	if (server_var(lcheck) < 3) then es popup send mainmenu event_var(userid)
	if (server_var(pcheck) = 0) do
	{
		es_math lcheck - server_var(lacheck)
	}
	if (server_var(lcheck) <= 0) do
	{
		es_doblock dnd/la_low
		es_math lcheck + server_var(lacheck)
	}
	if (server_var(pcheck) = cpc1) do
	{
		es_setinfo lcheck 5
		es_doblock dnd/cpc1_spawn
	}
	if (server_var(pcheck) = cpc2) do
	{
		es_setinfo lcheck 10
		es_doblock dnd/cpc2_spawn
	}
	if (server_var(pcheck) = cpc3) do
	{
		es_setinfo lcheck 15
		es_doblock dnd/cpc3_spawn
	}
	es_setinfo mana 0
	es_keygetvalue mana dndExtra event_var(es_steamid) mana
	if (server_var(lcheck) >= 1) do
	{
		es_math mana + 15
		es_keysetvalue dndExtra event_var(es_steamid) turns 4
		es_tell event_var(userid) #green Use !turn 4 times a round to injure near by undead.
	}

	if (server_var(lcheck) >= 2) do
	{
		es_math mana + 10
	}

	if (server_var(lcheck) >= 3) do
	{
		es_math mana + 5
	}

	if (server_var(lcheck) >= 4) do
	{
		es_math mana + 10
	}

	if (server_var(lcheck) >= 5) do
	{
		es_math mana + 5
	}

	if (server_var(lcheck) >= 6) do
	{
		es_math mana + 10
	}

	if (server_var(lcheck) >= 7) do
	{
		es_math mana + 5
	}

	if (server_var(lcheck) >= 8) do
	{
		es_math mana + 10
	}

	if (server_var(lcheck) >= 9) do
	{
		es_math mana + 5
	}

	if (server_var(lcheck) >= 10) do
	{
		es_math mana + 10
	}

	if (server_var(lcheck) >= 11) do
	{
		es_math mana + 5
	}

	if (server_var(lcheck) >= 12) do
	{
		es_math mana + 10
	}

	if (server_var(lcheck) >= 13) do
	{
		es_math mana + 5
	}

	if (server_var(lcheck) >= 14) do
	{
		es_math mana + 10
	}

	if (server_var(lcheck) >= 15) do
	{
		es_math mana + 5
	}

	if (server_var(lcheck) >= 16) do
	{
		es_math mana + 10
	}

	if (server_var(lcheck) >= 17) do
	{
		es_math mana + 5
	}

	if (server_var(lcheck) >= 18) do
	{
		es_math mana + 10
	}

	if (server_var(lcheck) >= 19) do
	{
		es_math mana + 10
	}

	if (server_var(lcheck) >= 20) do
	{
		es_math mana + 10
	}
	es_keysetvalue dndExtra event_var(es_steamid) mana server_var(mana)
	es_doblock dnd/show_mana
}

block cpc1_spawn
{
	es_setinfo plcheck 0
	es_keygetvalue plcheck dndUsers event_var(es_steamid) cpc1
	es_setinfo lacheck 0
	es_keygetvalue lacheck dndUsers event_var(es_steamid) la
	es_math plcheck - server_var(lacheck)
	es_setinfo mana 0
	if (server_var(plcheck) < 0) do
	{
		es_doblock dnd/la_low
		es_math plcheck + server_var(lacheck)
	}
	es_setinfo mana 0
	es_keygetvalue mana dndExtra event_var(es_steamid) mana
	if (server_var(plcheck) >= 1) do
	{
		es_math mana + 5
	}

	if (server_var(plcheck) >= 2) do
	{
		es_math mana + 10
	}

	if (server_var(plcheck) >= 3) do
	{
		es_math mana + 10
	}

	if (server_var(plcheck) >= 4) do
	{
		es_math mana + 5
	}

	if (server_var(plcheck) >= 5) do
	{
		es_math mana + 10
	}

	if (server_var(plcheck) >= 6) do
	{
		es_math mana + 10
	}

	if (server_var(plcheck) >= 7) do
	{
		es_math mana + 5
	}

	if (server_var(plcheck) >= 8) do
	{
		es_math mana + 10
	}

	if (server_var(plcheck) >= 9) do
	{
		es_math mana + 10
	}

	if (server_var(plcheck) >= 10) do
	{
		es_math mana + 5
	}

	if (server_var(plcheck) >= 11) do
	{
		es_math mana + 10
	}

	if (server_var(plcheck) >= 12) do
	{
		es_math mana + 10
	}

	if (server_var(plcheck) >= 13) do
	{
		es_math mana + 5
	}

	if (server_var(plcheck) >= 14) do
	{
		es_math mana + 10
	}

	if (server_var(plcheck) >= 15) do
	{
		es_math mana + 10
	}
	es_keysetvalue dndExtra event_var(es_steamid) mana server_var(mana)
}

block cpc2_spawn
{
	es_setinfo lcheck 10
	es_setinfo plcheck 0
	es_keygetvalue plcheck dndUsers event_var(es_steamid) cpc2
	es_setinfo lacheck 0
	es_keygetvalue lacheck dndUsers event_var(es_steamid) la
	es_math plcheck - server_var(lacheck)
	es_setinfo mana 0
	if (server_var(plcheck) < 0) do
	{
		es_doblock dnd/la_low
		es_math plcheck + server_var(lacheck)
	}
	es_setinfo mana 0
	es_keygetvalue mana dndExtra event_var(es_steamid) mana
	if (server_var(plcheck) >= 1) do
	{
		es_math mana + 10
	}

	if (server_var(plcheck) >= 2) do
	{
		es_math mana + 15
	}

	if (server_var(plcheck) >= 3) do
	{
		es_math mana + 10
	}

	if (server_var(plcheck) >= 4) do
	{
		es_math mana + 15
	}

	if (server_var(plcheck) >= 5) do
	{
		es_math mana + 10
	}

	if (server_var(plcheck) >= 6) do
	{
		es_math mana + 15
	}

	if (server_var(plcheck) >= 7) do
	{
		es_math mana + 10
	}

	if (server_var(plcheck) >= 8) do
	{
		es_math mana + 15
	}

	if (server_var(plcheck) >= 9) do
	{
		es_math mana + 10
	}

	if (server_var(plcheck) >= 10) do
	{
		es_math mana + 15
	}
	es_keysetvalue dndExtra event_var(es_steamid) mana server_var(mana)	
}

block cpc3_spawn
{
	es_setinfo plcheck 0
	es_keygetvalue plcheck dndUsers event_var(es_steamid) cpc3
	es_setinfo lacheck 0
	es_keygetvalue lacheck dndUsers event_var(es_steamid) la
	es_math plcheck - server_var(lacheck)
	es_setinfo mana 0
	if (server_var(plcheck) < 0) do
	{
		es_doblock dnd/la_low
		es_math plcheck + server_var(lacheck)
	}
	es_setinfo mana 0
	es_keygetvalue mana dndExtra event_var(es_steamid) mana
	if (server_var(plcheck) >= 1) do
	{
		es_math mana + 10
	}

	if (server_var(plcheck) >= 2) do
	{
		es_math mana + 10
	}

	if (server_var(plcheck) >= 3) do
	{
		es_math mana + 10
	}

	if (server_var(plcheck) >= 4) do
	{
		es_math mana + 10
	}

	if (server_var(plcheck) >= 5) do
	{
		es_math mana + 10
	}
	es_tell event_var(userid) #green All of your spell save DC's are increased by server_var(plcheck).
	es_keysetvalue dndExtra event_var(es_steamid) mana server_var(mana)
}

block cleric_victim
{
	es_setinfo lcheck 0
	es_keygetvalue lcheck dndUsers event_var(es_steamid) cleric
	es_setinfo pcheck 0
	es_keygetvalue pcheck dndUsers event_var(es_steamid) prestige
	if (server_var(pcheck) = cpc1) do
	{
		es_doblock dnd/cpc1_victim
	}
	if (server_var(pcheck) = cpc2) do
	{
		es_doblock dnd/cpc2_victim
	}
	if (server_var(pcheck) = cpc3) do
	{
		es_doblock dnd/cpc3_victim
	}
}

block cpc1_victim
{
	es_setinfo plcheck 0
	es_keygetvalue plcheck dndUsers event_var(es_steamid) cpc1
	es_setinfo lacheck 0
	es_keygetvalue lacheck dndUsers event_var(es_steamid) la
	es_math plcheck - server_var(lacheck)
	es_setinfo mana 0
	if (server_var(lcheck) < 0) do
	{
		es_doblock dnd/la_low
		es_math lcheck + server_var(lacheck)
	}
	es_setinfo scheck 0
	es_keygetvalue scheck dndExtra event_var(es_steamid) shield
	if (server_var(scheck) = 1) do
	{
		if (server_var(plcheck) >= 1) do
		{
			es_setinfo multi 2
		}
		if (server_var(plcheck) >= 6) do
		{
			es_math multi + 1
		}
		if (server_var(plcheck) >= 11) do
		{
			es_math multi + 1
		}
		es_setinfo dr event_var(dmg_health)
		es_math dr / 10
		es_math dr * server_var(multi)
		es ma_givehealth event_var(userid) server_var(dr)
	}
	es_setinfo acheck 0
	es_keygetvalue acheck dndExtra event_var(es_steamid) armor
	if (server_var(acheck) = 1) do
	{
		es est_setarmor event_var(userid) 100
	}
}

block cpc2_victim
{
	es_setinfo lcheck 0
	es_keygetvalue lcheck dndUsers event_var(es_steamid) cpc2	
}

block cpc3_victim
{
	es_setinfo lcheck 0
	es_keygetvalue lcheck dndUsers event_var(es_steamid) cpc3	
}

block cleric_attacker
{
	es_setinfo lcheck 0
	es_keygetvalue lcheck dndUsers event_var(es_attackersteamid) cleric
	es_setinfo pcheck 0
	es_keygetvalue pcheck dndUsers event_var(es_attackersteamid) prestige
	if (server_var(pcheck) = cpc1) do
	{
		es_doblock dnd/cpc1_attacker
	}
	if (server_var(pcheck) = cpc2) do
	{
		es_doblock dnd/cpc2_attacker
	}
	if (server_var(pcheck) = cpc3) do
	{
		es_doblock dnd/cpc3_attacker
	}
}

block cpc1_attacker
{
	es_setinfo plcheck 0
	es_keygetvalue plcheck dndUsers event_var(es_attackersteamid) cpc1
	es_setinfo lacheck 0
	es_keygetvalue lacheck dndUsers event_var(es_steamid) la
	es_math plcheck - server_var(lacheck)
	es_setinfo mana 0
	es_setinfo dcheck 0
	es_keygetvalue dcheck dndExtra event_var(es_attackersteamid) divine
	if (server_var(dcheck) = 1) do
	{
		if (server_var(plcheck) >= 1) do
		{
			es_setinfo multi 2
		}
		if (server_var(plcheck) >= 5) do
		{
			es_math multi + 1
		}
		if (server_var(plcheck) >= 9) do
		{
			es_math multi + 1
		}
		if (server_var(plcheck) >= 13) do
		{
			es_math multi + 1
		}
		es_setinfo bonus event_var(dmg_health)
		es_math bonus / 10
		es_math bonus * server_var(multi)
		es point_hurt event_var(attacker) event_var(userid) server_var(bonus)
	}
	es_setinfo fcheck 0
	es_keygetvalue fcheck dndExtra event_var(es_attackersteamid) flame
	if (server_var(fcheck) = 1) do
	{
		es_rand random 1 4
		if (server_var(random) = 1) do
		{
			es_setinfo rcheck 0
			es_keygetvalue rcheck dndUsers event_var(es_steamid) race
			if (server_var(race) = troll) do
			{
				es point_hurt event_var(attacker) event_var(userid) event_var(dmg_health)
			}
			es est_burn event_var(userid) 4
		}
	}
}

block cpc2_attacker
{
	es_setinfo lcheck 0
	es_keygetvalue lcheck dndUsers event_var(es_attackersteamid) cpc2
}

block cpc3_attacker
{
	es_setinfo lcheck 0
	es_keygetvalue lcheck dndUsers event_var(es_attackersteamid) cpc3	
}

block light
{
	es_setinfo es_userid 0
  	es_getcmduserid es_userid
	es_setinfo es_steamid 0
	es est_getsteam es_steamid server_var(es_userid)
	es_setinfo ccheck 0
	es_keygetvalue ccheck dndUsers server_var(es_steamid) class
	es_setinfo lcheck 0
	es_keygetvalue lcheck dndUsers server_var(es_steamid) server_var(ccheck)	
	es_setinfo lacheck 0
	es_keygetvalue lacheck dndUsers server_var(es_steamid) la
	es_math lcheck - server_var(lacheck)
	if (server_var(ccheck) = cleric) do
	{
		es_setinfo pcheck 0
		es_keygetvalue pcheck dndUsers server_var(es_steamid) prestige
		if (server_var(pcheck) = cpc1) do
		{
			es_setinfo lcheck 5
		}
		if (server_var(pcheck) = cpc2) do
		{
			es_setinfo lcheck 10
		}
		if (server_var(pcheck) = cpc3) do
		{
			es_setinfo lcheck 15
			es_setinfo plcheck 0
			es_keygetvalue plcheck dndUsers server_var(es_steamid) server_var(pcheck)
		}
		if (server_var(lcheck) >= 1) do
		{
			es_setinfo acheck 0
			es_keygetvalue acheck dndExtra server_var(es_steamid) algin
			if (server_var(acheck) = good) do
			{
				es_setinfo mana 0
				es_keygetvalue mana dndExtra server_var(es_steamid) mana
				es_setinfo caster_alive 0
				es est_isalive caster_alive server_var(es_userid)
				if (server_var(caster_alive) = 0) then es_setinfo mana 0
				if (server_var(mana) >= 5) do
				{
					es_setinfo point z7
					es est_getviewplayer server_var(es_userid) point
					if (server_var(point) != z7) do
					{
						es_setinfo steamcheck 0
						es est_getsteam steamcheck server_var(point)
						es_setinfo phealth 0
						es_keygetvalue phealth dndExtra server_var(steamcheck) maxhealth
						es_setinfo thealth 0
						es est_gethealth thealth server_var(point)
						es_rand random 1 8
						if (server_var(lcheck) > 5) do
						{
							es_setinfo lcheck 5
						}
						if (server_var(pcheck) = cpc3) do
						{
							es_math lcheck + server_var(plcheck)
						}
						es_math random + server_var(lcheck)
						es_math thealth + server_var(random)
						if (server_var(thealth) <= server_var(phealth)) do
						{
							es ma_sethealth server_var(point) server_var(thealth)
							if (server_var(es_userid) != server_var(point)) do
							{
								es_setinfo userid 0
								es_setinfo userid server_var(es_userid)
								es_setinfo xpcheck 0
								es_keygetvalue xpcheck dndUsers server_var(es_steamid) curxp
								es_setinfo currentxp 0
								es_keygetvalue currentxp dndUsers server_var(es_steamid) server_var(xpcheck)
								es_math currentxp + 5	
								es_keysetvalue dndUsers server_var(es_steamid) server_var(xpcheck) server_var(currentxp)
								es_tell server_var(userid) #green You have gained 5 xp for healing someone.
								es_doblock dnd/class_level
							}
						}
						else do
						{
							es ma_sethealth server_var(point) server_var(phealth)
						}
						es_math mana - 5
						es_tell server_var(es_userid) #green You have healed your target for server_var(random).
					}
				}
				else do
				{
					es_tell server_var(es_userid) #green You do not have enough mana to cast cure light.
				}
				es_keysetvalue dndExtra server_var(es_steamid) mana server_var(mana)
			}
			if (server_var(acheck) = evil) do
			{
				es_setinfo mana 0
				es_keygetvalue mana dndExtra server_var(es_steamid) mana
				es_setinfo caster_alive 0
				es est_isalive caster_alive server_var(es_userid)
				if (server_var(caster_alive) = 0) then es_setinfo mana 0
				if (server_var(mana) >= 5) do
				{
					es_setinfo point z7
					es est_getviewplayer server_var(es_userid) point
					if (server_var(point) != z7) do
					{
						es_setinfo spell 0
						es_keygetvalue spell dndExtra server_var(es_steamid) spell
						if(server_var(spell) = 0) do
						{
							es_keysetvalue dndExtra server_var(es_steamid) spell 1
							es_delayed .5 es_keysetvalue dndExtra server_var(es_steamid) spell 0
							es_setinfo steamcheck 0
							es est_getsteam steamcheck server_var(point)
							es_setinfo vrandom 0
							es_rand vrandom 1 20
							if (server_var(vrandom) != 20) do
							{
								es_setinfo vpcheck 0
								es_keygetvalue vpcheck dndExtra server_var(steamcheck) willsave
								es_math vrandom + vpcheck
								es_setinfo wrandom 10
								es_math wrandom + 4
								if (server_var(pcheck) = cpc3) do
								{
									es_math wrandom + server_var(plcheck)
								}
								es_rand random 1 8
								if (server_var(lcheck) > 5) do
								{
									es_setinfo lcheck 5
								}
								es_math random + server_var(lcheck)
								if (server_var(vrandom) >= server_var(wrandom)) do
								{
									es_math random / 2
								}
							
								es point_hurt server_var(es_userid) server_var(point) server_var(random)
								es_math mana - 5
								es_tell server_var(es_userid) #green You have dealt server_var(random) damage to your target.
							}
						}
						else do
						{
							es_tell server_var(es_userid) #green You have to wait longer to cast that spell.
						}
					}
					else do
					{
						es_tell server_var(es_userid) #green You do not have enough mana to cast inflict light.
					}
				}
				es_keysetvalue dndExtra server_var(es_steamid) mana server_var(mana)
			}
		}
	}
	if (server_var(ccheck) = paladin) do
	{
		if (server_var(lcheck) >= 4) do
		{
			es_setinfo mana 0
			es_keygetvalue mana dndExtra server_var(es_steamid) mana
			es_setinfo caster_alive 0
			es est_isalive caster_alive server_var(es_userid)
			if (server_var(caster_alive) = 0) then es_setinfo mana 0
			if (server_var(mana) >= 5) do
			{
				es_setinfo point z7
				es est_getviewplayer server_var(es_userid) point
				if (server_var(point) != z7) do
				{
					es_setinfo steamcheck 0
					es est_getsteam steamcheck server_var(point)
					es_setinfo phealth 0
					es_keygetvalue phealth dndExtra server_var(steamcheck) maxhealth
					es_setinfo thealth 0
					es est_gethealth thealth server_var(point)
					es_rand random 1 8
					es_math lcheck / 2
					if (server_var(lcheck) > 5) do
					{
						es_setinfo lcheck 5
					}
					es_math random + server_var(lcheck)
					es_math thealth + server_var(random)
					if (server_var(thealth) <= server_var(phealth)) do
					{
						es ma_sethealth server_var(point) server_var(thealth)
						if (server_var(es_userid) != server_var(point)) do
						{
							es_setinfo userid 0
							es_setinfo userid server_var(es_userid)
							es_setinfo xpcheck 0
							es_keygetvalue xpcheck dndUsers server_var(es_steamid) curxp
							es_setinfo currentxp 0
							es_keygetvalue currentxp dndUsers server_var(es_steamid) server_var(xpcheck)
							es_math currentxp + 5	
							es_keysetvalue dndUsers server_var(es_steamid) server_var(xpcheck) server_var(currentxp)
							es_tell server_var(userid) #green You have gained 5 xp for healing someone.
							es_doblock dnd/class_level
						}
					}
					else do
					{
						es ma_sethealth server_var(point) server_var(phealth)
					}
					es_math mana - 5
					es_tell server_var(es_userid) #green You have healed your target for server_var(random).
				}
			}
			else do
			{
				es_tell server_var(es_userid) #green You do not have enough mana to cast cure light.
			}
			es_keysetvalue dndExtra server_var(es_steamid) mana server_var(mana)
		}
	}
}


block moderate
{
	es_setinfo es_userid 0
  	es_getcmduserid es_userid
	es_setinfo es_steamid 0
	es est_getsteam es_steamid server_var(es_userid)
	es_setinfo ccheck 0
	es_keygetvalue ccheck dndUsers server_var(es_steamid) class
	es_setinfo lcheck 0
	es_keygetvalue lcheck dndUsers server_var(es_steamid) server_var(ccheck)	
	es_setinfo lacheck 0
	es_keygetvalue lacheck dndUsers server_var(es_steamid) la
	es_math lcheck - server_var(lacheck)
	if (server_var(ccheck) = cleric) do
	{
		es_setinfo pcheck 0
		es_keygetvalue pcheck dndUsers server_var(es_steamid) prestige
		if (server_var(pcheck) = cpc1) do
		{
			es_setinfo lcheck 5
		}
		if (server_var(pcheck) = cpc2) do
		{
			es_setinfo lcheck 10
		}
		if (server_var(pcheck) = cpc3) do
		{
			es_setinfo lcheck 15
			es_setinfo plcheck 0
			es_keygetvalue plcheck dndUsers server_var(es_steamid) server_var(pcheck)
		}
		if (server_var(lcheck) >= 3) do
		{
			es_setinfo acheck 0
			es_keygetvalue acheck dndExtra server_var(es_steamid) algin
			if (server_var(acheck) = good) do
			{
				es_setinfo mana 0
				es_keygetvalue mana dndExtra server_var(es_steamid) mana
				es_setinfo caster_alive 0
				es est_isalive caster_alive server_var(es_userid)
				if (server_var(caster_alive) = 0) then es_setinfo mana 0
				if (server_var(mana) >= 10) do
				{
					es_setinfo point z7
					es est_getviewplayer server_var(es_userid) point
					if (server_var(point) != z7) do
					{
						es_setinfo steamcheck 0
						es est_getsteam steamcheck server_var(point)
						es_setinfo phealth 0
						es_keygetvalue phealth dndExtra server_var(steamcheck) maxhealth
						es_setinfo thealth 0
						es est_gethealth thealth server_var(point)
						es_rand random 2 16
						if (server_var(lcheck) > 10) do
						{
							es_setinfo lcheck 10
						}
						if (server_var(pcheck) = cpc3) do
						{
							es_math lcheck + server_var(plcheck)
						}
						es_math random + server_var(lcheck)
						es_math thealth + server_var(random)
						if (server_var(thealth) <= server_var(phealth)) do
						{
							es ma_sethealth server_var(point) server_var(thealth)
							if (server_var(es_userid) != server_var(point)) do
							{
								es_setinfo userid 0
								es_setinfo userid server_var(es_userid)
								es_setinfo xpcheck 0
								es_keygetvalue xpcheck dndUsers server_var(es_steamid) curxp
								es_setinfo currentxp 0
								es_keygetvalue currentxp dndUsers server_var(es_steamid) server_var(xpcheck)
								es_math currentxp + 10	
								es_keysetvalue dndUsers server_var(es_steamid) server_var(xpcheck) server_var(currentxp)
								es_tell server_var(userid) #green You have gained 10 xp for healing someone.
								es_doblock dnd/class_level
							}
						}
						else do
						{
							es ma_sethealth server_var(point) server_var(phealth)
						}
						es_math mana - 10
						es_tell server_var(es_userid) #green You have healed your target for server_var(random).
					}
				}
				else do
				{
					es_tell server_var(es_userid) #green You do not have enough mana to cast cure moderate.
				}
				es_keysetvalue dndExtra server_var(es_steamid) mana server_var(mana)
			}
			if (server_var(acheck) = evil) do
			{
				es_setinfo mana 0
				es_keygetvalue mana dndExtra server_var(es_steamid) mana
				es_setinfo caster_alive 0
				es est_isalive caster_alive server_var(es_userid)
				if (server_var(caster_alive) = 0) then es_setinfo mana 0
				if (server_var(mana) >= 10) do
				{
					es_setinfo point z7
					es est_getviewplayer server_var(es_userid) point
					if (server_var(point) != z7) do
					{
						es_setinfo spell 0
						es_keygetvalue spell dndExtra server_var(es_steamid) spell
						if(server_var(spell) = 0) do
						{
							es_keysetvalue dndExtra server_var(es_steamid) spell 1
							es_delayed 1 es_keysetvalue dndExtra server_var(es_steamid) spell 0
							es_setinfo steamcheck 0
							es est_getsteam steamcheck server_var(point)
							es_setinfo vrandom 0
							es_rand vrandom 1 20
							if (server_var(vrandom) != 20) do
							{
								es_setinfo vpcheck 0
								es_keygetvalue vpcheck dndExtra server_var(steamcheck) willsave
								es_math vrandom + vpcheck
								es_setinfo wrandom 10
								es_math wrandom + 5
								if (server_var(pcheck) = cpc3) do
								{
									es_math wrandom + server_var(plcheck)
								}
								es_rand random 2 16
								if (server_var(lcheck) > 10) do
								{
									es_setinfo lcheck 10
								}
								es_math random + server_var(lcheck)
								if (server_var(vrandom) >= server_var(wrandom)) do
								{
									es_math random / 2
								}
							
								es point_hurt server_var(es_userid) server_var(point) server_var(random)
								es_math mana - 10
								es_tell server_var(es_userid) #green You have dealt server_var(random) damage to your target.
							}
						}
						else do
						{
							es_tell server_var(es_userid) #green You have to wait to cast that spell again.
						}
					}
				}
				else do
				{
					es_tell server_var(es_userid) #green You do not have enough mana to cast inflict moderate.
				}
				es_keysetvalue dndExtra server_var(es_steamid) mana server_var(mana)
			}
		}
	}
	if (server_var(ccheck) = paladin) do
	{
		if (server_var(lcheck) >= 8) do
		{
			es_setinfo mana 0
			es_keygetvalue mana dndExtra server_var(es_steamid) mana
			es_setinfo caster_alive 0
			es est_isalive caster_alive server_var(es_userid)
			if (server_var(caster_alive) = 0) then es_setinfo mana 0
			if (server_var(mana) >= 10) do
			{
				es_setinfo point z7
				es est_getviewplayer server_var(es_userid) point
				if (server_var(point) != z7) do
				{
					es_setinfo steamcheck 0
					es est_getsteam steamcheck server_var(point)
					es_setinfo phealth 0
					es_keygetvalue phealth dndExtra server_var(steamcheck) maxhealth
					es_setinfo thealth 0
					es est_gethealth thealth server_var(point)
					es_rand random 2 16
					es_math lcheck / 2
					if (server_var(lcheck) > 10) do
					{
						es_setinfo lcheck 10
					}
					es_math random + server_var(lcheck)
					es_math thealth + server_var(random)
					if (server_var(thealth) <= server_var(phealth)) do
					{
						es ma_sethealth server_var(point) server_var(thealth)
						if (server_var(es_userid) != server_var(point)) do
						{
							es_setinfo userid 0
							es_setinfo userid server_var(es_userid)
							es_setinfo xpcheck 0
							es_keygetvalue xpcheck dndUsers server_var(es_steamid) curxp
							es_setinfo currentxp 0
							es_keygetvalue currentxp dndUsers server_var(es_steamid) server_var(xpcheck)
							es_math currentxp + 10	
							es_keysetvalue dndUsers server_var(es_steamid) server_var(xpcheck) server_var(currentxp)
							es_tell server_var(userid) #green You have gained 10 xp for healing someone.
							es_doblock dnd/class_level
						}
					}
					else do
					{
						es ma_sethealth server_var(point) server_var(phealth)
					}
					es_math mana - 10
					es_tell server_var(es_userid) #green You have healed your target for server_var(random).
				}
			}
			else do
			{
				es_tell server_var(es_userid) #green You do not have enough mana to cast cure moderate.
			}
			es_keysetvalue dndExtra server_var(es_steamid) mana server_var(mana)
		}
	}
	if (server_var(ccheck) = ranger) do
	{
		if (server_var(lcheck) >= 8) do
		{
			es_setinfo mana 0
			es_keygetvalue mana dndExtra server_var(es_steamid) mana
			es_setinfo caster_alive 0
			es est_isalive caster_alive server_var(es_userid)
			if (server_var(caster_alive) = 0) then es_setinfo mana 0
			if (server_var(mana) >= 10) do
			{
				es_setinfo point z7
				es est_getviewplayer server_var(es_userid) point
				if (server_var(point) != z7) do
				{
					es_setinfo steamcheck 0
					es est_getsteam steamcheck server_var(point)
					es_setinfo phealth 0
					es_keygetvalue phealth dndExtra server_var(steamcheck) maxhealth
					es_setinfo thealth 0
					es est_gethealth thealth server_var(point)
					es_rand random 2 16
					es_math lcheck / 2
					if (server_var(lcheck) > 10) do
					{
						es_setinfo lcheck 10
					}
					es_math random + server_var(lcheck)
					es_math thealth + server_var(random)
					if (server_var(thealth) <= server_var(phealth)) do
					{
						es ma_sethealth server_var(point) server_var(thealth)
						if (server_var(es_userid) != server_var(point)) do
						{
							es_setinfo userid 0
							es_setinfo userid server_var(es_userid)
							es_setinfo xpcheck 0
							es_keygetvalue xpcheck dndUsers server_var(es_steamid) curxp
							es_setinfo currentxp 0
							es_keygetvalue currentxp dndUsers server_var(es_steamid) server_var(xpcheck)
							es_math currentxp + 10	
							es_keysetvalue dndUsers server_var(es_steamid) server_var(xpcheck) server_var(currentxp)
							es_tell server_var(userid) #green You have gained 10 xp for healing someone.
							es_doblock dnd/class_level
						}
					}
					else do
					{
						es ma_sethealth server_var(point) server_var(phealth)
					}
					es_math mana - 10
					es_tell server_var(es_userid) #green You have healed your target for server_var(random).
				}
			}
			else do
			{
				es_tell server_var(es_userid) #green You do not have enough mana to cast cure moderate.
			}
			es_keysetvalue dndExtra server_var(es_steamid) mana server_var(mana)
		}
	}
}

block stun
{
	es_setinfo es_userid 0
  	es_getcmduserid es_userid
	es_setinfo es_steamid 0
	es est_getsteam es_steamid server_var(es_userid)
	es_setinfo ccheck 0
	es_keygetvalue ccheck dndUsers server_var(es_steamid) class
	es_setinfo lcheck 0
	es_keygetvalue lcheck dndUsers server_var(es_steamid) server_var(ccheck)	
	es_setinfo lacheck 0
	es_keygetvalue lacheck dndUsers server_var(es_steamid) la
	es_math lcheck - server_var(lacheck)
	if (server_var(ccheck) = cleric) do
	{
		es_setinfo pcheck 0
		es_keygetvalue pcheck dndUsers server_var(es_steamid) prestige
		if (server_var(pcheck) = cpc1) do
		{
			es_setinfo lcheck 5
		}
		if (server_var(pcheck) = cpc2) do
		{
			es_setinfo lcheck 10
		}
		if (server_var(pcheck) = cpc3) do
		{
			es_setinfo lcheck 15
		}
		if (server_var(lcheck) >= 3) do
		{
			es_setinfo mana 0
			es_keygetvalue mana dndExtra server_var(es_steamid) mana
			es_setinfo caster_alive 0
			es est_isalive caster_alive server_var(es_userid)
			if (server_var(caster_alive) = 0) then es_setinfo mana 0
			if (server_var(mana) >= 10) do
			{
				es_setinfo point z7
				es est_getviewplayer server_var(es_userid) point
				if (server_var(point) != z7) do
				{
					es_setinfo spell 0
					es_keygetvalue spell dndExtra server_var(es_steamid) spell
					if(server_var(spell) = 0) do
					{	
						es_keysetvalue dndExtra server_var(es_steamid) spell 1
						es_delayed 1 es_keysetvalue dndExtra server_var(es_steamid) spell 0
						es_math mana - 10
						es_setinfo steamcheck 0
						es est_getsteam steamcheck server_var(point)
						es_setinfo vrandom 0
						es_rand vrandom 1 20
						if (server_var(vrandom) != 20) do
						{
							es_setinfo vpcheck 0
							es_keygetvalue vpcheck dndExtra server_var(steamcheck) willsave
							es_math vrandom + vpcheck
							
							es_setinfo wrandom 10
							es_math wrandom + 5
							if (server_var(vrandom) >= server_var(wrandom)) do
							{
								es_tell server_var(es_userid) #green Your target has resisted your stun attempt.
							}
							else do
							{
								es est_freeze server_var(point) 1
								es_setinfo dacheck 0
								es_keygetvalue dacheck dndExtra server_var(steamcheck) death_attack
								if (server_var(dacheck) = 0) do
								{
									es_delayed 4 es est_freeze server_var(point) 0
								}
								es_tell server_var(es_userid) #green You have stunned your target for 4 seconds.
							}
						}
						es_keysetvalue dndExtra server_var(es_steamid) mana server_var(mana)
					}
					else do
					{
						es_tell server_var(es_userid) #green You have to wait longer to cast stun again.
					}
				}
			}
		}
	}
}

block serious
{
	es_setinfo es_userid 0
  	es_getcmduserid es_userid
	es_setinfo es_steamid 0
	es est_getsteam es_steamid server_var(es_userid)
	es_setinfo ccheck 0
	es_keygetvalue ccheck dndUsers server_var(es_steamid) class
	es_setinfo lcheck 0
	es_keygetvalue lcheck dndUsers server_var(es_steamid) server_var(ccheck)	
	es_setinfo lacheck 0
	es_keygetvalue lacheck dndUsers server_var(es_steamid) la
	es_math lcheck - server_var(lacheck)
	if (server_var(ccheck) = cleric) do
	{
		es_setinfo pcheck 0
		es_keygetvalue pcheck dndUsers server_var(es_steamid) prestige
		if (server_var(pcheck) = cpc1) do
		{
			es_setinfo lcheck 5
		}
		if (server_var(pcheck) = cpc2) do
		{
			es_setinfo lcheck 10
		}
		if (server_var(pcheck) = cpc3) do
		{
			es_setinfo lcheck 15
			es_setinfo plcheck 0
			es_keygetvalue plcheck dndUsers server_var(es_steamid) server_var(pcheck)
		}
		if (server_var(lcheck) >= 5) do
		{
			es_setinfo acheck 0
			es_keygetvalue acheck dndExtra server_var(es_steamid) algin
			if (server_var(acheck) = good) do
			{
				es_setinfo mana 0
				es_keygetvalue mana dndExtra server_var(es_steamid) mana
				es_setinfo caster_alive 0
				es est_isalive caster_alive server_var(es_userid)
				if (server_var(caster_alive) = 0) then es_setinfo mana 0
				if (server_var(mana) >= 15) do
				{
					es_setinfo point z7
					es est_getviewplayer server_var(es_userid) point
					if (server_var(point) != z7) do
					{
										
						es_setinfo steamcheck 0
						es est_getsteam steamcheck server_var(point)
						es_setinfo phealth 0
						es_keygetvalue phealth dndExtra server_var(steamcheck) maxhealth
						es_setinfo thealth 0
						es est_gethealth thealth server_var(point)
						es_rand random 3 24
						if (server_var(lcheck) > 15) do
						{
							es_setinfo lcheck 15
						}
						if (server_var(pcheck) = cpc3) do
						{
							es_math lcheck + server_var(plcheck)
						}
						es_math random + server_var(lcheck)
						es_math thealth + server_var(random)
						if (server_var(thealth) <= server_var(phealth)) do
						{
							es ma_sethealth server_var(point) server_var(thealth)
							if (server_var(es_userid) != server_var(point)) do
							{
								es_setinfo userid 0
								es_setinfo userid server_var(es_userid)
								es_setinfo xpcheck 0
								es_keygetvalue xpcheck dndUsers server_var(es_steamid) curxp
								es_setinfo currentxp 0
								es_keygetvalue currentxp dndUsers server_var(es_steamid) server_var(xpcheck)
								es_math currentxp + 15	
								es_keysetvalue dndUsers server_var(es_steamid) server_var(xpcheck) server_var(currentxp)
								es_tell server_var(userid) #green You have gained 15 xp for healing someone.
								es_doblock dnd/class_level
							}
						}
						else do
						{
							es ma_sethealth server_var(point) server_var(phealth)
						}
						es_math mana - 15
						es_tell server_var(es_userid) #green You have healed your target for server_var(random).
					}
					
						
				}
				else do
				{
					es_tell server_var(es_userid) #green You do not have enough mana to cast cure serious.
				}
				es_keysetvalue dndExtra server_var(es_steamid) mana server_var(mana)
			}
			if (server_var(acheck) = evil) do
			{
				es_setinfo mana 0
				es_keygetvalue mana dndExtra server_var(es_steamid) mana
				es_setinfo caster_alive 0
				es est_isalive caster_alive server_var(es_userid)
				if (server_var(caster_alive) = 0) then es_setinfo mana 0
				if (server_var(mana) >= 15) do
				{
					es_setinfo point z7
					es est_getviewplayer server_var(es_userid) point
					if (server_var(point) != z7) do
					{
						es_setinfo spell 0
						es_keygetvalue spell dndExtra server_var(es_steamid) spell
						if(server_var(spell) = 0) do
						{
							es_keysetvalue dndExtra server_var(es_steamid) spell 1
							es_delayed 2 es_keysetvalue dndExtra server_var(es_steamid) spell 0
							es_setinfo steamcheck 0
							es est_getsteam steamcheck server_var(point)
							es_setinfo vrandom 0
							es_rand vrandom 1 20
							if (server_var(vrandom) != 20) do
							{
								es_setinfo vpcheck 0
								es_keygetvalue vpcheck dndExtra server_var(steamcheck) willsave
								es_math vrandom + vpcheck
								es_setinfo wrandom 10
								es_math wrandom + 6
								if (server_var(pcheck) = cpc3) do
								{
									es_math wrandom + server_var(plcheck)
								}
								es_rand random 3 24
								if (server_var(lcheck) > 15) do
								{
									es_setinfo lcheck 15
								}
								es_math random + server_var(lcheck)
								if (server_var(vrandom) >= server_var(wrandom)) do
								{
									es_math random / 2
								}
								
								es point_hurt server_var(es_userid) server_var(point) server_var(random)
								es_math mana - 15
								es_tell server_var(es_userid) #green You have dealt server_var(random) damage to your target.
							}
						}
						else do
						{
							es_tell server_var(es_userid) #green You have to wait longer before casting that spell again.
						}
					}
					else do
					{
						es_tell server_var(es_userid) #green You do not have enough mana to cast inflict serious.
					}
				}
				es_keysetvalue dndExtra server_var(es_steamid) mana server_var(mana)
			}
		}
	}
	if (server_var(ccheck) = paladin) do
	{
		if (server_var(lcheck) >= 12) do
		{
			es_setinfo mana 0
			es_keygetvalue mana dndExtra server_var(es_steamid) mana
			es_setinfo caster_alive 0
			es est_isalive caster_alive server_var(es_userid)
			if (server_var(caster_alive) = 0) then es_setinfo mana 0
			if (server_var(mana) >= 15) do
			{
				es_setinfo point z7
				es est_getviewplayer server_var(es_userid) point
				if (server_var(point) != z7) do
				{
					es_setinfo steamcheck 0
					es est_getsteam steamcheck server_var(point)
					es_setinfo phealth 0
					es_keygetvalue phealth dndExtra server_var(steamcheck) maxhealth
					es_setinfo thealth 0
					es est_gethealth thealth server_var(point)
					es_rand random 3 24
					es_math lcheck / 2
					if (server_var(lcheck) > 15) do
					{
						es_setinfo lcheck 15
					}
					es_math random + server_var(lcheck)
					es_math thealth + server_var(random)
					if (server_var(thealth) <= server_var(phealth)) do
					{
						es ma_sethealth server_var(point) server_var(thealth)
						if (server_var(es_userid) != server_var(point)) do
						{
							es_setinfo userid 0
							es_setinfo userid server_var(es_userid)
							es_setinfo xpcheck 0
							es_keygetvalue xpcheck dndUsers server_var(es_steamid) curxp
							es_setinfo currentxp 0
							es_keygetvalue currentxp dndUsers server_var(es_steamid) server_var(xpcheck)
							es_math currentxp + 15	
							es_keysetvalue dndUsers server_var(es_steamid) server_var(xpcheck) server_var(currentxp)
							es_tell server_var(userid) #green You have gained 15 xp for healing someone.
							es_doblock dnd/class_level
						}
					}
					else do
					{
						es ma_sethealth server_var(point) server_var(phealth)
					}
					es_math mana - 15
					es_tell server_var(es_userid) #green You have healed your target for server_var(random).
				}
			}
			else do
			{
				es_tell server_var(es_userid) #green You do not have enough mana to cast cure serious.
			}
			es_keysetvalue dndExtra server_var(es_steamid) mana server_var(mana)
		}
	}
}

block critical
{
	es_setinfo es_userid 0
  	es_getcmduserid es_userid
	es_setinfo es_steamid 0
	es est_getsteam es_steamid server_var(es_userid)
	es_setinfo ccheck 0
	es_keygetvalue ccheck dndUsers server_var(es_steamid) class
	es_setinfo lcheck 0
	es_keygetvalue lcheck dndUsers server_var(es_steamid) server_var(ccheck)	
	es_setinfo lacheck 0
	es_keygetvalue lacheck dndUsers server_var(es_steamid) la
	es_math lcheck - server_var(lacheck)
	if (server_var(ccheck) = cleric) do
	{
		es_setinfo pcheck 0
		es_keygetvalue pcheck dndUsers server_var(es_steamid) prestige
		if (server_var(pcheck) = cpc1) do
		{
			es_setinfo lcheck 5
		}
		if (server_var(pcheck) = cpc2) do
		{
			es_setinfo lcheck 10
		}
		if (server_var(pcheck) = cpc3) do
		{
			es_setinfo lcheck 15
			es_setinfo plcheck 0
			es_keygetvalue plcheck dndUsers server_var(es_steamid) server_var(pcheck)
		}
		if (server_var(lcheck) >= 7) do
		{
			es_setinfo acheck 0
			es_keygetvalue acheck dndExtra server_var(es_steamid) algin
			if (server_var(acheck) = good) do
			{
				es_setinfo mana 0
				es_keygetvalue mana dndExtra server_var(es_steamid) mana
				es_setinfo caster_alive 0
				es est_isalive caster_alive server_var(es_userid)
				if (server_var(caster_alive) = 0) then es_setinfo mana 0
				if (server_var(mana) >= 20) do
				{
					es_setinfo point z7
					es est_getviewplayer server_var(es_userid) point
					if (server_var(point) != z7) do
					{
						es_setinfo steamcheck 0
						es est_getsteam steamcheck server_var(point)
						es_setinfo phealth 0
						es_keygetvalue phealth dndExtra server_var(steamcheck) maxhealth
						es_setinfo thealth 0
						es est_gethealth thealth server_var(point)
						es_rand random 4 32
						if (server_var(lcheck) > 20) do
						{
							es_setinfo lcheck 20
						}
						if (server_var(pcheck) = cpc3) do
						{
							es_math lcheck + server_var(plcheck)
							es_math lcheck + server_Var(plcheck)
						}
						es_math random + server_var(lcheck)
						es_math thealth + server_var(random)
						if (server_var(thealth) <= server_var(phealth)) do
						{
							es ma_sethealth server_var(point) server_var(thealth)
							if (server_var(es_userid) != server_var(point)) do
							{
								es_setinfo userid 0
								es_setinfo userid server_var(es_userid)
								es_setinfo xpcheck 0
								es_keygetvalue xpcheck dndUsers server_var(es_steamid) curxp
								es_setinfo currentxp 0
								es_keygetvalue currentxp dndUsers server_var(es_steamid) server_var(xpcheck)
								es_math currentxp + 20	
								es_keysetvalue dndUsers server_var(es_steamid) server_var(xpcheck) server_var(currentxp)
								es_tell server_var(userid) #green You have gained 20 xp for healing someone.
								es_doblock dnd/class_level
							}
						}
						else do
						{
							es ma_sethealth server_var(point) server_var(phealth)
						}
						es_math mana - 20
						es_tell server_var(es_userid) #green You have healed your target for server_var(random).
					}
				}
				else do
				{
					es_tell server_var(es_userid) #green You do not have enough mana to cast cure critical.
				}
				es_keysetvalue dndExtra server_var(es_steamid) mana server_var(mana)
			}
			if (server_var(acheck) = evil) do
			{
				es_setinfo mana 0
				es_keygetvalue mana dndExtra server_var(es_steamid) mana
				es_setinfo caster_alive 0
				es est_isalive caster_alive server_var(es_userid)
				if (server_var(caster_alive) = 0) then es_setinfo mana 0
				if (server_var(mana) >= 20) do
				{
					es_setinfo point z7
					es est_getviewplayer server_var(es_userid) point
					if (server_var(point) != z7) do
					{
						es_setinfo spell 0
						es_keygetvalue spell dndExtra server_var(es_steamid) spell
						if(server_var(spell) = 0) do
						{	
							es_keysetvalue dndExtra server_var(es_steamid) spell 1
							es_delayed 2.5 es_keysetvalue dndExtra server_var(es_steamid) spell 0
							es_setinfo steamcheck 0
							es est_getsteam steamcheck server_var(point)
							es_setinfo vrandom 0
							es_rand vrandom 1 20
							if (server_var(vrandom) != 20) do
							{
								es_setinfo vpcheck 0
								es_keygetvalue vpcheck dndExtra server_var(steamcheck) willsave
								es_math vrandom + vpcheck
								es_setinfo wrandom 10
								es_math wrandom + 7
								if (server_var(pcheck) = cpc3) do
								{
									es_math wrandom + server_var(plcheck)
								}
								es_rand random 4 32
								if (server_var(lcheck) > 20) do
								{
									es_setinfo lcheck 20
								}
								es_math random + server_var(lcheck)
								if (server_var(vrandom) >= server_var(wrandom)) do
								{
									es_math random / 2
								}
								
								es point_hurt server_var(es_userid) server_var(point) server_var(random)
								es_math mana - 20
								es_tell server_var(es_userid) #green You have dealt server_var(random) damage to your target.
							}
						}
						else do
						{
							es_tell server_var(es_userid) #green You have to wait longer before you can cast that spell again.
						}
					}
				}
				else do
				{
					es_tell server_var(es_userid) #green You do not have enough mana to cast inflict critical.
				}
				es_keysetvalue dndExtra server_var(es_steamid) mana server_var(mana)
			}
		}
	}
}

block curse
{
	es_setinfo es_userid 0
  	es_getcmduserid es_userid
	es_setinfo es_steamid 0
	es est_getsteam es_steamid server_var(es_userid)
	es_setinfo ccheck 0
	es_keygetvalue ccheck dndUsers server_var(es_steamid) class
	es_setinfo lcheck 0
	es_keygetvalue lcheck dndUsers server_var(es_steamid) server_var(ccheck)	
	es_setinfo lacheck 0
	es_keygetvalue lacheck dndUsers server_var(es_steamid) la
	es_math lcheck - server_var(lacheck)
	if (server_var(ccheck) = cleric) do
	{
		es_setinfo pcheck 0
		es_keygetvalue pcheck dndUsers server_var(es_steamid) prestige
		if (server_var(pcheck) = cpc1) do
		{
			es_setinfo lcheck 5
		}
		if (server_var(pcheck) = cpc2) do
		{
			es_setinfo lcheck 10
		}
		if (server_var(pcheck) = cpc3) do
		{
			es_setinfo lcheck 15
		}
		if (server_var(lcheck) >= 9) do
		{
			es_setinfo acheck 0
			es_keygetvalue acheck dndExtra server_var(es_steamid) algin
			if (server_var(acheck) = evil) do
			{
				es_setinfo mana 0
				es_keygetvalue mana dndExtra server_var(es_steamid) mana
				es_setinfo caster_alive 0
				es est_isalive caster_alive server_var(es_userid)
				if (server_var(caster_alive) = 0) then es_setinfo mana 0
				if (server_var(mana) >= 10) do
				{
					es_setinfo point z7
					es est_getviewplayer server_var(es_userid) point
					if (server_var(point) != z7) do
					{
						es_setinfo steamcheck 0
						es est_getsteam steamcheck server_var(point)
						es_setinfo vrandom 0
						es_rand vrandom 1 20
						if (server_var(vrandom) != 20) do
						{
							es_setinfo vpcheck 0
							es_keygetvalue vpcheck dndEsers server_var(steamcheck) willsave
							es_math vrandom + vpcheck
							es_setinfo wrandom 10
							es_math wrandom + 7
							if (server_var(vrandom) >= server_var(wrandom)) do
							{
								es_tell server_var(es_userid) #green They resisted your Curse!			
							}
							else do
							{
								es ma_blind server_var(point) 200
								es_tell server_var(es_userid) #green You have blinded your target.
							}
						}
					}
				}
			}
			else do
			{
				es_tell server_var(es_userid) #green You do not have enough mana left to cast Bestow Curse. 
			}
			es_keysetvalue dndExtra server_var(es_steamid) mana server_var(mana)
		}
	}
}

block remove
{
	es_setinfo es_userid 0
  	es_getcmduserid es_userid
	es_setinfo es_steamid 0
	es est_getsteam es_steamid server_var(es_userid)
	es_setinfo ccheck 0
	es_keygetvalue ccheck dndUsers server_var(es_steamid) class
	es_setinfo lcheck 0
	es_keygetvalue lcheck dndUsers server_var(es_steamid) server_var(ccheck)	
	es_setinfo lacheck 0
	es_keygetvalue lacheck dndUsers server_var(es_steamid) la
	es_math lcheck - server_var(lacheck)
	if (server_var(ccheck) = cleric) do
	{
		es_setinfo pcheck 0
		es_keygetvalue pcheck dndUsers server_var(es_steamid) prestige
		if (server_var(pcheck) = cpc1) do
		{
			es_setinfo lcheck 5
		}
		if (server_var(pcheck) = cpc2) do
		{
			es_setinfo lcheck 10
		}
		if (server_var(pcheck) = cpc3) do
		{
			es_setinfo lcheck 15
		}
		if (server_var(lcheck) >= 9) do
		{
			es_setinfo acheck 0
			es_keygetvalue acheck dndExtra server_var(es_steamid) algin
			if (server_var(acheck) = good) do
			{
				es_setinfo mana 0
				es_keygetvalue mana dndExtra server_var(es_steamid) mana
				es_setinfo caster_alive 0
				es est_isalive caster_alive server_var(es_userid)
				if (server_var(caster_alive) = 0) then es_setinfo mana 0
				if (server_var(mana) >= 10) do
				{
					es_setinfo point z7
					es est_getviewplayer server_var(es_userid) point
					if (server_var(point) != z7) do
					{
						es est_freeze server_var(point) 0
						es ma_blind server_var(point) 0
						es est_Fade server_var(point) 0 1 1 0 0 0 0
						es ma_freeze server_var(point) 0
						es_setinfo steamcheck 0
						es est_getsteam steamcheck server_var(point)
						es_setinfo phealth 0
						es_keygetvalue phealth dndExtra server_var(steamcheck) maxhealth
						es_setinfo thealth 0
						es_setinfo random 10
						es est_gethealth thealth server_var(point)
						es_math thealth + server_var(random)
						if (server_var(thealth) <= server_var(phealth)) do
						{
							es ma_sethealth server_var(point) server_var(thealth)
						}
						else do
						{
							es ma_sethealth server_var(point) server_var(phealth)
						}
						es_math mana - 10
					}
				}
				else do
				{
					es_tell server_var(es_userid) #green You do not have enough mana to cast remove curse!
				}
				es_keysetvalue dndExtra server_var(es_steamid) mana server_var(mana)
			}
		}
	}
}

block purge
{
	es_setinfo es_userid 0
  	es_getcmduserid es_userid
	es_setinfo es_steamid 0
	es est_getsteam es_steamid server_var(es_userid)
	es_setinfo ccheck 0
	es_keygetvalue ccheck dndUsers server_var(es_steamid) class
	es_setinfo lcheck 0
	es_keygetvalue lcheck dndUsers server_var(es_steamid) server_var(ccheck)	
	es_setinfo lacheck 0
	es_keygetvalue lacheck dndUsers server_var(es_steamid) la
	es_math lcheck - server_var(lacheck)
	if (server_var(ccheck) = cleric) do
	{
		es_setinfo pcheck 0
		es_keygetvalue pcheck dndUsers server_var(es_steamid) prestige
		if (server_var(pcheck) = cpc1) do
		{
			es_setinfo lcheck 5
		}
		if (server_var(pcheck) = cpc2) do
		{
			es_setinfo lcheck 10
		}
		if (server_var(pcheck) = cpc3) do
		{
			es_setinfo lcheck 15
		}
		if (server_var(lcheck) >= 11) do
		{
			es_setinfo acheck 0
			es_keygetvalue acheck dndExtra server_var(es_steamid) algin
			if (server_var(acheck) = good) do
			{
				es_setinfo mana 0
				es_keygetvalue mana dndExtra server_var(es_steamid) mana
				es_setinfo caster_alive 0
				es est_isalive caster_alive server_var(es_userid)
				if (server_var(caster_alive) = 0) then es_setinfo mana 0
				if (server_var(mana) >= 15) do
				{
					es_math mana - 15
					es_tell server_var(es_userid) #green You have restored sight to all the members of you team.
					es_setinfo team_check 0
					es est_getteam team_check server_var(es_userid)
					if (server_var(team_check) = 2) do
					{
						es ma_blind #T 0
					}
					if (server_var(team_check) = 3) do
					{
						es ma_blind #CT 0
					}
				}
				else do
				{
					es_tell server_var(es_userid) #green You do not have enough mana to cast purity.
				}
				es_keysetvalue dndExtra server_var(es_steamid) mana server_var(mana)
			}
		}
	}	
}

block bane
{
	es_setinfo es_userid 0
  	es_getcmduserid es_userid
	es_setinfo es_steamid 0
	es est_getsteam es_steamid server_var(es_userid)
	es_setinfo ccheck 0
	es_keygetvalue ccheck dndUsers server_var(es_steamid) class
	es_setinfo lcheck 0
	es_keygetvalue lcheck dndUsers server_var(es_steamid) server_var(ccheck)	
	es_setinfo lacheck 0
	es_keygetvalue lacheck dndUsers server_var(es_steamid) la
	es_math lcheck - server_var(lacheck)
	if (server_var(ccheck) = cleric) do
	{
		es_setinfo pcheck 0
		es_keygetvalue pcheck dndUsers server_var(es_steamid) prestige
		if (server_var(pcheck) = cpc1) do
		{
			es_setinfo lcheck 5
		}
		if (server_var(pcheck) = cpc2) do
		{
			es_setinfo lcheck 10
		}
		if (server_var(pcheck) = cpc3) do
		{
			es_setinfo lcheck 15
		}
		if (server_var(lcheck) >= 11) do
		{
			es_setinfo acheck 0
			es_keygetvalue acheck dndExtra server_var(es_steamid) algin
			if (server_var(acheck) = evil) do
			{
				es_setinfo mana 0
				es_keygetvalue mana dndExtra server_var(es_steamid) mana
				es_setinfo caster_alive 0
				es est_isalive caster_alive server_var(es_userid)
				if (server_var(caster_alive) = 0) then es_setinfo mana 0
				if (server_var(mana) >= 25) do
				{
					es_math mana - 25
					es_tell server_var(es_userid) #green You have blinded the entire enemy team!
					es_setinfo team_check 0
					es est_getteam team_check server_var(es_userid)
					if (server_var(team_check) = 3) do
					{
						es ma_blind #T 150
					}
					if (server_var(team_check) = 2) do
					{
						es ma_blind #CT 150
					}
				}
				else do
				{
					es_tell server_var(es_userid) #green You do not have enough mana to cast Mark of Injustice.
				}
				es_keysetvalue dndExtra server_var(es_steamid) mana server_var(mana)
			}
		}
	}
}

block blasphemy
{
	es_setinfo es_userid 0
  	es_getcmduserid es_userid
	es_setinfo es_steamid 0
	es est_getsteam es_steamid server_var(es_userid)
	es_setinfo ccheck 0
	es_keygetvalue ccheck dndUsers server_var(es_steamid) class
	es_setinfo lcheck 0
	es_keygetvalue lcheck dndUsers server_var(es_steamid) server_var(ccheck)	
	es_setinfo lacheck 0
	es_keygetvalue lacheck dndUsers server_var(es_steamid) la
	es_math lcheck - server_var(lacheck)
	if (server_var(ccheck) = cleric) do
	{
		es_setinfo pcheck 0
		es_keygetvalue pcheck dndUsers server_var(es_steamid) prestige
		if (server_var(pcheck) = cpc1) do
		{
			es_setinfo lcheck 5
		}
		if (server_var(pcheck) = cpc2) do
		{
			es_setinfo lcheck 10
		}
		if (server_var(pcheck) = cpc3) do
		{
			es_setinfo lcheck 15
		}
		if (server_var(lcheck) >= 13) do
		{
			es_setinfo acheck 0
			es_keygetvalue acheck dndExtra server_var(es_steamid) algin
			if (server_var(acheck) = evil) do
			{
				es_setinfo mana 0
				es_keygetvalue mana dndExtra server_var(es_steamid) mana
				es_setinfo caster_alive 0
				es est_isalive caster_alive server_var(es_userid)
				if (server_var(caster_alive) = 0) then es_setinfo mana 0
				if (server_var(mana) >= 25) do
				{
					es_setinfo point z7
					es est_getviewplayer server_var(es_userid) point
					if (server_var(point) != z7) do
					{
						es_setinfo spell 0
						es_keygetvalue spell dndExtra server_var(es_steamid) spell
						if(server_var(spell) = 0) do
						{
							es_keysetvalue dndExtra server_var(es_steamid) spell 1
							es_delayed 3.5 es_keysetvalue dndExtra server_var(es_steamid) spell 0
							es_math mana - 25
							es_setinfo steamcheck 0
							es est_getsteam steamcheck server_var(point)
							es_setinfo vclass 0
							es_keygetvalue vclass dndUsers server_var(steamcheck) class
							es_setinfo vlevel 0
							es_keygetvalue vlevel dndUsers server_var(steamcheck) server_var(vclass)
							es_setinfo user_level server_var(lcheck)
							es_setinfo vlevel_1 server_var(vlevel)
							es_math vlevel_1 + 1
							es_setinfo vlevel_5 server_var(vlevel)
							es_math vlevel_5 + 5
							es_setinfo vlevel_10 server_var(vlevel)
							es_math vlevel_10 + 10
							if (server_var(user_level) >= server_var(vlevel_10)) do
							{
								es_setinfo save 0
								es_setinfo will 0
								es_rand save 1 20
								if (server_var(save) != 20) do
								{
									es_keygetvalue will dndExtra server_var(steamcheck) willsave
									es_math save + server_var(will)
									if (server_var(save) < 14) do
									{
										es point_hurt server_var(es_userid) server_var(point) 75
									}
									else do
									{
										es point_hurt server_var(es_userid) server_var(point) 25
									}
								}
							}
							if (server_var(user_level) >= server_var(vlevel_5)) do
							{
								es_setinfo save 0
								es_setinfo will 0
								es_rand save 1 20
								if (server_var(save) != 20) do
								{
									es_keygetvalue will dndExtra server_var(steamcheck) willsave
									es_math save + server_var(will)
									if (server_var(save) < 16) do
									{
										es ma_freeze server_var(point) 1
										es_delayed 2 es ma_freeze server_var(point) 0
									}
								}
							}
							if (server_var(user_level) >= server_var(vlevel_1)) do
							{
								es_setinfo save 0
								es_setinfo will 0
								es_rand save 1 20
								if (server_var(save) != 20) do
								{
									es_keygetvalue will dndExtra server_var(steamcheck) willsave
									es_math save + server_var(will)
									if (server_var(save) < 18) do
									{
										es est_speed server_var(point) .6
									}
									else do
									{
										es est_speed server_var(point) .8
									}
									es_setinfo speed_check 0
									es_keygetvalue speed_check dndExtra server_var(steamcheck) speed
									es_delayed 8 es est_speed server_var(point) server_var(speed_check)
								}
							}					
							if (server_var(user_level) >= server_var(vlevel)) do
							{
								es_setinfo save 0
								es_setinfo will 0
								es_rand save 1 20
								if (server_var(save) != 20) do
								{
									es_keygetvalue will dndExtra server_var(steamcheck) willsave
									es_math save + server_var(will)
									if (server_var(save) < 20) do
									{
										es est_freeze server_var(point) 1
										es_delayed 4 es est_freeze server_var(point) 0
									}
								}	
							}			
						}	
						else do
						{
							es_tell server_var(es_userid) #green You have to wait to cast this spell again.
						}
					}	
				}
				es_keysetvalue dndExtra server_var(es_steamid) mana server_var(mana)
			}
		}
	}
}

block res
{
	es_setinfo es_userid 0
  	es_getcmduserid es_userid
	es_setinfo es_steamid 0
	es est_getsteam es_steamid server_var(es_userid)
	es_setinfo ccheck 0
	es_keygetvalue ccheck dndUsers server_var(es_steamid) class
	es_setinfo lcheck 0
	es_keygetvalue lcheck dndUsers server_var(es_steamid) server_var(ccheck)	
	es_setinfo lacheck 0
	es_keygetvalue lacheck dndUsers server_var(es_steamid) la
	es_math lcheck - server_var(lacheck)
	if (server_var(ccheck) = cleric) do
	{
		es_setinfo pcheck 0
		es_keygetvalue pcheck dndUsers server_var(es_steamid) prestige
		if (server_var(pcheck) = cpc1) do
		{
			es_setinfo lcheck 5
		}
		if (server_var(pcheck) = cpc2) do
		{
			es_setinfo lcheck 10
		}
		if (server_var(pcheck) = cpc3) do
		{
			es_setinfo lcheck 15
		}
		if (server_var(lcheck) >= 13) do
		{
			es_setinfo acheck 0
			es_keygetvalue acheck dndExtra server_var(es_steamid) algin
			if (server_var(acheck) = good) do
			{
				es_setinfo mana 0
				es_keygetvalue mana dndExtra server_var(es_steamid) mana
				es_setinfo caster_alive 0
				es est_isalive caster_alive server_var(es_userid)
				if (server_var(caster_alive) = 0) then es_setinfo mana 0
				if (server_var(mana) >= 35) do
				{
					es_keysetvalue dndExtra server_var(es_steamid) 1 0
					es_keysetvalue dndExtra server_var(es_steamid) 2 0
					es_keysetvalue dndExtra server_var(es_steamid) 3 0
					es_keysetvalue dndExtra server_var(es_steamid) 4 0
					es_keysetvalue dndExtra server_var(es_steamid) 5 0
					es_keysetvalue dndExtra server_var(es_steamid) 6 0
					es_keysetvalue dndExtra server_var(es_steamid) 7 0
					es_keysetvalue dndExtra server_var(es_steamid) 8 0
					es_keysetvalue dndExtra server_var(es_steamid) 9 0
					popup delete resmenu
					popup create resmenu
					popup addline resmenu " Choose a dead teamate to raise from the dead:"
					es_setinfo rplayer 0
					es_setinfo team_check 0
					es est_getteam team_check server_var(es_userid)
					es_setinfo rnumber 0
					if (server_var(team_check) = 3) do
					{
						es est_loop rplayer #d!t!s!u "es_doblock dnd/rmenuadd"
					}
					if (server_var(team_check) = 2) do
					{
						es est_loop rplayer #d!c!s!u "es_doblock dnd/rmenuadd"
					}
					popup menuselect resmenu dnd/resplayer
					es_setinfo 1check 0
					es_keygetvalue 1check dndExtra server_var(es_steamid) 1
					if (server_var(1check) != 0) do
					{
						es popup send resmenu server_var(es_userid)
					}
					else do
					{
						es_tell server_var(es_userid) #green You have no dead teamates right now!
					}
				}
				else do
				{
					es_tell server_var(es_userid) #green You don't have the mana to cast true resurection.
				}
			}
		}
	}
}

block resurrect
{
	es_setinfo rescsteam 0
	es est_getsteam rescsteam server_var(cplayer)
	es_setinfo rescheck 0
	es_keygetvalue rescheck dndExtra server_var(rescsteam) res_count
	if (server_var(rescheck) < 5) do
	{
		es_setinfo x 0
		es_setinfo y 0
		es_setinfo z 0
		es_keygetvalue x dndExtra server_var(rescsteam) d_x
		es_keygetvalue y dndExtra server_var(rescsteam) d_y
		es_keygetvalue z dndExtra server_var(rescsteam) d_z
		es est_spawn server_var(cplayer)
		es ma_teleport server_var(cplayer) server_var(x) server_var(y) server_var(z)
		if (server_var(rescheck) = 0) do
		{
			es_setinfo rescheck 1
		}
		else do
		{
			es_math rescheck + 1
		}
		es_keysetvalue dndExtra server_var(rescsteam) res_count server_var(rescheck)
		es_tell server_var(cplayer) #green You have been restored to life by an ally cleric!
	}
	else do
	{
		es_tell server_var(_popu_userid) #green That player has been restored to life to many times this round!
	}
}

block resplayer
{
	es_setinfo csteam 0
	es est_getsteam csteam server_var(_popup_userid)
	es_setinfo mana 0
	es_keygetvalue mana dndExtra server_var(csteam) mana
	es_setinfo cplayer 0
	if (server_var(_popup_choice) = 1) do
	{
		es_setinfo alive 0
		es est_isalive alive server_var(_popup_userid)
		if (server_var(alive) = 1) do
		{
			es_keygetvalue cplayer dndExtra server_var(csteam) 1
			es_doblock dnd/resurrect
			es_math mana - 35
			es_keysetvalue dndExtra server_var(csteam) mana server_var(mana)
		}
	}
	if (server_var(_popup_choice) = 2) do
	{
		es_keygetvalue cplayer dndExtra server_var(csteam) 2
		if (server_var(cplayer) != 0) do
		{
			es_setinfo alive 0
			es est_isalive alive server_var(_popup_userid)
			if (server_var(alive) = 1) do
			{
				es_doblock dnd/resurrect
				es_math mana - 35
				es_keysetvalue dndExtra server_var(csteam) mana server_var(mana)
			}
		}
	}
	if (server_var(_popup_choice) = 3) do
	{
		es_keygetvalue cplayer dndExtra server_var(csteam) 3
		if (server_var(cplayer) != 0) do
		{
			es_setinfo alive 0
			es est_isalive alive server_var(_popup_userid)
			if (server_var(alive) = 1) do
			{
				es_doblock dnd/resurrect
				es_math mana - 35
				es_keysetvalue dndExtra server_var(csteam) mana server_var(mana)
			}
		}
	}
	if (server_var(_popup_choice) = 4) do
	{
		es_keygetvalue cplayer dndExtra server_var(csteam) 4
		if (server_var(cplayer) != 0) do
		{
			es_setinfo alive 0
			es est_isalive alive server_var(_popup_userid)
			if (server_var(alive) = 1) do
			{
				es_doblock dnd/resurrect
				es_math mana - 35
				es_keysetvalue dndExtra server_var(csteam) mana server_var(mana)
			}
		}
	}
	if (server_var(_popup_choice) = 5) do
	{
		es_keygetvalue cplayer dndExtra server_var(csteam) 5
		if (server_var(cplayer) != 0) do
		{
			es_setinfo alive 0
			es est_isalive alive server_var(_popup_userid)
			if (server_var(alive) != 1) do
			{
				es_doblock dnd/resurrect
				es_math mana - 35
				es_keysetvalue dndExtra server_var(csteam) mana server_var(mana)
			}
		}
	}
	if (server_var(_popup_choice) = 6) do
	{
		es_keygetvalue cplayer dndExtra server_var(csteam) 6
		if (server_var(cplayer) != 0) do
		{
			es_setinfo alive 0
			es est_isalive alive server_var(_popup_userid)
			if (server_var(alive) = 1) do
			{
				es_doblock dnd/resurrect
				es_math mana - 35
				es_keysetvalue dndExtra server_var(csteam) mana server_var(mana)
			}
		}
	}
	if (server_var(_popup_choice) = 7) do
	{
		es_keygetvalue cplayer dndExtra server_var(csteam) 7
		if (server_var(cplayer) != 0) do
		{
			es_setinfo alive 0
			es est_isalive alive server_var(_popup_userid)
			if (server_var(alive) = 1) do
			{
				es_doblock dnd/resurrect
				es_math mana - 35
				es_keysetvalue dndExtra server_var(csteam) mana server_var(mana)
			}
		}
	}
	if (server_var(_popup_choice) = 8) do
	{
		es_keygetvalue cplayer dndExtra server_var(csteam) 8
		if (server_var(cplayer) != 0) do
		{
			es_setinfo alive 0
			es est_isalive alive server_var(_popup_userid)
			if (server_var(alive) = 1) do
			{
				es_doblock dnd/resurrect
				es_math mana - 35
				es_keysetvalue dndExtra server_var(csteam) mana server_var(mana)
			}
		}
	}
	if (server_var(_popup_choice) = 9) do
	{
		es_keygetvalue cplayer dndExtra server_var(csteam) 9
		if (server_var(cplayer) != 0) do
		{
			es_setinfo alive 0
			es est_isalive alive server_var(_popup_userid)
			if (server_var(alive) = 1) do
			{
				es_doblock dnd/resurrect
				es_math mana - 35
				es_keysetvalue dndExtra server_var(csteam) mana server_var(mana)
			}
		}
	}
}

block rmenuadd
{
	es_setinfo rsteam 0
	es est_getsteam rsteam server_var(rplayer)
	es_setinfo rzcheck 0
	es_keygetvalue rzcheck dndExtra server_var(rsteam) zombie
	if (server_var(rzcheck) = 0) do
	{
		es_setinfo rzteam 0
		es est_getteam rzteam server_var(rplayer)
		if (server_var(rzteam) >= 2) do
		{
			es_setinfo rescount 0
			es_keygetvalue rescount dndExtra server_var(rsteam) res_count
			if (server_var(rescount) = 0) do
			{
				es_setinfo rescount 1
			}
			else do
			{
				es_math rescount + 1
			}
			if (server_var(rescount) < 5) do
			{
				es_setinfo per 20
				es_math per * server_var(rescount)
				es_setinfo rname 0
				es est_getname rname server_var(rplayer)
				if (server_var(rnumber) = 0) do
				{
					es_setinfo rnumber 1
				}
				else do
				{
					es_math rnumber + 1
				}
				popup addlinef resmenu "-> %1. %2 (%3% Health Penalty)" rnumber rname per
				es_keysetvalue dndExtra server_var(es_steamid) server_var(rnumber) server_var(rplayer)
			}
		}
	}
}

block storm
{
	es_setinfo es_userid 0
  	es_getcmduserid es_userid
	es_setinfo es_steamid 0
	es est_getsteam es_steamid server_var(es_userid)
	es_setinfo ccheck 0
	es_keygetvalue ccheck dndUsers server_var(es_steamid) class
	es_setinfo lcheck 0
	es_keygetvalue lcheck dndUsers server_var(es_steamid) server_var(ccheck)	
	es_setinfo lacheck 0
	es_keygetvalue lacheck dndUsers server_var(es_steamid) la
	es_math lcheck - server_var(lacheck)
	if (server_var(ccheck) = cleric) do
	{
		es_setinfo pcheck 0
		es_keygetvalue pcheck dndUsers server_var(es_steamid) prestige
		if (server_var(pcheck) = cpc1) do
		{
			es_setinfo lcheck 5
		}
		if (server_var(pcheck) = cpc2) do
		{
			es_setinfo lcheck 10
		}
		if (server_var(pcheck) = cpc3) do
		{
			es_setinfo lcheck 15
		}
		if (server_var(lcheck) >= 5) do
		{
			es_setinfo spell 0
			es_keygetvalue spell dndExtra server_var(es_steamid) spell
			if(server_var(spell) = 0) do
			{
				es_setinfo mana 0
				es_keygetvalue mana dndExtra server_var(es_steamid) mana
				es_setinfo caster_alive 0
				es est_isalive caster_alive server_var(es_userid)
				if (server_var(caster_alive) = 0) then es_setinfo mana 0
				if (server_var(mana) >= 20) do
				{
					es_setinfo point z7
					es est_getviewplayer server_var(es_userid) point
					if (server_var(point) != z7) do
					{
						es_keysetvalue dndExtra server_var(es_steamid) spell 1
						es_delayed 2 es_keysetvalue dndExtra server_var(es_steamid) spell 0
						es_setinfo level server_var(lcheck)
						if (server_var(level) > 10) then es_setinfo level 10
						es_rand random 1 6
						es_math random * server_var(level)
						es_math level / 2
						es_setinfo steamcheck 0
						es est_getsteam steamcheck server_var(point)
						es_setinfo vrandom 0
						es_rand vrandom 1 20
						if (server_var(vrandom) != 20) do
						{
							es_setinfo bonus 0
							es_keygetvalue bonus dndExtra server_var(steamcheck) willsave
							es_math vrandom + server_var(bonus)
							
							es_setinfo wrandom 10
							es_math wrandom + 11
							if (server_var(vrandom) >= server_var(wrandom)) do
							{
								es_math random / 2
								es_setinfo level 0
								es_tell server_var(es_userid) #green Your victim has dodged some of your fire storm!
							}
							else do
							{
								es_tell server_var(es_userid) #green You have used fire storm! Watch them burn!
								es est_burn server_var(point) server_var(level)
							}
							
							es point_hurt server_var(es_userid) server_var(point) server_var(random)
							es_math mana - 20
						}
					}
				}
				else do
				{
					es_tell server_var(es_userid) #green You do not have enough mana to cast fire storm right now.
				}
				es_keysetvalue dndExtra server_var(es_steamid) mana server_var(mana)
			}
			else do
			{
				es_tell server_var(es_userid) #green You have to wait longer between fire storm.
			}
		}
	}
}


block astral
{
	es_setinfo es_userid 0
  	es_getcmduserid es_userid
	es_setinfo es_steamid 0
	es est_getsteam es_steamid server_var(es_userid)
	es_setinfo ccheck 0
	es_keygetvalue ccheck dndUsers server_var(es_steamid) class
	es_setinfo lcheck 0
	es_keygetvalue lcheck dndUsers server_var(es_steamid) server_var(ccheck)	
	es_setinfo lacheck 0
	es_keygetvalue lacheck dndUsers server_var(es_steamid) la
	es_math lcheck - server_var(lacheck)
	if (server_var(ccheck) = cleric) do
	{
		es_setinfo pcheck 0
		es_keygetvalue pcheck dndUsers server_var(es_steamid) prestige
		if (server_var(pcheck) = cpc1) do
		{
			es_setinfo lcheck 5
		}
		if (server_var(pcheck) = cpc2) do
		{
			es_setinfo lcheck 10
		}
		if (server_var(pcheck) = cpc3) do
		{
			es_setinfo lcheck 15
		}
		if (server_var(lcheck) >= 17) do
		{
			es_setinfo mana 0
			es_keygetvalue mana dndExtra server_var(es_steamid) mana
			es_setinfo caster_alive 0
			es est_isalive caster_alive server_var(es_userid)
			if (server_var(caster_alive) = 0) then es_setinfo mana 0
			if (server_var(mana) >= 20) do
			{
				es_setinfo astral_check 0
				es_keygetvalue astral_check dndExtra server_var(es_steamid) astral
				if (server_var(astral_check) = 0) do
				{
					es_math mana - 20
					es_keysetvalue dndExtra server_var(es_steamid) astral 1
					es est_god server_var(es_userid) 1
					es est_setplayercolor server_var(es_userid) 248 248 255 150 1
					es ma_beacon server_var(es_userid) 1
					es_setinfo speed_check 0
					es_keygetvalue speed_check dndExtra server_var(es_steamid) speed
					es_math speed_check - .5
					es est_speed server_var(es_userid) server_var(speed_check)
					es est_removeweapon server_var(es_userid) 1
					es est_removeweapon server_var(es_userid) 2
					es est_removeweapon server_var(es_userid) 3
					es est_removeweapon server_var(es_userid) 4
				}
				if (server_var(astral_check) = 1) do
				{
					es_keysetvalue dndExtra server_var(es_steamid) astral 0
					es est_god server_var(es_userid) 0
					es est_setplayercolor server_var(es_userid) 255 255 255 255 1
					es ma_beacon server_var(es_userid) 0
					es_setinfo speed_check 0
					es_keygetvalue speed_check dndExtra server_var(es_steamid) speed
					es est_speed server_var(es_userid) server_var(speed_check)
					es ma_give server_var(es_userid) weapon_knife	
				}
				es_keysetvalue dndExtra server_var(es_steamid) mana server_var(mana)
			}
		}
	}
}

block divine
{
	es_setinfo es_userid 0
  	es_getcmduserid es_userid
	es_setinfo es_steamid 0
	es est_getsteam es_steamid server_var(es_userid)
	es_setinfo pcheck 0
	es_keygetvalue pcheck dndUsers server_var(es_steamid) prestige
	if (server_var(pcheck) = cpc1) do
	{
		es_setinfo plcheck 0
		es_keygetvalue plcheck dndUsers server_var(es_steamid) server_var(pcheck)
		es_setinfo lacheck 0
		es_keygetvalue lacheck dndUsers server_var(es_steamid) la
		es_math plcheck - server_var(lacheck)
		es_setinfo mana 0
		if (server_var(plcheck) >= 1) do
		{
			es_setinfo mana 0
			es_keygetvalue mana dndExtra server_var(es_steamid) mana
			es_setinfo caster_alive 0
			es est_isalive caster_alive server_var(es_userid)
			if (server_var(caster_alive) = 0) then es_setinfo mana 0
			if (server_var(mana) >= 25) do
			{
				es_setinfo dcheck 0
				es_keygetvalue dcheck dndExtra server_var(es_steamid) divine
				if (server_var(dcheck) = 0) do
				{
					es_math mana - 25
					es_keysetvalue dndExtra server_var(es_steamid) divine 1
					es_tell server_var(es_userid) #green You divine favor is now active your attacks are more powerful!
					es_keysetvalue dndExtra server_var(es_steamid) mana server_var(mana)
				}
				else do
				{
					es_tell server_var(es_userid) #green Your divine favor is already enabled!
				}
			}
		}
	}
}

block shield
{
	es_setinfo es_userid 0
  	es_getcmduserid es_userid
	es_setinfo es_steamid 0
	es est_getsteam es_steamid server_var(es_userid)
	es_setinfo pcheck 0
	es_keygetvalue pcheck dndUsers server_var(es_steamid) prestige
	if (server_var(pcheck) = cpc1) do
	{
		es_setinfo plcheck 0
		es_keygetvalue plcheck dndUsers server_var(es_steamid) server_var(pcheck)
		es_setinfo lacheck 0
		es_keygetvalue lacheck dndUsers server_var(es_steamid) la
		es_math plcheck - server_var(lacheck)
		es_setinfo mana 0
		if (server_var(plcheck) >= 4) do
		{
			es_setinfo mana 0
			es_keygetvalue mana dndExtra server_var(es_steamid) mana
			es_setinfo caster_alive 0
			es est_isalive caster_alive server_var(es_userid)
			if (server_var(caster_alive) = 0) then es_setinfo mana 0
			if (server_var(mana) >= 30) do
			{
				es_setinfo scheck 0
				es_keygetvalue scheck dndExtra server_var(es_steamid) shield
				if (server_var(scheck) = 0) do
				{
					es_math mana - 30
					es_keysetvalue dndExtra server_var(es_steamid) shield 1
					es_tell server_var(es_userid) #green You divine shield is now active you take less damage from attacks!
					es_keysetvalue dndExtra server_var(es_steamid) mana server_var(mana)
				}
				else do
				{
					es_tell server_var(es_userid) #green Your divine shield is already enabled!
				}
			}
		}
	}
}

block flame
{
	es_setinfo es_userid 0
  	es_getcmduserid es_userid
	es_setinfo es_steamid 0
	es est_getsteam es_steamid server_var(es_userid)
	es_setinfo pcheck 0
	es_keygetvalue pcheck dndUsers server_var(es_steamid) prestige
	if (server_var(pcheck) = cpc1) do
	{
		es_setinfo plcheck 0
		es_keygetvalue plcheck dndUsers server_var(es_steamid) server_var(pcheck)
		es_setinfo lacheck 0
		es_keygetvalue lacheck dndUsers server_var(es_steamid) la
		es_math plcheck - server_var(lacheck)
		es_setinfo mana 0
		if (server_var(plcheck) >= 7) do
		{
			es_setinfo mana 0
			es_keygetvalue mana dndExtra server_var(es_steamid) mana
			es_setinfo caster_alive 0
			es est_isalive caster_alive server_var(es_userid)
			if (server_var(caster_alive) = 0) then es_setinfo mana 0
			if (server_var(mana) >= 35) do
			{
				es_setinfo fcheck 0
				es_keygetvalue fcheck dndExtra server_var(es_steamid) flame
				if (server_var(fcheck) = 0) do
				{
					es_math mana - 35
					es_keysetvalue dndExtra server_var(es_steamid) flame 1
					es_tell server_var(es_userid) #green You divine fire is now active!
					es_keysetvalue dndExtra server_var(es_steamid) mana server_var(mana)
				}
				else do
				{
					es_tell server_var(es_userid) #green Your divine fire is already enabled!
				}
			}
		}
	}
}

block health
{
	es_setinfo es_userid 0
  	es_getcmduserid es_userid
	es_setinfo es_steamid 0
	es est_getsteam es_steamid server_var(es_userid)
	es_setinfo pcheck 0
	es_keygetvalue pcheck dndUsers server_var(es_steamid) prestige
	if (server_var(pcheck) = cpc1) do
	{
		es_setinfo plcheck 0
		es_keygetvalue plcheck dndUsers server_var(es_steamid) server_var(pcheck)
		es_setinfo lacheck 0
		es_keygetvalue lacheck dndUsers server_var(es_steamid) la
		es_math plcheck - server_var(lacheck)
		es_setinfo mana 0
		if (server_var(plcheck) >= 10) do
		{
			es_setinfo mana 0
			es_keygetvalue mana dndExtra server_var(es_steamid) mana
			es_setinfo caster_alive 0
			es est_isalive caster_alive server_var(es_userid)
			if (server_var(caster_alive) = 0) then es_setinfo mana 0
			if (server_var(mana) >= 40) do
			{
				es_setinfo hcheck 0
				es_keygetvalue hcheck dndExtra server_var(es_steamid) health
				if (server_var(hcheck) = 0) do
				{
					es_math mana - 40
					es_keysetvalue dndExtra server_var(es_steamid) health 1
					es_setinfo maxhealth 0
					es_keygetvalue maxhealth dndExtra server_var(es_steamid) maxhealth
					es_math maxhealth + 40
					es_keysetvalue dndExtra server_var(es_steamid) maxhealth server_var(maxhealth)
					es ma_givehealth server_var(es_userid) 40
					es_tell server_var(es_userid) #green You divine health is now active!
					es_keysetvalue dndExtra server_var(es_steamid) mana server_var(mana)
				}
				else do
				{
					es_tell server_var(es_userid) #green Your divine health is already enabled!
				}
			}
		}
	}
}

block armor
{
	es_setinfo es_userid 0
  	es_getcmduserid es_userid
	es_setinfo es_steamid 0
	es est_getsteam es_steamid server_var(es_userid)
	es_setinfo pcheck 0
	es_keygetvalue pcheck dndUsers server_var(es_steamid) prestige
	if (server_var(pcheck) = cpc1) do
	{
		es_setinfo plcheck 0
		es_keygetvalue plcheck dndUsers server_var(es_steamid) server_var(pcheck)
		es_setinfo lacheck 0
		es_keygetvalue lacheck dndUsers server_var(es_steamid) la
		es_math plcheck - server_var(lacheck)
		es_setinfo mana 0
		if (server_var(plcheck) >= 13) do
		{
			es_setinfo mana 0
			es_keygetvalue mana dndExtra server_var(es_steamid) mana
			es_setinfo caster_alive 0
			es est_isalive caster_alive server_var(es_userid)
			if (server_var(caster_alive) = 0) then es_setinfo mana 0
			if (server_var(mana) >= 45) do
			{
				es_setinfo acheck 0
				es_keygetvalue acheck dndExtra server_var(es_steamid) armor
				if (server_var(acheck) = 0) do
				{
					es_math mana - 45
					es_keysetvalue dndExtra server_var(es_steamid) armor 1
					es est_setarmor server_var(es_userid) 100
					es_tell server_var(es_userid) #green You divine armor is now active!
					es_keysetvalue dndExtra server_var(es_steamid) mana server_var(mana)
				}
				else do
				{
					es_tell server_var(es_userid) #green Your divine armor is already enabled!
				}
			}
		}
	}
}

block cpcaoeheal
{
	es_setinfo es_userid 0
  	es_getcmduserid es_userid
	es_setinfo es_steamid 0
	es est_getsteam es_steamid server_var(es_userid)
	es_setinfo pcheck 0
	es_keygetvalue pcheck dndUsers server_var(es_steamid) prestige
	if (server_var(pcheck) = cpc1) do
	{
		es_setinfo plcheck 0
		es_keygetvalue plcheck dndUsers server_var(es_steamid) server_var(pcheck)
		es_setinfo lacheck 0
		es_keygetvalue lacheck dndUsers server_var(es_steamid) la
		es_math plcheck - server_var(lacheck)
		es_setinfo mana 0
		if (server_var(plcheck) >= 15) do
		{
			es_setinfo mana 0
			es_keygetvalue mana dndExtra server_var(es_steamid) mana
			es_setinfo caster_alive 0
			es est_isalive caster_alive server_var(es_userid)
			if (server_var(caster_alive) = 0) then es_setinfo mana 0
			if (server_var(mana) >= 50) do
			{
				es_setinfo acheck 0
				es_keygetvalue acheck dndExtra server_var(es_steamid) arearegen
				if (server_var(acheck) = 0) do
				{
					es_math mana - 50
					es_delayed 4 es_keysetvalue dndExtra server_var(es_steamid) arearegen 1
					es_delayed 4 es arearegen server_var(es_userid) 4 10 460
					es_tell server_var(es_userid) #green You divine healing is now active!
					es_keysetvalue dndExtra server_var(es_steamid) mana server_var(mana)
				}
				else do
				{
					es_tell server_var(es_userid) #green Your divine healing is already enabled!
				}
			}
		}
	}
}

block cleric_say
{
	es_setinfo lcheck 0
	es_keygetvalue lcheck dndUsers event_var(es_steamid) cleric
	es_setinfo pcheck 0
	es_keygetvalue pcheck dndUsers event_var(es_steamid) prestige
	es_setinfo lacheck 0
	es_keygetvalue lacheck dndUsers event_var(es_steamid) la
	if (server_var(pcheck) = 0) do
	{
		es_math lcheck - server_var(lacheck)
	}
	if (server_var(lcheck) <= 0) do
	{
		es_doblock dnd/la_low
		es_math lcheck + server_var(lacheck)
	}
	if (server_var(pcheck) = cpc1) do
	{
		es_doblock dnd/cpc1_say
	}
	if (server_var(pcheck) = cpc2) do
	{
		es_doblock dnd/cpc2_say
	}
	if (server_var(pcheck) = cpc3) do
	{
		es_doblock dnd/cpc3_say
	}
	if (event_var(text) = !spells) then es_doblock dnd/cleric_spelllist
	if (event_var(text) = !mana) then es_doblock dnd/show_mana
	if (event_var(text) = !skills) do
	{
		es_setinfo clericskills " Cleric Skills:"
		es_format clericskills " Use !turn 4/round to hurt or destory undead.\n" server_var(clericskills)
		esnq ma_msay 0 event_var(userid) server_var(clericskills)
	}
}

block cpc1_say
{
	es_setinfo plcheck 0
	es_keygetvalue plcheck dndUsers event_var(es_steamid) cpc1
	es_setinfo lcheck 5
}

block cpc2_say
{
	es_setinfo plcheck 0
	es_keygetvalue plcheck dndUsers event_var(es_steamid) cpc2
	es_setinfo lcheck 10	
}

block cpc3_say
{
	es_setinfo plcheck 0
	es_keygetvalue plcheck dndUsers event_var(es_steamid) cpc3
	es_setinfo lcheck 15	
}

block cleric_spelllist
{
	es_setinfo lcheck 0
	es_keygetvalue lcheck dndUsers event_var(es_steamid) cleric
	es_setinfo lacheck 0
	es_keygetvalue lacheck dndUsers event_var(es_steamid) la
	es_math lcheck - server_var(lacheck)
	if (server_var(lcheck) <= 0) do
	{
		es_doblock dnd/la_low
		es_math lcheck + server_var(lacheck)
	}
	es_setinfo spelllist "Spells Known:\n"
	es_setinfo acheck 0
	es_keygetvalue acheck dndExtra event_var(es_steamid) algin
	if (server_var(acheck) = good) do
	{
		es_format spelllist "%1 Use !evil in chat to use evil spells.\n" server_var(spelllist)
		if (server_var(lcheck) >= 1) do
		{
			es_format spelllist "%1 !light - 5 Mana: Heal.\n" server_var(spelllist)
		}
		if (server_var(lcheck) >= 3) do
		{
			es_format spelllist "%1 !moderate - 10 Mana: Heal.\n" server_var(spelllist)
			es_format spelllist "%1 !stun - 10 Mana: Stun.\n" server_var(spelllist)
		}
		if (server_var(lcheck) >= 5) do
		{
			es_format spelllist "%1 !serious - 15 Mana: Heal.\n" server_var(spelllist)
		}
		if (server_var(lcheck) >= 7) do
		{
			es_format spelllist "%1 !critical - 20 Mana: Heal.\n" server_var(spelllist)
		}
		if (server_var(lcheck) >= 9) do
		{
			es_format spelllist "%1 !remove - 10 Mana: Heal and remove negitive effects from the person you are looking at.\n" server_var(spelllist)
		}
		if (server_var(lcheck) >= 11) do
		{
			es_format spelllist "%1 !purge - 15 Mana: Unblind everyone on your team.\n" server_var(spelllist)
		}
		if (server_var(lcheck) >= 13) do
		{
			es_format spelllist "%1 !res - 35 Mana: Restore Life.\n" server_var(spelllist)
		}
		if (server_var(lcheck) >= 15) do
		{
			es_format spelllist "%1 !storm - 20 Mana: Deal Damage.\n" server_var(spelllist)
		}
		if (server_var(lcheck) >= 17) do
		{
			es_format spelllist "%1 !astral - 20 Mana: Move Onto the Astral Plane.\n" server_var(spelllist)
		}
	}
	if (server_var(acheck) = evil) do
	{
		es_format spelllist "%1 Use !good in chat to use good spells.\n" server_var(spelllist)
		if (server_var(lcheck) >= 1) do
		{
			es_format spelllist "%1 !light - 5 Mana: Hurt.\n" server_var(spelllist)
		}
		if (server_var(lcheck) >= 3) do
		{
			es_format spelllist "%1 !moderate - 10 Mana: Hurt.\n" server_var(spelllist)
			es_format spelllist "%1 !stun - 10 Mana: Stun.\n" server_var(spelllist)
		}
		if (server_var(lcheck) >= 5) do
		{
			es_format spelllist "%1 !serious - 15 Mana: Hurt.\n" server_var(spelllist)
		}
		if (server_var(lcheck) >= 7) do
		{
			es_format spelllist "%1 !critical - 20 Mana: Hurt.\n" server_var(spelllist)
		}
		if (server_var(lcheck) >= 9) do
		{
			es_format spelllist "%1 !curse - 10 Mana: Point.\n" server_var(spelllist)
		}
		if (server_var(lcheck) >= 11) do
		{
			es_format spelllist "%1 !bane - 25 Mana: Point.\n" server_var(spelllist)
		}
		if (server_var(lcheck) >= 13) do
		{
			es_format spelllist "%1 !blasphemy - 25 Mana: Point.\n" server_var(spelllist)
		}
		if (server_var(lcheck) >= 15) do
		{
			es_format spelllist "%1 !storm - 20 Mana: Deal Damage.\n" server_var(spelllist)
		}
		if (server_var(lcheck) >= 17) do
		{
			es_format spelllist "%1 !astral - 20 Mana: Move Onto the Astral Plane.\n" server_var(spelllist)
		}
	}
	es_setinfo pcheck 0
	es_keygetvalue pcheck dndUsers event_var(es_steamid) prestige
	es_setinfo plcheck 0
	es_keygetvalue plcheck dndUsers event_var(es_steamid) server_var(pcheck)
	es_setinfo lacheck 0
	es_keygetvalue lacheck dndUsers event_var(es_steamid) la
	es_math plcheck - server_var(lacheck)
	es_setinfo mana 0
	if (server_var(lcheck) <= 0) do
	{
		es_doblock dnd/la_low
		es_math lcheck + server_var(lacheck)
	}
	if (server_var(pcheck) = cpc1) do
	{
		if (server_var(plcheck) >= 1) do
		{
			es_format spelllist "%1 !divine - 25 Mana: Bonus Dmg.\n" server_var(spelllist)
		}
		if (server_var(plcheck) >= 4) do
		{
			es_format spelllist "%1 !shield - 30 Mana: Gain DR.\n" server_var(spelllist)
		}
		if (server_var(plcheck) >= 7) do
		{
			es_format spelllist "%1 !flame - 35 Mana: Flaming Attack.\n" server_var(spelllist)
		}
		if (server_var(plcheck) >= 10) do
		{
			es_format spelllist "%1 !health - 40 Mana: Bonus Health.\n" server_var(spelllist)
		}
		if (server_var(plcheck) >= 13) do
		{
			es_format spelllist "%1 !armor - 45 Mana: Finit Armor.\n" server_var(spelllist)
		}
		if (server_var(plcheck) >= 15) do
		{
			es_format spelllist "%1 !healing - 50 Mana: AOE Healing.\n" server_var(spelllist)
		}
	}
	esnq ma_msay 0 event_var(userid) server_var(spelllist)
}

block cleric_death
{
	es_setinfo lcheck 0
	es_keygetvalue lcheck dndUsers event_var(es_steamid) cleric
}

block show_mana
{
	es_setinfo mana 0
	es_keygetvalue mana dndExtra event_var(es_steamid) mana 
	if (server_var(mana) > 0) do
	{
		es_tell event_var(userid) #green You have server_var(mana) mana left to cast spells with.
	}
	else do
	{
		es_tell event_var(userid) #green You have no mana left!
	}
}

event player_death
{
	es_keysetvalue dndExtra event_var(es_steamid) killing_spree 0
	es_keysetvalue dndExtra event_var(es_steamid) healing 0
	es_keysetvalue dndExtra event_var(es_steamid) mhealing 0
	es_keysetvalue dndExtra event_var(es_steamid) shealing 0
	es_keysetvalue dndExtra event_var(es_steamid) manaing 0
	es_keysetvalue dndExtra event_var(es_steamid) mmanaing 0
	es_keysetvalue dndExtra event_var(es_steamid) smanaing 0
	es_keysetvalue dndExtra event_var(es_steamid) totalpot 0
	es_keysetvalue dndExtra event_var(es_steamid) regen 0
	es_keysetvalue dndExtra event_var(es_steamid) arearegen 0
	es_keysetvalue dndExtra event_var(es_steamid) areadmg 0
	es_setinfo rcheck 0
	es_keygetvalue rcheck dndUsers event_var(es_steamid) race
	if (server_var(rcheck) = zombie) do
	{	
		es est_near bang #all 360 event_var(userid) "es point_hurt event_var(userid) server_var(bang) 35"
	}
	es_setinfo ks_counter 0
	es_keygetvalue ks_counter dndExtra event_var(es_attackersteamid) killing_spree
	es_setinfo bot_check 0
	es_isbot bot_check event_var(userid)
	if (server_var(bot_check) != 1) do
	{
		if (server_var(ks_counter) = 0) do
		{
			es_setinfo ks_counter 1
		}
		else do
		{
			es_math ks_counter + 1
		}
	}
	es_keysetvalue dndExtra event_var(es_attackersteamid) killing_spree server_var(ks_counter)
	es_setinfo ccheck 0
	es_keygetvalue ccheck dndUsers event_var(es_steamid) class
	es_setinfo attacker_check 0
	es_keygetvalue attacker_check dndUsers event_var(es_attackersteamid) class
	if (server_var(ccheck) = fighter) then es_doblock dnd/fighter_death
	if (server_var(ccheck) = rogue) then es_doblock dnd/rogue_death
	if (server_var(ccheck) = wizard) then es_doblock dnd/wizard_death
	if (server_var(ccheck) = cleric) then es_doblock dnd/cleric_death
	if (server_var(ccheck) = necromancer) then es_doblock dnd/necro_death
	if (server_var(attacker_check) = necromancer) then es_doblock dnd/necro_death_attacker
	es_setinfo x 0
	es_setinfo y 0
	es_setinfo z 0
	es_getplayerlocation x y z event_var(userid)
	es_keysetvalue dndExtra event_var(es_steamid) d_x server_var(x)
	es_keysetvalue dndExtra event_var(es_steamid) d_y server_var(y)
	es_keysetvalue dndExtra event_var(es_steamid) d_z server_var(z)
	es_setinfo xpcheck 0
	es_keygetvalue xpcheck dndUsers event_var(es_attackersteamid) curxp
	es_setinfo currentxp 0
	es_keygetvalue currentxp dndUsers event_var(es_attackersteamid) server_var(xpcheck)
	es_setinfo es_steamid 0
	es_setinfo es_steamid event_var(es_attackersteamid)
	es_setinfo userid 0
	es_setinfo userid event_var(attacker)
	es_setinfo attackerclass 0
	es_keygetvalue attackerclass dndUsers event_var(es_attackersteamid) class
	es_setinfo victimlevel 0
	es_setinfo attackerlevel 0
	es_keygetvalue victimlevel dndUsers event_var(es_steamid) server_var(ccheck)
	es_keygetvalue attackerlevel dndUsers event_var(es_attackersteamid) server_var(attackerclass)
	es_setinfo victimp 0
	es_setinfo attackerp 0
	es_keygetvalue victimp dndUsers event_var(es_steamid) prestige
	es_keygetvalue attackerp dndUsers event_var(es_attackersteamid) prestige
	if (server_var(victimp) != 0) do
	{
		es_setinfo vplevel 0
		es_keygetvalue vplevel dndUsers event_var(es_steamid) server_var(victimp)
		if (server_var(victimp) = fpc1) then es_setinfo victimlevel 5
		if (server_var(victimp) = rpc1) then es_setinfo victimlevel 5
		if (server_var(victimp) = cpc1) then es_setinfo victimlevel 5
		if (server_var(victimp) = wpc1) then es_setinfo victimlevel 5
		if (server_var(victimp) = fpc2) then es_setinfo victimlevel 10
		if (server_var(victimp) = rpc2) then es_setinfo victimlevel 10
		if (server_var(victimp) = cpc2) then es_setinfo victimlevel 10
		if (server_var(victimp) = wpc2) then es_setinfo victimlevel 10
		if (server_var(victimp) = fpc3) then es_setinfo victimlevel 15
		if (server_var(victimp) = rpc3) then es_setinfo victimlevel 15
		if (server_var(victimp) = cpc3) then es_setinfo victimlevel 15
		if (server_var(victimp) = wpc3) then es_setinfo victimlevel 15
		es_math victimlevel + server_var(vplevel)
	}
	if (server_var(attackerp) != 0) do
	{
		es_setinfo aplevel 0
		es_keygetvalue aplevel dndUsers event_var(es_attackersteamid) server_var(attackerp)
		if (server_var(attackerp) = fpc1) then es_setinfo attackerlevel 5
		if (server_var(attackerp) = rpc1) then es_setinfo attackerlevel 5
		if (server_var(attackerp) = cpc1) then es_setinfo attackerlevel 5
		if (server_var(attackerp) = wpc1) then es_setinfo attackerlevel 5
		if (server_var(attackerp) = fpc2) then es_setinfo attackerlevel 10
		if (server_var(attackerp) = rpc2) then es_setinfo attackerlevel 10
		if (server_var(attackerp) = cpc2) then es_setinfo attackerlevel 10
		if (server_var(attackerp) = wpc2) then es_setinfo attackerlevel 10
		if (server_var(attackerp) = fpc3) then es_setinfo attackerlevel 15
		if (server_var(attackerp) = rpc3) then es_setinfo attackerlevel 15
		if (server_var(attackerp) = cpc3) then es_setinfo attackerlevel 15
		if (server_var(attackerp) = wpc3) then es_setinfo attackerlevel 15
		es_math attackerlevel + server_var(aplevel)		
	}
	if (server_var(bot_check) = 1) do
	{
		es_setinfo victimlevel 0
	}
	es_setinfo rcheck 0
	es_keygetvalue rcheck dndUsers event_var(es_attackersteamid) race
	es_setinfo vicrcheck 0
	es_keygetvalue vicrcheck dndUsers event_var(es_steamid) race
	if (server_var(rcheck) = zombie) then es_setinfo attackerlevel 3
	if (server_var(rcheck) = ghoul) then es_setinfo attackerlevel 3
	if (server_var(rcheck) = tibbit) then es_setinfo attackerlevel 5
	if (server_var(rcheck) = filcher) then es_setinfo attackerlevel 7
	if (server_var(rcheck) = golem) then es_setinfo attackerlevel 9
	if (server_var(rcheck) = rok) then es_setinfo attackerlevel 11
	if (server_var(rcheck) = dragon) then es_setinfo attackerlevel 13
	if (server_var(rcheck) = waterele) then es_setinfo attackerlevel 15
	if (server_var(rcheck) = airele) then es_setinfo attackerlevel 15
	if (server_var(rcheck) = fireele) then es_setinfo attackerlevel 15
	if (server_var(rcheck) = earthele) then es_setinfo attackerlevel 15
	if (server_var(rcheck) = chaindevil) then es_setinfo attackerlevel 17
	if (server_var(rcheck) = gaint) then es_setinfo attackerlevel 19
	if (server_var(rcheck) = basilisk) then es_setinfo attackerlevel 21
	if (server_var(rcheck) = rabbit) then es_setinfo attackerlevel 23
	if (server_var(vicrcheck) = zombie) then es_setinfo victimlevel 3
	if (server_var(vicrcheck) = ghoul) then es_setinfo victimlevel 3
	if (server_var(vicrcheck) = tibbit) then es_setinfo victimlevel 5
	if (server_var(vicrcheck) = filcher) then es_setinfo victimlevel 7
	if (server_var(vicrcheck) = golem) then es_setinfo victimlevel 9
	if (server_var(vicrcheck) = rok) then es_setinfo victimlevel 11
	if (server_var(vicrcheck) = dragon) then es_setinfo victimlevel 13
	if (server_var(vicrcheck) = waterele) then es_setinfo victimlevel 15
	if (server_var(vicrcheck) = airele) then es_setinfo victimlevel 15
	if (server_var(vicrcheck) = fireele) then es_setinfo victimlevel 15
	if (server_var(vicrcheck) = earthele) then es_setinfo victimlevel 15
	if (server_var(vicrcheck) = chaindevil) then es_setinfo victimlevel 17
	if (server_var(vicrcheck) = gaint) then es_setinfo victimlevel 19
	if (server_var(vicrcheck) = basilisk) then es_setinfo victimlevel 21
	if (server_var(vicrcheck) = rabbit) then es_setinfo victimlevel 23
	if (event_var(weapon) != world) do
	{
		if (event_var(weapon) != worldspawn) do
		{
			if (event_var(es_userteam) != event_var(es_attackerteam)) do
			{
				es_math currentxp + server_var(killxp)
				es_tell event_var(attacker) #green You have gained server_var(killxp) experiance for killing event_var(es_username)
//				es_math currentxp + server_var(forthxp)
//				es_tell event_var(attacker) #lightgreen You have gained server_var(forthxp) bonus xp for scoring a kill on the 4th! Happy Holidays.
				if (event_var(headshot) = 1) do
				{
					es_math currentxp + server_var(headshotxp)
					es_tell event_var(attacker) #green You have gained server_var(headshotxp) bonus experiance for a headshot.
				}
				if (event_var(weapon) = knife) do
				{
					es_math currentxp + server_var(knifexp)
					es_tell event_var(attacker) #green You have gained server_var(knifexp) bonus experiance for knifing event_var(es_username).
				}
				if (event_var(weapon) = hegrenade) do
				{
					es_math currentxp + server_var(hexp)
					es_tell event_var(attacker) #green You have gained server_var(hexp) bonus experiance for blowing event_var(es_username) away with that grenade!
				}
				if (server_var(rcheck) = human) do
				{
					es_math currentxp + server_var(humbxp)
					es_tell event_var(attacker) #green You have gained server_var(humbxp) bonus experiance for scoring a kill as a human.
				}
				es_setinfo zcheck 0
				es_keygetvalue zcheck dndExtra event_var(es_attackersteamid) zombie
				if (server_var(zcheck) = 1) do
				{
					es_setinfo makersteam 0
					es_setinfo makeruser 0
					es_keygetvalue makersteam dndExtra event_var(es_attackersteamid) makersteam
					es_keygetvalue makeruser dndExtra event_var(es_attackersteamid) makeruser
					es_setinfo xpc 0
					es_keygetvalue xpc dndUsers server_var(makersteam) curxp
					es_setinfo cxp 0
					es_keygetvalue cxp dndUsers server_var(makersteam) server_var(xpc)
					es_math cxp + server_var(zombiexp)
					es_keysetvalue dndUsers server_var(makersteam) server_var(xpc) server_var(cxp)
					es_tell server_var(makeruser) #green You have gained server_var(zombiexp) bonux xp for one of your summons killing someone.
				}
				if (server_var(ks_counter) > 5) do
				{
					es_math ks_counter - 5
					es_math ks_counter * server_var(ks_xp)
					es_math currentxp + server_var(ks_counter)
					es_tell event_var(attacker) #green You have gained server_var(ks_counter) bonus experiance for having a killing spree!
				}
				if (server_var(victimlevel) > 30) then es_setinfo victimlevel 0
				if (server_var(victimlevel) > server_var(attackerlevel)) do
				{
					es_math victimlevel - server_var(attackerlevel)
					es_setinfo bonus_xp server_var(victimlevel)
					es_math bonus_xp * server_var(high_xp)
					es_math currentxp + server_var(bonus_xp)
					es_tell event_var(attacker) #green You have gained server_var(bonus_xp) bonus experiance for killing someone server_var(victimlevel) levels higher than yourself.
				}
			}
			else do
			{
				es_setinfo tkid event_var(es_attackersteamid)
				es_setinfo tkuser event_var(attacker)
				es popup send tkmenu event_var(userid)
			}
			if (server_var(currentxp) < 0) then es_setinfo currentxp 0
			es_keysetvalue dndUsers event_var(es_attackersteamid) server_var(xpcheck) server_var(currentxp)
			es_doblock dnd/class_level
		}
	}
}

block class_level
{
	es_setinfo ccheck 0
	es_keygetvalue ccheck dndUsers server_var(es_steamid) class
	es_setinfo lcheck 0
	es_keygetvalue lcheck dndUsers server_var(es_steamid) server_var(ccheck)
	es_setinfo xpcheck 0
	es_keygetvalue xpcheck dndUsers server_var(es_steamid) curxp
	es_setinfo currentxp 0
	es_keygetvalue currentxp dndUsers server_var(es_steamid) server_var(xpcheck)
	es_setinfo xpneeded 0
	es_setinfo xpneeded server_var(classlevel)
	es_math xpneeded * server_var(lcheck)
	es_setinfo mcheck 0
	es_keygetvalue mcheck dndUsers server_var(es_steamid) monster
	if (server_var(mcheck) = 1) do
	{
		es_setinfo xpneeded server_var(monster_levelxp)
		if (server_var(xpneeded) <= server_var(currentxp)) do
		{
			es_doblock dnd/bonus_point
		}
	}
	es_setinfo pcheck 0
	es_keygetvalue pcheck dndUsers server_var(es_steamid) prestige
	if (server_var(pcheck) = 0) do
	{
		if (server_var(ccheck) != 0) do
		{
			if (server_var(xpneeded) <= server_var(currentxp)) do
			{
				es_math lcheck + 1
				if (server_var(lcheck) <= 20) do
				{
					es_keysetvalue dndUsers server_var(es_steamid) server_var(xpcheck) 0
					es_keysetvalue dndUsers server_var(es_steamid) server_var(ccheck) server_var(lcheck)
					es_tell server_var(userid) #green You are now a level server_var(lcheck) server_var(ccheck)
				}
				else do
				{
					es_doblock dnd/bonus_point
				}
			}
		}
	}
	else do
	{
		es_setinfo plcheck 0
		es_keygetvalue plcheck dndUsers server_var(es_steamid) server_var(pcheck)
		es_setinfo pname 0
		if (server_var(pcheck) = fpc1) do
		{
			es_setinfo lcheck 5
			es_setinfo pname Gernadier
		}
		if (server_var(pcheck) = rpc1) do
		{
			es_setinfo lcheck 5
			es_setinfo pname Acrobat
		}
		if (server_var(pcheck) = wpc1) do
		{
			es_setinfo lcheck 5
			es_setinfo pname "War Mage"
		}
		if (server_var(pcheck) = cpc1) do
		{
			es_setinfo lcheck 5
			es_setinfo pname "War Priest"
		}
		if (server_var(pcheck) = fpc2) do
		{
			es_setinfo lcheck 10
			es_setinfo pname "Kensai"
		}
		if (server_var(pcheck) = rpc2) do
		{
			es_setinfo lcheck 10
			es_setinfo pname Assassin
		}
		if (server_var(pcheck) = wpc2) do
		{
			es_setinfo lcheck 10
			es_setinfo pname "Mage of Arcane Order"
		}
		if (server_var(pcheck) = cpc2) do
		{
			es_setinfo lcheck 10
			es_setinfo pname "Divine Oracle"
		}
		if (server_var(pcheck) = fpc3) do
		{
			es_setinfo lcheck 15
			es_setinfo pname "Exotic Weapons Master"
		}
		if (server_var(pcheck) = rpc3) do
		{
			es_setinfo lcheck 15
			es_setinfo pname "Shadow Dancer"
		}
		if (server_var(pcheck) = wpc3) do
		{
			es_setinfo lcheck 15
			es_setinfo pname "Arch Mage"
		}
		if (server_var(pcheck) = cpc3) do
		{
			es_setinfo lcheck 15
			es_setinfo pname Hierophant
		}
		es_setinfo lacheck 0
		es_keygetvalue lacheck dndUsers server_var(es_steamid) la
		es_setinfo xpneeded 0
		es_setinfo xpneeded server_var(plcheck)
		es_math xpneeded + server_var(lcheck)
		es_math xpneeded * server_var(prestigelevel)
		if (server_var(xpneeded) <= server_var(currentxp)) do
		{               
			if (server_var(plcheck) < 1) do
			{
				es_setinfo plcheck 1
			}
			else do
			{
				es_math plcheck + 1
			}
			if (server_var(plcheck) <= 5) do
			{
				es_keysetvalue dndUsers server_var(es_steamid) server_var(xpcheck) 0
				es_keysetvalue dndUsers server_var(es_steamid) server_var(pcheck) server_var(plcheck)
				es_tell server_var(userid) #green You are now a level server_var(plcheck) server_var(pname)
			}
			if (server_var(plcheck) >= 6) do
			{
				if (server_var(plcheck) <= 10) do
				{
					if (server_var(pcheck) != fpc3) do
					{
						if (server_var(pcheck) != rpc3) do
						{
							if (server_var(pcheck) != wpc3) do
							{
								if (server_var(pcheck) != cpc3) do
								{
									es_keysetvalue dndUsers server_var(es_steamid) server_var(xpcheck) 0
									es_keysetvalue dndUsers server_var(es_steamid) server_var(pcheck) server_var(plcheck)
									es_tell server_var(userid) #green You are now a level server_var(plcheck) server_var(pname)
								}
								else do
								{
									es_doblock dnd/bonus_point
								}
							}
							else do
							{
								es_doblock dnd/bonus_point
							}
						}
						else do
						{
							es_doblock dnd/bonus_point
						}
					}
					else do
					{
						es_doblock dnd/bonus_point
					}
				}
			}
			if (server_var(plcheck) >= 11) do
			{
				if (server_var(plcheck) <= 15) do
				{
					if (server_var(pcheck) != fpc2) do
					{
						if (server_var(pcheck) != rpc2) do
						{
							if (server_var(pcheck) != wpc2) do
							{
								if (server_var(pcheck) != cpc2) do
								{
									es_keysetvalue dndUsers server_var(es_steamid) server_var(xpcheck) 0
									es_keysetvalue dndUsers server_var(es_steamid) server_var(pcheck) server_var(plcheck)
									es_tell server_var(userid) #green You are now a level server_var(plcheck) server_var(pname)
								}
								else do
								{
									es_doblock dnd/bonus_point
								}
							}
							else do
							{
								es_doblock dnd/bonus_point
							}
						}
						else do
						{
							es_doblock dnd/bonus_point
						}
					}
					else do
					{
						es_doblock dnd/bonus_point
					}
				}
			}
			if (server_var(plcheck) >= 16) do
			{
				es_doblock dnd/bonus_point
			}
		}
	}
}

block bonus_point
{
	es_setinfo bonus_check 0
	es_keygetvalue bonus_check dndUsers server_var(es_steamid) bonus
	if (server_var(bonus_check) >= 1) do
	{
		es_math bonus_check + 1
	}
	if (server_var(bonus_check) = 0) do
	{
		es_setinfo bonus_check 1
	}
	es_keysetvalue dndUsers server_var(es_steamid) server_var(xpcheck) 0
	es_keysetvalue dndUsers server_var(es_steamid) bonus server_var(bonus_check)
	es_tell server_var(userid) #green You now have server_var(bonus_check) bonus points for monster races!
}



event round_start
{
	es_setinfo zombie_start 1
	es_setinfo buy_end 1
	es_delayed 23 es_setinfo buy_end 0
	es_setinfo tele_allow 0
	es_delayed 22 es_setinfo tele_allow 1
	es_setinfo player 0
	est_loop player #all "es starthealth server_var(player)"
	es_setinfo player 0
}

block starthealth
{
	es_setinfo dnd_shruserid 0
	
	es_setinfo targetid 0

  	es_getargv dnd_shruserid 1
  	
	es_setinfo bonus 0
	es_setinfo pen 0
	es_setinfo shsteam 0
	es est_getsteam shsteam server_var(dnd_shruserid)
	
	es_keygetvalue bonus dndExtra server_var(shsteam) bhealth
	es_keygetvalue pen dndExtra server_var(shsteam) nhealth
	
	es ma_givehealth server_var(dnd_shruserid) server_var(bonus)
	es ma_takehealth server_var(dnd_shruserid) server_var(pen)
	es_setinfo phealth 0
	es est_gethealth phealth server_var(dnd_shruserid)
	
	es_keysetvalue dndExtra server_var(shsteam) maxhealth server_var(phealth)
}


block resethealth
{
	es_setinfo dnd_rhuserid 0

  	es_getargv dnd_rhuserid 1
	
	es_setinfo rhsteam 0
	es est_getsteam rhsteam server_var(dnd_rhuserid)
	
	es_keysetvalue dndExtra server_var(rhsteam) bhealth 0
	es_keysetvalue dndExtra server_var(rhsteam) nhealth 0
}

block fortsave
{
	es_setinfo fbonus 0
	es_setinfo fclass 0
	es_keygetvalue fclass dndUsers event_var(es_steamid) class
	es_setinfo flevel 0
	es_keygetvalue flevel dndUsers event_var(es_steamid) server_var(fclass)
	es_setinfo fpcheck 0
	es_keygetvalue fpcheck dndUsers event_var(es_steamid) prestige
	es_setinfo frcheck 0
	es_keygetvalue frcheck dndUsers event_var(es_steamid) race
	es_setinfo mmcheck 0
	es_keygetvalue mmcheck dndUsers event_var(es_steamid) monster
	if (server_var(mmcheck) = 1) do
	{
		es_setinfo fbonus 12
	}
	if (server_var(fpcheck) != 0) do
	{
		es_setinfo fplcheck 0
		es_keygetvalue fplcheck dndUsers event_var(es_steamid) server_var(fpcheck)
		es_math flevel + server_var(fplcheck)
	}		
	if (server_var(fclass) = fighter) do
	{
		es_setinfo fbonus server_var(flevel)
		es_math fbonus / 2
		es_math fbonus + 2 
	}
	if (server_var(fclass) = paladin) do
	{
		es_setinfo fbonus server_var(flevel)
		es_math fbonus / 2
		es_math fbonus + 2 
	}
	if (server_var(fclass) = cleric) do
	{
		es_setinfo fbonus server_var(flevel)
		es_math fbonus / 2
		es_math fbonus + 2
	}
	if (server_var(fclass) = rogue) do
	{
		es_setinfo fbonus server_var(flevel)
		es_math fbonus / 5
		es_math fbonus + 2
	}
	if (server_var(fclass) = wizard) do
	{
		es_setinfo fbonus server_var(flevel)
		es_math fbonus / 5
		es_math fbonus + 2
	}
	if (server_var(fclass) = ranger) do
	{
		es_setinfo fbonus server_var(flevel)
		es_math fbonus / 2
		es_math fbonus + 2
	}
	if (server_var(fclass) = necromancer) do
	{
		es_setinfo fbonus server_var(flevel)
		es_math fbonus / 5
		es_math fbonus + 2
	}
	if (server_var(fclass) = bard) do
	{
		es_setinfo fbonus server_var(flevel)
		es_math fbonus / 5
		es_math fbonus + 2
	}
	if (server_var(fclass) = monk) do
	{
		es_setinfo fbonus server_var(flevel)
		es_math fbonus + 2
	}
	if (server_var(frcheck) = elf) do
	{
		es_math fbonus - 1
	}
	if (server_var(frcheck) = greyelf) do
	{
		es_math fbonus - 1
	}
	if (server_var(frcheck) = drow) do
	{
		es_math fbonus - 1
	}
	if (server_var(frcheck) = kobold) do
	{
		es_math fbonus - 1
	}
	if (server_var(frcheck) = minotaur) do
	{
		es_math fbonus + 2
	}
	if (server_var(frcheck) = doppelganger) do
	{
		es_math fbonus + 1
	}
	if (server_var(frcheck) = troll) do
	{
		es_math fbonus + 6
	}
	if (server_var(frcheck) = avariel) do
	{
		es_math fbonus - 1
	}
	if (server_var(frcheck) = zombie) do
	{
		es_setinfo fbonus 0
	}
	if (server_var(frcheck) = ghoul) do
	{
		es_setinfo fbonus 0
	}
	es_keysetvalue dndExtra event_var(es_steamid) fortsave server_var(fbonus)
	
}
block willsave
{	
	es_setinfo wbonus 0	
	es_setinfo wclass 0
	es_keygetvalue wclass dndUsers event_var(es_steamid) class
	es_setinfo wlevel 0
	es_keygetvalue wlevel dndUsers event_var(es_steamid) server_var(wclass)
	es_setinfo wpcheck 0
	es_keygetvalue wpcheck dndUsers event_var(es_steamid) prestige
	es_setinfo wrcheck 0
	es_keygetvalue wrcheck dndUsers event_var(es_steamid) race
	es_setinfo mmcheck 0
	es_keygetvalue mmcheck dndUsers event_var(es_steamid) monster
	if (server_var(mmcheck) = 1) do
	{
		es_setinfo wbonus 12
	}
	if (server_var(wpcheck) != 0) do
	{
		es_setinfo wplcheck 0
		es_keygetvalue wplcheck dndUsers event_var(es_steamid) server_var(wpcheck)
		es_math wlevel + server_var(wplcheck)
	}
	if (server_var(wclass) = fighter) do
	{
		es_setinfo wbonus server_var(wlevel)
		es_math wbonus / 5
		es_math wbonus + 2 
	}
	if (server_var(wclass) = paladin) do
	{
		es_setinfo wbonus server_var(wlevel)
		es_math wbonus / 5
		es_math wbonus + 2 
	}
	if (server_var(wclass) = cleric) do
	{
		es_setinfo wbonus server_var(wlevel)
		es_math wbonus / 2
		es_math wbonus + 2
	}
	if (server_var(wclass) = rogue) do
	{
		es_setinfo wbonus server_var(wlevel)
		es_math wbonus / 5
		es_math wbonus + 2
	}
	if (server_var(wclass) = wizard) do
	{
		es_setinfo wbonus server_var(wlevel)
		es_math wbonus / 2
		es_math wbonus + 2
	}
	if (server_var(wclass) = ranger) do
	{
		es_setinfo wbonus server_var(wlevel)
		es_math wbonus / 5
		es_math wbonus + 2
	}
	if (server_var(wclass) = necromancer) do
	{
		es_setinfo wbonus server_var(wlevel)
		es_math wbonus / 2
		es_math wbonus + 2
	}
	if (server_var(wclass) = bard) do
	{
		es_setinfo wbonus server_var(wlevel)
		es_math wbonus / 2
		es_math wbonus + 2
	}
	if (server_var(wclass) = monk) do
	{
		es_setinfo wbonus server_var(wlevel)
		es_math wbonus + 2
	}
	if (server_var(wrcheck) = Aasimar) do
	{
		es_math wbonus + 1
	}
	if (server_var(wrcheck) = doppelganger) do
	{
		es_math wbonus + 2
	}
	if (server_var(wrcheck) = vampire) do
	{
		es_math wbonus + 1
	}
	if (server_var(wrcheck) = orc) do
	{
		es_math wbonus + 1
	}
	if (server_var(wrcheck) = drow) do
	{
		es_math wbonus + 2
	}
	if (server_var(wrcheck) = zombie) do
	{
		es_setinfo wbonus 0
	}
	if (server_var(wrcheck) = ghoul) do
	{
		es_setinfo wbonus 0
	}
	es_keysetvalue dndExtra event_var(es_steamid) willsave server_var(wbonus)

}

block reflexsave
{
	es_setinfo rbonus 0
	es_setinfo rclass 0
	es_keygetvalue rclass dndUsers event_var(es_steamid) class
	es_setinfo rlevel 0
	es_keygetvalue rlevel dndUsers event_var(es_steamid) server_var(rclass)
	es_setinfo rpcheck 0
	es_keygetvalue rpcheck dndUsers event_var(es_steamid) prestige
	es_setinfo rrcheck 0
	es_keygetvalue rrcheck dndUsers event_var(es_steamid) race
	es_setinfo mmcheck 0
	es_keygetvalue mmcheck dndUsers event_var(es_steamid) monster
	if (server_var(mmcheck) = 1) do
	{
		es_setinfo rbonus 12
	}
	if (server_var(rpcheck) != 0) do
	{
		es_setinfo rplcheck 0
		es_keygetvalue rplcheck dndUsers event_var(es_steamid) server_var(rpcheck)
		es_math rlevel + server_var(rplcheck)
	}
	if (server_var(rclass) = fighter) do
	{
		es_setinfo rbonus server_var(rlevel)
		es_math rbonus / 5
		es_math rbonus + 2 
	}
	if (server_var(rclass) = paladin) do
	{
		es_setinfo rbonus server_var(rlevel)
		es_math rbonus / 5
		es_math rbonus + 2 
	}
	if (server_var(rclass) = cleric) do
	{
		es_setinfo rbonus server_var(rlevel)
		es_math rbonus / 5
		es_math rbonus + 2
	}
	if (server_var(rclass) = rogue) do
	{
		es_setinfo rbonus server_var(rlevel)
		es_math rbonus / 2
		es_math rbonus + 2
	}
	if (server_var(rclass) = bard) do
	{
		es_setinfo rbonus server_var(rlevel)
		es_math rbonus / 2
		es_math rbonus + 2
	}
	if (server_var(rclass) = wizard) do
	{
		es_setinfo rbonus server_var(rlevel)
		es_math rbonus / 5
		es_math rbonus + 2
	}
	if (server_var(rclass) = ranger) do
	{
		es_setinfo rbonus server_var(rlevel)
		es_math rbonus / 2
		es_math rbonus + 2
	}
	if (server_var(rclass) = necromancer) do
	{
		es_setinfo rbonus server_var(rlevel)
		es_math rbonus / 5
		es_math rbonus + 2
	}
	if (server_var(rclass) = monk) do
	{
		es_setinfo rbonus server_var(rlevel)
		es_math rbonus + 2
	}
	if (server_var(rrcheck) = Tiefling) do
	{
		es_math rbonus + 1
	}
	if (server_var(rrcheck) = elf) do
	{
		es_math rbonus + 1
	}
	if (server_var(rrcheck) = greyelf) do
	{
		es_math rbonus + 1
	}
	if (server_var(rrcheck) = kobold) do
	{
		es_math rbonus + 1
	}
	if (server_var(rrcheck) = drow) do
	{
		es_math rbonus + 1
	}
	if (server_var(rrcheck) = doppelganger) do
	{
		es_math rbonus + 1
	}
	if (server_var(rrcheck) = troll) do
	{
		es_math rbonus + 2
	}
	if (server_var(rrcheck) = vampire) do
	{
		es_math rbonus + 2
	}
	if (server_var(rrcheck) = avariel) do
	{
		es_math rbonus + 2
	}
	if (server_var(rrcheck) = zombie) do
	{
		es_setinfo rbonus 0
	}
	if (server_var(rrcheck) = ghoul) do
	{
		es_setinfo rbonus 0
	}
	es_keysetvalue dndExtra event_var(es_steamid) reflexsave server_var(rbonus)
}