Chaturbate

Bots Home | Create an App
BoobiesTrap's IRC Bot
Author: boobiestrap
Description Source Code Launch Bot Current Users
var _APPNAME = "BoobiesTrap's IRC Bot";

String.prototype.capitalize = function() {
    return this.charAt(0).toUpperCase() + this.slice(1);
}
String.prototype.padL = function (length) { // optional param: paddingChar (default=" ")
    var pad = arguments.length > 1 ? arguments[1] : ' ';
    return this.length < length ? (pad + this).padL(length, pad) : this.substr(0, length);
}
String.prototype.padR = function (length) { // optional param: paddingChar (default=" ")
    var pad = arguments.length > 1 ? arguments[1] : ' ';
    return this.length < length ? (this + pad).padR(length, pad) : this.substr(0, length);
}
String.prototype.padC = function (length) { // optional param: paddingChar (default=" ")
    var pad = arguments.length > 1 ? arguments[1] : ' ';
    if (this.length >= length)     return this.substr(0, length);
    if (this.length + 1 == length) return this + pad;
    else return (pad + this + pad).padC(length, pad);
}
String.isString = function (o) {
    return (typeof o == 'string' || o instanceof String);
}

Function.isFunction = function (o) {
    return !!(o && o.constructor && o.call && o.apply);
}

var utility = {
    getPredefinedColor : function (name) {
        switch (name.toLowerCase()) {
            case 'black': 
                return '#000';
            case 'white':
                 return '#fff';
             case 'yellow':
                return '#fe3';
            case 'pink':
                return '#f0e';
            case 'purple':
                return '#609';
            case 'orange':
                 return User.Color.ORANGE.getColor();
            case 'red':
                 return User.Color.RED.getColor();
            case 'green': 
                return User.Color.GREEN.getColor();
            case 'blue':
                return User.Color.BLUE.getColor();
            case 'cyan':
                return User.Color.CYAN.getColor();
            case 'grey': 
            case 'gray':
                return User.Color.GREY.getColor();
            default:
                return '#000';
        }
    },
    securityCheck : function (user, checks, prefix) {
        if (user.isBroadcaster()) return true;
        for (var i = 0 ; i < checks.length ; i++) {
            if (user.is(checks[i]) && system.settings.get(prefix + checks[i]).getValue()) {
                return true;
            }
        };
        return false;
    },
    getTimeDifference : function (time1) {
        var time2 = arguments.lenght > 1 ? arguments[1] : new Date();
        if (time2 < time1) {
            var t = time1;
            time1 = time2;
            time2 = t;
        }
        var d = (time2 - time1) / 1000;
        if (d < 60) {
            return Math.floor(d) + "s"
        }
        d /= 60;
        var m   = Math.floor(d % 60);
        var h   = Math.floor(d / 60);
        var str = '';
        if (h) str += h + 'h ';
        str += m + 'm'
        return str;
    }
}
utility.Interval = function (callback, interval) {
    var roundedInt  = Math.ceil(interval / 1000) * 1000;
    var active = false;
    var left = 0;
    
    var fun = function () {
        if (active) {
            var total = left + roundedInt;
            var runs = Math.floor(total / interval);
            left = total % interval;
            for (; runs ; runs--) {
                callback(this);
            }
            cb.setTimeout(fun, roundedInt);
        }
    }
    
    this.start = function () {
        if (!active) {
            left = 0;
            cb.setTimeout(fun, roundedInt);
        }
        active = true;
    }
    
    this.stop = function () {
        active = false;
    }
    
    this.isRunning = function () {
        return active;
    }
}
utility.Timeout = function (callback, interval) {
    interval  = Math.ceil(interval / 1000) * 1000;
    var active = false;
    
    var fun = function () {
        if (active) callback(this);
    }
    
    this.start = function () {
        if (!active) {
            cb.setTimeout(fun, interval);
        }
        active = true;
    }
    
    this.stop = function () {
        active = false;
    }
    
    this.isRunning = function () {
        return active;
    }
}

var Module = function (name, rawData) {
    var internalSettings = ('internalSettings' in rawData) ? rawData.internalSettings : [];
    var externalSettings = ('externalSettings' in rawData) ? rawData.externalSettings : [];
    var filters          = ('filters'          in rawData) ? rawData.filters          : [];
    var commands         = ('commands'         in rawData) ? rawData.commands         : {};
    var handlers         = {
        enter   : [],
        leave   : [],
        message : [],
        subject : [],
        tip     : [],
        setting : {}
    }
    if ('handlers' in rawData) {
        if ('enter'   in rawData.handlers) handlers.enter   = rawData.handlers.enter;
        if ('leave'   in rawData.handlers) handlers.leave   = rawData.handlers.leave;
        if ('message' in rawData.handlers) handlers.message = rawData.handlers.message;
        if ('subject' in rawData.handlers) handlers.subject = rawData.handlers.subject;
        if ('tip'     in rawData.handlers) handlers.tip     = rawData.handlers.tip;
        if ('setting' in rawData.handlers) handlers.setting = rawData.handlers.setting;
    }
    handlers.message.unshift(function (message) {
        var text = message.getMessage().trim();
        if (text[0] =='/') {
            message.setHidden(true);
            var params  = text.substring(1).split(/[ \t]/);
            var command = params.shift().toLowerCase();
            if (command in commands) {
                var consumedBy = message.getConsumedBy();
                if (consumedBy) {
                    var debug = _APPNAME + ' (module "' + name + '"): The command "/' + command
                              + '" is disabled because it is already provided by ';
                    if (consumedBy.name == _APPNAME && consumedBy.slot == cb.slot) {
                        if (String.isString(consumedBy.consumed))
                            debug += 'the module "' + consumedBy.consumed + '".';
                        else
                            debug += 'another module of this app.'
                    } else {
                        debug += 'the ';
                        if (consumedBy.slot == 0)
                            debug += 'app ';
                        else
                            debug += 'bot ';
                        debug += '"' + consumedBy.name + '" '
                        if (String.isString(consumedBy.consumed)) 
                            debug += '(module "' + consumedBy + ') ';
                        if (consumedBy.slot != 0)
                            debug += 'in slot ' + consumedBy.slot;
                        debug += '. '
                    }
                    system.debug(debug)
                    return;
                }
                var result = commands[command](params, command, message);
                if (result) {
                    system.debug(message.getUser().getName() + ' executed command "/' + command + '"');
                    message.consume();
                } else {
                    system.debug(message.getUser().getName() + ' tried to execute command "/' + command + '');
                    cb.sendNotice("Insufficient Privileges to execute " + message.getMessage() + ".",
                                  message.getUser().getName(),
                                  system.settings.get('security_bg').getValue(),
                                  system.settings.get('security_fg').getValue(),
                                  system.settings.get('security_w' ).getValue());
                }
            }
        }
    });
    handlers.message.unshift(function (message) {
        filters.forEach(function (filter) {
            var result = filter(message);
            if (result === true) {
                message.setHidden(false);
            }
            if (result === false) {
                message.setHidden(true);
            }
        });
    });
    
    
    this.handleMessage = function (message) {
        handlers.message.forEach(function (handler) {
            handler(message);
        });
    }
    
    this.handleLeave = function (user) {
        handlers.leave.forEach(function(handler) {
            handler(user);
        });
    }
    
    this.handleEnter = function (user) {
        handlers.enter.forEach(function(handler) {
            handler(user);
        });
    }
    
    this.handleTip = function (tip) {
        handlers.tip.forEach(function(handler) {
            handler(tip);
        });
    }
    
    this.handleSubject = function (newS, oldS) {
        var add = '';
        handlers.subject.forEach(function(handler){
            add += handler(newS, oldS);
        });
        return add;
    }
    
    this.getName = function () {
        return name;
    }
    this.init = function () {
        internalSettings.forEach(function (setting) {
            system.settings.registerOption(setting);
        });
        externalSettings.forEach(function (setting) {
            system.settings.registerOption(setting, true);
        });
        if ('init' in rawData) rawData.init();
    }
    this.getTipOptions = function (u) {
        if ('getTipOptions' in rawData) return rawData.getTipOptions(u);
        else return [];
    }
    this.update = function (setting) {
        if (Function.isFunction(handlers.setting)) {
            handlers.setting(setting);
        } else if (Function.isFunction(handlers.setting[setting.getName()])) {
            handlers.setting[setting.getName()](setting);
        }
    }
    !function (that) {
        var addThis = function (s) {
            s.addObserver(that)
        }
        internalSettings.forEach(addThis);
        externalSettings.forEach(addThis);
    }(this);
    
    
    Module[name] = this;
}

