Freesexcam - Free Sex Cam

A Better Dice Roller Concise
Description Source Code Launch Bot Current Users
There are 35 other versions of this script.
/**
 * A Bettter Dice Roller by aety
 * Version: 1.2.1
 * Author: aety
 * Date: 2018-06-21
 * Loosely based on work by: kingchris_, zingknaat, milo_bloom, tablesalt90
 * added longer time options for advertisement
 */

cb.settings_choices = [
	{name: 'settings_section_label', type:'choice', label:'################# Basic Settings #################', required: false},
	{
		name: 'PM_Price', type: 'int', minValue: 1,
		label: 'Price for PMs.',
		defaultValue: 10
	},
	{
		name: 'tokens', type: 'int', minValue: 1,
		label: 'How much do you want to charge per roll?',
		defaultValue: 33
	},
	{
		name: 'notice_wait_time',
		type: 'choice',
		label: 'In minutes, how often should the bot advertise itself?',
		choice1: 0,
		choice2: 5,
		choice3: 10,
		choice4: 15,
		choice5: 20,
		choice6: 25,
		choice7: 30,
		choice8: 45,
		choice9: 60,
		choice10: 90,
		choice11: 120,
		defaultValue: 10
	},
	{
		name: 'change_room_subject', type: 'choice', label: 'Change room subject when using this bot?',
		choice1: 'Yes', choice2: 'No', defaultValue: 'No'
	},
	{name: 'multirolls_subsection_label', type:'choice', label:'######### Multi Rolls #########', required: false},
	{
		name: 'max_rolls_at_once', type: 'int', minValue: 1,
		label: 'Maximum number of rolls that can be tipped for in a single tip.',
		defaultValue: 3
	},
	{
		name: 'perfect_multi', type: 'choice',
		label: 'Require exact multiples of tip amount to roll the die? (if you charge 33 per roll, 66 will roll 2x but 69 won\'t)',
		choice1: 'yes', choice2: 'no',
		defaultValue: 'yes'
	},
	{name: 'prizeodds_subsection_label', type:'choice', label:'######### Prize Odds #########', required: false},
	{
		name: 'equal_odds', type: 'choice',
		label: 'Should all non-rare prizes have equal odds of being rolled? ("no" simulates rolling a pair of dice and "yes" rolls a single die)',
		choice1: 'yes', choice2: 'no',
		defaultValue: 'no'
	},
	{
		name: 'last_prize_rare', type: 'choice',
		label: 'Should the last prize in the list be RARE? (RARE prizes will only show up after a minimum number of rolls have been rolled and should be significantly less likely than other prizes)',
		choice1: 'yes', choice2: 'no',
		defaultValue: 'yes'
	},
	{
		name: 'minimum_rolls', type: 'int', minValue: 0,
		label: 'Minimum number of rolls that must be rolled before RARE prizes can be won.',
		defaultValue: 10
	},
	{
		name: 'rare_chance_mult', type: 'choice', //[TODO] Remove in favor of multiplier with precalced odds 1/2, 1, 2 etc 1x should be 1/2 odds for equal die?
		label: 'Multiplier for the chance of rolling rare prizes. Increase if rare prizes are too uncommon, Decrease if they\'re too common',
		choice1: '1/2x', choice2: '1x', choice3: '1.5x', choice4: '2x', choice5: '4x', choice6: '8x',
		defaultValue: '1x'
	},
	{name: 'prize_section_label', type:'choice', label:'#################### Prizes ####################', required: false},
	{name: 'prize_1', type: 'str', label: '(List possible prizes from most common to least.) Prize 1'},
	{name: 'prize_2', type: 'str', label: '(if equal odds option is \'yes\' order doesn\'t matter.) Prize 2'},
	{name: 'prize_3', type: 'str', label: '(Fill prize spots in order from top to bottom.) Prize 3', required: false},
	{name: 'prize_4', type: 'str', label: '(Leave the remaining fields blank to not use them.) Prize 4', required: false}
];

var maxPrizes = 25;

for(var i=5; i <= maxPrizes; i++) {
	cb.settings_choices.push({
		name: 'prize_' + i,
		type: 'str',
		label: 'Prize ' + i,
		required: false
	});
}

cb.settings_choices.push({name: 'miscellaneous_section_label', type:'choice', label:'########## Advanced Settings (Safe to Ignore) ##########', required: false});
cb.settings_choices.push({name: 'cmd_prefix', type: 'str', minLength: 1, maxLength: 1, label: 'Prefix for bot commands. (Might want to change if you have other bots using the same commands.)', defaultValue: '/'});
cb.settings_choices.push({name: 'die_prefix', type: 'str', label: 'Prefix for die gifs ("prefix#" only change if you know what you\'re doing)', defaultValue: ':80genericdie_'});

