habitica-self-host/common/script/index.coffee

moment = require('moment')
_ = require('lodash')
content = require('./content/index.coffee')
i18n = require('./i18n.coffee')
api = module.exports = {}

api.i18n = i18n

# little helper for large arrays of strings. %w"this that another" equivalent from Ruby, I really miss that function
$w = api.$w = (s)->s.split(' ')

api.dotSet = (obj,path,val)->
  arr = path.split('.')
  _.reduce arr, (curr, next, index) =>
    if (arr.length - 1) == index
      curr[next] = val
    (curr[next] ?= {})
  , obj
api.dotGet = (obj,path)->
  _.reduce path.split('.'), ((curr, next) => curr?[next]), obj

###
  Reflists are arrays, but stored as objects. Mongoose has a helluvatime working with arrays (the main problem for our
  syncing issues) - so the goal is to move away from arrays to objects, since mongoose can reference elements by ID
  no problem. To maintain sorting, we use these helper functions:
###
api.refPush = (reflist, item, prune=0) ->
  item.sort = if _.isEmpty(reflist) then 0 else _.max(reflist,'sort').sort+1
  item.id = api.uuid() unless item.id and !reflist[item.id]
  reflist[item.id] = item

api.planGemLimits =
  convRate: 20 #how much does a gem cost?
  convCap: 25 #how many gems can be converted / month?

###
  ------------------------------------------------------
  Time / Day
  ------------------------------------------------------
###

###
  Each time we're performing date math (cron, task-due-days, etc), we need to take user preferences into consideration.
  Specifically {dayStart} (custom day start) and {timezoneOffset}. This function sanitizes / defaults those values.
  {now} is also passed in for various purposes, one example being the test scripts scripts testing different "now" times
###
sanitizeOptions = (o) ->
  dayStart = if (!_.isNaN(+o.dayStart) and 0 <= +o.dayStart <= 24) then +o.dayStart else 0
  timezoneOffset = if o.timezoneOffset then +(o.timezoneOffset) else +moment().zone()
  now = if o.now then moment(o.now).zone(timezoneOffset) else moment(+new Date).zone(timezoneOffset)
  # return a new object, we don't want to add "now" to user object
  {dayStart, timezoneOffset, now}

api.startOfWeek = api.startOfWeek = (options={}) ->
  o = sanitizeOptions(options)
  moment(o.now).startOf('week')

api.startOfDay = (options={}) ->
  # This is designed for use with any date that has an important time portion (e.g., when comparing the current date-time with the previous cron's date-time for determing if cron should run now).
  # It changes the time portion of the date-time to be the Custom Day Start hour, so that the date-time is now the user's correct start of day.
  # It SUBTRACTS a day if the date-time's original hour is before CDS (e.g., if your CDS is 5am and it's currently 4am, it's still the previous day).
  # This is NOT suitable for manipulating any dates that are displayed to the user as a date with no time portion, such as a Daily's Start Dates (e.g., a Start Date of today shows only the date, so it should be considered to be today even if the hidden time portion is before CDS).
  o = sanitizeOptions(options)
  dayStart = moment(o.now).startOf('day').add({hours:o.dayStart})
  if moment(o.now).hour() < o.dayStart
    dayStart.subtract({days:1})
  dayStart

api.dayMapping = {0:'su',1:'m',2:'t',3:'w',4:'th',5:'f',6:'s'}

###
  Absolute diff from "yesterday" till now
###
api.daysSince = (yesterday, options = {}) ->
  o = sanitizeOptions options
  Math.abs api.startOfDay(_.defaults {now:yesterday}, o).diff(api.startOfDay(_.defaults {now:o.now}, o), 'days')

###
  Should the user do this task on this date, given the task's repeat options and user.preferences.dayStart?
###
api.shouldDo = (day, dailyTask, options = {}) ->
  return false unless dailyTask.type == 'daily'
  o = sanitizeOptions options
  startOfDayWithCDSTime = api.startOfDay(_.defaults {now:day}, o)  # a moment()

  taskStartDate = moment(dailyTask.startDate).zone(o.timezoneOffset)

  # The time portion of the Start Date is never visible to or modifiable by the user so we must ignore it.
  # Therefore, we must also ignore the time portion of the user's day start (startOfDayWithCDSTime), otherwise the date comparison will be wrong for some times.
  # NB: The user's day start date has already been converted to the PREVIOUS day's date if the time portion was before CDS.
  taskStartDate = moment(taskStartDate).startOf('day')

  if taskStartDate > startOfDayWithCDSTime.startOf('day')
    return false # Daily starts in the future

  if dailyTask.frequency == 'daily' # "Every X Days"
    if !dailyTask.everyX
      return false # error condition
    daysSinceTaskStart = startOfDayWithCDSTime.startOf('day').diff(taskStartDate, 'days')
    everyXCheck = (daysSinceTaskStart % dailyTask.everyX == 0)
    return everyXCheck
  else if dailyTask.frequency == 'weekly' # "On Certain Days of the Week"
    if !dailyTask.repeat
      return false # error condition
    dayOfWeekNum = startOfDayWithCDSTime.day() # e.g. 0 for Sunday
    dayOfWeekCheck = dailyTask.repeat[api.dayMapping[dayOfWeekNum]]
    return dayOfWeekCheck
  else
    # unexpected frequency string
    return false

###
  ------------------------------------------------------
  Level cap
  ------------------------------------------------------
###

api.maxLevel = 100

api.capByLevel = (lvl) ->
  if lvl > api.maxLevel then api.maxLevel else lvl

###
  ------------------------------------------------------
  Health cap
  ------------------------------------------------------
###

api.maxHealth = 50

###
  ------------------------------------------------------
  Scoring
  ------------------------------------------------------
###

api.tnl = (lvl) ->
  Math.round(((Math.pow(lvl, 2) * 0.25) + (10 * lvl) + 139.75) / 10) * 10
  # round to nearest 10?

###
  A hyperbola function that creates diminishing returns, so you can't go to infinite (eg, with Exp gain).
  {max} The asymptote
  {bonus} All the numbers combined for your point bonus (eg, task.value * user.stats.int * critChance, etc)
  {halfway} (optional) the point at which the graph starts bending
###
api.diminishingReturns = (bonus, max, halfway=max/2) ->
  max*(bonus/(bonus+halfway))

api.monod = (bonus, rateOfIncrease, max) ->
  rateOfIncrease*max*bonus/(rateOfIncrease*bonus+max)

###
Preen history for users with > 7 history entries
This takes an infinite array of single day entries [day day day day day...], and turns it into a condensed array
of averages, condensing more the further back in time we go. Eg, 7 entries each for last 7 days; 1 entry each week
of this month; 1 entry for each month of this year; 1 entry per previous year: [day*7 week*4 month*12 year*infinite]
###
preenHistory = (history) ->
  history = _.filter(history, (h) -> !!h) # discard nulls (corrupted somehow)
  newHistory = []
  preen = (amount, groupBy) ->
    groups = _.chain(history)
      .groupBy((h) -> moment(h.date).format groupBy) # get date groupings to average against
      .sortBy((h, k) -> k) # sort by date
      .value() # turn into an array
    groups = groups.slice(-amount)
    groups.pop() # get rid of "this week", "this month", etc (except for case of days)
    _.each groups, (group) ->
      newHistory.push
        date: moment(group[0].date).toDate()
        #date: moment(group[0].date).format('MM/DD/YYYY') # Use this one when testing
        value: _.reduce(group, ((m, obj) -> m + obj.value), 0) / group.length # average
      true

  # Keep the last:
  preen 50, "YYYY" # 50 years (habit will toootally be around that long!)
  preen moment().format('MM'), "YYYYMM" # last MM months (eg, if today is 05, keep the last 5 months)

  # Then keep all days of this month. Note, the extra logic is to account for Habits, which can be counted multiple times per day
  # FIXME I'd rather keep 1-entry/week of this month, then last 'd' days in this week. However, I'm having issues where the 1st starts mid week
  thisMonth = moment().format('YYYYMM')
  newHistory = newHistory.concat _.filter(history, (h)-> moment(h.date).format('YYYYMM') is thisMonth)
  #preen Math.ceil(moment().format('D')/7), "YYYYww" # last __ weeks (# weeks so far this month)
  #newHistory = newHistory.concat(history.slice -moment().format('D')) # each day of this week

  newHistory

###
  Update the in-browser store with new gear. FIXME this was in user.fns, but it was causing strange issues there
###
sortOrder = _.reduce content.gearTypes,((m,v,k)->m[v]=k;m), {}
api.updateStore = (user) ->
  return unless user
  changes= []
  _.each content.gearTypes, (type) ->
    found = _.find content.gear.tree[type][user.stats.class], (item) ->
      !user.items.gear.owned[item.key]
    changes.push(found) if found
    true
  # Add special items (contrib gear, backer gear, etc)
  changes = changes.concat _.filter content.gear.flat, (v) ->
    v.klass in ['special','mystery','armoire'] and !user.items.gear.owned[v.key] and v.canOwn?(user)
  # Return sorted store (array)
  _.sortBy changes, (c)->sortOrder[c.type]

###
------------------------------------------------------
Content
------------------------------------------------------
###

api.content = content


###
------------------------------------------------------
Misc Helpers
------------------------------------------------------
###

api.uuid = ->
  "xxxxxxxx-xxxx-4xxx-yxxx-xxxxxxxxxxxx".replace /[xy]/g, (c) ->
    r = Math.random() * 16 | 0
    v = (if c is "x" then r else (r & 0x3 | 0x8))
    v.toString 16

api.countExists = (items)-> _.reduce(items,((m,v)->m+(if v then 1 else 0)),0)

