Freesexcam - Free Sex Cam

dice34
Author: _atze_
Description Source Code Launch Bot Current Users
Created by: _Atze_
There are 3 other versions of this script.
/**
 * A Bettter Dice Roller by aety
 * Version: 1.3.7
 * Author: aety
 * Date: 2021-03-08	
 * Loosely based on work by: kingchris_, zingknaat, milo_bloom, tablesalt90
 * 
 * 20240204 customized for 34tks (68tks, 102tks) rolls only by _atze_
 * 20240207 color changes
 * 
 * 
 */


    
cb.settings_choices = [
    
	{
        name: 'information', type: 'str', label: 'This Bot is customized to only Roll the Dice for Tips of 34, 68 and 102 Tokens. If you want to make changes I suggest to use the original bot "A Bettter Dice Roller by aety", just copy the url',
        defaultValue: 'https://www.freesexcam.ca/apps/app_details/a-bettter-dice-roller-by-aety/'
	},
	{
		name: 'notice_wait_time',
		type: 'int',
		label: 'Dice Game Advertisement Time (in minutes)',
		minValue: 0,
		defaultValue: 13
	},
	{
		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: 'Yes'
	},
	{
		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: 15
	},
	{
		name: 'rare_chance_mult', type: 'choice',
		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: '3/4x', choice3: '1x', choice4: '1.5x', choice5: '2x', choice6: '4x', choice7: '8x',
		defaultValue: '1x'
	},
	{name: 'prize_1', type: 'str', label: '(List possible prizes from most common to least.) Prize 1', defaultValue: 'meow'},
	{name: 'prize_2', type: 'str', label: '(if equal odds option is \'Yes\' order doesn\'t matter.) Prize 2', defaultValue: 'flash tits'},
	{name: 'prize_3', type: 'str', label: '(Fill prize spots in order from top to bottom.) Prize 3', defaultValue: 'air kiss', required: false},
	{name: 'prize_4', type: 'str', label: '(Leave the remaining fields blank to not use them.) Prize 4', defaultValue: 'doggy', required: false},
    {name: 'prize_5', type: 'str', label: ' Prize 5', defaultValue: 'ahegao', required: false},
    {name: 'prize_6', type: 'str', label: ' Prize 6', defaultValue: 'show tongue', required: false},
    {name: 'prize_7', type: 'str', label: ' Prize 7', defaultValue: 'slap on the ass whip x5', required: false},
    {name: 'prize_8', type: 'str', label: ' Prize 8', defaultValue: 'slap on the ass hand x5', required: false},
    {name: 'prize_9', type: 'str', label: ' Prize 9', defaultValue: 'suck fingers', required: false},
    {name: 'prize_10', type: 'str', label: ' Prize 10', defaultValue: 'spank pussy x5', required: false},
    {name: 'prize_11', type: 'str', label: ' Prize 11', defaultValue: 'dance', required: false},
    {name: 'prize_12', type: 'str', label: ' Prize 12', defaultValue: 'body tour', required: false}
];

// 25 because I got tired after uploading 25 gifs ;>_>
// if someone wants to get in touch with me about updating/improving
// or adding more dice gifs feel free to leave a comment etc
// I *should* see it
var maxPrizes = 25;

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

// We're pushing these so that we can put them after the prizes that we want to push with a loop
// there are better ways to deal with and organize this code
cb.settings_choices.push({
		name: 'mod_rolls', type: 'choice',
		label: 'Allow mods to use the /diceroll command?',
		choice1: 'Yes', choice2: 'No',
		defaultValue: 'No'
	});
