// SIFTools <https://github.com/dburr/SIFTools/>
// By Donald Burr <dburr@DonaldBurr.com>
// Copyright (c) 2015 Donald Burr.
//
// Permission is hereby granted, free of charge, to any person obtaining a copy
// of this software and associated documentation files (the "Software"), to deal
// in the Software without restriction, including without limitation the rights
// to use, copy, modify, merge, publish, distribute, sublicense, and/or sell
// copies of the Software, and to permit persons to whom the Software is
// furnished to do so, subject to the following conditions:
//
// The above copyright notice and this permission notice shall be included in
// all copies or substantial portions of the Software.
//
// THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
// IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
// FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE
// AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER
// LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM,
// OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN
// THE SOFTWARE.

// TODO:
// =====
// * General improvements:
//   - needs a lot more error/bounds checking in general
// * Card Level Calc:
//   - account for 1.2x bonus when feeding cards of the same attribute
//   - maybe also the super (1.5) and ultra (2.0) success bonuses too?
// * Event Tracker:
//   - if time remaining < 24 don't put parenthesis around the hours/minutes/seconds display
//   - @sifen_trackbot update code gets "stuck" sometimes - not sure if the problem
//     is in the twitter fetcher or elsewhere

// Set to 0 to disable debugging, 1+ to enable debugging (higher = more verbose)
var DEBUG_LEVEL = 0;

// EXP tables
var exp_table_n = [ -1, 0, 6, 18, 28, 40, 51, 61, 72, 82, 93, 104, 114, 124, 135, 145, 156, 165, 176, 187, 196, 207, 217, 226, 238, 247, 257, 268, 277, 288, 297, 308, 317, 328, 337, 348, 358, 367, 377, 388, 397 ];

var exp_table_r = [ -1, 0, 14, 31, 45, 55, 67, 76, 85, 94, 103, 110, 119, 125, 134, 140, 148, 155, 161, 168, 174, 181, 187, 193, 199, 206, 211, 217, 223, 228, 235, 240, 245, 251, 256, 262, 267, 272, 277, 283, 288, 292, 298, 303, 308, 313, 317, 323, 327, 332, 337, 342, 346, 351, 356, 360, 365, 370, 374, 378, 383 ];

var exp_table_sr = [ -1, 0, 54, 98, 127, 150, 169, 187, 203, 218, 232, 245, 257, 269, 281, 291, 302, 311, 322, 331, 340, 349, 358, 366, 374, 383, 391, 398, 406, 413, 421, 428, 435, 442, 449, 456, 462, 469, 475, 482, 488, 494, 500, 507, 512, 518, 524, 530, 536, 541, 547, 552, 558, 563, 568, 574, 579, 584, 590, 594, 600, 605, 609, 615, 619, 625, 629, 634, 639, 643, 648, 653, 657, 662, 667, 670, 676, 680, 684, 689, 693 ];

var exp_table_ur = [ -1, 0, 201, 294, 345, 382, 411, 438, 460, 481, 499, 517, 532, 547, 561, 574, 587, 598, 611, 621, 631, 642, 651, 661, 670, 679, 687, 696, 704, 712, 720, 727, 734, 742, 749, 755, 763, 769, 775, 782, 788, 794, 800, 806, 812, 818, 823, 829, 834, 840, 845, 850, 856, 860, 866, 870, 875, 880, 885, 890, 894, 899, 903, 908, 912, 917, 921, 925, 930, 933, 938, 942, 946, 950, 954, 959, 961, 966, 970, 974, 977, 981, 985, 988, 992, 996, 999, 1003, 1006, 1010, 1013, 1017, 1020, 1024, 1027, 1030, 1034, 1037, 1040, 1043, 1047 ];

// global variable to keep event state, because we need it to live between function calls.
// YES I KNOW THIS IS BAD. SO SUE ME. IT WORKS THOUGH. :P
// 1 = token event, 2 = score match, 3 = medfes
var current_type_of_event = 1;

// debug logging
function LOG(level, msg) {
    if (DEBUG_LEVEL > 0 && DEBUG_LEVEL >= level) {
        console.log(msg);
    }
}

// Main function, runs automatically at document-ready (i.e. when the page is finished loading)
$(document).ready(function() {
    // Hide the address bar on mobile browsers
    setTimeout(function() {
        // some sites suggest 0,0 and others 0,1 - not sure which is correct
        window.scrollTo(0, 0);
    }, 0);
    // set up UI (buttons, etc.)
    setup_ui_elements();
    // set up button handlers
    setup_button_handlers();
    // set up slider handlers
    window.timerInterval = 0;
});

