##### Crawl Init file ###############################################
# For descriptions of all options, as well as some more in-depth information
# on setting them, consult the file
#    options_guide.txt
# in your /docs directory. If you can't find it, the file is also available
# online at:
# https://github.com/crawl/crawl/blob/master/crawl-ref/docs/options_guide.txt
#
# Crawl uses the first file of the following list as its option file:
#  * init.txt in the -rcdir directory (if specified)
#  * .crawlrc in the -rcdir directory (if specified)
#  * init.txt (in the Crawl directory)
#  * ~/.crawl/init.txt (Unix only)
#  * ~/.crawlrc (Unix only)
#  * ~/init.txt (Unix only)
#  * settings/init.txt (in the Crawl directory)

##### Some basic explanation of option syntax #######################
# Lines beginning with '#' are comments. The basic syntax is:
#
# field = value         or      field.subfield = value
#
# Only one specification is allowed per line.
#
# The terms are typically case-insensitive except in the fairly obvious
# cases (the character's name and specifying files or directories when
# on a system that has case-sensitive filenames).
#
# White space is stripped from the beginning and end of the line, as
# well as immediately before and after the '='. If the option allows
# multiple comma/semicolon-separated terms (such as
# autopickup_exceptions), all whitespace around the separator is also
# trimmed. All other whitespace is left intact.
#
# There are three broad types of Crawl options: true/false values (booleans),
# arbitrary values, and lists of values. The first two types use only the
# simple =, with later options - which includes your options that are different
# from the defaults - overriding earlier ones. List options allow using +=, ^=,
# -=, and = to append, prepend, remove, and reset, respectively. Usually you will
# want to use += to add to a list option. Lastly, there is := which you can use
# to create an alias, like so:
#   ae := autopickup_exceptions
# From there on, 'ae' will be treated as if it you typed autopickup_exceptions,
# so you can save time typing it.
#

##### Other files ###################################################
# You can include other files from your options file using the 'include'
# option. Crawl will treat it as if you copied the whole text of that file
# into your options file in that spot. You can uncomment some of the following
# lines by removing the beginning '#' to include some of the other files in
# this folder.

# Some useful, more advanced options, implemented in LUA.
# include = advanced_optioneering.txt

# Alternative vi bindings for Dvorak users.
# include = dvorak_command_keys.txt

# Alternative vi bindings for Colemak users.
# include = colemak_command_keys.txt

# Alternative vi bindings for Neo users.
# include = neo_command_keys.txt

# Override the vi movement keys with a non-command.
# include = no_vi_command_keys.txt

# Turn the shift-vi keys into safe move, instead of run.
# include = safe_move_shift.txt

# Crawl Init file

###############
### Display ###
###############

view_delay = 300
hp_colour = 100:green, 99:lightgray, 75:yellow, 50:lightred, 25:red
mp_colour = 100:green, 99:lightgray, 75:yellow, 50:lightred, 25:red
hp_warning = 50

monster_list_colour =
monster_list_colour += friendly:green,neutral:brown
monster_list_colour += good_neutral:brown,strict_neutral:brown
monster_list_colour += trivial:darkgrey,easy:lightgrey
monster_list_colour += tough:yellow,nasty:lightred

###############
### Console ###
###############

# Enable use of darkgrey.
# needed in 0.20
bold_brightens_foreground=true
best_effort_brighten_background=false

## For item_glyph, subsequent matches override previous ones.
item := item_glyph

## Reasonable defaults
item += potion:lightgrey
item += scroll:lightgrey
item += wand:lightgrey
item += dangerous_item:blue
item += useless_item:darkgrey

### Potions ###
item += potions? of.*(lignification|mutation):blue
item += potions? of.*heal wounds:lightred
item += potions? of.*(curing|flight):lightgrey
item += potions? of.*(experience|beneficial mutation):white
item += potions? of.*berserk:brown
item += potions? of.*might:yellow
item += potions? of.*brilliance:green
item += potions? of.*(invisibility|agility):lightgreen
item += potions? of.*cancellation:cyan
item += potions? of.*cure mutation:lightcyan
item += potions? of.*(magic|ambrosia):magenta
item += potions? of.*(haste|resistance):lightmagenta