var rollprice = parseInt(cb.settings.tokens);
var prizeCount = 13;
var equalOdds = cb.settings.equal_odds == 'yes';
var numberOfDie = equalOdds?1:2;
var die = [
	{
		die: 1,
		label: "One",
		sides: Math.floor((equalOdds? ((cb.settings.last_prize_rare == 'yes')?prizeCount-1:prizeCount) : ((cb.settings.last_prize_rare == 'yes')?prizeCount:prizeCount+1)/2))
	},
	{
		die: 2,
		label: "Two",
		sides: Math.ceil((equalOdds? ((cb.settings.last_prize_rare == 'yes')?prizeCount-1:prizeCount) : ((cb.settings.last_prize_rare == 'yes')?prizeCount:prizeCount+1)/2))
	}
];
var perfectMults = cb.settings.perfect_multi == 'yes';
var maxRollsPerTip = parseInt(cb.settings.max_rolls_at_once);
var usingRares = cb.settings.last_prize_rare == 'yes';
var minRollsForRare = parseInt(cb.settings.minimum_rolls);
var rareChance = (cb.settings.rare_chance_mult == '1x')?1:((cb.settings.rare_chance_mult == '1/2x')?0.5:((cb.settings.rare_chance_mult == '1.5x')?1.5:(cb.settings.rare_chance_mult == '2x')?2:(cb.settings.rare_chance_mult == '4x')?4:8));
var changeSubject = cb.settings.change_room_subject == 'Yes';
var cmdPrefix = cb.settings.cmd_prefix;
var diePrefix = cb.settings.die_prefix;
var lastRoller = '--';
var lastPrizeWon = '--';
var prizes = [];
var stats = {
	'tipCounter': 0,
	'winners': [],
	'rollCounter': 0,
	'rollResultCounts': {},
};

cb.onTip(function(tip) {
	var tipAmount = parseInt(tip.amount);
	stats.tipCounter += tipAmount;
	if(tipAmount >= rollprice && (!perfectMults || ((tipAmount <= (maxRollsPerTip*rollprice)) && (tipAmount % rollprice === 0)))) {
		var rolls = Math.floor(tipAmount/rollprice);
		for(var i = 0; i < rolls; i++) {
			roll(tip.from_user);
			lastRoller = tip.from_user;
		}
	} else {
		//not rolling the dice
		var textColor = '#000000';
		var bgColor = '#D9FAD7';
		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': stats.tipCounter + ' ' + ((stats.tipCounter > 1)?'tokens':'token') + ' received / rolled ' + stats.rollCounter + ' time(s)'
	};
});

cb.onEnter(function (user) {
	adBlurb(user.user);
});

cb.onMessage(function(msg) {
	var message = msg.m.split(" ");
	
	switch (message[0]) {
		case cmdPrefix+'dicehelp':
			msg["X-Spam"] = true;  // Don't print command messages to chat.
			msg.background = "#EEEEEE";
			if(message[1] == 'all' && isPrivileged(msg))adBlurb();
			else adBlurb(msg.user);
			break;
		case cmdPrefix+'winners':
			msg["X-Spam"] = true;
			msg.background = "#EEEEEE";
			if(message[1] == 'all' && isPrivileged(msg))winnersBlurb();
			else winnersBlurb(msg.user);
			break;
		case cmdPrefix+'prizes':
			msg["X-Spam"] = true;
			msg.background = "#EEEEEE";
			if(message[1] == 'all' && isPrivileged(msg))prizesBlurb();
			else prizesBlurb(msg.user);
			break;
		case cmdPrefix+'dicestats':
			msg["X-Spam"] = true;
			msg.background = "#EEEEEE";
			if(message[1] == 'all' && isPrivileged(msg))statsBlurb();
			else statsBlurb(msg.user);
			break;
		default:
			break;
	}

	return msg;
});

function getRandomIntInclusive(min, max) {
	min = Math.ceil(min);
	max = Math.floor(max);
	return Math.floor(Math.random() * (max - min + 1)) + min;
}

function isPrivileged(msg) {
	return (msg.is_mod === true) || (msg.user == cb.room_slug);
}