var Message = function (rawData) {
    
    if (!rawData['X-BBT-COMPAT']) rawData['X-BBT-COMPAT'] = {};
    rawData['X-BBT-COMPAT']['APP#SLOT#'+cb.slot] = {
        slot     : cb.slot,
        name     : _APPNAME,
        consumed : null
    }
    
    var user    = new User(rawData);
    var time    = new Date();
    
    this.getColor = function () {
        return rawData.c;
    }
    
    this.getBackground = function () {
        return  "background" in rawData ? rawData.background : '#ffffff';;
    }
    
    this.getFont = function () {
        return rawData.f;
    }
    
    this.getMessage = function () {
        return rawData.m;
    }
    
    this.isHidden = function () {
        return "X-Spam" in rawData ? rawData['X-Spam'] : false;
    }
    
    this.getUser = function () {
        return user;
    }
    
    this.setColor = function (c) {
        // TODO: check for valid HTML color
        rawData.c = c;
    }
    
    this.setBackground = function (c) {
        // TODO: check for valid HTML color
        rawData.background = c;
    }
    
    this.setFont = function (f) {
        // TODO: check for valid font
        rawData.f = f;
    }
    
    this.setMessage = function (m) {
        rawData.m = m;
    }
    
    this.setHidden = function (h) {
        rawData['X-Spam'] = !!h; // !! is quick'n'dirty booelan typecast
    }
    
    this.consume = function () {
        rawData['X-BBT-COMPAT']['APP#SLOT#'+cb.slot].consumed = (arguments.length > 0) ? arguments [0] : (true);
    }
    
    this.getConsumedBy = function () {
        for (var key in rawData['X-BBT-COMPAT']) {
            var compatData = rawData['X-BBT-COMPAT'][key];
            if (!compatData.consumed) continue;
            return compatData;
        }
        return null;
    }
    
    this.getRaw = function () {
        return rawData;
    }
    
    this.getTime = function () {
        return time;
    }
}

var Tip = function (rawData) {
    var amount  = rawData.amount;
    var message = rawData.message;
    var to      = rawData.to_user; // currently unused, we only see tips to the broadcaster anyway. I trust CB in this.
    var user    = new User({
                   user : rawData.from_user,
                 gender : rawData.from_user_gender,
             in_fanclub : rawData.from_user_in_fanclub,
                 is_mod : rawData.from_user_is_mod,
             has_tokens : rawData.from_has_tokens, 
        tipped_recently : rawData.from_user_tipped_recently
    });
    var time    = new Date();
    
    this.getAmount = function () {
        return amount;
    }
    
    this.getMessage = function () {
        return message;
    }
    
    this.getUser = function () {
        return user;
    }
    
    this.getTime = function () {
        return time;
    }
}