### Scrolls ###
item += scroll.*noise:blue
item += scroll.*recharging:lightred
item += scroll.*(amnesia|curse):lightgrey
item += scroll.*acquirement:white
: if you.race() == "Vampire" or you.race() == "Mummy"
:  or you.race() == "Ghoul" then
  item += scroll.*holy word:blue
  item += scroll.*torment:brown
: else
  item += scroll.*holy word:brown
  item += scroll.*torment:blue
: end
item += scroll.*(summoning):yellow
item += scroll.*(silence|vulnerability|immolation):green
item += scroll.*(enchant|brand weapon):lightgreen
item += scroll.*identify:cyan
item += scroll.*magic mapping:lightcyan
item += scroll.*(fog|teleport):magenta
item += scroll.*(fear|blink):lightmagenta

### Wands ###
item += wand of.*random effects:blue
item += wand of.*heal wounds:lightred
# frost/mdart not needed in 0.18
item += wand of.*(flame|frost|magic dart):lightgrey
item += wand of.*iceblast:white
# fire/cold/drain not needed in 0.18
item += wand of.*(acid|fire|cold|drain):yellow
# fireball not needed in 0.18
item += wand of.*(lightning|fireball):brown
item += wand of.*(slowing|confusion|polymorph):green
item += wand of.*(invisibility|paralysis|enslavement):lightgreen
item += wand of.*(digging|disintegration):cyan
item += wand of.*teleportation:magenta
item += wand of.*hasting:lightmagenta

### General Identification ###
item += ( rod ):yellow
item += (identified|known).*(jewellery|magical staff):brown
item += identified.*spellbook:magenta
item += unidentified.*(potion|scroll|jewellery|wand|rod|magical staff).*:lightblue
item += unidentified.*book:lightmagenta
item += manual:lightcyan
item += manual of:cyan

### Jewellery ###
item += known.*(ring of (dexterity|strength|intelligence|slaying|evasion|protection(?! from))|amulet of reflection):magenta
item += identified.*artefact.*(jewellery):white
item += unidentified.*artefact.*(jewellery).*:lightmagenta
item += (a )?stones?$:lightgray

### Food ###
item += chunks?.*flesh:lightgrey
: if you.race() == "Vampire" then
  item += potions? of blood:lightgrey
: end
item += mutagenic.*chunk:blue
item += evil_eating.*chunk:red
item += inedible.*chunk:darkgrey
item += fruit:brown
item += (pizza|jerky|jerkies):yellow
item += royal jell:green
item += bread ration:lightgreen
item += meat ration:lightred

# Want this to override anything above
item += useless:darkgrey
# Only mark these types when forbidden; for other types it looks odd.
item += forbidden.*(potion|scroll|food):red

