Freesexcam - Free Sex Cam

lac-filter
Description Source Code Launch Bot Current Users
There are 25 other versions of this script.
/**
* lac-filter 0.9-r3
* Written by lactose_intolerant, 2014
*/
var util = new (function( ) {

	this.map = function( list, transform )
	{
		var result = [];
		for (var i = 0; i < list.length; ++i)
			result.push( transform( list[i] ) );
		return result;
	}

	var secondsInAMinute = 60;
	var secondsInAnHour = 60 * secondsInAMinute;

	var splitSeconds = function( seconds )
	{
		var hours = 0;
		var minutes = 0;
		if (seconds >= secondsInAnHour)
			hours = Math.floor( seconds / secondsInAnHour );
		seconds = seconds - hours * secondsInAnHour;
		if (seconds >= secondsInAMinute)
			minutes = Math.floor( seconds / secondsInAMinute );
		seconds = Math.floor( seconds - minutes * secondsInAMinute );
		return {
			'seconds' : seconds,
			'minutes' : minutes,
			'hours' : hours
			};
	}

	this.createReadableDuration = function( seconds )
	{
		parts = splitSeconds( seconds );
		var components = [];
		if (parts.hours > 0)
			components.push( parts.hours + ":" );
		components.push( parts.minutes + ":" );
		components.push( parts.seconds );
		return components.join( "" );
	}

	this.createReadableDuration2 = function( seconds )
	{
		parts = splitSeconds( seconds );
		var components = [];
		if (parts.hours > 0)
			components.push( parts.hours + " hours" );
		if (parts.minutes > 0)
			components.push( parts.minutes + " minutes" );
		if (components.length == 0 || parts.seconds > 0)
			components.push( parts.seconds + " seconds" );
		return components.join( ", " );
	}

	this.parseDurationString = function( str )
	{
		var match = /(?:(\d+)h)?\s*(?:(\d+)m)?\s*(?:(\d+)s)?/.exec( str );
		if (match == null)
			return null;
		if (match[1] == null && match[2] == null && match[3] == null)
			return null;
		var seconds = 0;
		if (match[1] != null)
			seconds += parseInt( match[1] ) * secondsInAnHour;
		if (match[2] != null)
			seconds += parseInt( match[2] ) * secondsInAMinute;
		if (match[3] != null)
			seconds += parseInt( match[3] );
		return seconds;
	}

	this.getTimeSinceEpochInSeconds = function( )
	{
		return (new Date( )).valueOf( ) / 1000.0;
	}

	this.mergeObjects = function( a, b )
	{
		var result = {};
		for (k in a)
			result[k] = a[k];
		for (k in b)
			result[k] = b[k];
		return result;
	}

	this.randomArrayItem = function( array )
	{
		var i = Math.floor( Math.random( ) * array.length );
		return array[i];
	}

})( );

var Events = function( names )
{
	var handlers = {};

	var init = function( )
	{
		for (var i = 0; i < names.length; ++i)
			handlers[names[i]] = [];
	}

	this.add = function( event, handler )
	{
		handlers[event].push( handler );
	}

	this.raise = function( event /*, *args */ )
	{
		var raiseArgs = Array.prototype.slice.call( arguments, 1 );
		var rval;
		for (var i = 0; i < handlers[event].length; ++i)
			rval = handlers[event][i].apply( null, raiseArgs );
		return rval;
	}

	init( );
};