var User = function () {
    var tipsLast  = {}
    var tipsTotal = {}
    var tipsHigh  = {}
    var entered   = {}
    var left      = {}
    var chatLast  = {}
    var ht = {
        user   : null,
        amount : 0
    }
    
    new Module('_u', {
        handlers : {
            enter   : [
                function (u) {
                    entered[u.getName().toLowerCase()] = new Date();
                }
            ],
            leave   : [
                function (u) {
                    left[u.getName().toLowerCase()] = new Date();
                }
            ],
            message : [
                function (m) {
                    chatLast[m.getUser().getName().toLowerCase()] = m;
                }
            ],
            tip     : [
                function (t) {
                    var username = t.getUser().getName().toLowerCase();
                    tipsLast[username] = t;
                    if (!(username in tipsTotal)) {
                        tipsTotal[username] = 0;
                    }
                    tipsTotal[username] += t.getAmount();
                    if (!(username in tipsHigh) || tipsHigh[username].getAmount() < t.getAmount()) {
                        tipsHigh[username] = t;
                    }
                }
            ]
        }
    });
    
    return function (rawData) {
        var name    = rawData.user;
        var gender  = (function (g) {
            switch (g.toLowerCase()) {
                case 'm' : return User.Gender.MALE;
                case 'f' : return User.Gender.FEMALE;
                case 's' : return User.Gender.SHEMALE;
                case 'c' : return User.Gender.COUPLE;
                default:
                    system.log("Invalid gender code found");
                    return '';
            }
        })(rawData.gender);
        var fanclub = rawData.in_fanclub;
        var mod     = rawData.is_mod;
        var token   = rawData.has_tokens;
        var tipper  = rawData.tipped_recently;
        
        this.getName = function () {
            return name;
        }
        
        this.getGender = function () {
            return gender;
        }
        
        this.isFanclub = function () {
            return fanclub;
        }
        
        this.isMod = function () {
            return mod;
        }
        
        this.isBroadcaster = function () {
            return name == cb.room_slug;
        }
        
        this.hasTokens = function () {
            return token;
        }
        
        this.isHighTipper = function () {
            return tipper;
        }
        
        this.is = function (color) {
            if (!(color instanceof User.Color)) color = User.Color.fromName(color);
            switch (color) {
                case User.Color.ORANGE:
                    return this.isBroadcaster();
                case User.Color.RED:
                    return this.isMod();
                case User.Color.GREEN:
                    return this.isFanclub();
                case User.Color.CYAN:
                    return this.hasTokens();
                case User.Color.BLUE:
                    return this.isHighTipper();
                case User.Color.GREY:
                    return true;
                default:
                    return false;
            }
        }
        
        this.isOnly = function (color) {
            if (!(color instanceof User.Color)) color = User.Color.fromName(color);
            switch (color) {
                case User.Color.ORANGE:
                    return this.isBroadcaster(); // no additional checks. Doesn't make any sense to check if a broadcaster
                                                 // has tokens or is a mod, fanclub member or high tipper.
                case User.Color.RED:
                    return  this.isMod()
                        && !this.isBroadcaster()
                        && !this.isFanclub()
                        && !this.hasToken()
                        && !this.isHighTipper();
                case User.Color.GREEN:
                    return  this.isFanclub()
                        && !this.isBroadcaster()
                        && !this.isMod()
                        && !this.hasToken()
                        && !this.isHighTipper();
                case User.Color.CYAN:
                    return  this.hasTokens()
                        && !this.isBroadcaster()
                        && !this.isMod()
                        && !this.isFanclub()
                        && !this.isHighTipper();
                case User.Color.BLUE:
                    return  this.isHighTipper()
                        && !this.isBroadcaster()
                        && !this.isMod()
                        && !this.isFanclub()
                        && !this.hasTokens();
                case User.Color.GREY:
                    return !this.hasTokens()
                        && !this.isHighTipper()
                        && !this.isBroadcaster()
                        && !this.isMod()
                        && !this.isFanclub()
                default:
                    return false;
            }
        }
        
        this.getColor = function () {
            if (this.is(User.Color.ORANGE)) return User.Color.ORANGE;
            if (this.is(User.Color.RED   )) return User.Color.RED;
            if (this.is(User.Color.GREEN )) return User.Color.GREEN;
            if (this.is(User.Color.BLUE  )) return User.Color.BLUE;
            if (this.is(User.Color.CYAN  )) return User.Color.CYAN;
            return User.Color.GREY;
        }
    
        this.getEnter = function () {
            var name = this.getName().toLowerCase();
            if (name in entered) return entered[name];
            return null;
        }
        
        this.getLeave = function () {
            var name = this.getName().toLowerCase();
            if (name in left) return left[name];
            return null;
        }
        
        this.getLastChat = function () {
            var name = this.getName().toLowerCase();
            if (name in chatLast) return chatLast[name];
            return null;
        }
        
        this.getLastTip = function () {
            var name = this.getName().toLowerCase();
            if (name in tipsLast) return tipsLast[name];
            return null;
        }
        
        this.getHighestTip = function () {
            var name = this.getName().toLowerCase();
            if (name in tipsHigh) return tipsHigh[name];
            return null;
        }
        
        this.getTipTotal = function () {
            var name = this.getName().toLowerCase();
            if (name in tipsTotal) return tipsTotal[name];
            return 0;
        }
        
        this.getLastSeen = function () {
            var lastSeen = null;
            if (this.getEnter() > lastSeen) lastSeen = this.getEnter();
            if (this.getLeave() > lastSeen) lastSeen = this.getLeave();
            if (this.getLastChat() && this.getLastChat().getTime() > lastSeen) lastSeen = this.getLastChat().getTime();
            if (this.getLastTip()  && this.getLastTip().getTime() > lastSeen ) lastSeen = this.getLastTip().getTime();
            return lastSeen;
        }
        
        this.isTipper = function () {
            return this.getLastTip() != null;
        }
        
        User.Archive.add(this);
    }
}();
User.Archive = new function () {
    var archive = {}
    this.add = function (user) {
        if (user instanceof User) archive[user.getName().toLowerCase()] = user;
    }
    this.get = function (name) {
        if (name instanceof User) name = name.getName();
        name = name.toLowerCase();
        if (name in archive) return archive[name];
        else return null;
    }
    this.getAll = function () {
        return archive.slice(0); // shallow copy instead of reference to prevent archive manipulation
    }
}
User.Gender = function (name, code, personal, possessive) {
    this.getCode = function () {
        return code;
    }
    this.getName = function () {
        return name;
    }
    this.getPersonalPronoun = function ()  {
        return personal;
    }
    this.getPossessivePronoun = function () {
        return possessive;
    }
}
User.Gender.MALE    = new User.Gender('male'       , 'm', 'he'   , 'his'    );
User.Gender.FEMALE  = new User.Gender('female'     , 'f', 'she'  , 'her'    );
User.Gender.SHEMALE = new User.Gender('transsexual', 's', '(s)he', 'his/her');
User.Gender.COUPLE  = new User.Gender('a couple'   , 'c', 'they' , 'their'  );
User.Gender.INVALID = new User.Gender('unknown'    , '' , 'he'   , 'his'    );
User.Gender.fromName =  function (name) {
    switch (name.split(/[\s_]/)[0].trim().toLowerCase()) {
        case 'm'           :
        case 'male'        :
            return User.Gender.MALE;
        case 'f'           :
        case 'female'      :
            return User.Gender.FEMALE;
        case 's'           :
        case 'shemale'     :
        case 'trans'       :
        case 'transsexual' :
            return User.Gender.SHEMALE;
        case 'a'           :
        case 'c'           :
        case 'couple'      :
            return User.Gender.COUPLE;
        default            :
            return User.Gender.INVALID;
    }
}
User.Color = function (name,code,color) {
    this.getName  = function() {return name };
    this.getCode  = function() {return code };
    this.getColor = function() {return color};
}
User.Color.ORANGE  = new User.Color('broadcaster'   , 'orange', '#DC5500');
User.Color.RED     = new User.Color('moderator'     , 'red'   , '#DC0000');
User.Color.GREEN   = new User.Color('fanclub member', 'green' , '#090'   );
User.Color.BLUE    = new User.Color('high tipper'   , 'blue'  , '#009'   );
User.Color.CYAN    = new User.Color('token owner'   , 'cyan'  , '#69A'   );
User.Color.GREY    = new User.Color('basic user'    , 'grey'  , '#494949');
User.Color.INVALID = new User.Color('unknown'       , ''      , '#000'   );
User.Color.fromName = function (name) {
    switch (name.split(/[\s_]/)[0].trim().toLowerCase()) {
        case 'broadcasters':
        case 'broadcaster' :
        case 'oranges'     :
        case 'orange'      :
            return User.Color.ORANGE;
        case 'moderators'  :
        case 'moderator'   :
        case 'mods'        :
        case 'mod'         :
        case 'reds'        :
        case 'red'         :
            return User.Color.RED;
        case 'members'     :
        case 'member'      :
        case 'fanclub'     :
        case 'greens'      :
        case 'green'       :
            return User.Color.GREEN;
        case 'high'        :
        case 'tippers'     :
        case 'tipper'      :
        case 'darkblues'   :
        case 'darkblue'    :
        case 'bluess'      :
        case 'blues'       :
        case 'blue'        :
            return User.Color.BLUE;
        case 'tokens'      :
        case 'token'       :
        case 'lightblues'  :
        case 'lightblue'   :
        case 'cyans'       :
        case 'cyan'        :
            return User.Color.CYAN;
        case 'tokenless'   :
        case 'user'        :
        case 'greys'       :
        case 'grays'       :
        case 'grey'        :
        case 'gray'        :
        case 'all'         :
            return User.Color.GREY;
        default            :
            return User.Color.INVALID;
    }
}