function roll(username) {
	var prize = 'A Thank You!';

	stats.rollCounter += 1;

	var dieResults = [];
	var total = -numberOfDie;
	for(var i = 0; i < numberOfDie; i++) {
		dieResults[i] = getRandomIntInclusive(1, die[i].sides);
		total += dieResults[i];
	}

	if(usingRares && (stats.rollCounter > minRollsForRare) && (getRandomIntInclusive(1, 100) <= (rareChance/100))) {
		//RARE PRIZE WON!!!
		if(numberOfDie == 1) {
			dieResults[0] = die[0].sides+1;
			total = dieResults[0] - numberOfDie;
		} else {
			if(getRandomIntInclusive(0,1) === 0) {
				dieResults[0] = die[0].sides+1;
				dieResults[1] = die[1].sides;
				total = dieResults[0] + dieResults[1] - numberOfDie;
			} else {
				dieResults[0] = die[0].sides;
				dieResults[1] = die[1].sides+1;
				total = dieResults[0] + dieResults[1] - numberOfDie;
			}
		}
	}

	var winner = false;

	if (total >= 0 && total < prizeCount) {
		if((total+numberOfDie) in stats.rollResultCounts)stats.rollResultCounts[(total+numberOfDie)] += 1;
		else stats.rollResultCounts[(total+numberOfDie)] = 1;
		winner = true;
		prize = prizes[total];
	} else {
		winner = false;
	}

	var msg = ((numberOfDie == 1)?diePrefix + dieResults[0]: diePrefix + dieResults[0] + " " + diePrefix + dieResults[1]) + "\n";
		msg += username + " rolled " + (total+numberOfDie) + "! \n".toUpperCase();
		msg += "Roll #" + stats.rollCounter + " | Prize: " + prize;

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

	if (winner) textColor = '#067D00';
	if (total == prizeCount-1) {
		bgColor = '#FFDBF3';
		textColor = '#A805A6';
	}

	cb.sendNotice(msg, '', bgColor, textColor, 'bold');
	lastPrizeWon = prize;
	stats.winners.push("Roll #" + stats.rollCounter + " (" + (total+numberOfDie) + "): " + username + " - " + prize);
	if(stats.winners.length > 20)stats.winners = stats.winners.slice(-21);
	cb.drawPanel();
}

function initPrizes() {
	for (var i = 1; i <= maxPrizes; i++) {
		if(!('prize_' + i in cb.settings) || cb.settings['prize_' + i] === '' || cb.settings['prize_' + i] == '.' || cb.settings['prize_' + i] == ' ')continue;
		if(i%2 == 1)prizes.push(cb.settings['prize_' + i]);
			else prizes.unshift(cb.settings['prize_' + i]);
	}

	prizeCount = prizes.length;
	if(usingRares) {
		if(prizeCount%2 === 0)prizes.push(prizes.shift());
		prizes[prizes.length-1] += " (RARE)";
	}

	for(var i = 0; i < prizeCount; i++) {
		stats.rollResultCounts[(i+numberOfDie)] = 0;
	}

	die[0].sides = Math.floor(((numberOfDie == 1)? ((cb.settings.last_prize_rare == 'yes')?prizeCount-1:prizeCount) : ((cb.settings.last_prize_rare == 'yes')?prizeCount:prizeCount+1)/2));
	die[1].sides = Math.ceil(((numberOfDie == 1)? ((cb.settings.last_prize_rare == 'yes')?prizeCount-1:prizeCount) : ((cb.settings.last_prize_rare == 'yes')?prizeCount:prizeCount+1)/2));

	rareChance *= equalOdds?100/(prizeCount*1.3):100/((die[0].sides+1)*die[1].sides);
	cb.log(rareChance);
}

function statsBlurb(username) {
	var msg = "##### Dice Roll Statistics #####\n";
	for(var rollval in stats.rollResultCounts) {
		msg += "Roll " + rollval + ": " + stats.rollResultCounts[rollval] + "\n";
	}

	msg += "Total Rolls: " + stats.rollCounter;

	cb.sendNotice(msg, username, '#DBFBFF', '#008596', 'bold');
}



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

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

var PM_Notice = parseInt(cb.settings.PM_Price);


function privateBlurb(user) {
	var msg = "";
		msg += ":privateopen \n";
		msg += "***************\n";
		msg += "Go Private For:\n";
		msg += "*C2C*JOI*CEI*SPH*\n";
		msg += "*Anal*ATM*Taboo*BDSM*\n";
		msg += "***************\n";
	cb.sendNotice(msg, user, '#F9F3FF', '#6315B0', 'bold');
}

function prizesBlurb(user) {
	var msg = "No Prizes!! D:";
	if (prizes.length) {
		msg = "Tip " + rollprice + " " + ((rollprice>1)?'tokens':'token') + " to roll the dice. \n";
		msg += "##### POSSIBLE PRIZES #####";
		for (var i = 0; i < prizeCount; i++) {
			msg += "\nRoll " + (i+numberOfDie) + " - " + prizes[i];
		}
	}
	cb.sendNotice(msg, user, '#DBFBFF', '#6315B0', 'bold');
}

function adBlurb(user) {
	var msg = "";
		privateBlurb(user);
		prizesBlurb(user);
	cb.sendNotice(msg, user);
}

function advertise() {
	adBlurb();
	if(cb.settings.notice_wait_time > 0)cb.setTimeout(advertise, parseInt(cb.settings.notice_wait_time) * 60000);
}

function init() {
	initPrizes();
	advertise();
	if (changeSubject) {
		cb.changeRoomSubject('Tip ' + rollprice + ' ' + ((rollprice>1)?'tokens':'token') + ' to roll the dice and win a prize!');
	}
}

init();