Freesexcam - Free Sex Cam

Tira los dados + lovers
Description Source Code Launch Bot Current Users
There are 8 other versions of this script.
/**
 * Tirar los dados
 * Version: 1.0.2 En español
 * Author: jcstudios2017
 * Date: 2019-01-16
 * Website. http://www.jcstudios.com.co
 * Original Authors: zingknaat, milo_bloom, tablesalt90
 */
/*  
 * 	Title: My Top Lovers
 * 	Author: noiett
 * 		Email: noiett.cb@gmail.com
 * 		Twitter: @biosandapps
 * 	Version: 1.3.4 Jul 21, 2018
 * 	Description: Customizable leaderboard app
 * 
 * 
*/

// CONSTANTS
var COLORS = [
	{name: 'Amaranth', 	code: '#c92572',	bgcode: '#f9eaf1'},	
	{name: 'Black',		code: '#000000',	bgcode: '#e8e8e8'},
	{name: 'Blue', 		code: '#016ea6',	bgcode: '#e3eff6'},	
	{name: 'SteelBlue',	code: '#4159b5',	bgcode: '#e7ebfb'},
	{name: 'DarkBlue', 	code: '#364785',	bgcode: '#e4e9f9'},
	{name: 'BrownRed', 	code: '#b31313',	bgcode: '#fbe9e9'},
	{name: 'DarkViolet',	code: '#9c3dc4',	bgcode: '#efdff4'},
	{name: 'SeanceViolet',	code: '#ba21bf',	bgcode: '#ffdffe'},	
	{name: 'Green', 	code: '#327939',	bgcode: '#e1f9e3'},
	{name: 'DarkGreen', 	code: '#436446',	bgcode: '#d0e8d3'},
	{name: 'Pink', 		code: '#FF00BA',	bgcode: '#ffe6f8'},    
	{name: 'Purple', 	code: '#800080',	bgcode: '#f1e4f1'},
	{name: 'Red', 		code: '#ff3232',	bgcode: '#f6e5e9'},
	{name: 'TorchRed', 		code: '#FF0040',	bgcode: '#ffe5e5'},	
	{name: 'Turquoise',	code: '#188b8c', 	bgcode: '#e2f6f6'},
	{name: 'SlateGray', 	code: '#708090',	bgcode: '#eaeff3'},
];

var HEARTS = [
	{name: 'Fuchsya',	icon: ':mtlhfu'},
	{name: 'Pink',		icon: ':mtlhpi'},
	{name: 'Purple', 	icon: ':mtlhpu'},
	{name: 'Red', 		icon: ':mtlhre'}
];

// Some useful characters
var HEART 	= '\u2665';	// ♥
      BDIAMOND 	= '\u2666';	// ♦
      BSTAR 	= '\u2605';	// ★
      WSTAR 	= '\u2606';	// ☆

// Number of Top Lovers to show
var loversMaxItems = 3;
    
// Variables for Settings   
var loversModelName = '';
var loversListColor = '';
var loversListBgColor = '';
var loversTextWeight = '';
var loversListTimer = 0;
var loversHearts = true;
var loversIcon = '';
var loversAnnounce = true;

// VARIABLES
var botVersion = "1.3.4";
var botDate = "Jul 21,  2018";
var botNoticeDelay = 500;
var loversList = [];

//VARIABLES TIRADA DE DADOS
var price = cb.settings.tokens;
var langTokens = (price > 1) ? 'tokens' : 'token';
var numberOfSides = (cb.settings.die_type == 'Traditional') ? 6 : 10;
var multiRolls = cb.settings.multirolls;
var lastRoller = '--';
var lastPrizeWon = '--';
var rollCounter = 0;
var tipCounter = 0;
var winners = [];
var prizes = [];
var minimumRollsToGetRareDice = parseInt(cb.settings.minimum_rolls);
var maxOutcome = (cb.settings.die_type == 'Traditional') ? 13 : 21;
var dieImagePrefix = (cb.settings.die_type == 'Traditional') ? ':reddie' : ':cdie';
var rareChance = 10;    // percent chance of rolling a RARE (minimum rolls must also be met)


