Chaturbate

Bots Home | Create an App
Alexa's fanclub
Author: dirtytalk18
Description Source Code Launch Bot Current Users
var _APPNAME = "BoobiesTrap's Fanclub 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_gender
    });
    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('club', new function () {
    var newMembers = [];
    var removedMembers = [];
    var getMembers = function () {
        var members = newMembers.slice(0);
        members = members.concat(system.settings.get("club_members").getValue().split(/[\s,;]+/));
        removedMembers.forEach(function (rm) {
            var index = members.indexOf(rm);
            if (index != -1) members.splice(index, 1);
        });
        return members;
    }
    var getHighlight = function () {
        var color = system.settings.get('club_highlight').getValue();
        if (color[0] != '#') {
            color = utility.getPredefinedColor(color);
        }
        return color;
    }
    var getColor = function () {
        var color = system.settings.get('club_notice').getValue();
        if (color[0] != '#') {
            color = utility.getPredefinedColor(color);
        }
        return color;
    }
    var userJoin = function (name) {
        if (getMembers().indexOf(name) != -1) return;
        var index = removedMembers.indexOf(name);
        if (index != -1) removedMembers.splice(name, 1);
        if (getMembers().indexOf(name) == -1) newMembers.push(name);
        var message = name;
        message += ' joined ';
        message += system.settings.get('club_name').getValue();
        message += '!'
        cb.sendNotice(message, '', 
                      system.settings.get('club_bg').getValue(),
                      getColor(),
                      system.settings.get('club_w').getValue());
    }
    var userRemove = function (name) {
        var index = newMembers.indexOf(name);
        if (index != -1) newMembers.splice(name, 1);
        else removedMembers.push(name);
        var message = name;
        message += ' was removed from ';
        message += system.settings.get('club_name').getValue();
        message += '!'
        cb.sendNotice(message, '', 
                      system.settings.get('club_bg').getValue(),
                      getColor(),
                      system.settings.get('club_w').getValue());
    }
    this.internalSettings = [
        new Setting('club_bg', ''),
        new Setting.Choice('club_w', ['normal', 'bolder', 'bold'], '', 'bold')
    ]
    this.externalSettings = [
        new Setting.String("club_name", "Name of the club", cb.room_slug + "'s Fanclub", true),
        new Setting.String("club_title", "Title of club members", "Fanclub Member", true),
        new Setting.Bool("club_tag", "Append title tag (e.g. [member]) to usernames in chat", true, true),
        new Setting.Int("club_price", "Price for new members to join (empty for manual only)", 1000, false, 0, 1000000),
        new Setting.Bool("club_overtip", "Tipping more than necessary grants membership as well", false, true),
        new Setting.String("club_highlight", "Highlight color for fanclub members (empty for none)", '', false),
        new Setting.String("club_notice", "Color for enter, leave and join messages", 'green', true),
        new Setting.String("club_members", "Fanclub members (separated by spaces and/or comma)", '', false)
    ]
    this.handlers = {
        message : [
            function (m) {
                if (m.getUser().isFanclub() || getMembers().indexOf(m.getUser().getName()) != -1) {
                    m.setBackground(getHighlight());
                    if (system.settings.get('club_tag').getValue()) {
                        m.setMessage('[' + system.settings.get('club_title').getValue() + ']: ' + m.getMessage());
                    }
                }
            }
        ],
        tip : [
            function (t) {
                var price = system.settings.get('club_price').getValue();
                if (!price) return;
                if (t.getAmount() == price || (t.getAmount() >= price && system.settings.get('club_overtip').getValue())) {
                    userJoin(t.getUser().getName());
                }
            }
        ],
        enter : [
            function (u) {
                if (u.isFanclub() || getMembers().indexOf(u.getName()) != -1) {
                    cb.sendNotice(system.settings.get('club_title').getValue() + ' ' + u.getName() + ' entered the room.', '', 
                                  system.settings.get('club_bg').getValue(),
                                  getColor(),
                                  system.settings.get('club_w').getValue());
                }
            }
        ],
        leave : [
            function (u) {
                if (u.isFanclub() || getMembers().indexOf(u.getName()) != -1) {
                    cb.sendNotice(system.settings.get('club_title').getValue() + ' ' + u.getName() + ' left the room.', '', 
                                  system.settings.get('club_bg').getValue(),
                                  getColor(),
                                  system.settings.get('club_w').getValue());
                }
            }
        ]
    }
    this.commands = {
        fanclub : function (p,c,m) {
            if (!m.getUser().isBroadcaster()) return false;
            var command = p.shift();
            if (!command) command = '';
            switch (command) {
                case 'add':
                case '+':
                    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;
                    }
                    var user = p.shift();
                    if (!user || User.Archive.get(user) || user == cb.room_slug) {
                        cb.sendNotice("User " + user +  " added to fanclub.",
                                      m.getUser().getName(),
                                      system.settings.get('success_bg').getValue(),
                                      system.settings.get('success_fg').getValue(),
                                      system.settings.get('success_w').getValue());
                    } else {
                        cb.sendNotice("User " + user +  " added to fanclub, 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());
                    }
                    userJoin(user);
                    return true;
                case 'remove':
                case 'delete':
                case 'del':
                case 'rm':
                case '-':
                    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;
                    }
                    var user = p.shift();
                    if (getMembers().indexOf(user) != -1) {
                        cb.sendNotice("User " + user +  " removed from fanclub.",
                                      m.getUser().getName(),
                                      system.settings.get('success_bg').getValue(),
                                      system.settings.get('success_fg').getValue(),
                                      system.settings.get('success_w').getValue());
                    } else {
                        cb.sendNotice("User " + user +  " is not in the fanclub."
                                    + "Did you spell the name correctly?",
                                      m.getUser().getName(),
                                      system.settings.get('failure_bg').getValue(),
                                      system.settings.get('failure_fg').getValue(),
                                      system.settings.get('failure_w').getValue());
                        return true;
                    }
                    userRemove(user);
                    return true;
                case 'list':
                case '':
                    var message = 'Fanclub Members: '
                    getMembers().forEach(function (name){
                        message += name + ', '
                    });
                    cb.sendNotice(message, m.getUser().getName());
                    return true;
                default:
                    cb.sendNotice('Unknown fanclub command: "' + command + '"',
                                  m.getUser().getName(),
                                  system.settings.get('failure_bg').getValue(),
                                  system.settings.get('failure_fg').getValue(),
                                  system.settings.get('failure_w').getValue());
                    return true;
            }
        }
    }
});

system.init();
system.loadModule('club');