###
Even though Mongoose handles task defaults, we want to make sure defaults are set on the client-side before
sending up to the server for performance
###
api.taskDefaults = (task={}) ->
  task.type = 'habit' unless task.type and task.type in ['habit','daily','todo','reward']
  defaults =
    id: api.uuid()
    text: if task.id? then task.id else ''
    notes: ''
    priority: 1
    challenge: {}
    attribute: 'str'
    dateCreated: new Date()
  _.defaults task, defaults
  _.defaults(task, {up:true,down:true}) if task.type is 'habit'
  _.defaults(task, {history: []}) if task.type in ['habit', 'daily']
  _.defaults(task, {completed:false}) if task.type in ['daily', 'todo']
  _.defaults(task, {streak:0, repeat: {su:true,m:true,t:true,w:true,th:true,f:true,s:true}}, startDate: new Date(), everyX: 1, frequency: 'weekly') if task.type is 'daily'
  task._id = task.id # may need this for TaskSchema if we go back to using it, see http://goo.gl/a5irq4
  task.value ?= if task.type is 'reward' then 10 else 0
  task.priority = 1 unless _.isNumber(task.priority) # hotfix for apiv1. once we're off apiv1, we can remove this
  task

api.percent = (x,y, dir) ->
  switch dir
    when "up" then roundFn = Math.ceil
    when "down" then roundFn = Math.floor
    else roundFn = Math.round
  x=1 if x==0
  Math.max(0,roundFn(x/y*100))

###
Remove whitespace #FIXME are we using this anywwhere? Should we be?
###
api.removeWhitespace = (str) ->
  return '' unless str
  str.replace /\s/g, ''

###
Encode the download link for .ics iCal file
###
api.encodeiCalLink = (uid, apiToken) ->
  loc = window?.location.host or process?.env?.BASE_URL or ''
  encodeURIComponent "http://#{loc}/v1/users/#{uid}/calendar.ics?apiToken=#{apiToken}"

###
Gold amount from their money
###
api.gold = (num) ->
  if num
    return Math.floor num
  else
    return "0"

###
Silver amount from their money
###
api.silver = (num) ->
  if num
    ("0" + Math.floor (num - Math.floor(num))*100).slice -2
  else
    return "00"

###
Task classes given everything about the class
###
api.taskClasses = (task, filters=[], dayStart=0, lastCron=+new Date, showCompleted=false, main=false) ->
  return unless task
  {type, completed, value, repeat, priority} = task

  # Filters
  if main # only show when on your own list
    if !task._editing # always show task being edited (even when tag removed)
      for filter, enabled of filters
        if enabled and not task.tags?[filter]
          # All the other classes don't matter
          return 'hidden'

  classes = type

  if task._editing
    classes += " beingEdited" # Assists filtering by third-party themes.
    # Example: theme normally hides daily when not scheduled for today,
    # BUT keeps showing daily when being edited to unschedule it for today

  # show as completed if completed (naturally) or not required for today
  if type in ['todo', 'daily']
    if completed or (type is 'daily' and !api.shouldDo(+new Date, task, {dayStart}))
      classes += " completed"
    else
      classes += " uncompleted"
  else if type is 'habit'
    classes += ' habit-wide' if task.down and task.up
    classes += ' habit-narrow' if !task.down and !task.up

  if priority == 0.1
    classes += ' difficulty-trivial'
  else if priority == 1
    classes += ' difficulty-easy'
  else if priority == 1.5
    classes += ' difficulty-medium'
  else if priority == 2
    classes += ' difficulty-hard'

  if value < -20
    classes += ' color-worst'
  else if value < -10
    classes += ' color-worse'
  else if value < -1
    classes += ' color-bad'
  else if value < 1
    classes += ' color-neutral'
  else if value < 5
    classes += ' color-good'
  else if value < 10
    classes += ' color-better'
  else
    classes += ' color-best'
  return classes

###
Friendly timestamp
###
api.friendlyTimestamp = (timestamp) -> moment(timestamp).format('MM/DD h:mm:ss a')

###
Does user have new chat messages?
###
api.newChatMessages = (messages, lastMessageSeen) ->
  return false unless messages?.length > 0
  messages?[0] and (messages[0].id != lastMessageSeen)

###
are any tags active?
###
api.noTags = (tags) -> _.isEmpty(tags) or _.isEmpty(_.filter(tags, (t)->t))

###
Are there tags applied?
###
api.appliedTags = (userTags, taskTags) ->
  arr = []
  _.each userTags, (t) ->
    return unless t?
    arr.push(t.name) if taskTags?[t.id]
  arr.join(', ')

###
Various counting functions
###
api.count = require('./count')

###
------------------------------------------------------
User (prototype wrapper to give it ops, helper funcs, and virtuals
------------------------------------------------------
###

###
User is now wrapped (both on client and server), adding a few new properties:
  * getters (_statsComputed, tasks, etc)
  * user.fns, which is a bunch of helper functions
    These were originally up above, but they make more sense belonging to the user object so we don't have to pass
    the user object all over the place. In fact, we should pull in more functions such as cron(), updateStats(), etc.
  * user.ops, which is super important:

If a function is inside user.ops, it has magical properties. If you call it on the client it updates the user object in
the browser and when it's done it automatically POSTs to the server, calling src/controllers/user.js#OP_NAME (the exact same name
of the op function). The first argument req is {query, body, params}, it's what the express controller function
expects. This means we call our functions as if we were calling an Express route. Eg, instead of score(task, direction),
we call score({params:{id:task.id,direction:direction}}). This also forces us to think about our routes (whether to use
params, query, or body for variables). see http://stackoverflow.com/questions/4024271/rest-api-best-practices-where-to-put-parameters

If `src/controllers/user.js#OP_NAME` doesn't exist on the server, it's automatically added. It runs the code in user.ops.OP_NAME
to update the user model server-side, then performs `user.save()`. You can see this in action for `user.ops.buy`. That
function doesn't exist on the server - so the client calls it, it updates user in the browser, auto-POSTs to server, server
handles it by calling `user.ops.buy` again (to update user on the server), and then saves. We can do this for
everything that doesn't need any code difference from what's in user.ops.OP_NAME for special-handling server-side. If we
*do* need special handling, just add `src/controllers/user.js#OP_NAME` to override the user.ops.OP_NAME, and be
sure to call user.ops.OP_NAME at some point within the overridden function.

TODO
  * Is this the best way to wrap the user object? I thought of using user.prototype, but user is an object not a Function.
    user on the server is a Mongoose model, so we can use prototype - but to do it on the client, we'd probably have to
    move to $resource for user
  * Move to $resource!
