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

block load
{
    es_load keymenu
    
	echo Loading Dungeons and Dragons Counter-Strike Source Mod
	es_xset dnd v1.20
	es_xmakepublic dnd
	es_set 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


    es_xset exists 0
    
// Playerinfo
    es_regclientcmd !playerinfo dnd/playerinfo "gets a playerinfo 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 !mass dnd/mass "casts mass invisibility"
	es_regclientcmd !freeze dnd/freeze "casts freeze"
	es_regclientcmd !god dnd/god "casts god"
    es_exists exists command makeinvis
  	if (server_var(exists) = 0) then es_regcmd makeinvis dnd/makeinvis "makeinvis - usage: makeinvis <userid>"
//Necromancer Spells
	es_regclientcmd !burn dnd/aoefire "casts fire"
	es_regclientcmd !zombie dnd/zombie "turn an ally into a zombie"
	es_regclientcmd !slap dnd/slap "slap ur target"
    es_regclientcmd !rebuke dnd/rebuke "rebuke undead"
    
	
    
    
	es_exists exists command zombiekill
  	if (server_var(exists) = 0) then es_regcmd zombiekill dnd/zombiekill "zombiekill - usage: zombiekill <userid> <necroid>"

//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_exists exists command test_stealth
	if (server_var(exists) = 0) then es_regcmd test_stealth dnd/test_stealth "test_stealth - usage: test_stealth <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 !stealth dnd/stealth "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>"
	es_exists exists command mcudnd
	if (server_var(exists) = 0) then es_regcmd mcudnd dnd/menuclean "mcudnd - usage: mcudnd <userid>"
	echo Load Finished... Dungeons and Dragons CSS Running
}
event round_end
{
	if (event_var(winner) = 2) do 
	{
		foreach player winner #t "es win_xp server_var(winner)"
	}
	if (event_var(winner) = 3) do
	{
		foreach player winner #ct "es win_xp server_var(winner)"
	}
	foreach player 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_set zombie_start 0
}

block win_xp
{
	
	es_set dnd_wtuserid 0
	
	

  	es_getargv dnd_wtuserid 1
	es_set wtsteam 0
	es est_getsteam wtsteam server_var(dnd_wtuserid)
	es_set xpcheck 0
	es_keygetvalue xpcheck dndUsers server_var(wtsteam) curxp
	es_set 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) #multi#green You have gained #lightgreenserver_var(rnd_xp) xp #greenfor your team winning the round.
}

event bomb_defused
{
	es_set es_steamid 0
	es_set es_steamid event_var(es_steamid)
	es_set userid 0
	es_set userid event_var(userid)
	es_set xpcheck 0
	es_keygetvalue xpcheck dndUsers event_var(es_steamid) curxp
	es_set currentxp 0
	es_keygetvalue currentxp dndUsers event_var(es_steamid) server_var(xpcheck)
	es_math currentxp + server_var(bombxp)
	es_set 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) #multi#green You have gained #lightgreenserver_var(bombxp) xp #greenfor defusing the bomb.
		es_doblock dnd/class_level
	}
}

event bomb_planted
{
	es_set es_steamid 0
	es_set es_steamid event_var(es_steamid)
	es_set userid 0
	es_set userid event_var(userid)
	es_set xpcheck 0
	es_keygetvalue xpcheck dndUsers event_var(es_steamid) curxp
	es_set currentxp 0
	es_keygetvalue currentxp dndUsers event_var(es_steamid) server_var(xpcheck)
	es_math currentxp + server_var(bombxp)
	es_set 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) #multi#green You have gained #lightgreenserver_var(bombxp) xp #greenfor planting the bomb.
		es_doblock dnd/class_level
	}
}

event bomb_exploded
{
	es_set es_steamid 0
	es_set es_steamid event_var(es_steamid)
	es_set userid 0
	es_set userid event_var(userid)
	es_set xpcheck 0
	es_keygetvalue xpcheck dndUsers event_var(es_steamid) curxp
	es_set currentxp 0
	es_keygetvalue currentxp dndUsers event_var(es_steamid) server_var(xpcheck)
	es_math currentxp + server_var(bombxp)
	es_set 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) #multi#green You have gained #lightgreenserver_var(bombexxp) xp #greenfor the bomb exploding.
		es_doblock dnd/class_level
	}
}

event hostage_rescued
{
	es_set es_steamid 0
	es_set es_steamid event_var(es_steamid)
	es_set userid 0
	es_set userid event_var(userid)
	es_set xpcheck 0
	es_keygetvalue xpcheck dndUsers event_var(es_steamid) curxp
	es_set currentxp 0
	es_keygetvalue currentxp dndUsers event_var(es_steamid) server_var(xpcheck)
	es_math currentxp + server_var(hostagexp)
	es_set 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) #multi#green You have gained #lightgreenserver_var(hostagexp) xp #greenfor rescuing the hostage.
		es_doblock dnd/class_level
	}
}

event server
{
	es_keygroupdelete dndExtra
	es_keygroupcreate dndExtra
}

block config
{
	es_xset killxp 80
	es_xset headshotxp 60
	es_xset knifexp 150
	es_xset bombxp 70
    es_xset bombexxp 50
	es_xset hostagexp 40
	es_xset hexp 80
	es_xset tkpenxp 300
	es_xset classlevel 1000
	es_xset prestigelevel 1250
	es_xset humbxp 55
	es_xset zombiexp 150
	es_xset ks_xp 15
	es_xset high_xp 15
	es_xset rnd_xp 35
	es_xset monster_levelxp 30000
}

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 "-> 9. Mod Help!!"
	popup submenu mainmenu 9 modhelp
	popup addline mainmenu " 0. Exit"
	popup menuselect mainmenu dnd/main_choice

	popup create modhelp
	popup addline modhelp " New to DND Mod? Here's some helpful hints!"
	popup addline modhelp "-> 1. What Class and Race combo??"
	popup submenu modhelp 1 classhelp
	popup addline modhelp "-> 2. How to Bind Spells??"
	popup submenu modhelp 2 spellbind
	popup addline modhelp "-> 3. How to Unlock Other Classes"
	popup submenu modhelp 3 unlock
	popup addline modhelp "-> 4. Bonus Points?? WTF!!"
	popup submenu modhelp 4 wtf
	popup addline modhelp "-> 9. Back to Main Menu"
	popup submenu modhelp 9 mainmenu
	popup addline modhelp " 0. Exit"

	popup create classhelp
	popup addline classhelp " The begining 4 classes are Fighter, Wizard Cleric and Rogue"
	popup addline classhelp " Fighter is a head-on race, added damage and"
	popup addline classhelp " health each level. Best race would be Human"
	popup addline classhelp " or Orc: human for the extra exp and orc for extra damage"
	popup addline classhelp " "
	popup addline classhelp " Wizard is a pure spell caster with limited guns"
	popup addline classhelp " So Elf would be great (for the m4a1, ak and scout)"
	popup addline classhelp " "
	popup addline classhelp " Cleric is the Healer of the bunch with a few other spells"
	popup addline classhelp " !evil makes the heals do damage rather than heal. !good"
	popup addline classhelp " turns it back into a heal spell. Use elf for guns"
	popup addline classhelp "->8. Mod Menu"
	popup submenu classhelp 8 modhelp
	popup addline classhelp "-> 9. Next Page"
	popup submenu classhelp 9 nextpage
	popup addline classhelp " 0. Exit"

	popup create nextpage
	popup addline nextpage " The Rogue is a great class. Stealth, crit, stun,"
	popup addline nextpage " the spell deathattack. Elf is used mostly by them"
	popup addline nextpage " for the -10 from color (lower the color the better,"
	popup addline nextpage " 15\255 being the best) and the usage of guns"
	popup addline nextpage " "
	popup addline nextpage " All in all, Elf Rogue is usually the easiest to"
	popup addline nextpage " level up and learn the mod with. But feel free to"
	popup addline nextpage " pick and choose the races. !menu 5 1 1 takes you to"
	popup addline nextpage " the race info page. Read up on the races and chose what"
	popup addline nextpage " what you want"
	popup addline nextpage "->8. Mod Menu"
	popup submenu nextpage 8 modhelp
	popup addline nextpage "-> 9. Previous Page"
	popup submenu nextpage 9 classhelp
	popup addline nextpage " 0. Exit"

	popup create spellbind
	popup addline spellbind " How to bind"
	popup addline spellbind " "
	popup addline spellbind " Spells"
	popup addline spellbind " type bind <key> !spellname"
	popup addline spellbind " in console, then either look straight down or target"
	popup addline spellbind " the player to use the spell (excluding ressurect)"
	popup addline spellbind " "
	popup addline spellbind " Menu"
	popup addline spellbind " bind key ''say !menu''"
	popup addline spellbind "-> 9. Mod Help"
	popup submenu spellbind 9 modhelp
	popup addline spellbind " 0. Exit"

	popup create unlock
	popup addline unlock " How to Unlock Classes!"
	popup addline unlock " "
	popup addline unlock " Ranger - 9 fighter 5 rogue"
	popup addline unlock " Paladin - 7 fighter 7 cleric"
	popup addline unlock " Monk - 11 paladin 7 rogue"
	popup addline unlock " Necromancer - 11 cleric 11 wizard"
	popup addline unlock " Bard - 7 fighter 11 wizard 11 cleric 7 rogue .."
	popup addline unlock " 7 ranger 11 paladin 7 monk 7 necromancer"
	popup addline unlock " -> 9. Mod Help"
	popup submenu unlock 9 modhelp
	popup addline unlock " 0. Exit"

	popup create wtf
	popup addline wtf " Bonus Points are attainable by the following methods:"
	popup addline wtf " Level a class to level 20, then every 20k exp you achieve"
	popup addline wtf " while on that class, you are rewarded with 1 bonus point"
	popup addline wtf " OR"
	popup addline wtf " Level monster races for 30k exp. Every monster race including"
	popup addline wtf " Zombies or Ghouls share the same exp"
	popup addline wtf " -> 9. Mod Help"
	popup submenu wtf 9 modhelp
	popup addline wtf " 0. Exit"

	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 9 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 (9001 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 "-> 5. Player Info"
	popup addline infomenu "-> 9. Back to Main Menu"
	popup submenu infomenu 9 mainmenu
	popup addline infomenu " 0. Exit"
    popup menuselect infomenu dnd/infomenuselect

	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 !stealth"
	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: 9001"
	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."
    popup addline cmdinfochoice "!playerinfo - Displays what other players are using."
	
	popup create zombieyesno
	popup addline zombieyesno "Would you like to come back as a Zombie"
	popup addline zombieyesno "-> 1. Yes"
	popup addline zombieyesno "-> 2. No"
	popup menuselect zombieyesno dnd/zyesno
	
	popup create ghoulyesno
	popup addline ghoulyesno "Would you like to come back as a Ghoul"
	popup addline ghoulyesno "-> 1. Yes"
	popup addline ghoulyesno "-> 2. No"
	popup menuselect ghoulyesno dnd/gyesno
}
// to stop pending with menu's
block menuclean
{
	es_set mcudndid 0
	es_getargv mcudndid 1
	
	es popup close mainmenu server_var(mcudndid)
	es popup unsendname mainmenu server_var(mcudndid)
	es popup close modhelp server_var(mcudndid)
	es popup unsendname modhelp server_var(mcudndid)
	es popup close classhelp server_var(mcudndid) 
	es popup unsendname classhelp server_var(mcudndid)
	es popup close shopmenu server_var(mcudndid)
	es popup unsendname shopmenu server_var(mcudndid)
	es popup close racemenu server_var(mcudndid)
	es popup unsendname racemenu server_var(mcudndid)
	es popup close lamenu server_var(mcudndid)
	es popup unsendname lamenu server_var(mcudndid)
	es popup close mrace server_var(mcudndid)
	es popup unsendname mrace server_var(mcudndid)
	es popup close mraces server_var(mcudndid)
	es popup unsendname mraces server_var(mcudndid)
	es popup close infomenu server_var(mcudndid)
	es popup unsendname infomenu server_var(mcudndid)
	es popup close potioninfo server_var(mcudndid)
	es popup unsendname potioninfo server_var(mcudndid)
	es popup close rchoice server_var(mcudndid)
	es popup unsendname rchoice server_var(mcudndid)
	es popup close rinfochoice server_var(mcudndid)
	es popup unsendname rinfochoice server_var(mcudndid)
	es popup close raceinfo server_var(mcudndid)
	es popup unsendname raceinfo server_var(mcudndid)
	es popup close lainfo server_var(mcudndid)
	es popup unsendname lainfo server_var(mcudndid)
	es popup close minfo server_var(mcudndid)
	es popup unsendname minfo server_var(mcudndid)
	es popup close minfo2 server_var(mcudndid)
	es popup unsendname minfo2 server_var(mcudndid)
	es popup close zombieghoul server_var(mcudndid)
	es popup unsendname zombieghoul server_var(mcudndid)
	es popup close zombieyesno server_var(mcudndid)
	es popup unsendname zombieyesno server_var(mcudndid)
	es popup close dawnyesno server_var(mcudndid)
	es popup unsendname dawnyesno server_var(mcudndid)
	es popup close ghoulyesno server_var(mcudndid)
	es popup unsendname ghoulyesno server_var(mcudndid)
	es popup close classmenu server_var(mcudndid)
	es popup unsendname classmenu server_var(mcudndid)
	es popup close classmenu2 server_var(mcudndid)
	es popup unsendname classmenu2 server_var(mcudndid)
	es popup close prestigemenu server_var(mcudndid)
	es popup unsendname prestigemenu server_var(mcudndid)
	es popup close zombiemenu server_var(mcudndid)
	es popup unsendname zombiemenu server_var(mcudndid)
	es popup close resmenu server_var(mcudndid)
	es popup unsendname resmenu server_var(mcudndid)
	es popup close reschoice server_var(mcudndid)
	es popup unsendname reschoice server_var(mcudndid)
	es popup close kensaiweapons server_var(mcudndid)
	es popup unsendname kensaiweapons server_var(mcudndid)
	es popup close tkmenu server_var(mcudndid)
	es popup unsendname tkmenu server_var(mcudndid)
}

block potion_choice
{
	es_set shopsteam 0
	es est_getsteam shopsteam server_var(_popup_userid)
	es_set 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_set healpot_count 0
				es_set 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_set 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_set 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_set manapot_count 0
				es_set 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_set 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_set 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_set healpot_count 0
				es_set 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_set 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_set 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_set manapot_count 0
				es_set 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_set 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_set 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_set healpot_count 0
				es_set 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_set 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_set 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_set manapot_count 0
				es_set 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_set 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_set 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 zyesno
{
	es_set zreserid 0
	es_set zreserst 0
	es_set zresern 0
	es_set zpst 0
	es_set zpn 0
	es est_getsteam zpst server_var(_popup_userid)
	es_keygetvalue zreserid dndExtra server_var(zpst) zreser
	es est_getsteam zreserst server_var(zreserid)
	es est_getname zpn server_var(zpst)
	if (server_var(_popup_choice) = 1) do
	{
		es_set alivez 0
		es est_isalive alivez server_var(_popup_userid)
		if (server_var(alivez) = 0) do
		{
			es_set alive 0
			es est_isalive alive server_var(zreserid)
			if (server_var(alive) = 1) do
			{
				es_set race 0
				es_keygetvalue race dndUsers server_var(zpst) race
				if (server_var(race) != zombie) do
				{	
					if (server_var(race) != Ghoul) do
					{
						es_set x 0
						es_set y 0
						es_set z 0
						es_keygetvalue x dndExtra server_var(zpst) d_x
						es_keygetvalue y dndExtra server_var(zpst) d_y
						es_keygetvalue z dndExtra server_var(zpst) d_z
						
						es_set class 0
						es_set prestige 0
						es_set monster 0
						es_set curxp 0
						es_set la 0
						es_set race 0
						es_keygetvalue la dndUsers server_var(zpst) la
						es_keygetvalue curxp dndUsers server_var(zpst) curxp
						es_keygetvalue race dndUsers server_var(zpst) race
						es_keygetvalue class dndUsers server_var(zpst) class
						es_keygetvalue prestige dndUsers server_var(zpst) prestige
						es_keygetvalue monster dndUsers server_var(zpst) monster
						if (server_var(race) != zombie) do
						{	
							if (server_var(race) != Ghoul) do
							{
								es_keysetvalue dndExtra server_var(zpst) la server_var(la)
								es_keysetvalue dndExtra server_var(zpst) curxp server_var(curxp)
								es_keysetvalue dndExtra server_var(zpst) race server_var(race)
								es_keysetvalue dndExtra server_var(zpst) class server_var(class)
								es_keysetvalue dndExtra server_var(zpst) prestige server_var(prestige)
								es_keysetvalue dndExtra server_var(zpst) monster server_var(monster)
								es_keysetvalue dndExtra server_var(zpst) makersteam server_var(zreserst)
								es_keysetvalue dndExtra server_var(zpst) makeruser server_var(zreserid)
							}
						}
						es_keysetvalue dndExtra server_var(zpst) zombie 1
						es_keysetvalue dndUsers server_var(zpst) race zombie
						es_keysetvalue dndUsers server_var(zpst) monster 1
						
						es_set mana 0
						es_keygetvalue mana dndExtra server_var(zreserst) mana
						es_math mana - 25
						es_keysetvalue dndExtra server_var(zreserst) mana server_var(mana)
						es_tell server_var(zreserid) #green You have rasied server_var(zpn) as a zombie to fight for you!
						es est_getname zresern server_var(zreserst)
						es_tell server_var(_popup_userid) #lightgreen server_var(zresern) Has turned you into a zombie!!! You die after being hit 35 times!
						es est_spawn server_var(_popup_userid)
						es ma_teleport server_var(_popup_userid) server_var(x) server_var(y) server_var(z)
					}
					else do
					{
						es_tell server_var(zreserid) #lightgreen server_var(zpn) is already a Ghoul.			
					}
				}
				else do
				{
					es_tell server_var(zreserid) #lightgreen server_var(zpn) is already a zombie.			
				}
			}
		}
		else do
		{
			es_tell server_var(zreserid) #lightgreen server_var(zpn) is already alive.
		}
	}
	else do
	{
		es_tell server_var(zreserid) #lightgreen server_var(zpn) does not wan't to be a zombie..
	}

}
block gyesno
{
	es_set zreserid 0
	es_set zreserst 0
	es_set zresern 0
	es_set zpst 0
	es_set zpn 0
	es est_getsteam zpst server_var(_popup_userid)
	es_keygetvalue zreserid dndExtra server_var(zpst) greser
	es est_getsteam zreserst server_var(zreserid)
	es est_getname zpn server_var(zpst)
	if (server_var(_popup_choice) = 1) do
	{
		es_set alivez 0
		es est_isalive alivez server_var(_popup_userid)
		if (server_var(alivez) = 0) do
		{
			es_set alive 0
			es est_isalive alive server_var(zreserid)
			if (server_var(alive) = 1) do
			{
				es_set race 0
				es_keygetvalue race dndUsers server_var(zpst) race
				if (server_var(race) != zombie) do
				{	
					if (server_var(race) != Ghoul) do
					{
						es_set x 0
						es_set y 0
						es_set z 0
						es_keygetvalue x dndExtra server_var(zpst) d_x
						es_keygetvalue y dndExtra server_var(zpst) d_y
						es_keygetvalue z dndExtra server_var(zpst) d_z
						es_set race 0
						es_set class 0
						es_set prestige 0
						es_set monster 0
						es_set curxp 0
						es_set la 0
						es_keygetvalue la dndUsers server_var(zpst) la
						es_keygetvalue curxp dndUsers server_var(zpst) curxp
						es_keygetvalue race dndUsers server_var(zpst) race
						es_keygetvalue class dndUsers server_var(zpst) class
						es_keygetvalue prestige dndUsers server_var(zpst) prestige
						es_keygetvalue monster dndUsers server_var(zpst) monster
						if (server_var(race) != zombie) do
						{	
							if (server_var(race) != Ghoul) do
							{
								es_keysetvalue dndExtra server_var(zpst) la server_var(la)
								es_keysetvalue dndExtra server_var(zpst) curxp server_var(curxp)
								es_keysetvalue dndExtra server_var(zpst) race server_var(race)
								es_keysetvalue dndExtra server_var(zpst) class server_var(class)
								es_keysetvalue dndExtra server_var(zpst) prestige server_var(prestige)
								es_keysetvalue dndExtra server_var(zpst) monster server_var(monster)
								es_keysetvalue dndExtra server_var(zpst) makersteam server_var(zreserst)
								es_keysetvalue dndExtra server_var(zpst) makeruser server_var(zreserid)
							}
						}
						es_keysetvalue dndExtra server_var(zpst) zombie 1
						es_keysetvalue dndUsers server_var(zpst) race Ghoul
						es_keysetvalue dndUsers server_var(zpst) monster 1
						es est_spawn server_var(_popup_userid)
						es ma_teleport server_var(_popup_userid) server_var(x) server_var(y) server_var(z)
						es_set mana 0
						es_keygetvalue mana dndExtra server_var(zreserst) mana
						es_math mana - 25
						es_keysetvalue dndExtra server_var(zreserst) mana server_var(mana)
						es_tell server_var(zreserid) #green You have rasied server_var(zpn) as a Ghoul to fight for you!
						es est_getname zresern server_var(zreserst)
						es_tell server_var(_popup_userid) #green server_var(zresern) Has turned you into a Ghoul!!! You die after being hit 7 times!
					}
					else do
					{
						es_tell server_var(zreserid) #lightgreen server_var(zpn) is already a Ghoul.			
					}
				}
				else do
				{
					es_tell server_var(zreserid) #lightgreen server_var(zpn) is already a zombie.			
				}
			}
		}
		else do
		{
			es_tell server_var(zreserid) #lightgreen server_var(zpn) is already alive.
		}
	}
	else do
	{
		es_tell server_var(zreserid) #lightgreen server_var(zpn) does not wan't to be a Ghoul..
	}

}


block zombieghoul
{
	if (server_var(_popup_choice) = 1) do
	{
		es_set alive 0
		es est_isalive alive server_var(_popup_userid)
		if (server_var(alive) = 1) do
		{
			es_set usersteam 0
			es_set zsteamcheck 0
			es est_getsteam usersteam server_var(_popup_userid)
			es est_getsteam zsteamcheck server_var(zplayer)
			es_keysetvalue dndExtra server_var(zsteamcheck) zreser server_var(_popup_userid)
			es mcudnd server_var(zplayer)
			es popup send zombieyesno server_var(zplayer)
			
			
		}
	}
	if (server_var(_popup_choice) = 2) do
	{
		es_set alive 0
		es est_isalive alive server_var(_popup_userid)
		if (server_var(alive) = 1) do
		{
			es_set usersteam 0
			es_set zsteamcheck 0
			es est_getsteam usersteam server_var(_popup_userid)
			es est_getsteam zsteamcheck server_var(zplayer)
			es_keysetvalue dndExtra server_var(zsteamcheck) greser server_var(_popup_userid)
			es mcudnd server_var(zplayer)
			es popup send ghoulyesno server_var(zplayer)
			
			
		}
	}
}

block kensaiweapons
{
	if (server_var(_popup_choice) = 1) do
	{
		es_set kenid 0
		es est_getsteam kenid server_var(_popup_userid)
		es_set pts 0
		es_keygetvalue pts dndExtra server_var(kenid) kensaipts
		if (server_var(pts) >= 1) do
		{
			es_set 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 mcudnd server_var(_popup_userid)
					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 mcudnd server_var(_popup_userid)
				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_set kenid 0
		es est_getsteam kenid server_var(_popup_userid)
		es_set pts 0
		es_keygetvalue pts dndExtra server_var(kenid) kensaipts
		if (server_var(pts) >= 1) do
		{
			es_set 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 mcudnd server_var(_popup_userid)
					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 mcudnd server_var(_popup_userid)
				es popup send kensaiweapons server_var(_popup_userid)
			}
		}
	}
	if (server_var(_popup_choice) = 3) do
	{
		es_set kenid 0
		es est_getsteam kenid server_var(_popup_userid)
		es_set pts 0
		es_keygetvalue pts dndExtra server_var(kenid) kensaipts
		if (server_var(pts) >= 2) do
		{
			es_set 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 mcudnd server_var(_popup_userid)
					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 mcudnd server_var(_popup_userid)
				es popup send kensaiweapons server_var(_popup_userid)
			}
		}
		else do
		{
			if (server_var(pts) >= 1) do
			{
				es mcudnd server_var(_popup_userid)
				es popup send kensaiweapons server_var(_popup_userid)
			}
		}
	}
	if (server_var(_popup_choice) = 4) do
	{
		es_set kenid 0
		es est_getsteam kenid server_var(_popup_userid)
		es_set pts 0
		es_keygetvalue pts dndExtra server_var(kenid) kensaipts
		if (server_var(pts) >= 2) do
		{
			es_set 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 mcudnd server_var(_popup_userid)
					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 mcudnd server_var(_popup_userid)
				es popup send kensaiweapons server_var(_popup_userid)
			}
		}
		else do
		{
			if (server_var(pts) >= 1) do
			{
				es mcudnd server_var(_popup_userid)
				es popup send kensaiweapons server_var(_popup_userid)
			}
		}
	}
	if (server_var(_popup_choice) = 5) do
	{
		es_set kenid 0
		es est_getsteam kenid server_var(_popup_userid)
		es_set pts 0
		es_keygetvalue pts dndExtra server_var(kenid) kensaipts
		if (server_var(pts) >= 3) do
		{
			es_set 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 mcudnd server_var(_popup_userid)
					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 mcudnd server_var(_popup_userid)
				es popup send kensaiweapons server_var(_popup_userid)
			}
		}
		else do
		{
			if (server_var(pts) >= 1) do
			{
				es mcudnd server_var(_popup_userid)
				es popup send kensaiweapons server_var(_popup_userid)
			}
		}
	}
	if (server_var(_popup_choice) = 6) do
	{
		es_set kenid 0
		es est_getsteam kenid server_var(_popup_userid)
		es_set pts 0
		es_keygetvalue pts dndExtra server_var(kenid) kensaipts
		if (server_var(pts) >= 4) do
		{
			es_set 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 mcudnd server_var(_popup_userid)
					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 mcudnd server_var(_popup_userid)
				es popup send kensaiweapons server_var(_popup_userid)
			}
		}
		else do
		{
			if (server_var(pts) >= 1) do
			{
				es mcudnd server_var(_popup_userid)
				es popup send kensaiweapons server_var(_popup_userid)
			}
		}
	}
	if (server_var(_popup_choice) = 7) do
	{
		es_set kenid 0
		es est_getsteam kenid server_var(_popup_userid)
		es_set pts 0
		es_keygetvalue pts dndExtra server_var(kenid) kensaipts
		if (server_var(pts) >= 5) do
		{
			es_set 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 mcudnd server_var(_popup_userid)
					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 mcudnd server_var(_popup_userid)
				es popup send kensaiweapons server_var(_popup_userid)
			}
		}
		else do
		{
			if (server_var(pts) >= 1) do
			{
				es mcudnd server_var(_popup_userid)
				es popup send kensaiweapons server_var(_popup_userid)
			}
		}
	}
	if (server_var(_popup_choice) = 8) do
	{
		es_set kenid 0
		es est_getsteam kenid server_var(_popup_userid)
		es_set pts 0
		es_keygetvalue pts dndExtra server_var(kenid) kensaipts
		if (server_var(pts) >= 6) do
		{
			es_set 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 mcudnd server_var(_popup_userid)
					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 mcudnd server_var(_popup_userid)
				es popup send kensaiweapons server_var(_popup_userid)
			}
		}
		else do
		{
			if (server_var(pts) >= 1) do
			{
				es mcudnd server_var(_popup_userid)
				es popup send kensaiweapons server_var(_popup_userid)
			}
		}
	}
	if (server_var(_popup_choice) = 9) do
	{
		es_set kenid 0
		es est_getsteam kenid server_var(_popup_userid)
		es_set 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 mcudnd server_var(_popup_userid)
				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 mcudnd server_var(_popup_userid)
				es popup send kensaiweapons server_var(_popup_userid)
			}
		}
	}
}

