@verb #2348:"new_day" this none this rxdo #9452
@program #2348:"new_day" this none this
if (!(caller_perms() in this.admins))
  raise(E_PERM)
else
  "Performs tasks that happen every day, whether the player logs in or not."
  this.access_locked = 1
  "  $file_utils:value2file(this, \"player_database_backup\", this.player_database);"
  for dude in (this.player_database)
    dude->on_today = 0
    dude->gold_bank = toint(tofloat(dude->gold_bank) * this.bank_interest)
  endfor
  this.yesterday_daily_happenings = this.daily_happenings
  text = this:data_fetch("daily_happenings_random")
  this.daily_happenings = {text[random(length(text))]}
  this.access_locked = 0
endif
"Last modified by Crono (#9452) on Sun Sep  8 22:31:44 2002 MDT."
.