// Set up UI elements (tabs, buttons, etc.)
function setup_ui_elements() {
    LOG(1, "setup_ui_elements()");
    var QueryString = function() {
        // http://stackoverflow.com/a/979995
        // This function is anonymous, is executed immediately and 
        // the return value is assigned to QueryString!
        var query_string = {};
        var query = window.location.search.substring(1);
        var vars = query.split("&");
        for (var i = 0; i < vars.length; i++) {
            var pair = vars[i].split("=");
            // If first entry with this name
            if (typeof query_string[pair[0]] === "undefined") {
                query_string[pair[0]] = decodeURIComponent(pair[1]);
            } else if (typeof query_string[pair[0]] === "string") {
                var arr = [ query_string[pair[0]], decodeURIComponent(pair[1]) ];
                query_string[pair[0]] = arr;
            } else {
                query_string[pair[0]].push(decodeURIComponent(pair[1]));
            }
        }
        return query_string;
    }();
    var default_tab = 0;
    if (!isNaN(QueryString.tab)) {
        if (QueryString.tab >= 1 && QueryString.tab <= 4) {
            default_tab = QueryString.tab - 1;
        }
    } else {
        var default_tab_from_cookie = $.cookie("default_tab");
        if (isNaN(default_tab_from_cookie)) {
            default_tab = 0;
        } else {
            default_tab = default_tab_from_cookie;
        }
    }
    $("#tabs").tabs({
        active: default_tab,
        create: function(event, ui) {
            var theTab = ui.tab.index();
            LOG(3, "INIT tab created " + theTab);
            set_up_tab(theTab);
        },
        activate: function(event, ui) {
            var theTab = ui.newTab.index();
            LOG(3, "INIT tab selected " + theTab);
            set_up_tab(theTab);
        }
    });
    // only set up keypads on mobile browsers
    // not sure what the best way of doing this is
    var pageWidth = $(window).width();
    if (pageWidth < 1024) {
        $("#current_rank").prop("readonly", true);
        $("#current_rank").keypad();
        // {prompt: 'Enter here'}
        $("#current_exp").prop("readonly", true);
        $("#current_exp").keypad();
        // {prompt: 'Enter here'}
        $("#desired_rank").prop("readonly", true);
        $("#desired_rank").keypad();
        // {prompt: 'Enter here'}
        $("#current_gems").prop("readonly", true);
        $("#current_gems").keypad();
        // {prompt: 'Enter here'}
        $("#gem_desired_gems").prop("readonly", true);
        $("#gem_desired_gems").keypad();
        // {prompt: 'Enter here'}
        $("#card_current_level").prop("readonly", true);
        $("#card_current_level").keypad();
        // {prompt: 'Enter here'}
        $("#card_current_exp").prop("readonly", true);
        $("#card_current_exp").keypad();
        // {prompt: 'Enter here'}
        $("#card_desired_level").prop("readonly", true);
        $("#card_desired_level").keypad();
        // {prompt: 'Enter here'}
        $("#card_feed_exp").prop("readonly", true);
        $("#card_feed_exp").keypad();
    } else {
        $("#current_rank").prop("readonly", false);
        $("#current_exp").prop("readonly", false);
        $("#desired_rank").prop("readonly", false);
        $("#current_gems").prop("readonly", false);
        $("#gem_desired_gems").prop("readonly", false);
        $("#card_current_level").prop("readonly", false);
        $("#card_current_exp").prop("readonly", false);
        $("#card_desired_level").prop("readonly", false);
        $("#card_feed_exp").prop("readonly", false);
    }
    // set up date/time pickers
    $("#gem_desired_date").datepicker();
    $("#event_end_date").datepicker();
    // $( "#event_end_time" ).timepicker();
    $("#event_end_time").timepicker({
        timeFormat: "H:i",
        disableTextInput: true
    });
    // set up buttons
    [ "calculate-rank", "reset-rank", "calculate-gems", "reset-gems", "card-max-level", "calculate-card", "reset-card", "start-stop-timer", "clear-timer" ].forEach(function(entry) {
        var selector = "#button-" + entry;
        LOG(1, "setting up " + selector);
        $(selector).button();
    });
    // hide result divs
    [ "rank-calc-result-area", "gem-calc-result-area", "card-calc-result-area" ].forEach(function(entry) {
        var selector = "#" + entry;
        LOG(1, "setting up " + selector);
        $(selector).hide();
    });
    // set up radio button listeners
    $("input[name=gem-mode]").change(handle_gem_mode_select);
    $("input[name=card-mode]").change(handle_card_mode_select);
    // hide non-selected option divs
    [ "gem-event-options-area", "gem-desired-gems-area", "card-exp-area", "gem_jp_daily_gems" ].forEach(function(entry) {
        var selector = "#" + entry;
        LOG(1, "setting up " + selector);
        $(selector).hide();
    });
    // set up checkbox change event handler
    $("#gems_include_events").change(function() {
        handle_gem_event_box(this.checked);
    });
    // set up gem event calc note dialog
    // $("#dialog").dialog({ autoOpen: false });
    $("a#gem_event_readme").click(function(e) {
        e.preventDefault();
        $("#gem_event_readme_dialog").dialog({
            height: 300
        });
    });
    $("a#gem_quest_readme").click(function(e) {
        e.preventDefault();
        $("#gem_quest_readme_dialog").dialog({
            height: 300
        });
    });
    // set up show/hide JP-only options
    $("#gem_game_version").on("change", function(e) {
        handle_gem_game_version_change();
    });
}

function handle_gem_game_version_change() {
    var game_version = $("#gem_game_version").val();
    if (game_version === "JP") {
        $("#gem_jp_daily_gems").show();
    } else {
        $("#gem_jp_daily_gems").hide();
    }
}

function handle_gem_event_box(show_it) {
    if (show_it) {
        $("#gem-event-options-area").show();
    } else {
        $("#gem-event-options-area").hide();
    }
}

