Chaturbate

Bots Home | Create an App
Pik4bot
Author: boobiestrap
You are viewing version 254944. There is a newer version of this app. See the latest version of this app.

Description Source Code Launch Bot Current Users
There are 13 other versions of this script.
var _APPNAME = "Pik4Bot";

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.prototype.mapReplace = function (map) { // optional param: replaceFullOnly (default="false)
    var replaceFullOnly = arguments.length > 1 ? arguments[1] : false;
    var regexp = [];
    for (var key in map) {
        regexp.push(RegExp.escape(key));
    }
    regexp = regexp.join('|');
    if (replaceFullOnly) {
        regexp = '\\b(?:' + regexp + ')\\b';
    }
    regexp = new RegExp(regexp, 'gi');
    return this.replace(regexp, function (match) {
        return map[match.toLowerCase()];
    });
}
String.isString = function (o) {
    return (typeof o == 'string' || o instanceof String);
}

RegExp.escape= function(s) {
    return s.replace(/[-\/\\^$*+?.()|[\]{}]/g, '\\$&');
};

Number.prototype.getOrdinal = function() {
    switch(this % 100) {
        case 11:
        case 12:
        case 13:
            return this + "th";
    }
    switch(this % 10) {
        case 1:
            return this + "st";;
        case 2:
            return this + "nd";
        case 3:
            return this + "rd";
    }
    return this + "th";
}

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) {
        if (!message.original) {
            message.original = message.getMessage().trim();
        }
        if (message.original[0] =='/') {
            message.setHidden(true);
            var params  = message.original.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;
    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];
    var val   = def;
    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;
    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];
    var val   = def;
    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;
    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];
    var val   = def;
    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();
    }
}();