var platform = new (function( ) {

	for (var k in cb)
		this[k] = cb[k];

	var _this = this;
	var events = new Events( ["onMessage", "onEnter", "onLeave", "onTip", "onDrawPanel"] );
	var isOnMockPlatform = !!cb.cbUsers;
	
	this.colors = { "fg" : "#000000", "bg" : "#FFFFFF" };
	this.users = {};

	var init = function( )
	{
		cb.onMessage( cbOnMessage );
		cb.onDrawPanel( cbOnDrawPanel );
		cb.onTip( cbOnTip );
		if (!isOnMockPlatform)
		{
			cb.onEnter( cbOnEnter );
			cb.onLeave( cbOnLeave );
		}
	}

	var addUser = function( cbUser )
	{
		_this.users[cbUser.user] = cbUser;
	}

	var removeUserByName = function( username )
	{
		delete _this.users[username];
	}

	this.isUserPresent = function( username )
	{
		return username in _this.users;
	}

	this.getUserByName = function( username )
	{
		return _this.users[username];
	}

	this.onMessage = function( handler )
	{
		events.add( "onMessage", handler );
	}

	this.onEnter = function( handler )
	{
		events.add( "onEnter", handler );
	}

	this.onLeave = function( handler )
	{
		events.add( "onLeave", handler );
	}

	this.onDrawPanel = function( handler )
	{
		events.add( "onDrawPanel", handler );
	}

	this.onTip = function( handler )
	{
		events.add( "onTip", handler );
	}

	this.fakeLeave = function( usernameOrObj )
	{
		var cbUser = usernameOrObj;
		if (typeof usernameOrObj == "string")
			cbUser = createFakeUserObj( usernameOrObj );
		cbOnLeave( cbUser );
	}

	this.fakeEnter = function( usernameOrObj )
	{
		var cbUser = usernameOrObj;
		if (typeof usernameOrObj == "string")
			cbUser = createFakeUserObj( usernameOrObj );
		cbOnEnter( cbUser );
	}

	this.setInterval = function( func, timeout )
	{
		cb.setTimeout(
			function( )
			{
				cb.setTimeout( arguments.callee, timeout );
				try
				{
					func( );
				}
				catch (e)
				{
					handleException( "onTimeout",  e );
				}
			}, timeout );
	}

	var createFakeUserObj = function( name )
	{
		return {
			"user" : name,
			"in_fanclub" : false,
			"has_tokens" : 0,
			"is_mod" : false,
			"tipped_recently" : false,
			"gender" : "m"
		};
	}

	var cbOnMessage = function( cbMsg )
	{
		try
		{
			var cbUser = util.mergeObjects( cbMsg, {} );
			delete cbUser.c;
			delete cbUser.m;
			delete cbUser.f;
			updateUser( cbUser );
			events.raise( "onMessage", cbMsg );
		}
		catch (e)
		{
			handleException( "onMessage", e );
		}
		return cbMsg;
	}

	var cbOnEnter = function( cbUser )
	{
		try
		{
			addUser( cbUser );
			events.raise( "onEnter", cbUser );
		}
		catch (e)
		{
			handleException( "onEnter", e );
		}
	}

	var cbOnLeave = function( cbUser )
	{
		try
		{
			removeUserByName( cbUser.user );
			events.raise( "onLeave", cbUser );
		}
		catch (e)
		{
			handleException( "onLeave", e );
		}
	}

	var cbOnTip = function( cbTip )
	{
		try
		{
			var cbUser = {
					"user" : cbTip.from_user,
					"in_fanclub" : cbTip.from_user_in_fanclub,
					"has_tokens" : cbTip.from_user_has_tokens,
					"is_mod" : cbTip.from_user_is_mod,
					"tipped_recently" : cbTip.from_user_tipped_recently,
					"gender" : cbTip.from_user_gender
				};
			updateUser( cbUser );
			events.raise( "onTip", cbTip );
		}
		catch (e)
		{
			handleException( "onTip", e );
		}
	}

	var updateUser = function( cbUser )
	{
		if (!_this.isUserPresent( cbUser.user ))
			_this.fakeEnter( cbUser );
		else
			addUser( cbUser );
	}

	var cbOnDrawPanel = function( )
	{
		try
		{
			return events.raise( "onDrawPanel" );
		}
		catch (e)
		{
			handleException( "onDrawPanel", e );
		}
	}

	this.announce = function( msg )
	{
		_this.chatNotice( msg, '', _this.colors.bg, _this.colors.fg, 'bold' );
	}

	this.notify = function( username, msg )
	{
		_this.chatNotice( msg, username, _this.colors.bg, _this.colors.fg, 'bold' );
	}

	handleException = function( eventName, e )
	{
		var msg = "<EXCEPTION>: \"" ;
		if ('message' in e)
			msg += e.message;
		else
			msg += e;
		msg += "\"";
		msg += " <EVENT>: " + eventName;
		if ('trace' in e)
			msg += " <TRACE>: " + e.stack;
		cb.log( msg );
	}

	init( );

})( );

var Substitution = function( regex, replacements )
{
	this.regex = regex;
	this.replacements = replacements;

	this.apply = function( text )
	{
		// HACK: poorly chosen substitutions can go in infinitely so only loop 25 times.
		for (var i = 0; i < 25; ++i)
		{
			if (!this.regex.test( text ))
				break;
			var repl = Array.isArray( this.replacements ) ?
				util.randomArrayItem( this.replacements ) : this.replacements;
			text = text.replace( this.regex, repl );
		}
		return text;
	}
}