function setup_button_handlers() {
    $("#button-calculate-rank").click(function(evt) {
        calculate_rank();
    });
    $("#button-reset-rank").click(function(evt) {
        reset_rank();
    });
    $("#button-calculate-gems").click(function(evt) {
        calculate_gems();
    });
    $("#button-reset-gems").click(function(evt) {
        reset_gems();
    });
    $("#button-card-max-level").click(function(evt) {
        card_set_max_level();
    });
    $("#button-calculate-card").click(function(evt) {
        calculate_card();
    });
    $("#button-reset-card").click(function(evt) {
        reset_card();
    });
    $("#button-start-stop-timer").click(function(evt) {
        start_stop_timer();
    });
    $("#button-clear-timer").click(function(evt) {
        clear_timer();
    });
}

// tab functions
function set_up_tab(tab) {
    switch (tab) {
      case 0:
        rank_calc_tab_selected();
        break;

      case 1:
        love_gem_calc_tab_selected();
        break;

      case 2:
        card_level_calc_tab_selected();
        break;

      case 3:
        event_end_calc_tab_selected();
        break;
    }
}

function rank_calc_tab_selected() {
    LOG(1, "rank_calc_tab_selected");
    $.cookie("default_tab", 0);
}

function love_gem_calc_tab_selected() {
    LOG(1, "love_gem_calc_tab_selected");
    $.cookie("default_tab", 1);
}

function card_level_calc_tab_selected() {
    LOG(1, "card_level_calc_tab_selected");
    $.cookie("default_tab", 2);
}

function event_end_calc_tab_selected() {
    LOG(1, "event_end_calc_tab_selected");
    $.cookie("default_tab", 3);
}

function calculate_rank() {
    // validate data
    var current_rank = parseInt($("#current_rank").val());
    var current_exp_input = $("#current_exp").val();
    var current_exp = 0;
    if (current_exp_input != "") {
        current_exp = parseInt(current_exp_input);
    }
    var desired_rank = parseInt($("#desired_rank").val());
    var game_version = $("#game_version").val();
    if (isNaN(current_rank) || isNaN(current_exp) || isNaN(desired_rank)) {
        window.alert("Error: you have entered an invalid (non-numeric) value. Please check your input and try again.");
    } else if (current_rank < 0 || current_exp < 0 || desired_rank < 0) {
        window.alert("Error: you have entered a negative value. Please check your input and try again.");
    } else if (current_rank < 34 || desired_rank < 34) {
        window.alert("Error: this calculator does not work for ranks less than 34.");
    } else if (desired_rank <= current_rank) {
        window.alert("Error: desired rank must be greater than current rank.");
    } else {
        var required_exp = 0;
        for (rank = current_rank; rank < desired_rank; rank++) {
            var required_exp_for_next_rank = Math.round(34.45 * rank - 551);
            // account for half EXP on JP (only if rank < 100)
            if (game_version === "JP" && rank < 100) {
                required_exp_for_next_rank /= 2;
            }
            required_exp = required_exp + required_exp_for_next_rank;
        }
        // account for exp we already have
        required_exp -= current_exp;
        // convert to integer
        required_exp = Math.round(required_exp);
        // now calc the # of songs needed
        // round up because you can't play half of a song (although you can play a song half-assedly :P and I often do :P)
        var easy_count = Math.round(required_exp / 12);
        var normal_count = Math.round(required_exp / 26);
        var hard_count = Math.round(required_exp / 46);
        var expert_count = Math.round(required_exp / 83);
        // calc LP and FP
        var LP = 25 + Math.floor(Math.min(desired_rank, 300) / 2) + Math.floor(Math.max(desired_rank - 300, 0) / 3);
        // calc friend slots
        var friend_slots = 10 + Math.floor(Math.min(desired_rank, 50) / 5) + Math.floor(Math.max(desired_rank - 50, 0) / 10);
        // display the results
        $("#rank-result-exp").text(required_exp);
        $("#rank-result-songs-easy").text(easy_count);
        $("#rank-result-songs-normal").text(normal_count);
        $("#rank-result-songs-hard").text(hard_count);
        $("#rank-result-songs-expert").text(expert_count);
        // rank-results-lp">-</span> LP and <span id="rank-results-fp
        $("#rank-results-lp").text(LP);
        $("#rank-results-fp").text(friend_slots);
        $("#rank-calc-result-area").show();
    }
}

function reset_rank() {
    $("#rank-calc-result-area").hide();
    $("#current_rank").val("");
    $("#current_exp").val("");
    $("#desired_rank").val("");
    $("#rank-result-exp").text("-");
    $("#rank-result-songs-easy").text("-");
    $("#rank-result-songs-normal").text("-");
    $("#rank-result-songs-hard").text("-");
    $("#rank-result-songs-expert").text("-");
    $("#rank-results-lp").text("-");
    $("#rank-results-fp").text("-");
}

function handle_gem_mode_select() {
    var mode = $(this).val();
    if (mode === "DATE") {
        $("#gem-date-area").show();
        $("#gem-desired-gems-area").hide();
    } else if (mode === "GEMS") {
        $("#gem-date-area").hide();
        $("#gem-desired-gems-area").show();
    }
}

function card_set_max_level() {
    var rarity = $("#card_rarity").val();
    var level = get_level_cap(rarity);
    $("#card_desired_level").val(level);
}

function handle_card_mode_select() {
    var mode = $(this).val();
    if (mode === "LEVEL") {
        $("#card-level-area").show();
        $("#card-exp-area").hide();
    } else if (mode === "EXP") {
        $("#card-level-area").hide();
        $("#card-exp-area").show();
    }
}