var createClubModule = function (name) {
    return new function () {
        var newMembers = [];
        var removedMembers = [];
        var getMembers = function () {
            var members = newMembers.slice(0);
            members = members.concat(system.settings.get('club_' + name + '_members').getValue().split(/[\s,;]+/));
            removedMembers.forEach(function (rm) {
                var index = members.indexOf(rm);
                if (index != -1) members.splice(index, 1);
            });
            return members;
        }
        var fanclubEnabled = function () {
            return Boolean(system.settings.get('club_' + name + '_name').getValue());
        }
        var userJoin = function (user) {
            if (getMembers().indexOf(user) != -1) return;
            var index = removedMembers.indexOf(user);
            if (index != -1) removedMembers.splice(user, 1);
            if (getMembers().indexOf(user) == -1) newMembers.push(user);
            var message = user;
            message += ' joined the ';
            message += system.settings.get('club_' + name + '_name').getValue();
            message += '!';
            var fg     = system.settings.get('club_' + name + '_fg').getValue();
            fg = (fg[0] == '#') ? fg : utility.getPredefinedColor(fg);
            cb.sendNotice(message, '', '', fg, 'bold');
        }
        var userRemove = function (user) {
            var index = newMembers.indexOf(user);
            if (index != -1) newMembers.splice(user, 1);
            else removedMembers.push(user);
            var message = user;
            message += ' was removed from the ';
            message += system.settings.get('club_' + name + '_name').getValue();
            message += '!';
            var fg     = system.settings.get('club_' + name + '_fg').getValue();
            fg = (fg[0] == '#') ? fg : utility.getPredefinedColor(fg);
            cb.sendNotice(message, '', '', fg, 'bold');
        }
        this.internalSettings = [
            new Setting.Choice('club_' + name + '_w', ['normal', 'bolder', 'bold'], '', 'bold')
        ]
        this.externalSettings = [
            new Setting.Bool  ("security_fanclub_mod", "[Permissions]: Mods can control fanclubs", true, false),
            new Setting.String("club_" + name + "_name",
                               "[" + name + " Fanclub]: Fanclub name (blank = fanclub disabled)",
                               "", false),
            new Setting.String("club_" + name + "_tag",
                               "[" + name + " Fanclub]: Tag (e.g. [member] or :icon) (blank = none)",
                               "[Fanclub Member (Level" + name + ")]", false),
            new Setting.Int   ("club_" + name + "_price",
                               "[" + name + " Fanclub]: Price to join (0 = manual only)",
                               1000, false, 0, 1000000),
            new Setting.Bool  ("club_" + name + "_overtip",
                               "[" + name + " Fanclub]: Tipping too much grants membership as well",
                               false, true),
            new Setting.String("club_" + name + "_bg",
                               "[" + name + " Fanclub]: Highlight color for fanclub members (empty = white/none)",
                               '', false),
            new Setting.String("club_" + name + "_fg",
                               "[" + name + " Fanclub]: Color for join messages",
                               'green', true),
            new Setting.String("club_" + name + "_members",
                               "[" + name + " Fanclub]: Fanclub members (separated by spaces or comma)",
                               '', false)
        ]
        this.handlers = {
            message : [
                function (m) {
                    if (!fanclubEnabled()) return;
                    if (getMembers().indexOf(m.getUser().getName()) != -1) {
                        var bg = system.settings.get('club_' + name + '_bg').getValue() || '#fff';
                        bg = (bg[0] == '#') ? bg : utility.getPredefinedColor(bg);
                        m.setBackground(bg);
                        if (system.settings.get('club_' + name + '_tag').getValue() && m.getMessage()[0] != '/' && m.getMessage()[0] != '!') {
                            m.setMessage(system.settings.get('club_' + name + '_tag').getValue() + " " + m.getMessage());
                        }
                    }
                }
            ],
            tip : [
                function (t) {
                    if (!fanclubEnabled()) return;
                    if (t.getAmount() == system.settings.get('club_' + name + '_price').getValue()) {
                        userJoin(t.getUser().getName());
                    }
                }
            ],
        }
        this.commands = {};
        this.commands[name] = function (p,c,m) {
            if (!(m.getUser().isBroadcaster())
             && !(m.getUser().isMod() && system.settings.get('security_fanclub_mod').getValue())) {
                return false;
            }
            if (!fanclubEnabled()) {
                    cb.sendNotice('This fanclub is disabled.',
                                  m.getUser().getName(),
                                  system.settings.get('failure_bg').getValue(),
                                  system.settings.get('failure_fg').getValue(),
                                  system.settings.get('failure_w').getValue());
                    return true;
            };
            var command = p.shift();
            if (!command) command = '';
            switch (command) {
                case 'join':
                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 'leave':
                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){
                        if (!name.trim()) return;
                        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;
            }
        }
    }
}

new Module('fanclub1' ,  createClubModule('bulbasaur'));
new Module('fanclub2' ,  createClubModule('ivysaur'));
new Module('fanclub3' ,  createClubModule('vensaur'));
new Module('fanclub4' ,  createClubModule('charmander'));
new Module('fanclub5' ,  createClubModule('charmeleon'));
new Module('fanclub6' ,  createClubModule('charizard'));
new Module('fanclub7' ,  createClubModule('squirtle'));
new Module('fanclub8' ,  createClubModule('wartortle'));
new Module('fanclub9' ,  createClubModule('blastoise'));
new Module('fanclub10',  createClubModule('pichu'));
new Module('fanclub11',  createClubModule('pikachu'));
new Module('fanclub12',  createClubModule('raichu'));
new Module('fanclub13',  createClubModule('minion'));
new Module('fanclub14',  createClubModule('fanclub14'));