// TEXTS
var botCommand = '/bot';
var theHeader = ':mtlpheart My Top Lovers v' + botVersion + ' :mtlpheart2';
var loadText = 'Built by noiett (' + botDate + ')';




cb.settings_choices = [
    {
        name: 'tokens', type: 'int', minValue: 1,
        label: 'Cuantos tokens cobrarías por jugar a los dados?',
        defaultValue:20
    },
    {
        name: 'remove_winning_prize', type: 'choice', label: 'Quitar el premio de la lista despues de cada tirada?',
        choice1: 'Si ', choice2: 'No', defaultValue: 'No'
    },
    {
        name: 'die_type',
        type: 'choice',
        label: 'Si utilizas los dados tradicionales de 6 caras configuras hasta el premio numero 13,o si eliges los dados chinos deberas configurar los 21 premios.)',
        choice1: 'Tradicional',
        choice2: 'Chinos',
        defaultValue: 'Tradicional'
    },
    {
        name: 'multirolls', type: 'int', minValue: 1,
        label: 'Cuantas veces maximo, podría jugar un usuario con un solo tip, es decir, si lo tienes a 20 tokens y el usuario te da 100 tokens el sistema rodaría 5 veces los dados. el numero que elijas, la cantidad restante sera ignorada.',
        defaultValue: 3
    },
    {
        name: 'minimum_rolls',
        type: 'choice',
        label: 'Cuantas veces minimo deben haber jugado a tirar los dados de que aparezcan los dados raros? (¡Mantenga esto en secreto!)',
        choice1: 10,
        choice2: 15,
        choice3: 20,
        choice4: 25,
        choice5: 30,
        choice6: 35,
        choice7: 40,
        choice8: 45,
        choice9: 50,
        defaultValue:10
    },
    {
        name: 'notice_wait_time',
        type: 'choice',
        label: 'Cada cuanto minuto debe aparecer la oferta de jugar los dados?',
        choice1: 5,
        choice2: 10,
        choice3: 15,
        choice4: 20,
        choice5: 25,
        choice6: 30,
        choice7: 45,
        choice8: 60,
        defaultValue:5
    },
    {
        name: 'change_room_subject', type: 'choice', label: 'Cambiar el tema de la habitacion cuando se utiliza este bot?',
        choice1: 'Si', choice2: 'No', defaultValue: 'No'
    },


    {name: 'prize_1', type: 'str', label: 'Premio por opcion 1', defaultValue: 'Rub Myself Tits / Frotarme Senos'},
    {name: 'prize_2', type: 'str', label: 'Premio por opcion 2', defaultValue: '(Doggy Style(a lo perrito))'},
    {name: 'prize_3', type: 'str', label: 'Premio por opcion 3', defaultValue: 'Spank My Ass 4x / Golpear nalga 4 veces'},
    {name: 'prize_4', type: 'str', label: 'Premio por opcion 4', defaultValue: 'Blow A Kiss / Enviar beso'},
    {name: 'prize_5', type: 'str', label: 'Premio por opcion 5', defaultValue: 'Rub Myself Pussy / Frotar vagina'},
    {name: 'prize_6', type: 'str', label: 'Premio por opcion 6', defaultValue: 'Flash Tits / Senos flash'},
    {name: 'prize_7', type: 'str', label: 'Premio por opcion 7', defaultValue: 'Sexy Dance/Bailar Sexy'},
    {name: 'prize_8', type: 'str', label: 'Premio por opcion 8', defaultValue: 'Greeting spoken/Saludo hablado'},
    {name: 'prize_9', type: 'str', label: 'Premio por opcion 9', defaultValue: 'Spank Ass 2x / Golpear nalga 2 veces'},
    {name: 'prize_10', type: 'str', label: 'Premio por opcion 10', defaultValue: '2 Fingers in Pussy / 2 dedos en vagina'},
    {name: 'prize_11', type: 'str', label: 'Premio por opcion 11', defaultValue: 'Rub Myself ass /Frotarme nalga'},
    {name: 'prize_12', type: 'str', label: 'Premio por opcion 12', defaultValue: 'Try Again!'},
    {name: 'prize_13', type: 'str', label: 'Premio por opcion 13 (RARE if using traditional dice)', defaultValue: 'Dildo In Pussy (VERY RARE)'},
    {name: 'prize_14', type: 'str', label: 'Premio por opcion 14 (only shown if using Chinese dice)', defaultValue: '.'},
    {name: 'prize_15', type: 'str', label: 'Premio por opcion 15 (solo se muestra si se usan dados chinos)', defaultValue: '.'},
    {name: 'prize_16', type: 'str', label: 'Premio por opcion 16 (solo se muestra si se usan dados chinos)', defaultValue: '.'},
    {name: 'prize_17', type: 'str', label: 'Premio por opcion 17 (solo se muestra si se usan dados chinos)', defaultValue: '.'},
    {name: 'prize_18', type: 'str', label: 'Premio por opcion 18 (solo se muestra si se usan dados chinos)', defaultValue: '.'},
    {name: 'prize_19', type: 'str', label: 'Premio por opcion 19 (solo se muestra si se usan dados chinos)', defaultValue: '.'},
    {name: 'prize_20', type: 'str', label: 'Premio por opcion 20 (solo se muestra si se usan dados chinos)', defaultValue: '.'},
    {name: 'prize_21', type: 'str', label: 'Premio por opcion 21 (RARE solo se muestra si se usan dados chinos)', defaultValue: '.'},


// LOVERS
{
     name: 'divisor',
     type: 'str',
     required: false,
     defaultValue: 'No escribir nada aquí', 
     label: '---Configuracion de My Best Lovers---'

},
{
		name: 'model_lb',
		type: 'str',
		minLength: 0,
		maxLength: 21,
		required: true,
		defaultValue: cb.room_slug.charAt(0).toUpperCase() + cb.room_slug.slice(1),
		label: 'Model name in the leaderboard header'
	},
	{
		name: 'max_lb', 
		type: 'choice',
		choice1: 3,
		choice2: 4,
		choice3: 5,
		defaultValue: 3, 
		label: 'Number of Top Lovers',
	},
	{
		name: 'hearts_lb', 
		type: 'choice', 
		choice1: 'Yes', 
		choice2: 'No', 
		defaultValue: 'Yes', 
		label: 'Show hearts before Top Lovers\' messages'
	},
	{
		name: 'icons_lb', 
		type: 'choice', 
		label: 'Hearts color',
		choice1: 'Fuchsya', 
		choice2: 'Pink', 
		choice3: 'Purple', 
		choice4: 'Red', 		
		defaultValue: 'Fuchsya'
	},	
	{
		name: 'announce_lb', 
		type: 'choice', 
		choice1: 'Yes', 
		choice2: 'No', 
		defaultValue: 'Yes', 
		label: "Announce new Top Lover"
	},	
	{
		name: 'timer_lb', 
		type: 'choice',
		choice1: 1,
		choice2: 2,
		choice3: 3,
		choice4: 4,
		choice5: 5,
		choice6: 6,				
		choice7: 8,
		choice8: 10,
		choice9: 12,
		choice10: 15,
		choice11: 20,
		choice12: 30,
		choice13: 'Never',
		defaultValue: 6, 
		label: 'Top Lovers Display frequency (mins)'
	},	
	{
		name: 'color_lb', 
		type:'choice', 
		label:'Color scheme',
		choice1: 'Amaranth',
		choice2: 'Black', 
		choice3: 'Blue', 
		choice4: 'SteelBlue',
		choice5: 'DarkBlue',
		choice6: 'BrownRed',
		choice7: 'DarkViolet', 
		choice8: 'SeanceViolet',
		choice9: 'Green',
		choice10: 'DarkGreen',
		choice11: 'Pink',
		choice12: 'Purple',		
		choice13: 'Red',
		choice14: 'TorchRed',
		choice15: 'Turquoise',
		choice16: 'SlateGray',  	 
		defaultValue: 'Purple'
	},	
	{
		name: 'style_lb', 
		type: 'choice', 
		label: 'Leaderboard style',
		choice1: 'Classic', 
		choice2: 'Colored background',
		defaultValue: 'Colored background'
	},		


];