function is_muse_members_birthday(moment) {
    var the_month = month(moment);
    var the_day = day(moment);
    var is_bday = false;
    var bday_name = "";
    if (the_month == 1 && the_day == 17) {
        is_bday = true;
        bday_name = "Hanayo";
    } else if (the_month == 3 && the_day == 15) {
        is_bday = true;
        bday_name = "Umi";
    } else if (the_month == 4 && the_day == 19) {
        is_bday = true;
        bday_name = "Maki";
    } else if (the_month == 6 && the_day == 9) {
        is_bday = true;
        bday_name = "Nozomi";
    } else if (the_month == 7 && the_day == 22) {
        is_bday = true;
        bday_name = "Nico";
    } else if (the_month == 8 && the_day == 3) {
        is_bday = true;
        bday_name = "Honoka";
    } else if (the_month == 9 && the_day == 12) {
        is_bday = true;
        bday_name = "Kotori";
    } else if (the_month == 10 && the_day == 21) {
        is_bday = true;
        bday_name = "Eli";
    } else if (the_month == 11 && the_day == 1) {
        is_bday = true;
        bday_name = "Rin";
    }
    return [ is_bday, bday_name ];
}

function is_gem_day(moment) {
    var the_day = day(moment);
    // according the login bonus chart, gems are given out on days numbered 1,6,11,16,21,26,30
    if (the_day == 1 || the_day == 6 || the_day == 11 || the_day == 16 || the_day == 21 || the_day == 26 || the_day == 30) {
        return true;
    }
    return false;
}

// moment.js starts months/days/years at 0... weird...
function month(moment) {
    return moment.month() + 1;
}

// moment.js uses date() not day()
function day(moment) {
    return moment.date();
}

function year(moment) {
    return moment.year();
}

function hour(moment) {
    return moment.hour();
}

function minute(moment) {
    return moment.minute();
}

function second(moment) {
    return moment.second();
}

function is_same_day(m1, m2) {
    if (month(m1) == month(m2) && day(m1) == day(m2) && year(m1) == year(m2)) {
        return true;
    }
    return false;
}

function handle_event(day_of_month, game_version, typical_tier) {
    LOG(1, "start event type is " + current_type_of_event);
    // format of returned tuple:
    // tuple[0] - was this an event day? (boolean, duh)
    // tuple[1] - name of event, or "" if none (string)
    // tuple[2] - amount of gems spent (int)
    // tuple[3] - amount of gems gained (int)
    var return_tuple = [];
    return_tuple[0] = false;
    return_tuple[1] = "";
    return_tuple[2] = 0;
    return_tuple[3] = 0;
    // ok, if it's not the 1st or 15th, then no event is going on
    if (day_of_month == 1 || day_of_month == 15) {
        return_tuple[0] = true;
        // now we calculate!
        // according to /u/eryncerise, current "typical" tiering gem requirements are:
        // Tier 1 = 10-15 gems, Tier 2 = 15-20 gems, no tier = (usually) no gems (assuming you play efficiently)
        switch (typical_tier) {
          case 1:
            return_tuple[2] = 20;
            break;

          case 2:
            return_tuple[2] = 15;
            break;

          case 3:
            return_tuple[2] = 0;
            break;
        }
        // now handle different event types since they have different reward progressions
        // TODO: need to use different tier cutoff point values depending on EN or JP (which means I need to go on tomodachi and average both EN and JP data
        // for the past X events of each type. Fun for the whole family! :P)
        switch (current_type_of_event) {
          case 1:
            LOG(1, "TOKEN");
            // Token Event
            return_tuple[1] = "Token Event";
            // completion rewards: gems at 200, 1000, 4000, 15000, 18000, 21000, 25000 (2), 30000 (2), 35000 (3)
            // event ranking rewards: tiers 1-4, no love gems for YOU! tier 5 on the other hand gets 3 of em!
            if (typical_tier == 1) {
                // completion rewards: 
                // quick check of the last 5 token events on Tomodachi gives me a ballpark 30k average for t1 cutoff
                // (no one has gotten 35k so I am going to ignore that final gem reward in the completion rewards progression)
                // makes for a total of 10 gems
                // event rewards: tier 1, NO GEMS FOR YOU!
                return_tuple[3] = 10;
            } else if (typical_tier == 2) {
                // completion rewards:
                // quick check of the last 5 token events on Tomodachi gives me a ballpark 23k average for t2 cutoff
                // makes for a total of 10 gems
                // event rewards: tier 2, NO GEMS FOR YOU!
                return_tuple[3] = 6;
            } else {
                // completion reward: duh, Sr is at 11000, assume they stop playing there. +3
                // event rewards: they're only after the event SR, we optimistically assume that they manage to snag tier 5 if they got that far. +3 gems.
                return_tuple[3] = 6;
            }
            break;

          case 2:
            LOG(1, "SM");
            // Score Match
            return_tuple[1] = "Score Match";
            // NOTE: as I write this (10/18/15) EN is running a Token Event, which means unfortunately that the previous
            // event (Score Match) data is no longer accessible. But JP just finished the Maki Score Match, so I can still
            // get at the event rewards info. I am assuming that the event rewards are the same as EN (and that I am reading
            // them correctly, a big assumption since I don't read Japanese :P )
            // completion rewards: gems at 500, 2000, 8000, 35000, 42500, 50000, 60000 (2), 70000 (2), 80000 (3)
            // event ranking rewards: tiers 1-2, no love gems for YOU! tier 3 gets 2 gems, tier 4 gets 2, tier 5 gets 4
            if (typical_tier == 1) {
                // completion rewards: 
                // quick check of the last 5 token events on Tomodachi gives me a ballpark 30k average for t1 cutoff
                // (no one has gotten 35k so I am going to ignore that final gem reward in the completion rewards progression)
                // makes for a total of 10 gems
                // event rewards: tier 1, NO GEMS FOR YOU!
                return_tuple[3] = 10;
            } else if (typical_tier == 2) {
                // completion rewards:
                // quick check of the last 5 token events on Tomodachi gives me a ballpark 23k average for t2 cutoff
                // makes for a total of 10 gems
                // event rewards: tier 2, NO GEMS FOR YOU!
                return_tuple[3] = 6;
            } else {
                // completion reward: duh, Sr is at 11000, assume they stop playing there. +3
                // event rewards: they're only after the event SR, we optimistically assume that they manage to snag tier 5 if they got that far. +3 gems.
                return_tuple[3] = 6;
            }
            break;

          case 3:
            LOG(1, "MF");
            // Medley Festival
            return_tuple[1] = "Medley Festival (INCOMPLETE)";
            // TODO: I know NOTHING about medfes, and there is currently none going on on JP so I can't access reward data.
            // So return bogus values for now.
            return_tuple[3] = 0;
            break;
        }
        // lastly bump the event type
        current_type_of_event++;
        if (game_version === "EN" && current_type_of_event > 2 || game_version === "JP" && current_type_of_event > 3) {
            current_type_of_event = 1;
        }
    }
    LOG(1, "end event type is " + current_type_of_event);
    LOG(1, return_tuple);
    // now return what we got
    return return_tuple;
}