###
api.wrap = (user, main=true) ->
  return if user._wrapped
  user._wrapped = true

  # ----------------------------------------------------------------------
  # user.ops shared client/server operations
  # ----------------------------------------------------------------------

  if main
    user.ops =

      # ------
      # User
      # ------

      update: (req, cb) ->
        _.each req.body, (v,k) ->
          user.fns.dotSet(k,v);true
        cb? null, user

      sleep: (req, cb) ->
        user.preferences.sleep = !user.preferences.sleep
        cb? null, {}

      revive: (req, cb, analytics) ->
        return cb?({code:400, message: "Cannot revive if not dead"}) unless user.stats.hp <= 0

        # Reset stats after death
        _.merge user.stats, {hp:50, exp:0, gp:0}
        user.stats.lvl-- if user.stats.lvl > 1

        # Lose a stat point
        lostStat = user.fns.randomVal _.reduce(['str','con','per','int'], ((m,k)->m[k]=k if user.stats[k];m), {})
        user.stats[lostStat]-- if lostStat

        # Lose a gear piece
        # Free items (value:0) cannot be lost to avoid "pay to win". Subscribers have more free (Mystery) items and so would have a higher chance of losing a free one. The only exception is that the weapon_warrior_0 free item can be lost so that a new player who dies before buying any gear does experience equipment loss.
        # Note ""+k string-casting. Without this, when run on the server Mongoose returns funny objects
        cl = user.stats.class
        gearOwned = user.items.gear.owned.toObject?() or user.items.gear.owned
        losableItems = {}
        _.each gearOwned, (v,k) ->
          if v
            itm = content.gear.flat[''+k]
            if itm
              if (itm.value > 0 || k == 'weapon_warrior_0') && ( itm.klass == cl || ( itm.klass == 'special' && (! itm.specialClass || itm.specialClass == cl) ) || itm.klass == 'armoire' )
                losableItems[''+k]=''+k
        lostItem = user.fns.randomVal losableItems
        if item = content.gear.flat[lostItem]
          user.items.gear.owned[lostItem] = false
          user.items.gear.equipped[item.type] = "#{item.type}_base_0" if user.items.gear.equipped[item.type] is lostItem
          user.items.gear.costume[item.type] = "#{item.type}_base_0" if user.items.gear.costume[item.type] is lostItem
        user.markModified? 'items.gear'

        analyticsData = {
          uuid: user._id,
          lostItem: lostItem,
          gaLabel: lostItem,
          category: 'behavior'
        }
        analytics?.track('Death', analyticsData)

        cb? (if item then {code:200,message: i18n.t('messageLostItem', {itemText: item.text(req.language)}, req.language)} else null), user

      reset: (req, cb) ->
        user.habits = []
        user.dailys = []
        user.todos = []
        user.rewards = []
        user.stats.hp = 50
        user.stats.lvl = 1
        user.stats.gp = 0
        user.stats.exp = 0
        # TODO handle MP
        gear = user.items.gear
        _.each ['equipped', 'costume'], (type) ->
          gear[type].armor  = 'armor_base_0'
          gear[type].weapon = 'weapon_base_0'
          gear[type].head   = 'head_base_0'
          gear[type].shield = 'shield_base_0'
        gear.owned = {} if typeof gear.owned == 'undefined'
        _.each gear.owned, (v, k)-> gear.owned[k]=false if gear.owned[k];true
        gear.owned.weapon_warrior_0 = true
        user.markModified? 'items.gear.owned'
        user.preferences.costume = false
        cb? null, user

      reroll: (req, cb, analytics) ->
        if user.balance < 1
          return cb? {code:401,message: i18n.t('notEnoughGems', req.language)}
        user.balance--
        _.each user.tasks, (task) ->
          unless task.type is 'reward'
            task.value = 0
        user.stats.hp = 50

        analyticsData = {
          uuid: user._id,
          acquireMethod: 'Gems',
          gemCost: 4,
          category: 'behavior'
        }
        analytics?.track('Fortify Potion', analyticsData)

        cb? null, user

      rebirth: (req, cb, analytics) ->
        # Cost is 8 Gems ($2)
        if (user.balance < 2 && user.stats.lvl < api.maxLevel)
          return cb? {code:401,message: i18n.t('notEnoughGems', req.language)}

        analyticsData = {
          uuid: user._id,
          category: 'behavior'
        }
        # only charge people if they are under the max level - ryan
        if user.stats.lvl < api.maxLevel
          user.balance -= 2
          analyticsData.acquireMethod = 'Gems'
          analyticsData.gemCost = 8
        else
          analyticsData.gemCost = 0
          analyticsData.acquireMethod = '> 100'

        analytics?.track('Rebirth', analyticsData)

        # Save off user's level, for calculating achievement eligibility later
        lvl = api.capByLevel(user.stats.lvl)
        # Turn tasks yellow, zero out streaks
        _.each user.tasks, (task) ->
          unless task.type is 'reward'
            task.value = 0
          if task.type is 'daily'
            task.streak = 0
        # Reset all dynamic stats
        stats = user.stats
        stats.buffs = {}
        stats.hp = 50
        stats.lvl = 1
        stats.class = 'warrior'
        _.each ['per','int','con','str','points','gp','exp','mp'], (value) ->
          stats[value] = 0
        # Deequip character, set back to base armor and training sword
        gear = user.items.gear
        _.each ['equipped', 'costume'], (type) ->
          gear[type] = {}; # deequip weapon, eyewear, headAccessory, etc, plus future new types
          gear[type].armor  = 'armor_base_0'
          gear[type].weapon = 'weapon_warrior_0'
          gear[type].head   = 'head_base_0'
          gear[type].shield = 'shield_base_0'
        if user.items.currentPet then user.ops.equip({params:{type: 'pet', key: user.items.currentPet}})
        if user.items.currentMount then user.ops.equip({params:{type: 'mount', key: user.items.currentMount}})
        # Strip owned gear down to the training sword and free items (zero gold value), but preserve purchase history so user can re-purchase limited edition equipment
        _.each gear.owned, (v, k) -> if gear.owned[k] and content.gear.flat[k].value then gear.owned[k] = false; true
        gear.owned.weapon_warrior_0 = true
        user.markModified? 'items.gear.owned'
        user.preferences.costume = false
        # Remove unlocked features
        flags = user.flags
        if not user.achievements.beastMaster
          flags.rebirthEnabled = false
        flags.itemsEnabled = false
        flags.dropsEnabled = false
        flags.classSelected = false
        flags.levelDrops = {}
        # Award an achievement if this is their first Rebirth, or if they made it further than last time
        if not (user.achievements.rebirths)
          user.achievements.rebirths = 1
          user.achievements.rebirthLevel = lvl
        else if (lvl > user.achievements.rebirthLevel or lvl is 100)
          user.achievements.rebirths++
          user.achievements.rebirthLevel = lvl
        user.stats.buffs = {}
        # user.markModified? 'stats'
        cb? null, user

      allocateNow: (req, cb) ->
        _.times user.stats.points, user.fns.autoAllocate
        user.stats.points = 0
        user.markModified? 'stats'
        cb? null, user.stats

      # ------
      # Tasks
      # ------

      clearCompleted: (req, cb) ->
        _.remove user.todos, (t)-> t.completed and !t.challenge?.id
        user.markModified? 'todos'
        cb? null, user.todos

      sortTask: (req, cb) ->
        {id} = req.params
        {to, from} = req.query
        task = user.tasks[id]
        return cb?({code:404, message: i18n.t('messageTaskNotFound', req.language)}) unless task
        return cb?('?to=__&from=__ are required') unless to? and from?
        tasks = user["#{task.type}s"]
        movedTask = tasks.splice(from, 1)[0]
        if to == -1 # we've used the Push To Bottom feature
          tasks.push(movedTask)
        else  # any other sort method uses only positive 'to' values
          tasks.splice(to, 0, movedTask)
        cb? null, tasks

      updateTask: (req, cb) ->
        return cb?({code:404,message:i18n.t('messageTaskNotFound', req.language)}) unless task = user.tasks[req.params?.id]
        _.merge task, _.omit(req.body,['checklist','id', 'type'])
        task.checklist = req.body.checklist if req.body.checklist
        task.markModified? 'tags'
        cb? null, task

      deleteTask: (req, cb) ->
        task = user.tasks[req.params?.id]
        return cb?({code:404,message:i18n.t('messageTaskNotFound', req.language)}) unless task
        i = user[task.type + "s"].indexOf(task)
        user[task.type + "s"].splice(i, 1) if ~i
        cb? null, {}

      addTask: (req, cb) ->
        task = api.taskDefaults(req.body)
        return cb?({code:409,message:i18n.t('messageDuplicateTaskID', req.language)}) if user.tasks[task.id]?
        user["#{task.type}s"].unshift(task)
        if user.preferences.newTaskEdit then task._editing = true
        if user.preferences.tagsCollapsed then task._tags = true
        if user.preferences.advancedCollapsed then task._advanced = true
        cb? null, task
        task

      # ------
      # Tags
      # ------

      addTag: (req, cb) ->
        user.tags ?= []
        user.tags.push
          name: req.body.name
          id: req.body.id or api.uuid()
        cb? null, user.tags

      sortTag: (req, cb) ->
        {to, from} = req.query
        return cb?('?to=__&from=__ are required') unless to? and from?
        user.tags.splice to, 0, user.tags.splice(from, 1)[0]
        cb? null, user.tags


      updateTag: (req, cb) ->
        tid = req.params.id
        i = _.findIndex user.tags, {id: tid}
        return cb?({code:404,message:i18n.t('messageTagNotFound', req.language)}) if !~i
        user.tags[i].name = req.body.name
        cb? null, user.tags[i]

      deleteTag: (req, cb) ->
        tid = req.params.id
        i = _.findIndex user.tags, {id: tid}
        return cb?({code:404,message:i18n.t('messageTagNotFound', req.language)}) if !~i
        tag = user.tags[i]
        delete user.filters[tag.id]
        user.tags.splice i, 1

        # remove tag from all tasks
        _.each user.tasks, (task) ->
          delete task.tags[tag.id]

        _.each ['habits','dailys','todos','rewards'], (type) ->
          user.markModified? type
        cb? null, user.tags

      # ------
      # Webhooks
      # ------
      addWebhook: (req, cb) ->
        wh = user.preferences.webhooks
        api.refPush(wh, {url:req.body.url, enabled: req.body.enabled or true, id:req.body.id})
        user.markModified? 'preferences.webhooks'
        cb? null, user.preferences.webhooks
      updateWebhook: (req, cb) ->
        _.merge(user.preferences.webhooks[req.params.id], req.body)
        user.markModified? 'preferences.webhooks'
        cb? null, user.preferences.webhooks
      deleteWebhook: (req, cb) ->
        delete user.preferences.webhooks[req.params.id]
        user.markModified? 'preferences.webhooks'
        cb? null, user.preferences.webhooks

      # ------
      # Push Notifications
      # ------
      addPushDevice: (req, cb) ->
        user.pushDevices = [] unless user.pushDevices
        pd = user.pushDevices
        item = {regId:req.body.regId, type:req.body.type}
        i = _.findIndex pd, {regId: item.regId}

        pd.push(item) unless i != -1

        cb? null, user.pushDevices

      # ------
      # Inbox
      # ------
      clearPMs: (req, cb) ->
        user.inbox.messages = {}
        user.markModified? 'inbox.messages'
        cb? null, user.inbox.messages
      deletePM: (req, cb) ->
        delete user.inbox.messages[req.params.id]
        user.markModified? 'inbox.messages.'+req.params.id
        cb? null, user.inbox.messages
      blockUser: (req, cb) ->
        i = user.inbox.blocks.indexOf(req.params.uuid)
        if ~i then user.inbox.blocks.splice(i,1) else user.inbox.blocks.push(req.params.uuid)
        user.markModified? 'inbox.blocks'
        cb? null, user.inbox.blocks

      # ------
      # Inventory
      # ------

      feed: (req, cb) ->
        {pet,food} = req.params
        food = content.food[food]
        [egg, potion] = pet.split('-')
        userPets = user.items.pets

        # Generate pet display name variable
        potionText = if content.hatchingPotions[potion] then content.hatchingPotions[potion].text() else potion
        eggText = if content.eggs[egg] then content.eggs[egg].text() else egg
        petDisplayName = i18n.t('petName', {
          potion: potionText
          egg: eggText
        })

        return cb?({code:404, message:i18n.t('messagePetNotFound', req.language)}) unless userPets[pet]
        return cb?({code:404, message:i18n.t('messageFoodNotFound', req.language)}) unless user.items.food?[food.key]
        return cb?({code:401, message:i18n.t('messageCannotFeedPet', req.language)}) if content.specialPets[pet]
        return cb?({code:401, message:i18n.t('messageAlreadyMount', req.language)}) if user.items.mounts[pet]

        message = ''
        evolve = ->
          userPets[pet] = -1
          # changed to -1 to mark "owned" pets
          user.items.mounts[pet] = true
          user.items.currentPet = "" if pet is user.items.currentPet
          message = i18n.t('messageEvolve', {egg: petDisplayName}, req.language)

        if food.key is 'Saddle'
          evolve()
        else
          if food.target is potion
            userPets[pet] += 5
            message = i18n.t('messageLikesFood', {egg: petDisplayName, foodText: food.text(req.language)}, req.language)
          else
            userPets[pet] += 2
            message = i18n.t('messageDontEnjoyFood', {egg: petDisplayName, foodText: food.text(req.language)}, req.language)
          if userPets[pet] >= 50 and !user.items.mounts[pet]
            evolve()
        user.items.food[food.key]--
        cb? {code:200, message}, {value: userPets[pet]}

      buySpecialSpell: (req,cb) ->
        {key} = req.params
        item = content.special[key]
        return cb?({code:401, message: i18n.t('messageNotEnoughGold', req.language)}) if user.stats.gp < item.value
        user.stats.gp -= item.value
        user.items.special[key] ?= 0
        user.items.special[key]++
        user.markModified? 'items.special'
        message = i18n.t('messageBought', {itemText: item.text(req.language)}, req.language)
        cb? {code:200,message}, _.pick(user,$w 'items stats')

      # buy is for using Gold, purchase is for Gems (I know, I know...)
      purchase: (req, cb, analytics) ->
        {type,key}  = req.params

        if type is 'gems' and key is 'gem'
          {convRate, convCap} = api.planGemLimits
          convCap += user.purchased.plan.consecutive.gemCapExtra
          return cb?({code:401,message:"Must subscribe to purchase gems with GP"},req) unless user.purchased?.plan?.customerId
          return cb?({code:401,message:"Not enough Gold"}) unless user.stats.gp >= convRate
          return cb?({code:401,message:"You've reached the Gold=>Gem conversion cap (#{convCap}) for this month. We have this to prevent abuse / farming. The cap will reset within the first three days of next month."}) if user.purchased.plan.gemsBought >= convCap
          user.balance += .25
          user.purchased.plan.gemsBought++
          user.stats.gp -= convRate

          analyticsData = {
            uuid: user._id,
            itemKey: key,
            acquireMethod: 'Gold',
            goldCost: convRate,
            category: 'behavior'
          }
          analytics?.track('purchase gems', analyticsData)

          return cb? {code:200,message:"+1 Gem"}, _.pick(user,$w 'stats balance')

        return cb?({code:404,message:":type must be in [eggs,hatchingPotions,food,quests,gear]"},req) unless type in ['eggs','hatchingPotions','food','quests','gear']
        if type is 'gear'
          item = content.gear.flat[key]
          return cb?({code:401, message: i18n.t('alreadyHave', req.language)}) if user.items.gear.owned[key]
          price = (if item.twoHanded or item.gearSet is 'animal' then 2 else 1) / 4
        else
          item = content[type][key]
          price = item.value / 4
        return cb?({code:404,message:":key not found for Content.#{type}"},req) unless item
        return cb?({code:401, message: i18n.t('notEnoughGems', req.language)}) if (user.balance < price) or !user.balance
        user.balance -= price
        if type is 'gear' then user.items.gear.owned[key] = true
        else
          user.items[type][key] = 0  unless user.items[type][key] > 0
          user.items[type][key]++

        analyticsData = {
          uuid: user._id,
          itemKey: key,
          itemType: 'Market',
          acquireMethod: 'Gems',
          gemCost: item.value,
          category: 'behavior'
        }
        analytics?.track('acquire item', analyticsData)

        cb? null, _.pick(user,$w 'items balance')

      releasePets: (req, cb, analytics) ->
        if user.balance < 1
          return cb? {code:401,message: i18n.t('notEnoughGems', req.language)}
        else
          user.balance -= 1
          for pet of content.pets
            user.items.pets[pet] = 0
          if not user.achievements.beastMasterCount
            user.achievements.beastMasterCount = 0
          user.achievements.beastMasterCount++
          user.items.currentPet = ""

        analyticsData = {
          uuid: user._id,
          acquireMethod: 'Gems',
          gemCost: 4,
          category: 'behavior'
        }
        analytics?.track('release pets', analyticsData)
        cb? null, user

      releaseMounts: (req, cb, analytics) ->
        if user.balance < 1
          return cb? {code:401,message: i18n.t('notEnoughGems', req.language)}
        else
          user.balance -= 1
          user.items.currentMount = ""
          for mount of content.pets
            user.items.mounts[mount] = null
          if not user.achievements.mountMasterCount
            user.achievements.mountMasterCount = 0
          user.achievements.mountMasterCount++

        analyticsData = {
          uuid: user._id,
          acquireMethod: 'Gems',
          gemCost: 4,
          category: 'behavior'
        }
        analytics?.track('release mounts', analyticsData)

        cb? null, user

      releaseBoth: (req, cb) ->
        if user.balance < 1.5 and not user.achievements.triadBingo
          return cb? {code:401,message: i18n.t('notEnoughGems', req.language)}
        else
          giveTriadBingo = true
          if not user.achievements.triadBingo
            analyticsData = {
              uuid: user._id,
              acquireMethod: 'Gems',
              gemCost: 6,
              category: 'behavior'
            }
            analytics?.track('release pets & mounts', analyticsData)
            user.balance -= 1.5
          user.items.currentMount = ""
          user.items.currentPet = ""
          for animal of content.pets
            giveTriadBingo = false if user.items.pets[animal] == -1
            user.items.pets[animal] = 0
            user.items.mounts[animal] = null
          if not user.achievements.beastMasterCount
            user.achievements.beastMasterCount = 0
          user.achievements.beastMasterCount++
          if not user.achievements.mountMasterCount
            user.achievements.mountMasterCount = 0
          user.achievements.mountMasterCount++
          if giveTriadBingo
            if not user.achievements.triadBingoCount
              user.achievements.triadBingoCount = 0
            user.achievements.triadBingoCount++
        cb? null, user

      # buy is for gear, purchase is for gem-purchaseables (i know, I know...)
      buy: (req, cb, analytics) ->
        {key} = req.params

        item = if key is 'potion' then content.potion
        else if key is 'armoire' then content.armoire
        else content.gear.flat[key]
        return cb?({code:404, message:"Item '#{key} not found (see https://github.com/HabitRPG/habitrpg/blob/develop/common/script/content/index.coffee)"}) unless item
        return cb?({code:401, message: i18n.t('messageNotEnoughGold', req.language)}) if user.stats.gp < item.value
        return cb?({code:401, message: "You can't buy this item"}) if item.canOwn? and !item.canOwn(user)
        armoireResp = undefined
        if item.key is 'potion'
          user.stats.hp += 15
          user.stats.hp = 50 if user.stats.hp > 50
        else if item.key is 'armoire'
          armoireResult = user.fns.predictableRandom(user.stats.gp)
          # We use a different seed to choose the Armoire action than we use
          # to choose the sub-action, otherwise only some of the foods can
          # be given. E.g., if a seed gives armoireResult < .5 (food) then
          # the same seed would give one of the first five foods only.
          eligibleEquipment = _.filter(content.gear.flat, ((i)->i.klass is 'armoire' and !user.items.gear.owned[i.key]))
          if !_.isEmpty(eligibleEquipment) and (armoireResult < .6 or !user.flags.armoireOpened)
            eligibleEquipment.sort()  # https://github.com/HabitRPG/habitrpg/issues/5376#issuecomment-111799217
            drop = user.fns.randomVal(eligibleEquipment)
            user.items.gear.owned[drop.key] = true
            user.flags.armoireOpened = true
            message = i18n.t('armoireEquipment', {image: '<span class="shop_'+drop.key+' pull-left"></span>', dropText: drop.text(req.language)}, req.language)
            if api.count.remainingGearInSet(user.items.gear.owned, 'armoire') is 0 then user.flags.armoireEmpty = true
            armoireResp = {type: "gear", dropKey: drop.key, dropText: drop.text(req.language)}
          else if (!_.isEmpty(eligibleEquipment) and armoireResult < .8) or armoireResult < .5
            drop = user.fns.randomVal _.where(content.food, {canDrop:true})
            user.items.food[drop.key] ?= 0
            user.items.food[drop.key] += 1
            message = i18n.t('armoireFood', {image: '<span class="Pet_Food_'+drop.key+' pull-left"></span>', dropArticle: drop.article, dropText: drop.text(req.language)}, req.language)
            armoireResp = {type: "food", dropKey: drop.key, dropArticle: drop.article, dropText: drop.text(req.language)}
          else
            armoireExp = Math.floor(user.fns.predictableRandom(user.stats.exp) * 40 + 10)
            user.stats.exp += armoireExp
            message = i18n.t('armoireExp', req.language)
            armoireResp = {"type": "experience", "value": armoireExp}
        else
          user.items.gear.equipped[item.type] = item.key
          user.items.gear.owned[item.key] = true
          message = user.fns.handleTwoHanded(item, null, req)
          message ?= i18n.t('messageBought', {itemText: item.text(req.language)}, req.language)
          if item.last then user.fns.ultimateGear()
        user.stats.gp -= item.value

        analyticsData = {
          uuid: user._id,
          itemKey: key,
          acquireMethod: 'Gold',
          goldCost: item.value,
          category: 'behavior'
        }
        analytics?.track('acquire item', analyticsData)

        buyResp = _.pick(user,$w 'items achievements stats flags')
        buyResp["armoire"] = armoireResp if armoireResp
        cb? {code:200, message}, buyResp

      buyQuest: (req, cb, analytics) ->
        {key} = req.params
        item = content.quests[key]
        return cb?({code:404, message:"Quest '#{key} not found (see https://github.com/HabitRPG/habitrpg/blob/develop/common/script/content/index.coffee)"}) unless item
        return cb?({code:404, message:"Quest '#{key} is not a Gold-purchasable quest (see https://github.com/HabitRPG/habitrpg/blob/develop/common/script/content/index.coffee)"}) unless item.category is 'gold' and item.goldValue
        return cb?({code:401, message: i18n.t('messageNotEnoughGold', req.language)}) if user.stats.gp < item.goldValue
        message = i18n.t('messageBought', {itemText: item.text(req.language)}, req.language)
        user.items.quests[item.key] ?= 0
        user.items.quests[item.key] += 1
        user.stats.gp -= item.goldValue
        analyticsData = {
          uuid: user._id,
          itemKey: item.key,
          itemType: 'Market',
          goldCost: item.goldValue,
          acquireMethod: 'Gold',
          category: 'behavior'
        }
        analytics?.track('acquire item', analyticsData)
        cb? {code:200, message}, user.items.quests

      buyMysterySet: (req, cb, analytics)->
        return cb?({code:401, message:i18n.t('notEnoughHourglasses', req.language)}) unless user.purchased.plan.consecutive.trinkets > 0
        mysterySet = content.timeTravelerStore(user.items.gear.owned)?[req.params.key]
        if window?.confirm?
          return unless window.confirm(i18n.t('hourglassBuyEquipSetConfirm'))
        return cb?({code:404, message:"Mystery set not found, or set already owned"}) unless mysterySet
        _.each mysterySet.items, (i)->
          user.items.gear.owned[i.key]=true
          analyticsData = {
            uuid: user._id,
            itemKey: i.key,
            itemType: 'Subscriber Gear',
            acquireMethod: 'Hourglass',
            category: 'behavior'
          }
          analytics?.track('acquire item', analyticsData)

        user.purchased.plan.consecutive.trinkets--
        cb? {code:200, message:i18n.t('hourglassPurchaseSet', req.language)}, _.pick(user,$w 'items purchased.plan.consecutive')

      hourglassPurchase: (req, cb, analytics)->
        {type, key} = req.params
        return cb?({code:403, message:i18n.t('typeNotAllowedHourglass', req.language) + JSON.stringify(_.keys(content.timeTravelStable))}) unless content.timeTravelStable[type]
        return cb?({code:403, message:i18n.t(type+'NotAllowedHourglass', req.language)}) unless _.contains(content.timeTravelStable[type], key)
        return cb?({code:403, message:i18n.t(type+'AlreadyOwned', req.language)}) if user.items[type][key]
        return cb?({code:403, message:i18n.t('notEnoughHourglasses', req.language)}) unless user.purchased.plan.consecutive.trinkets > 0
        user.purchased.plan.consecutive.trinkets--
        if type is 'pets'
          user.items.pets[key] = 5
        if type is 'mounts'
          user.items.mounts[key] = true
        analyticsData = {
          uuid: user._id,
          itemKey: key,
          itemType: type,
          acquireMethod: 'Hourglass',
          category: 'behavior'
        }
        analytics?.track('acquire item', analyticsData)
        cb? {code:200, message:i18n.t('hourglassPurchase', req.language)}, _.pick(user,$w 'items purchased.plan.consecutive')

      sell: (req, cb) ->
        {key, type} = req.params
        return cb?({code:404,message:":type not found. Must bes in [eggs, hatchingPotions, food]"}) unless type in ['eggs','hatchingPotions', 'food']
        return cb?({code:404,message:":key not found for user.items.#{type}"}) unless user.items[type][key]
        user.items[type][key]--
        user.stats.gp += content[type][key].value
        cb? null, _.pick(user,$w 'stats items')

      equip: (req, cb) ->
        [type, key] = [req.params.type || 'equipped', req.params.key]
        switch type
          when 'mount'
            return cb?({code:404,message:":You do not own this mount."}) unless user.items.mounts[key]
            user.items.currentMount = if user.items.currentMount is key then '' else key
          when 'pet'
            return cb?({code:404,message:":You do not own this pet."}) unless user.items.pets[key]
            user.items.currentPet = if user.items.currentPet is key then '' else key
          when 'costume','equipped'
            item = content.gear.flat[key]
            return cb?({code:404,message:":You do not own this gear."}) unless user.items.gear.owned[key]
            if user.items.gear[type][item.type] is key
              user.items.gear[type][item.type] = "#{item.type}_base_0"
              message = i18n.t('messageUnEquipped', {itemText: item.text(req.language)}, req.language)
            else
              user.items.gear[type][item.type] = item.key
              message = user.fns.handleTwoHanded(item,type,req)
            user.markModified? "items.gear.#{type}"
        cb? (if message then {code:200,message} else null), user.items

      hatch: (req, cb) ->
        {egg, hatchingPotion} = req.params
        return cb?({code:404,message:"Please specify query.egg & query.hatchingPotion"}) unless egg and hatchingPotion
        return cb?({code:401,message:i18n.t('messageMissingEggPotion', req.language)}) unless user.items.eggs[egg] > 0 and user.items.hatchingPotions[hatchingPotion] > 0
        pet = "#{egg}-#{hatchingPotion}"
        return cb?({code:401, message:i18n.t('messageAlreadyPet', req.language)}) if user.items.pets[pet] and user.items.pets[pet] > 0
        user.items.pets[pet] = 5
        user.items.eggs[egg]--
        user.items.hatchingPotions[hatchingPotion]--
        cb? {code:200, message:i18n.t('messageHatched', req.language)}, user.items

      unlock: (req, cb, analytics) ->
        {path} = req.query
        fullSet = ~path.indexOf(",")
        cost =
          # (Backgrounds) 15G per set, 7G per individual
          if ~path.indexOf('background.') # FIXME, store prices of things in content/index.coffee instead of hard-coded here?
            if fullSet then 3.75 else 1.75
          # (Skin, hair, etc) 5G per set, 2G per individual
          else
            if fullSet then 1.25 else 0.5
        alreadyOwns = !fullSet and user.fns.dotGet("purchased." + path) is true
        return cb?({code:401, message: i18n.t('notEnoughGems', req.language)}) if (user.balance < cost or !user.balance) and !alreadyOwns
        if fullSet
          _.each path.split(","), (p) ->
            if ~path.indexOf('gear.')
              user.fns.dotSet("#{p}", true);true
            else
            user.fns.dotSet("purchased.#{p}", true);true
        else
          if alreadyOwns
            split = path.split('.');v=split.pop();k=split.join('.')
            v='' if k is 'background' and v==user.preferences.background
            user.fns.dotSet("preferences.#{k}",v)
            return cb? null, req
          user.fns.dotSet "purchased." + path, true
        user.balance -= cost
        if ~path.indexOf('gear.') then user.markModified? 'gear.owned' else user.markModified? 'purchased'
        
        analyticsData = {
          uuid: user._id,
          itemKey: path,
          itemType: 'customization',
          acquireMethod: 'Gems',
          gemCost: (cost/.25),
          category: 'behavior'
        }
        analytics?.track('acquire item', analyticsData)

        cb? null, _.pick(user,$w 'purchased preferences items')

      # ------
      # Classes
      # ------

      changeClass: (req, cb, analytics) ->
        klass = req.query?.class
        if klass in ['warrior','rogue','wizard','healer']

          analyticsData = {
            uuid: user._id,
            class: klass,
            acquireMethod: 'Gems',
            gemCost: 3,
            category: 'behavior'
          }
          analytics?.track('change class', analyticsData)

          user.stats.class = klass
          user.flags.classSelected = true
          # Clear their gear and equip their new class's gear (can still equip old gear from inventory)
          # If they've rolled this class before, restore their progress
          _.each ["weapon", "armor", "shield", "head"], (type) ->
            foundKey = false
            _.findLast user.items.gear.owned, (v, k) ->
              return foundKey = k if ~k.indexOf(type + "_" + klass) and v is true
            # restore progress from when they last rolled this class
            # weapon_0 is significant, don't reset to base_0
            # rogues start with an off-hand weapon
            user.items.gear.equipped[type] =
              if foundKey then foundKey
              else if type is "weapon" then "weapon_#{klass}_0"
              else if type is "shield" and klass is "rogue" then "shield_rogue_0"
              else "#{type}_base_0" # naked for the rest!

            # Grant them their new class's gear
            user.items.gear.owned["#{type}_#{klass}_0"] = true if type is "weapon" or (type is "shield" and klass is "rogue")
            true
        else
          # Null ?class value means "reset class"
          if user.preferences.disableClasses
            user.preferences.disableClasses = false
            user.preferences.autoAllocate = false
          else
            return cb?({code:401,message:i18n.t('notEnoughGems', req.language)}) unless user.balance >= .75
            user.balance -= .75
          _.merge user.stats, {str: 0, con: 0, per: 0, int: 0, points: api.capByLevel(user.stats.lvl)}
          user.flags.classSelected = false
          #'stats.points': this is handled on the server
        cb? null, _.pick(user,$w 'stats flags items preferences')

      disableClasses: (req, cb) ->
        user.stats.class = 'warrior'
        user.flags.classSelected = true
        user.preferences.disableClasses = true
        user.preferences.autoAllocate = true
        user.stats.str = api.capByLevel(user.stats.lvl)
        user.stats.points = 0
        cb? null, _.pick(user,$w 'stats flags preferences')

      allocate: (req, cb) ->
        stat = req.query.stat or 'str'
        if user.stats.points > 0
          user.stats[stat]++
          user.stats.points--
          user.stats.mp++ if stat is 'int' #increase their MP along with their max MP
        cb? null, _.pick(user,$w 'stats')

      readCard: (req, cb) ->
        {cardType} = req.params
        user.items.special["#{cardType}Received"].shift()
        user.markModified? "items.special.#{cardType}Received"
        user.flags.cardReceived = false
        cb? null, 'items.special flags.cardReceived'

      openMysteryItem: (req,cb,analytics) ->
        item = user.purchased.plan?.mysteryItems?.shift()
        return cb?(code:400,message:"Empty") unless item
        item = content.gear.flat[item]
        user.items.gear.owned[item.key] = true
        user.markModified? 'purchased.plan.mysteryItems'
        item.notificationType = 'Mystery' # needed for website/public/js/controllers/notificationCtrl.js line 59 approx.
        analyticsData = {
          uuid: user._id,
          itemKey: item,
          itemType: 'Subscriber Gear',
          acquireMethod: 'Subscriber',
          category: 'behavior'
        }
        analytics?.track('open mystery item', analyticsData)
        (user._tmp?={}).drop = item if typeof window != 'undefined'
        cb? null, user.items.gear.owned

      # ------
      # Score
      # ------

      score: (req, cb) ->
        {id, direction} = req.params # up or down
        task = user.tasks[id]
        options = req.query or {}; _.defaults(options, {times:1, cron:false})

        # This is for setting one-time temporary flags, such as streakBonus or itemDropped. Useful for notifying
        # the API consumer, then cleared afterwards
        user._tmp = {}

        # TODO do we need this fail-safe casting anymore? Are we safe now we're off Derby?
        stats = {gp: +user.stats.gp, hp: +user.stats.hp, exp: +user.stats.exp}
        task.value = +task.value; task.streak = ~~task.streak; task.priority ?= 1

        # If they're trying to purhcase a too-expensive reward, don't allow them to do that.
        if task.value > stats.gp and task.type is 'reward'
          return cb? {code:401,message:i18n.t('messageNotEnoughGold', req.language)}

        delta = 0

        calculateDelta = ->
          # Calculates the next task.value based on direction
          # Uses a capped inverse log y=.95^x, y>= -5

          # Min/max on task redness
          currVal =
            if task.value < -47.27 then -47.27
            else if task.value > 21.27 then 21.27
            else task.value
          nextDelta = Math.pow(0.9747, currVal) * (if direction is 'down' then -1 else 1)

          # Checklists
          if task.checklist?.length > 0
            # If the Daily, only dock them them a portion based on their checklist completion
            if direction is 'down' and task.type is 'daily' and options.cron
              nextDelta *= (1 - _.reduce(task.checklist,((m,i)->m+(if i.completed then 1 else 0)),0) / task.checklist.length)
            # If To-Do, point-match the TD per checklist item completed
            if task.type is 'todo'
              nextDelta *= (1 + _.reduce(task.checklist,((m,i)->m+(if i.completed then 1 else 0)),0))
          nextDelta

        calculateReverseDelta = ->
          # Approximates the reverse delta for the task value
          # This is meant to return the task value to its original value when unchecking a task.
          # First, calculate the the value using the normal way for our first guess although
          # it will be a bit off
          currVal =
            if task.value < -47.27 then -47.27
            else if task.value > 21.27 then 21.27
            else task.value
          testVal = currVal + Math.pow(0.9747, currVal) * (if direction is 'down' then -1 else 1)

          # Now keep moving closer to the original value until we get "close enough"
          closeEnough = 0.00001
          while true
            # Check how close we are to the original value by computing the delta off our guess
            # and looking at the difference between that and our current value.
            calc = (testVal) + Math.pow(0.9747, testVal)
            diff = currVal-calc
            if Math.abs(diff) < closeEnough
              break
            if diff > 0
              testVal -= diff
            else
              testVal += diff

          # When we get close enough, return the difference between our approximated value
          # and the current value.  This will be the delta calculated from the original value
          # before the task was checked.
          nextDelta = testVal - currVal

          # Checklists
          if task.checklist?.length > 0
            # If To-Do, point-match the TD per checklist item completed
            if task.type is 'todo'
              nextDelta *= (1 + _.reduce(task.checklist,((m,i)->m+(if i.completed then 1 else 0)),0))
          nextDelta


        changeTaskValue = ->
          # If multiple days have passed, multiply times days missed
          _.times options.times, ->
            # Each iteration calculate the nextDelta, which is then accumulated in the total delta.
            nextDelta = if not options.cron and direction is 'down' then calculateReverseDelta() else calculateDelta()
            unless task.type is 'reward'
              if (user.preferences.automaticAllocation is true and user.preferences.allocationMode is 'taskbased' and !(task.type is 'todo' and direction is 'down')) then user.stats.training[task.attribute] += nextDelta
              if direction is 'up' # Make progress on quest based on STR
                user.party.quest.progress.up = user.party.quest.progress.up || 0
                user.party.quest.progress.up += (nextDelta * (1 + (user._statsComputed.str / 200))) if task.type in ['daily','todo']
                user.party.quest.progress.up += (nextDelta * (0.5 + (user._statsComputed.str / 400))) if task.type is 'habit'
              task.value += nextDelta
            delta += nextDelta

        addPoints = ->
          # ===== CRITICAL HITS =====
          # allow critical hit only when checking off a task, not when unchecking it:
          _crit = (if delta > 0 then user.fns.crit() else 1)
          # if there was a crit, alert the user via notification
          user._tmp.crit = _crit if _crit > 1

          # Exp Modifier
          # ===== Intelligence =====
          # TODO Increases Experience gain by .2% per point.
          intBonus = 1 + (user._statsComputed.int * .025)
          stats.exp += Math.round (delta * intBonus * task.priority * _crit * 6)

          # GP modifier
          # ===== PERCEPTION =====
          # TODO Increases Gold gained from tasks by .3% per point.
          perBonus = (1 + user._statsComputed.per *.02)
          gpMod = (delta * task.priority * _crit * perBonus)
          stats.gp +=
            if task.streak
              currStreak = if direction is 'down' then task.streak-1 else task.streak
              streakBonus = currStreak / 100 + 1 # eg, 1-day streak is 1.01, 2-day is 1.02, etc
              afterStreak = gpMod * streakBonus
              if currStreak > 0
                user._tmp.streakBonus = afterStreak - gpMod if (gpMod > 0) # keep this on-hand for later, so we can notify streak-bonus
              afterStreak
            else gpMod

        # HP modifier
        subtractPoints = ->
          # ===== CONSTITUTION =====
          # TODO Decreases HP loss from bad habits / missed dailies by 0.5% per point.
          conBonus = 1 - (user._statsComputed.con / 250)
          conBonus = 0.1 if conBonus < .1
          hpMod = delta * conBonus * task.priority * 2 # constant 2 multiplier for better results
          stats.hp += Math.round(hpMod * 10) / 10 # round to 1dp

        gainMP = (delta) ->
          delta *= user._tmp.crit or 1
          user.stats.mp += delta
          user.stats.mp = user._statsComputed.maxMP if user.stats.mp >= user._statsComputed.maxMP
          user.stats.mp = 0 if user.stats.mp < 0

        # ===== starting to actually do stuff, most of above was definitions =====
        switch task.type
          when 'habit'
            changeTaskValue()
            # Add habit value to habit-history (if different)
            if (delta > 0) then addPoints() else subtractPoints()
            gainMP(_.max([0.25, (.0025 * user._statsComputed.maxMP)]) * if direction is 'down' then -1 else 1)

            # History
            th = (task.history ?= [])
            if th[th.length-1] and moment(th[th.length-1].date).isSame(new Date, 'day')
              th[th.length-1].value = task.value
            else
              th.push {date: +new Date, value: task.value}
            user.markModified? "habits.#{_.findIndex(user.habits, {id:task.id})}.history"

          when 'daily'
            if options.cron
              changeTaskValue()
              subtractPoints()
              task.streak = 0 unless user.stats.buffs.streaks
            else
              changeTaskValue()
              if direction is 'down'
                delta = calculateDelta() # recalculate delta for unchecking so the gp and exp come out correctly
              addPoints() # obviously for delta>0, but also a trick to undo accidental checkboxes
              gainMP(_.max([1, (.01 * user._statsComputed.maxMP)]) * if direction is 'down' then -1 else 1)
              if direction is 'up'
                task.streak = if task.streak then task.streak + 1 else 1
                # Give a streak achievement when the streak is a multiple of 21
                if (task.streak % 21) is 0
                  user.achievements.streak = if user.achievements.streak then user.achievements.streak + 1 else 1
              else
                # Remove a streak achievement if streak was a multiple of 21 and the daily was undone
                if (task.streak % 21) is 0
                  user.achievements.streak = if user.achievements.streak then user.achievements.streak - 1 else 0
                task.streak = if task.streak then task.streak - 1 else 0

          when 'todo'
            if options.cron
              changeTaskValue()
              #don't touch stats on cron
            else
              task.dateCompleted = if direction is 'up' then new Date else undefined
              changeTaskValue()
              if direction is 'down'
                delta = calculateDelta() # recalculate delta for unchecking so the gp and exp come out correctly
              addPoints() # obviously for delta>0, but also a trick to undo accidental checkboxes
              # MP++ per checklist item in ToDo, bonus per CLI
              multiplier = _.max([(_.reduce(task.checklist,((m,i)->m+(if i.completed then 1 else 0)),1)),1])
              gainMP(_.max([(multiplier), (.01 * user._statsComputed.maxMP * multiplier)]) * if direction is 'down' then -1 else 1)

          when 'reward'
          # Don't adjust values for rewards
            changeTaskValue()
            # purchase item
            stats.gp -= Math.abs(task.value)
            num = parseFloat(task.value).toFixed(2)
            # if too expensive, reduce health & zero gp
            if stats.gp < 0
              # hp - gp difference
              stats.hp += stats.gp
              stats.gp = 0

        user.fns.updateStats stats, req

        # Drop system (don't run on the client, as it would only be discarded since ops are sent to the API, not the results)
        if typeof window is 'undefined'
          user.fns.randomDrop({task, delta}, req) if direction is 'up'

        cb? null, user
        return delta

  # ----------------------------------------------------------------------
  # user.fns helpers
  # ----------------------------------------------------------------------

  user.fns =

    getItem: (type) ->
      item = content.gear.flat[user.items.gear.equipped[type]]
      return content.gear.flat["#{type}_base_0"] unless item
      item

    handleTwoHanded: (item, type='equipped', req) ->
      # If they're buying a shield and wearing a staff, dequip the staff
      if item.type is "shield" and (weapon = content.gear.flat[user.items.gear[type].weapon])?.twoHanded
        user.items.gear[type].weapon = 'weapon_base_0'
        message = i18n.t('messageTwoHandled', {gearText: weapon.text(req.language)}, req.language)
      # If they're buying a staff and wearing a shield, dequip the shield
      if item.twoHanded
        user.items.gear[type].shield = "shield_base_0"
        message = i18n.t('messageTwoHandled', {gearText: item.text(req.language)}, req.language)
      message

    ###
    Because the same op needs to be performed on the client and the server (critical hits, item drops, etc),
    we need things to be "random", but technically predictable so that they don't go out-of-sync
    ###
    predictableRandom: (seed) ->
      # Default seed is all user stats combined. Fairly safe, meh - pass in a good seed for situations where that doesn't work
      seed = _.reduce(user.stats, ((m,v)->if _.isNumber(v) then m+v else m), 0) if !seed or seed is Math.PI
      x = Math.sin(seed++) * 10000
      x - Math.floor(x)

    crit: (stat='str', chance=.03) ->
      #console.log("Crit Chance:"+chance*(1+user._statsComputed[stat]/100))
      s = user._statsComputed[stat]
      if user.fns.predictableRandom() <= chance*(1 + s/100)
        1.5 + 4*s/(s + 200)
      else 1

    ###
      Get a random property from an object
      returns random property (the value)
    ###
    randomVal: (obj, options) ->
      array = if options?.key then _.keys(obj) else _.values(obj)
      rand = user.fns.predictableRandom(options?.seed)
      array.sort()
      array[Math.floor(rand * array.length)]

    ###
    This allows you to set object properties by dot-path. Eg, you can run pathSet('stats.hp',50,user) which is the same as
    user.stats.hp = 50. This is useful because in our habitrpg-shared functions we're returning changesets as {path:value},
    so that different consumers can implement setters their own way. Derby needs model.set(path, value) for example, where
    Angular sets object properties directly - in which case, this function will be used.
    ###
    dotSet: (path, val)-> api.dotSet user,path,val
    dotGet: (path)-> api.dotGet user,path

    # ----------------------------------------------------------------------
    # Scoring
    # ----------------------------------------------------------------------

    randomDrop: (modifiers, req) ->
      {task} = modifiers

      # % chance of getting a drop

      chance = _.min([Math.abs(task.value - 21.27),37.5])/150+.02   # Base drop chance is a percentage based on task value. Typical fresh task: 15%. Very ripe task: 25%. Very blue task: 2%.

      chance *=
        task.priority *                                 # Task priority: +50% for Medium, +100% for Hard
        (1 + (task.streak / 100 or 0)) *                # Streak bonus: +1% per streak
        (1 + (user._statsComputed.per / 100)) *         # PERception: +1% per point
        (1 + (user.contributor.level / 40 or 0)) *      # Contrib levels: +2.5% per level
        (1 + (user.achievements.rebirths / 20 or 0)) *  # Rebirths: +5% per achievement
        (1 + (user.achievements.streak / 200 or 0)) *   # Streak achievements: +0.5% per achievement
        (user._tmp.crit or 1) *                         # Use the crit multiplier if we got one
        (1 + .5*(_.reduce(task.checklist,((m,i)->m+(if i.completed then 1 else 0)),0) or 0)) # +50% per checklist item complete. TODO: make this into X individual drop chances instead

      chance = api.diminishingReturns(chance, 0.75)

      #console.log("Drop chance: " + chance)

      quest = content.quests[user.party.quest?.key]
      if quest?.collect and user.fns.predictableRandom(user.stats.gp) < chance
        dropK = user.fns.randomVal quest.collect, {key:true}
        user.party.quest.progress.collect[dropK]++
        user.markModified? 'party.quest.progress'
        #console.log {progress:user.party.quest.progress}

      dropMultiplier = if user.purchased?.plan?.customerId then 2 else 1
      return if (api.daysSince(user.items.lastDrop.date, user.preferences) is 0) and (user.items.lastDrop.count >= dropMultiplier * (5 + Math.floor(user._statsComputed.per / 25) + (user.contributor.level or 0)))
      if user.flags?.dropsEnabled and user.fns.predictableRandom(user.stats.exp) < chance

        # current breakdown - 1% (adjustable) chance on drop
        # If they got a drop: 50% chance of egg, 50% Hatching Potion. If hatchingPotion, broken down further even further
        rarity = user.fns.predictableRandom(user.stats.gp)

        # Food: 40% chance
        if rarity > .6
          drop = user.fns.randomVal _.where(content.food, {canDrop:true})
          user.items.food[drop.key] ?= 0
          user.items.food[drop.key]+= 1
          drop.type = 'Food'
          drop.dialog = i18n.t('messageDropFood', {dropArticle: drop.article, dropText: drop.text(req.language), dropNotes: drop.notes(req.language)}, req.language)

          # Eggs: 30% chance
        else if rarity > .3
          drop = user.fns.randomVal _.where(content.eggs,{canBuy:true})
          user.items.eggs[drop.key] ?= 0
          user.items.eggs[drop.key]++
          drop.type = 'Egg'
          drop.dialog = i18n.t('messageDropEgg', {dropText: drop.text(req.language), dropNotes: drop.notes(req.language)}, req.language)

          # Hatching Potion, 30% chance - break down by rarity.
        else
          acceptableDrops =
          # Very Rare: 10% (of 30%)
            if rarity < .02 then ['Golden']
              # Rare: 20% (of 30%)
            else if rarity < .09 then ['Zombie', 'CottonCandyPink', 'CottonCandyBlue']
              # Uncommon: 30% (of 30%)
            else if rarity < .18 then ['Red', 'Shade', 'Skeleton']
              # Common: 40% (of 30%)
            else ['Base', 'White', 'Desert']

          # No Rarity (@see https://github.com/HabitRPG/habitrpg/issues/1048, we may want to remove rareness when we add mounts)
          #drop = helpers.randomVal hatchingPotions
          drop = user.fns.randomVal _.pick(content.hatchingPotions, ((v,k) -> k in acceptableDrops))

          user.items.hatchingPotions[drop.key] ?= 0
          user.items.hatchingPotions[drop.key]++
          drop.type = 'HatchingPotion'
          drop.dialog = i18n.t('messageDropPotion', {dropText: drop.text(req.language), dropNotes: drop.notes(req.language)}, req.language)

        # if they've dropped something, we want the consuming client to know so they can notify the user. See how the Derby
        # app handles it for example. Would this be better handled as an emit() ?
        user._tmp.drop = drop

        user.items.lastDrop.date = +new Date
        user.items.lastDrop.count++

    ###
      Updates user stats with new stats. Handles death, leveling up, etc
      {stats} new stats
      {update} if aggregated changes, pass in userObj as update. otherwise commits will be made immediately
    ###
    autoAllocate: ->
      user.stats[(->
        switch user.preferences.allocationMode
          when "flat"
            # Favor in order (right-to-left): INT, PER, STR, CON
            stats = _.pick user.stats, $w 'con str per int'
            _.invert(stats)[_.min stats]
          when "classbased"
            # Attributes get 3:2:1:1 per 7 levels.
            lvlDiv7 = user.stats.lvl / 7
            ideal = [(lvlDiv7 * 3), (lvlDiv7 * 2), lvlDiv7, lvlDiv7]
            # Primary, secondary etc. attributes aren't explicitly defined, so hardcode them. In order as above
            preference = switch user.stats.class
              when "wizard" then ["int", "per", "con", "str"]
              when "rogue"  then ["per", "str", "int", "con"]
              when "healer" then ["con", "int", "str", "per"]
              else               ["str", "con", "per", "int"]
            # Get the difference between the ideal attribute spread according to level, and the user's current spread.
            diff = [(user.stats[preference[0]]-ideal[0]),(user.stats[preference[1]]-ideal[1]),(user.stats[preference[2]]-ideal[2]),(user.stats[preference[3]]-ideal[3])]
            suggested = _.findIndex(diff, ((val) -> if val is _.min(diff) then true)) # Returns the index of the first attribute that's furthest behind the ideal
            return if ~suggested then preference[suggested] else "str"  # If _.findIndex failed, we'd get a -1...
          when "taskbased"
            suggested = _.invert(user.stats.training)[_.max user.stats.training] # Returns the stat that's been trained up the most this level
            _.merge user.stats.training, {str:0,int:0,con:0,per:0} # Reset training for this level.
            return suggested or "str" # Failed _.findkey gives undefined
          else "str" # if all else fails, dump into STR
      )()]++

    updateStats: (stats, req, analytics) ->
      # Game Over (death)
      return user.stats.hp=0 if stats.hp <= 0

      user.stats.hp = stats.hp
      user.stats.gp = if stats.gp >= 0 then stats.gp else 0

      tnl = api.tnl(user.stats.lvl)

      # level up & carry-over exp
      if stats.exp >= tnl
      #silent = true # push through the negative xp silently
        user.stats.exp = stats.exp # push normal + notification
        while stats.exp >= tnl # keep levelling up
          stats.exp -= tnl
          user.stats.lvl++
          tnl = api.tnl(user.stats.lvl)

          user.stats.hp = 50

          continue if user.stats.lvl > api.maxLevel

          # Auto-allocate a point, or give them a new manual point
          if user.preferences.automaticAllocation
            user.fns.autoAllocate()
          else
            # add new allocatable points. We could do user.stats.points++, but this does a fail-safe just in case
            user.stats.points = user.stats.lvl - (user.stats.con + user.stats.str + user.stats.per + user.stats.int)
            if user.stats.points < 0
              user.stats.points = 0
              # This happens after dropping level with Fix Character Values and perhaps from other causes.
              # TODO: Subtract points from attributes in the same manner as on death.
      user.stats.exp = stats.exp

      # Set flags when they unlock features
      user.flags ?= {}
      if !user.flags.customizationsNotification and (user.stats.exp > 5 or user.stats.lvl > 1)
        user.flags.customizationsNotification = true
      if !user.flags.itemsEnabled and (user.stats.exp > 10 or user.stats.lvl > 1)
        user.flags.itemsEnabled = true
      if !user.flags.dropsEnabled and user.stats.lvl >= 3
        user.flags.dropsEnabled = true
        if user.items.eggs["Wolf"] > 0 then user.items.eggs["Wolf"]++ else user.items.eggs["Wolf"] = 1
      if !user.flags.classSelected and user.stats.lvl >= 10
        user.flags.classSelected
      # Level Drops
      _.each {vice1:30, atom1:15, moonstone1:60, goldenknight1: 40}, (lvl,k)->
        if !user.flags.levelDrops?[k] and user.stats.lvl >= lvl
          user.items.quests[k] ?= 0
          user.items.quests[k]++
          (user.flags.levelDrops ?= {})[k] = true
          user.markModified? 'flags.levelDrops'
          analyticsData = {
            uuid: user._id,
            itemKey: k,
            acquireMethod: 'Level Drop',
            category: 'behavior'
          }
          analytics?.track('acquire item', analyticsData)
          user._tmp.drop = {type: 'Quest', key: k}
      if !user.flags.rebirthEnabled and (user.stats.lvl >= 50 or user.achievements.beastMaster)
        user.flags.rebirthEnabled = true

    ###
      ------------------------------------------------------
      Cron
      ------------------------------------------------------
    ###

    ###
      At end of day, add value to all incomplete Daily & Todo tasks (further incentive)
      For incomplete Dailys, deduct experience
      Make sure to run this function once in a while as server will not take care of overnight calculations.
      And you have to run it every time client connects.
      {user}
    ###
    cron: (options={}) ->
      now = +options.now || +new Date

      # They went to a different timezone
      # FIXME:
      # (1) This exit-early code isn't taking timezone into consideration!!
      # (2) Won't switching timezones be handled automatically client-side anyway? (aka, can we just remove this code?)
      # (3) And if not, is this the correct way to handle switching timezones
      #  if moment(user.lastCron).isAfter(now)
      #    user.lastCron = now
      #    return

      daysMissed = api.daysSince user.lastCron, _.defaults({now}, user.preferences)
      return unless daysMissed > 0

      user.auth.timestamps.loggedin = new Date()

      user.lastCron = now

      # Reset the lastDrop count to zero
      if user.items.lastDrop.count > 0
        user.items.lastDrop.count = 0

      # "Perfect Day" achievement for perfect-days
      perfect = true
      clearBuffs = {str:0,int:0,per:0,con:0,stealth:0,streaks:false}

      # end-of-month perks for subscribers
      plan = user.purchased?.plan
      if plan?.customerId
        if moment(plan.dateUpdated).format('MMYYYY') != moment().format('MMYYYY')
          plan.gemsBought = 0 # reset gem-cap
          plan.dateUpdated = new Date()
          # For every month, inc their "consecutive months" counter. Give perks based on consecutive blocks
          # If they already got perks for those blocks (eg, 6mo subscription, subscription gifts, etc) - then dec the offset until it hits 0
          # TODO use month diff instead of ++ / --?
          _.defaults plan.consecutive, {count:0, offset:0, trinkets:0, gemCapExtra:0} #fixme see https://github.com/HabitRPG/habitrpg/issues/4317
          plan.consecutive.count++
          if plan.consecutive.offset > 0
            plan.consecutive.offset--
          else if plan.consecutive.count%3==0 # every 3 months
            plan.consecutive.trinkets++
            plan.consecutive.gemCapExtra+=5
            plan.consecutive.gemCapExtra=25 if plan.consecutive.gemCapExtra>25 # cap it at 50 (hard 25 limit + extra 25)
        # If user cancelled subscription, we give them until 30day's end until it terminates
        if plan.dateTerminated && moment(plan.dateTerminated).isBefore(+new Date)
          _.merge plan, {planId:null, customerId:null, paymentMethod:null}
          _.merge plan.consecutive, {count:0, offset:0, gemCapExtra:0}
          user.markModified? 'purchased.plan'

      # User is resting at the inn.
      # On cron, buffs are cleared and all dailies are reset without performing damage
      if user.preferences.sleep is true
        user.stats.buffs = clearBuffs
        user.dailys.forEach (daily) ->
          {completed, repeat} = daily
          thatDay = moment(now).subtract({days: 1})

          if api.shouldDo(thatDay.toDate(), daily, user.preferences) || completed
            _.each daily.checklist, ((box)->box.completed=false;true)
          daily.completed = false
        return

      multiDaysCountAsOneDay = true
      # If the user does not log in for two or more days, cron (mostly) acts as if it were only one day.
      # When site-wide difficulty settings are introduced, this can be a user preference option.

      # Tally each task
      todoTally = 0
      user.todos.forEach (task) -> # make uncompleted todos redder
        return unless task
        {id, completed} = task
        delta = user.ops.score({params:{id:task.id, direction:'down'}, query:{times:(multiDaysCountAsOneDay ? 1 : daysMissed), cron:true}})
        absVal = if (completed) then Math.abs(task.value) else task.value
        todoTally += absVal

      dailyChecked = 0        # how many dailies were checked?
      dailyDueUnchecked = 0   # how many dailies were due but not checked?
      user.party.quest.progress.down ?= 0
      user.dailys.forEach (task) ->
        return unless task
        {id, completed} = task

        # Deduct points for missed Daily tasks
        EvadeTask = 0
        scheduleMisses = daysMissed
        if completed
          dailyChecked += 1
        else
          # dailys repeat, so need to calculate how many they've missed according to their own schedule
          scheduleMisses = 0
          for n in [0...daysMissed]
            thatDay = moment(now).subtract({days: n + 1})
            if api.shouldDo(thatDay.toDate(), task, user.preferences)
              scheduleMisses++
              if user.stats.buffs.stealth
                user.stats.buffs.stealth--
                EvadeTask++
              if multiDaysCountAsOneDay
                break

          if scheduleMisses > EvadeTask
            perfect = false
            if task.checklist?.length > 0  # Partially completed checklists dock fewer mana points
              fractionChecked = _.reduce(task.checklist,((m,i)->m+(if i.completed then 1 else 0)),0) / task.checklist.length
              dailyDueUnchecked += (1 - fractionChecked)
              dailyChecked += fractionChecked
            else
             dailyDueUnchecked += 1
            delta = user.ops.score({params:{id:task.id, direction:'down'}, query:{times:(multiDaysCountAsOneDay ? 1 : (scheduleMisses-EvadeTask)), cron:true}})

            # Apply damage from a boss, less damage for Trivial priority (difficulty)
            user.party.quest.progress.down += delta * (if task.priority < 1 then task.priority else 1)
            # NB: Medium and Hard priorities do not increase damage from boss. This was by accident
            # initially, and when we realised, we could not fix it because users are used to
            # their Medium and Hard Dailies doing an Easy amount of damage from boss.
            # Easy is task.priority = 1. Anything < 1 will be Trivial (0.1) or any future
            # setting between Trivial and Easy.

        (task.history ?= []).push({ date: +new Date, value: task.value })
        task.completed = false
        if completed || (scheduleMisses > 0)
          _.each task.checklist, ((i)->i.completed=false;true) # this should not happen for grey tasks unless they are completed

      user.habits.forEach (task) -> # slowly reset 'onlies' value to 0
        if task.up is false or task.down is false
          if Math.abs(task.value) < 0.1
            task.value = 0
          else
            task.value = task.value / 2

      # Finished tallying
      ((user.history ?= {}).todos ?= []).push { date: now, value: todoTally }
      # tally experience
      expTally = user.stats.exp
      lvl = 0 #iterator
      while lvl < (user.stats.lvl - 1)
        lvl++
        expTally += api.tnl(lvl)
      (user.history.exp ?= []).push { date: now, value: expTally }

      # premium subscribers can keep their full history.
      # TODO figure out something performance-wise
      unless user.purchased?.plan?.customerId
        user.fns.preenUserHistory()
        user.markModified? 'history'
        user.markModified? 'dailys' # covers dailys.*.history

      user.stats.buffs =
        if perfect
          user.achievements.perfect ?= 0
          user.achievements.perfect++
          lvlDiv2 = Math.ceil(api.capByLevel(user.stats.lvl) / 2)
          {str:lvlDiv2,int:lvlDiv2,per:lvlDiv2,con:lvlDiv2,stealth:0,streaks:false}
        else clearBuffs

      # Add 10 MP, or 10% of max MP if that'd be more. Perform this after Perfect Day for maximum benefit
      # Adjust for fraction of dailies completed
      dailyChecked=1 if dailyDueUnchecked is 0 and dailyChecked is 0
      user.stats.mp += _.max([10,.1 * user._statsComputed.maxMP]) * dailyChecked / (dailyDueUnchecked + dailyChecked)
      user.stats.mp = user._statsComputed.maxMP if user.stats.mp > user._statsComputed.maxMP

      # Analytics
      user.flags.cronCount?=0
      user.flags.cronCount++

      analyticsData = {
        category: 'behavior',
        gaLabel: 'Cron Count',
        gaValue: user.flags.cronCount,
        uuid: user._id,
        user: user,
        resting: user.preferences.sleep,
        cronCount: user.flags.cronCount
      }
      options.analytics?.track('Cron', analyticsData)

      # After all is said and done, progress up user's effect on quest, return those values & reset the user's
      progress = user.party.quest.progress; _progress = _.cloneDeep progress
      _.merge progress, {down:0,up:0}
      progress.collect = _.transform progress.collect, ((m,v,k)->m[k]=0)
      _progress

    # Registered users with some history
    preenUserHistory: (minHistLen = 7) ->
      _.each user.habits.concat(user.dailys), (task) ->
        task.history = preenHistory(task.history) if task.history?.length > minHistLen
        true

      _.defaults user.history, {todos:[], exp: []}
      user.history.exp = preenHistory(user.history.exp) if user.history.exp.length > minHistLen
      user.history.todos = preenHistory(user.history.todos) if user.history.todos.length > minHistLen
      #user.markModified? 'history'
      #user.markModified? 'habits'
      #user.markModified? 'dailys'

    # ----------------------------------------------------------------------
    # Achievements
    # ----------------------------------------------------------------------
    ultimateGear: ->
      # on the server this is a Lodash transform, on the client its an object
      owned = if window? then user.items.gear.owned else user.items.gear.owned.toObject()
      user.achievements.ultimateGearSets ?= {healer: false, wizard: false, rogue: false, warrior: false}
      content.classes.forEach (klass) ->
        if user.achievements.ultimateGearSets[klass] isnt true
          user.achievements.ultimateGearSets[klass] = _.reduce ['armor', 'shield', 'head', 'weapon'], (soFarGood, type) ->
            found = _.find content.gear.tree[type][klass], {last:true}
            soFarGood and (!found or owned[found.key]==true) #!found only true when weapon is two-handed (mages)
          , true # start with true, else `and` will fail right away
      user.markModified? 'achievements.ultimateGearSets'
      if _.contains(user.achievements.ultimateGearSets, true) and user.flags.armoireEnabled != true
        user.flags.armoireEnabled = true
        user.markModified? 'flags'

    nullify: ->
      user.ops = null
      user.fns = null
      user = null

  # ----------------------------------------------------------------------
  # Virtual Attributes
  # ----------------------------------------------------------------------

  # Aggregate all intrinsic stats, buffs, weapon, & armor into computed stats
  Object.defineProperty user, '_statsComputed',
    get: ->
      computed = _.reduce ['per','con','str','int'], (m,stat) =>
        m[stat] = _.reduce $w('stats stats.buffs items.gear.equipped.weapon items.gear.equipped.armor items.gear.equipped.head items.gear.equipped.shield'), (m2,path) =>
          val = user.fns.dotGet(path)
          m2 +
            if ~path.indexOf('items.gear')
              # get the gear stat, and multiply it by 1.5 if it's class-gear
              item = content.gear.flat[val]
              (+item?[stat] or 0) * (if item?.klass is user.stats.class || item?.specialClass is user.stats.class then 1.5 else 1)
            else
              +val[stat] or 0
        , 0
        m[stat] += Math.floor(api.capByLevel(user.stats.lvl) / 2)
        m
      , {}
      computed.maxMP = computed.int*2 + 30
      computed
  Object.defineProperty user, 'tasks',
    get: ->
      tasks = user.habits.concat(user.dailys).concat(user.todos).concat(user.rewards)
      _.object(_.pluck(tasks, "id"), tasks)