cb.onTip(function (tip) {

//Lovers
   var username = tip.from_user;
   var amount = tip.amount;
   var found = false;
   var isMVP = false;
//Tirar dados
    var maxTip = multiRolls * price;
    var tipAmount = parseInt(tip['amount']);
    // Handle Lovers List
	if (loversList.length > 0) {
		isMVP = (username == loversList[0].name);
	}

handleTip(username, amount);
	
	/* Is new Top Lover? Let's announce it! */
	if (!isMVP && loversList[0].name == username && loversAnnounce) {
		var msg = ':mtlstar ' + loversList[0].name + ' :mtlstar is the new Top Lover with ' + loversList[0].tokens + ' tokens!';
		cb.sendNotice(msg,'',loversListColor,'#ffffff','bold');
	}	

// TIRAR DADOS

    // check to see if tip was for a dice roll
    if (tipAmount >= price && (maxTip / tipAmount <= multiRolls) && (tipAmount % price == 0)) {
        var numberOfRolls = Math.floor(parseInt(tip['amount']) / price);
        for (var i = 0; i < numberOfRolls; i++) {
            roll(tip['from_user']);
            lastRoller = tip['from_user'];
        }
    }
    else {
        // Tip was for something else, don't roll the dice
        var textColor = '#000000';
        var bgColor = '#EAE54B';
        //cb.sendNotice('Tip was not for dice roll.', '', bgColor, textColor, 'bold');
        //tipCounter += parseInt(tip['amount']);
        cb.drawPanel();
    }

});