cb.settings_choices.push({name: 'miscellaneous_section_label', type:'str', 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_img_prefix', type: 'str', label: 'Prefix for die gifs ("prefix#" only change if you know what you\'re doing)', defaultValue: ':80ngenericdie_'});

var rollprice = 34;
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 maxRollsPerTip = 3;
var usingRares = cb.settings.last_prize_rare == 'Yes';
var minRollsForRare = parseInt(cb.settings.minimum_rolls);


var rareChance = 1;
// 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));

switch(cb.settings.rare_chance_mult) {
	case '1x':
		rareChance = 1;
		break;
	case '1/2x':
		rareChance = 0.5;
		break;
	case '3/4x':
		rareChance = 0.75;
		break;
	case '1.5x':
		rareChance = 1.5;
		break;
	case '2x':
		rareChance = 2;
		break;
	case '4x':
		rareChance = 4;
		break;
	case '8x':
		rareChance = 8;
		break;
	default:
		rareChance = 1;
		break;
}

var allow_mod_rolls = cb.settings.mod_rolls == 'Yes';
var cmdPrefix = cb.settings.cmd_prefix;
var diePrefix = cb.settings.die_img_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 && ((tipAmount <= (maxRollsPerTip*rollprice)) && (tipAmount % rollprice === 0))) {
		var rolls = Math.floor(tipAmount/rollprice);
		for(var i = 0; i < rolls; i++) {
			var username = "an anonymous user";
			if(!tip.is_anon_tip) {
				username = tip.from_user;
			}
			roll(username, true);
			lastRoller = username;
		}
	} else {

		// not rolling the dice
		// var textColor = '#17479F';
		// var bgColor = '#B3FC9F';
		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) {
	    cb.sendNotice(':minidie try your luck and Roll the Dice for 34tks :minidie', user['user'], '#307D00', '#FFFFFF', 'bold');
});


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 = "linear-gradient(to right, #C9FF63, #FFFFFF)";
			if(message[1] == 'all' && isPrivileged(msg))adBlurb();
			else adBlurb(msg.user);
			break;
		case cmdPrefix+'winners':
			msg["X-Spam"] = true;
			msg.background = "linear-gradient(to right, #C9FF63, #FFFFFF)";
			if(message[1] == 'all' && isPrivileged(msg))winnersBlurb();
			else winnersBlurb(msg.user);
			break;
		case cmdPrefix+'prizes':
			msg["X-Spam"] = true;
			msg.background = "linear-gradient(to right, #C9FF63, #FFFFFF)";
			if(message[1] == 'all' && isPrivileged(msg))prizesBlurb();
			else prizesBlurb(msg.user);
			break;
		case '!lol':
				msg["X-Spam"] = true;
				msg.background = "linear-gradient(to right, #C9FF63, #FFFFFF)";
				if(message[1] == 'all' && isPrivileged(msg))prizesBlurb();
				else prizesBlurb(msg.user);
				break;
		case cmdPrefix+'dicestats':
			msg["X-Spam"] = true;
			msg.background = "linear-gradient(to right, #C9FF63, #FFFFFF)";
			if(message[1] == 'all' && isPrivileged(msg))statsBlurb();
			else statsBlurb(msg.user);
			break;
		case cmdPrefix+'diceroll':
			if(msg.user == cb.room_slug || (allow_mod_rolls && isPrivileged(msg))) {
				msg["X-Spam"] = true;
				msg.background = "linear-gradient(to right, #FF8181, #FFFFFF)";
				cb.sendNotice('=====Free Dice Roll Activated=====', '', '#11FF00', '#FFFFFF', 'bolder');

				var times_to_roll = 1;
				if(message.length > 1) {
					times_to_roll = Math.min(parseInt(message[1]), maxRollsPerTip);
				}

				while(times_to_roll > 0) {
					roll(msg.user, false);
					--times_to_roll;
				}
			} else if(msg.is_mod === true && !allow_mod_rolls) {
				msg["X-Spam"] = true;
				msg.background = "linear-gradient(to right, #FFFFFF, #FF0000)";
				cb.sendNotice('Mods are currently not allowed to use /diceroll.\nThe setting "Allow mods to use the /diceroll command?" needs to be set to "Yes".', msg.user, '#FF0000', '#FFFFFF', 'bolder');
			}
			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 getRandomFloatInclusive(min, max) {
	return Math.random() * (max - min + 1) + min;
}

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

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

	if(count_towards_rare)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) && (getRandomFloatInclusive(0,100) <= rareChance)) {
		//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 = '#0A6FA8';
	var bgColor = 'linear-gradient(to right, #FFEC90, #FFFFFF)';

	if (winner) textColor = '#0A6FA8';
	if (total == prizeCount-1) {
		bgColor = '#F51668';
		textColor = '#CEE3FF';
	}

	cb.sendNotice(msg, send_roll_notice_to, 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 j = 0; j < prizeCount; j++) {
		stats.rollResultCounts[(j+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));
	cb.log(die[0].sides + " " + die[1].sides);

	// basically this is +2 because only using +1 for unequal dice odds consistently made the rare prize feel too close in likelyhood by default to just one of the least likely prizes
	rareChance *= equalOdds?100/(prizeCount*1.35):100/((die[0].sides+2)*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, '', '#0A6FA8', 'normal');
}

function prizesBlurb(username) {
	var msg = "No Prizes!! D:";
	if (prizes.length) {
		msg = "===== POSSIBLE DICE PRIZES =====";
		for (var i = 0; i < prizeCount; i++) {
			msg += "\nRoll " + (i+numberOfDie) + " - " + prizes[i];
		}
	}
	cb.sendNotice(msg, username, '', '#0A6FA8', 'normal');
}

function winnersBlurb(username) {
	var msg = "===== LAST 20 DICE 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, '', '', 'normal');
	} else {
		var recentWinners = stats.winners.slice(-21);
		for (var i = 0; i < recentWinners.length; i++) msg += "\n" + recentWinners[i];

		cb.sendNotice(msg, username, '', '#0A6FA8', 'normal');
	}
}

function adBlurb(username) {
	var msg = "";
		if(maxRollsPerTip>1) {
            msg += ":rolldice3456  \n";
            msg += "Tip [cb:tip amount=34 message=\"34\"] , [cb:tip amount=68 message=\"68\"]  or [cb:tip amount=102 message=\"102\"] Tokens to Roll The Dice.\n";
            msg += "There are " + prizes.length + " possible Prizes.\n";
		msg += "to see the Prize List type "+cmdPrefix+"prizes ";
		}
		
	cb.sendNotice(msg, username, '', '#0A6FA8', 'normal');
}

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

function init() {
	initPrizes();
	advertise();
	}

init();