new Module('pik4config',{
    externalSettings : [
        new Setting.Bool  ("security_fanclub_mod", "[Permissions]: Mods can control fanclubs", true, false),
        new Setting.String("club_bulbasaur_name",
                           "[Bulbasaur Fanclub]: Fanclub name (blank = fanclub disabled)",
                           "Bulbasaur Club", false),
        new Setting.String("club_bulbasaur_tag",
                           "[Bulbasaur Fanclub]: Tag (e.g. [member] or :icon) (blank = none)",
                           ":pokemon_bulbasaur_big", false),
        new Setting.Int   ("club_bulbasaur_price",
                           "[Bulbasaur Fanclub]: Price to join (0 = manual only)",
                           1000, false, 0, 1000000),
        new Setting.Bool  ("club_bulbasaur_overtip",
                           "[Bulbasaur Fanclub]: Tipping too much grants membership as well",
                           false, true),
        new Setting.String("club_bulbasaur_bg",
                           "[Bulbasaur Fanclub]: Highlight color for fanclub members (empty = white/none)",
                           '#B7E4B3', false),
        new Setting.String("club_bulbasaur_fg",
                           "[Bulbasaur Fanclub]: Color for join messages",
                           '#67C860', true),
        new Setting.String("club_bulbasaur_members",
                           "[Bulbasaur Fanclub]: Fanclub members (separated by spaces or comma)",
                           '', false),
        new Setting.String("club_ivysaur_name",
                           "[Ivysaur Fanclub]: Fanclub name (blank = fanclub disabled)",
                           "Ivysaur Club", false),
        new Setting.String("club_ivysaur_tag",
                           "[Ivysaur Fanclub]: Tag (e.g. [member] or :icon) (blank = none)",
                           ":pokemon_ivysaur_big", false),
        new Setting.Int   ("club_ivysaur_price",
                           "[Ivysaur Fanclub]: Price to join (0 = manual only)",
                           0, false, 0, 1000000),
        new Setting.Bool  ("club_ivysaur_overtip",
                           "[Ivysaur Fanclub]: Tipping too much grants membership as well",
                           false, true),
        new Setting.String("club_ivysaur_bg",
                           "[Ivysaur Fanclub]: Highlight color for fanclub members (empty = white/none)",
                           '#B7E4B3', false),
        new Setting.String("club_ivysaur_fg",
                           "[Ivysaur Fanclub]: Color for join messages",
                           '#67C860', true),
        new Setting.String("club_ivysaur_members",
                           "[Ivysaur Fanclub]: Fanclub members (separated by spaces or comma)",
                           '', false),,
        new Setting.String("club_vensaur_name",
                           "[Vensaur Fanclub]: Fanclub name (blank = fanclub disabled)",
                           "Vensaur Club", false),
        new Setting.String("club_vensaur_tag",
                           "[Vensaur Fanclub]: Tag (e.g. [member] or :icon) (blank = none)",
                           ":pokemon_vensaur_big", false),
        new Setting.Int   ("club_vensaur_price",
                           "[Vensaur Fanclub]: Price to join (0 = manual only)",
                           0, false, 0, 1000000),
        new Setting.Bool  ("club_vensaur_overtip",
                           "[Vensaur Fanclub]: Tipping too much grants membership as well",
                           false, true),
        new Setting.String("club_vensaur_bg",
                           "[Vensaur Fanclub]: Highlight color for fanclub members (empty = white/none)",
                           '#B7E4B3', false),
        new Setting.String("club_vensaur_fg",
                           "[Vensaur Fanclub]: Color for join messages",
                           '#67C860', true),
        new Setting.String("club_vensaur_members",
                           "[Vensaur Fanclub]: Fanclub members (separated by spaces or comma)",
                           '', false),
        new Setting.String("club_charmander_name",
                           "[Charmander Fanclub]: Fanclub name (blank = fanclub disabled)",
                           "Charmander Club", false),
        new Setting.String("club_charmander_tag",
                           "[Charmander Fanclub]: Tag (e.g. [member] or :icon) (blank = none)",
                           ":pokemon_charmander_big", false),
        new Setting.Int   ("club_charmander_price",
                           "[Charmander Fanclub]: Price to join (0 = manual only)",
                           1000, false, 0, 1000000),
        new Setting.Bool  ("club_charmander_overtip",
                           "[Charmander Fanclub]: Tipping too much grants membership as well",
                           false, true),
        new Setting.String("club_charmander_bg",
                           "[Charmander Fanclub]: Highlight color for fanclub members (empty = white/none)",
                           '#E6A34B', false),
        new Setting.String("club_charmander_fg",
                           "[Charmander Fanclub]: Color for join messages",
                           '#EF8E0F', true),
        new Setting.String("club_charmander_members",
                           "[Charmander Fanclub]: Fanclub members (separated by spaces or comma)",
                           '', false),
        new Setting.String("club_charmeleon_name",
                           "[Charmeleon Fanclub]: Fanclub name (blank = fanclub disabled)",
                           "Charmeleon Club", false),
        new Setting.String("club_charmeleon_tag",
                           "[Charmeleon Fanclub]: Tag (e.g. [member] or :icon) (blank = none)",
                           ":pokemon_charmeleon_big", false),
        new Setting.Int   ("club_charmeleon_price",
                           "[Charmeleon Fanclub]: Price to join (0 = manual only)",
                           0, false, 0, 1000000),
        new Setting.Bool  ("club_charmeleon_overtip",
                           "[Charmeleon Fanclub]: Tipping too much grants membership as well",
                           false, true),
        new Setting.String("club_charmeleon_bg",
                           "[Charmeleon Fanclub]: Highlight color for fanclub members (empty = white/none)",
                           '#E6A34B', false),
        new Setting.String("club_charmeleon_fg",
                           "[Charmeleon Fanclub]: Color for join messages",
                           '#EF8E0F', true),
        new Setting.String("club_charmeleon_members",
                           "[Charmeleon Fanclub]: Fanclub members (separated by spaces or comma)",
                           '', false),
        new Setting.String("club_charizard_name",
                           "[Charizard Fanclub]: Fanclub name (blank = fanclub disabled)",
                           "Charizard Club", false),
        new Setting.String("club_charizard_tag",
                           "[Charizard Fanclub]: Tag (e.g. [member] or :icon) (blank = none)",
                           ":pokemon_charizard_big", false),
        new Setting.Int   ("club_charizard_price",
                           "[Charizard Fanclub]: Price to join (0 = manual only)",
                           0, false, 0, 1000000),
        new Setting.Bool  ("club_charizard_overtip",
                           "[Charizard Fanclub]: Tipping too much grants membership as well",
                           false, true),
        new Setting.String("club_charizard_bg",
                           "[Charizard Fanclub]: Highlight color for fanclub members (empty = white/none)",
                           '#E6A34B', false),
        new Setting.String("club_charizard_fg",
                           "[Charizard Fanclub]: Color for join messages",
                           '#EF8E0F', true),
        new Setting.String("club_charizard_members",
                           "[Charizard Fanclub]: Fanclub members (separated by spaces or comma)",
                           '', false),
        new Setting.String("club_squirtle_name",
                           "[Squirtle Fanclub]: Fanclub name (blank = fanclub disabled)",
                           "Squirtle Club", false),
        new Setting.String("club_squirtle_tag",
                           "[Squirtle Fanclub]: Tag (e.g. [member] or :icon) (blank = none)",
                           ":pokemon_squirtle_big", false),
        new Setting.Int   ("club_squirtle_price",
                           "[Squirtle Fanclub]: Price to join (0 = manual only)",
                           1000, false, 0, 1000000),
        new Setting.Bool  ("club_squirtle_overtip",
                           "[Squirtle Fanclub]: Tipping too much grants membership as well",
                           false, true),
        new Setting.String("club_squirtle_bg",
                           "[Squirtle Fanclub]: Highlight color for fanclub members (empty = white/none)",
                           '#A2C8D7', false),
        new Setting.String("club_squirtle_fg",
                           "[Squirtle Fanclub]: Color for join messages",
                           '#65BDE0', true),
        new Setting.String("club_squirtle_members",
                           "[Squirtle Fanclub]: Fanclub members (separated by spaces or comma)",
                           '', false),
        new Setting.String("club_wartortle_name",
                           "[Wartortle Fanclub]: Fanclub name (blank = fanclub disabled)",
                           "Wartortle Club", false),
        new Setting.String("club_wartortle_tag",
                           "[Wartortle Fanclub]: Tag (e.g. [member] or :icon) (blank = none)",
                           ":pokemon_wartortle_big", false),
        new Setting.Int   ("club_wartortle_price",
                           "[Wartortle Fanclub]: Price to join (0 = manual only)",
                           0, false, 0, 1000000),
        new Setting.Bool  ("club_wartortle_overtip",
                           "[Wartortle Fanclub]: Tipping too much grants membership as well",
                           false, true),
        new Setting.String("club_wartortle_bg",
                           "[Wartortle Fanclub]: Highlight color for fanclub members (empty = white/none)",
                           '#A2C8D7', false),
        new Setting.String("club_wartortle_fg",
                           "[Wartortle Fanclub]: Color for join messages",
                           '#65BDE0', true),
        new Setting.String("club_wartortle_members",
                           "[Wartortle Fanclub]: Fanclub members (separated by spaces or comma)",
                           '', false),
        new Setting.String("club_blastoise_name",
                           "[Blastoise Fanclub]: Fanclub name (blank = fanclub disabled)",
                           "Blastoise Club", false),
        new Setting.String("club_blastoise_tag",
                           "[Blastoise Fanclub]: Tag (e.g. [member] or :icon) (blank = none)",
                           ":pokemon_blastoise_big", false),
        new Setting.Int   ("club_blastoise_price",
                           "[Blastoise Fanclub]: Price to join (0 = manual only)",
                           0, false, 0, 1000000),
        new Setting.Bool  ("club_blastoise_overtip",
                           "[Blastoise Fanclub]: Tipping too much grants membership as well",
                           false, true),
        new Setting.String("club_blastoise_bg",
                           "[Blastoise Fanclub]: Highlight color for fanclub members (empty = white/none)",
                           '#A2C8D7', false),
        new Setting.String("club_blastoise_fg",
                           "[Blastoise Fanclub]: Color for join messages",
                           '#65BDE0', true),
        new Setting.String("club_blastoise_members",
                           "[Blastoise Fanclub]: Fanclub members (separated by spaces or comma)",
                           '', false),
        new Setting.String("club_pichu_name",
                           "[Pichu Fanclub]: Fanclub name (blank = fanclub disabled)",
                           "Pichu Club", false),
        new Setting.String("club_pichu_tag",
                           "[Pichu Fanclub]: Tag (e.g. [member] or :icon) (blank = none)",
                           ":pokemon_pichu_big", false),
        new Setting.Int   ("club_pichu_price",
                           "[Pichu Fanclub]: Price to join (0 = manual only)",
                           1000, false, 0, 1000000),
        new Setting.Bool  ("club_pichu_overtip",
                           "[Pichu Fanclub]: Tipping too much grants membership as well",
                           false, true),
        new Setting.String("club_pichu_bg",
                           "[Pichu Fanclub]: Highlight color for fanclub members (empty = white/none)",
                           '#EDC95E', false),
        new Setting.String("club_pichu_fg",
                           "[Pichu Fanclub]: Color for join messages",
                           '#EFC700', true),
        new Setting.String("club_pichu_members",
                           "[Pichu Fanclub]: Fanclub members (separated by spaces or comma)",
                           '', false),
        new Setting.String("club_pikachu_name",
                           "[Pikachu Fanclub]: Fanclub name (blank = fanclub disabled)",
                           "Pikachu Club", false),
        new Setting.String("club_pikachu_tag",
                           "[Pikachu Fanclub]: Tag (e.g. [member] or :icon) (blank = none)",
                           ":pokemon_pikachu_big", false),
        new Setting.Int   ("club_pikachu_price",
                           "[Pikachu Fanclub]: Price to join (0 = manual only)",
                           0, false, 0, 1000000),
        new Setting.Bool  ("club_pikachu_overtip",
                           "[Pikachu Fanclub]: Tipping too much grants membership as well",
                           false, true),
        new Setting.String("club_pikachu_bg",
                           "[Pikachu Fanclub]: Highlight color for fanclub members (empty = white/none)",
                           '#EDC95E', false),
        new Setting.String("club_pikachu_fg",
                           "[Pikachu Fanclub]: Color for join messages",
                           '#EFC700', true),
        new Setting.String("club_pikachu_members",
                           "[Pichu Fanclub]: Fanclub members (separated by spaces or comma)",
                           '', false),
        new Setting.String("club_raichu_name",
                           "[Raichu Fanclub]: Fanclub name (blank = fanclub disabled)",
                           "Raichu Club", false),
        new Setting.String("club_raichu_tag",
                           "[Raichu Fanclub]: Tag (e.g. [member] or :icon) (blank = none)",
                           ":pokemon_raichu_big", false),
        new Setting.Int   ("club_raichu_price",
                           "[Raichu Fanclub]: Price to join (0 = manual only)",
                           0, false, 0, 1000000),
        new Setting.Bool  ("club_raichu_overtip",
                           "[Raichu Fanclub]: Tipping too much grants membership as well",
                           false, true),
        new Setting.String("club_raichu_bg",
                           "[Raichu Fanclub]: Highlight color for fanclub members (empty = white/none)",
                           '#EDC95E', false),
        new Setting.String("club_raichu_fg",
                           "[Raichu Fanclub]: Color for join messages",
                           '#EFC700', true),
        new Setting.String("club_raichu_members",
                           "[Raichu Fanclub]: Fanclub members (separated by spaces or comma)",
                           '', false),
        new Setting.String("club_minion_name",
                           "[Big Minion Fanclub]: Fanclub name (blank = fanclub disabled)",
                           "Big Minions", false),
        new Setting.String("club_minion_tag",
                           "[Big Minion Fanclub]: Tag (e.g. [member] or :icon) (blank = none)",
                           ":pik4bot_minion2", false),
        new Setting.Int   ("club_minion_price",
                           "[Big Minion Fanclub]: Price to join (0 = manual only)",
                           1000, false, 0, 1000000),
        new Setting.Bool  ("club_minion_overtip",
                           "[Big Minion Fanclub]: Tipping too much grants membership as well",
                           false, true),
        new Setting.String("club_minion_bg",
                           "[Big Minion Fanclub]: Highlight color for fanclub members (empty = white/none)",
                           '#F8E081', false),
        new Setting.String("club_minion_fg",
                           "[Big Minion Fanclub]: Color for join messages",
                           '#FFD423', true),
        new Setting.String("club_minion_members",
                           "[Big Minion Fanclub]: Fanclub members (separated by spaces or comma)",
                           '', false),
        new Setting.String("club_fanclub14_name",
                           "[14th Fanclub]: Fanclub name (blank = fanclub disabled)",
                           "", false),
        new Setting.String("club_fanclub14_tag",
                           "[14th Fanclub]: Tag (e.g. [member] or :icon) (blank = none)",
                           "", false),
        new Setting.Int   ("club_fanclub14_price",
                           "[14th Fanclub]: Price to join (0 = manual only)",
                           0, false, 0, 1000000),
        new Setting.Bool  ("club_fanclub14_overtip",
                           "[14th Fanclub Fanclub]: Tipping too much grants membership as well",
                           false, true),
        new Setting.String("club_fanclub14_bg",
                           "[14th Fanclub]: Highlight color for fanclub members (empty = white/none)",
                           '', false),
        new Setting.String("club_fanclub14_fg",
                           "[14th Fanclub]: Color for join messages",
                           'green', true),
        new Setting.String("club_fanclub14_members",
                           "[14th Fanclub]: Fanclub members (separated by spaces or comma)",
                           '', false),
    ]
});