cb.onDrawPanel(function (user) {
    return {
        'template': '3_rows_12_22_31',
        'row1_label': 'Last prize won:',
        'row1_value': lastPrizeWon,
        'row2_label': 'Last player:',
        'row2_value': lastRoller,
        'row3_value': tipCounter + ' ' + langTokens + ' received / rolled ' + rollCounter + ' time(s)'
    };
});

cb.onEnter(function (user) {
    showAppAd(user['user']);
});

cb.onMessage(function (msg) {


 //LOVERS 
	// Some variables
	var name = msg['user'];
	var model = cb.room_slug;
	var isModel = (name == model);
	var isUnknownCmd = (msg.m.charAt(0) == '/');
  
	// Command /lovers
	if (msg.m.indexOf('/lovers') == 0 || msg.m.indexOf('!lovers') == 0)
	{
		var message = msg['m'].substr(1);
		var userParam = getParam(message,0);	
		var userParam2 = getParam(message,1);
		var userParam3 = getParam(message,2);
		var userParam4 = getParam(message,3);	
		var botPrefix = '/';
		var head = '';
		var userMsg = '';
		isUnknownCmd = false;

		if (!userParam2) {
			model = model.charAt(0).toUpperCase() + model.slice(1);
			msg['m'] = msg['m'] + " (lovers list sent to " + msg['user'] + ")";
			if (loversList.length > 0) {
				head = ':mtlpheart ' + loversModelName + '\'s Lovers List :mtlpheart2';
				for (var i = 0; i < loversList.length; i++){
					/* Add \n before starting a new line */
					if (i > 0) {
						userMsg += '\n';
					}	      
					/* Add a new tipper if available */
					if (i < loversList.length) {
						userMsg += '' + (i + 1) + '. ' + loversList[i].name + '  (' + loversList[i].tokens + ' tks)';
					}
					else {
						userMsg += '' + (i + 1) + '. ---------------------';
					}	    
				}
			}
			else {
				userMsg = 'No lovers yet! Tip now and become the top lover!';
			}			
		}
		else {
			if (isModel) {
				msg['X-Spam'] = true;
				switch (userParam2)
				{
					case 'tip':
					case 'add':
						// Add a new tip
						if (userParam3 && userParam4) {
							if (isInteger(userParam4) && userParam4 > 0) {
								handleTip(userParam3, userParam4);
								userMsg = 'A tip of ' + userParam4 + 'tks from user ' + userParam3 + ' has been added to the Lovers List.';
							}
							else {
								userMsg = 'You need to pass an integer value greater than 0 (e.g. ' + botPrefix + userParam + ' ' + userParam2 + ' username 100).';
							}
						}
						else {
							userMsg = 'You need to pass a valid username and value (e.g. ' + botPrefix + userParam + ' tip username 100).';	
						}
					break;
					
					case 'remove':
						// Remove lover
						if (userParam3) {
							var objTipper = getTipper(userParam3);
							if (objTipper) {
								cbjs.arrayRemove(loversList, objTipper);
								userMsg = 'User ' + userParam3 + ' has been removed from the Lovers List.';
							}
							else {
								userMsg = 'User ' + userParam3 + ' is not in the Lovers List.';
							}
						}
						else {
							userMsg = 'You need to pass a valid username (e.g. ' + botPrefix + userParam + ' ' + userParam2 + ' username).';	
						}
					break;
								
					default:
						userMsg = 'You need to pass a valid option (e.g. ' + botPrefix + userParam + ' tip username 100).';	
					break;
				}
			}
		}
		// Send results
		// Workaround for CB bug: this delay prevents message from being broken by command text in the room
		if (head) delayedNotice(300,head,name,loversListColor,'#FFFFFF','bold');
		delayedNotice(600,userMsg,name,loversListBgColor,loversListColor,'normal');		
	}
	
	// Top Tipper? Let's add a heart to the msg
	if (loversHearts && !isUnknownCmd) {
		var pos = getTopLover(msg['user']);
		if (pos > 0) {
			msg['m'] = '' + loversIcon + pos + ' ' + msg['m'];
		}
	}  


// TIRAR DADOS
    if (msg['m'].match(/!winners/i)) {
        msg['X-Spam'] = true;
        showPrizesWon(msg['user']);
    } else if (msg['m'].match(/!prizes/i)) {
        msg['X-Spam'] = true;

        if (msg['m'].match(/all/i) && ((msg['is_mod'] == true) || (msg['user'] == cb.room_slug))) {
            showPrizes();
        } else {
            showPrizes(msg['user']);
        }
    }

    return msg;
});