var Setting = function (name, def) {
    var val = (name in cb.settings) ? cb.settings[name] : (arguments.length > 2) ? arguments [2] : def;
    var observers = [];
    
    this.getValue = function () {
        return val;
    }
    this.getName = function () {
        return name;
    }
    this.getDefault = function () {
        return def;
    }
    this.setValue = function (v) {
        val = v;
        this.notify();
        return true;
    }
    this.getCBObject = function () {
        return {};
    }
    this.addObserver = function (o) {
        if ('update' in o && observers.indexOf(o) == -1) {
            observers.push(o);
        }
    }
    this.removeObserver = function (o) {
        var index = observers.indexOf(o);
        if (index != -1) observers.splice(index, 1);
    }
    this.notify = function () {
        var that = this;
        observers.forEach(function (o) {
            o.update(that);
        });
    }
};
Setting.String = function (name) { // optional params: label, default, required, min, max
    var label = name;
    var def   = '';
    var req   = true;
    var min   = 0;
    var max   = 255;
    var val   = def;
    if (arguments.length > 1) label = arguments[1];
    if (arguments.length > 2) def   = arguments[2];
    if (arguments.length > 3) req   = arguments[3];
    if (arguments.length > 4) min   = arguments[4];
    if (arguments.length > 5) max   = arguments[5];
    Setting.call(this, name, def);
    
    this.setValue = function (v) {
        v = v.toString();
        if (v.length > max || v.length < min) {
            return false;
        } else {
            val = v;
            this.notify();
            return true;
        }
    }
    
    this.getValue = function () {
        return val;
    }
    
    this.getCBObject = function () {
        return {
            name         : name,
            type         : 'str',
            label        : label,
            required     : req,
            defaultValue : def,
            minLength    : min,
            maxLength    : max
        }
    }
    if (name in cb.settings) this.setValue(cb.settings[name]);
}
Setting.Float = function (name) { // optional params: label, default, required, min, max
    var label = name;
    var def   = 0;
    var req   = true;
    var min   = 0;
    var max   = 255;
    var val   = def;
    if (arguments.length > 1) label = arguments[1];
    if (arguments.length > 2) def   = arguments[2];
    if (arguments.length > 3) req   = arguments[3];
    if (arguments.length > 4) min   = arguments[4];
    if (arguments.length > 5) max   = arguments[5];
    Setting.call(this, name, def);
    
    this.setValue = function (v) {
        v = parseFloat(v.toString().replace(',', '.'));
        if (isNaN(v) || v > max || v < min) {
            return false;
        } else {
            val = v;
            this.notify();
            return true;
        }
    }
    
    this.getValue = function () {
        return val;
    }
    
    this.getCBObject = function () {
        return {
            name         : name,
            type         : 'str',
            label        : label,
            required     : req,
            defaultValue : def,
            minLength    : 1
        }
    }
    if (name in cb.settings) { // CB does not checks for floats, not implemented. so invalid values at load time are possible.
        var returnValue = this.setValue(cb.settings[name]);
        if (!returnValue) {
            cb.sendNotice('Invalid value for ' + (label != name ? '"' + label + '" (' + name + ')' : name) + ' found. '
                        + 'Please use "/set ' + name + ' VALUE" to set a new value (replace "VALUE" by the new value). '
                        + 'Valid values are any decimal nubmer between ' + min + ' and ' + max + '.',
                        cb.room_slug, '#e99', '#300');
        }
    }
}
Setting.Int = function (name) { // optional params: label, default, required, min, max
    var label = name;
    var def   = 0;
    var req   = true;
    var min   = 0;
    var max   = 999;
    var val   = def;
    if (arguments.length > 1) label = arguments[1];
    if (arguments.length > 2) def   = arguments[2];
    if (arguments.length > 3) req   = arguments[3];
    if (arguments.length > 4) min   = arguments[4];
    if (arguments.length > 5) max   = arguments[5];
    Setting.call(this, name, def);
    
    this.setValue = function (v) {
        v = parseInt(v);
        if(isNaN(v) || v > max || v < min) {
            return false;
        } else {
            val = v;
            this.notify();
            return true;
        }
    }
    
    this.getValue = function () {
        return val;
    }
    
    this.getCBObject = function () {
        return {
            name         : name,
            type         : 'int',
            label        : label,
            required     : req,
            defaultValue : def,
            minValue     : min,
            maxValue     : max
        }
    }
    if (name in cb.settings) this.setValue(cb.settings[name]);
}
Setting.Choice = function (name, options) { // optional params: label, default, required
    var label = name;
    var def   = options[0];
    var req   = true;
    var opt   = options
    if (arguments.length > 2) label = arguments[2];
    if (arguments.length > 3) def   = arguments[3];
    if (arguments.length > 4) req   = arguments[4];
    var val   = def;
    Setting.call(this, name, def);
    
    this.addOption = function (o) {
        if (opt.indexOf(o) == -1) opt.push(o);
    }
    
    this.removeOption = function (o) {
        var index = opt.indexOf(o);
        if (index != -1) opt.splice(index,1);
    }
    
    this.setValue = function (v) {
        if (opt.indexOf(v) == -1) return false;
        val = v;
        this.notify();
        return true;
    }
    
    this.getValue = function () {
        return val;
    }
    
    this.addOption(def);
    
    this.getCBObject = function () {
        var o = {
            name         : name,
            type         : 'choice',
            label        : label,
            required     : req,
            defaultValue : def
        }
        for (var i = 0 ; i < opt.length ; i++) {
            o['choice'+(i+1)] = opt[i];
        }
        return o;
    }
    if (name in cb.settings) this.setValue(cb.settings[name]);
}
Setting.Bool = function (name) { // optional params: label, default, required
    var label = name;
    var def   = false;
    var req   = true;
    if (arguments.length > 1) label = arguments[1];
    if (arguments.length > 2) def   = arguments[2];
    if (arguments.length > 3) req   = arguments[3];
    var val   = def;
    Setting.call(this, name, def);
    this.setValue = function (v) {
        val = ['false', '0', 'off', 'no', 'n', 'f', 0, false].indexOf(v) == -1
        this.notify();
        return true;
    }
    
    this.getValue = function () {
        return val;
    }
    
    this.getCBObject = function () {
        return o = {
            name         : name,
            type         : 'choice',
            label        : label,
            required     : req,
            defaultValue : def ? 'yes' : 'no',
            choice1      : 'yes',
            choice2      : 'no'
        };
    }
    if (name in cb.settings) this.setValue(cb.settings[name]);
}