var CommandParser = function( )
{
	var commands = [];

	var init = function( )
	{
		platform.onMessage( cbOnMessage );
	}

	this.register = function( key, handler, optModelOnly )
	{
		commands.push( { 'key' : key, 'model' : !!optModelOnly, 'handler' : handler } );
	}

	var cbOnMessage = function( cbMsg )
	{
		var key = getKey( cbMsg.m );
		var cmd = findCommand( cbMsg.user, key );
		if (!!cmd)
		{
			cbMsg['X-Spam'] = true;
			cmd.handler.apply( null, [cbMsg.user].concat( getCommandArgs( cbMsg.m ) ) );
		}
		return cbMsg;
	}

	var getKey = function( msg )
	{
		var m = /^\/(\S+)/.exec( msg );
		if (!!m)
			return m[1];
	}

	var findCommand = function( username, key )
	{
		for (var i = 0; i < commands.length; ++i)
		{
			var cmd = commands[i];
			if (cmd.key == key && (!cmd.model || username == platform.room_slug))
				return cmd;
		}
		return null;
	}

	var getCommandArgs = function( msg )
	{
		var m = /^\/\S+\s+(.*)/.exec( msg );
		if (!m)
			return [];
		return m[1].split( /\s+/ );
	}

	init( );
}

var UserTracker = function( )
{
	var _this = this;
	var events = new Events( ["onLeaderChange","onTipCredited"] );

	var userDatum = {};
	var tippers = {};
	var lastTick = util.getTimeSinceEpochInSeconds( );

	this.tipLeader = null;

	var init = function( )
	{
		platform.onTip( onTip );
		platform.onMessage( onMessage );
		platform.setInterval( onTick, 30000 );
	}

	var onTick = function( )
	{
		var t = util.getTimeSinceEpochInSeconds( );
		var dt = t - lastTick;
		lastTick = t;
		for (user in userDatum)
		{
			var data = userDatum[user];
			if (platform.isUserPresent( user ))
				data.timeSpent += dt;
		}
	}

	this.getUserData = function( name )
	{
		if (!(name in userDatum))
			userDatum[name] = createEmptyUserData( name );
		return userDatum[name];
	}

	var onMessage = function( cbMsg )
	{
		_this.getUserData( cbMsg.user ).chatCount++;
	}

	var onTip = function( cbTip )
	{
		var tipAmount = parseInt( cbTip.amount );
		_this.creditTip( tipAmount, cbTip.from_user );
	}

	this.creditTip = function( amount, user )
	{
		var data = this.getUserData( user );
		tippers[user] = data;
		var prevTips = data.tips;
		data.tips += amount;
		events.raise( "onTipCredited", user, data.tips, prevTips );
		evaluateTipLeader( );
	}

	var createEmptyUserData = function( user )
	{
		return {
			"name" : user,
			"chatCount" : 0,
			"tips" : 0,
			"timeSpent" : 0
		};
	}

	var evaluateTipLeader = function( )
	{
		var leader = null;
		var leaderTips = 0;
		for (var user in tippers)
		{
			var data = tippers[user];
			if (leader == null || data.tips > leaderTips)
			{
				leader = data.name;
				leaderTips = data.tips;
			}
		}
		if (_this.tipLeader != leader)
		{
			_this.tipLeader = leader;
			events.raise( "onLeaderChange", leader );
		}
	}

	this.onLeaderChange = function( handler )
	{
		events.add( "onLeaderChange", handler );
	}

	this.onTipCredited = function( handler )
	{
		events.add( "onTipCredited", handler );
	}

	init( );
}