function calculate_gems() {
    // reset current event indicator (start out with a token event)
    current_type_of_event = 1;
    var verbose = $("#gems_verbose").is(":checked");
    var current_gems_text = $("#current_gems").val();
    var current_gems = 0;
    if (current_gems_text != "") {
        current_gems = parseInt(current_gems_text);
    }
    if (isNaN(current_gems)) {
        alert("Error: invalid number of current gems. Please check your input and try again.");
        return;
    }
    var tier = parseInt($("#gems_tier_level").val());
    var game_version = $("#gem_game_version").val();
    var calc_daily_quest_gems = false;
    var calc_event_gems = $("#gems_include_events").is(":checked");
    if (game_version === "JP") {
        calc_daily_quest_gems = $("#gems_include_daily_gems").is(":checked");
    }
    var mode = $("input[name=gem-mode]:checked").val();
    if (mode === "DATE") {
        var target_date = $("#gem_desired_date").val();
        if (target_date === "") {
            alert("Error: invalid date. Please check and try again.");
            return;
        }
        var target_date_object = moment(new Date(target_date));
        if (!target_date_object.isValid()) {
            alert("Error: invalid date. Please check and try again.");
            return;
        }
        var now = moment(new Date());
        if (target_date_object.isBefore(now) || is_same_day(now, target_date_object)) {
            window.alert("Error: the date must be in the future.");
            return;
        }
        // ready to rock
        var resultsString = sprintf("Today is %02d/%02d/%04d and you currently have %d love gems.<br />(Assuming you collected any gems you got today and already counted those.)", month(now), day(now), year(now), current_gems);
        var verboseText = "";
        if (calc_daily_quest_gems) {
            verboseText = "(Including daily 'quest' gems in the calculation. There will not be a separate daily entry for each one.)<br /><br />";
        }
        var gems = current_gems;
        now = now.add(1, "days");
        while (now.isBefore(target_date_object) || is_same_day(now, target_date_object)) {
            // is it a login bonus?
            if (is_gem_day(now)) {
                gems += 1;
            }
            // is it a birthday?
            var birthday_tuple = is_muse_members_birthday(now);
            var is_bday = birthday_tuple[0];
            var name = birthday_tuple[1];
            if (is_bday) {
                gems += 5;
            }
            // account for daily login quest gem
            if (calc_daily_quest_gems) {
                gems++;
            }
            if (calc_event_gems) {
                // account for event
                // format of returned tuple:
                // tuple[0] - was this an event day? (boolean, duh)
                // tuple[1] - name of event, or "" if none (string)
                // tuple[2] - amount of gems spent (int)
                // tuple[3] - amount of gems gained (int)
                var event_results = handle_event(day(now), game_version, tier);
                var is_event = event_results[0];
                var event_name = "";
                var spent_gems = 0;
                var won_gems = 0;
                if (is_event) {
                    event_name = event_results[1];
                    spent_gems = event_results[2];
                    won_gems = event_results[3];
                    // did any gems get spent?
                    if (spent_gems > 0) {
                        // do we have enough to cover it?
                        if (gems >= spent_gems) {
                            // spend the gems
                            gems -= spent_gems;
                            // now reap the winnings
                            gems += won_gems;
                        } else {
                            // flag to indicate that we didn't have the gems
                            spent_gems = -1;
                        }
                    } else {
                        gems += won_gems;
                    }
                }
            }
            // record verbose output if desired
            if (verbose) {
                if (is_gem_day(now) || is_bday || is_event) {
                    verboseText += sprintf("<b>%02d/%02d/%04d</b><br />", month(now), day(now), year(now));
                    if (is_gem_day(now)) {
                        verboseText += "Free gem as login bonus!<br />";
                    }
                    if (is_bday) {
                        verboseText += sprintf("It's %s's birthday! You get 5 gems!<br />", name);
                    }
                    // account for events
                    if (is_event) {
                        verboseText += sprintf("A " + event_name + " just ended!<br />", month(now), day(now), year(now), event_name);
                        if (spent_gems == -1) {
                            verboseText += "You didn't have enough gems to participate.<br />";
                        } else {
                            if (spent_gems == 0) {
                                verboseText += sprintf("You didn't have to spend any gems, and you won %d gems!<br />", won_gems);
                            } else {
                                verboseText += sprintf("You spent %d gems, and you won %d gems.<br />", spent_gems, won_gems);
                            }
                        }
                    }
                    // add a newline                
                    verboseText += sprintf("That brings you to %d gems!<br /><br />", gems);
                }
            }
            now = now.add(1, "days");
        }
        resultsString = resultsString + sprintf("<br />You will have %d love gems on %02d/%02d/%04d. Good things come to those who wait!", gems, month(target_date_object), day(target_date_object), year(target_date_object));
        $("#gem-result-summary").html(resultsString);
        if (verbose) {
            $("#gem-result-verbose-area").html(verboseText);
            $("#gem-result-textarea").show();
        } else {
            $("#gem-result-verbose-area").html(verboseText);
            $("#gem-result-textarea").hide();
        }
    } else if (mode === "GEMS") {
        var target_gems = parseInt($("#gem_desired_gems").val());
        if (isNaN(target_gems)) {
            window.alert("Error: you have entered an invalid (non-numeric) value. Please check your input and try again.");
            return;
        }
        var now = moment(new Date());
        // arbitrary limit to make sure we don't go wander off into infinity
        var cutoff = moment(now).add(5, "years");
        var resultsString = sprintf("Today is %02d/%02d/%04d and you currently have %d love gems.<br />(Assuming you collected any gems you got today and already counted those.)", month(now), day(now), year(now), current_gems);
        var verboseText = "";
        if (calc_daily_quest_gems) {
            verboseText = "(Including daily 'quest' gems in the calculation. There will not be a separate daily entry for each one.)<br /><br />";
        }
        // make sure we don't go off into infinity (i.e. user gives input that is impossible to calculate)
        var abort = false;
        var gems = current_gems;
        while (gems < target_gems && !abort) {
            now = now.add(1, "days");
            // is it a login bonus?
            if (is_gem_day(now)) {
                gems += 1;
            }
            // is it a birthday?
            var birthday_tuple = is_muse_members_birthday(now);
            var is_bday = birthday_tuple[0];
            var name = birthday_tuple[1];
            if (is_bday) {
                gems += 5;
            }
            // account for daily login quest gem
            if (calc_daily_quest_gems) {
                gems++;
            }
            if (calc_event_gems) {
                // account for event
                // format of returned tuple:
                // tuple[0] - was this an event day? (boolean, duh)
                // tuple[1] - name of event, or "" if none (string)
                // tuple[2] - amount of gems spent (int)
                // tuple[3] - amount of gems gained (int)
                var event_results = handle_event(day(now), game_version, tier);
                var is_event = event_results[0];
                var event_name = "";
                var spent_gems = 0;
                var won_gems = 0;
                if (is_event) {
                    event_name = event_results[1];
                    spent_gems = event_results[2];
                    won_gems = event_results[3];
                    // did any gems get spent?
                    if (spent_gems > 0) {
                        // do we have enough to cover it?
                        if (gems >= spent_gems) {
                            // spend the gems
                            gems -= spent_gems;
                            // now reap the winnings
                            gems += won_gems;
                        } else {
                            // flag to indicate that we didn't have the gems
                            spent_gems = -1;
                        }
                    } else {
                        gems += won_gems;
                    }
                }
            }
            // record verbose output if desired
            if (verbose) {
                if (is_gem_day(now) || is_bday || is_event) {
                    verboseText += sprintf("<b>%02d/%02d/%04d</b><br />", month(now), day(now), year(now));
                    if (is_gem_day(now)) {
                        verboseText += "Free gem as login bonus!<br />";
                    }
                    if (is_bday) {
                        verboseText += sprintf("It's %s's birthday! You get 5 gems!<br />", name);
                    }
                    // account for events
                    if (is_event) {
                        verboseText += sprintf("A " + event_name + " just ended!<br />", month(now), day(now), year(now), event_name);
                        if (spent_gems == -1) {
                            verboseText += "You didn't have enough gems to participate.<br />";
                        } else {
                            if (spent_gems == 0) {
                                verboseText += sprintf("You didn't have to spend any gems, and you won %d gems!<br />", won_gems);
                            } else {
                                verboseText += sprintf("You spent %d gems, and you won %d gems.<br />", spent_gems, won_gems);
                            }
                        }
                    }
                    // add a newline                
                    verboseText += sprintf("That brings you to %d gems!<br /><br />", gems);
                }
            }
            // do we abort?
            if (now.isAfter(cutoff)) {
                verboseText += sprintf("(Cannot proceed, this appears to be an unattainable amount of gems given your constraints.)");
                abort = true;
            }
        }
        resultsString = resultsString + sprintf("<br />You will have %d love gems on %02d/%02d/%04d. Good things come to those who wait!", gems, month(now), day(now), year(now));
        if (abort) {
            resultsString += "<br />(Note: the calculation was stopped because it appears that you will be unable to attain the desired amount of gems given your constraints.)";
        }
        $("#gem-result-summary").html(resultsString);
        if (verbose) {
            $("#gem-result-verbose-area").html(verboseText);
            $("#gem-result-textarea").show();
        } else {
            $("#gem-result-verbose-area").html(verboseText);
            $("#gem-result-textarea").hide();
        }
    }
    $("#gem-calc-result-area").show();
}