var system = new function () {
    var modules = {};
    var topic   = '';
    
    this.isApp = function () {
        return cb.slot == 0;
    }
    
    this.setSubject = function () {
        if (!this.isApp()) {
            this.debug('Running as a bot. setSubject is not available.');
            return;
        }
        var oldTopic = topic;
        var t = topic = (arguments.length > 0) ? arguments[0] : topic;
        for (var moduleName in modules) {
            var add = modules[moduleName].handleSubject(topic, oldTopic);
            if (add) t+= ' ' + add;
        }
        cb.changeRoomSubject(t);
        this.log('Subject changed to "' + t + '" (was "' + oldTopic + '")');
    }
    
    this.getSubject = function () {
        if (!this.isApp()) {
            this.debug('Running as a bot. getSubject is not available.');
            return '';
        }
        return topic;
    }
    
    this.loadModule = function (module) {
        if (!(module instanceof Module)) {
            if (module in Module)
                module = Module[module];
            else return false;
        }
        modules[module.getName()] = module;
        module.init();
        return true;
    }
    
    this.unloadModule = function (module) {
        if (module instanceof Module) {
            module = Module.getName();
        }
        if (module == null || !(module in modules)) {
            return false;
        }
        delete modules[module];
        return true;
    }

    //NOTE: messages parsed by parseMessage are not visible in chat or passed to other bots.
    this.parseMessage = function (message) { // optional: user, color, background, font. 
        if (message instanceof Message){
            message = message.getRaw();
        } else if (message instanceof Object && !(message instanceof String)) {
            // most likely raw CB message, just pass along.
        } else {
            message = {
                m : message.toString(),
                c : arguments.length > 2 ? arguments[2] : User.Color.GREY.getColor(),
                f : arguments.length > 4 ? arguments[4] : 'default',
            };
            if (arguments.length > 3) m.background = arguments[3];
            var user = arguments.length > 1 
                       ? (arguments[1] instanceof User 
                          ? arguments[1] 
                          : User.Archive.get(arguments[1])
                         )
                       : null;
            if (user) {
                message.user            = user.getName();
                message.gender          = user.getGender().getCode();
                message.in_fanclub      = user.isFanclub();
                message.has_tokens      = user.hasTokens();
                message.is_mod          = user.isMod();
                message.tipped_recently = user.isHighTipper();
            } else {
                message.user            = arguments.length > 1 ? arguments[1] : cb.rooms_slug;
                message.gender          = '';
                message.in_fanclub      = false;
                message.has_tokens      = false;
                message.is_mod          = false;
                message.tipped_recently = false;
            }
        }
        cb._translate_handler(message);
    }
    
    this.log = function (message) {
        cb.log (_APPNAME + ': ' + message);
    }
    
    this.debug = function (message) {
        if (system.settings.get('debug_mode').getValue()) this.log(message);
    }
    
    this.init = function () {
        cb.onEnter(function (u) {
            var user = new User(u);
            for (var moduleName in modules) {
                modules[moduleName].handleEnter(user);
            }
        });
        
        cb.onLeave(function (u) {
            var user = new User(u);
            for (var moduleName in modules) {
                modules[moduleName].handleLeave(user);
            }
        });
        
        cb.onMessage(function (m) {
            var message = new Message(m);
            for (var moduleName in modules) {
                modules[moduleName].handleMessage(message);
            }
            return m;
        });
        
        cb.onTip(function (t) {
            var tip = new Tip(t);
            for (var moduleName in modules) {
                modules[moduleName].handleTip(tip);
            }
        });
        
        cb.tipOptions(function (u) {
            var options      = {};
            var moduleCount  = 0;
            for (var moduleName in modules) {
                options[moduleName] = modules[moduleName].getTipOptions(u);
                if (options[moduleName].length > 0) moduleCount++;
            }
            if (moduleCount == 0) return;
            var outputObject = {label : 'Select', options : []};
            for (var moduleName in options) {
                options[moduleName].forEach(function (option) {
                    outputObject.options.push({label: (moduleCount > 1 ? '[' + moduleName + ']: ' : '') + option});
                });
            }
            return outputObject;
        });
        
        if (this.isApp()) {
            cb.onDrawPanel(this.panel.draw);
        }
        
        this.loadModule(new Module('_s', {
            internalSettings : [
                new Setting('security_bg', '#800'),
                new Setting('security_fg', '#fff'),
                new Setting.Choice('security_w', ['bold', 'bolder', 'normal']),
                
                new Setting('success_bg', '#9e9'),
                new Setting('success_fg', '#030'),
                new Setting.Choice('success_w', ['normal', 'bolder', 'bold']),

                new Setting('warning_bg', '#fc3'),
                new Setting('warning_fg', '#630'),
                new Setting.Choice('warning_w', ['normal', 'bolder', 'bold']),

                new Setting('failure_bg', '#e99'),
                new Setting('failure_fg', '#300'),
                new Setting.Choice('failure_w', ['normal', 'bolder', 'bold'])
            ]
        }));
        this.loadModule('_u');
        if (this.isApp()) {
            this.loadModule(new Module('_app', {
                externalSettings : [
                    new Setting.String("subject", "Room Subject",  cb.room_slug + "'s Room", true),
                    new Setting.Bool("security_topic_mod", "Mods can change room subject", false, false)
                ],
                commands         : {
                    topic : function (p,c,m){
                                if (!(m.getUser().isBroadcaster())
                                 && !(m.getUser().isMod() && system.settings.get('security_topic_mod').getValue())) {
                                    return false;
                                }
                                system.setSubject(p.join(' '));
                                return true;
                            }
                }
            }));
            this.setSubject(this.settings.get('subject').getValue());
        }
    }
}();
system.settings = new function () {
    var s = {};
    this.registerOption = function (option) { // optinal parameters: registerToCB (default false))
        var name = option.getName();
        s[name] = option;
        if (arguments.length > 1 && arguments[1]) {
            if (!Array.isArray(cb.settings_choices)) cb.settings_choices = [];
            var found = false;
            for (var i = 0 ; i < cb.settings_choices.length ; i++) {
                if (cb.settings_choices[i].name == name) {
                    found=true;
                    break;
                }
            };
            if (!found) cb.settings_choices.push(option.getCBObject());
        }
    }
    this.get = function (name) {
        if (!(name in s)) {
            s[name] = new Setting(name, '');
        }
        return s[name];
    }
}();
system.panel = new function () {
    var PanelContent = function () {
        var label  = "";
        var value = "";
        var type   = 1;
        var setLabel = function (l) {
            if (l == null) {
                type  = 1;
                label = '';
            } else {
                type  = 2;
                label = l;
            }
        }
        var setValue = function (v) {
            if (v == null) v = '';
            value = v
        }
        this.getType = function () {
            if (!system.isApp()) {
                system.debug('Running as a bot. App panel is not available.');
                return;
            }
            return type;
        }
        this.getLabel = function () {
            if (!system.isApp()) {
                system.debug('Running as a bot. App panel is not available.');
                return;
            }
            return label;
        }
        this.getValue = function () {
            if (!system.isApp()) {
                system.debug('Running as a bot. App panel is not available.');
                return;
            }
            return value;
        }
        this.setLabel = function (l) {
            if (!system.isApp()) {
                system.debug('Running as a bot. App panel is not available.');
                return;
            }
            setLabel(l);
            if (arguments.length > 1 ? arguments[1] : true) system.panel.repaint();
        }
        this.clearLabel = function () {
            if (!system.isApp()) {
                system.debug('Running as a bot. App panel is not available.');
                return;
            }
            this.setLabel(null, arguments.length > 0 ? arguments[0] : true);
        }
        this.setValue = function (v) {
            if (!system.isApp()) {
                system.debug('Running as a bot. App panel is not available.');
                return;
            }
            setValue(v);
            if (arguments.length > 1 ? arguments[1] : true) system.panel.repaint();
        }
        this.setData = function (data) {
            if (!system.isApp()) {
                system.debug('Running as a bot. App panel is not available.');
                return;
            }
            if (Array.isArray(data)) {
                switch (data.length) {
                    case 0:
                        setValue("");
                        setLabel(null);
                        break;
                    case 1:
                        setValue(data[0]);
                        setLabel(null);
                        break;
                    default:
                        setValue(data[1]);
                        setLabel(data[0]);
                        break;
                }
            } else {
                setValue(data);
                setLabel(null);
            }
            if (arguments.length > 1 ? arguments[1] : true) system.panel.repaint();
            return;
        }
    }
    this[0] = new PanelContent();
    this[1] = new PanelContent();
    this[2] = new PanelContent();
    this.draw = (function (that) { // CB assigns the cb object to this when calling callbacks. So we need a copy.
        return function () {
            var panelConfig = 0;
            for (var i = 0 ; i < 3 ; i++) {
                panelConfig += (that[i].getType() == 2 ? 1 : 0) << i;
            }
            switch (panelConfig) {
                case 0:
                    system.log("Re-Drawing Panel. Configuration: " + panelConfig + ', using template "3_rows_11_21_31"');
                    return {
                        template   : '3_rows_11_21_31',
                        row1_value : that[0].getValue(),
                        row2_value : that[1].getValue(),
                        row3_value : that[2].getValue()
                    }
                case 1:
                    system.log("Re-Drawing Panel. Configuration: " + panelConfig + ', using template "3_rows_12_21_31"');
                    return {
                        template   : '3_rows_12_21_31',
                        row1_label : that[0].getLabel(),
                        row1_value : that[0].getValue(),
                        row2_value : that[1].getValue(),
                        row3_value : that[2].getValue()
                    }
                case 2:
                    system.log("Re-Drawing Panel. Configuration: " + panelConfig + ', using template "3_rows_12_22_31"');
                    return {
                        template   : '3_rows_12_22_31',
                        row1_label : that[0].getValue(),
                        row1_value : '',
                        row2_label : that[1].getLabel(),
                        row2_value : that[1].getValue(),
                        row3_value : that[2].getValue()
                    }
                case 3:
                    system.log("Re-Drawing Panel. Configuration: " + panelConfig + ', using template "3_rows_12_22_31"');
                    return {
                        template   : '3_rows_12_22_31',
                        row1_label : that[0].getLabel(),
                        row1_value : that[0].getValue(),
                        row2_label : that[1].getLabel(),
                        row2_value : that[1].getValue(),
                        row3_value : that[2].getValue()
                    }
                case 4:
                    system.log("Re-Drawing Panel. Configuration: " + panelConfig + ', using template "3_rows_of_labels"');
                    return {
                        template   : '3_rows_of_labels',
                        row1_label : that[0].getValue(),
                        row1_value : '',
                        row2_label : that[1].getValue(),
                        row2_value : '',
                        row3_label : that[2].getLabel(),
                        row3_value : that[2].getValue()
                    }
                case 5:
                    system.log("Re-Drawing Panel. Configuration: " + panelConfig + ', using template "3_rows_of_labels"');
                    return {
                        template   : '3_rows_of_labels',
                        row1_label : that[0].getLabel(),
                        row1_value : that[0].getValue(),
                        row2_label : that[1].getValue(),
                        row2_value : '',
                        row3_label : that[2].getLabel(),
                        row3_value : that[2].getValue()
                    }
                case 6:
                    system.log("Re-Drawing Panel. Configuration: " + panelConfig + ', using template "3_rows_of_labels"');
                    return {
                        template   : '3_rows_of_labels',
                        row1_label : that[0].getValue(),
                        row1_value : '',
                        row2_label : that[1].getLabel(),
                        row2_value : that[1].getValue(),
                        row3_label : that[2].getLabel(),
                        row3_value : that[2].getValue()
                    }
                case 7:
                    system.log("Re-Drawing Panel. Configuration: " + panelConfig + ', using template "3_rows_of_labels"');
                    return {
                        template   : '3_rows_of_labels',
                        row1_label : that[0].getLabel(),
                        row1_value : that[0].getValue(),
                        row2_label : that[1].getLabel(),
                        row2_value : that[1].getValue(),
                        row3_label : that[2].getLabel(),
                        row3_value : that[2].getValue()
                    }
            }
        };
    })(this);
    this.repaint = function () {
        system.log('Panel refresh called');
        cb.drawPanel();
    }
}();