new Module('tipperCrown', new function (){
    var sortedTippers = [];

    this.externalSettings = [
        new Setting.String('tipperCrown_title',
                           '[Highest Tipper]: Icon/text to prepend to the highest tipper\'s messages (empty = none)',
                           '♕')
    ]

    this.handlers = {
        tip : [
            function (t) {
                var username = t.getUser().getName().toLowerCase();
                if (sortedTippers.indexOf(username) == -1) {
                    sortedTippers.push(username);
                }
                sortedTippers.sort(function (u1, u2) {
                    u1 = User.Archive.get(u1);
                    u2 = User.Archive.get(u2);
                    return u1.getTipTotal() - u2.getTipTotal();
                });
            }
        ],
        message : [
            function (m) {
                if (sortedTippers.length > 0 && sortedTippers[0] == m.getUser().getName().toLowerCase()) {
                    m.setMessage(system.settings.get('tipperCrown_title').getValue() + ' ' + m.getMessage());
                }
            }
        ]
    }
}());

var createTipMenuModule = function (itemNum) {

    return new function () {

        var items = [];

        var getItems = function () {
            var items = [];
            for (var i = 0 ; i < itemNum ; i++) {
                var item = {};
                item.price = system.settings.get('tipMenu_' + i + '_price').getValue();
                item.name  = system.settings.get('tipMenu_' + i + '_name' ).getValue();
                if (item.price && item.name) {
                    items.push(item);
                }
            }
            return items;
        }

        var showMenu = function () { // optional: username
            var user = arguments.length > 0 ? arguments[0] : '';
            if (!items.length) {
                items = getItems();
            }
            if (!items.length) return;
            var message   = system.settings.get('tipMenu_title').getValue() + '\n';
            var separator = system.settings.get('tipMenu_separator').getValue();
            items.forEach(function (item) {
                message += item.name + ': ' + item.price + ' ' + separator + ' ';
            });
            message = message.slice(0,-separator.length-2);
            cb.sendNotice(message, user,
                          system.settings.get('tipMenu_bg').getValue(),
                          system.settings.get('tipMenu_fg').getValue(),
                          system.settings.get('tipMenu_w' ).getValue());
        }

        this.internalSettings = [
            new Setting.String("tipMenu_bg", "[Tip Menu]: Background color", 'white', false),
            new Setting.Choice('tipMenu_w', ['normal', 'bolder', 'bold'], "[Tip Menu]: Font weight", 'bold')
        ]

        this.externalSettings = [
            new Setting.Int('tipMenu_interval', '[Tip Menu]: Interval to post the tip Menu in chat in minutes. 0 = manual only', 2),
            new Setting.String("tipMenu_fg", "[Tip Menu]: Text color for tipmenu notices", '#32B450', true),
            new Setting.String('tipMenu_title', '[Tip Menu]: Title for the tip menu', 'Tip Menu:', true),
            new Setting.String('tipMenu_separator', '[Tip Menu]: Separator for tip menu items', '|', true)
        ];

        this.handlers = {
            tip : [
                function (t) {
                    if (!items.length) {
                        items = getItems();
                    }
                    items.forEach(function (item) {
                        if (item.price == t.getAmount()) {
                            var message = t.getUser().getName() + ' tipped for ' + item.name;
                            cb.sendNotice(message, '',
                                          system.settings.get('tipMenu_bg').getValue(),
                                          system.settings.get('tipMenu_fg').getValue(),
                                          system.settings.get('tipMenu_w' ).getValue());
                        }
                    })
                }
            ]
        }

        this.commands = {
            tipmenu : function (p,c,m) {
                var user = m.getUser().getName();
                if (p.length > 0 && p[0] == "all" && (
                        m.getUser().isMod() || m.getUser().isBroadcaster()
                    )) {
                    user = '';
                }
                showMenu(user);
                return true;
            }
        }

        this.init = function () {
            var minutes = system.settings.get('tipMenu_interval').getValue();
            if (minutes > 0) {
                var ival = new utility.Interval(function () {
                               showMenu();
                           }, minutes * 60000);
                ival.start();
                showMenu();
            }
        }


        for (var i = 0 ; i < itemNum ; i++) {
            this.externalSettings.push(
                new Setting.String('tipMenu_' + i + '_name',
                                   '[Tip Menu]: Item #' + i + ': Name (empty = unused)', '', false)
            );
            this.externalSettings.push(
                new Setting.Int   ('tipMenu_' + i + '_price',
                                   '[Tip Menu]: Item #' + i + ': Price (0 = unused)', 0, false, 0, 999999999)
            );
        }
    }();
}
new Module('tipMenu', createTipMenuModule(10));