var main = function( ) {

	var FAVE_ENTRY_THRESHOLD_TIME = 10 * 60;
	var LOYALTY_THRESHOLD_TIME = 30 * 60;
	var CHATTY_THRESHOLD_COUNT = 35;
	var TIERS = [ 25, 75, 150, 300, 450, 600 ];
	var TIER_REWARDS = [ ":room_lac_1_star", ":room_lac_2_star", ":room_lac_3_star", ":room_lac_red_star", ":room_lac_diamond", ":room_lac_cthulhu_2" ];

	var commandParser = new CommandParser( );
	var subs = [
		new Substitution( /:(?!milk|lac)[^ :]+/i, [":guy_fieri_1",":guy_fieri_2",":guy_fieri_3",":guy_fieri_4", ":guy_fieri_5", ":guy_fieri_6", ":guy_fieri_7", ":guy_fieri_8"] ),
		//new Substitution( /:(?!milk|lac)[^ :]+/i, [":lacstupid1",":lacstupid2",":lacstupid3",":lacstupid4"] ),
		new Substitution( /\b(?:[lr]a[uw]rence|larry)\b/i, "Voldemort" ),
		new Substitution( /\bforman\b/i, "Obama" ),
		new Substitution( /\bidina(?:\s+menzel)?\b/i, "Adele Dazim" ),
		new Substitution( /\b(fag|fag+[oie]t|gay+|que+r+|homo)\b/i, "fabulous" ),
		new Substitution( /\b(?:see(?:\s+on|\s+in)?|go(?:\s+to|\s+in)?|watch(?:\s+on|\s+in)?|view|look(?:\s+at)?|check(?:\s+out)?|click(?:\s+on)?)\s+(?:my|me|our)\s+(?:cam|profile|webcam|room)\b/i, "worship Oprah" )
		];
	var totalTips = 0;
	var timeStarted = util.getTimeSinceEpochInSeconds( );
	var mutedUsers = { "prisonpocket" : true };
	var faves = {};
	var blessed = {};
	var userTracker;

	var init = function( )
	{
		userTracker = new UserTracker( );
		loadFavorites( );
		platform.colors.fg = "#FF8000";
		platform.colors.bg = "#FFFFFF";
		commandParser.register( "roll", onRollCommand, false );
		commandParser.register( "star", onStarCommand, true );
		commandParser.register( "bless", onBlessCommand, true );
		commandParser.register( "fave", onFaveCommand, true );
		platform.onMessage( onMessage );
		platform.onTip( onTip );
		platform.onEnter( onEnter );
		platform.onLeave( onLeave );
		userTracker.onTipCredited( onTipCredited );
	}

	var loadFavorites = function( )
	{
		var favesList = platform.settings.faves.split( " " );
		for (var i = 0; i < favesList.length; ++i)
			faves[favesList[i]] = { "lastSeen" : 0 };
	}

	var onEnter = function( cbUser )
	{
		if (cbUser.user in faves)
		{
			var time = util.getTimeSinceEpochInSeconds( );
			var fave = faves[cbUser.user];
			if (time - fave.lastSeen >= FAVE_ENTRY_THRESHOLD_TIME)
				platform.announce( "OMG " + cbUser.user + " is finally here! Everyone say hello!" );
			fave.lastSeen = time;
		}
	}

	var onLeave = function( cbUser )
	{
		if (cbUser.user in faves)
		{
			var fave = faves[cbUser.user];
			fave.lastSeen = util.getTimeSinceEpochInSeconds( );
		}
	}

	var onStarCommand = function( fromUser, user )
	{
		var data = userTracker.getUserData( user );
		var tier = getTipTier( data.tips );
		if (tier + 1 >= TIERS.length)
			return;
		userTracker.creditTip( user, TIERS[tier+1] - data.tips );
	}

	var onBlessCommand = function( fromUser, user )
	{
		if (user in blessed)
		{
			delete blessed[user];
			platform.notify( fromUser, user + " has been unblessed." );
		}
		else
		{
			blessed[user] = true;
			platform.notify( fromUser, user + " has been blessed." );
		}
	}

	var onFaveCommand = function( fromUser, user )
	{
		if (user in faves)
		{
			delete faves[user];
			platform.notify( fromUser, user + " has been unfavorited." );
		}
		else
		{
			faves[user] = true;
			platform.notify( fromUser, user + " has been favorited." );
		}
	}

	var getTipTier = function( tips )
	{
		for (var i = 0; i < TIERS.length; ++i)
		{
			var tier = TIERS.length-i-1;
			if (tips >= TIERS[tier])
				return tier;
		}
		return -1;
	}

	var onMessage = function( cbMsg )
	{
		if (cbMsg.user in mutedUsers)
			cbMsg['X-Spam'] = true;
		else
		{
			if (cbMsg.user != platform.room_slug)
			{
				if (!(cbMsg.user in faves))
					cbMsg.m = applySubs( cbMsg.m );
				cbMsg.m = decorateMessage( cbMsg.user, cbMsg.m );
			}
		}
		return cbMsg;
	}

	var decorateMessage = function( user, msg )
	{
		var userData = userTracker.getUserData( user );
		var tier = getTipTier( userData.tips );
		if (tier != -1)
			msg = msg + " " + TIER_REWARDS[tier]; // surroundWithEmoticon( msg, TIER_REWARDS[tier] );
		if (user in blessed)
			msg = msg + " :room_lac_plug";
		if (user in faves)
			msg = msg + " :room_lac_fave";
		if (userData.timeSpent >= LOYALTY_THRESHOLD_TIME)
			msg = msg + " :room_lac_patient";
		if (userData.chatCount >= CHATTY_THRESHOLD_COUNT)
			msg = msg + " :room_lac_chatty";
		if (user == userTracker.tipLeader)
			msg = msg + " :room_lac_leader";
		return msg;
	}

	var surroundWithEmoticon = function( msg, emote )
	{
		return emote + " " + msg + " " + emote;
	}

	var onTip = function( cbTip )
	{
		var tipAmount = parseInt( cbTip.amount );
		totalTips += tipAmount;
		platform.notify( platform.room_slug, "You've earned $" + getDollarsEarned( ) + " in "
			+ util.createReadableDuration2( getShowLength( ) ) + ", averaging $" +
			getDollarsPerHour( ) + " per hour." );
	}

	var onTipCredited = function( user, tips, prevTips )
	{
		var prevTier = getTipTier( prevTips );
		var tier = getTipTier( tips );
		if (prevTier < tier)
			announceTipperAchievement( user, tier );
	}

	var announceTipperAchievement = function( user, tier )
	{
		switch (tier)
		{
			case 5:
				platform.announce( "Uhh, that isn't " + user + "; that's Cthulhu. We're officially fucked." );
				break;
			case 4:
				platform.announce( "The earth trembles. From the darkest depths awakes something older " +
					"and far more terrible than any living god. " + user + " has earned a diamond. " +
					"We are all doomed." );
				break;
			case 3:
				platform.announce( user + " has earned a ruby star! He has become a living god." );
				break;
			case 2:
				platform.announce( user + " has earned 3 stars! He poops gold." );
				break;
			case 1:
				platform.announce( user + " has earned 2 stars! He now refers to the rest of you as \"peasants.\"" );
				break;
			case 0:
				platform.announce( user + " has earned 1 star! He oozes sex appeal." );
				break;
			default:
				break;
		}
	}

	var getShowLength = function( )
	{
		return util.getTimeSinceEpochInSeconds( ) - timeStarted;
	}

	var getDollarsPerHour = function( )
	{
		var showLength = getShowLength( );
		return (getDollarsEarned( ) / (showLength / 3600)).toFixed( 2 );
	}

	var getDollarsEarned = function( )
	{
		return totalTips * 0.05;
	}

	var applySubs = function( text )
	{
		for (var i = 0; i < subs.length; ++i)
		{
			var sub = subs[i];
			text = sub.apply( text );
		}
		return text;
	}

	var onRollCommand = function( user, dice, optDescription )
	{
		var match = /^(\d+)d(\d+)/i.exec( dice );
		if (match)
		{
			if (arguments.length > 2)
				optDescription = Array.prototype.slice.call( arguments, 2 ).join( " " );
			var numDice = parseInt( match[1] );
			var numSides = parseInt( match[2] );
			doRoll( user, numDice, numSides, optDescription );
			return;
		}
		platform.notify( user,
			"Usage: /roll NdM {description} (e.g., \"/roll 1d20 cast magic missile\")" );
	}

	var doRoll = function( user, numDice, numSides, description )
	{
		var result = getRollResult( numDice, numSides );
		if (description)
			platform.announce( user + " rolled " + numDice + "d" + numSides
				+ " for \"" + description + "\" and got " + result + "." );
		else
			platform.announce( user + " rolled " + numDice + "d" + numSides
				+ " and got " + result + "." );
	}

	var getRollResult = function( numDice, numSides )
	{
		numDice = Math.min( 10, numDice );
		var r = 0;
		for (var i = 0; i < numDice; ++i)
			r += Math.floor( Math.random( ) * numSides ) + 1;
		return r;
	}

	init( );
};

var initSettings = function( )
{
	cb.settings_choices = [
			{
				"name" : "faves",
				"label" : "Faves",
				"type" : "str",
				"required" : false,
				"defaultValue" : "",
			}
		];
};

new (function( ) {
	if (Object.keys( cb.settings ).length > 0)
		main( );
	else
		initSettings( );
})( );