function reset_gems() {
    $("#gem-calc-result-area").hide();
    $("#gem-result-summary").text("-");
    $("#gem-desired-gems-area").hide();
    $("#gem-date-area").hide();
    $("#current_gems").val(0);
    var $radios = $("input:radio[name=gem-mode]");
    $radios.filter("[value=DATE]").prop("checked", true);
    $("#gem_desired_date").val("");
    $("#gem_desired_gems").val("");
    $("#gems_verbose").prop("checked", false);
    $("#gem-date-area").show();
}

function get_level_cap(rarity) {
    if (rarity === "N") {
        return 40;
    } else if (rarity === "R") {
        return 60;
    } else if (rarity === "SR") {
        return 80;
    } else if (rarity === "UR") {
        return 100;
    }
    // bogus return value, should never reach here
    return -1;
}

function is_valid_level(rarity, level) {
    var return_value = false;
    if (level >= 1) {
        return_value = level <= get_level_cap(rarity);
    }
    return return_value;
}

function is_valid_exp(rarity, level, exp) {
    var return_value = false;
    if (rarity === "N" && is_valid_level(rarity, level)) {
        return_value = exp >= 0 && exp < exp_table_n[level + 1];
    } else if (rarity === "R" && is_valid_level(rarity, level)) {
        return_value = exp >= 0 && exp < exp_table_r[level + 1];
    } else if (rarity === "SR" && is_valid_level(rarity, level + 1)) {
        return_value = exp >= 0 && exp < exp_table_sr[level + 1];
    } else if (rarity === "UR" && is_valid_level(rarity, level)) {
        return_value = exp >= 0 && exp < exp_table_ur[level + 1];
    }
    return return_value;
}