new Module ('control', {
    externalSettings : [
        new Setting.Bool("security_eval_mod", "Mods have full control over the app", false, false)
    ],
    commands         : {
        set  : function(p,c,m) {
            if (!utility.securityCheck(m.getUser(), ['mod'], 'security_eval_')) {
                return false;
            }
            var name  = p.shift();
            var value = p.join(' ');
            var returnVal = system.settings.get(name).setValue(value);
            if (returnVal) {
                cb.sendNotice('Variable "' + name +  '" has been set to "' + value + '".',
                            m.getUser().getName(),
                            system.settings.get ('success_bg').getValue(),
                            system.settings.get ('success_fg').getValue(),
                            system.settings.get ('success_w').getValue());
            } else {
                cb.sendNotice(value + ' is not a valid value for ' + name + '.',
                            m.getUser().getName(),
                            system.settings.get ('failure_bg').getValue(),
                            system.settings.get ('failure_fg').getValue(),
                            system.settings.get ('failure_w').getValue());
            }
            return true;
        },
        get  : function (p,c,m) {
            if (!utility.securityCheck(m.getUser(), ['mod'], 'security_eval_')) {
                return false;
            }
            var name  = p.shift();
            var value = system.settings.get(name).getValue();
            cb.sendNotice('Variable "' + name +  '" is "' + value + '".', m.getUser().getName());
            return true;
        },
        load : function (p,c,m) {
            if (!utility.securityCheck(m.getUser(), ['mod'], 'security_eval_')) {
                return false;
            }
            var module = p.shift();
            if(system.loadModule(module)) {
                cb.sendNotice('Module "' + module +  '" successfully loaded.',
                            m.getUser().getName(),
                            system.settings.get ('success_bg').getValue(),
                            system.settings.get ('success_fg').getValue(),
                            system.settings.get ('success_w').getValue());
            } else {
                cb.sendNotice('Module "' + module +  '" not found.',
                            m.getUser().getName(),
                            system.settings.get ('failure_bg').getValue(),
                            system.settings.get ('failure_fg').getValue(),
                            system.settings.get ('failure_w').getValue());
            }
            return true;
        },
        unload : function (p,c,m) {
            if (!utility.securityCheck(m.getUser(), ['mod'], 'security_eval_')) {
                return false;
            }
            var module = p.shift();
            if(system.unloadModule(module)) {
                cb.sendNotice('Module "' + module +  '" successfully unloaded.',
                            m.getUser().getName(),
                            system.settings.get ('success_bg').getValue(),
                            system.settings.get ('success_fg').getValue(),
                            system.settings.get ('success_w').getValue());
            } else {
                cb.sendNotice('Module "' + module +  '" was not loaded.',
                            m.getUser().getName(),
                            system.settings.get ('failure_bg').getValue(),
                            system.settings.get ('failure_fg').getValue(),
                            system.settings.get ('failure_w').getValue());
            }
            return true;
        }
    }
});

new Module('notice', {
    internalSettings : [        
        new Setting('notice_bg', '#fe3'),
        new Setting('notice_fg', '#336'),
        new Setting.Choice('notice_w', ['normal', 'bolder', 'bold'])
    ],
    externalSettings : [
        new Setting.Bool("security_notice_mod", "Mods can send notices", true, false)
    ],
    commands         : {
        notice : function(p,c,m) {
            if (!(m.getUser().isBroadcaster())
             && !(m.getUser().isMod() && system.settings.get('security_notice_mod').getValue())) {
                return false;
            }
            var color      = system.settings.get ('notice_fg').getValue();
            var background = system.settings.get ('notice_bg').getValue();
            var weight     = system.settings.get ('notice_w') .getValue();
            var group      = User.Color.INVALID;
            while (p.length > 0 && '~+'.indexOf(p[0][0]) > -1) {
                var param = p.shift();
                var value = param.substring(1);
                switch (param[0]) {
                    case '~':
                        var g = User.Color.fromName(value);
                        switch (g) {
                            case User.Color.INVALID:
                            case User.Color.ORANGE:
                                cb.sendNotice('"' + value +  " is not a valid target group for notices.",
                                            m.getUser().getName(),
                                            system.settings.get ('failure_bg').getValue(),
                                            system.settings.get ('failure_fg').getValue(),
                                            system.settings.get ('failure_w').getValue());
                                return true;
                            case User.Color.GREY:
                                group = User.Color.INVALID;
                                break;
                            default:
                                group = g;
                                break;
                        }
                        break;
                    case '+':
                        value = value.substring(1);
                        switch (param[1]) {
                            case 'c':
                                color = (value[0] == '#') ? value : utility.getPredefinedColor(value);
                                break;
                            case 'b':
                                background = (value[0] == '#') ? value : utility.getPredefinedColor(value);
                                break;
                            case 'w':
                                weight = value;
                                break;
                            default:
                                system.debug('"' + param[1] + '" is not a valid parameter for notices. Ignored.');
                        }
                        break;
                }
            }
            cb.sendNotice("Notice to all " + (group != User.Color.INVALID ? group.getName() : 'user') +  "s sent.",
                          m.getUser().getName(),
                          system.settings.get ('success_bg').getValue(),
                          system.settings.get ('success_fg').getValue(),
                          system.settings.get ('success_w') .getValue());
            cb.sendNotice(p.join(' '), '', background, color, weight,
                          (group.getCode() ? group.getCode() : null));
            return true;
        }
    }
});