mons := mon_glyph
# Monsters that can be easy to miss
mons ^= * : ✱
mons ^= dancing weapon : cyan {
mons ^= spectral weapon : lightcyan {
# Classed Demonspawn
mon += blood saint:9
# not needed in 0.18
mon += chaos champion:9
mon += warmonger:9
mon += corrupter:9
mon += black sun:9

# Wall glyphs; requires a font and terminal that can render these.
feature += crystal wall {â–‘}
feature += stone wall {â–’}
feature += metal wall {â–“}
feature += unnaturally hard rock wall {â–ˆ}

feature += altar {âš‘}

#############
### Tiles ###
#############

tile_window_width = 1300
tile_window_height = 700
tile_full_screen = false
tile_map_pixels = 3

## To set up RandomTiles, you need (1) the include below and (2) to add/modify
## the ready() function in your rc. See my ready() section below and the
## project page: https://github.com/gammafunk/dcss-rc#randomtiles
###################
### Menu Colors ###
###################

# These should match the item_glyph colours exactly when possible.
# For menu_colour, the first match ignores subsequent matches.
menu := menu_colour
menu =

# Many of the entries below come from dat/defaults/menu_colours.txt,
# which we have to duplicate here since we want only some of the
# entries from that file.
menu += notes:white:Reached XP level

### General Inventory###
# Items currently not affecting you.
menu += darkgrey:(melded)
# Items disliked by your god.
menu += red:forbidden
# Useless items, comes here to override artefacts etc.
menu += darkgrey:.*useless.*
# Handle cursed and equipped items early to override other colour settings.
menu += lightred:.*equipped.* cursed
menu += red: (a|the) cursed
menu += inventory:lightgreen:.*equipped.*
# Colouring of autoinscribed god gifts
menu += pickup:lightred:god gift
# Highlight (partly) selected items
menu_colour += inventory:white:\w \+\s
menu_colour += inventory:white:\w \#\s

### Food ###
# Color chunks, put ordinary ones on lightgrey.
menu += red:evil_eating.*chunk
menu += blue:mutagenic.*chunk
menu += darkgrey:inedible
menu += lightgrey: +(chunks?$|chunks? +)
# These are analogous to chunks
: if you.race() == "Vampire" then
  menu += lightgrey:potions? of blood
: end

# Other food
menu += brown:fruit
menu += yellow:(pizza|jerky|jerkies)
menu += green:royal jell
menu += lightgreen:bread ration
menu += lightred:meat ration

### Potions ###
# Mostly harmful
menu += blue:potions? of.*(lignification|(?<!cure |beneficial )mutation)
# Heal wounds
menu += lightred:potions? of.*heal wounds
# Mundane and ultra-rare
menu += lightgrey:potions? of.*(curing|flight)
menu += white:potions? of.*(experience|beneficial mutation)
# Damage buffs
menu += brown:potions? of.*berserk
menu += yellow:potions? of.*might
# Other buffs
menu += green:potions? of.*brilliance
menu += lightgreen:potions? of.*(invisibility|agility)
# Curing/avoiding mutations
menu += cyan:potions? of.*cancellation
menu += lightcyan:potions? of.*cure mutation
# Emergency/escape
menu += magenta:potions? of.*(magic|ambrosia)
menu += lightmagenta:potions? of.*(haste|resistance)

### Scrolls ###
# Mostly harmful
menu += blue:scroll.*noise
# Recharging
menu += lightred:scroll.*recharging
# Mundane and ultra-rare
menu += grey:scroll.*(amnesia|curse)
menu += white:scroll.*acquirement
# Damaging scrolls
: if you.race() == "Vampire" or you.race() == "Mummy"
:   or you.race() == "Ghoul" then
  menu += blue:scroll.*holy word
  menu += brown:scroll.*torment
: else
  menu += brown:scroll.*holy word
  menu += blue:scroll.*torment
: end
menu += yellow:scroll.*summoning
# Hexes and Enchantments
menu += green:scroll.*(silence|immolation|vulnerability)
menu += lightgreen:scroll.*(enchant|brand)
# Dungeon info
menu += cyan:scroll.*identify
menu += lightcyan:scroll.*magic map
# Escape
menu += magenta:scroll.*(fog|teleport)
menu += lightmagenta:scroll.*(fear|blink)

### Wands ###
# Can be harmful
menu += blue:wand of.*random effects
# Heal wounds
menu += lightred:wand of.*heal wounds
# Lowest-level damage and strong AOE
# frost/mdart not needed in 0.18
menu += lightgrey:wand of.*(flame|frost|magic dart)
menu += white:wand of.*iceblast
# High level damage
# Not needed in 0.18
# keep before wand of fire to avoid matching fireball
menu += brown:wand of.*(lightning|fireball)
# cold/fire/draining not needed in 0.18
menu += yellow:wand of.*(draining|cold|fire|acid)
# Hexes
menu += green:wand of.*(slowing|confusion|polymorph)
menu += lightgreen:wand of.*(invisibility|paralysis|enslavement)
# Dig/disint
menu += cyan:wand of.*(digging|disintegration)
# Escape
menu += magenta:wand of.*teleportation
menu += lightmagenta:wand of.*hasting

### General identification ###
menu += cyan:manual of
menu += lightcyan:manual
menu += lightmagenta:unidentified.*artefact.*
menu += white:.*artefact.*
menu += lightblue:unidentified .*(potion|scroll|wand|jewellery|spellbook|rod|magical staff)
menu += magenta:.*known .*(ring of (dexterity|strength|intelligence|slaying|evasion|protection(?! from))|amulet of reflection)
menu += inventory:lightgray:.*(book|jewellery|magical staff)
# Ego items
menu += lightblue:unidentified.*weapon.*(runed|glowing|enchanted)
menu += lightblue:unidentified.*armour.*(runed|glowing|embroidered|shiny|dyed)

#################
### Interface ###
#################

default_manual_training = true
easy_eat_chunks = true
equip_unequip = false
sort_menus = true:equipped,identified,basename,art,ego,glowing,qualname,curse,charged,slot
ability_menu = false

autofight_stop  = 50
autofight_caught = true
autofight_wait = false
auto_butcher = true

bindkey = [~] CMD_LUA_CONSOLE

############################
### Travel & Exploration ###
############################

rest_wait_both = true
auto_sacrifice = true
travel_delay = 0
explore_delay = 0
rest_delay = 0

show_travel_trail = false
explore_stop += greedy_items

##################
### Autopickup ###
##################

# Add staves, rods, misc; note you can't use += with this option.
autopickup = $?!:"/}|

ae := autopickup_exceptions
ae ^= <throwing net
ae ^= <curare-tipped dart
ae ^= <tin of tremorstones
ae ^= <potions? of mutation

# Exceptions
ae += vulnerability|immolation
ae += scrolls? of silence
ae += wand of random effects
ae += staff of .*
ae += ring of stealth
ae += ring of protection from cold
ae += ring of protection from fire
ae += ring of protection from magic
ae += ring of positive energy
ae += ring of fire
ae += ring of flight
ae += ring of ice
ae += ring of magical power
ae += ring of strength
ae += ring of intelligence
ae += ring of dexterity
ae += ring of wizardry
ae += ring of poison resistance
ae += ring of resist corrosion
ae += ring of see invisible
ae += identified jewellery
ae += amulet of faith
ae += amulet of reflection
ae += amulet of the acrobat
ae += amulet of regeneration
ae += amulet of magic regeneration
ae += amulet of guardian spirit
ae += amulet of nothing
ae += amulet of inaccuracy

################
### Messages ###
################

channel.multiturn = mute

msc := message_colour
msc += mute:returns to your side
msc += mute:a demon appears
msc += lightgrey:The deck of cards disappears
msc += mute:puff of smoke
msc += mute:carefully avoids
msc += mute:is recalled
msc += mute:wall.*burn.*your
msc += mute:dissolves? into (sparkling lights|shadows)
msc += mute:(crumbles|melts) away\.
msc += mute:(merges|forms) itself .* the air
msc += mute:you swap places
msc += mute:your.*(looks stronger|shudders|resists)
msc += mute:your.*(stumbles backwards|holds.*ground)
msc += mute:your.*(blinks|safely over)
msc += mute:(phases out.*|misses) (your|something).*
msc += mute:your.*(picks up|drops)
msc += mute:your.*basks in the mutagenic energy
msc += mute:your.*(struggles|tears|pulls away).*(web|net)

# Interrupts
flash_screen_message += Ashenzari invites you to partake
flash_screen_message += Ru believes you are ready to make a new sacrifice
flash_screen_message += distortion
flash_screen_message += Vehumet offers you knowledge

# Bad things
force_more_message += comes? into view
force_more_message += leaps? out
force_more_message += A sentinel's mark forms upon you
force_more_message += (blundered into a|invokes the power of) Zot
force_more_message += Ouch! That really hurt!
force_more_message += dispelling energy hits you
force_more_message += You are (blasted|electrocuted)!
force_more_message += calcifying dust hits
force_more_message += Space warps.*around you
force_more_message += Space bends around you
force_more_message += watched by something
force_more_message += is.*carrying a wand of

# Expiring effects
force_more_message += You feel yourself slow down
force_more_message += You are starting to lose your buoyancy
force_more_message += Your hearing returns
force_more_message += Your transformation is almost over
force_more_message += You have a feeling this form
force_more_message += You feel yourself come back to life
force_more_message += time is quickly running out

# Others
: if you.god() == "Xom" then
force_more_message += god:
: end
: if you.god() == "Ashenzari" then
force_more_message += You have a vision of.*gates?
: end

# Dangerous monsters we force_more when first seen.
# Eyes and bugs with ranged, irresistable effects.
force_more_message += ((giant|floating|shining) eye|eye of draining).*into view
force_more_message += (moth of wrath|ghost moth|torpor snail).*into view
# Convokers/encirclers
force_more_message += (guardian serpent|draconian shifter|convoker).*into view
# Torment/flay
force_more_message += (flayed ghost|greater mummy|mummy priest|fiend|tzitzimitl).*into view
force_more_message += (tormentor|curse toe|curse skull).*into view
# Hellfire
force_more_message += (hellion|hell sentinel|deep elf sorcerer).*into view
force_more_message += (deep elf high priest|zealout|scorcher).*into view
# Rare, high damage things.
force_more_message += (ancient lich|orb of fire|executioner|juggernaut|shrike).*into view

# Any uniques and any pan lords
force_more_message += (?-i:[A-Z]).* comes? into view

stop := runrest_stop_message
ignore := runrest_ignore_message

:if you.god() == "Xom" then
stop += god:
:else
ignore += god:
:end

# Bad things
stop += A huge blade swings out and slices into you
stop += (starving|devoid of blood)
stop += wrath finds you
stop += lose consciousness
stop += hell_effect:

# Expiring effects
stop += You feel yourself slow down
stop += You are starting to lose your buoyancy
stop += Your hearing returns
stop += Your transformation is almost over
stop += back to life
stop += time is quickly running out
stop += life is in your own hands
stop += is no longer charmed

: if you.race() == "Ghoul" then
stop += smell.*(rott(ing|en)|decay)
stop += something tasty in your inventory
: end

# Annoyances
ignore += grinding sound
ignore += contamination has completely
ignore += rod.*has recharged
ignore += your breath back

ignore += pray:
ignore += talk:
ignore += talk_visual:
ignore += friend_spell:
ignore += friend_enchant:
ignore += friend_action:
ignore += sound:

###########################
### Spell/Ability slots ###
###########################

spell_slot += Passwall:a
spell_slot += Apportation:l
spell_slot += Blink:B
spell_slot += Statue Form:S
spell_slot += Storm Form:F
spell_slot += Necromutation:N
spell_slot += Sublimation of Blood:M

item_slot ^= potions? of curing:q
item_slot ^= potions? of heal wounds:l
item_slot ^= potions? of haste:h
item_slot ^= potions? of might:d
item_slot ^= potions? of agility:s
item_slot ^= potions? of resistance:n
item_slot ^= ring of poison resistance:P
item_slot ^= ring of positive energy:N
item_slot ^= ring of protection from cold:I
item_slot ^= ring of protection from fire:F
item_slot ^= ring of protection from magic:mM
item_slot ^= ring of resist corrosion:C
item_slot ^= ring of see invisible:S
item_slot ^= ring of wizardry:W
item_slot ^= scrolls? of blinking:B
item_slot ^= scrolls? of fear:g
item_slot ^= scrolls? of identify:i
item_slot ^= scrolls? of teleportation:t
item_slot ^= scrolls? of remove curse:w
item_slot ^= wand of digging:D

ability_slot += Berserk:k
ability_slot += Breathe:t
ability_slot += Blink:B
ability_slot += Invisibility:i

##################
### Item slots ###
##################

## In order of letter used.
# 0.18
item_slot += amulet of (stasis|harm) : A
item_slot += amulet of rage : B
item_slot += ring of (ice|protection from cold) : Cc
item_slot += amulet of (warding|dismissal) : D
item_slot += \+[0-9]+ ring of evasion : Ee
item_slot += ring of .*fire : Ff
item_slot += amulet of regeneration : g
item_slot += amulet of guardian spirit : G
item_slot += amulet of faith : H
item_slot += \+[0-9]+ ring of intelligence : Ii
# 0.18
item_slot += amulet of clarity : K
item_slot += ring of flight : L
item_slot += ring of protection from magic : Mm
item_slot += ring of positive energy : Nn
item_slot += \+[0-9]+ ring of protection : Oo
item_slot += ring of poison resistance : P
item_slot += ring of stealth : Qq
# 0.18
item_slot += (amulet|ring) of resist corrosion : R
item_slot += amulet of mana regeneration : r
item_slot += \+[0-9]+ ring of strength : Ss
item_slot += ring of teleportation : t
item_slot += ring of sustain attributes : T
item_slot += amulet of gourmand : U
# 0.18
item_slot += amulet of resist mutation : u
item_slot += ring of see invisible : v
# 0.18
item_slot += ring of invisibility : V
item_slot += ring of magical power : Ww
item_slot += \+[0-9]+ ring of dexterity : Xx
item_slot += \+[0-9]+ ring of slaying : Yy
item_slot += ring of wizardry : Zz

########################
### Autoinscriptions ###
########################

show_god_gift = unident

ai := autoinscribe

ai += (bad|dangerous)_item.*potion:!q
ai += (bad|dangerous)_item.*scroll:!r
ai += potions? of berserk rage:!q
ai += scrolls? of silence:!r

ai += of faith:!P
ai += ( rod ):!a
ai += manual of:!d
ai += staff of (Wucad Mu|energy|channeling|wizardry|power|conjuration|summoning):!a
ai += (large rock|throwing net|curare|of dispersal):=f

# From simm's rc, helpful for realtime.
ai += curing:@q1
ai += potions? of heal wounds:@q2
ai += wand of heal wounds:@v2
ai += potions? of haste:@q3
ai += wand of hasting:@v3
ai += scrolls? of teleportation:@r4
ai += wand of teleportation:@v4
ai += identify:@r1
ai += remove curse:@r2
ai += blowgun:@w1
ai += (meat|bread) ration:@e1
ai += (beef jerk|fruit|pizza):@e2
ai += royal jell:@e3

##############
### Morgue ###
##############

note_hp_percent = 10
note_all_skill_levels = true
note_chat_messages = false
user_note_prefix = >>

note_items += experience,of resistance, Archmagi
# 0.18
note_items += crystal plate armour,pearl dragon (armour|scales)
note_items += artefact,wand of (heal wounds|hasting|teleportation)
note_messages += You feel monstrous
note_messages += You pass through the gate
note_messages += cast .* Abyss

# Noteable monsters
# Undead
note_monsters += ancient lich,curse skull,curse toe,greater mummy
# Depths
note_monsters += caustic shrike
# Special hall_of_zot spawns
note_monsters += killer klown,electric golem,orb of fire

dump_message_count = 30
dump_order  = header,hiscore,stats,misc,mutations,skills,spells,inventory
dump_order += overview,screenshot,monlist,messages,skill_gains,action_counts
dump_order += vaults,notes,kills

############
## Macros ##
############

macros += M 1 za
macros += M 2 zb
macros += M 3 zc

###########
### Lua ###
###########

<
  function ready()
    AnnounceDamage()
  end
>

###############
# Damage Calc #
###############
<
  local previous_hp = 0
  local previous_mp = 0
  local previous_form = ""
  local was_berserk_last_turn = false

  function AnnounceDamage()
    local current_hp, max_hp = you.hp()
    local current_mp, max_mp = you.mp()
    --Things that increase hp/mp temporarily really mess with this
    local current_form = you.transform()
    local you_are_berserk = you.berserk()
    local max_hp_increased = false
    local max_hp_decreased = false

    if (current_form ~= previous_form) then
      if (previous_form:find("dragon") or
          previous_form:find("statue") or
          previous_form:find("tree") or
          previous_form:find("ice")) then
        max_hp_decreased = true
      elseif (current_form:find("dragon") or
          current_form:find("statue") or
          current_form:find("tree") or
          current_form:find("ice")) then
        max_hp_increased = true
      end
    end
    if (was_berserk_last_turn and not you_are_berserk) then
      max_hp_decreased = true
    elseif (you_are_berserk and not was_berserk_last_turn) then
      max_hp_increased = true
    end

    --crawl.mpr(string.format("previous_form is: %s", previous_form))
    --crawl.mpr(string.format("current_form is: %s", current_form))
    --crawl.mpr(string.format("max_hp_increased is: %s", max_hp_increased and "True" or "False"))
    --crawl.mpr(string.format("max_hp_decreased is: %s", max_hp_decreased and "True" or "False"))

    --crawl.mpr(string:format("you_are_berserk is: %s", you_are_berserk and "True" or "False"))
    --crawl.mpr(string:format("was_berserk_last_turn is: %s", was_berserk_last_turn and "True" or "False"))


    --Skips message on initializing game
    if previous_hp > 0 then
      local hp_difference = previous_hp - current_hp
      local mp_difference = previous_mp - current_mp

      if max_hp_increased or max_hp_decreased then
        if max_hp_increased then
          crawl.mpr("<green>You now have " .. current_hp .. "/" .. max_hp .. " hp.</green>")
        else
          crawl.mpr("<yellow>You now have " .. current_hp .. "/" .. max_hp .. " hp.</yellow>")
        end
      else
        --On losing health
        if (current_hp < previous_hp) then
          if current_hp <= (max_hp * 0.30) then
            crawl.mpr("<red>You take " .. hp_difference .. " damage,</red><lightred> and have " .. current_hp .. "/" .. max_hp .. " hp.</lightred>")
          elseif current_hp <= (max_hp * 0.50) then
            crawl.mpr("<red>You take " .. hp_difference .. " damage, and have " .. current_hp .. "/" .. max_hp .. " hp.</red>")
          elseif current_hp <= (max_hp *  0.70) then
            crawl.mpr("<red>You take " .. hp_difference .. " damage,</red><yellow> and have " .. current_hp .. "/" .. max_hp .. " hp.</yellow>")
          elseif current_hp <= (max_hp * 0.90) then
            crawl.mpr("<red>You take " .. hp_difference .. " damage,</red><lightgrey> and have " .. current_hp .. "/" .. max_hp .. " hp.</lightgrey>")
          else
            crawl.mpr("<red>You take " .. hp_difference .. " damage,</red><green> and have " .. current_hp .. "/" .. max_hp .. " hp.</green>")
          end
          if hp_difference > (max_hp * 0.20) then
            crawl.mpr("<lightred>MASSIVE DAMAGE!!</lightred>")
          end
        end

        --On gaining more than 1 health
        if (current_hp > previous_hp) then
          --Removes the negative sign
          local health_inturn = (0 - hp_difference)
          if (health_inturn > 1) and not (current_hp == max_hp) then
            if current_hp <= (max_hp * 0.30) then
              crawl.mpr("<green>You regained " .. health_inturn .. " hp,</green><lightred> and now have " .. current_hp .. "/" .. max_hp .. " hp.</lightred>")
            elseif current_hp <= (max_hp * 0.50) then
              crawl.mpr("<green>You regained " .. health_inturn .. " hp,</green><red> and now have " .. current_hp .. "/" .. max_hp .. " hp.</red>")
            elseif current_hp <= (max_hp *  0.70) then
              crawl.mpr("<green>You regained " .. health_inturn .. " hp,</green><yellow> and now have " .. current_hp .. "/" .. max_hp .. " hp.</yellow>")
            elseif current_hp <= (max_hp * 0.90) then
              crawl.mpr("<green>You regained " .. health_inturn .. " hp,</green><lightgrey> and now have " .. current_hp .. "/" .. max_hp .. " hp.</lightgrey>")
            else
              crawl.mpr("<green>You regained " .. health_inturn .. " hp, and now have " .. current_hp .. "/" .. max_hp .. " hp.</green>")
            end
          end
          if (current_hp == max_hp) then
            crawl.mpr("<green>Health restored: " .. current_hp .. "</green>")
          end
        end

        --On gaining more than 1 magic
        if (current_mp > previous_mp) then
          --Removes the negative sign
          local mp_inturn = (0 - mp_difference)
          if (mp_inturn > 1) and not (current_mp == max_mp) then
            if current_mp < (max_mp * 0.25) then
              crawl.mpr("<lightcyan>You regained " .. mp_inturn .. " mp,</lightcyan><red> and now have " .. current_mp .. "/" .. max_mp .. " mp.</red>")
            elseif current_mp < (max_mp * 0.50) then
              crawl.mpr("<lightcyan>You regained " .. mp_inturn .. " mp,</lightcyan><yellow> and now have " .. current_mp .. "/" .. max_mp .. " mp.</yellow>")
            else
              crawl.mpr("<lightcyan>You regained " .. mp_inturn .. " mp,</lightcyan><green> and now have " .. current_mp .. "/" .. max_mp .. " mp.</green>")
            end
          end
          if (current_mp == max_mp) then
            crawl.mpr("<lightcyan>MP restored: " .. current_mp .. "</lightcyan>")
          end
        end

        --On losing magic
        if current_mp < previous_mp then
          if current_mp <= (max_mp / 5) then
            crawl.mpr("<lightcyan>You now have </lightcyan><red>" .. current_mp .. "/" ..max_mp .." mp.</red>")
          elseif current_mp <= (max_mp / 2) then
            crawl.mpr("<lightcyan>You now have </lightcyan><yellow>" .. current_mp .. "/" ..max_mp .." mp.</yellow>")
          else
            crawl.mpr("<lightcyan>You now have </lightcyan><green>" .. current_mp .. "/" ..max_mp .." mp.</green>")
          end
        end
      end
    end

    --Set previous hp/mp and form at end of turn
    previous_hp = current_hp
    previous_mp = current_mp
    previous_form = current_form
    was_berserk_last_turn = you_are_berserk
  end
>