function calculate_card() {
    var current_level = parseInt($("#card_current_level").val());
    var current_exp_input = $("#card_current_exp").val();
    var current_exp = 0;
    if (current_exp_input != "") {
        current_exp = parseInt(current_exp_input);
    }
    var rarity = $("#card_rarity").val();
    if (isNaN(current_level) || !is_valid_level(rarity, current_level)) {
        alert("Error: invalid level. Please check your input and try again.");
        return;
    }
    if (isNaN(current_exp) || !is_valid_exp(rarity, current_level, current_exp)) {
        alert("Error: invalid EXP. Please check your input and try again.");
        return;
    }
    var mode = $("input[name=card-mode]:checked").val();
    if (mode === "LEVEL") {
        var target_level = parseInt($("#card_desired_level").val());
        if (isNaN(target_level) || !is_valid_level(rarity, target_level)) {
            window.alert("Error: the desired level is invalid.");
            return;
        }
        // ready to rock
        var required_exp = 0;
        var resultsString = "";
        for (level = current_level + 1; level <= target_level; level++) {
            if (rarity === "N") {
                required_exp += exp_table_n[level];
            } else if (rarity === "R") {
                required_exp += exp_table_r[level];
            } else if (rarity === "SR") {
                required_exp += exp_table_sr[level];
            } else if (rarity === "UR") {
                required_exp += exp_table_ur[level];
            }
        }
        // subtract what we have
        required_exp -= current_exp;
        var resultString = sprintf("To get a %s card from level %d (with %d EXP) to %d requires %d EXP.<br />", rarity, current_level, current_exp, target_level, required_exp);
        // calculate equiv N cards
        var number_of_n_cards = Math.round(required_exp / 100) + 1;
        resultString += sprintf("(the equivalent of about %d level-1 N cards fed to it)", number_of_n_cards);
        // output the result
        $("#card-result-summary").html(resultString);
    } else if (mode === "EXP") {
        var exp_to_feed = parseInt($("#card_feed_exp").val());
        if (isNaN(exp_to_feed)) {
            window.alert("Error: you have entered an invalid (non-numeric) value. Please check your input and try again.");
            return;
        }
        // ready to rock
        var resultsString = "FOO";
        // XXX do some calculating
        var exp_tally = current_exp;
        var level = 0;
        for (level = current_level + 1; level <= get_level_cap(rarity); level++) {
            if (rarity === "N") {
                exp_tally += exp_table_n[level];
            } else if (rarity === "R") {
                exp_tally += exp_table_r[level];
            } else if (rarity === "SR") {
                exp_tally += exp_table_sr[level];
            } else if (rarity === "UR") {
                exp_tally += exp_table_ur[level];
            }
            if (exp_tally > exp_to_feed) {
                break;
            }
        }
        level--;
        var resultString = "";
        if (exp_to_feed > exp_tally) {
            resultString = sprintf("If you feed a %s card at level %d (with %d EXP) a total of %d EXP,<br />it will end up at level %d.%s<br />This is way overkill, you fed %d more EXP than was necessary.", rarity, current_level, current_exp, exp_to_feed, level, (level == get_level_cap(rarity) ? " (MAX LEVEL!)" : ""), exp_to_feed - exp_tally);
        } else {
            resultString = sprintf("If you feed a %s card at level %d (with %d EXP) a total of %d EXP,<br />it will end up at level %d.%s", rarity, current_level, current_exp, exp_to_feed, level, level == get_level_cap(rarity) ? " (MAX LEVEL!)" : "");
        }
        // output the result
        $("#card-result-summary").html(resultString);
    }
    $("#card-calc-result-area").show();
}