block tkmenu
{
	if (server_var(_popup_choice) = 1) do
	{
		es_set xpcheck 0
		es_keygetvalue xpcheck dndUsers server_var(tkid) curxp
		es_set currentxp 0
		es_keygetvalue currentxp dndUsers server_var(tkid) server_var(xpcheck)
		es_math currentxp - 300
		if (server_var(currentxp) < 0) then es_set 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_set 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 infomenuselect
{
    if (server_var(_popup_choice) = 5) then es_cexec server_var(_popup_userid) !playerinfo
}

block m_choice
{
	es_set menu_steam 0
	es est_getsteam menu_steam server_var(_popup_userid)
	es_set 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_set menu_steam 0
	es est_getsteam menu_steam server_var(_popup_userid)
	es_set 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) >= 9001) 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_set alive 0
	es est_isalive alive server_var(_popup_userid)
	es_set 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_set alive 0
	es est_isalive alive server_var(_popup_userid)
	es_set 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_set alive 0
	es est_isalive alive server_var(_popup_userid)
	es_set 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_set alive 0
	es est_isalive alive server_var(_popup_userid)
	es_set 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_set alive 0
	es est_isalive alive server_var(_popup_userid)
	es_set 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_set alive 0
	es est_isalive alive server_var(_popup_userid)
	es_set 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_set alive 0
	es est_isalive alive server_var(_popup_userid)
	es_set 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_set alive 0
	es est_isalive alive server_var(_popup_userid)
	es_set 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_set alive 0
	es est_isalive alive server_var(_popup_userid)
	es_set 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_set alive 0
	es est_isalive alive server_var(_popup_userid)
	es_set 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_set alive 0
	es est_isalive alive server_var(_popup_userid)
	es_set 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_set alive 0
	es est_isalive alive server_var(_popup_userid)
	es_set 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_set alive 0
	es est_isalive alive server_var(_popup_userid)
	es_set 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_set steam 0
	es est_getsteam steam server_var(_popup_userid)
	es_set c1levelcheck 0
	es_set c2levelcheck 0
	es_set c3levelcheck 0
	es_set c4levelcheck 0
	es_set c5levelcheck 0
	es_set c6levelcheck 0
	es_set 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 mcudnd server_var(_popup_userid)
	es popup send classmenu server_var(_popup_userid)
}

block cmenu2_build
{
	es_set steam 0
	es est_getsteam steam server_var(_popup_userid)
	popup delete classmenu2
	popup create classmenu2
	es_set wizard 0
	es_set cleric 0
	es_set necromancer 0
	es_set paladin 0
	es_set bard 0
	es_set fighter 0
	es_set monk 0
	es_set 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 mcudnd server_var(_popup_userid)
	es popup send classmenu2 server_var(_popup_userid)
}

block pmenu_build
{
	es_set steam 0
	es est_getsteam steam server_var(_popup_userid)
	popup close prestigemenu server_var(_popup_userid)
	popup delete prestigemenu
	popup create prestigemenu
	es_set class 0
	es_keygetvalue class dndUsers server_var(steam) class
	es_set 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_set 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_set 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_set 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_set 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_set 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_set 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_set 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_set 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_set 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_set 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_set 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_set 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_set steam 0
	es est_getsteam steam server_var(_popup_userid)
	es_set 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_set steam 0
	es est_getsteam steam server_var(_popup_userid)
	es_set 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_set steam 0
	es est_getsteam steam server_var(_popup_userid)
	es_set 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_set steam 0
	es est_getsteam steam server_var(_popup_userid)
	es_set 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_set alive 0
	es est_isalive alive server_var(_popup_userid)
	es_set 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_set alive 0
	es est_isalive alive server_var(_popup_userid)
	es_set 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_set alive 0
	es est_isalive alive server_var(_popup_userid)
	es_set 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_set alive 0
	es est_isalive alive server_var(_popup_userid)
	es_set 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_set alive 0
	es est_isalive alive server_var(_popup_userid)
	es_set 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_set alive 0
	es est_isalive alive server_var(_popup_userid)
	es_set 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_set alive 0
	es est_isalive alive server_var(_popup_userid)
	es_set 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_set alive 0
	es est_isalive alive server_var(_popup_userid)
	es_set 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_set alive 0
	es est_isalive alive server_var(_popup_userid)
	es_set 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_set alive 0
	es est_isalive alive server_var(_popup_userid)
	es_set 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_set alive 0
	es est_isalive alive server_var(_popup_userid)
	es_set 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_set alive 0
	es est_isalive alive server_var(_popup_userid)
	es_set 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_set alive 0
	es est_isalive alive server_var(_popup_userid)
	es_set 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_set alive 0
	es est_isalive alive server_var(_popup_userid)
	es_set 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_set alive 0
	es est_isalive alive server_var(_popup_userid)
	es_set 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_set alive 0
	es est_isalive alive server_var(_popup_userid)
	es_set 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_set alive 0
	es est_isalive alive server_var(_popup_userid)
	es_set menu_steam 0
	es est_getsteam menu_steam server_var(_popup_userid)
	es_set fighter 0
	es_set 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_set alive 0
	es est_isalive alive server_var(_popup_userid)
	es_set menu_steam 0
	es est_getsteam menu_steam server_var(_popup_userid)
	es_set fighter 0
	es_set 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_set alive 0
	es est_isalive alive server_var(_popup_userid)
	es_set menu_steam 0
	es est_getsteam menu_steam server_var(_popup_userid)
	es_set pally 0
	es_set 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_set alive 0
	es est_isalive alive server_var(_popup_userid)
	es_set menu_steam 0
	es est_getsteam menu_steam server_var(_popup_userid)
	es_set var1 0
	es_set 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_set alive 0
	es est_isalive alive server_var(_popup_userid)
	es_set menu_steam 0
	es est_getsteam menu_steam server_var(_popup_userid)
	es_set var1 0
	es_set var2 0
	es_set 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_set alive 0
	es est_isalive alive server_var(_popup_userid)
	es_set 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_set alive 0
	es est_isalive alive server_var(_popup_userid)
	es_set 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_set alive 0
	es est_isalive alive server_var(_popup_userid)
	es_set 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_set alive 0
	es est_isalive alive server_var(_popup_userid)
	es_set 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_set alive 0
	es est_isalive alive server_var(_popup_userid)
	es_set 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_set alive 0
	es est_isalive alive server_var(_popup_userid)
	es_set 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_set alive 0
	es est_isalive alive server_var(_popup_userid)
	es_set 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_set alive 0
	es est_isalive alive server_var(_popup_userid)
	es_set 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_set alive 0
	es est_isalive alive server_var(_popup_userid)
	es_set 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_set alive 0
	es est_isalive alive server_var(_popup_userid)
	es_set 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_set alive 0
	es est_isalive alive server_var(_popup_userid)
	es_set 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_set alive 0
	es est_isalive alive server_var(_popup_userid)
	es_set 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_set alive 0
	es est_isalive alive server_var(_popup_userid)
	es_set 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_set alive 0
	es est_isalive alive server_var(_popup_userid)
	es_set 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_set alive 0
	es est_isalive alive server_var(_popup_userid)
	es_set 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_set es_guserid 0
  	es_getcmduserid es_guserid
	es_set es_gsteamid 0
	es est_getsteam es_gsteamid server_var(es_guserid)
	es_set rcheck 0
	es_keygetvalue rcheck dndUsers server_var(es_gsteamid) race
	if (server_var(rcheck) = basilisk) do
	{
		es_set baalive 0
		es est_isalive baalive server_var(es_guserid)
		if (server_var(baalive) = 1) do
		{
			es_set delay 0
			es_keygetvalue delay dndExtra server_var(es_gsteamid) delay_gaze
			if (server_var(delay) = 0) do
			{
				es_set 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_set gsave 0
					es_rand gsave 1 20
					if (server_var(gsave) != 20) do
					{
						es_set gvsteam 0
						es_getsteam gvsteam server_var(point)
						es_set 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 2 es ma_freeze server_var(point) 0
							es est_Fade server_var(point) 0 server_var(level) 1 0 0 0 250
							es_delayed 2 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 5 seconds!
						}
					}
				}
			}
			else do
			{
				es_tell server_var(es_guserid) #green You must wait to use your gaze attack again.
			}
		}
	}
}

block stomp
{
	es_set es_suserid 0
  	es_getcmduserid es_suserid
	es_set es_ssteamid 0
	es est_getsteam es_ssteamid server_var(es_suserid)
	es_set userrcheck 0
	es_keygetvalue userrcheck dndUsers server_var(es_ssteamid) race
	if (server_var(userrcheck) = giant) do
	{
		es_set useralive 0
		es est_isalive useralive server_var(es_suserid)
		if (server_var(useralive) = 1) do
		{
			es_set sdelay 0
			es_keygetvalue sdelay dndExtra server_var(es_ssteamid) stomp_delay
			es_set 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_set es_tuserid 0
  	es_getcmduserid es_tuserid
	es_set es_tsteamid 0
	es est_getsteam es_tsteamid server_var(es_tuserid)
	es_set userccheck 0
	es_keygetvalue userccheck dndUsers server_var(es_tsteamid) class
	if (server_var(userccheck) = cleric) do
	{
		es_set turnuses 0
		es_keygetvalue turnuses dndExtra server_var(es_tsteamid) turns
		if (server_var(turnuses) > 0) do
		{
			es_set turnlevel 0
			es_keygetvalue turnlevel dndUsers server_var(es_tsteamid) cleric
			es_math turnuses - 1
			es_set turnvic 0
			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)
		}
        else do
        {
            es_tell server_var(es_tuserid) #green You don't have any more turns left this round
        }
	}
}

block hurtundead
{
	es_set racecheck 0
	es_set zcheck 0
	es_set 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_set 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_set hits server_var(random)
		}
		else do
		{
			es_math hits + server_var(random)
		}
		es_keysetvalue dndExtra server_var(zsteam) hitcount server_var(hits)
        if (server_var(racecheck) = zombie) do
        {
            if (server_var(hits) >= 35) do
            {
                es point_hurt server_var(es_tuserid) server_var(turnvic) 5000
                es_tell server_var(turnvic) #lightgreen A cleric has blasted you with holy power!
                es_tell server_var(es_tuserid) #green You have blasted your target with holy power!
            }
            else do
            {
                es_tell server_var(turnvic) #lightgreen A cleric has blasted you with holy power! You are now easier to kill!
                es_tell server_var(es_tuserid) #green You have blasted your target with holy power! They are now easier to kill!
            }
        }
        else do
        {
            if (server_var(hits) >= 7) do
            {
                es point_hurt server_var(es_tuserid) server_var(turnvic) 5000
                es_tell server_var(turnvic) #lightgreen A cleric has blasted you with holy power!
                es_tell server_var(es_tuserid) #green You have blasted your target with holy power!
            }
            else do
            {
                es_tell server_var(turnvic) #lightgreen A cleric has blasted you with holy power! You are now easier to kill!
                es_tell server_var(es_tuserid) #green You have blasted your target with holy power! They are now easier to kill!
            }
        }
	}
    if (server_var(racecheck) = vampire) do
    {
        es point_hurt server_var(es_tuserid) server_var(turnvic) 20
        es_tell server_var(turnvic) #lightgreen A cleric has blasted you with holy power!
        es_tell server_var(es_tuserid) #green You have blasted a Vampire with holy power!
    }
}

block cat
{
	es_set es_cuserid 0
  	es_getcmduserid es_cuserid
	es_set es_csteamid 0
	es est_getsteam es_csteamid server_var(es_cuserid)
	es_set rcheck 0
	es_keygetvalue rcheck dndUsers server_var(es_csteamid) race
	if (server_var(rcheck) = tibbit) do
	{
		es_set 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_set 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_set 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_set 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_set 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_set 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_set 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_set es_userid 0
	es_getcmduserid es_userid
	es mcudnd server_var(es_userid)
	es popup send mainmenu server_var(es_userid)
}

block point_hurt
{
	es_set dnd_dduserid 0
	es_set dnd_ddtargetid 0
  	es_set dnd_dddamage 0

  	es_getargv dnd_dduserid 1
  	es_getargv dnd_ddtargetid 2
  	es_getargv dnd_dddamage 3
 	es_set dnd_health 0
  	
	es_set drandom 0
	es_set dr 0
	es_set dr2 0
	es_set phsteamcheck 0
	es est_getsteam phsteamcheck server_var(dnd_ddtargetid)
	es_set phclass 0
	es_keygetvalue phclass dndUsers server_var(phsteamcheck) class
	es_set phlevel 0
	es_keygetvalue phlevel dndUsers server_var(phsteamcheck) server_var(phclass)
	es_set phcheck 0
	es_keygetvalue phcheck dndUsers server_var(phsteamcheck) prestige
	es_set phrace 0
	es_keygetvalue phrace dndUsers server_var(phsteamcheck) race
	if (server_var(phrace) = tibbit) do
	{
		es_set 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_set 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_set 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_set 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_set dnd_dddamage 0
			}
		}
	}
	if (server_var(phclass) = ranger) do
	{
		es_set scheck 0
		es_keygetvalue scheck dndExtra server_var(phsteamcheck) style
		if (server_var(scheck) = 0) do
		{
			es_set 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_set dnd_dddamage 0
					}
				}
			}
			if (server_var(phlevel) >= 12) 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_set 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_set 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_set 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_set dnd_dddamage 0
			}
		}
		if (server_var(phlevel) >= 20) do
		{
			es_set dr 0
			es_set 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_set phlevel 5
		}
		if (server_var(phcheck) = fpc2) do
		{
			es_set phlevel 10
		}
		if (server_var(phcheck) = fpc3) do
		{
			es_set phlevel 15
		}
	
		if (server_var(phlevel) >= 4) do
		{
			es_set dr server_var(dnd_dddamage)
			es_math dr / 10
			es_math dnd_dddamage - server_var(dr)
		}
		if (server_var(phlevel) >= 14) do
		{
			es_set 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_set phlevel 5
		}
		if (server_var(phcheck) = rpc2) do
		{
			es_set phlevel 10
		}
		if (server_var(phcheck) = rpc3) do
		{
			es_set 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_set 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_set dnd_dddamage 0
			}
		}
	}
  	
	if (server_var(phcheck) = cpc1) do
	{
		es_set scheck 0
		es_keygetvalue scheck dndExtra server_var(phsteamcheck) shield
		if (server_var(scheck) = 1) do
		{
			es_set dr server_var(dnd_dddamage)
			es_math dr / 10
			es_math dnd_dddamage - server_var(dr)
		}
	}
    es_getplayerprop dnd_health server_var(dnd_ddtargetid) "CBasePlayer.m_iHealth"
	if (server_var(dnd_health) > server_var(dnd_dddamage)) do
	{
        es_math dnd_health - server_var(dnd_dddamage)
        es_setplayerprop server_var(dnd_ddtargetid) "CBasePlayer.m_iHealth" server_var(dnd_health)
	}
    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_set userid 0
	
	es_getargv userid 1

	es_set es_steamid 0
	es est_getsteam es_steamid server_var(userid)
	es_set allow_color 0
	es_keygetvalue allow_color dndExtra server_var(es_steamid) allow_color
	if (server_var(allow_color) = 0) do
	{
		es_set allow_color 1
		es_tell server_var(userid) #green You have come out of your stealth!!
		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)
	}
	else do
	{
		// es_math allow_color +1
	}

}

block stealth_on
{
	es_set userid 0
	es_set chclass 0
	es_getargv userid 1
	es_set chrace 0
	es_set prcheck 0


	es_set es_steamid 0
	es est_getsteam es_steamid server_var(userid)
	es_keygetvalue chclass dndUsers server_var(es_steamid) class
	es_keygetvalue chrace dndUsers server_var(es_steamid) race
	es_keygetvalue prcheck dndUsers server_var(es_steamid) presige

	es_set 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
	{	
		if (server_var(chclass) = rogue) 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_set 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
		}
		else 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_set 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)
		}	
	}
	if (server_var(prcheck) = rpc3) do
	{
		es_set lcheck 0
		es_keygetvalue lcheck dndUsers server_var(es_steamid) rpc3
		es_set lacheck 0
		es_keygetvalue lacheck dndUsers server_var(es_steamid) la
		es_math lcheck - server_var(lacheck)
		if (server_var(lcheck) >= 1) do
		{	
			if (server_var(chrace) != troll) do
			{
			es est_setplayercolor server_var(userid) 255 255 255 0
			es_tell server_var(userid) #green Only your knife can be seen!
			}
			if (server_var(chrace) = troll) do
			{
				es est_setplayercolor server_var(userid) 255 255 255 20
				es_tell server_var(userid) #green As a troll shadow dancer you are mostly stealthed!
			}
		}
	}
	if (server_var(chrace) = filcher) do
	{
		es est_setplayercolor server_var(userid) 255 255 255 0
	}
	if (server_var(chrace) = Rabbit) do
	{
		es est_setplayercolor server_var(userid) 255 255 255 0
	}
}

block sneak_off
{
	es_set userid 0
	
	es_getargv userid 1

	es_set es_steamid 0
	es est_getsteam es_steamid server_var(userid)

	es_set allow 0
	es_keygetvalue allow dndExtra server_var(es_steamid) sneak
	if (server_var(allow) = 0) do
	{
		es_set 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_set userid 0
	
	es_getargv userid 1

	es_set es_steamid 0
	es est_getsteam es_steamid server_var(userid)

	es_set 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) uses 0
	es_keysetvalue dndExtra event_var(es_steamid) bhealth 0
	es_set ccheck 0
	es_keygetvalue ccheck dndUsers event_var(es_steamid) class
	es_keysetvalue dndExtra event_var(es_steamid) algin good
	es_set 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_set 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_set 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_set 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_set 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_set 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_set 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_set 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_set 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_set 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_set 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
	}
	es_keysetvalue dndExtra event_var(es_steamid) dawn 4
}