new Module('eval', {
    externalSettings : [
        new Setting.Bool("security_eval_mod", "Mods have full control over the app", false, false)
    ],
    commands         : {
        eval : function(p,c,m) {
            if (!utility.securityCheck(m.getUser(), ['mod'], 'security_eval_')) {
                return false;
            }
            eval(p.join(' '));
            return true;
        }
    }
});

new Module('whisper', new function () {
    var ignored = {}
    var lastIn  = {}
    this.internalSettings = [
        new Setting('whisper_bg', '#eee'),
        new Setting('whisper_fg', '#006'),
        new Setting.Choice('whisper_w', ['normal', 'bolder', 'bold']),
        
        new Setting.Bool("security_broadcast_green", "Fanclub members can broadcast messages to groups", false),
        new Setting.Bool("security_broadcast_blue", "High tippers can broadcast messages to groups", false),
        new Setting.Bool("security_broadcast_cyan", "Users with tokens can broadcast messages to groups", false),
        new Setting.Bool("security_broadcast_grey", "Grey users can broadcast messages to groups", false)
    ];
    this.externalSettings = [
        new Setting.Bool("security_whisper_mod", "Mods can whisper", true, false),
        new Setting.Bool("security_whisper_green", "Fanclub members can whisper", true, false),
        new Setting.Bool("security_whisper_blue", "High tippers can whisper", true, false),
        new Setting.Bool("security_whisper_cyan", "Users with tokens can whisper", true, false),
        new Setting.Bool("security_whisper_grey", "Grey users can whisper", false, false),
        new Setting.Bool("security_broadcast_mod", "Mods can broadcast messages to groups", true, false)
    ];
    this.commands = new function () {
       this. whisper = function(p,c,m) {
            var toUser;
            var toGroup;
            var toName;
            if (p.length < 1) {
                cb.sendNotice("No username specified.",
                              m.getUser().getName(),
                              system.settings.get('failure_bg').getValue(),
                              system.settings.get('failure_fg').getValue(),
                              system.settings.get('failure_w').getValue());
                return true;
            }
            if (p[0][0] == '~') {
                if (!utility.securityCheck(m.getUser(), ['mod','green','blue','cyan','grey'], 'security_broadcast_')) {
                    return false;
                }
                var group = User.Color.fromName(p.shift().substring(1).toLowerCase());
                toName  = 'all ' +group.getName() + 's';
                toGroup =  group.getCode();
                toUser  = '';
                switch (group) {
                    case User.Color.INVALID:
                        cb.sendNotice('"' + to +  " is not a valid target group for whispers.",
                                      m.getUser().getName(),
                                      system.settings.get('failure_bg').getValue(),
                                      system.settings.get('failure_fg').getValue(),
                                      system.settings.get('failure_w').getValue());
                        return true;
                    case User.Color.GREY:
                        toGroup = '';
                        break;
                    case User.Color.ORANGE:
                        toGroup = '';
                        toUser  = cb.room_slug;
                        break;
                }
            } else {
                if (c != 'r' && c != 'reply' && !utility.securityCheck(m.getUser(), ['mod','green','blue','cyan','grey'], 'security_whisper_')) {
                    return false;
                }
                toUser  = p.shift().toLowerCase().trim();
                toName  = toUser;
                toGroup = '';
                var fromUser = m.getUser().getName().toLowerCase().trim();
                if (toUser in ignored && ignored[toUser].indexOf(fromUser) > -1) {
                    cb.sendNotice('"' + toUser + '" is ignoring your whsipers.',
                                  fromUser,
                                  system.settings.get('failure_bg').getValue(),
                                  system.settings.get('failure_fg').getValue(),
                                  system.settings.get('failure_w').getValue());
                    return true;
                }
            }
            if (!toUser || User.Archive.get(toUser) || toUser == cb.room_slug) {
                cb.sendNotice("Whisper to " + toName +  " sent.",
                              m.getUser().getName(),
                              system.settings.get('success_bg').getValue(),
                              system.settings.get('success_fg').getValue(),
                              system.settings.get('success_w').getValue());
            } else {
                cb.sendNotice("Whisper to " + toName +  " sent, but the user has not been seen in this room yet. "
                            + "Did you spell the name correctly?",
                              m.getUser().getName(),
                              system.settings.get('warning_bg').getValue(),
                              system.settings.get('warning_fg').getValue(),
                              system.settings.get('warning_w').getValue());
            }
            if (toUser) {
                lastIn[toUser] = {
                    user : m.getUser().getName().toLowerCase().trim(),
                    time : new Date()
                }
            } else {
                lastIn['~'+toGroup] = {
                    user : m.getUser().getName().toLowerCase().trim(),
                    time : new Date()
                }
            }
            var header = "[Whisper from " + m.getUser().getName();
            if (toGroup) header += " to " + toName;
            header += "]: ";
            cb.sendNotice(header + p.join(' '),
                          toUser, 
                          system.settings.get('whisper_bg').getValue(), 
                          system.settings.get('whisper_fg').getValue(),
                          system.settings.get('whisper_w').getValue(),
                          toGroup);
            return true;
        }
        this.reply = function (p,c,m) {
            var user = m.getUser();
            var last = lastIn[user.getName().toLowerCase().trim()];
            for (color in User.Color) {
                var color = User.Color[color];
                if (!(color instanceof User.Color)) continue;
                if (user.is(color)) {
                    var groupLast = lastIn['~' + color.getCode()];
                    if (groupLast && (!last || last.time < groupLast.time)) last = groupLast;
                }
            }
            if (!last) {
                cb.sendNotice('You did not receive any whisper yet, so you can not reply.',
                              m.getUser().getName(),
                              system.settings.get('failure_bg').getValue(),
                              system.settings.get('failure_fg').getValue(),
                              system.settings.get('failure_w').getValue());
                return true;
            }
            p.unshift(last.user);
            return this.whisper(p,c,m);
        }
        this.ignore = function (p,c,m) {
            var user = m.getUser().getName().toLowerCase().trim();
            if (p.length < 1) {
                cb.sendNotice("No username specified. No ignore entry added.",
                              user,
                              system.settings.get('failure_bg').getValue(),
                              system.settings.get('failure_fg').getValue(),
                              system.settings.get('failure_w').getValue());
                return true;
            }
            var other = p.shift().toLowerCase().toLowerCase().trim();
            if (!(user in ignored)) ignored[user] = [];
            ignored[user].push(other);
            cb.sendNotice('"' + other +  '" added to ignore list. You will not receive whispers from that user anymore.',
                          user,
                          system.settings.get('success_bg').getValue(),
                          system.settings.get('success_fg').getValue(),
                          system.settings.get('success_w').getValue());
            return true;
        }
        this.unignore = function (p,c,m) {
            var user = m.getUser().getName().toLowerCase().trim();
            if (p.length < 1) {
                cb.sendNotice("No username specified. No ignore entry added.",
                              user,
                              system.settings.get('failure_bg').getValue(),
                              system.settings.get('failure_fg').getValue(),
                              system.settings.get('failure_w').getValue());
                return true;
            }
            var other = p.shift().toLowerCase().toLowerCase().trim();
            if (user in ignored) {
                var index = ignored[user].indexOf(other);
                if (index > -1) ignored[user].splice(index,1);
            }
            cb.sendNotice('"' + other +  '" removed from ignore list. You will receive whispers from that user again.',
                          user,
                          system.settings.get('success_bg').getValue(),
                          system.settings.get('success_fg').getValue(),
                          system.settings.get('success_w').getValue());
            return true;
        }
        this.w = this.whisper;
        this.r = this.reply;
    }
});