function reset_card() {
    $("#card-calc-result-area").hide();
    $("#card-result-summary").text("-");
    $("#card-level-area").hide();
    $("#card-exp-area").hide();
    $("#card_current_level").val("");
    $("#card_current_exp").val("");
    var $radios = $("input:radio[name=card-mode]");
    $radios.filter("[value=LEVEL]").prop("checked", true);
    $("#card_desired_level").val("");
    $("#card_feed_exp").val("");
    $("#card-level-area").show();
}

function start_stop_timer() {
    if (window.timerInterval != 0) {
        // stop it
        clearInterval(window.timerInterval);
        window.timerInterval = 0;
        $("#button-start-stop-timer span").text("Start Timer");
    } else {
        // 2013-02-08 09:30         # An hour and minute time part
        var dateString = $("#event_end_date").val() + " " + $("#event_end_time").val() + "Z";
        window.the_end = moment(dateString, "MM/DD/YYYY HH:mmZ");
        window.timerInterval = setInterval(run_timer, 1e3);
        $("#button-start-stop-timer span").text("Stop Timer");
        // run the first update ourselves, so that it doesn't stay blank until the timer kicks in
        window.immediately_refresh_tier_cutoffs = true;
        run_timer();
    }
}

function run_timer() {
    var now = moment(new Date());
    var end = window.the_end;
    var string = "<h1><b>CURRENT TIME</b></h1><h2>" + now.utc().format("MM/DD/YYYY HH:mm:ss") + " UTC</h2><h1>EVENT ENDS:</h1><h2>" + end.utc().format("MM/DD/YYYY HH:mm:ss") + " UTC</h2>";
    if (now.isBefore(end)) {
        var ms = end.diff(now.utc());
        var t = moment.duration(ms).asMilliseconds();
        var seconds = Math.floor(t / 1e3 % 60);
        var minutes = Math.floor(t / 1e3 / 60 % 60);
        var hours = Math.floor(t / (1e3 * 60 * 60) % 24);
        var days = Math.floor(t / (1e3 * 60 * 60 * 24));
        var total_hours = days * 24 + hours;
        var time_till = "<h2>";
        if (total_hours >= 24) {
            time_till += sprintf("%d hours<br />", total_hours);
        }
        time_till += "(";
        if (days >= 1) {
            time_till += sprintf("%d day%s ", days, days > 1 ? "s" : "");
        }
        if (hours >= 1) {
            time_till += sprintf("%d hour%s ", hours, hours > 1 ? "s" : "");
        }
        time_till += sprintf("%d minute%s %d second%s)</h2>", minutes, minutes > 1 ? "s" : "", seconds, seconds > 1 ? "s" : "");
        // d.asDays() + " days " + d.asHours() + moment.utc(ms).format(":mm:ss");
        // var time_till = moment.utc(end.diff(now)).format("HH:mm:ss");//.format("HH:mm:ss");
        string += "<h1>TIME REMAINING:</h1><h2>" + time_till + "</H2>";
    } else {
        string += "<h1>EVENT IS OVER</h1>";
    }
    $("#timer_output_area").html(string);
    // @sifen_trackbot updates come out at 36 minutes past the hour, fetch them at 38 minutes to allow for some slop
    if (minute(now) == 38 && second(now) == 0 || window.immediately_refresh_tier_cutoffs) {
        $("#tier_info_output_area").html("<h2>Updating tier cutoff data, please wait...</h2>");
        // dumb ass way to fetch and display @sifen_trackbot tier cutoff tweets hourly
        // using this twitter fetcher: http://jasonmayes.com/projects/twitterApi/#sthash.budgYosd.dpbs
        twitterFetcher.fetch({
            id: "654587648904794112",
            domId: "",
            maxTweets: 1,
            enableLinks: false,
            showUser: true,
            showTime: true,
            dateFunction: "",
            showRetweet: false,
            customCallback: function(tweets) {
                if (tweets.length > 0) {
                    // we only care about the first one
                    var tweet = tweets[0];
                    LOG(1, "GOT TWEET: " + tweet);
                    // now parse it
                    // !!! QUICK & DIRTY HACK ALERT !!!
                    // this is kinda crappy, @sifen_trackbot tweets come out as multiple lines separated by newlines
                    // so for now we just split the incoming tweet into an array of strings (one per line) and pull the values out using explicit line numbers
                    // we always assume Tier1 value is on line 11, Tier2 is line 12 and Date/time/% complete is line 13
                    // this may (in fact it probably will) change in the future
                    // eventually I would like to come up with a better (i.e. less crappy) algorithm to parse the string and extract the values dynamically
                    // but for now this will do :P
                    var splitTweet = tweet.split("\n");
                    var tier1 = splitTweet[11];
                    var tier2 = splitTweet[12];
                    var updateTime = splitTweet[13];
                    $("#tier_info_output_area").html("<h2>Latest Tier Cutoffs as of UTC " + updateTime + ":<br />" + tier1 + "<br />" + tier2 + "</h2>");
                }
            },
            showInteraction: false
        });
        window.immediately_refresh_tier_cutoffs = false;
    }
}

function clear_timer() {
    $("#timer_output_area").html("<h1>Timer Not Running</h1>");
    $("#tier_info_output_area").html("");
}