var createThankyouMessageModule = function (messageNum) {
    return new function () {

        var messages = [];

        var getMessages = function () {
            var messages = [];
            for (var i = 0 ; i < messageNum ; i++) {
                var message = {};
                message.amount  = system.settings.get('thankyou_' + i + '_amount').getValue();
                message.message = system.settings.get('thankyou_' + i + '_message').getValue().trim();
                if (message.message) {
                    messages.push(message);
                }
                messages.sort(function (item1, item2) {
                    return item1.amount - item2.amount;
                });
            }
            return messages;
        }

        this.internalSettings = [
            new Setting.String("thankyou_bg", "[Thank You Message]: Background color", 'white', false),
            new Setting.Choice('thankyou_w', ['normal', 'bolder', 'bold'], "[Thank You Message]: Font weight", 'bold')
        ];
        this.externalSettings = [
            new Setting.String("thankyou_fg", "[Thank You Message]: Text color for all thank you messages", '#FF3264', true)
        ];

        this.handlers = {
            tip : [
                function (t) {
                    if (!messages.length) {
                        messages = getMessages();
                    }
                    if (!messages.length) return;
                    var message = '';
                    for (var i = 0 ; i < messages.length ; i++) {
                        if (t.getAmount() >= messages[i].amount) {
                            message = messages[i].message;
                        } else break;
                    }
                    if (!message) return;
                    message = message.replace('%n', t.getUser().getName());
                    message = message.replace('%a', t.getAmount());
                    message = message.replace('%t', t.getUser().getTipTotal());
                    var bg = system.settings.get('thankyou_bg').getValue() || '#fff';
                    var fg = system.settings.get('thankyou_fg').getValue();
                    bg = (bg[0] == '#') ? bg : utility.getPredefinedColor(bg);
                    fg = (fg[0] == '#') ? fg : utility.getPredefinedColor(fg);
                    cb.sendNotice(message, '', bg, fg, system.settings.get('thankyou_w').getValue());
                }
            ]
        }

        for (var i = 0 ; i < messageNum ; i++) {
            this.externalSettings.push(
                new Setting.String("thankyou_" + i + "_message",
                                   "[Thank You Message " + (i + 1) + "]: Message displayed to tippers after each tip "
                                 + "(%n = tipper name, %a = tip amount, %t = total tips by this user) "
                                 + "(blank = disabled)", "%n, thank you for your %a token tip!", false)
            );
            this.externalSettings.push(
                new Setting.Int   ("thankyou_" + i + "_amount",
                                   "[Thank You Message " + (i + 1) + "]: Minimum token amout to trigger the message", 0, false, 0, 999999999)
            );
        }
    }();
}
new Module('thankyou', createThankyouMessageModule(5));


system.init();
system.loadModule('pik4config');
system.loadModule('fanclub1');
system.loadModule('fanclub2');
system.loadModule('fanclub3');
system.loadModule('fanclub4');
system.loadModule('fanclub5');
system.loadModule('fanclub6');
system.loadModule('fanclub7');
system.loadModule('fanclub8');
system.loadModule('fanclub9');
system.loadModule('fanclub10');
system.loadModule('fanclub11');
system.loadModule('fanclub12');
system.loadModule('fanclub13');
system.loadModule('fanclub14');
system.loadModule('tipperCrown');
system.loadModule('tipMenu');
system.loadModule('thankyou');