function roll(username) {
    rollCounter++;

    var die1 = Math.floor(Math.random() * numberOfSides) + 1;
    var die2 = Math.floor(Math.random() * numberOfSides) + 1;

    // see if there's a chance we can roll a rare die
    if (rollCounter > minimumRollsToGetRareDice) {
        if (Math.random() <= 1 / (rareChance / 100)) {
            die1 = 7;
        }
    }
    var total = die1 + die2;
    var winner = false;

    if (total >= 1) {
        winner = true;
        var prize = cb.settings['prize_' + total];
    } else {
        winner = false;
        var prize = 'A Thank You!';
    }

    var prizeIndex = prizes.indexOf(prize);

    if (prizeIndex >= 0) {
        if (cb.settings.remove_winning_prize == 'Yes') prizes.splice(prizeIndex, 1);
    } else {
        prize = 'A Thank You!';
    }

    var msg = dieImagePrefix + die1 + " " + dieImagePrefix + die2 + "\n";
    msg += username + " rolled a " + total + "! \n".toUpperCase();
    msg += "Roll #" + rollCounter + " | Prize: " + prize;

    var textColor = '#000000';
    var bgColor = '#D40054';

    if (winner) textColor = '#ffffff';
    if (total == maxOutcome) {
        bgColor = '#FFDBF3';
        textColor = '#A805A6';
    }

    cb.sendNotice(msg, '', bgColor, textColor, 'bold');
    lastPrizeWon = prize;
    winners.push("Roll #" + rollCounter + " (" + total + "): " + username + " - " + prize);
    cb.drawPanel();
}

function setPrizes() {
    var rareText = '';
    for (var i = 1; i <= maxOutcome; i++) {
        if (i == maxOutcome) rareText = " (RARE)";
        prizes.push(cb.settings['prize_' + i] + rareText);
    }
}

function showPrizes(username) {
    if (prizes.length) {
        var rareText = '';
        var msg = "##### POSSIBLE PRIZES #####";
        for (var i = 1; i <= maxOutcome; i++) {
            if (i == maxOutcome) rareText = " (RARE)";
            if (prizes.indexOf(cb.settings['prize_' + i] + rareText) >= 0)
                msg += "\nRoll " + i + " - " + cb.settings['prize_' + i] + rareText;
        }
    } else {
        var msg = "SORRY! There are no prizes left in the list, but thank you for the tip. :thumbsup";
    }
    cb.sendNotice(msg, username, '#DBFBFF', '#008596', 'bold');
}