block escape
{
	es_set es_userid 0
  	es_getcmduserid es_userid
	es_set es_steamid 0
	es est_getsteam es_steamid server_var(es_userid)
	es_set rcheck 0
	es_keygetvalue rcheck dndUsers server_var(es_steamid) race
	es_set ccheck 0
	es_keygetvalue ccheck dndUsers server_var(es_steamid) class
	es_set lcheck 0
	es_keygetvalue lcheck dndUsers server_var(es_steamid) server_var(ccheck)
	if (server_var(rcheck) = kobold) do
	{
		es_set 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_set 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_set es_userid 0
  	es_getcmduserid es_userid
	es_set es_steamid 0
	es est_getsteam es_steamid server_var(es_userid)
	es_set rcheck 0
	es_keygetvalue rcheck dndUsers server_var(es_steamid) race
	es_set ccheck 0
	es_keygetvalue ccheck dndUsers server_var(es_steamid) class
	es_set lcheck 0
	es_keygetvalue lcheck dndUsers server_var(es_steamid) server_var(ccheck)
	es_set alive 0
	es est_isalive alive server_var(es_userid)
	if (server_var(alive) = 1) do
	{
		if (server_var(rcheck) = filcher) do
		{
			es_set x 0
			es_set y 0
			es_set 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_set x 0
			es_set y 0
			es_set 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_set x 0
				es_set y 0
				es_set 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_set es_userid 0
  	es_getcmduserid es_userid
	es_set es_steamid 0
	es est_getsteam es_steamid server_var(es_userid)
	es_set rcheck 0
	es_keygetvalue rcheck dndUsers server_var(es_steamid) race
	es_set ccheck 0
	es_keygetvalue ccheck dndUsers server_var(es_steamid) class
	es_set lcheck 0
	es_keygetvalue lcheck dndUsers server_var(es_steamid) server_var(ccheck)
	es_set alive 0
	es est_isalive alive server_var(es_userid)
	if (server_var(alive) = 1) do
	{
		if (server_var(rcheck) = filcher) do
		{
			es_set x 0
			es_set y 0
			es_set 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_set x 0
			es_set y 0
			es_set 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_set x 0
				es_set y 0
				es_set 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_set es_userid 0
  	es_getcmduserid es_userid
	es_set es_steamid 0
	es est_getsteam es_steamid server_var(es_userid)
	es_set rcheck 0
	es_keygetvalue rcheck dndUsers server_var(es_steamid) race
	es_set ccheck 0
	es_keygetvalue ccheck dndUsers server_var(es_steamid) class
	es_set lcheck 0
	es_keygetvalue lcheck dndUsers server_var(es_steamid) server_var(ccheck)
	if (server_var(rcheck) = filcher) do
	{
		es_set tcheck 0
		es_keygetvalue tcheck dndExtra server_var(es_steamid) tele_count
		es_set x 0
		es_set y 0
		es_set 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_set tcheck 0
		es_keygetvalue tcheck dndExtra server_var(es_steamid) tele_count
		es_set x 0
		es_set y 0
		es_set 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_set tcheck 0
		es_keygetvalue tcheck dndExtra server_var(es_steamid) tele_count
		es_set x 0
		es_set y 0
		es_set 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_set es_userid 0
  	es_getcmduserid es_userid
	es_set es_steamid 0
	es est_getsteam es_steamid server_var(es_userid)
	es_set rcheck 0
	es_keygetvalue rcheck dndUsers server_var(es_steamid) race
	es_set ccheck 0
	es_keygetvalue ccheck dndUsers server_var(es_steamid) class
	es_set lcheck 0
	es_keygetvalue lcheck dndUsers server_var(es_steamid) server_var(ccheck)
	if (server_var(rcheck) = filcher) do
	{
		es_set tcheck 0
		es_keygetvalue tcheck dndExtra server_var(es_steamid) tele_count
		es_set x 0
		es_set y 0
		es_set 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_set tcheck 0
		es_keygetvalue tcheck dndExtra server_var(es_steamid) tele_count
		es_set x 0
		es_set y 0
		es_set 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_set tcheck 0
		es_keygetvalue tcheck dndExtra server_var(es_steamid) tele_count
		es_set x 0
		es_set y 0
		es_set 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_set dnd_sruserid 0
	es_set dnd_sradius 0


  	es_getargv dnd_sruserid 1
  	es_getargv dnd_sradius 2
	es_set 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_set 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_set dnd_ruserid 0
	es_set dnd_delay 0
  	es_set dnd_amount 0

  	es_getargv dnd_ruserid 1
  	es_getargv dnd_delay 2
  	es_getargv dnd_amount 3
 	
	es_set dnd_health 0
	es_set maxhealth 0
	
	es_set regensteamcheck 0
	es est_getsteam regensteamcheck server_var(dnd_ruserid)
	es_set alive 0
	
	es_set 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_set dnd_aduserid 0
	es_set dnd_addelay 0
  	es_set dnd_adamount 0
	es_set dnd_adradius 0
	es_set dnd_adtargetid 0

  	es_getargv dnd_aduserid 1
  	es_getargv dnd_addelay 2
  	es_getargv dnd_adamount 3
	es_getargv dnd_adradius 4
 	
	es_set dnd_arhealth 0
	es_set armaxhealth 0
	
			
	es_set adsteamcheck 0
	es est_getsteam adsteamcheck server_var(dnd_aduserid)
	es_set alive 0
	
	es_set adcheck 0
	es_keygetvalue adcheck dndExtra server_var(adsteamcheck) areadmg
	if (server_var(adcheck) = 1) do
	{
		es_set dnd_team 0
		es est_getteam dnd_team server_var(dnd_arruserid)
		if (server_var(dnd_team) = 3) then es_set dnd_adteam "#t"
		if (server_var(dnd_team) = 2) then es_set 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_set dnd_arruserid 0
	es_set dnd_ardelay 0
  	es_set dnd_aramount 0
	es_set dnd_radius 0
	es_set dnd_targetid 0

  	es_getargv dnd_arruserid 1
  	es_getargv dnd_ardelay 2
  	es_getargv dnd_aramount 3
	es_getargv dnd_radius 4
 	
	es_set dnd_arhealth 0
	es_set armaxhealth 0
	
			
	es_set arregensteamcheck 0
	es est_getsteam arregensteamcheck server_var(dnd_arruserid)
	es_set alive 0
	
	es_set arrcheck 0
	es_keygetvalue arrcheck dndExtra server_var(arregensteamcheck) arearegen
	if (server_var(arrcheck) = 1) do
	{	
		es_set dnd_team 0
		es est_getteam dnd_team server_var(dnd_arruserid)
		if (server_var(dnd_team) = 2) then es_set dnd_team "#t"
		if (server_var(dnd_team) = 3) then es_set 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_set dnd_truserid 0
	es_set dnd_tramount 0

	es_getargv dnd_truserid 1
	es_getargv dnd_tramount 2
	es_set dnd_trarhealth 0
	es_set trarmaxhealth 0
	es_set 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_set dnd_bhruserid 0
	es_set dnd_bhamount 0
	es_set targetid 0

  	es_getargv dnd_bhruserid 1
  	es_getargv dnd_bhamount 2
	
	
	es_set bhsteam 0
	es est_getsteam bhsteam server_var(dnd_bhruserid)
	es_set bhealth 0
	es_keygetvalue bhealth dndExtra server_var(bhsteam) bhealth
	
	if (server_var(bhealth) > 50) then es_set bhealth 50
	
	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_set dnd_nhruserid 0
	es_set dnd_nhamount 0
	es_set targetid 0

  	es_getargv dnd_nhruserid 1
  	es_getargv dnd_nhamount 2
	es_getargv dnd_nhteam 3
	
	es_set nhsteam 0
	es est_getsteam nhsteam server_var(dnd_nhruserid)
	es_set 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_set es_userid 0
  	es_getcmduserid es_userid
	es_set es_steamid 0
	es est_getsteam es_steamid server_var(es_userid)
	es_set 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_set es_userid 0
  	es_getcmduserid es_userid
	es_set es_steamid 0
	es est_getsteam es_steamid server_var(es_userid)
	es_set healcount 0
	es_keygetvalue healcount dndExtra server_var(es_steamid) healing
	es_set totalcount 0
	es_keygetvalue totalcount dndExtra server_var(es_steamid) totalpot
	es_set maxlife 0
	es_keygetvalue maxlife dndExtra server_var(es_steamid) maxhealth
	es_set currentlife 0
	es est_gethealth currentlife server_var(es_userid)
	if (server_var(healcount) >= 1) do
	{
		es_set 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_set es_userid 0
  	es_getcmduserid es_userid
	es_set es_steamid 0
	es est_getsteam es_steamid server_var(es_userid)
	es_set manacount 0
	es_keygetvalue manacount dndExtra server_var(es_steamid) manaing
	es_set totalcount 0
	es_keygetvalue totalcount dndExtra server_var(es_steamid) totalpot
	es_set maxmana 0
	es_keygetvalue maxmana dndExtra server_var(es_steamid) max_mana
	es_set currentmana 0
	es_keygetvalue currentmana dndExtra server_var(es_steamid) mana
	if (server_var(manacount) >= 1) do
	{
		es_set 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_set es_userid 0
  	es_getcmduserid es_userid
	es_set es_steamid 0
	es est_getsteam es_steamid server_var(es_userid)
	es_set healcount 0
	es_keygetvalue healcount dndExtra server_var(es_steamid) mhealing
	es_set totalcount 0
	es_keygetvalue totalcount dndExtra server_var(es_steamid) totalpot
	es_set maxlife 0
	es_keygetvalue maxlife dndExtra server_var(es_steamid) maxhealth
	es_set currentlife 0
	es est_gethealth currentlife server_var(es_userid)
	if (server_var(healcount) >= 1) do
	{
		es_set 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_set es_userid 0
  	es_getcmduserid es_userid
	es_set es_steamid 0
	es est_getsteam es_steamid server_var(es_userid)
	es_set manacount 0
	es_keygetvalue manacount dndExtra server_var(es_steamid) mmanaing
	es_set totalcount 0
	es_keygetvalue totalcount dndExtra server_var(es_steamid) totalpot
	es_set maxmana 0
	es_keygetvalue maxmana dndExtra server_var(es_steamid) max_mana
	es_set currentmana 0
	es_keygetvalue currentmana dndExtra server_var(es_steamid) mana
	if (server_var(manacount) >= 1) do
	{
		es_set 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_set es_userid 0
  	es_getcmduserid es_userid
	es_set es_steamid 0
	es est_getsteam es_steamid server_var(es_userid)
	es_set healcount 0
	es_keygetvalue healcount dndExtra server_var(es_steamid) shealing
	es_set totalcount 0
	es_keygetvalue totalcount dndExtra server_var(es_steamid) totalpot
	es_set maxlife 0
	es_keygetvalue maxlife dndExtra server_var(es_steamid) maxhealth
	es_set currentlife 0
	es est_gethealth currentlife server_var(es_userid)
	if (server_var(healcount) >= 1) do
	{
		es_set 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_set es_userid 0
  	es_getcmduserid es_userid
	es_set es_steamid 0
	es est_getsteam es_steamid server_var(es_userid)
	es_set manacount 0
	es_keygetvalue manacount dndExtra server_var(es_steamid) smanaing
	es_set totalcount 0
	es_keygetvalue totalcount dndExtra server_var(es_steamid) totalpot
	es_set maxmana 0
	es_keygetvalue maxmana dndExtra server_var(es_steamid) max_mana
	es_set currentmana 0
	es_keygetvalue currentmana dndExtra server_var(es_steamid) mana
	if (server_var(manacount) >= 1) do
	{
		es_set 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_set es_userid 0
  	es_getcmduserid es_userid
	es_set es_steamid 0
	es est_getsteam es_steamid server_var(es_userid)
	es_set 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_set es_userid 0
  	es_getcmduserid es_userid
	es_set es_steamid 0
	es est_getsteam es_steamid server_var(es_userid)
	es_set 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_set es_userid 0
  	es_getcmduserid es_userid
	es_set es_steamid 0
	es est_getsteam es_steamid server_var(es_userid)
	es_set 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_set 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_set 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_set 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) = troll) then es_doblock dnd/troll_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 troll_weapons
{
	es_set rcheck 0
	es_keygetvalue rcheck dndUsers event_var(es_steamid) race
	if (event_var(item) = ak47) do
	{
		es est_removeweapon event_var(userid) 1
		es_tell event_var(userid) #green Your race is not allowed to use that gun!
	}
	if (event_var(item) = m4a1) do
	{
		es est_removeweapon event_var(userid) 1
		es_tell event_var(userid) #green Your race 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 race 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 race 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 race 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 race 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 race is not allowed to use that gun!
	}
	if (event_var(item) = m3) do
	{
		es est_removeweapon event_var(userid) 1
		es_tell event_var(userid) #green Your race is not allowed to use that gun!
	}
	if (event_var(item) = xm1014) do
	{
		es est_removeweapon event_var(userid) 1
		es_tell event_var(userid) #green Your race 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 race is not allowed to use that gun!
	}
	if (event_var(item) = mp5navy) do
	{
		es est_removeweapon event_var(userid) 1
		es_tell event_var(userid) #green Your race is not allowed to use that gun!
	}
	if (event_var(item) = p90) do
	{
		es est_removeweapon event_var(userid) 1
		es_tell event_var(userid) #green Your race is not allowed to use that gun!
	}
	if (event_var(item) = m249) do
	{
		es est_removeweapon event_var(userid) 1
		es_tell event_var(userid) #green Your race is not allowed to use that gun!
	}
}

block devil_weapons
{
	es_set 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_set gun2 0
	es est_GetSecondary gun2 event_var(userid)
	es est_removeweapon event_var(userid) 1
	es_set 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_set stealth 0
	es_keygetvalue stealth dndExtra event_var(es_steamid) color
	es_set 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_set stealth 0
	es_keygetvalue stealth dndExtra event_var(es_attackersteamid) color
	es_set 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_set rcheck 0
	es_keygetvalue rcheck dndUsers event_var(es_steamid) race
	es_set 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_set scheck 0
	es_keygetvalue scheck dndExtra event_var(es_steamid) style
	if (server_var(scheck) = 0) do
	{
		es_set 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_set 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_set pcheck 0
	es_keygetvalue pcheck dndUsers event_var(es_steamid) prestige
	es_set 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_set pcheck 0
	es_keygetvalue pcheck dndUsers event_var(es_steamid) prestige
	if (server_var(pcheck) = rpc3) do
	{
		es_set 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_set 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_set 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_set pcheck 0
	es_keygetvalue pcheck dndUsers event_var(es_steamid) prestige
	es_set 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_set 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_set 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_set weapons 0
	es_set pcheck 0
	es_keygetvalue pcheck dndUsers event_var(es_steamid) prestige
	if (server_var(pcheck) = cpc1) do
	{
		es_set plcheck 0
		es_keygetvalue plcheck dndUsers event_var(es_steamid) server_var(pcheck)
		if (server_var(plcheck) >= 1) do
		{
			es_set 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_set 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_set rcheck 0
	if (event_var(text) = !menu) do
	{
                es mcudnd event_var(userid)
		es mcudnd event_var(userid)
		es popup send mainmenu event_var(userid)
	}
    if (event_var(text) = !playerinfo) then es_cexec event_var(userid) !playerinfo
	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_set menu_steam 0
	es est_getsteam menu_steam server_var(_popup_userid)
	es_set xpcheck 0
	es_keygetvalue xpcheck dndUsers server_var(menu_steam) curxp
	es_set currentxp 0
	es_keygetvalue currentxp dndUsers server_var(menu_steam) server_var(xpcheck)
	es_set rcheck 0
	es_keygetvalue rcheck dndUsers server_var(menu_steam) race
	es_set ccheck 0
	es_keygetvalue ccheck dndUsers server_var(menu_steam) class
	es_set pcheck 0
	es_keygetvalue pcheck dndUsers server_var(menu_steam) prestige
	es_set lcheck 0
	es_keygetvalue lcheck dndUsers server_var(menu_steam) server_var(ccheck)
	es_set lacheck 0
	es_keygetvalue lacheck dndUsers server_var(menu_steam) la
	es_set player_stats "Player Stats:\n"
	if (server_var(pcheck) != 0) do
	{
		es_set plcheck 0
		es_keygetvalue plcheck dndUsers server_var(menu_steam) server_var(pcheck)
		es_set plevel 0
		es_set plevel server_var(plcheck)
		es_math plevel - server_var(lacheck)
		if (server_var(pcheck) = fpc1) then es_set lcheck 5
		if (server_var(pcheck) = rpc1) then es_set lcheck 5
		if (server_var(pcheck) = wpc1) then es_set lcheck 5
		if (server_var(pcheck) = cpc1) then es_set lcheck 5
		if (server_var(pcheck) = fpc2) then es_set lcheck 10
		if (server_var(pcheck) = rpc2) then es_set lcheck 10
		if (server_var(pcheck) = wpc2) then es_set lcheck 10
		if (server_var(pcheck) = cpc2) then es_set lcheck 10
		if (server_var(pcheck) = fpc3) then es_set lcheck 15
		if (server_var(pcheck) = rpc3) then es_set lcheck 15
		if (server_var(pcheck) = wpc3) then es_set lcheck 15
		if (server_var(pcheck) = cpc3) then es_set lcheck 15
	}
	es_set 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_set mcheck 0
	es_keygetvalue mcheck dndUsers server_var(menu_steam) monster
	if (server_var(pcheck) = 0) do
	{
		if (server_var(ccheck) != 0) do
		{
			es_set 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_set 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_set xpneeded 0
		es_set xpneeded server_var(plcheck)
		es_math xpneeded + server_var(lcheck)
		es_math xpneeded * server_var(prestigelevel)
		if (server_var(pcheck) = fpc1) then es_set pcheck Grenadier
		if (server_var(pcheck) = rpc1) then es_set pcheck Acrobat
		if (server_var(pcheck) = wpc1) then es_set pcheck "War Mage"
		if (server_var(pcheck) = cpc1) then es_set pcheck "War Priest"
		if (server_var(pcheck) = fpc2) then es_set pcheck "Kensai"
		if (server_var(pcheck) = rpc2) then es_set pcheck Assassin
		if (server_var(pcheck) = wpc2) then es_set pcheck "Mage of Arcane Order"
		if (server_var(pcheck) = cpc2) then es_set pcheck "Divine Oracle"
		if (server_var(pcheck) = fpc3) then es_set pcheck "Exotic Weapons Master"
		if (server_var(pcheck) = rpc3) then es_set pcheck "Shadow Dancer"
		if (server_var(pcheck) = wpc3) then es_set pcheck "Arch Mage"
		if (server_var(pcheck) = cpc3) then es_set 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_set 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 playerinfo
{
    es_xset es_puserid 0
    es_getcmduserid es_puserid
    
    keymenu exists exists playerinfomenu
    if (server_var(exists) = 1) then keymenu delete playerinfomenu
    es_createplayerlist playerinfolist
    keymenu create playerinfomenu playerinfovar dnd/playermenu playerinfolist #keyvalue name #key Select a player to see their info:
    es keymenu send playerinfomenu server_var(es_puserid)
    es_keygroupdelete playerinfolist
}

block playermenu
{
    es_xset menuname 0
    es_getplayername menuname server_var(playerinfovar)
    es_set menu_steam 0
	es est_getsteam menu_steam server_var(playerinfovar)
	es_set xpcheck 0
	es_keygetvalue xpcheck dndUsers server_var(menu_steam) curxp
	es_set currentxp 0
	es_keygetvalue currentxp dndUsers server_var(menu_steam) server_var(xpcheck)
	es_set rcheck 0
	es_keygetvalue rcheck dndUsers server_var(menu_steam) race
	es_set ccheck 0
	es_keygetvalue ccheck dndUsers server_var(menu_steam) class
	es_set pcheck 0
	es_keygetvalue pcheck dndUsers server_var(menu_steam) prestige
	es_set lcheck 0
	es_keygetvalue lcheck dndUsers server_var(menu_steam) server_var(ccheck)
	es_set lacheck 0
	es_keygetvalue lacheck dndUsers server_var(menu_steam) la
	es_set player_stats "Player Stats:\n"
    es_format player_stats "%1 %2's stats\n" server_var(player_stats) server_var(menuname)
	if (server_var(pcheck) != 0) do
	{
		es_set plcheck 0
		es_keygetvalue plcheck dndUsers server_var(menu_steam) server_var(pcheck)
		es_set plevel 0
		es_set plevel server_var(plcheck)
		es_math plevel - server_var(lacheck)
		if (server_var(pcheck) = fpc1) then es_set lcheck 5
		if (server_var(pcheck) = rpc1) then es_set lcheck 5
		if (server_var(pcheck) = wpc1) then es_set lcheck 5
		if (server_var(pcheck) = cpc1) then es_set lcheck 5
		if (server_var(pcheck) = fpc2) then es_set lcheck 10
		if (server_var(pcheck) = rpc2) then es_set lcheck 10
		if (server_var(pcheck) = wpc2) then es_set lcheck 10
		if (server_var(pcheck) = cpc2) then es_set lcheck 10
		if (server_var(pcheck) = fpc3) then es_set lcheck 15
		if (server_var(pcheck) = rpc3) then es_set lcheck 15
		if (server_var(pcheck) = wpc3) then es_set lcheck 15
		if (server_var(pcheck) = cpc3) then es_set lcheck 15
	}
	es_set 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_set mcheck 0
	es_keygetvalue mcheck dndUsers server_var(menu_steam) monster
	if (server_var(pcheck) = 0) do
	{
		if (server_var(ccheck) != 0) do
		{
			es_set 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_set 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_set xpneeded 0
		es_set xpneeded server_var(plcheck)
		es_math xpneeded + server_var(lcheck)
		es_math xpneeded * server_var(prestigelevel)
		if (server_var(pcheck) = fpc1) then es_set pcheck Grenadier
		if (server_var(pcheck) = rpc1) then es_set pcheck Acrobat
		if (server_var(pcheck) = wpc1) then es_set pcheck "War Mage"
		if (server_var(pcheck) = cpc1) then es_set pcheck "War Priest"
		if (server_var(pcheck) = fpc2) then es_set pcheck "Kensai"
		if (server_var(pcheck) = rpc2) then es_set pcheck Assassin
		if (server_var(pcheck) = wpc2) then es_set pcheck "Mage of Arcane Order"
		if (server_var(pcheck) = cpc2) then es_set pcheck "Divine Oracle"
		if (server_var(pcheck) = fpc3) then es_set pcheck "Exotic Weapons Master"
		if (server_var(pcheck) = rpc3) then es_set pcheck "Shadow Dancer"
		if (server_var(pcheck) = wpc3) then es_set pcheck "Arch Mage"
		if (server_var(pcheck) = cpc3) then es_set 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_set 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(es_puserid) server_var(player_stats)
}

block weapons_list
{
	es_set menu_steam 0
	es est_getsteam menu_steam server_var(_popup_userid)
	es_set ccheck 0
	es_keygetvalue ccheck dndUsers server_var(menu_steam) class
	es_set lcheck 0
	es_keygetvalue lcheck dndUsers server_var(menu_steam) server_var(ccheck)
	es_set lacheck 0
	es_keygetvalue lacheck dndUsers server_var(menu_steam) la
	es_math lcheck - server_var(lacheck)
	es_set rcheck 0
	es_keygetvalue rcheck dndUsers server_var(menu_steam) race
	es_set pcheck 0
	es_keygetvalue pcheck dndUsers server_var(menu_steam) prestige
	es_set plcheck 0
	es_keygetvalue plcheck dndUsers server_var(menu_steam) server_var(pcheck)
	es_set weapons 0
	if (server_var(ccheck) = fighter) do
	{
		es_set 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_set 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_set 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_set 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_set weapons "Paladin Weapons:\n All Weapons"
	}
	if (server_var(ccheck) = monk) do
	{
		es_set weapons "Knife Only"
	}
	if (server_var(ccheck) = ranger) do
	{
		es_set weapons "Ranger Weapons:\n Knife\n"
		es_set scheck 0
		es_keygetvalue scheck dndExtra server_var(menu_steam) style
		if (server_var(scheck) = 0) then es_set 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_set 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_set 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_set random 0
	
	es_keysetvalue dndExtra event_var(es_steamid) resd_count 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_set gun1 0
	es_set 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_set dawn 0
	es_keygetvalue dawn dndExtra event_var(es_steamid) dawn
	if (server_var(dawn) != 0) do
	{
		es_math dawn - 1
		es_keysetvalue dndExtra event_var(es_steamid) dawn server_var(dawn)
	}
	
	es_tell event_var(userid) #lightgreen Use !menu in console to bring up the command menu.
	if (server_var(zombie_start) = 0) do
	{
		
		es_set zcheck 0
		es_keygetvalue zcheck dndExtra event_var(es_steamid) zombie
		if (server_var(zcheck) = 1) do
		{
			es_set race 0
			es_set class 0
			es_set prestige 0
			es_set monster 0
			es_set curxp 0
			es_set 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_set rcheck server_var(race)
			es_set ccheck server_var(class)
			es_set pcheck server_var(prestige)
		}
		es_set delay_race 0
		es_keygetvalue delay_race dndExtra event_var(es_steamid) delay_race
		if (server_var(delay_race) != 0) do
		{
			es_set delay_la 0
			es_set delay_monster 0
			es_set 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_set delay_class 0
		es_keygetvalue delay_class dndExtra event_var(es_steamid) delay_class
		if (server_var(delay_class) != 0) do
		{
			es_set delay_xp 0
			es_set 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_set delay_prestige 0
		es_keygetvalue delay_prestige dndExtra event_var(es_steamid) delay_prestige
		if (server_var(delay_prestige) != 0) do
		{
			es_set 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_set 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_set 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_set pcheck 0
	es_keygetvalue pcheck dndUsers event_var(es_steamid) prestige
	es_set ccheck 0
	es_keygetvalue ccheck dndUsers event_var(es_steamid) class
	es_set 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_set speed_check 0
	es_set color_check 0
	es_set 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_set 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_set color_check 15
				}
				es_delayed 4 es est_setplayercolor event_var(userid) 255 255 255 server_var(color_check) 1
			}
		}
	}
	es_set rescheck 0
	es_keygetvalue rescheck dndExtra event_var(es_steamid) res_count
	if (server_var(rescheck) >= 1) do
	{
		es_set maxlife 0
		es_keygetvalue maxlife dndExtra event_var(es_steamid) maxhealth
		es_set lose 0
		es_set 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_set 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_set 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) 250
	es_set bhealth 0
	es_keygetvalue bhealth dndExtra event_var(es_steamid) maxhealth
	es_math bhealth + 250
	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_set 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_set 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_set 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_set 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_set 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_set color_check 0
	es_keygetvalue color_check dndExtra event_var(es_steamid) color
	if (server_var(color_check) = 255) do
	{
		es_set 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_set speed_check 0
	es_keygetvalue speed_check dndExtra event_var(es_steamid) speed
	es_math speed_check - .2
	es_set 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_set cash 0
	es_getmoney cash event_var(userid)
	es_math cash / 10
	es ma_takecash event_var(userid) server_var(cash)
	es_set 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_set 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_set 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_set 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_set color_check 0
	es_keygetvalue color_check dndExtra event_var(es_steamid) color
	if (server_var(color_check) = 255) do
	{
		es_set 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_set 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_set 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_set cash 0
	es_getmoney cash event_var(userid)
	es_math cash / 10
	es ma_takecash event_var(userid) server_var(cash)
	es_set color_check 0
	es_keygetvalue color_check dndExtra event_var(es_steamid) color
	if (server_var(color_check) = 255) do
	{
		es_set 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
	{
		foreach player player #ct "es neghealth server_var(player) 5"
	}
	if (event_var(es_userteam) = 3) do
	{
		foreach player player #t "es neghealth server_var(player) 5"			
	}
	es_set 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_set 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
	{
		foreach player player #t "es bonushealth server_var(player) 5" 
	}
	if (event_var(es_userteam) = 3) do
	{
		foreach player player #ct "es bonushealth server_var(player) 5" 
	}
}

block drow_spawn
{
	es_set 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_set color_check 0
	es_keygetvalue color_check dndExtra event_var(es_steamid) color
	if (server_var(color_check) = 255) do
	{
		es_set 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_set 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_set 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_set cash 0
	es_getmoney cash event_var(userid)
	es_math cash / 10
	es ma_takecash event_var(userid) server_var(cash)
	es_set 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_set 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_set color_check 0
	es_keygetvalue color_check dndExtra event_var(es_steamid) color
	if (server_var(color_check) = 255) do
	{
		es_set 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_set 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_set 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_set 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_set 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_set color_check 0
	es_keygetvalue color_check dndExtra event_var(es_steamid) color
	if (server_var(color_check) = 255) do
	{
		es_set 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_set 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_set 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_set 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_set 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_set 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_set 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_set 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) stealth 2
	es_delayed 10 es_keysetvalue dndExtra event_Var(es_steamid) regen 1
	es_delayed 10 regen event_var(userid) 6 5
	es_set color_check 0
	es_keygetvalue color_check dndExtra event_var(es_steamid) color
	if (server_var(color_check) = 255) do
	{
		es_set 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)
		es_math color_check - 20
		es_keysetvalue dndExtra event_var(es_steamid) color server_var(color_check)
	}
	else do
	{
					
	}
	es ma_takehealth event_var(userid) 90
	es_set 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_set 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_set 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_set 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_set 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_set 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_set 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_set 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) 50
	es_set bhealth 0
	es_keygetvalue bhealth dndExtra event_var(es_steamid) maxhealth
	es_math bhealth + 50
	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_set 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
}

// unfinished - phoenix, needs EXTENDEDEVENTS by superdave, uncomment (in extended events.cfg) the event player_water
//event player_water
//{
//	if (server_var(rcheck) = waterele) do
//	{
//		es_xset waterhealth 0
//		es_xset bonushp 0
//		es est_gethealth waterhealth event_var(userid)
//		if (event_var(state) = 1) do
//		{
//			es_xset bonushp 25
//			es ma_givehealth event_var(userid) 25
//			es_tell event_var(userid) "Your health has slightly gone up for being in your element!"
//		}
//		if (event_var(state) = 2) do
//		{
//			es_xset bonushp 50
//			es ma_givehealth event_var(userid) 50
//			es_tell event_var(userid) "Your health has moderately gone up for being in your element!"
//		}
//		if (event_var(state) = 3) do
//		{
//			es_xset bonushp 100
//			es ma_givehealth event_var(userid) 100
//			es_tell event_var(userid) "Your health has greatly gone up for being in your element!"
//		}
//		if (event_var(state) = 0) do
//		{
//			es_math waterhealth - server_var(bonushp)
//			est_sethealth event_var(userid) server_var(waterhealth)
//			es_tell event_var(userid) "Your bonus weakened for exiting your element!"
//		}
//	}
//}
	

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

block zombie_spawn
{
	es ma_sethealth event_Var(userid) 5000
	es_set 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_set 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_set 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_set 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_set userclass 0
	es_set 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_set userrace 0
	es_keygetvalue userrace dndUsers event_var(es_steamid) race
	es_set 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_set 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_set bonus 0
	es_keygetvalue bonus dndExtra event_var(es_attackersteamid) bard_dmg
	if (server_var(bonus) = 1) do
	{
		es_set dmg 0
		es_set 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 ma_sethealth event_var(userid) 0
		}
	}
	
}

block rabbit_attacker
{
	es_set 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_set 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) 1
	es_delayed 1 es ma_slap event_var(userid) 1
	es_delayed 1.5 es ma_slap event_var(userid) 1
	es_delayed 2 es ma_slap event_var(userid) 1
	es_delayed 2.5 es ma_slap event_var(userid) 1
	es_delayed 3 es ma_slap event_var(userid) 1
	es_delayed 3.5 es ma_slap event_var(userid) 1
	es_delayed 4 es ma_slap event_var(userid) 1
}

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_set save 0
		es_rand save 1 20
		if (server_var(save) != 20) do
		{
			es_set 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_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_set 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_set 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_set scheck 0
	es_keygetvalue scheck dndExtra event_var(es_attackersteamid) sneak
	if (server_var(scheck) = 0) do
	{
		es sneak_off event_var(attacker)
		es_set sneak 0
		es_keygetvalue sneak dndExtra event_var(es_attackersteamid) sneakdice
		es_set 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) 2
	es_set dmg_dr 0
	es_set 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) 2
}

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 3
	if (server_var(random) = 1) do
	{
		es est_burn event_var(attacker) 5
	}
}

block orc_attacker
{
	es_set bonus 0
	es_set 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_set 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_set cash 0
	es_set 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 7
	if (server_var(random) = 1) do
	{
		es est_drug event_var(userid) 4
	}
	es_rand random 1 7
	if (server_var(random) = 1) do
	{
		es est_SetGravity event_var(userid) 0.40
		es_delayed 3 es est_SetGravity event_var(userid) 1.00
	}
	es_rand random 1 15
	if (server_var(random) = 1) do
	{
		es ma_slap event_var(userid)
	}
}

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

block fireele_attacker
{
	es_rand random 1 6
	if (server_var(random) = 1) do
	{
		es_set 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_set 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_set bonus 0
	es_set bonus event_var(dmg_health)
	es_math bonus / 10
	es ma_givehealth event_var(userid) server_var(bonus)
}

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

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

block vampire_attacker
{
	es_set bonus 0
	es_set bonus event_var(dmg_health)
	es_math bonus / 5
	es_math bonus * 2
	es_set 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_set health 0
					es est_gethealth health event_var(attacker)
					es_math health + server_var(bonus)
					es_set maxcheck 0
					es_keygetvalue maxcheck dndExtra event_var(es_attackersteamid) maxhealth
					es_math maxcheck + server_var(bonus)
					if (server_var(maxcheck) > 250) do
					{
						es_set 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_set bonus 0
	es_set 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_set bonus 0
	es_set 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_set bonus 0
	es_set 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_set bonus 0
	es_set 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_set fbonus 0
	es_rand fbonus 1 20
	es_set 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_set 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_set check 0
					es_keygetvalue check dndExtra event_var(es_steamid) nopoison
					if (server_var(check) = 0) do
					{
						es_set 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_set bonus 0
							es_set 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_set dmg_dr 0
	es_set 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_set dmg_dr 0
	es_set 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_set dmg_dr 0
	es_set 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_set dmg_dr 0
	es_set 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_set hits 0
	es_keygetvalue hits dndExtra event_var(es_steamid) hitcount
	if (server_var(hits) >= 1) do
	{
		es_math hits + 1
	}
	else do
	{
		es_set 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_set hits 0
	es_keygetvalue hits dndExtra event_var(es_steamid) hitcount
	if (server_var(hits) >= 1) do
	{
		es_math hits + 1
	}
	else do
	{
		es_set 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_set psave 0
	es_rand psave 1 20
	if (server_var(psave) != 20) do
	{
		es_set 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_set 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_set lcheck 0
	es_keygetvalue lcheck dndUsers event_var(es_steamid) bard
	es_set lacheck 0
	es_keygetvalue lacheck dndUsers event_var(es_steamid) la
	es_math lcheck - server_var(lacheck)
	es_set color 0
	es_keygetvalue color dndExtra event_var(es_steamid) color
	es_set 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_set 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_set lcheck 0
	es_keygetvalue lcheck dndUsers event_var(es_steamid) bard
	es_set 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_set lcheck 0
	es_keygetvalue lcheck dndUsers event_var(es_attackersteamid) bard
	es_set lacheck 0
	es_keygetvalue lacheck dndUsers event_var(es_attackersteamid) la
	es_math lcheck - server_var(lacheck)
	es_set 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_set lcheck 0
	es_keygetvalue lcheck dndUsers event_var(es_steamid) bard
	es_set lacheck 0
	es_keygetvalue lacheck dndUsers event_var(es_steamid) la
	es_math lcheck - server_var(lacheck)
	if (event_var(text) = !skills) do
	{
		es_set 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_set 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_set 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_set 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_set es_userid 0
  	es_getcmduserid es_userid
	es_set es_steamid 0
	es est_getsteam es_steamid server_var(es_userid)
	es_set ccheck 0
	es_keygetvalue ccheck dndUsers server_var(es_steamid) class
	es_set lcheck 0
	es_keygetvalue lcheck dndUsers server_var(es_steamid) server_var(ccheck)	
	es_set 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_set song 0
			es_keygetvalue song dndExtra server_var(es_steamid) songs
			es_set caster_alive 0
			es est_isalive caster_alive server_var(es_userid)
			if (server_var(caster_alive) = 0) then es_set song 0
			if (server_var(song) > 0) do
			{
				es_set 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_set 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_set 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_set es_userid 0
  	es_getcmduserid es_userid
	es_set es_steamid 0
	es est_getsteam es_steamid server_var(es_userid)
	es_set ccheck 0
	es_keygetvalue ccheck dndUsers server_var(es_steamid) class
	es_set lcheck 0
	es_keygetvalue lcheck dndUsers server_var(es_steamid) server_var(ccheck)	
	es_set 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_set song 0
			es_keygetvalue song dndExtra server_var(es_steamid) songs
			es_set caster_alive 0
			es est_isalive caster_alive server_var(es_userid)
			if (server_var(caster_alive) = 0) then es_set song 0
			if (server_var(song) > 0) do
			{
				es_set 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_set 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_set steam 0
	es est_getsteam steam server_var(user)
	es_set pcheck 0
	es_keygetvalue pcheck dndUsers server_var(steam) prestige
	if (server_var(pcheck) != rpc2) do
	{
		es_set old_speed 0
		es_set new_speed 0
		es_keygetvalue old_speed dndExtra server_var(steam) speed
		es_set 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_set es_userid 0
  	es_getcmduserid es_userid
	es_set es_steamid 0
	es est_getsteam es_steamid server_var(es_userid)
	es_set ccheck 0
	es_keygetvalue ccheck dndUsers server_var(es_steamid) class
	es_set lcheck 0
	es_keygetvalue lcheck dndUsers server_var(es_steamid) server_var(ccheck)	
	es_set 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_set song 0
			es_keygetvalue song dndExtra server_var(es_steamid) songs
			es_set caster_alive 0
			es est_isalive caster_alive server_var(es_userid)
			if (server_var(caster_alive) = 0) then es_set song 0
			if (server_var(song) > 0) do
			{
				es_set 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_set 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_set save 0
	es_rand save 1 20
	if (server_var(save) != 20) do
	{
		es_set fort 0
		es_set 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_set level 10
		es_set 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_set 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_set lcheck 0
	es_keygetvalue lcheck dndUsers event_var(es_steamid) necromancer
	es_set 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_set mana 0
	es_keygetvalue mana dndExtra event_var(es_steamid) mana
	if (server_var(lcheck) >= 1) do
	{
		es_math mana + 15
		es_set 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_keysetvalue dndExtra event_var(es_steamid) rebukes 4
        es_tell event_var(userid) #green You can now rebuke undead!
		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_set lcheck 0
	es_keygetvalue lcheck dndUsers event_var(es_attackersteamid) necromancer
	es_set lacheck 0
	es_keygetvalue lacheck dndUsers event_var(es_attackersteamid) la
	es_math lcheck - server_var(lacheck)
	if (server_var(lcheck) >= 11) do
	{
		es_set mana 0
		es_set mana event_var(dmg_health)
		es_math mana / 10
		es_set usermana 0
		es_set 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_set lcheck 0
	es_keygetvalue lcheck dndUsers event_var(es_steamid) necromancer
	es_set lacheck 0
	es_keygetvalue lacheck dndUsers event_var(es_steamid) la
	es_math lcheck - server_var(lacheck)
	if (event_var(text) = !spells) do
	{
		es_set 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) >= 15) do
		{
			es_format spells "%1 !rebuke 4 Uses - Your undead gain additional hits.\n" server_var(spells)
		}
		esnq ma_msay 0 event_var(userid) server_var(spells)
	}
	if (event_Var(text) = !skills) do
	{
		es_set 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)
		}
        if (server_var(lcheck) >= 15) do
		{
			es_format spells "%1 You can use FiveSeven and Elites\n" server_var(spells)
		}
		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_set lcheck 0
	es_keygetvalue lcheck dndUsers event_var(es_steamid) necromancer
	es_set 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 #l "es zombiekill server_var(zombie) event_var(userid)"
	}
	if (event_var(es_userteam) = 3) do
	{
		est_loop zombie #l "es zombiekill server_var(zombie) event_var(userid)"
	}
}

block rebuke
{
    es_set es_userid 0
  	es_getcmduserid es_userid
	es_set es_steamid 0
	es est_getsteam es_steamid server_var(es_userid)
	es_set ccheck 0
	es_keygetvalue ccheck dndUsers server_var(es_steamid) class
	es_set lcheck 0
	es_keygetvalue lcheck dndUsers server_var(es_steamid) server_var(ccheck)	
	es_set lacheck 0
	es_keygetvalue lacheck dndUsers server_var(es_steamid) la
	es_math lcheck - server_var(lacheck)
	if (server_var(ccheck) = necromancer) do
    {
        es_xset rebukes 0
        es_keygetvalue rebukes dndExtra server_var(es_steamid) rebukes
        if (server_var(rebukes) > 0) do
        {
            es_tell server_var(es_userid) #green You have used rebuke.
            es_set rebukelevel 0
			es_keygetvalue rebukelevel dndUsers server_var(es_steamid) necromancer
			es_math rebukes - 1
			es_set rebuketarget 0
			es est_Near rebuketarget #a 600 server_var(es_userid) "es_doblock dnd/rebukeundead"
			es_keysetvalue dndExtra server_var(es_steamid) rebukes server_var(rebukes)
		}
        else do
        {
            es_tell server_var(es_userid) #green You don't have any more rebukes left this round
        }
	}
}

block rebukeundead
{
	es_set racecheck 0
	es_set zcheck 0
	es_set zsteam 0
	es est_getsteam zsteam server_var(rebuketarget)
	es_keygetvalue zcheck dndExtra server_var(zsteam) zombie
	es_keygetvalue racecheck dndUsers server_var(zsteam) race
	if (server_var(zcheck) = 1) do
	{
		es_set hits 0
		es_keygetvalue hits dndExtra server_var(zsteam) hitcount
		es_rand random 1 20
		es_math random + server_var(rebukelevel)
		if (server_var(hits) = 0) do
		{
			es_set hits 0
            es_math 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(rebuketarget) #lightgreen A Necromancer has bolstered you with vile power!
        es_tell server_var(es_userid) #green You have bolstered undead with vile power!
	}
    if (server_var(racecheck) = vampire) do
    {
        es est_health server_var(rebuketarget) + 20
        es_xset ehealth 0
        es est_gethealth ehealth server_var(rebuketarget)
        
        es_xset bhealth 0
        es_keygetvalue bhealth dndExtra server_var(zsteam) maxhealth
        
        if (server_var(bhealth) < server_var(ehealth)) then es_keysetvalue dndExtra server_var(zsteam) maxhealth server_var(ehealth)
        
        es_tell server_var(rebuketarget) #lightgreen A Necromancer has bolstered you with vile power!
        es_tell server_var(es_userid) #green You have bolstered undead with vile power!
    }
}

block zombiekill
{
	es_set userid 0
	es_set necroid 0

  	es_getargv userid 1
  	es_getargv necroid 2

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

	if (server_var(zcheck) = 1) do
	{
		es_set 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_set lcheck 0
	es_keygetvalue lcheck dndUsers event_var(es_attackersteamid) necromancer
	es_set lacheck 0
	es_keygetvalue lacheck dndUsers event_var(es_attackersteamid) la
	es_math lcheck - server_var(lacheck)
	if (server_var(lcheck) >= 7) do
	{
		es_set 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_set es_userid 0
  	es_getcmduserid es_userid
	es_set es_steamid 0
	es est_getsteam es_steamid server_var(es_userid)
	es_set ccheck 0
	es_keygetvalue ccheck dndUsers server_var(es_steamid) class
	es_set lcheck 0
	es_keygetvalue lcheck dndUsers server_var(es_steamid) server_var(ccheck)	
	es_set 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_set mana 0
			es_keygetvalue mana dndExtra server_var(es_steamid) mana
			es_set caster_alive 0
			es est_isalive caster_alive server_var(es_userid)
			if (server_var(caster_alive) = 0) then es_set mana 0
			if (server_var(mana) >= 15) do
			{
				es_set point z7
				es est_getviewplayer server_var(es_userid) point
				if (server_var(point) != z7) do
				{
					es_math mana - 15
					es_set save 0
					es_set 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_set es_userid 0
  	es_getcmduserid es_userid
	es_set es_steamid 0
	es est_getsteam es_steamid server_var(es_userid)
	es_set ccheck 0
	es_keygetvalue ccheck dndUsers server_var(es_steamid) class
	es_set lcheck 0
	es_keygetvalue lcheck dndUsers server_var(es_steamid) server_var(ccheck)	
	es_set 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_set mana 0
			es_keygetvalue mana dndExtra server_var(es_steamid) mana
			es_set caster_alive 0
			es est_isalive caster_alive server_var(es_userid)
			if (server_var(caster_alive) = 0) then es_set 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 close zombiemenu server_var(es_userid)
					popup delete zombiemenu
					popup create zombiemenu
					popup addline zombiemenu " Choose a dead teamate to turn into a undead:"
					es_set zplayer 0
					es_set team_check 0
					es est_getteam team_check server_var(es_userid)
					es_set znumber 0
					if (server_var(team_check) = 3) do
					{
						foreach player zplayer #dead#ct "es_xdoblock dnd/zmenuadd"
					}
					if (server_var(team_check) = 2) do
					{
						foreach player zplayer #dead#t "es_xdoblock dnd/zmenuadd"
					}
					popup menuselect zombiemenu dnd/raiseplayer
					es_set 1check 0
					es_keygetvalue 1check dndExtra server_var(es_steamid) 1
					if (server_var(1check) != 0) do
					{
						es mcudnd server_var(es_userid)
						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_set zsteam 0
	es est_getsteam zsteam server_var(zplayer)
	es_set zcheck 0
	es_keygetvalue zcheck dndExtra server_var(zsteam) zombie
	if (server_var(zcheck) = 0) do
	{
		es_set zteam 0
		es est_getteam zteam server_var(zplayer)
		if (server_var(zteam) >= 2) do
		{
			es_set zname 0
			es est_getname zname server_var(zplayer)
			if (server_var(znumber) = 0) do
			{
				es_set 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_set necsteam 0
	es est_getsteam necsteam server_var(_popup_userid)
	es_set zplayer 0
	if (server_var(_popup_choice) = 1) do
	{
		es_keygetvalue zplayer dndExtra server_var(necsteam) 1
		es mcudnd server_var(_popup_userid)
		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 mcudnd server_var(_popup_userid)
			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 mcudnd server_var(_popup_userid)
			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 mcudnd server_var(_popup_userid)
			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 mcudnd server_var(_popup_userid)
			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 mcudnd server_var(_popup_userid)
			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 mcudnd server_var(_popup_userid)
			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 mcudnd server_var(_popup_userid)
			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 mcudnd server_var(_popup_userid)
			es popup send zombieghoul server_var(_popup_userid)
		}
	}
}

block aoefire
{
	es_set es_userid 0
  	es_getcmduserid es_userid
	es_set es_steamid 0
	es est_getsteam es_steamid server_var(es_userid)
	es_set ccheck 0
	es_keygetvalue ccheck dndUsers server_var(es_steamid) class
	es_set lcheck 0
	es_keygetvalue lcheck dndUsers server_var(es_steamid) server_var(ccheck)	
	es_set 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_set spell 0
			es_keygetvalue spell dndExtra server_var(es_steamid) spell
			if(server_var(spell) = 0) do
			{
				if (server_var(lcheck) > 10) then es_set lcheck 10
				es_set delay server_var(lcheck)
				es_math delay / 2
				if (server_var(delay) >= 5) then es_set 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_set mana 0
				es_keygetvalue mana dndExtra server_var(es_steamid) mana
				es_set caster_alive 0
				es est_isalive caster_alive server_var(es_userid)
				if (server_var(caster_alive) = 0) then es_set 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_set save 0
	es_set ref 0
	es_rand save 1 20
	if (server_var(save) != 20) do
	{
		if (server_var(es_userid) != server_var(burnvic)) do
		{
			es_set steamcheck 0
			es est_getsteam steamcheck server_var(burnvic)
			es_keygetvalue ref dndExtra server_var(steamcheck) reflexsave
			es_math save + server_var(ref)
			es_set dmg 5
			es_math dmg * server_var(lcheck)
			es_set 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_set lcheck 0
	es_keygetvalue lcheck dndUsers event_var(es_steamid) monk
	es_set 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_set color 0
	es_keygetvalue color dndExtra event_var(es_steamid) color
	es_set 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_set lcheck 0
	es_keygetvalue lcheck dndUsers event_var(es_attackersteamid) monk
	es_set lacheck 0
	es_keygetvalue lacheck dndUsers event_var(es_attackersteamid) la
	es_math lcheck - server_var(lacheck)
	es_set bonus 0
	es_set bonus event_Var(dmg_health)
	es stealth_off event_var(attacker)
	if (server_var(lcheck) >= 4) do
	{
		if (server_var(lcheck) <= 9) do
		{
			es_math bonus / 3
			es point_hurt event_var(attacker) event_var(userid) server_var(bonus)
		}
	}
	if (server_var(lcheck) >= 10) do
	{
		if (server_var(lcheck) <= 15) do
		{
			es_set btmp 0
			es_set btmp server_var(bonus)
			es math btmp / 3 
			es math bonus - server_var(btmp)
			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_set lcheck 0
	es_keygetvalue lcheck dndUsers event_var(es_steamid) monk
	es_set 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_set dr 0
		es_set dr event_Var(dmg_health)
		es_math dr / 5
		es ma_givehealth event_var(userid) server_var(dr)
	}
}

block monk_say
{
	es_set lcheck 0
	es_keygetvalue lcheck dndUsers event_var(es_steamid) monk
	es_set 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_set monk_skills "Monk's Skills:\n"
		es_set 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_set speed 0
		es_set 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_set speed 5
		}
		if (server_var(lcheck) >= 4) do
		{
			es_set 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_set lcheck 0
	es_keygetvalue lcheck dndUsers event_var(es_steamid) ranger
	es_set lacheck 0
	es_keygetvalue lacheck dndUsers event_var(es_steamid) la
	es_math lcheck - server_var(lacheck)
	es_set 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_set scheck 0
	es_keygetvalue scheck dndExtra event_var(es_steamid) style
	if (server_var(scheck) = 0) do
	{
		es_set 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_set 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 + .03
		}
		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 + .03
		}
		if (server_var(lcheck) >= 9) do
		{
			es_math speed_check + .03
		}
		if (server_var(lcheck) >= 13) do
		{
			es_math speed_check + .03
		}
		if (server_var(lcheck) >= 17) do
		{
			es_math speed_check + .03
		}
		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_set 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_set 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_set lcheck 0
	es_keygetvalue lcheck dndUsers event_var(es_steamid) ranger
	es_set lacheck 0
	es_keygetvalue lacheck dndUsers event_var(es_steamid) la
	es_math lcheck - server_var(lacheck)
	es_set mana 0
	es_set scheck 0
	es_keygetvalue scheck dndExtra event_var(es_steamid) style
	if (server_var(scheck) = 0) do
	{
		es_set 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_set ranger_skills "Ranger Skills:\n"
			if (server_var(lcheck) >= 1) do
			{
				es_set 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_set ranger_skills "Ranger Skills:\n"
			es_set 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_set lcheck 0
	es_keygetvalue lcheck dndUsers event_var(es_steamid) ranger
	es_set lacheck 0
	es_keygetvalue lacheck dndUsers event_var(es_steamid) la
	es_math lcheck - server_var(lacheck)
	es stealth_off event_var(userid)
	es_set scheck 0
	es_keygetvalue scheck dndExtra event_var(es_steamid) style
	if (server_var(scheck) = 0) do
	{
		es_set 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 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.
			}
		}		
	}
	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_set lcheck 0
	es_keygetvalue lcheck dndUsers event_var(es_attackersteamid) ranger
	es_set lacheck 0
	es_keygetvalue lacheck dndUsers event_var(es_attackersteamid) la
	es_math lcheck - server_var(lacheck)
	es_set scheck 0
	es_keygetvalue scheck dndExtra event_var(es_attackersteamid) style
	if (server_var(scheck) = 0) do
	{
		es_set 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_set save 0
			es_set 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) < 16) do
				{
					es est_drug event_var(userid) 3
				}
			}
		}
	}
	if (server_var(scheck) = archer) do
	{
		if (server_var(lcheck) >= 2) do
		{
			es_set save 0
			es_set 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_set 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_set 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)
		}
		es stealth_off event_var(attacker)
	}
}

block track
{
	es_set es_userid 0
	es_getcmduserid es_userid
	es_set es_steamid 0
	es est_getsteam es_steamid server_var(es_userid)
	es_set ccheck 0
	es_keygetvalue ccheck dndUsers server_var(es_steamid) class
	es_set lcheck 0
	es_keygetvalue lcheck dndUsers server_var(es_steamid) server_var(ccheck)	
	es_set 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_set mana 0
			es_keygetvalue mana dndExtra server_var(es_steamid) mana
			es_set caster_alive 0
			es est_isalive caster_alive server_var(es_userid)
			if (server_var(caster_alive) = 0) then es_set mana 0
			if (server_var(mana) >= 15) do
			{
				es_math mana - 15
				es_keysetvalue dndExtra server_var(es_steamid) mana server_var(mana)
				es_set team 0
				es est_getteam team server_var(es_userid)
				 if (server_var(team) = 2) do
				{
					es_set truid 0
					es ma_beacon #ct 1                    
					foreach player truid #ct#alive "es test_stealth server_var(truid) 5"
					es_delayed 2 ma_beacon #ct 0
				}
				if (server_var(team) = 3) do
				{
					es_set truid 0
					es ma_beacon #t 1
					foreach player truid #t#alive "es test_stealth server_var(truid) 5"
					es_delayed 2 ma_beacon #t 0
				}
			}
		}
	}
}

block test_stealth
{
    es_set dnd_ruserid 0
	es_set dnd_rduration 0

  	es_getargv dnd_ruserid 1
  	es_getargv dnd_rduration 2   
    
    es_set rsteamcheck 0
	es est_getsteam rsteamcheck server_var(dnd_ruserid)
    
    es_xset color_check 0
    es_keygetvalue color_check dndUsers server_var(rsteamcheck) color
    
    es_tell server_var(dnd_ruserid) #green A Ranger is tracking you!
    
    if (server_var(color_check) < 255) do
    {
        es stealth_off server_var(dnd_ruserid)
        es_delayed server_var(dnd_rduration) stealth_on server_var(dnd_ruserid)
    }
}

block entangle
{
	es_set es_userid 0
  	es_getcmduserid es_userid
	es_set es_steamid 0
	es est_getsteam es_steamid server_var(es_userid)
	es_set ccheck 0
	es_keygetvalue ccheck dndUsers server_var(es_steamid) class
	es_set lcheck 0
	es_keygetvalue lcheck dndUsers server_var(es_steamid) server_var(ccheck)	
	es_set 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_set spell 0
			es_keygetvalue spell dndExtra server_var(es_steamid) spell
			if(server_var(spell) = 0) do
			{
				es_set mana 0
				es_keygetvalue mana dndExtra server_var(es_steamid) mana
				es_set caster_alive 0
				es est_isalive caster_alive server_var(es_userid)
				if (server_var(caster_alive) = 0) then es_set mana 0
				if (server_var(mana) >= 5) do
				{
					es_set point z7
					es est_getviewplayer server_var(es_userid) point
					es_set 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_set save 0
						es_set 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_set 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_set dnd_ruserid 0
	es_set dnd_rduration 0

  	es_getargv dnd_ruserid 1
  	es_getargv dnd_rduration 2
	
	es_set rsteamcheck 0
	es est_getsteam rsteamcheck server_var(dnd_ruserid)
	es_set save 0
	es_set 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_set 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_set lcheck 0
	es_keygetvalue lcheck dndUsers event_var(es_steamid) paladin
	es_set lacheck 0
	es_keygetvalue lacheck dndUsers event_var(es_steamid) la
	es_math lcheck - server_var(lacheck)
	es_set mana 0
	if (server_var(lcheck) <= 0) do
	{
		es_doblock dnd/la_low
		es_math lcheck + server_var(lacheck)
	}
	es_set health 0
	es_set thealth 0
	if (server_var(lcheck) >= 1) do
	{
		es_set health 1
		es_set 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_set 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_set maxpalidin 0
		es_keygetvalue maxpalidin dndExtra event_var(es_steamid) maxhealth
		if (server_var(maxpalidin) < 139) do
		{
			foreach player player #t "es bonushealth server_var(player) server_var(thealth)"
		}
	}
	if (event_var(es_userteam) = 3) do
	{
		es_set maxpalidin 0
		es_keygetvalue maxpalidin dndExtra event_var(es_steamid) maxhealth
		if (server_var(maxpalidin) < 139) do
		{
			foreach player player #ct "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_set racheck 0
	es_keygetvalue racheck dndUsers event_var(es_steamid) race
	if (server_var(racheck) != vampire) do
	{
		es ma_givehealth event_var(userid) server_var(health)
		es_set 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_set lcheck 0
	es_keygetvalue lcheck dndUsers event_var(es_steamid) paladin
	es_set lacheck 0
	es_keygetvalue lacheck dndUsers event_var(es_steamid) la
	es_math lcheck - server_var(lacheck)
	if (event_var(text) = !skills) do
	{
		es_set 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_set 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_set lcheck 0
	es_keygetvalue lcheck dndUsers event_var(es_steamid) paladin
	es_set 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_set dr 0
		es_set 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_set thorns 0
			es_set 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_set lcheck 0
	es_keygetvalue lcheck dndUsers event_var(es_attackersteamid) paladin
	es_set 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_set 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_set bouns 0
		es_set 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_set lcheck 0
	es_keygetvalue lcheck dndUsers event_var(es_steamid) fighter
	es_set lacheck 0
	es_keygetvalue lacheck dndUsers event_var(es_steamid) la
	es_set health 0
	es_set 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_set lcheck 5
	}
	if (server_var(pcheck) = fpc2) do
	{
		es_doblock dnd/fpc2_spawn
		es_set lcheck 10
	}
	if (server_var(pcheck) = fpc3) do
	{
		es_doblock dnd/fpc3_spawn
		es_set 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_set racheck 0
	es_keygetvalue racheck dndUsers event_var(es_steamid) race
	if (server_var(racheck) != vampire) do
	{
		es ma_givehealth event_var(userid) server_var(health)
		es_set 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_set lcheck 0
	es_keygetvalue lcheck dndUsers event_var(es_steamid) fpc1
	es_set lacheck 0
	es_keygetvalue lacheck dndUsers event_var(es_steamid) la
	es_math lcheck - server_var(lacheck)
	es_set mana 0
	if (server_var(lcheck) < 0) do
	{
		es_doblock dnd/la_low
		es_math lcheck + server_var(lacheck)
	}
	es_set nades 0
	es_set flash 0
	if (server_var(lcheck) >= 1) do
	{
		es_set nades 1
		es_tell event_var(userid) #green You can use !he to spawn a hegrenade.
	}
	if (server_var(lcheck) >= 3) do
	{
		es_set 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_set lcheck 0
	es_keygetvalue lcheck dndUsers event_var(es_steamid) fpc2
	es_set lacheck 0
	es_keygetvalue lacheck dndUsers event_var(es_steamid) la
	es_math lcheck - server_var(lacheck)
	es_set mana 0
	es_set kensaipts 0
	if (server_var(lcheck) < 0) do
	{
		es_doblock dnd/la_low
		es_math lcheck + server_var(lacheck)
	}
	es_set dcount 0
	if (server_var(lcheck) >= 1) do
	{
		es_set kensaipts 1
		es mcudnd event_var(userid)
		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_set lcheck 0
	es_keygetvalue lcheck dndUsers event_var(es_steamid) fpc3
	es_set lacheck 0
	es_keygetvalue lacheck dndUsers event_var(es_steamid) la
	es_math lcheck - server_var(lacheck)
	es_set 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_set 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_set lcheck 0
	es_keygetvalue lcheck dndUsers event_var(es_steamid) fighter
	es_set lacheck 0
	es_keygetvalue lacheck dndUsers event_var(es_steamid) la
	es_set 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_set lcheck 5
	}
	if (server_var(pcheck) = fpc2) do
	{
		es_doblock dnd/fpc2_victim
		es_set lcheck 10
	}
	if (server_var(pcheck) = fpc3) do
	{
		es_doblock dnd/fpc3_victim
		es_set lcheck 15
	}

	if (server_var(lcheck) >= 4) do
	{
		es_set dmg 0
		es_set 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_set dmg 0
		es_set dmg event_var(dmg_health)
		es_math dmg / 10
		es ma_givehealth event_var(userid) server_var(dmg)
	}
}

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

block fpc2_victim
{
	es_set lcheck 0
	es_keygetvalue lcheck dndUsers event_var(es_steamid) fpc2
	es_set lacheck 0
	es_keygetvalue lacheck dndUsers event_var(es_steamid) la
	es_math lcheck - server_var(lacheck)
	es_set mana 0
	if (server_var(lcheck) < 0) do
	{
		es_doblock dnd/la_low
		es_math lcheck + server_var(lacheck)
	}
	es_set dcheck 0
	es_keygetvalue dcheck dndExtra event_var(es_steamid) defend
	if (server_var(dcheck) = 1) do
	{
		es_set dmg 0
		es_set 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_set lcheck 0
	es_keygetvalue lcheck dndUsers event_var(es_steamid) fpc3	
}

block fighter_attacker
{
	es_set lcheck 0
	es_keygetvalue lcheck dndUsers event_var(es_attackersteamid) fighter
	es_set lacheck 0
	es_keygetvalue lacheck dndUsers event_var(es_attackersteamid) la
	es_set 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_set lcheck 5
	}
	if (server_var(pcheck) = fpc2) do
	{
		es_doblock dnd/fpc2_attacker
		es_set lcheck 10
	}
	if (server_var(pcheck) = fpc3) do
	{
		es_doblock dnd/fpc3_attacker
		es_set 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_set refsave 0
		es_set 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_set fortsave 0
			es_set 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_set 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_set dmg 0
		es_set 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_set lcheck 0
	es_keygetvalue lcheck dndUsers event_var(es_attackersteamid) fpc1
	es_set lacheck 0
	es_keygetvalue lacheck dndUsers event_var(es_attackersteamid) la
	es_math lcheck - server_var(lacheck)
	es_set 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 est_freeze event_var(userid) 1
			es_delayed 3 es ets_freeze event_var(userid) 0
		}
	}
}

block fpc2_attacker
{
	es_set lcheck 0
	es_keygetvalue lcheck dndUsers event_var(es_attackersteamid) fpc2
	es_set dmgcheck 0
	es_set drunkcheck 0
	es_set freezecheck 0
	es_set disarmcheck 0
	es_set firecheck 0
	es_set manacheck 0
	es_set leechcheck 0
	es_set visioncheck 0
	es_set 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_set 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_set save 0
			es_rand save 1 20
			if (server_var(save) != 20) do
			{
				es_set 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_set save 0
			es_rand save 1 20
			if (server_var(save) != 20) do
			{
				es_set 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_set save 0
			es_rand save 1 20
			if (server_var(save) != 20) do
			{
				es_set 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_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_set save 0
			es_rand save 1 20
			if (server_var(save) != 20) do
			{
				es_set 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_set mana 0
		es_keygetvalue mana dndExtra event_var(es_steamid) mana
		es_math mana - 10
		if (server_var(mana) < 0) then es_set mana 0
		es_keysetvalue dndExtra event_var(es_steamid) mana server_var(mana)
	}
	if (server_var(leechcheck) = 1) do
	{
		es_rand random 1 4
		if (server_var(random) = 1) do
		{
			es_set 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_set vamp 0
						es_set vamp event_var(dmg_health)
						es_math vamp / 2
						es_set 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_set mhealth 0
						es_keygetvalue mhealth dndExtra event_var(es_attackersteamid) maxhealth
						es_math mhealth + server_var(vamp)
						if (server_var(mhealth) > 200) then es_set 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_set save 0
			es_rand save 1 20
			if (server_var(save) != 20) do
			{
				es_set 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_set lcheck 0
	es_keygetvalue lcheck dndUsers event_var(es_attackersteamid) fpc3
	es_set lacheck 0
	es_keygetvalue lacheck dndUsers event_var(es_attackersteamid) la
	es_math lcheck - server_var(lacheck)
	es_set 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_set 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_set lcheck 0
	es_keygetvalue lcheck dndUsers event_var(es_steamid) fighter
	es_set lacheck 0
	es_keygetvalue lacheck dndUsers event_var(es_steamid) la
	es_set 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_set plcheck 0
	es_keygetvalue plcheck dndUsers event_var(es_steamid) server_var(pcheck)
	if (server_var(pcheck) = fpc1) do
	{
		es_set lcheck 5
	}
	if (server_var(pcheck) = fpc2) do
	{
		es_set lcheck 10
	}
	if (server_var(pcheck) = fpc3) do
	{
		es_set lcheck 15
	}

	if (event_var(text) = !skills) do
	{
		es_set fighter_skills "Fighter's Skills:\n"
		if (server_var(lcheck) >= 1) do
		{
			es_set 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_set 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_set nades 0
			es_set flash 0
			if (server_var(plcheck) >= 1) do
			{
				es_set 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_set 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_set 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_set es_userid 0
  	es_getcmduserid es_userid
	es_set es_steamid 0
	es est_getsteam es_steamid server_var(es_userid)
	es_set pcheck 0
	es_keygetvalue pcheck dndUsers server_var(es_steamid) prestige
	es_set 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_set 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_set es_userid 0
  	es_getcmduserid es_userid
	es_set es_steamid 0
	es est_getsteam es_steamid server_var(es_userid)
	es_set pcheck 0
	es_keygetvalue pcheck dndUsers server_var(es_steamid) prestige
	es_set 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_set 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_set userid 0
  	es_getcmduserid userid
	es_set es_steamid 0
	es est_getsteam es_steamid server_var(userid)
	es_set pcheck 0
	es_keygetvalue pcheck dndUsers server_var(es_steamid) prestige
	es_set lcheck 0
	es_keygetvalue lcheck dndUsers server_var(es_steamid) server_var(pcheck)
	es_set lacheck 0
	es_keygetvalue lacheck dndUsers server_var(es_steamid) la
	es_math lcheck - server_var(lacheck)
	es_set mana 0
	if (server_var(pcheck) = fpc2) do
	{
		if (server_var(lcheck) >= 1) do
		{
			es_set dcount 0
			es_keygetvalue dcount dndExtra server_var(es_steamid) dcounter
			if (sever_var(dcount) > 0) do
			{
				es_set dcheck 0
				es_keygetvalue dcheck dndExtra server_var(es_steamid) defend
				if (server_var(dcheck) = 0)
				{
					es_set 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_set 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_set lcheck 0
	es_keygetvalue lcheck dndUsers event_var(es_steamid) rogue
	es_set lacheck 0
	es_keygetvalue lacheck dndUsers event_var(es_steamid) la
	es_set sneak 0
	es_set stealth 0
	es_keygetvalue stealth dndExtra event_var(es_steamid) color
	// 
	es_set slowuses 4
	es_set 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_set lcheck 5
	}
	if (server_var(pcheck) = rpc2) do
	{
		es_doblock dnd/rpc2_spawn
		es_set lcheck 10
	}
	if (server_var(pcheck) = rpc3) do
	{
		es_doblock dnd/rpc3_spawn
		es_set 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_set lcheck 0
	es_keygetvalue lcheck dndUsers event_var(es_steamid) rpc1
	es_set lacheck 0
	es_keygetvalue lacheck dndUsers event_var(es_steamid) la
	es_math lcheck - server_var(lacheck)
	es_set mana 0
	if (server_var(lcheck) < 0) do
	{
		es_doblock dnd/la_low
		es_math lcheck + server_var(lacheck)
	}
	es_set speed_check 0
	es_keygetvalue speed_check dndExtra event_var(es_steamid) speed
	es_set 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_set lcheck 0
	es_keygetvalue lcheck dndUsers event_var(es_steamid) rpc2
	es_set lacheck 0
	es_keygetvalue lacheck dndUsers event_var(es_steamid) la
	es_math lcheck - server_var(lacheck)
	es_set mana 0
	if (server_var(lcheck) < 0) do
	{
		es_doblock dnd/la_low
		es_math lcheck + server_var(lacheck)
	}
	es_set sdice 0
	es_set 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_set lcheck 0
	es_keygetvalue lcheck dndUsers event_var(es_steamid) rpc3
	es_set lacheck 0
	es_keygetvalue lacheck dndUsers event_var(es_steamid) la
	es_math lcheck - server_var(lacheck)
	es_set 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_set 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_set x 0
		es_set y 0
		es_set 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_set 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_set lcheck 0
	es_keygetvalue lcheck dndUsers event_var(es_steamid) rogue
	es_set lacheck 0
	es_keygetvalue lacheck dndUsers event_var(es_steamid) la
	es_set 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_set lcheck 5
	}
	if (server_var(pcheck) = rpc2) do
	{
		es_doblock dnd/rpc2_victim
		es_set lcheck 10
	}
	if (server_var(pcheck) = rpc3) do
	{
		es_doblock dnd/rpc3_victim
		es_set 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_set lcheck 0
	es_keygetvalue lcheck dndUsers event_var(es_steamid) rpc1
}

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

block rpc3_victim
{
	es_set 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_set lcheck 0
	es_keygetvalue lcheck dndUsers event_var(es_attackersteamid) rogue
	es_set lacheck 0
	es_keygetvalue lacheck dndUsers event_var(es_attackersteamid) la
	es_set 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_set lcheck 5
	}
	if (server_var(pcheck) = rpc2) do
	{
		es_doblock dnd/rpc2_attacker
		es_set lcheck 10
	}
	if (server_var(pcheck) = rpc3) do
	{
		es_doblock dnd/rpc3_attacker
		es_set 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_set 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_set scheck 0
	es_keygetvalue scheck dndExtra event_var(es_attackersteamid) sneak
	if (server_var(scheck) = 0) do
	{
        es sneak_off event_var(attacker)
        es_set sneak 0
        es_keygetvalue sneak dndExtra event_var(es_attackersteamid) sneakdice
        
        es_xset sneak_damage 0
        
        if (server_var(sneak) > 0) then es_xdoblock dnd/calculate_sneak_attack
        
        es point_hurt event_var(attacker) event_var(userid) server_var(sneak_damage)    
    
        es_tell event_var(attacker) #green You dealt server_var(sneak_damage) bonus damage with a sneak attack.
        es_tell event_var(userid) #lightgreen You have been hit by a sneak attack!!

		if (server_var(lcheck) >= 19) do
		{
			es_set save 0
			es_set 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_set 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 calculate_sneak_attack
{   
    es_xset damage_roll 0
    es_rand damage_roll 1 6
    
    es_math sneak_damage + server_var(damage_roll)
    
    es_math sneak - 1
    
    if (server_var(sneak) > 0) then es_xdoblock dnd/calculate_sneak_attack
}

event player_jump
{
	es_set 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_set 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_set lcheck 0
	es_keygetvalue lcheck dndUsers event_var(es_steamid) rpc1
	es_set lacheck 0
	es_keygetvalue lacheck dndUsers event_var(es_steamid) la
	es_math lcheck - server_var(lacheck)
	es_set mana 0
	if (server_var(lcheck) <= 0) do
	{
		es_doblock dnd/la_low
		es_math lcheck + server_var(lacheck)
	}
	es_set rcheck 0
	es_keygetvalue rcheck dndUsers event_var(es_steamid) race
	es_set 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_set 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_set lcheck 0
	es_keygetvalue lcheck dndUsers event_var(es_attackersteamid) rpc1
}

block rpc2_attacker
{
	es_set lcheck 0
	es_keygetvalue lcheck dndUsers event_var(es_attackersteamid) rpc2
	es_set lacheck 0
	es_keygetvalue lacheck dndUsers event_var(es_attackersteamid) la
	es_math lcheck - server_var(lacheck)
	es_set mana 0
	es_set 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_set vclass 0
			es_keygetvalue vclass dndUsers event_var(es_steamid) class
			es_set vlevel 0
			es_keygetvalue vlevel dndUsers event_var(es_steamid) server_var(vclass)
			es_set vrandom 0
			es_rand vrandom 1 20
			if (server_var(vrandom) != 20) do
			{
				es_set reflexsave 0
				es_keygetvalue reflexsave dndExtra event_var(es_steamid) reflexsave
				es_math vrandom + server_var(reflexsave)
				es_set 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_set vrandom 0
					es_rand vrandom 1 20
					es_set 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_set scheck 0
	es_keygetvalue scheck dndExtra event_var(es_attackersteamid) sneak
	if (server_var(scheck) = 1) do
	{
		if (server_var(lcheck) >= 9) do
		{
			es_set save 0
			es_set 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_set 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_set slowcheck 0
	es_keygetvalue slowcheck dndExtra event_var(es_steamid) slowpoison
	if (server_var(slowcheck) = 0) do
	{
		es_set 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_set save 0
			es_rand save 1 20
			if (server_var(save) != 20) do
			{
				es_set 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_set oldspeed 0
					es_keygetvalue oldspeed dndExtra event_var(es_steamid) speed
					es_set 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_set lcheck 0
	es_keygetvalue lcheck dndUsers event_var(es_attackersteamid) rpc3
}

block rogue_say
{
	es_set lcheck 0
	es_keygetvalue lcheck dndUsers event_var(es_steamid) rogue
	es_set lacheck 0
	es_keygetvalue lacheck dndUsers event_var(es_steamid) la
	es_set 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_set plcheck 0
	es_keygetvalue plcheck dndUsers  event_var(es_steamid) server_var(pcheck)
	if (server_var(pcheck) = rpc1) do
	{
		es_set lcheck 5
	}
	if (server_var(pcheck) = rpc2) do
	{
		es_set lcheck 10
	}
	if (server_var(pcheck) = rpc3) do
	{
		es_set lcheck 15
	}

	if (event_var(text) = !skills) do
	{
		es_set 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_set grav 100
			es_set speed 0
			if (server_var(plcheck) >= 1) do
			{
				es_math grav - 20
			}
			if (server_var(plcheck) >= 2) do
			{
				es_math grav - 5
				es_set 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 (Slows)\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_set 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_set sdice 0
		es_set 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_set es_userid 0
  	es_getcmduserid es_userid
	es_set es_steamid 0
	es est_getsteam es_steamid server_var(es_userid)
	es_set pcheck 0
	es_keygetvalue pcheck dndUsers server_var(es_steamid) prestige
	es_set lcheck 0
	es_keygetvalue lcheck dndUsers server_var(es_steamid) server_var(pcheck)
	es_set lacheck 0
	es_keygetvalue lacheck dndUsers server_var(es_steamid) la
	es_math lcheck - server_var(lacheck)
	es_set mana 0
	if (server_var(pcheck) = rpc1) do
	{
		if (server_var(lcheck) >= 5) do
		{
			es_set timer 0
			es_keygetvalue timer dndExtra server_var(es_steamid) delay_speed
			if (server_var(timer) != 1) do
			{
				es_set old_speed 0
				es_keygetvalue old_speed dndExtra server_var(es_steamid) speed
				es_set 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_set es_userid 0
  	es_getcmduserid es_userid
	es_set es_steamid 0
	es est_getsteam es_steamid server_var(es_userid)
	es_set pcheck 0
	es_keygetvalue pcheck dndUsers server_var(es_steamid) prestige
	es_set 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_set 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_set es_userid 0
  	es_getcmduserid es_userid
	es_set es_steamid 0
	es est_getsteam es_steamid server_var(es_userid)
	es_set pcheck 0
	es_keygetvalue pcheck dndUsers server_var(es_steamid) prestige
	es_set lcheck 0
	es_keygetvalue lcheck dndUsers server_var(es_steamid) rpc2
	es_set lacheck 0
	es_keygetvalue lacheck dndUsers server_var(es_steamid) la
	es_math lcheck - server_var(lacheck)
	es_set mana 0
	if (server_var(pcheck) = rpc2) do
	{
		if (server_var(lcheck) >= 1) do
		{
			es_set timer 0
			es_keygetvalue timer dndExtra server_var(es_steamid) delay_counter
			if (server_var(timer) != 1) do
			{
				es_set 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_set es_userid 0
  	es_getcmduserid es_userid
	es_set es_steamid 0
	es est_getsteam es_steamid server_var(es_userid)
	es_set pcheck 0
	es_keygetvalue pcheck dndUsers server_var(es_steamid) prestige
	es_set lcheck 0
	es_keygetvalue lcheck dndUsers server_var(es_steamid) rpc2
	if (server_var(pcheck) = rpc2) do
	{
		if (server_var(lcheck) >= 1) do
		{
			es_set timer 0
			es_keygetvalue timer dndExtra server_var(es_steamid) delay_counter
			if (server_var(timer) != 1) do
			{
				es_set 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_set es_userid 0
  	es_getcmduserid es_userid
	es_set es_steamid 0
	es est_getsteam es_steamid server_var(es_userid)
	es_set pcheck 0
	es_keygetvalue pcheck dndUsers server_var(es_steamid) prestige
	es_set lcheck 0
	es_keygetvalue lcheck dndUsers server_var(es_steamid) rpc3
	es_set lacheck 0
	es_keygetvalue lacheck dndUsers server_var(es_steamid) la
	es_math lcheck - server_var(lacheck)
	es_set mana 0
	if (server_var(pcheck) = rpc3) do
	{
		if (server_var(lcheck) >= 3) do
		{
			es_set x 0
			es_set y 0
			es_set 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_set lcheck 0
	es_keygetvalue lcheck dndUsers event_var(es_steamid) rogue
	es_set pcheck 0
	es_keygetvalue pcheck dndUsers event_var(es_steamid) prestige
	if (server_var(pcheck) = rpc1) do
	{
		es_doblock dnd/rpc1_death
		es_set lcheck 5
	}
	if (server_var(pcheck) = rpc2) do
	{
		es_doblock dnd/rpc2_death
		es_set lcheck 10
	}
	if (server_var(pcheck) = rpc3) do
	{
		es_doblock dnd/rpc3_death
		es_set lcheck 15
	}
}

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

block rpc2_death
{
	es_set 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_set lcheck 0
	es_keygetvalue lcheck dndUsers event_var(es_steamid) rpc3
}

block wizard_spawn
{
	es_set lcheck 0
	es_keygetvalue lcheck dndUsers event_var(es_steamid) wizard
	es_set lacheck 0
	es_keygetvalue lacheck dndUsers event_var(es_steamid) la
	es_set 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_set lcheck 5
		es_doblock dnd/wpc1_spawn
	}
	if (server_var(pcheck) = wpc2) do
	{
		es_set lcheck 10
		es_doblock dnd/wpc2_spawn
	}
	if (server_var(pcheck) = wpc3) do
	{
		es_set lcheck 15
		es_doblock dnd/wpc3_spawn
	}
	es_set mana 0
	es_keygetvalue mana dndExtra event_var(es_steamid) mana
	if (server_var(lcheck) >= 1) do
	{
		es_math mana + 15
		es_set 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_set lcheck 5
	es_set plcheck 0
	es_keygetvalue plcheck dndUsers event_var(es_steamid) wpc1
	es_set lacheck 0
	es_keygetvalue lacheck dndUsers event_var(es_steamid) la
	es_math plcheck - server_var(lacheck)
	es_set mana 0
	if (server_var(plcheck) < 0) do
	{
		es_doblock dnd/la_low
		es_math plcheck + server_var(lacheck)
	}
	es_set 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_set lcheck 10
	es_set plcheck 0
	es_keygetvalue plcheck dndUsers event_var(es_steamid) wpc2
	es_set mana 0
	es_keygetvalue mana dndExtra event_var(es_steamid) mana
	es_set lacheck 0
	es_keygetvalue lacheck dndUsers event_var(es_steamid) la
	es_math plcheck - server_var(lacheck)
	es_set 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_set plcheck 0
	es_keygetvalue plcheck dndUsers event_var(es_steamid) wpc3
	es_set lacheck 0
	es_keygetvalue lacheck dndUsers event_var(es_steamid) la
	es_math plcheck - server_var(lacheck)
	es_set mana 0
	if (server_var(plcheck) < 0) do
	{
		es_doblock dnd/la_low
		es_math plcheck + server_var(lacheck)
	}
	es_set 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_set lcheck 0
	es_keygetvalue lcheck dndUsers event_var(es_steamid) wizard
	es_set 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_set lcheck 0
	es_keygetvalue lcheck dndUsers event_var(es_steamid) wpc1
	es_set shieldcheck 0
	es_keygetvalue shieldcheck dndExtra event_var(es_steamid) shield
	if (server_var(shieldcheck) = 1) do
	{
		es_rand random 1 2
		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_set lcheck 0
	es_keygetvalue lcheck dndUsers event_var(es_steamid) wpc2	
}

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

block wizard_attacker
{
	es_set lcheck 0
	es_keygetvalue lcheck dndUsers event_var(es_attackersteamid) wizard
	es_set 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_set lcheck 0
	es_keygetvalue lcheck dndUsers event_var(es_attackersteamid) wpc1
}

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

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

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

			es_set spell 0
			es_keygetvalue spell dndExtra server_var(es_steamid) spell
			if(server_var(spell) = 0) do
			{
				es_set mana 0
				es_keygetvalue mana dndExtra server_var(es_steamid) mana
				es_set caster_alive 0
				es est_isalive caster_alive server_var(es_userid)
				if (server_var(caster_alive) = 0) then es_set 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_set es_userid 0
  	es_getcmduserid es_userid
	es_set es_steamid 0
	es est_getsteam es_steamid server_var(es_userid)
	es_set pcheck 0
	es_keygetvalue pcheck dndUsers server_var(es_steamid) prestige
	if (server_var(pcheck) = wpc1) do
	{
		es_set lcheck 0
		es_keygetvalue lcheck dndUsers server_var(es_steamid) server_var(pcheck)
		es_set lacheck 0
		es_keygetvalue lacheck dndUsers server_var(es_steamid) la
		es_math lcheck - server_var(lacheck)
		es_set mana 0
		if (server_var(lcheck) >= 3) do
		{

			es_set spell 0
			es_keygetvalue spell dndExtra server_var(es_steamid) spell
			if(server_var(spell) = 0) do
			{
				es_set mana 0
				es_keygetvalue mana dndExtra server_var(es_steamid) mana
				es_set caster_alive 0
				es est_isalive caster_alive server_var(es_userid)
				if (server_var(caster_alive) = 0) then es_set mana 0
				if (server_var(mana) >= 10) do
				{
					es_set 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_set level server_var(lcheck)
						es_math level + 5
						if (server_var(level) > 10) then es_set level 10
						es_set maxdmg 8
						es_math maxdmg * server_var(level)
						es_rand server_var(level) 1 server_var(maxdmg)
						
						es_math level / 2
						es_set steamcheck 0
						es est_getsteam steamcheck server_var(point)
						es_set vclass 0
						es_keygetvalue vclass dndUsers server_var(steamcheck) class
						es_set vlevel 0
						es_keygetvalue vlevel dndUsers server_var(steamcheck) server_var(vclass)
						es_set vrandom 0
						es_rand vrandom 1 20
						if (server_var(vrandom) != 20) do
						{
							
							es_set bonus 0
							es_keygetvalue bonus dndExtra server_var(steamcheck) fortsave
							es_math vrandom + server_var(bonus)
						
							es_set wrandom 10
							es_math wrandom + 6
							
							if (server_var(vrandom) >= server_var(wrandom)) do
							{
								es_math random / 2
								es_set level 0
								es_tell server_var(es_userid) #green Your victim has resisted some of your Orb of Cold!
								es_tell server_var(point) #green You just resisted a spell.
							}
							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_tell server_var(point) #lightgreen You have just been hit by a spell and are now blinded by the cold of it!!!!
								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_set es_userid 0
  	es_getcmduserid es_userid
	es_set es_steamid 0
	es est_getsteam es_steamid server_var(es_userid)
	es_set pcheck 0
	es_keygetvalue pcheck dndUsers server_var(es_steamid) prestige
	if (server_var(pcheck) = wpc1) do
	{
		es_set lcheck 0
		es_keygetvalue lcheck dndUsers server_var(es_steamid) server_var(pcheck)
		es_set lacheck 0
		es_keygetvalue lacheck dndUsers server_var(es_steamid) la
		es_math lcheck - server_var(lacheck)
		es_set mana 0
		if (server_var(lcheck) >= 7) do
		{
			es_set mana 0
			es_keygetvalue mana dndExtra server_var(es_steamid) mana
			es_set caster_alive 0
			es est_isalive caster_alive server_var(es_userid)
			if (server_var(caster_alive) = 0) then es_set mana 0
			if (server_var(mana) >= 20) do
			{
				es_math mana - 20
				es_set speed_check 0
				es_keygetvalue speed_check dndExtra server_var(es_steamid) speed
				es_set new_speed server_var(speed_check)
				es_math new_speed + .15
				es ma_givehealth server_var(es_userid) 50
				es_set 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) 50
			}
			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_set es_userid 0
  	es_getcmduserid es_userid
	es_set caster_alive 0
	es est_isalive caster_alive server_var(es_userid)
	if (server_var(caster_alive) != 0) do
	{
		es_set es_steamid 0
		es est_getsteam es_steamid server_var(es_userid)
		es_set pcheck 0
		es_keygetvalue pcheck dndUsers server_var(es_steamid) prestige
		if (server_var(pcheck) = wpc1) do
		{	
			es_set 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_set lacheck 0
				es_keygetvalue lacheck dndUsers server_var(es_steamid) la
				es_math lcheck - server_var(lacheck)
				if (server_var(lcheck) >= 9) do
				{
					es_set mana 0
					es_keygetvalue mana dndExtra server_var(es_steamid) mana
					if (server_var(mana) >= 25) do
					{
						es_set 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_set team 0
							es est_getteam team server_var(es_userid)
							es_set player 0
							if (server_var(team) = 2) do
							{
								foreach player player #ct "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
							{
								foreach player 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 - 75
							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_set es_userid 0
  	es_getcmduserid es_userid
	es_set caster_alive 0
	es est_isalive caster_alive server_var(es_userid)
	if (server_var(caster_alive) != 0) do
	{
		es_set es_steamid 0
		es est_getsteam es_steamid server_var(es_userid)
		es_set pcheck 0
		es_keygetvalue pcheck dndUsers server_var(es_steamid) prestige
		if (server_var(pcheck) = wpc1) do
		{	
			es_set 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_set lacheck 0
				es_keygetvalue lacheck dndUsers server_var(es_steamid) la
				es_math lcheck - server_var(lacheck)
				if (server_var(lcheck) >= 11) do
				{
					es_set mana 0
					es_keygetvalue mana dndExtra server_var(es_steamid) mana
					if (server_var(mana) >= 30) do
					{
						es_set 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_set level server_var(lcheck)
							if (server_var(level) > 15) then es_set level 15
							es_set maxdmg 8
							es_math maxdmg * server_var(level)
							es_rand random server_var(level) server_var(maxdmg)
							es_math level / 2
							es_set wrandom 10
							es_math wrandom + 8
							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_set fire_user 0
	es_set fire_targetid 0
	es_set fire_dc 0
  	es_set fire_damage 0
	es_set 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_set fire_save 0
	es_set targ_save 0
	es_set 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_set fire_time 0
			es_tell server_var(fire_user) #green Your victim has dodged some of your blizzard!
			es_tell server_var(fire_targetid) #lightgreen You just ressited a spell and took half dmg!!!
		}
		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) server_var(fire_time)
			es_tell server_var(fire_targetid) #lightgreen You just got hit by a blizzard and can't move!!!
		}
		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_set es_userid 0
  	es_getcmduserid es_userid
	es_set es_steamid 0
	es est_getsteam es_steamid server_var(es_userid)
	es_set pcheck 0
	es_keygetvalue pcheck dndUsers server_var(es_steamid) prestige
	if (server_var(pcheck) = wpc1) do
	{
		es_set lcheck 0
		es_keygetvalue lcheck dndUsers server_var(es_steamid) server_var(pcheck)
		es_set lacheck 0
		es_keygetvalue lacheck dndUsers server_var(es_steamid) la
		es_math lcheck - server_var(lacheck)
		es_set mana 0
		if (server_var(lcheck) >= 5) do
		{
			es_set mana 0
			es_keygetvalue mana dndExtra server_var(es_steamid) mana
			es_set caster_alive 0
			es est_isalive caster_alive server_var(es_userid)
			if (server_var(caster_alive) = 0) then es_set mana 0
			if (server_var(mana) >= 20) do
			{
				es_set spell 0
				es_keygetvalue spell dndExtra server_var(es_steamid) spell
				if(server_var(spell) = 0) do
				{
					es_set 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_set team_check 0
						es est_getteam team_check server_var(point)
						if (server_var(team_check) = 3) do
						{
							es_set rand_player 0
							es est_RandPlayer rand_player #c!d
						}
						if (server_var(team_check) = 2) do
						{
							es_set rand_player 0
							es est_RandPlayer rand_player #t!d
						}
						es_set level server_var(lcheck)
						es_math level + 5
						if (server_var(level) > 15) do
						{
							es_set level 15
						}
						es_set maxdmg 6
						es_math maxdmg * server_var(level)
						es_rand random server_var(level) server_var(maxdmg)
						es_set steamcheck 0
						es est_getsteam steamcheck server_var(point)
						es_set vclass 0
						es_keygetvalue vclass dndUsers server_var(steamcheck) class
						es_set vlevel 0
						es_keygetvalue vlevel dndUsers server_var(steamcheck) server_var(vclass)
						es_set wrandom 10
						es_math wrandom + 8
						es_set vrandom 0
						es_rand vrandom 1 20
						if (server_var(vrandom) != 20) do
						{
							es_set 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_set 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_tell server_var(point) #lightgreen You just got hit by arc lightning and took server_var(random) damage!!!
						}
						
						es_set randomd 0
						es_set maxdmgd 6
						es_math maxdmgd * server_var(level)
						es_rand randomd server_var(level) server_var(maxdmgd)
						es_set steamcheckv 0
						es est_getsteam steamcheckv server_var(rand_player)
						es_set vvclass 0
						es_keygetvalue vvclass dndUsers server_var(steamcheckv) class
						es_set vvlevel 0
						es_keygetvalue vvlevel dndUsers server_var(steamcheckv) server_var(vvclass)
						es_set vvrandom 0
						es_rand vvrandom 1 20
						if (server_var(vvrandom) != 20) do
						{
							es_set 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_set 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).
							es_tell server_var(point) #lightgreen You just got hit by arc lightning and took server_var(randomd) damage!!!
						}
					}
				}
				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_set es_userid 0
  	es_getcmduserid es_userid
	es_set caster_alive 0
	es est_isalive caster_alive server_var(es_userid)
	if (server_var(caster_alive) != 0) do
	{
		es_set es_steamid 0
		es est_getsteam es_steamid server_var(es_userid)
		es_set ccheck 0
		es_keygetvalue ccheck dndUsers server_var(es_steamid) class
		if (server_var(ccheck) = wizard) do
		{	
			es_set 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_set lacheck 0
				es_keygetvalue lacheck dndUsers server_var(es_steamid) la
				es_math lcheck - server_var(lacheck)
				es_set pcheck 0
				es_keygetvalue pcheck dndUsers server_var(es_steamid) prestige
				if (server_var(pcheck) = wpc1) then es_set lcheck 5
				if (server_var(pcheck) = wpc2) then es_set lcheck 10
				if (server_var(pcheck) = wpc3) then es_set lcheck 15
				if (server_var(lcheck) >= 1) do
				{		
					es_set mana 0
					es_keygetvalue mana dndExtra server_var(es_steamid) mana
					if (server_var(mana) >= 2) do
					{
						es_set 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_set level server_var(lcheck)
							es_math level / 2
							if (server_var(level) > 5) then es_set level 5
							if (server_var(level) < 1) then es_set level 1
							es_set maxdmg 5
							es_math maxdmg * server_var(level)
							es_set level2 server_var(level)
							es_math level2 * 2
							es_rand random server_var(level2) server_var(maxdmg)		
							es_set steamcheck 0
							es est_getsteam steamcheck server_var(point)
							es_set 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) #lightgreen 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_set es_userid 0
  	es_getcmduserid es_userid
	es_set caster_alive 0
	es est_isalive caster_alive server_var(es_userid)
	if (server_var(caster_alive) != 0) do
	{
		es_set es_steamid 0
		es est_getsteam es_steamid server_var(es_userid)
		es_set ccheck 0
		es_keygetvalue ccheck dndUsers server_var(es_steamid) class
		if (server_var(ccheck) = wizard) do
		{	
			es_set 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_set lacheck 0
				es_keygetvalue lacheck dndUsers server_var(es_steamid) la
				es_math lcheck - server_var(lacheck)
				es_set pcheck 0
				es_keygetvalue pcheck dndUsers server_var(es_steamid) prestige
				if (server_var(pcheck) = wpc1) then es_set lcheck 5
				if (server_var(pcheck) = wpc2) then es_set lcheck 10
				if (server_var(pcheck) = wpc3) then es_set lcheck 15
				if (server_var(lcheck) >= 1) do
				{		
					es_set mana 0
					es_keygetvalue mana dndExtra server_var(es_steamid) mana
					if (server_var(mana) >= 5) do
					{
						es_set 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_set steamcheck 0
							es est_getsteam steamcheck server_var(point)
							es_set 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_set vrandom 0
										es_rand vrandom 1 20
										if (server_var(vrandom) != 20) do
										{
											es_set bonus 0
											es_keygetvalue bonus dndExtra server_var(steamcheck) willsave
											es_math vrandom + server_var(bonus)
											es_set 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_set level server_var(lcheck)
												if (server_var(level) > 5) then es_set 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) #lightgreen 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!
												es_tell server_var(point) #lightgreen You just resisted a 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_set es_userid 0
  	es_getcmduserid es_userid
	es_set caster_alive 0
	es est_isalive caster_alive server_var(es_userid)
	if (server_var(caster_alive) != 0) do
	{
		es_set es_steamid 0
		es est_getsteam es_steamid server_var(es_userid)
		es_set ccheck 0
		es_keygetvalue ccheck dndUsers server_var(es_steamid) class
		if (server_var(ccheck) = wizard) do
		{	
			es_set timer 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_set lacheck 0
				es_keygetvalue lacheck dndUsers server_var(es_steamid) la
				es_math lcheck - server_var(lacheck)
				es_set pcheck 0
				es_keygetvalue pcheck dndUsers server_var(es_steamid) prestige
				if (server_var(pcheck) = wpc1) then es_set lcheck 5
				if (server_var(pcheck) = wpc2) then es_set lcheck 10
				if (server_var(pcheck) = wpc3) then es_set lcheck 15
				if (server_var(lcheck) >= 3) do
				{		
					es_set 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_set 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_set 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_set rcheck 0
			es_keygetvalue rcheck dndUsers server_var(es_steamid) race
			if (server_var(rcheck) = basilisk) do
			{
				es_set scheck 0
				es_keygetvalue scheck dndExtra server_var(es_steamid) stealth
				if (server_var(scheck) > 0) do
				{
                    es_xset timer 0
					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_set 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_set 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.
				}
			}
			else do
			{
				es_set rcheck 0
				es_keygetvalue rcheck dndUsers server_var(es_steamid) race
				if (server_var(rcheck) = vampire) do
				{
					es_set scheck 0
					es_keygetvalue scheck dndExtra server_var(es_steamid) stealth
					if (server_var(scheck) > 0) do
					{
                        es_xset timer 0
						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_set 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_set 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_set es_userid 0
  	es_getcmduserid es_userid
	es_set caster_alive 0
	es est_isalive caster_alive server_var(es_userid)
	if (server_var(caster_alive) != 0) do
	{
		es_set es_steamid 0
		es est_getsteam es_steamid server_var(es_userid)
		es_set ccheck 0
		es_keygetvalue ccheck dndUsers server_var(es_steamid) class
		if (server_var(ccheck) = wizard) do
		{	
			es_set 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_set lacheck 0
				es_keygetvalue lacheck dndUsers server_var(es_steamid) la
				es_math lcheck - server_var(lacheck)
				es_set pcheck 0
				es_keygetvalue pcheck dndUsers server_var(es_steamid) prestige
				if (server_var(pcheck) = wpc1) then es_set lcheck 5
				if (server_var(pcheck) = wpc2) then es_set lcheck 10
				if (server_var(pcheck) = wpc3) then es_set lcheck 15
				if (server_var(lcheck) >= 5) do
				{		
					es_set mana 0
					es_keygetvalue mana dndExtra server_var(es_steamid) mana
					if (server_var(mana) >= 15) do
					{
						es_set 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_set level server_var(lcheck)
							if (server_var(level) > 10) then es_set level 10
							es_set maxdmg 6
							es_math maxdmg * server_var(level)
							es_rand random server_var(level) server_var(maxdmg)
							es_math level / 2
							es_set 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_set 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_set lacheck 0
				es_keygetvalue lacheck dndUsers server_var(es_steamid) la
				es_math lcheck - server_var(lacheck)
				if (server_var(lcheck) >= 9) do
				{		
					es_set mana 0
					es_keygetvalue mana dndExtra server_var(es_steamid) mana
					if (server_var(mana) >= 15) do
					{
						es_set 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_set level server_var(lcheck)
							if (server_var(level) > 10) then es_set level 10
							es_set maxdmg 6
							es_math maxdmg * server_var(level)
							es_rand random server_var(level) server_var(maxdmg)
							es_math level / 2
							es_set 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_set fire_user 0
	es_set fire_targetid 0
	es_set fire_dc 0
  	es_set fire_damage 0
	es_set 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_set fire_save 0
	es_set targ_save 0
	es_set 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_set 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_set fire_time 0
			es_tell server_var(fire_user) #green Your victim has taken server_var(fire_damage) form your fire ball!
			es_tell server_var(fire_targetid) #lightgreen You just took half damage from a 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) #lightgreen You have just been hit by a fireball and are now burning!!!!
		}
		es point_hurt server_var(fire_user) server_var(fire_targetid) server_var(fire_damage)
	}
}
block killer
{
	es_set es_userid 0
  	es_getcmduserid es_userid
	es_set caster_alive 0
	es est_isalive caster_alive server_var(es_userid)
	if (server_var(caster_alive) != 0) do
	{
		es_set es_steamid 0
		es est_getsteam es_steamid server_var(es_userid)
		es_set ccheck 0
		es_keygetvalue ccheck dndUsers server_var(es_steamid) class
		if (server_var(ccheck) = wizard) do
		{	
			es_set 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_set lacheck 0
				es_keygetvalue lacheck dndUsers server_var(es_steamid) la
				es_math lcheck - server_var(lacheck)
				es_set pcheck 0
				es_keygetvalue pcheck dndUsers server_var(es_steamid) prestige
				if (server_var(pcheck) = wpc1) then es_set lcheck 5
				if (server_var(pcheck) = wpc2) then es_set lcheck 10
				if (server_var(pcheck) = wpc3) then es_set lcheck 15
				if (server_var(lcheck) >= 7) do
				{		
					es_set mana 0
					es_keygetvalue mana dndExtra server_var(es_steamid) mana
					if (server_var(mana) >= 40) do
					{
						es_set 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_set level server_var(lcheck)
							es_math mana - 40
							es_set steamcheck 0
							es est_getsteam steamcheck server_var(point)
							es_set vrandom 0
							es_rand vrandom 1 20
							if (server_var(vrandom) != 20) do
							{
								es_set bonus 0
								es_keygetvalue bonus dndExtra server_var(steamcheck) willsave
								es_math vrandom + server_var(bonus)
								es_set 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 
									es_tell server_var(point) #lightgreen You just resisted a spell.
								}
								else do
								{
									es_set vrandom 0
									es_rand vrandom 1 20
									if (server_var(vrandom) != 20) do
									{		
										es_set 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) #lightgreen 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) #lightgreen 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_set es_userid 0
  	es_getcmduserid es_userid
	es_set es_steamid 0
	es est_getsteam es_steamid server_var(es_userid)
	es_set ccheck 0
	es_keygetvalue ccheck dndUsers server_var(es_steamid) class
	es_set lcheck 0
	es_keygetvalue lcheck dndUsers server_var(es_steamid) server_var(ccheck)	
	es_set lacheck 0
	es_keygetvalue lacheck dndUsers server_var(es_steamid) la
	es_math lcheck - server_var(lacheck)
	if (server_var(ccheck) = wizard) do
	{
		es_set pcheck 0
		es_keygetvalue pcheck dndUsers server_var(es_steamid) prestige
		if (server_var(pcheck) = wpc1) do
		{
			es_set lcheck 5
		}
		if (server_var(pcheck) = wpc2) do
		{
			es_set lcheck 10
		}
		if (server_var(pcheck) = wpc3) do
		{
			es_set lcheck 15
		}
		if (server_var(lcheck) >= 9) do
		{
			es_set mana 0
			es_keygetvalue mana dndExtra server_var(es_steamid) mana
			es_set caster_alive 0
			es est_isalive caster_alive server_var(es_userid)
			if (server_var(caster_alive) = 0) then es_set mana 0
			if (server_var(mana) >= 5) do
			{	
				es_set x 0
				es_set y 0
				es_set 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_set es_userid 0
  	es_getcmduserid es_userid
	es_set es_steamid 0
	es est_getsteam es_steamid server_var(es_userid)
	es_set ccheck 0
	es_keygetvalue ccheck dndUsers server_var(es_steamid) class
	es_set lcheck 0
	es_keygetvalue lcheck dndUsers server_var(es_steamid) server_var(ccheck)	
	es_set lacheck 0
	es_keygetvalue lacheck dndUsers server_var(es_steamid) la
	es_math lcheck - server_var(lacheck)
	if (server_var(ccheck) = wizard) do
	{
		es_set pcheck 0
		es_keygetvalue pcheck dndUsers server_var(es_steamid) prestige
		if (server_var(pcheck) = wpc1) do
		{
			es_set lcheck 5
		}
		if (server_var(pcheck) = wpc2) do
		{
			es_set lcheck 10
		}
		if (server_var(pcheck) = wpc3) do
		{
			es_set lcheck 15
		}
		if (server_var(lcheck) >= 9) do
		{
			es_set mana 0
			es_keygetvalue mana dndExtra server_var(es_steamid) mana
			es_set caster_alive 0
			es est_isalive caster_alive server_var(es_userid)
			if (server_var(caster_alive) = 0) then es_set mana 0
			es_set x 0
			es_set y 0
			es_set 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_set es_userid 0
  	es_getcmduserid es_userid
	es_set es_steamid 0
	es est_getsteam es_steamid server_var(es_userid)
	es_set ccheck 0
	es_keygetvalue ccheck dndUsers server_var(es_steamid) class
	es_set lcheck 0
	es_keygetvalue lcheck dndUsers server_var(es_steamid) server_var(ccheck)	
	es_set lacheck 0
	es_keygetvalue lacheck dndUsers server_var(es_steamid) la
	es_math lcheck - server_var(lacheck)
	if (server_var(ccheck) = wizard) do
	{
		es_set pcheck 0
		es_keygetvalue pcheck dndUsers server_var(es_steamid) prestige
		if (server_var(pcheck) = wpc1) do
		{
			es_set lcheck 5
		}
		if (server_var(pcheck) = wpc2) do
		{
			es_set lcheck 10
		}
		if (server_var(pcheck) = wpc3) do
		{
			es_set lcheck 15
			es_set plcheck 0
			es_keygetvalue plcheck dndUsers server_var(es_steamid) server_var(pcheck)
		}
		if (server_var(lcheck) >= 11) do
		{
			es_set spell 0
			es_keygetvalue spell dndExtra server_var(es_steamid) spell
			if(server_var(spell) = 0) do
			{	
				es_set mana 0
				es_keygetvalue mana dndExtra server_var(es_steamid) mana
				es_set caster_alive 0
				es est_isalive caster_alive server_var(es_userid)
				if (server_var(caster_alive) = 0) then es_set mana 0
				if (server_var(mana) >= 20) do
				{
					es_set 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_set steamcheck 0
						es est_getsteam steamcheck server_var(point)					
						es_set vrandom 0
						es_rand vrandom 1 20
						if (server_var(vrandom) != 20) do
						{
							es_set bonus 0
							es_keygetvalue bonus dndExtra server_var(steamcheck) reflexsave
							es_math vrandom + server_var(bonus)
							es_set 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!
								es_tell server_var(point) #lightgreen You just resisted a 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_tell server_var(es_userid) #green You have slapped and dropped your target.
								es_tell server_var(point) #lightgreen 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 mass
{
	es_set es_userid 0
  	es_getcmduserid es_userid
	es_set caster_alive 0
	es est_isalive caster_alive server_var(es_userid)
	if (server_var(caster_alive) != 0) do
	{
		es_set es_steamid 0
		es est_getsteam es_steamid server_var(es_userid)
		es_set ccheck 0
		es_keygetvalue ccheck dndUsers server_var(es_steamid) class
		if (server_var(ccheck) = wizard) do
		{	
			es_set timer 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_set lacheck 0
				es_keygetvalue lacheck dndUsers server_var(es_steamid) la
				es_math lcheck - server_var(lacheck)
				es_set pcheck 0
				es_keygetvalue pcheck dndUsers server_var(es_steamid) prestige
				if (server_var(pcheck) = wpc1) then es_set lcheck 5
				if (server_var(pcheck) = wpc2) then es_set lcheck 10
				if (server_var(pcheck) = wpc3) then es_set lcheck 15
				if (server_var(lcheck) >= 3) do
				{		
					es_set mana 0
					es_keygetvalue mana dndExtra server_var(es_steamid) mana
					if (server_var(mana) >= 35) do
					{
                        es_xset wizteam 0
                        es_getplayerteam wizteam server_var(es_userid)
                        if (server_var(wizteam) = 2) then foreach player invistarget #alive#t "es makeinvis invistarget"
                        if (server_var(wizteam) = 3) then foreach player invistarget #alive#ct "es makeinvis invistarget"
						es_math mana - 35
                        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 mass invisibily right now.
					}
				}
			}
            else do
            {
                es_tell server_var(es_userid) #green You are already invisible!
            }
		}
    }
}

block makeinvis
{
    es_xset invissteam 0
    es_getplayersteamid invissteam server_var(invistarget)
    es_keysetvalue dndExtra server_var(invissteam) invis_timer 1
    es_set color_check 0
    es_keygetvalue color_check dndExtra server_var(invissteam) color
    es est_setplayercolor server_var(invistarget) 255 255 255 0
    if (server_var(color_check) >= 256) do
    {
        es_set color_check 255
    }
    es_tell server_var(invistarget) #green Your team is invisible for the next 3 seconds.
    es_delayed 3 es est_setplayercolor server_var(invistarget) 255 255 255 server_var(color_check) 1
    es_delayed 3 es_tell server_var(invistarget) #green You are visible again!
    es_delayed 3 es_keysetvalue dndExtra server_var(invissteam) invis_timer 0
}


block freeze
{
	es_set es_userid 0
  	es_getcmduserid es_userid
	es_set es_steamid 0
	es est_getsteam es_steamid server_var(es_userid)
	es_set ccheck 0
	es_keygetvalue ccheck dndUsers server_var(es_steamid) class
	es_set lcheck 0
	es_keygetvalue lcheck dndUsers server_var(es_steamid) server_var(ccheck)	
	es_set lacheck 0
	es_keygetvalue lacheck dndUsers server_var(es_steamid) la
	es_math lcheck - server_var(lacheck)
	if (server_var(ccheck) = wizard) do
	{
		es_set pcheck 0
		es_keygetvalue pcheck dndUsers server_var(es_steamid) prestige
		if (server_var(pcheck) = wpc1) do
		{
			es_set lcheck 5
		}
		if (server_var(pcheck) = wpc2) do
		{
			es_set lcheck 10
		}
		if (server_var(pcheck) = wpc3) do
		{
			es_set lcheck 15
			es_set plcheck 0
			es_keygetvalue plcheck dndUsers server_var(es_steamid) server_var(pcheck)
		}
		if (server_var(lcheck) >= 15) do
		{
			es_set mana 0
			es_keygetvalue mana dndExtra server_var(es_steamid) mana
			es_set caster_alive 0
			es est_isalive caster_alive server_var(es_userid)
			if (server_var(caster_alive) = 0) then es_set mana 0
			if (server_var(mana) >= 40) do
			{
				es_set 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_set level server_var(lcheck)
					es_math mana - 40
					es_set steamcheck 0
					es est_getsteam steamcheck server_var(point)
					es_set vrandom 0
					es_rand vrandom 1 20
					if (server_var(vrandom) != 20) do
					{
						es_set bonus 0
						es_keygetvalue bonus dndExtra server_var(steamcheck) fortsave
						es_math vrandom + server_var(bonus)
						es_set 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!
							es_tell server_var(point) #lightgreen You just resisted a spell!
						}
						else do
						{
							es_tell server_var(es_userid) #green You have frozen your target for the next 5 seconds.
							es_tell server_var(point) #lightgreen 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_set es_userid 0
  	es_getcmduserid es_userid
	es_set es_steamid 0
	es est_getsteam es_steamid server_var(es_userid)
	es_set ccheck 0
	es_keygetvalue ccheck dndUsers server_var(es_steamid) class
	es_set lcheck 0
	es_keygetvalue lcheck dndUsers server_var(es_steamid) server_var(ccheck)	
	es_set lacheck 0
	es_keygetvalue lacheck dndUsers server_var(es_steamid) la
	es_math lcheck - server_var(lacheck)
	if (server_var(ccheck) = wizard) do
	{
		es_set pcheck 0
		es_keygetvalue pcheck dndUsers server_var(es_steamid) prestige
		if (server_var(pcheck) = wpc1) do
		{
			es_set lcheck 5
		}
		if (server_var(pcheck) = wpc2) do
		{
			es_set lcheck 10
		}
		if (server_var(pcheck) = wpc3) do
		{
			es_set lcheck 15
		}
		if (server_var(lcheck) >= 17) do
		{
			es_set mana 0
			es_keygetvalue mana dndExtra server_var(es_steamid) mana
			es_set caster_alive 0
			es est_isalive caster_alive server_var(es_userid)
			if (server_var(caster_alive) = 0) then es_set 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_set lcheck 0
	es_keygetvalue lcheck dndUsers event_var(es_steamid) wizard
	es_set 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_set lcheck 0
	es_keygetvalue lcheck dndUsers event_var(es_steamid) wpc1
	es_set lcheck 5
}

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

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

block wizard_spelllist
{
	es_set 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_set pcheck 0
	es_keygetvalue pcheck dndUsers event_var(es_steamid) prestige
	es_set plcheck 0
	es_keygetvalue plcheck dndUsers event_var(es_steamid) server_var(pcheck)
	es_set 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 !mass - 35 Mana: Mass invisibility.\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_set lcheck 0
	es_keygetvalue lcheck dndUsers event_var(es_steamid) wizard
}

block cleric_spawn
{
	es_set lcheck 0
	es_keygetvalue lcheck dndUsers event_var(es_steamid) cleric
	es_set lacheck 0
	es_keygetvalue lacheck dndUsers event_var(es_steamid) la
	es_set 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_set lcheck 5
		es_doblock dnd/cpc1_spawn
	}
	if (server_var(pcheck) = cpc2) do
	{
		es_set lcheck 10
		es_doblock dnd/cpc2_spawn
	}
	if (server_var(pcheck) = cpc3) do
	{
		es_set lcheck 15
		es_doblock dnd/cpc3_spawn
	}
	es_set 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_set plcheck 0
	es_keygetvalue plcheck dndUsers event_var(es_steamid) cpc1
	es_set lacheck 0
	es_keygetvalue lacheck dndUsers event_var(es_steamid) la
	es_math plcheck - server_var(lacheck)
	es_set mana 0
	if (server_var(plcheck) < 0) do
	{
		es_doblock dnd/la_low
		es_math plcheck + server_var(lacheck)
	}
	es_set 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_set lcheck 10
	es_set plcheck 0
	es_keygetvalue plcheck dndUsers event_var(es_steamid) cpc2
	es_set lacheck 0
	es_keygetvalue lacheck dndUsers event_var(es_steamid) la
	es_math plcheck - server_var(lacheck)
	es_set mana 0
	if (server_var(plcheck) < 0) do
	{
		es_doblock dnd/la_low
		es_math plcheck + server_var(lacheck)
	}
	es_set 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_set plcheck 0
	es_keygetvalue plcheck dndUsers event_var(es_steamid) cpc3
	es_set lacheck 0
	es_keygetvalue lacheck dndUsers event_var(es_steamid) la
	es_math plcheck - server_var(lacheck)
	es_set mana 0
	if (server_var(plcheck) < 0) do
	{
		es_doblock dnd/la_low
		es_math plcheck + server_var(lacheck)
	}
	es_set 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_set lcheck 0
	es_keygetvalue lcheck dndUsers event_var(es_steamid) cleric
	es_set 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_set plcheck 0
	es_keygetvalue plcheck dndUsers event_var(es_steamid) cpc1
	es_set lacheck 0
	es_keygetvalue lacheck dndUsers event_var(es_steamid) la
	es_math plcheck - server_var(lacheck)
	es_set mana 0
	if (server_var(lcheck) < 0) do
	{
		es_doblock dnd/la_low
		es_math lcheck + server_var(lacheck)
	}
	es_set scheck 0
	es_keygetvalue scheck dndExtra event_var(es_steamid) shield
	if (server_var(scheck) = 1) do
	{
		if (server_var(plcheck) >= 1) do
		{
			es_set multi 2
		}
		if (server_var(plcheck) >= 6) do
		{
			es_math multi + 1
		}
		if (server_var(plcheck) >= 11) do
		{
			es_math multi + 1
		}
		es_set 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_set acheck 0
	es_keygetvalue acheck dndExtra event_var(es_steamid) armor
	if (server_var(acheck) = 1) do
	{
		es_give event_var(userid) assaultsuit
	}
}

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

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

block cleric_attacker
{
	es_set lcheck 0
	es_keygetvalue lcheck dndUsers event_var(es_attackersteamid) cleric
	es_set 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_set plcheck 0
	es_keygetvalue plcheck dndUsers event_var(es_attackersteamid) cpc1
	es_set lacheck 0
	es_keygetvalue lacheck dndUsers event_var(es_steamid) la
	es_math plcheck - server_var(lacheck)
	es_set mana 0
	es_set dcheck 0
	es_keygetvalue dcheck dndExtra event_var(es_attackersteamid) divine
	if (server_var(dcheck) = 1) do
	{
		if (server_var(plcheck) >= 1) do
		{
			es_set 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_set 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_set 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_set 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_set lcheck 0
	es_keygetvalue lcheck dndUsers event_var(es_attackersteamid) cpc2
}

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

block light
{
	es_set es_userid 0
  	es_getcmduserid es_userid
	es_set es_steamid 0
	es est_getsteam es_steamid server_var(es_userid)
	es_set ccheck 0
	es_keygetvalue ccheck dndUsers server_var(es_steamid) class
	es_set lcheck 0
	es_keygetvalue lcheck dndUsers server_var(es_steamid) server_var(ccheck)	
	es_set lacheck 0
	es_keygetvalue lacheck dndUsers server_var(es_steamid) la
	es_math lcheck - server_var(lacheck)
	if (server_var(ccheck) = cleric) do
	{
		es_set pcheck 0
		es_keygetvalue pcheck dndUsers server_var(es_steamid) prestige
		if (server_var(pcheck) = cpc1) do
		{
			es_set lcheck 5
		}
		if (server_var(pcheck) = cpc2) do
		{
			es_set lcheck 10
		}
		if (server_var(pcheck) = cpc3) do
		{
			es_set lcheck 15
			es_set plcheck 0
			es_keygetvalue plcheck dndUsers server_var(es_steamid) server_var(pcheck)
		}
		if (server_var(lcheck) >= 1) do
		{
			es_set acheck 0
			es_keygetvalue acheck dndExtra server_var(es_steamid) algin
			if (server_var(acheck) = good) do
			{
				es_set mana 0
				es_keygetvalue mana dndExtra server_var(es_steamid) mana
				es_set caster_alive 0
				es est_isalive caster_alive server_var(es_userid)
				if (server_var(caster_alive) = 0) then es_set mana 0
				if (server_var(mana) >= 5) do
				{
					es_set point z7
					es est_getviewplayer server_var(es_userid) point
					if (server_var(point) != z7) do
					{
						es_set steamcheck 0
						es est_getsteam steamcheck server_var(point)
						es_set phealth 0
						es_keygetvalue phealth dndExtra server_var(steamcheck) maxhealth
						es_set thealth 0
						es est_gethealth thealth server_var(point)
						es_rand random 1 8
						if (server_var(lcheck) > 5) do
						{
							es_set 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_set userid 0
								es_set userid server_var(es_userid)
								es_set xpcheck 0
								es_keygetvalue xpcheck dndUsers server_var(es_steamid) curxp
								es_set 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) #multi#green You have gained #lightgreen5 xp #greenfor healing someone.
								es_set name
								es est_getname name server_var(es_steamid)
								es_tell server_var(point) #green You have just been healed by server_var(name) for server_var(random) hp!
								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_set mana 0
				es_keygetvalue mana dndExtra server_var(es_steamid) mana
				es_set caster_alive 0
				es est_isalive caster_alive server_var(es_userid)
				if (server_var(caster_alive) = 0) then es_set mana 0
				if (server_var(mana) >= 5) do
				{
					es_set point z7
					es est_getviewplayer server_var(es_userid) point
					if (server_var(point) != z7) do
					{
						es_set 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_set steamcheck 0
							es est_getsteam steamcheck server_var(point)
							es_set vrandom 0
							es_rand vrandom 1 20
							if (server_var(vrandom) != 20) do
							{
								es_set vpcheck 0
								es_keygetvalue vpcheck dndExtra server_var(steamcheck) willsave
								es_math vrandom + vpcheck
								es_set 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_set 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.
								es_tell server_var(point) #lightgreen You have been dealt server_var(random) damage.
							}
						}
						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_set mana 0
			es_keygetvalue mana dndExtra server_var(es_steamid) mana
			es_set caster_alive 0
			es est_isalive caster_alive server_var(es_userid)
			if (server_var(caster_alive) = 0) then es_set mana 0
			if (server_var(mana) >= 5) do
			{
				es_set point z7
				es est_getviewplayer server_var(es_userid) point
				if (server_var(point) != z7) do
				{
					es_set steamcheck 0
					es est_getsteam steamcheck server_var(point)
					es_set phealth 0
					es_keygetvalue phealth dndExtra server_var(steamcheck) maxhealth
					es_set 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_set 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_set userid 0
							es_set userid server_var(es_userid)
							es_set xpcheck 0
							es_keygetvalue xpcheck dndUsers server_var(es_steamid) curxp
							es_set 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) #multi#green You have gained #lightgreen5 xp #greenfor healing someone.
							es_set name
							es est_getname name server_var(es_steamid)
							es_tell server_var(point) #green You have just been healed by server_var(name) for server_var(random) hp!
							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_set es_userid 0
  	es_getcmduserid es_userid
	es_set es_steamid 0
	es est_getsteam es_steamid server_var(es_userid)
	es_set ccheck 0
	es_keygetvalue ccheck dndUsers server_var(es_steamid) class
	es_set lcheck 0
	es_keygetvalue lcheck dndUsers server_var(es_steamid) server_var(ccheck)	
	es_set lacheck 0
	es_keygetvalue lacheck dndUsers server_var(es_steamid) la
	es_math lcheck - server_var(lacheck)
	if (server_var(ccheck) = cleric) do
	{
		es_set pcheck 0
		es_keygetvalue pcheck dndUsers server_var(es_steamid) prestige
		if (server_var(pcheck) = cpc1) do
		{
			es_set lcheck 5
		}
		if (server_var(pcheck) = cpc2) do
		{
			es_set lcheck 10
		}
		if (server_var(pcheck) = cpc3) do
		{
			es_set lcheck 15
			es_set plcheck 0
			es_keygetvalue plcheck dndUsers server_var(es_steamid) server_var(pcheck)
		}
		if (server_var(lcheck) >= 3) do
		{
			es_set acheck 0
			es_keygetvalue acheck dndExtra server_var(es_steamid) algin
			if (server_var(acheck) = good) do
			{
				es_set mana 0
				es_keygetvalue mana dndExtra server_var(es_steamid) mana
				es_set caster_alive 0
				es est_isalive caster_alive server_var(es_userid)
				if (server_var(caster_alive) = 0) then es_set mana 0
				if (server_var(mana) >= 10) do
				{
					es_set point z7
					es est_getviewplayer server_var(es_userid) point
					if (server_var(point) != z7) do
					{
						es_set steamcheck 0
						es est_getsteam steamcheck server_var(point)
						es_set phealth 0
						es_keygetvalue phealth dndExtra server_var(steamcheck) maxhealth
						es_set thealth 0
						es est_gethealth thealth server_var(point)
						es_rand random 2 16
						if (server_var(lcheck) > 10) do
						{
							es_set 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_set userid 0
								es_set userid server_var(es_userid)
								es_set xpcheck 0
								es_keygetvalue xpcheck dndUsers server_var(es_steamid) curxp
								es_set 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) #multi#green You have gained #lightgreen10 xp #greenfor healing someone.
								es_set name
								es est_getname name server_var(es_steamid)
								es_tell server_var(point) #green You have just been healed by server_var(name) for server_var(random) hp!
								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_set mana 0
				es_keygetvalue mana dndExtra server_var(es_steamid) mana
				es_set caster_alive 0
				es est_isalive caster_alive server_var(es_userid)
				if (server_var(caster_alive) = 0) then es_set mana 0
				if (server_var(mana) >= 10) do
				{
					es_set point z7
					es est_getviewplayer server_var(es_userid) point
					if (server_var(point) != z7) do
					{
						es_set 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_set steamcheck 0
							es est_getsteam steamcheck server_var(point)
							es_set vrandom 0
							es_rand vrandom 1 20
							if (server_var(vrandom) != 20) do
							{
								es_set vpcheck 0
								es_keygetvalue vpcheck dndExtra server_var(steamcheck) willsave
								es_math vrandom + vpcheck
								es_set 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_set 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.
								es_tell server_var(point) #lightgreen You have just been dealt server_var(random) damage!!
							}
						}
						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_set mana 0
			es_keygetvalue mana dndExtra server_var(es_steamid) mana
			es_set caster_alive 0
			es est_isalive caster_alive server_var(es_userid)
			if (server_var(caster_alive) = 0) then es_set mana 0
			if (server_var(mana) >= 10) do
			{
				es_set point z7
				es est_getviewplayer server_var(es_userid) point
				if (server_var(point) != z7) do
				{
					es_set steamcheck 0
					es est_getsteam steamcheck server_var(point)
					es_set phealth 0
					es_keygetvalue phealth dndExtra server_var(steamcheck) maxhealth
					es_set 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_set 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_set userid 0
							es_set userid server_var(es_userid)
							es_set xpcheck 0
							es_keygetvalue xpcheck dndUsers server_var(es_steamid) curxp
							es_set 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_set name
							es est_getname name server_var(es_steamid)
							es_set name
							es est_getname name server_var(es_steamid)
							es_tell server_var(point) #green You have just been healed by server_var(name) for server_var(random) hp!
							es_tell server_var(point) #green You have just been healed by server_var(name) for server_var(random) hp!
							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_set mana 0
			es_keygetvalue mana dndExtra server_var(es_steamid) mana
			es_set caster_alive 0
			es est_isalive caster_alive server_var(es_userid)
			if (server_var(caster_alive) = 0) then es_set mana 0
			if (server_var(mana) >= 10) do
			{
				es_set point z7
				es est_getviewplayer server_var(es_userid) point
				if (server_var(point) != z7) do
				{
					es_set steamcheck 0
					es est_getsteam steamcheck server_var(point)
					es_set phealth 0
					es_keygetvalue phealth dndExtra server_var(steamcheck) maxhealth
					es_set 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_set 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_set userid 0
							es_set userid server_var(es_userid)
							es_set xpcheck 0
							es_keygetvalue xpcheck dndUsers server_var(es_steamid) curxp
							es_set 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) #multi#green You have gained #lightgreen10 xp #greenfor healing someone.
							es_set name
							es est_getname name server_var(es_steamid)
							es_tell server_var(point) #green You have just been healed by server_var(name) for server_var(random) hp!
							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_set es_userid 0
  	es_getcmduserid es_userid
	es_set es_steamid 0
	es est_getsteam es_steamid server_var(es_userid)
	es_set ccheck 0
	es_keygetvalue ccheck dndUsers server_var(es_steamid) class
	es_set lcheck 0
	es_keygetvalue lcheck dndUsers server_var(es_steamid) server_var(ccheck)	
	es_set lacheck 0
	es_keygetvalue lacheck dndUsers server_var(es_steamid) la
	es_math lcheck - server_var(lacheck)
	if (server_var(ccheck) = cleric) do
	{
		es_set pcheck 0
		es_keygetvalue pcheck dndUsers server_var(es_steamid) prestige
		if (server_var(pcheck) = cpc1) do
		{
			es_set lcheck 5
		}
		if (server_var(pcheck) = cpc2) do
		{
			es_set lcheck 10
		}
		if (server_var(pcheck) = cpc3) do
		{
			es_set lcheck 15
		}
		if (server_var(lcheck) >= 3) do
		{
			es_set mana 0
			es_keygetvalue mana dndExtra server_var(es_steamid) mana
			es_set caster_alive 0
			es est_isalive caster_alive server_var(es_userid)
			if (server_var(caster_alive) = 0) then es_set mana 0
			if (server_var(mana) >= 10) do
			{
				es_set point z7
				es est_getviewplayer server_var(es_userid) point
				if (server_var(point) != z7) do
				{
					es_set 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_set steamcheck 0
						es est_getsteam steamcheck server_var(point)
						es_set vrandom 0
						es_rand vrandom 1 20
						if (server_var(vrandom) != 20) do
						{
							es_set vpcheck 0
							es_keygetvalue vpcheck dndExtra server_var(steamcheck) willsave
							es_math vrandom + vpcheck
							
							es_set 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.
								es_tell server_var(point) #lightgreen You just resisted a spell.
							}
							else do
							{
								es est_freeze server_var(point) 1
								es_set 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_tell server_var(point) #lightgreen You have been stunned.
							}
						}
						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_set es_userid 0
  	es_getcmduserid es_userid
	es_set es_steamid 0
	es est_getsteam es_steamid server_var(es_userid)
	es_set ccheck 0
	es_keygetvalue ccheck dndUsers server_var(es_steamid) class
	es_set lcheck 0
	es_keygetvalue lcheck dndUsers server_var(es_steamid) server_var(ccheck)	
	es_set lacheck 0
	es_keygetvalue lacheck dndUsers server_var(es_steamid) la
	es_math lcheck - server_var(lacheck)
	if (server_var(ccheck) = cleric) do
	{
		es_set pcheck 0
		es_keygetvalue pcheck dndUsers server_var(es_steamid) prestige
		if (server_var(pcheck) = cpc1) do
		{
			es_set lcheck 5
		}
		if (server_var(pcheck) = cpc2) do
		{
			es_set lcheck 10
		}
		if (server_var(pcheck) = cpc3) do
		{
			es_set lcheck 15
			es_set plcheck 0
			es_keygetvalue plcheck dndUsers server_var(es_steamid) server_var(pcheck)
		}
		if (server_var(lcheck) >= 5) do
		{
			es_set acheck 0
			es_keygetvalue acheck dndExtra server_var(es_steamid) algin
			if (server_var(acheck) = good) do
			{
				es_set mana 0
				es_keygetvalue mana dndExtra server_var(es_steamid) mana
				es_set caster_alive 0
				es est_isalive caster_alive server_var(es_userid)
				if (server_var(caster_alive) = 0) then es_set mana 0
				if (server_var(mana) >= 15) do
				{
					es_set point z7
					es est_getviewplayer server_var(es_userid) point
					if (server_var(point) != z7) do
					{
										
						es_set steamcheck 0
						es est_getsteam steamcheck server_var(point)
						es_set phealth 0
						es_keygetvalue phealth dndExtra server_var(steamcheck) maxhealth
						es_set thealth 0
						es est_gethealth thealth server_var(point)
						es_rand random 3 24
						if (server_var(lcheck) > 15) do
						{
							es_set 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_set userid 0
								es_set userid server_var(es_userid)
								es_set xpcheck 0
								es_keygetvalue xpcheck dndUsers server_var(es_steamid) curxp
								es_set 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) #multi#green You have gained #lightgreen15 xp #greenfor healing someone.
								es_set name
								es est_getname name server_var(es_steamid)
								es_tell server_var(point) #green You have just been healed by server_var(name) for server_var(random) hp!
								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_set mana 0
				es_keygetvalue mana dndExtra server_var(es_steamid) mana
				es_set caster_alive 0
				es est_isalive caster_alive server_var(es_userid)
				if (server_var(caster_alive) = 0) then es_set mana 0
				if (server_var(mana) >= 15) do
				{
					es_set point z7
					es est_getviewplayer server_var(es_userid) point
					if (server_var(point) != z7) do
					{
						es_set 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_set steamcheck 0
							es est_getsteam steamcheck server_var(point)
							es_set vrandom 0
							es_rand vrandom 1 20
							if (server_var(vrandom) != 20) do
							{
								es_set vpcheck 0
								es_keygetvalue vpcheck dndExtra server_var(steamcheck) willsave
								es_math vrandom + vpcheck
								es_set 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_set 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.
								es_tell server_var(point) #lightgreen You have been dealt server_var(random) damage.
							}
						}
						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_set mana 0
			es_keygetvalue mana dndExtra server_var(es_steamid) mana
			es_set caster_alive 0
			es est_isalive caster_alive server_var(es_userid)
			if (server_var(caster_alive) = 0) then es_set mana 0
			if (server_var(mana) >= 15) do
			{
				es_set point z7
				es est_getviewplayer server_var(es_userid) point
				if (server_var(point) != z7) do
				{
					es_set steamcheck 0
					es est_getsteam steamcheck server_var(point)
					es_set phealth 0
					es_keygetvalue phealth dndExtra server_var(steamcheck) maxhealth
					es_set 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_set 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_set userid 0
							es_set userid server_var(es_userid)
							es_set xpcheck 0
							es_keygetvalue xpcheck dndUsers server_var(es_steamid) curxp
							es_set 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(es_userid) #green You have gained 15 xp for healing someone.
							es_set name
							es est_getname name server_var(es_steamid)
							es_tell server_var(point) #green You have just been healed by server_var(name) for server_var(random) hp!
							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_set es_userid 0
  	es_getcmduserid es_userid
	es_set es_steamid 0
	es est_getsteam es_steamid server_var(es_userid)
	es_set ccheck 0
	es_keygetvalue ccheck dndUsers server_var(es_steamid) class
	es_set lcheck 0
	es_keygetvalue lcheck dndUsers server_var(es_steamid) server_var(ccheck)	
	es_set lacheck 0
	es_keygetvalue lacheck dndUsers server_var(es_steamid) la
	es_math lcheck - server_var(lacheck)
	if (server_var(ccheck) = cleric) do
	{
		es_set pcheck 0
		es_keygetvalue pcheck dndUsers server_var(es_steamid) prestige
		if (server_var(pcheck) = cpc1) do
		{
			es_set lcheck 5
		}
		if (server_var(pcheck) = cpc2) do
		{
			es_set lcheck 10
		}
		if (server_var(pcheck) = cpc3) do
		{
			es_set lcheck 15
			es_set plcheck 0
			es_keygetvalue plcheck dndUsers server_var(es_steamid) server_var(pcheck)
		}
		if (server_var(lcheck) >= 7) do
		{
			es_set acheck 0
			es_keygetvalue acheck dndExtra server_var(es_steamid) algin
			if (server_var(acheck) = good) do
			{
				es_set mana 0
				es_keygetvalue mana dndExtra server_var(es_steamid) mana
				es_set caster_alive 0
				es est_isalive caster_alive server_var(es_userid)
				if (server_var(caster_alive) = 0) then es_set mana 0
				if (server_var(mana) >= 20) do
				{
					es_set point z7
					es est_getviewplayer server_var(es_userid) point
					if (server_var(point) != z7) do
					{
						es_set steamcheck 0
						es est_getsteam steamcheck server_var(point)
						es_set phealth 0
						es_keygetvalue phealth dndExtra server_var(steamcheck) maxhealth
						es_set thealth 0
						es est_gethealth thealth server_var(point)
						es_rand random 4 32
						if (server_var(lcheck) > 20) do
						{
							es_set 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_set userid 0
								es_set userid server_var(es_userid)
								es_set xpcheck 0
								es_keygetvalue xpcheck dndUsers server_var(es_steamid) curxp
								es_set 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) #multi#green You have gained #lightgreen20 xp #greenfor healing someone.
								es_set name
								es est_getname name server_var(es_steamid)
								es_tell server_var(point) #green You have just been healed by server_var(name) for server_var(random) hp!
								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_set mana 0
				es_keygetvalue mana dndExtra server_var(es_steamid) mana
				es_set caster_alive 0
				es est_isalive caster_alive server_var(es_userid)
				if (server_var(caster_alive) = 0) then es_set mana 0
				if (server_var(mana) >= 20) do
				{
					es_set point z7
					es est_getviewplayer server_var(es_userid) point
					if (server_var(point) != z7) do
					{
						es_set 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_set steamcheck 0
							es est_getsteam steamcheck server_var(point)
							es_set vrandom 0
							es_rand vrandom 1 20
							if (server_var(vrandom) != 20) do
							{
								es_set vpcheck 0
								es_keygetvalue vpcheck dndExtra server_var(steamcheck) willsave
								es_math vrandom + vpcheck
								es_set 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_set 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.
								es_tell server_var(point) #lightgreen You have been dealt server_var(random) damage.
							}
						}
						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_set es_userid 0
  	es_getcmduserid es_userid
	es_set es_steamid 0
	es est_getsteam es_steamid server_var(es_userid)
	es_set ccheck 0
	es_keygetvalue ccheck dndUsers server_var(es_steamid) class
	es_set lcheck 0
	es_keygetvalue lcheck dndUsers server_var(es_steamid) server_var(ccheck)	
	es_set lacheck 0
	es_keygetvalue lacheck dndUsers server_var(es_steamid) la
	es_math lcheck - server_var(lacheck)
	if (server_var(ccheck) = cleric) do
	{
		es_set pcheck 0
		es_keygetvalue pcheck dndUsers server_var(es_steamid) prestige
		if (server_var(pcheck) = cpc1) do
		{
			es_set lcheck 5
		}
		if (server_var(pcheck) = cpc2) do
		{
			es_set lcheck 10
		}
		if (server_var(pcheck) = cpc3) do
		{
			es_set lcheck 15
		}
		if (server_var(lcheck) >= 9) do
		{
			es_set acheck 0
			es_keygetvalue acheck dndExtra server_var(es_steamid) algin
			if (server_var(acheck) = evil) do
			{
				es_set mana 0
				es_keygetvalue mana dndExtra server_var(es_steamid) mana
				es_set caster_alive 0
				es est_isalive caster_alive server_var(es_userid)
				if (server_var(caster_alive) = 0) then es_set mana 0
				if (server_var(mana) >= 10) do
				{
					es_set point z7
					es est_getviewplayer server_var(es_userid) point
					if (server_var(point) != z7) do
					{
						es_set steamcheck 0
						es est_getsteam steamcheck server_var(point)
						es_set vrandom 0
						es_rand vrandom 1 20
						if (server_var(vrandom) != 20) do
						{
							es_set vpcheck 0
							es_keygetvalue vpcheck dndEsers server_var(steamcheck) willsave
							es_math vrandom + vpcheck
							es_set 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!	
								es_tell server_var(point) #lightgreen You have resisted a spell.		
							}
							else do
							{
								es ma_blind server_var(point) 200
								es_tell server_var(es_userid) #green You have blinded your target.
								es_tell server_var(point) #lightgreen You have been blinded by a Curse!
							}
						}
					}
				}
			}
			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_set es_userid 0
  	es_getcmduserid es_userid
	es_set es_steamid 0
	es est_getsteam es_steamid server_var(es_userid)
	es_set ccheck 0
	es_keygetvalue ccheck dndUsers server_var(es_steamid) class
	es_set lcheck 0
	es_keygetvalue lcheck dndUsers server_var(es_steamid) server_var(ccheck)	
	es_set lacheck 0
	es_keygetvalue lacheck dndUsers server_var(es_steamid) la
	es_math lcheck - server_var(lacheck)
	if (server_var(ccheck) = cleric) do
	{
		es_set pcheck 0
		es_keygetvalue pcheck dndUsers server_var(es_steamid) prestige
		if (server_var(pcheck) = cpc1) do
		{
			es_set lcheck 5
		}
		if (server_var(pcheck) = cpc2) do
		{
			es_set lcheck 10
		}
		if (server_var(pcheck) = cpc3) do
		{
			es_set lcheck 15
		}
		if (server_var(lcheck) >= 9) do
		{
			es_set acheck 0
			es_keygetvalue acheck dndExtra server_var(es_steamid) algin
			if (server_var(acheck) = good) do
			{
				es_set mana 0
				es_keygetvalue mana dndExtra server_var(es_steamid) mana
				es_set caster_alive 0
				es est_isalive caster_alive server_var(es_userid)
				if (server_var(caster_alive) = 0) then es_set mana 0
				if (server_var(mana) >= 10) do
				{
					es_set 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_set steamcheck 0
						es est_getsteam steamcheck server_var(point)
						es_set phealth 0
						es_keygetvalue phealth dndExtra server_var(steamcheck) maxhealth
						es_set thealth 0
						es_set 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
						es_tell server_var(point) #green You have been cured of your ailments!
						es_tell server_var(es_userid) #green You have cured your target.
					}
				}
				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_set es_userid 0
  	es_getcmduserid es_userid
	es_set es_steamid 0
	es est_getsteam es_steamid server_var(es_userid)
	es_set ccheck 0
	es_keygetvalue ccheck dndUsers server_var(es_steamid) class
	es_set lcheck 0
	es_keygetvalue lcheck dndUsers server_var(es_steamid) server_var(ccheck)	
	es_set lacheck 0
	es_keygetvalue lacheck dndUsers server_var(es_steamid) la
	es_math lcheck - server_var(lacheck)
	if (server_var(ccheck) = cleric) do
	{
		es_set pcheck 0
		es_keygetvalue pcheck dndUsers server_var(es_steamid) prestige
		if (server_var(pcheck) = cpc1) do
		{
			es_set lcheck 5
		}
		if (server_var(pcheck) = cpc2) do
		{
			es_set lcheck 10
		}
		if (server_var(pcheck) = cpc3) do
		{
			es_set lcheck 15
		}
		if (server_var(lcheck) >= 11) do
		{
			es_set acheck 0
			es_keygetvalue acheck dndExtra server_var(es_steamid) algin
			if (server_var(acheck) = good) do
			{
				es_set mana 0
				es_keygetvalue mana dndExtra server_var(es_steamid) mana
				es_set caster_alive 0
				es est_isalive caster_alive server_var(es_userid)
				if (server_var(caster_alive) = 0) then es_set 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_set team_check 0
					es est_getteam team_check server_var(es_userid)
					if (server_var(team_check) = 2) do
					{
						es ma_blind #T 0
						es_set player
						foreach player player #t "est_Fade server_var(player) 0 1 1 0 0 0 0"
						es_set name
						es est_getname name server_var(es_steamid)
						es_msg server_var(name) has just unblinded all of the t's
					}
					if (server_var(team_check) = 3) do
					{
						es ma_blind #CT 0
						es_set player
						foreach player player #ct "est_Fade server_var(player) 0 1 1 0 0 0 0"
						es_set name
						es est_getname name server_var(es_steamid)
						es_msg server_var(name) has just unblinded all of the ct's
					}
				}
				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_set es_userid 0
  	es_getcmduserid es_userid
	es_set es_steamid 0
	es est_getsteam es_steamid server_var(es_userid)
	es_set ccheck 0
	es_keygetvalue ccheck dndUsers server_var(es_steamid) class
	es_set lcheck 0
	es_keygetvalue lcheck dndUsers server_var(es_steamid) server_var(ccheck)	
	es_set lacheck 0
	es_keygetvalue lacheck dndUsers server_var(es_steamid) la
	es_math lcheck - server_var(lacheck)
	if (server_var(ccheck) = cleric) do
	{
		es_set pcheck 0
		es_keygetvalue pcheck dndUsers server_var(es_steamid) prestige
		if (server_var(pcheck) = cpc1) do
		{
			es_set lcheck 5
		}
		if (server_var(pcheck) = cpc2) do
		{
			es_set lcheck 10
		}
		if (server_var(pcheck) = cpc3) do
		{
			es_set lcheck 15
		}
		if (server_var(lcheck) >= 11) do
		{
			es_set acheck 0
			es_keygetvalue acheck dndExtra server_var(es_steamid) algin
			if (server_var(acheck) = evil) do
			{
				es_set mana 0
				es_keygetvalue mana dndExtra server_var(es_steamid) mana
				es_set caster_alive 0
				es est_isalive caster_alive server_var(es_userid)
				if (server_var(caster_alive) = 0) then es_set 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_set team_check 0
					es est_getteam team_check server_var(es_userid)
					if (server_var(team_check) = 3) do
					{
						es ma_blind #T 150
						es_set name
						es est_getname name server_var(es_steamid)
						es_set player
						foreach player player #t "es_tell server_var(player) You have just been blinded by server_var(name) by bane"
						
						
					}
					if (server_var(team_check) = 2) do
					{
						es ma_blind #CT 150
						es_set name
						es est_getname name server_var(es_steamid)
						es_set player
						foreach player player #ct "es_tell server_var(player) You have just been blinded by server_var(name) by bane"
					}
				}
				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_set es_userid 0
  	es_getcmduserid es_userid
	es_set es_steamid 0
	es est_getsteam es_steamid server_var(es_userid)
	es_set ccheck 0
	es_keygetvalue ccheck dndUsers server_var(es_steamid) class
	es_set lcheck 0
	es_keygetvalue lcheck dndUsers server_var(es_steamid) server_var(ccheck)	
	es_set lacheck 0
	es_keygetvalue lacheck dndUsers server_var(es_steamid) la
	es_math lcheck - server_var(lacheck)
	if (server_var(ccheck) = cleric) do
	{
		es_set pcheck 0
		es_keygetvalue pcheck dndUsers server_var(es_steamid) prestige
		if (server_var(pcheck) = cpc1) do
		{
			es_set lcheck 5
		}
		if (server_var(pcheck) = cpc2) do
		{
			es_set lcheck 10
		}
		if (server_var(pcheck) = cpc3) do
		{
			es_set lcheck 15
		}
		if (server_var(lcheck) >= 13) do
		{
			es_set acheck 0
			es_keygetvalue acheck dndExtra server_var(es_steamid) algin
			if (server_var(acheck) = evil) do
			{
				es_set mana 0
				es_keygetvalue mana dndExtra server_var(es_steamid) mana
				es_set caster_alive 0
				es est_isalive caster_alive server_var(es_userid)
				if (server_var(caster_alive) = 0) then es_set mana 0
				if (server_var(mana) >= 25) do
				{
					es_set point z7
					es est_getviewplayer server_var(es_userid) point
					if (server_var(point) != z7) do
					{
						es_set 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_set steamcheck 0
							es est_getsteam steamcheck server_var(point)
							es_set vclass 0
							es_keygetvalue vclass dndUsers server_var(steamcheck) class
							es_set vlevel 0
							es_keygetvalue vlevel dndUsers server_var(steamcheck) server_var(vclass)
							es_set user_level server_var(lcheck)
							es_set vlevel_1 server_var(vlevel)
							es_math vlevel_1 + 1
							es_set vlevel_5 server_var(vlevel)
							es_math vlevel_5 + 5
							es_set vlevel_10 server_var(vlevel)
							es_math vlevel_10 + 10
							if (server_var(user_level) >= server_var(vlevel_10)) do
							{
								es_set save 0
								es_set 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_set save 0
								es_set 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_set save 0
								es_set 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_set 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_set save 0
								es_set 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
									}
								}	
							}
							es_tell server_var(es_userid) #green You have just used blasphemy on your target.
							es_tell server_var(point) #lightgreen You have just had blashphemy used on you.			
						}	
						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_set es_userid 0
  	es_getcmduserid es_userid
	es_set es_steamid 0
	es est_getsteam es_steamid server_var(es_userid)
	es_set ccheck 0
	es_keygetvalue ccheck dndUsers server_var(es_steamid) class
	es_set lcheck 0
	es_keygetvalue lcheck dndUsers server_var(es_steamid) server_var(ccheck)	
	es_set lacheck 0
	es_keygetvalue lacheck dndUsers server_var(es_steamid) la
	es_math lcheck - server_var(lacheck)
	if (server_var(ccheck) = cleric) do
	{
		es_set pcheck 0
		es_keygetvalue pcheck dndUsers server_var(es_steamid) prestige
		if (server_var(pcheck) = cpc1) do
		{
			es_set lcheck 5
		}
		if (server_var(pcheck) = cpc2) do
		{
			es_set lcheck 10
		}
		if (server_var(pcheck) = cpc3) do
		{
			es_set lcheck 15
		}
		if (server_var(lcheck) >= 13) do
		{
			es_set acheck 0
			es_keygetvalue acheck dndExtra server_var(es_steamid) algin
			if (server_var(acheck) = good) do
			{
				es_set mana 0
				es_keygetvalue mana dndExtra server_var(es_steamid) mana
				es_set caster_alive 0
				es est_isalive caster_alive server_var(es_userid)
				if (server_var(caster_alive) = 0) then es_set 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 close resmenu server_var(es_userid)
					popup delete resmenu
					popup create resmenu
					popup addline resmenu " Choose a dead teamate to raise from the dead:"
					es_set rplayer 0
					es_set team_check 0
					es est_getteam team_check server_var(es_userid)
					es_set rnumber 0
					if (server_var(team_check) = 3) do
					{
						foreach player rplayer #dead#ct "es_doblock dnd/rmenuadd"
					}
					if (server_var(team_check) = 2) do
					{
						foreach player rplayer #dead#t "es_doblock dnd/rmenuadd"
					}
					popup menuselect resmenu dnd/resplayer
					es_set 1check 0
					es_keygetvalue 1check dndExtra server_var(es_steamid) 1
					if (server_var(1check) != 0) do
					{
						es mcudnd server_var(es_userid)
						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 resyesno
{
	popup delete reschoice
	popup create reschoice
	popup addline reschoice " do you want to be resurrected by a Cleric?"
	popup addline reschoice "-> 1. yes"
	popup addline reschoice "-> 2. no"
	popup menuselect reschoice dnd/resurrect

	es mcudnd server_var(cplayer)
	es popup send reschoice server_var(cplayer)
}
block resurrect
{
	
	es_set rescsteam 0
	es_set reserid 0	
	es_set resern 0
	es_set reserst 0
	es_set cpname 0
	es est_getsteam rescsteam server_var(_popup_userid)
	es_set rescheck 0
	es_keygetvalue rescheck dndExtra server_var(rescsteam) res_count
	es_keygetvalue reserid dndExtra server_var(rescsteam) reser
	es est_getname cpname server_var(rescsteam)
	es est_getsteam reserst server_var(reserid)
	es est_getname resern server_var(reserst)
	if (server_var(_popup_choice) = 1) do
	{
		es_set alive 0
		es est_isalive alive server_var(_popup_userid)
		if (server_var(alive) = 0) do
		{	
			es_set aliver 0
			es est_isalive aliver server_var(reserid)
			if (server_var(aliver) = 1) do
			{
						
				es_set rzcheck 0 
				es_keygetvalue rzcheck dndExtra server_var(rescsteam) zombie
				
				if (server_var(rzcheck) = 0) do
				{ 
					if (server_var(rescheck) < 5) do
					{
						es_set x 0
						es_set y 0
						es_set 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
						
						if (server_var(rescheck) = 0) do
						{
							es_set rescheck 1
						}
						else do
						{
							es_math rescheck + 1
						}
						es_keysetvalue dndExtra server_var(rescsteam) res_count server_var(rescheck)
						
						
						es_tell server_var(_popup_userid) #green You have been restored to life by server_var(resern) an ally cleric!
				
				
						es_set mana 0
						es_keygetvalue mana dndExtra server_var(reserst) mana
						es_math mana - 35
						es_keysetvalue dndExtra server_var(reserst) mana server_var(mana)
						
						es_set xpcheck 0
						es_keygetvalue xpcheck dndUsers server_var(reserst) curxp
						es_set currentxp 0
						es_keygetvalue currentxp dndUsers server_var(reserst) server_var(xpcheck)
						es_math currentxp + 35	
						es_keysetvalue dndUsers server_var(reserst) server_var(xpcheck) server_var(currentxp)
						
						es_tell server_var(reserid) #green You have gained #lightgreen35 xp#green for bringing back server_var(cpname) from the dead.
						es_set es_steamid server_var(reserst)
						es_set userid server_var(reserid)
						es_doblock dnd/class_level
						es est_spawn server_var(_popup_userid)
						es ma_teleport server_var(_popup_userid) server_var(x) server_var(y) server_var(z)
					}
					else do
					{
						es_tell server_var(reserid) #lightgreen server_var(cpname) has been restored to life to many times this round!
					}
				}
				else do
				{
					es_tell server_var(reserid) #lightgreen server_var(cpname) is already undead so you can't res him.
				}
			}
			
			
		}
		else do 
		{
			es_tell server_var(reserid) #lightgreen server_var(cpname) is already alive and can't be raised at this time.
		}
		
	}
	else do 
	{
		es_tell server_var(reserid) #lightgreen server_var(cpname) doesn't wan't to be raised at this time.
	}
}

block resplayer
{
	es_set csteam 0
	es_set cpsteam 0
	es est_getsteam csteam server_var(_popup_userid)
	es_set mana 0
	es_keygetvalue mana dndExtra server_var(csteam) mana
	es_set cplayer 0
	if (server_var(_popup_choice) = 1) do
	{
		es_set 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 est_getsteam cpsteam server_var(cplayer)
			es_keysetvalue dndExtra server_var(cpsteam) reser server_var(_popup_userid)
			es_doblock dnd/resyesno
			
		}
	}
	if (server_var(_popup_choice) = 2) do
	{
		es_keygetvalue cplayer dndExtra server_var(csteam) 2
		if (server_var(cplayer) != 0) do
		{
			es_set alive 0
			es est_isalive alive server_var(_popup_userid)
			if (server_var(alive) = 1) do
			{
				es est_getsteam cpsteam server_var(cplayer)
				es_keysetvalue dndExtra server_var(cpsteam) reser server_var(_popup_userid)
				es_doblock dnd/resyesno
				
				
			}
		}
	}
	if (server_var(_popup_choice) = 3) do
	{
		es_keygetvalue cplayer dndExtra server_var(csteam) 3
		if (server_var(cplayer) != 0) do
		{
			es_set alive 0
			es est_isalive alive server_var(_popup_userid)
			if (server_var(alive) = 1) do
			{
				es est_getsteam cpsteam server_var(cplayer)
				es_keysetvalue dndExtra server_var(cpsteam) reser server_var(_popup_userid)
				es_doblock dnd/resyesno
			}
		}
	}
	if (server_var(_popup_choice) = 4) do
	{
		es_keygetvalue cplayer dndExtra server_var(csteam) 4
		if (server_var(cplayer) != 0) do
		{
			es_set alive 0
			es est_isalive alive server_var(_popup_userid)
			if (server_var(alive) = 1) do
			{
				es est_getsteam cpsteam server_var(cplayer)
				es_keysetvalue dndExtra server_var(cpsteam) reser server_var(_popup_userid)
				es_doblock dnd/resyesno
			}
		}
	}
	if (server_var(_popup_choice) = 5) do
	{
		es_keygetvalue cplayer dndExtra server_var(csteam) 5
		if (server_var(cplayer) != 0) do
		{
			es_set alive 0
			es est_isalive alive server_var(_popup_userid)
			if (server_var(alive) != 1) do
			{
				es est_getsteam cpsteam server_var(cplayer)
				es_keysetvalue dndExtra server_var(cpsteam) reser server_var(_popup_userid)
				es_doblock dnd/resyesno
			}
		}
	}
	if (server_var(_popup_choice) = 6) do
	{
		es_keygetvalue cplayer dndExtra server_var(csteam) 6
		if (server_var(cplayer) != 0) do
		{
			es_set alive 0
			es est_isalive alive server_var(_popup_userid)
			if (server_var(alive) = 1) do
			{
				es est_getsteam cpsteam server_var(cplayer)
				es_keysetvalue dndExtra server_var(cpsteam) reser server_var(_popup_userid)
				es_doblock dnd/resyesno
			}
		}
	}
	if (server_var(_popup_choice) = 7) do
	{
		es_keygetvalue cplayer dndExtra server_var(csteam) 7
		if (server_var(cplayer) != 0) do
		{
			es_set alive 0
			es est_isalive alive server_var(_popup_userid)
			if (server_var(alive) = 1) do
			{
				es est_getsteam cpsteam server_var(cplayer)
				es_keysetvalue dndExtra server_var(cpsteam) reser server_var(_popup_userid)
				es_doblock dnd/resyesno
			}
		}
	}
	if (server_var(_popup_choice) = 8) do
	{
		es_keygetvalue cplayer dndExtra server_var(csteam) 8
		if (server_var(cplayer) != 0) do
		{
			es_set alive 0
			es est_isalive alive server_var(_popup_userid)
			if (server_var(alive) = 1) do
			{
				es est_getsteam cpsteam server_var(cplayer)
				es_keysetvalue dndExtra server_var(cpsteam) reser server_var(_popup_userid)
				es_doblock dnd/resyesno
			}
		}
	}
	if (server_var(_popup_choice) = 9) do
	{
		es_keygetvalue cplayer dndExtra server_var(csteam) 9
		if (server_var(cplayer) != 0) do
		{
			es_set alive 0
			es est_isalive alive server_var(_popup_userid)
			if (server_var(alive) = 1) do
			{
				es est_getsteam cpsteam server_var(cplayer)
				es_keysetvalue dndExtra server_var(cpsteam) reser server_var(_popup_userid)
				es_doblock dnd/resyesno
			}
		}
	}
}

block rmenuadd
{
	es_set rsteam 0
	es est_getsteam rsteam server_var(rplayer)
	es_set rzcheck 0
	es_keygetvalue rzcheck dndExtra server_var(rsteam) zombie
	if (server_var(rzcheck) = 0) do
	{
		es_set rzteam 0
		es est_getteam rzteam server_var(rplayer)
		if (server_var(rzteam) >= 2) do
		{
			es_set rescount 0
			es_keygetvalue rescount dndExtra server_var(rsteam) res_count
			if (server_var(rescount) = 0) do
			{
				es_set rescount 1
			}
			else do
			{
				es_math rescount + 1
			}
			if (server_var(rescount) < 5) do
			{
				es_set per 20
				es_math per * server_var(rescount)
				es_set rname 0
				es est_getname rname server_var(rplayer)
				if (server_var(rnumber) = 0) do
				{
					es_set 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_set es_userid 0
  	es_getcmduserid es_userid
	es_set es_steamid 0
	es est_getsteam es_steamid server_var(es_userid)
	es_set ccheck 0
	es_keygetvalue ccheck dndUsers server_var(es_steamid) class
	es_set lcheck 0
	es_keygetvalue lcheck dndUsers server_var(es_steamid) server_var(ccheck)	
	es_set lacheck 0
	es_keygetvalue lacheck dndUsers server_var(es_steamid) la
	es_math lcheck - server_var(lacheck)
	if (server_var(ccheck) = cleric) do
	{
		es_set pcheck 0
		es_keygetvalue pcheck dndUsers server_var(es_steamid) prestige
		if (server_var(pcheck) = cpc1) do
		{
			es_set lcheck 5
		}
		if (server_var(pcheck) = cpc2) do
		{
			es_set lcheck 10
		}
		if (server_var(pcheck) = cpc3) do
		{
			es_set lcheck 15
		}
		if (server_var(lcheck) >= 5) do
		{
			es_set spell 0
			es_keygetvalue spell dndExtra server_var(es_steamid) spell
			if(server_var(spell) = 0) do
			{
				es_set mana 0
				es_keygetvalue mana dndExtra server_var(es_steamid) mana
				es_set caster_alive 0
				es est_isalive caster_alive server_var(es_userid)
				if (server_var(caster_alive) = 0) then es_set mana 0
				if (server_var(mana) >= 20) do
				{
					es_set 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_set level server_var(lcheck)
						if (server_var(level) > 10) then es_set level 10
						es_set maxdmg 6
						es_math maxdmg * server_var(level)
						es_rand random server_var(level) server_var(maxdmg)
						es_math level / 2
						es_set steamcheck 0
						es est_getsteam steamcheck server_var(point)
						es_set vrandom 0
						es_rand vrandom 1 20
						if (server_var(vrandom) != 20) do
						{
							es_set bonus 0
							es_keygetvalue bonus dndExtra server_var(steamcheck) willsave
							es_math vrandom + server_var(bonus)
							
							es_set wrandom 10
							es_math wrandom + 11
							if (server_var(vrandom) >= server_var(wrandom)) do
							{
								es_math random / 2
								es_set level 0
								es_tell server_var(es_userid) #green Your victim has dodged some of your fire storm!
								es_tell server_var(point) #lightgreen You have just taken half damage from a fire storm
							}
							else do
							{
								es_tell server_var(es_userid) #green You have used fire storm! Watch them burn!
								es_tell server_var(point) #lightgreen You have been hit by a firestorm and are now burning!!
								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_set es_userid 0
  	es_getcmduserid es_userid
	es_set es_steamid 0
	es est_getsteam es_steamid server_var(es_userid)
	es_set ccheck 0
	es_keygetvalue ccheck dndUsers server_var(es_steamid) class
	es_set lcheck 0
	es_keygetvalue lcheck dndUsers server_var(es_steamid) server_var(ccheck)	
	es_set lacheck 0
	es_keygetvalue lacheck dndUsers server_var(es_steamid) la
	es_math lcheck - server_var(lacheck)
	if (server_var(ccheck) = cleric) do
	{
		es_set pcheck 0
		es_keygetvalue pcheck dndUsers server_var(es_steamid) prestige
		if (server_var(pcheck) = cpc1) do
		{
			es_set lcheck 5
		}
		if (server_var(pcheck) = cpc2) do
		{
			es_set lcheck 10
		}
		if (server_var(pcheck) = cpc3) do
		{
			es_set lcheck 15
		}
		if (server_var(lcheck) >= 17) do
		{
			es_set mana 0
			es_keygetvalue mana dndExtra server_var(es_steamid) mana
			es_set caster_alive 0
			es est_isalive caster_alive server_var(es_userid)
			if (server_var(caster_alive) = 0) then es_set mana 0
			if (server_var(mana) >= 20) do
			{
				es_set 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_set 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_set 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_set es_userid 0
  	es_getcmduserid es_userid
	es_set es_steamid 0
	es est_getsteam es_steamid server_var(es_userid)
	es_set pcheck 0
	es_keygetvalue pcheck dndUsers server_var(es_steamid) prestige
	if (server_var(pcheck) = cpc1) do
	{
		es_set plcheck 0
		es_keygetvalue plcheck dndUsers server_var(es_steamid) server_var(pcheck)
		es_set lacheck 0
		es_keygetvalue lacheck dndUsers server_var(es_steamid) la
		es_math plcheck - server_var(lacheck)
		es_set mana 0
		if (server_var(plcheck) >= 1) do
		{
			es_set mana 0
			es_keygetvalue mana dndExtra server_var(es_steamid) mana
			es_set caster_alive 0
			es est_isalive caster_alive server_var(es_userid)
			if (server_var(caster_alive) = 0) then es_set mana 0
			if (server_var(mana) >= 25) do
			{
				es_set 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_set es_userid 0
  	es_getcmduserid es_userid
	es_set es_steamid 0
	es est_getsteam es_steamid server_var(es_userid)
	es_set pcheck 0
	es_keygetvalue pcheck dndUsers server_var(es_steamid) prestige
	if (server_var(pcheck) = cpc1) do
	{
		es_set plcheck 0
		es_keygetvalue plcheck dndUsers server_var(es_steamid) server_var(pcheck)
		es_set lacheck 0
		es_keygetvalue lacheck dndUsers server_var(es_steamid) la
		es_math plcheck - server_var(lacheck)
		es_set mana 0
		if (server_var(plcheck) >= 4) do
		{
			es_set mana 0
			es_keygetvalue mana dndExtra server_var(es_steamid) mana
			es_set caster_alive 0
			es est_isalive caster_alive server_var(es_userid)
			if (server_var(caster_alive) = 0) then es_set mana 0
			if (server_var(mana) >= 30) do
			{
				es_set 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_set es_userid 0
  	es_getcmduserid es_userid
	es_set es_steamid 0
	es est_getsteam es_steamid server_var(es_userid)
	es_set pcheck 0
	es_keygetvalue pcheck dndUsers server_var(es_steamid) prestige
	if (server_var(pcheck) = cpc1) do
	{
		es_set plcheck 0
		es_keygetvalue plcheck dndUsers server_var(es_steamid) server_var(pcheck)
		es_set lacheck 0
		es_keygetvalue lacheck dndUsers server_var(es_steamid) la
		es_math plcheck - server_var(lacheck)
		es_set mana 0
		if (server_var(plcheck) >= 7) do
		{
			es_set mana 0
			es_keygetvalue mana dndExtra server_var(es_steamid) mana
			es_set caster_alive 0
			es est_isalive caster_alive server_var(es_userid)
			if (server_var(caster_alive) = 0) then es_set mana 0
			if (server_var(mana) >= 35) do
			{
				es_set 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_set es_userid 0
  	es_getcmduserid es_userid
	es_set es_steamid 0
	es est_getsteam es_steamid server_var(es_userid)
	es_set pcheck 0
	es_keygetvalue pcheck dndUsers server_var(es_steamid) prestige
	if (server_var(pcheck) = cpc1) do
	{
		es_set plcheck 0
		es_keygetvalue plcheck dndUsers server_var(es_steamid) server_var(pcheck)
		es_set lacheck 0
		es_keygetvalue lacheck dndUsers server_var(es_steamid) la
		es_math plcheck - server_var(lacheck)
		es_set mana 0
		if (server_var(plcheck) >= 10) do
		{
			es_set mana 0
			es_keygetvalue mana dndExtra server_var(es_steamid) mana
			es_set caster_alive 0
			es est_isalive caster_alive server_var(es_userid)
			if (server_var(caster_alive) = 0) then es_set mana 0
			if (server_var(mana) >= 40) do
			{
				es_set 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_set 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_set es_userid 0
  	es_getcmduserid es_userid
	es_set es_steamid 0
	es est_getsteam es_steamid server_var(es_userid)
	es_set pcheck 0
	es_keygetvalue pcheck dndUsers server_var(es_steamid) prestige
	if (server_var(pcheck) = cpc1) do
	{
		es_set plcheck 0
		es_keygetvalue plcheck dndUsers server_var(es_steamid) server_var(pcheck)
		es_set lacheck 0
		es_keygetvalue lacheck dndUsers server_var(es_steamid) la
		es_math plcheck - server_var(lacheck)
		es_set mana 0
		if (server_var(plcheck) >= 13) do
		{
			es_set mana 0
			es_keygetvalue mana dndExtra server_var(es_steamid) mana
			es_set caster_alive 0
			es est_isalive caster_alive server_var(es_userid)
			if (server_var(caster_alive) = 0) then es_set mana 0
			if (server_var(mana) >= 45) do
			{
				es_set 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_set es_userid 0
  	es_getcmduserid es_userid
	es_set es_steamid 0
	es est_getsteam es_steamid server_var(es_userid)
	es_set pcheck 0
	es_keygetvalue pcheck dndUsers server_var(es_steamid) prestige
	if (server_var(pcheck) = cpc1) do
	{
		es_set plcheck 0
		es_keygetvalue plcheck dndUsers server_var(es_steamid) server_var(pcheck)
		es_set lacheck 0
		es_keygetvalue lacheck dndUsers server_var(es_steamid) la
		es_math plcheck - server_var(lacheck)
		es_set mana 0
		if (server_var(plcheck) >= 15) do
		{
			es_set mana 0
			es_keygetvalue mana dndExtra server_var(es_steamid) mana
			es_set caster_alive 0
			es est_isalive caster_alive server_var(es_userid)
			if (server_var(caster_alive) = 0) then es_set mana 0
			if (server_var(mana) >= 50) do
			{
				es_set 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_set lcheck 0
	es_keygetvalue lcheck dndUsers event_var(es_steamid) cleric
	es_set pcheck 0
	es_keygetvalue pcheck dndUsers event_var(es_steamid) prestige
	es_set 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_set 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_set plcheck 0
	es_keygetvalue plcheck dndUsers event_var(es_steamid) cpc1
	es_set lcheck 5
}

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

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

block cleric_spelllist
{
	es_set 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_set spelllist "Spells Known:\n"
	es_set 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_set pcheck 0
	es_keygetvalue pcheck dndUsers event_var(es_steamid) prestige
	es_set plcheck 0
	es_keygetvalue plcheck dndUsers event_var(es_steamid) server_var(pcheck)
	es_set lacheck 0
	es_keygetvalue lacheck dndUsers event_var(es_steamid) la
	es_math plcheck - server_var(lacheck)
	es_set 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_set lcheck 0
	es_keygetvalue lcheck dndUsers event_var(es_steamid) cleric
}

block show_mana
{
	es_set 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_keysetvalue dndExtra event_var(es_steamid) turn 0
    es_keysetvalue dndExtra event_var(es_steamid) rebuke 0
	es_set 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_set ks_counter 0
	es_keygetvalue ks_counter dndExtra event_var(es_attackersteamid) killing_spree
	es_set 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_set ks_counter 1
		}
		else do
		{
			es_math ks_counter + 1
		}
	}
	es_keysetvalue dndExtra event_var(es_attackersteamid) killing_spree server_var(ks_counter)
	es_set ccheck 0
	es_keygetvalue ccheck dndUsers event_var(es_steamid) class
	es_set 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_set x 0
	es_set y 0
	es_set 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_set xpcheck 0
	es_keygetvalue xpcheck dndUsers event_var(es_attackersteamid) curxp
	es_set currentxp 0
	es_keygetvalue currentxp dndUsers event_var(es_attackersteamid) server_var(xpcheck)
	es_set es_steamid 0
	es_set es_steamid event_var(es_attackersteamid)
	es_set userid 0
	es_set userid event_var(attacker)
	es_set attackerclass 0
	es_keygetvalue attackerclass dndUsers event_var(es_attackersteamid) class
	es_set victimlevel 0
	es_set 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_set victimp 0
	es_set 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_set vplevel 0
		es_keygetvalue vplevel dndUsers event_var(es_steamid) server_var(victimp)
		if (server_var(victimp) = fpc1) then es_set victimlevel 5
		if (server_var(victimp) = rpc1) then es_set victimlevel 5
		if (server_var(victimp) = cpc1) then es_set victimlevel 5
		if (server_var(victimp) = wpc1) then es_set victimlevel 5
		if (server_var(victimp) = fpc2) then es_set victimlevel 10
		if (server_var(victimp) = rpc2) then es_set victimlevel 10
		if (server_var(victimp) = cpc2) then es_set victimlevel 10
		if (server_var(victimp) = wpc2) then es_set victimlevel 10
		if (server_var(victimp) = fpc3) then es_set victimlevel 15
		if (server_var(victimp) = rpc3) then es_set victimlevel 15
		if (server_var(victimp) = cpc3) then es_set victimlevel 15
		if (server_var(victimp) = wpc3) then es_set victimlevel 15
		es_math victimlevel + server_var(vplevel)
	}
	if (server_var(attackerp) != 0) do
	{
		es_set aplevel 0
		es_keygetvalue aplevel dndUsers event_var(es_attackersteamid) server_var(attackerp)
		if (server_var(attackerp) = fpc1) then es_set attackerlevel 5
		if (server_var(attackerp) = rpc1) then es_set attackerlevel 5
		if (server_var(attackerp) = cpc1) then es_set attackerlevel 5
		if (server_var(attackerp) = wpc1) then es_set attackerlevel 5
		if (server_var(attackerp) = fpc2) then es_set attackerlevel 10
		if (server_var(attackerp) = rpc2) then es_set attackerlevel 10
		if (server_var(attackerp) = cpc2) then es_set attackerlevel 10
		if (server_var(attackerp) = wpc2) then es_set attackerlevel 10
		if (server_var(attackerp) = fpc3) then es_set attackerlevel 15
		if (server_var(attackerp) = rpc3) then es_set attackerlevel 15
		if (server_var(attackerp) = cpc3) then es_set attackerlevel 15
		if (server_var(attackerp) = wpc3) then es_set attackerlevel 15
		es_math attackerlevel + server_var(aplevel)		
	}
	if (server_var(bot_check) = 1) do
	{
		es_set victimlevel 0
	}
	es_set rcheck 0
	es_keygetvalue rcheck dndUsers event_var(es_attackersteamid) race
	es_set vicrcheck 0
	es_keygetvalue vicrcheck dndUsers event_var(es_steamid) race
	if (server_var(rcheck) = Zombie) then es_set attackerlevel 3
	if (server_var(rcheck) = Ghoul) then es_set attackerlevel 3
	if (server_var(rcheck) = tibbit) then es_set attackerlevel 5
	if (server_var(rcheck) = filcher) then es_set attackerlevel 7
	if (server_var(rcheck) = golem) then es_set attackerlevel 9
	if (server_var(rcheck) = rok) then es_set attackerlevel 11
	if (server_var(rcheck) = dragon) then es_set attackerlevel 13
	if (server_var(rcheck) = waterele) then es_set attackerlevel 15
	if (server_var(rcheck) = airele) then es_set attackerlevel 15
	if (server_var(rcheck) = fireele) then es_set attackerlevel 15
	if (server_var(rcheck) = earthele) then es_set attackerlevel 15
	if (server_var(rcheck) = chaindevil) then es_set attackerlevel 17
	if (server_var(rcheck) = gaint) then es_set attackerlevel 19
	if (server_var(rcheck) = basilisk) then es_set attackerlevel 21
	if (server_var(rcheck) = rabbit) then es_set attackerlevel 23
	if (server_var(vicrcheck) = Zombie) then es_set victimlevel 3
	if (server_var(vicrcheck) = Ghoul) then es_set victimlevel 3
	if (server_var(vicrcheck) = tibbit) then es_set victimlevel 5
	if (server_var(vicrcheck) = filcher) then es_set victimlevel 7
	if (server_var(vicrcheck) = golem) then es_set victimlevel 9
	if (server_var(vicrcheck) = rok) then es_set victimlevel 11
	if (server_var(vicrcheck) = dragon) then es_set victimlevel 13
	if (server_var(vicrcheck) = waterele) then es_set victimlevel 15
	if (server_var(vicrcheck) = airele) then es_set victimlevel 15
	if (server_var(vicrcheck) = fireele) then es_set victimlevel 15
	if (server_var(vicrcheck) = earthele) then es_set victimlevel 15
	if (server_var(vicrcheck) = chaindevil) then es_set victimlevel 17
	if (server_var(vicrcheck) = gaint) then es_set victimlevel 19
	if (server_var(vicrcheck) = basilisk) then es_set victimlevel 21
	if (server_var(vicrcheck) = rabbit) then es_set 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) experience for killing event_var(es_username)
//				es_math currentxp + server_var(forthxp)
//				es_tell event_var(attacker) #multi#green You have gained #lightgreenserver_var(forthxp) bonus xp #greenfor 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) #multi#green You have gained #lightgreenserver_var(headshotxp) bonus experience #greenfor a headshot.
				}
				if (event_var(weapon) = knife) do
				{
					es_math currentxp + server_var(knifexp)
					es_tell event_var(attacker) #multi#green You have gained #lightgreenserver_var(knifexp) bonus experience #greenfor knifing event_var(es_username).
				}
				if (event_var(weapon) = hegrenade) do
				{
					es_math currentxp + server_var(hexp)
					es_tell event_var(attacker) #multi#green You have gained #lightgreenserver_var(hexp) bonus experience #greenfor 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) #multi#green You have gained #lightgreenserver_var(humbxp) bonus experience #greenfor scoring a kill as a human.
				}
				es_set zcheck 0
				es_keygetvalue zcheck dndExtra event_var(es_attackersteamid) zombie
				if (server_var(zcheck) = 1) do
				{
					es_set makersteam 0
					es_set makeruser 0
					es_keygetvalue makersteam dndExtra event_var(es_attackersteamid) makersteam
					es_keygetvalue makeruser dndExtra event_var(es_attackersteamid) makeruser
					es_set xpc 0
					es_keygetvalue xpc dndUsers server_var(makersteam) curxp
					es_set 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) #multi#green You have gained #lightgreenserver_var(zombiexp) bonux xp #greenfor 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) #multi#green You have gained #lightgreenserver_var(ks_counter) bonus experience #greenfor having a killing spree!
				}
				if (server_var(victimlevel) > 30) then es_set victimlevel 0
				if (server_var(victimlevel) > server_var(attackerlevel)) do
				{
					es_math victimlevel - server_var(attackerlevel)
					es_set 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) #multi#green You have gained #lightgreenserver_var(bonus_xp) bonus experience #greenfor killing someone server_var(victimlevel) levels higher than yourself.
				}
			}
			else do
			{
				es_set tkid event_var(es_attackersteamid)
				es_set tkuser event_var(attacker)
				es mcudnd tkmenu event_var(userid)
				es popup send tkmenu event_var(userid)
			}
			if (server_var(currentxp) < 0) then es_set currentxp 0
			es_keysetvalue dndUsers event_var(es_attackersteamid) server_var(xpcheck) server_var(currentxp)
			es_doblock dnd/class_level
		}
	}
}

block class_level
{
	es_set ccheck 0
	es_keygetvalue ccheck dndUsers server_var(es_steamid) class
	es_set lcheck 0
	es_keygetvalue lcheck dndUsers server_var(es_steamid) server_var(ccheck)
	es_set xpcheck 0
	es_keygetvalue xpcheck dndUsers server_var(es_steamid) curxp
	es_set currentxp 0
	es_keygetvalue currentxp dndUsers server_var(es_steamid) server_var(xpcheck)
	es_set xpneeded 0
	es_set xpneeded server_var(classlevel)
	es_math xpneeded * server_var(lcheck)
	es_set mcheck 0
	es_keygetvalue mcheck dndUsers server_var(es_steamid) monster
	if (server_var(mcheck) = 1) do
	{
		es_set xpneeded server_var(monster_levelxp)
		if (server_var(xpneeded) <= server_var(currentxp)) do
		{
			es_doblock dnd/bonus_point
		}
	}
	es_set 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_set plcheck 0
		es_keygetvalue plcheck dndUsers server_var(es_steamid) server_var(pcheck)
		es_set pname 0
		if (server_var(pcheck) = fpc1) do
		{
			es_set lcheck 5
			es_set pname Gernadier
		}
		if (server_var(pcheck) = rpc1) do
		{
			es_set lcheck 5
			es_set pname Acrobat
		}
		if (server_var(pcheck) = wpc1) do
		{
			es_set lcheck 5
			es_set pname "War Mage"
		}
		if (server_var(pcheck) = cpc1) do
		{
			es_set lcheck 5
			es_set pname "War Priest"
		}
		if (server_var(pcheck) = fpc2) do
		{
			es_set lcheck 10
			es_set pname "Kensai"
		}
		if (server_var(pcheck) = rpc2) do
		{
			es_set lcheck 10
			es_set pname Assassin
		}
		if (server_var(pcheck) = wpc2) do
		{
			es_set lcheck 10
			es_set pname "Mage of Arcane Order"
		}
		if (server_var(pcheck) = cpc2) do
		{
			es_set lcheck 10
			es_set pname "Divine Oracle"
		}
		if (server_var(pcheck) = fpc3) do
		{
			es_set lcheck 15
			es_set pname "Exotic Weapons Master"
		}
		if (server_var(pcheck) = rpc3) do
		{
			es_set lcheck 15
			es_set pname "Shadow Dancer"
		}
		if (server_var(pcheck) = wpc3) do
		{
			es_set lcheck 15
			es_set pname "Arch Mage"
		}
		if (server_var(pcheck) = cpc3) do
		{
			es_set lcheck 15
			es_set pname Hierophant
		}
		es_set lacheck 0
		es_keygetvalue lacheck dndUsers server_var(es_steamid) la
		es_set xpneeded 0
		es_set 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_set 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_set 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_set 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_set zombie_start 1
	es_set buy_end 1
	es_delayed 23 es_set buy_end 0
	es_set tele_allow 0
	es_delayed 22 es_set tele_allow 1
	es_set player 0
	foreach player player #all "es starthealth server_var(player)"
	es_set player 0
}

block starthealth
{
	es_set dnd_shruserid 0
	
	es_set targetid 0

  	es_getargv dnd_shruserid 1
  	
	es_set bonus 0
	es_set pen 0
	es_set 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_set phealth 0
	es est_gethealth phealth server_var(dnd_shruserid)
	
	es_keysetvalue dndExtra server_var(shsteam) maxhealth server_var(phealth)
	
}


block resethealth
{
	es_set dnd_rhuserid 0

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

block fortsave
{
	es_set fbonus 0
	es_set fclass 0
	es_keygetvalue fclass dndUsers event_var(es_steamid) class
	es_set flevel 0
	es_keygetvalue flevel dndUsers event_var(es_steamid) server_var(fclass)
	es_set fpcheck 0
	es_keygetvalue fpcheck dndUsers event_var(es_steamid) prestige
	es_set frcheck 0
	es_keygetvalue frcheck dndUsers event_var(es_steamid) race
	es_set mmcheck 0
	es_keygetvalue mmcheck dndUsers event_var(es_steamid) monster
	if (server_var(mmcheck) = 1) do
	{
		es_set fbonus 6
	}
	if (server_var(fpcheck) != 0) do
	{
		es_set 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_set fbonus server_var(flevel)
		es_math fbonus / 2
		es_math fbonus + 2 
	}
	if (server_var(fclass) = paladin) do
	{
		es_set fbonus server_var(flevel)
		es_math fbonus / 2
		es_math fbonus + 2 
	}
	if (server_var(fclass) = cleric) do
	{
		es_set fbonus server_var(flevel)
		es_math fbonus / 2
		es_math fbonus + 2
	}
	if (server_var(fclass) = rogue) do
	{
		es_set fbonus server_var(flevel)
		es_math fbonus / 5
		es_math fbonus + 2
	}
	if (server_var(fclass) = wizard) do
	{
		es_set fbonus server_var(flevel)
		es_math fbonus / 5
		es_math fbonus + 2
	}
	if (server_var(fclass) = ranger) do
	{
		es_set fbonus server_var(flevel)
		es_math fbonus / 2
		es_math fbonus + 2
	}
	if (server_var(fclass) = necromancer) do
	{
		es_set fbonus server_var(flevel)
		es_math fbonus / 5
		es_math fbonus + 2
	}
	if (server_var(fclass) = bard) do
	{
		es_set fbonus server_var(flevel)
		es_math fbonus / 5
		es_math fbonus + 2
	}
	if (server_var(fclass) = monk) do
	{
		es_set 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_set fbonus 0
	}
	if (server_var(frcheck) = Ghoul) do
	{
		es_set fbonus 0
	}
	es_keysetvalue dndExtra event_var(es_steamid) fortsave server_var(fbonus)
	
}
block willsave
{	
	es_set wbonus 0	
	es_set wclass 0
	es_keygetvalue wclass dndUsers event_var(es_steamid) class
	es_set wlevel 0
	es_keygetvalue wlevel dndUsers event_var(es_steamid) server_var(wclass)
	es_set wpcheck 0
	es_keygetvalue wpcheck dndUsers event_var(es_steamid) prestige
	es_set wrcheck 0
	es_keygetvalue wrcheck dndUsers event_var(es_steamid) race
	es_set mmcheck 0
	es_keygetvalue mmcheck dndUsers event_var(es_steamid) monster
	if (server_var(mmcheck) = 1) do
	{
		es_set wbonus 6
	}
	if (server_var(wpcheck) != 0) do
	{
		es_set 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_set wbonus server_var(wlevel)
		es_math wbonus / 5
		es_math wbonus + 2 
	}
	if (server_var(wclass) = paladin) do
	{
		es_set wbonus server_var(wlevel)
		es_math wbonus / 5
		es_math wbonus + 2 
	}
	if (server_var(wclass) = cleric) do
	{
		es_set wbonus server_var(wlevel)
		es_math wbonus / 2
		es_math wbonus + 2
	}
	if (server_var(wclass) = rogue) do
	{
		es_set wbonus server_var(wlevel)
		es_math wbonus / 5
		es_math wbonus + 2
	}
	if (server_var(wclass) = wizard) do
	{
		es_set wbonus server_var(wlevel)
		es_math wbonus / 2
		es_math wbonus + 2
	}
	if (server_var(wclass) = ranger) do
	{
		es_set wbonus server_var(wlevel)
		es_math wbonus / 5
		es_math wbonus + 2
	}
	if (server_var(wclass) = necromancer) do
	{
		es_set wbonus server_var(wlevel)
		es_math wbonus / 2
		es_math wbonus + 2
	}
	if (server_var(wclass) = bard) do
	{
		es_set wbonus server_var(wlevel)
		es_math wbonus / 2
		es_math wbonus + 2
	}
	if (server_var(wclass) = monk) do
	{
		es_set 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_set wbonus 0
	}
	if (server_var(wrcheck) = Ghoul) do
	{
		es_set wbonus 0
	}
	es_keysetvalue dndExtra event_var(es_steamid) willsave server_var(wbonus)

}

block reflexsave
{
	es_set rbonus 0
	es_set rclass 0
	es_keygetvalue rclass dndUsers event_var(es_steamid) class
	es_set rlevel 0
	es_keygetvalue rlevel dndUsers event_var(es_steamid) server_var(rclass)
	es_set rpcheck 0
	es_keygetvalue rpcheck dndUsers event_var(es_steamid) prestige
	es_set rrcheck 0
	es_keygetvalue rrcheck dndUsers event_var(es_steamid) race
	es_set mmcheck 0
	es_keygetvalue mmcheck dndUsers event_var(es_steamid) monster
	if (server_var(mmcheck) = 1) do
	{
		es_set rbonus 6
	}
	if (server_var(rpcheck) != 0) do
	{
		es_set 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_set rbonus server_var(rlevel)
		es_math rbonus / 5
		es_math rbonus + 2 
	}
	if (server_var(rclass) = paladin) do
	{
		es_set rbonus server_var(rlevel)
		es_math rbonus / 5
		es_math rbonus + 2 
	}
	if (server_var(rclass) = cleric) do
	{
		es_set rbonus server_var(rlevel)
		es_math rbonus / 5
		es_math rbonus + 2
	}
	if (server_var(rclass) = rogue) do
	{
		es_set rbonus server_var(rlevel)
		es_math rbonus / 2
		es_math rbonus + 2
	}
	if (server_var(rclass) = bard) do
	{
		es_set rbonus server_var(rlevel)
		es_math rbonus / 2
		es_math rbonus + 2
	}
	if (server_var(rclass) = wizard) do
	{
		es_set rbonus server_var(rlevel)
		es_math rbonus / 5
		es_math rbonus + 2
	}
	if (server_var(rclass) = ranger) do
	{
		es_set rbonus server_var(rlevel)
		es_math rbonus / 2
		es_math rbonus + 2
	}
	if (server_var(rclass) = necromancer) do
	{
		es_set rbonus server_var(rlevel)
		es_math rbonus / 5
		es_math rbonus + 2
	}
	if (server_var(rclass) = monk) do
	{
		es_set 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_set rbonus 0
	}
	if (server_var(rrcheck) = Ghoul) do
	{
		es_set rbonus 0
	}
	es_keysetvalue dndExtra event_var(es_steamid) reflexsave server_var(rbonus)
}