new Module('irc',  {
    externalSettings : [
        new Setting.Bool("security_emote_mod", "Mods can emote (/me and /slap)", true, false),
        new Setting.Bool("security_emote_green", "Fanclub members can emote (/me and /slap)", true, false),
        new Setting.Bool("security_emote_blue", "High tippers can emote (/me and /slap)", true, false),
        new Setting.Bool("security_emote_cyan", "Users with tokens can emote (/me and /slap)", true, false),
        new Setting.Bool("security_emote_grey", "Grey users can emote (/me and /slap)", true, false)
    ],
    commands : {
        me      : function (p,c,m) {
            if (!utility.securityCheck(m.getUser(), ['mod','green','blue','cyan','grey'], 'security_emote_')) {
                return false;
            }
            cb.sendNotice(m.getUser().getName() + " " + p.join(' '),
                          '',
                          m.getBackground(),
                          m.getColor() != '#494949' ? m.getColor() : m.getUser().getColor().getColor(),
                          'normal');
            return true;
        },
        slap    : function (p,c,m) {
            if (!utility.securityCheck(m.getUser(), ['mod','green','blue','cyan','grey'], 'security_emote_')) {
                return false;
            }
            if (p.length == 0) {
                cb.sendNotice("No target for slapping specified. No slap done.",
                              m.getUser().getName(),
                              system.settings.get('failure_bg').getValue(),
                              system.settings.get('failure_fg').getValue(),
                              system.settings.get('failure_w').getValue());
                return true;
            }
            var slapped = p.shift();
            if (p.length == 0) p = ['around', 'a', 'bit', 'with', 'a',  'large', 'trout'];
            p.unshift(slapped);
            p.unshift('slaps');
            return this.me(p,c,m);
        }
    }
});

new Module('whois', new function () {
    this.commands = {
        whoami : function (p,c,m) {
            p.unshift(m.getUser().getName());
            return this.whois(p,c,m);
        },
        whois : function (p,c,m) {
            var caller  = m.getUser().getName();
            if (p.length == 0) {
                cb.sendNotice("No target user specified. If you want info for yourself, please use /whoami",
                              caller,
                              system.settings.get('failure_bg').getValue(),
                              system.settings.get('failure_fg').getValue(),
                              system.settings.get('failure_w').getValue());
                return true;
            }
            var name = p.shift().toLowerCase();
            var user;
            if (name == caller.toLowerCase()) {
                user = m.getUser();
            } else {
                user = User.Archive.get(name);
                if (!user) {
                    cb.sendNotice('----\nUser "' + name +  '" was not active after the app started.\n----', caller);
                    return true;
                }
            }
            name = user.getName(); // reload name for correct case
            
            var color    = user.getColor();
            var colors   = (function () {
                var colors = [];
                for (var currentColor in User.Color) {
                    currentColor = User.Color[currentColor];
                    if (!(currentColor instanceof User.Color)) continue;
                    if (currentColor != color && user.is(currentColor)) colors.push(currentColor);
                }
                return colors;
            })();
            var active   = user.getLastSeen();
            var gender   = user.getGender();
            var he       = c == 'whoami' ? 'you'  : gender.getPersonalPronoun();
            var his      = c == 'whoami' ? 'your' : gender.getPossessivePronoun();
            var is       = gender == User.Gender.COUPLE || c == 'whoami' ? ' are'  : ' is';
            var has      = gender == User.Gender.COUPLE || c == 'whoami' ? ' have' : ' has';
            
            var info = '----\n';
            if (c == 'whoami') {
                info += (he + ' ' + is + ' ' + name + '.\nYou').capitalize();
            } else {
                info += name;
            }
            info += ' ' + is + ' ' + gender.getName() + '.\n';
            info += (his + ' primary status is ' + color.getName() + ' (' + color.getCode() + ')\n').capitalize();
            if (colors.length) {
                info += (he + ' ' + is + ' also ').capitalize();
                for (var i = 0 ; i < colors.length ; i++) {
                    info += colors[i].getName() + ' (' + colors[i].getCode() + ')';
                    if (i+3 <= colors.length) info+= ', ';
                    if (i+2 == colors.length) info+= ' and ';
                }
                info += '\n';
            }
            if (user.getEnter()) {
                info += (he + ' entered ' + utility.getTimeDifference(user.getEnter()) + ' ago.\n').capitalize();
            } else {
                info += (he + ' ' + has + ' already been in this room when the app started.\n').capitalize();
            }
            if (user.getLastChat()) {
                info += (he + ' sent ' + his + ' last chat message ' 
                      + utility.getTimeDifference(user.getLastChat().getTime()) + ' ago.\n').capitalize();
            } else {
                info += (he + ' ' + has + 'n\'t sent any chat messages yet.\n').capitalize();
            }
            if (user.getLastTip()) {
                info += (his + ' last tip in this room was ' + user.getLastTip().getAmount() + ' tokens, '
                      + utility.getTimeDifference(user.getLastTip().getTime()) + ' ago.\n').capitalize();
                info += (he + ' tipped ' + user.getTipTotal() + ' tokens since the app started.\n').capitalize();
                info += (his + ' highest tip was ' + user.getHighestTip().getAmount() + ' tokens, '
                      + utility.getTimeDifference(user.getHighestTip().getTime()) + ' ago.\n').capitalize();
            } else {
                info += (he + ' ' + has + ' not tipped in this room yet.\n').capitalize();
            }
            if (user.getLeave() > user.getEnter()) {
                info += (he + ' left this room ' + utility.getTimeDifference(user.getLeave()) + ' ago.\n').capitalize();
            }
            info += '----';
            cb.sendNotice(info, caller);
            return true;
        }
    }
}());


new Module('spoiler', {
    externalSettings : [
        new Setting.Bool("security_spoiler_mod", "Mods can use spoiler messages", true, false),
        new Setting.Bool("security_spoiler_green", "Fanclub members can use spoiler messages", true, false),
        new Setting.Bool("security_spoiler_blue", "High tippers can use spoiler messages", true, false),
        new Setting.Bool("security_spoiler_cyan", "Users with tokens can use spoiler messages", true, false),
        new Setting.Bool("security_spoiler_grey", "Grey users can use spoiler messages", false, false),
    ],
    commands : {
        spoiler : function (p,c,m) {
            if (!utility.securityCheck(m.getUser(), ['mod','green','blue','cyan','grey'], 'security_spoiler_')) {
                return false;
            }
            if (p.length == 0) {
                cb.sendNotice('No text specified.',
                    m.getUser().getName(),
                    system.settings.get ('failure_bg').getValue(),
                    system.settings.get ('failure_fg').getValue(),
                    system.settings.get ('failure_w').getValue());
            }
            m.setBackground(m.getColor())
            m.setMessage(m.getMessage().substr(8));
            m.setHidden(false);
            cb.sendNotice('^ select the text to read spoiler message ^', '', '', '#000');
            return true;
        }
    }
});

system.init();
system.loadModule('notice');
system.loadModule('irc');
system.loadModule('whisper');
system.loadModule('whois');
system.loadModule('spoiler');
system.loadModule('control');