function showPrizesWon(username) {
    var msg = "##### LAST 20 WINNERS #####";
    msg += "\nList sorted in chronological order";
    if (winners.length == 0) {
        cb.sendNotice('No one has won anything yet. Roll the dice to win a prize!', username, '', '', 'bold');
    } else {
        var recentWinners = winners.slice(-20);
        for (var i = 0; i < recentWinners.length; i++) msg += "\n" + recentWinners[i];

        cb.sendNotice(msg, username, '#FFF0DE', '#8A4900', 'bold');
    }
}

function advertise() {
    showAppAd();
    cb.setTimeout(advertise, parseInt(cb.settings.notice_wait_time) * 60000);
}

function showAppAd(username) {
    var msg = "";
    msg += "We are playing Roll the Dice: Improved - by kingchris_\n";
    msg += "(Tweaked from the original game and its modifications by zingknaat, milo_bloom and tablesalt90)\n";
    msg += "Each roll reveals a prize. There are " + prizes.length + " possible prizes.\n";

    if (cb.settings.remove_winning_prize == 'Yes') {
        msg += "Each prize won will be removed from the list.\n";
    } else {
        msg += "Each prize won will stay on the list.\n";
    }

    msg += "Tip " + price + " " + langTokens + " to roll the dice. \n";
    if (multiRolls > 1) msg += "You can roll a maximum of " + multiRolls + " times in a single tip (" + (multiRolls*price) + " tokens). \n";
    msg += "Type \"!prizes\" to see the list of prizes. \n";
    msg += "Type \"!prizes all\" to send the list to all viewers if you're a mod or the broadcaster.\n";
    msg += "Type \"!winners\" to see a list of the last 20 winners.";
    cb.sendNotice(msg, username, '', '#15A6B0', 'bold');
}


//Funciones LOVERS
/*
 * Adds a new tip to the loversList Array, adding a new user if needed
 * @username : user who tipped
 * @tokens : amount tipped
 */
function handleTip(username, tokens)
{
	var found = false;
	tokens = parseInt(tokens);
	// Update tipper
	for (var i = 0; i < loversList.length; i++) {
		if (loversList[i].name == username) {
			loversList[i].tokens += tokens;
			found = true;
			break;
		}
	}
	
	// Add a new one
	if (!found) loversList.push({ name: username, tokens: tokens });
	     
	// Sort the array
	loversList.sort(function(a, b) {
		return b.tokens - a.tokens;
	});	     
}

/*
 * Returns the user object from the tippers list matching the name
 */
function getTipper(name) 
{
	if (loversList.length > 0) {
		for (var i=0; i<loversList.length; i++) {
			if (loversList[i].name == name) {
				return loversList[i];
			}
		}			
	}
	return 0;
}

/*
 * Returns the name of the lover with more tokens
 */
function getTopLover(name) 
{
	if (loversList.length > 0) {
		for (var i=0; i<Math.min(loversList.length, loversMaxItems); i++) {
			if (loversList[i].name == name) {
				return i+1;
			}
		}
	}
	cb.log('User not in the top ' + loversMaxItems + ' lovers.');
	return 0;
}

/*
 * Returns the name of the heart emote of a certain color
 */
function getHeartsIcon(name) 
{
	for (var i=0; i<HEARTS.length; i++) {
		if (HEARTS[i].name == name) {
			return HEARTS[i].icon;
		}
	}
	return false;
	cb.log('Error: Could not find the icon for this heart color: ' + name);
}

/*
 * Returns the code of a requested color name
 */
function getColorCode(name) 
{
	for (var i=0; i<=COLORS.length; i++) {
		if (COLORS[i].name == name) {
			return COLORS[i].code;
		}
	}
	return "#FFFFFF";
	cb.log('Error: Could not find the code for this color: ' + name);
}

/*
 * Returns the code of a requested color background
 */
function getBgColorCode(name) 
{
	for (var i=0; i<=COLORS.length; i++) {
		if (COLORS[i].name == name) {
			return COLORS[i].bgcode;
		}
	}
	return "#FFFFFF";
	cb.log('Error: Could not find the bgcode for this color: ' + name);
}

/*
 * Return parameter in a certain position in a string
 */
function getParam(msg, position) 
{
	var tmp = msg.split(' ');
	return tmp[position];
}

/*
 * Validates if number is Integer type
 * 
 */
function isInteger(value) {
  return !isNaN(value) && 
         parseInt(Number(value)) == value && 
         !isNaN(parseInt(value, 10));
}

/*
 * Send delayed notice
 * @msg: message to send
 * @target: send the notice to this target
 * @delay: delay time in miliseconds
 * @weight: font weight
 * @group: send to group of users
 * 
 */
function delayedNotice(delay, msg, target, bgcolor, fgcolor, weight, group) 
{
	if (msg && isInteger(delay) && delay > 0) 
	{
		// Send Notice
		setTimeout(function(){
			cb.sendNotice(msg,target,bgcolor,fgcolor,weight,group);
		}, delay);
		
		return true;
	} 
	else {
		return false;
	}
}

/*
 * Sends the lovers list to the room
 */
function announceLoversList() 
{
	var target = '';
	var msgHead = '';
	var msgRoom = '';	
	
	/* Build the lovers list */
	if (loversList.length > 0) {
		
		/* Add header */
		msgHead = ':mtlpheart ' + loversModelName + '\'s Top Lovers :mtlpheart2';	
		
		for (var i = 0; i < loversMaxItems; i++){
			/* Add \n before starting a new line */
			if (i > 0) {
			msgRoom += '\n';
			}	      
		
			/* Add a new tipper if exists */
			if (i < loversList.length) {
				msgRoom += '' + (i + 1) + '. ' + loversList[i].name + '  (' + loversList[i].tokens + ' tks)';
			}
			else {
				msgRoom += '' + (i + 1) + '. ---------------------';
			}	    
		}
		
		/* More lovers? Invite viewers to see full list! */
		if (loversList.length > loversMaxItems) {
			msgRoom += '\nType /lovers to see the full list!';
		}
	}
	else {
		msgRoom = 'No lovers yet! Tip now and become the top lover!';
	}

	if (msgHead) cb.sendNotice(msgHead,target,loversListColor,'#FFFFFF','bold');
	cb.sendNotice(msgRoom,target,loversListBgColor,loversListColor,'normal');
	
	cb.setTimeout(announceLoversList, (loversListTimer * 60000));
}

/*
 * Builds user vars and arrays based on settings
 */
function loadSettings() 
{
	if (cb.settings.model_lb) {
		loversModelName = cb.settings.model_lb.trim();
	}
	
	if (!loversModelName) loversModelName = cb.room_slug.charAt(0).toUpperCase() + cb.room_slug.slice(1);
	
	if (cb.settings.color_lb) {
		loversListColor = getColorCode(cb.settings.color_lb);
	}
	
	if (cb.settings.style_lb == 'Colored background') {
		loversListBgColor = getBgColorCode(cb.settings.color_lb);
		loversTextWeight = 'bold';
	}
	else {
		loversListBgColor = '';
		loversTextWeight = 'normal';	
	}

	loversMaxItems = cb.settings.max_lb;
	if (cb.settings.timer_lb == 'Never') {
		loversListTimer = 0;
	}
	else {
		loversListTimer = cb.settings.timer_lb;
	}
	loversHearts = (cb.settings.hearts_lb == 'Yes') ? 1 : 0;
	loversAnnounce = (cb.settings.announce_lb == 'Yes') ? 1 : 0;
	loversIcon = getHeartsIcon(cb.settings.icons_lb);
	if (!loversIcon) loversIcon = ':001h';
}



function init() {
//TIRAR DADOS
    setPrizes();
    advertise();
    if (cb.settings.change_room_subject == 'Yes') {
        cb.changeRoomSubject('Tip ' + price + ' ' + langTokens + ' to roll the dice and win a prize!');
    }


//LOVERS
//Load values in settings to global variables
	loadSettings();
	
	// Start Lovers list
	if (loversListTimer) cb.setTimeout(announceLoversList, (loversListTimer * 70000));
	
	// Bot loaded message
	// Workaround for CB bug: this delay prevents message from being showed in wrong order
	setTimeout(function(){
		cb.sendNotice(theHeader,'',loversListColor,"#FFFFFF",'bolder');
		setTimeout(function(){
			cb.sendNotice(loadText,'','',loversListColor,'bold');
		}, 300);	
	}, botNoticeDelay);	
}

init();