Freesexcam - Free Sex Cam

Apps Home | Create an App
lactoken-wip
Author: lactose_intolerant
You are viewing version 81664. There is a newer version of this app. See the latest version of this app.

Description Source Code Launch App Current Users
There are 17 other versions of this script.
/** Version 0.1 */

var msgTemplates = 
	{
		"dice_roll" : "%user rolled %dice for %description and got %result.",
		"dice_roll_no_description" : "%user rolled %dice and got %result.",
		"polls_open" : "Voting has begun for %poll_description. To vote anonymously, use the /vote command. Voters of higher tip rank will be counted extra.",
		"polls_closed" : "Polls are closed!",
		"vote_cast" : "Your vote has been cast.",
		"vote_already_cast" : "You already voted!",
		"total_tips" : "Total tips: %total_tips",
		"new_leader" : "%leader has edged out %old_leader by %difference tokens and is crowned the new %{pimp|pimptress}. All shall love %{him|her} and despair.",
		"first_leader" : "%leader has secured both crown and cane. May %{his|her} leadership guide us into the dawning of a prosperous new age!",
		"goal_progress" : "",
		"goal_met" : "Uh oh, spaghettiOs. Goal met.",
		"goal_set" : "Goal set to %goal_desc @ %goal_amount.",
		"goal_cleared" : "Goal cleared.",
		"goal_reset" : "Goal reset. %goal_desc @ %goal_amount.",
		"goal_moved" : "Goal has been adjusted to %goal_desc @ %goal_amount.",
		"show_starting_extendable" : "Beginning show in %show_warmup_time. Tip by multiples of %show_tokens_per_second to extend the show by that many seconds.",
		"show_starting" : "Beginning show in %show_warmup_time.",
		"show_started" : "Here we go!",
		"show_extended" : "Show has been extended for %time_added by %tipper.",
		"show_ended" : "Show's over!",
		"panel_leader" : "Lactose's %{Pimp|Pimptress}: %leader (%leader_tips)",
		"panel_progress" : "Tips / Goal: %goal_progress / %goal_amount",
		"panel_description" : "Next: %goal_desc",
		"panel_timer" : "Time left: %show_time_left / %show_length",
		"panel_poll" : "Votes Received: %ballot_count",
		"room_title" : "%goal_needed more until %goal_desc",
		"room_title_goal_met" : "Goal met!",
		"room_title_show_started" : "Tip to keep the show going!",
		"model_goal_met" : "You have received enough tips for \"%goal_desc\". Use the /show command to start your show.",
		"model_show_starting" : "In %show_warmup_time seconds your show timer will begin ticking down. You can cancel the show early with the command /show stop",
		"model_show_started" : "Go!",
		"model_show_ended" : "Your show has ended and the goal has been cleared.",
		"model_poll_results" : "Poll summary: %poll_results"
	};

var PanelTemplateBuilder = function( )
{
	var rows = [];

	this.addRow = function( content )
	{
		rows.push( content );
	}

	this.build = function( )
	{
		var template = {
			'template' : '3_rows_11_21_31',
			'row1_value' : getRowContent( 0 ),
			'row2_value' : getRowContent( 1 ),
			'row3_value' : getRowContent( 2 )
		}
		return template;
	}

	var getRowContent = function( index )
	{
		if (rows.length <= index)
			return "";
		return rows[index];
	}
}

var Panel = function( stringFormatter )
{
	var showLength = 0;
	var showTimeLeft = 0;
	var goalDescription = "";
	var goalAmount = 0;
	var tipsTowardsGoal = 0;
	var totalTips = 0;
	var leader = null;
	var pollsOpen = false;
	var ballotCount = 0;
	var dirty = true;
	
	var init = function( )
	{
		platform.setInterval( refreshPanel, 1000 );
		platform.onDrawPanel( cbOnDrawPanel );
	}

	var refreshPanel = function( )
	{
		if (dirty)
		{
			platform.drawPanel( );
			dirty = false;
		}
	}

	var markDirty = function( )
	{
		dirty = true;
	}

	this.setPollsOpen = function( open )
	{
		pollsOpen = open;
		markDirty( );
	}

	this.setBallotCount = function( count )
	{
		ballotCount = count;
		markDirty( );
	}

	this.updateShow = function( length, timeLeft )
	{
		showLength = length;
		showTimeLeft = timeLeft;
		markDirty( );
	}

	this.endShow = function( )
	{
		showLength = showTimeLeft = 0;
		markDirty( );
	}

	this.updateGoal = function( description, amount, tipsReceived )
	{
		goalDescription = description;
		goalAmount = amount;
		tipsTowardsGoal = tipsReceived;
		markDirty( );
	}

	this.clearGoal = function( )
	{
		goalDescription = "";
		goalAmount = 0;
		tipsTowardsGoal = 0;
		markDirty( );
	}

	this.setTipLeader = function( tipper )
	{
		leader = tipper;
		markDirty( );
	}

	this.setTotalTips = function( total )
	{
		totalTips = total;
		markDirty( );
	}
	
	var cbOnDrawPanel = function( cbUser )
	{
		var builder = new PanelTemplateBuilder( );

		if (isShowGoingOn( ))
			builder.addRow( createShowTimerContent( ) );
		else if (isThereAGoal( ))
			builder.addRow( createGoalProgressContent( ) );

		if (pollsOpen)
			builder.addRow( createPollContent( ) );
		else if (goalDescription.length > 0)
			builder.addRow( createGoalDescriptionContent( ) );

		if (leader)
			builder.addRow( createLeaderContent( ) );

		return builder.build( );
	}

	var isShowGoingOn = function( )
	{
		return showTimeLeft > 0;
	}

	var isThereAGoal = function( )
	{
		return goalAmount > 0;
	}

	var createString = function( template )
	{
		var params = createFormatterParams( );
		return stringFormatter.createString( template, params );
	}

	var createFormatterParams = function( )
	{
		return {
			"show_time_left" : util.createReadableDuration( showTimeLeft ),
			"show_length" : util.createReadableDuration( showLength ),
			"goal_desc" : goalDescription,
			"goal_progress" : tipsTowardsGoal,
			"goal_amount" : goalAmount,
			"total_tips" : totalTips,
			"leader" : leader ? leader.username : "MISSINGNO.",
			"leader_tips" : leader ? leader.totalTips : 0,
			"ballot_count" : ballotCount,
			"gender" : leader ? leader.gender : "f"
		};
	}
	
	var createShowTimerContent = function( )
	{
		return createString( "panel_timer" ); 
	}

	var createGoalDescriptionContent = function( )
	{
		return createString( "panel_description" );
	}

	var createGoalProgressContent = function( )
	{
		return createString( "panel_progress" );
	}

	var createLeaderContent = function( )
	{
		return createString( "panel_leader" );
	}

	var createPollContent = function( )
	{
		return createString( "panel_poll" );
	}

	init( );
}

var StringFormatter = function( commonParamsFactory )
{
	this.createString = function( templateName, opt_params )
	{
		var fmt = msgTemplates[templateName];
		if (typeof opt_params == "undefined")
			opt_params = {};
		var params = util.mergeObjects( commonParamsFactory( ), opt_params );
		var gender = 'f';
		if ("gender" in params)
		{
			gender = params["gender"];
			delete params["gender"];
		}
		fmt = formatString( fmt, params );
		return formatGenderChoices( fmt, gender );
	}

	var formatString = function( fmt, params )
	{
		for (kw in params)
		{
			var re = new RegExp( '%' + kw + '\\b', 'g' );
			fmt = fmt.replace( re, params[kw] );
		}
		return fmt;
	}

	var formatGenderChoices = function( fmt, gender )
	{
		var re = /%\{([^}]+)\|([^}]+)\}/;
		while (true)
		{
			if (fmt.match( re ) == null)
				break;
			fmt = fmt.replace( re, gender == 'm' ? "$1" : "$2" );
		}
		return fmt;
	}
}

var Goal = function( amount, description )
{
	var _this = this;

	this.amount = amount;
	this.description = description;
	this.received = 0;
	this.wasMet = false;

	this.met = function( )
	{
		return _this.received >= _this.amount;
	}
}

var CommandInterpreter = function( )
{
	var events = new Events( [ "onCommandError", "onGoalResetCommand", 
		"onGoalClearCommand", "onGoalMoveCommand", "onGoalSetCommand", "onShowCommand", 
		"onShowCancelCommand", "onTotalCommand", "onVoteStartCommand", 
		"onVoteStopCommand", "onUserVoteCommand", "onUserTippersCommand",
		"onUserRollCommand" ] );
	var model = platform.room_slug;

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

	this.subscribe = function( event, handler )
	{
		events.add( event, handler );
	}

	var cbOnMessage = function( cbMessage )
	{
		if (processMessage( cbMessage.user, cbMessage.m ))
			cbMessage['X-Spam'] = true;
	}

	var processMessage = function( username, msg )
	{
		if (msg.indexOf( "/" ) == 0)
		{
			msg = msg.substr( 1 );
			if (username == model)
				return processModelCommand( msg );
			else
				return processUserCommand( username, msg );
		}
	}

	var processModelCommand = function( msg )
	{
		var cmd = getCommandAndPayload( msg );
		if (cmd == null)
			return false;
		switch (cmd.cmd)
		{
			case "show":
				processShowCommand( cmd.payload );
				return true;
			case "goal":
				processGoalCommand( cmd.payload );
				return true;
			case "total":
				processTotalCommand( cmd.payload );
				return true;
			case "tippers":
				processTippersCommand( cmd.payload );
				return true;
			case "vote":
				processVoteCommand( cmd.payload );
				return true;
			case "roll":
				processUserRollCommand( model, cmd.payload );
				return false;
			default:
				return false;
		}
	}

	var processUserCommand = function( username, msg )
	{
		var cmd = getCommandAndPayload( msg );
		if (cmd == null)
			return false;
		switch (cmd.cmd)
		{
			case "tippers":
				processUserTippersCommand( username, cmd.payload );
				return true;
			case "vote":
				processUserVoteCommand( username, cmd.payload );
				return true;
			case "roll":
				processUserRollCommand( username, cmd.payload );
				return false;
			default:
				return false;
		}
	}

	var getCommandAndPayload = function( msg )
	{
		var match = /^(\S+)(?:\s+(\S.*))?/.exec( msg );
		if (match == null)
			return null;
		return { 'cmd' : match[1], 'payload' : typeof match[2] == "string" ? match[2] : "" };
	}

	var processUserRollCommand = function( username, payload )
	{
		var match = /^(\d+)d(\d+)(?:\s+(\S.*))?/i.exec( payload );
		if (match)
		{
			var numDice = parseInt( match[1] );
			var numSides = parseInt( match[2] );
			var description = match[3] ? match[3] : "";
			events.raise( "onUserRollCommand", username, numDice, numSides, description );
			return;
		}
		events.raise( "onCommandError", username,
			"Usage: /roll NdM {description} (e.g., \"/roll 1d20 cast magic missile\")" );
	}

	var processTotalCommand = function( payload )
	{
		events.raise( "onTotalCommand" );	
	}

	var processTippersCommand = function( payload )
	{
		processUserTippersCommand( model, payload );
	}

	var processUserTippersCommand = function( username, payload )
	{
		events.raise( "onUserTippersCommand", username );
	}

	var processVoteCommand = function( payload )
	{
		var match = /^start(?:\s+(\S.*))?/.exec( payload );
		if (match)
		{
			events.raise( "onVoteStartCommand", match[1] ? match[1] : "" );
			return;
		}
		match = /^stop\b/.exec( payload );
		if (match)
		{
			events.raise( "onVoteStopCommand" );
			return;
		}
		events.raise( "onCommandError", model,
			"Usage: /vote start {description}, /vote stop" );
	}

	var processUserVoteCommand = function( username, payload )
	{
		if (payload.length > 0)
		{
			events.raise( "onUserVoteCommand", username, payload );
			return;
		}
		events.raise( "onCommandError", username, "Usage: /vote \"something\"" );
	}

	var processGoalCommand = function( payload )
	{
		var match = /^(\d+)(?:\s+(\S.*))?/.exec( payload );
		if (match)
		{
			events.raise( "onGoalSetCommand", parseInt( match[1] ), match[2] ? match[2] : "" );
			return;
		}
		match = /^reset\b/.exec( payload );
		if (match)
		{
			events.raise( "onGoalResetCommand" );
			return;
		}
		match = /^clear\b/.exec( payload );
		if (match)
		{
			events.raise( "onGoalClearCommand" );
			return;
		}
		match = /^move\s+(\d+)(?:\s+(\S.*))?/.exec( payload );
		if (match)
		{
			events.raise( "onGoalMoveCommand", parseInt( match[1] ), match[2] );
			return;
		}
		events.raise( "onCommandError", model,
			"Usage: /goal tokens {description}, /goal reset, /goal clear, /goal move tokens {description}" );
	}

	var processShowCommand = function( payload )
	{
		var match = /^(?:cancel|stop)/.exec( payload );
		if (match)
		{
			events.raise( "onShowCancelCommand" );
			return;
		}
		match = /^(\S+)(?:\s+(\S+))?/.exec( payload );
		if (match)
		{
			events.raise( "onShowCommand", util.parseDurationString( match[1] ),
				match[2] ? parseInt( match[2] ) : 0, 5 );
			return;
		}
		events.raise( "onCommandError", model,
			"Usage: /show length {value}, /show stop" );
	}

	init( );
}

var ChatFilter = function( )
{
	var _this = this;
	var tipLeaderColor = "#0000FF";
	var tipLeaderBackground = "#FFFFFF";

	this.tipLeader = null;

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

	var cbOnMessage = function( cbMsg )
	{
		if (_this.tipLeader && cbMsg.user == _this.tipLeader)
			decorateTipLeaderMessage( cbMsg );
	}

	var decorateTipLeaderMessage = function( cbMsg )
	{
		cbMsg['background'] = tipLeaderBackground;
		cbMsg['c'] = tipLeaderColor;
	}

	init( );
}

var Show = function( )
{
	var _this = this;
	var lastTickTime = util.getTimeSinceEpochInSeconds( );
	var events = new Events( [ "onShowStart", "onShowTick", "onShowEnd" ] );
	var running = false;
	var timeLeft = 0;
	var length = 0;
	
	var init = function( )
	{
		platform.setInterval( onTick, 1000 );
	}

	this.subscribe = function( event, handler )
	{
		events.add( event, handler );
	}

	this.stop = function( )
	{
		if (running)
		{
			timeLeft = 0;
			running = false;
			events.raise( "onShowEnd" );
		}
	}

	this.init = function( showLength )
	{
		if (running)
			this.stop( );
		timeLeft = length = showLength;
	}

	this.start = function( )
	{
		if (!running)
		{
			running = true;
			lastTickTime = util.getTimeSinceEpochInSeconds( );
			events.raise( "onShowStart" );
		}
	}

	this.isRunning = function( )
	{
		return running;
	}

	this.hasTimeLeft = function( )
	{
		return timeLeft > 0;
	}

	this.getTimeLeft = function( )
	{
		return timeLeft;
	}

	this.getLength = function( )
	{
		return length;
	}

	this.extend = function( seconds )
	{
		timeLeft += seconds;
	}
	
	var onTick = function( )
	{
		var t = util.getTimeSinceEpochInSeconds( );
		var dt = t - lastTickTime;
		lastTickTime = t;
		if (running)
		{
			timeLeft = Math.max( 0, timeLeft - dt );
			if (timeLeft == 0)
				_this.stop( );
			else
				events.raise( "onShowTick" );
		}
	}

	init( );
}

var TipRankings = function( users )
{
	var _this = this;
	var handlers = new Events( [ 'onTipLeaderOvertaken', 'onTipLeaderChange', 'onTip',
		'onTipperLeave', 'onTipperEnter' ] );
	var tippers = [];

	this.totalTips = 0;
	this.leaderMustBePresent = true;
	this.leader = null;

	var init = function( )
	{
		platform.onTip( cbOnTip );
		platform.onEnter( cbOnEnter );
		platform.onLeave( cbOnLeave );
	}
	
	var cbOnEnter = function( cbUser )
	{
		var tipper = _this.findTipper( cbUser.user );
		if (tipper != null && !tipper.isPresent)
		{
			tipper.isPresent = true;
			handlers.raise( 'onTipperEnter', tipper );
			updateRankings( );
		}
	}

	this.findTipper = function( username )
	{
		for (var i = 0; i < tippers.length; ++i)
		{
			var tipper = tippers[i];
			if (tipper.username == username)
				return tipper;
		}
		return null;
	}

	var createNewUser = function( username, opt_gender )
	{
		var user = new User( username, opt_gender == undefined ? "m" : opt_gender );
		users.push( user );
		return user;
	}

	var cbOnLeave = function( cbUser )
	{
		var tipper = _this.findTipper( cbUser.user );
		if (tipper != null && tipper.isPresent)
		{
			tipper.isPresent = false;
			tipper.leftAt = util.getTimeSinceEpochInSeconds( ); 
			handlers.raise( 'onTipperLeave', tipper );
			updateRankings( );
		}
	}

	var cbOnTip = function( cbTip )
	{
		var tipper = createTipper( cbTip.from_user, cbTip.from_user_gender );
		tipper.lastTipTime = util.getTimeSinceEpochInSeconds( );
		var amount = parseInt( cbTip.amount );
		tipper.totalTips += amount;
		_this.totalTips += amount;
		var oldLeader = _this.leader;
		updateRankings( );
		if (_this.leader && oldLeader !== _this.leader && 
			_this.leader.username == cbTip.from_user)
				handlers.raise( "onTipLeaderOvertaken", _this.leader, oldLeader );
		handlers.raise( 'onTip', tipper, amount );
	}

	var createTipper = function( username, gender )
	{
		var tipper = _this.findTipper( username );
		if (tipper != null)
			return tipper;
		tipper = new Tipper( username, gender );
		tippers.push( tipper );
		return tipper;
	}

	var updateRankings = function( )
	{
		var oldLeader = _this.leader;
		_this.leader = findNewLeader( );
		if (oldLeader !== _this.leader)
			handlers.raise( "onTipLeaderChange", _this.leader );
	}

	var findNewLeader = function( )
	{
		if (tippers.length == 0)
			return null;
		var currentLeader = null;
		for (var i = 0; i < tippers.length; ++i)
		{
			var tipper = tippers[i];
			if (tipper.isPresent || !_this.leaderMustBePresent)
			{
				if (currentLeader == null)
					currentLeader = tipper;
				else
				{
					var d = tipper.totalTips - currentLeader.totalTips;
					if (d > 0 || (d == 0 && tipper.lastTipTime < currentLeader.lastTipTime))
						currentLeader = tipper;
				}
			}
		}
		return currentLeader;
	}

	this.subscribe = function( event, handler )
	{
		handlers.add( event, handler );
	}

	this.getRankedTippers = function( )
	{
		var top = tippers.slice( 0 );
		top.sort( 
			function( a, b )
			{
				if (_this.leaderMustBePresent)
				{
					if (!a.isPresent)
						return 1;
					if (!b.isPresent)
						return -1;
				}
				var d = b.totalTips - a.totalTips;
				if (d != 0)
					return d;
				return a.lastTipTime - b.lastTipTime;
			} );
		return top;
	}

	init( );
}

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 Tipper = function( username, gender )
{
	this.username = username;
	this.totalTips = 0;
	this.gender = gender;
	this.firstSeen = util.getTimeSinceEpochInSeconds( );
	this.isPresent = true;
	this.leftAt = 0;
	this.lastTipTime = 0;
}

var Polls = function( )
{
	var open = false;
	var description = "";
	var ballots = [];
	var voters = [];
	var events = new Events( ["onPollsOpen", "onPollsClosed", "onVoteCast", "onVoteDuplicate" ] );

	var init = function( )
	{
	}

	this.subscribe = function( event, handler )
	{
		events.add( event, handler );
	}

	this.isOpen = function( )
	{
		return open;
	}

	this.getDescription = function( )
	{
		return description;
	}

	this.start = function( _description )
	{
		open = true;
		description = _description;
		ballots = [];
		voters = [];
		events.raise( "onPollsOpen" );
	}

	this.stop = function( )
	{
		open = false;
		events.raise( "onPollsClosed" );
	}

	this.castBallot = function( username, description, count )
	{
		if (hasVoted( username ))
		{
			events.raise( "onVoteDuplicate", username );
			return;
		}
		voters.push( username );
		var ballot = getBallot( description );
		ballot.count += count;
		events.raise( "onVoteCast", username );
	}

	var hasVoted = function( username )
	{
		for (var i = 0; i < voters.length; ++i)
		{
			if (voters[i] == username)
				return true;
		}
		return false;
	}

	var getBallot = function( description )
	{
		for (var i = 0; i < ballots.length; ++i)
		{
			var ballot = ballots[i];
			if (descriptionsMatch( ballot.description, description ))
				return ballot;
		}
		var ballot = { 'description' : description, 'count' : 0 };
		ballots.push( ballot );
		return ballot;
	}

	var descriptionsMatch = function( a, b )
	{
		var re = /[ ,+!.?&"'-]/ig;
		var repl = "";
		a = a.toLocaleLowerCase( ).replace( re, repl );
		b = b.toLocaleLowerCase( ).replace( re, repl );
		return a == b;
	}

	this.getSummary = function( )
	{
		var sorted = ballots.slice( 0 );
		sorted.sort( 
			function( a, b )
			{
				return b.count - a.count;
			} );
		var items = [];
		for (var i = 0; i < sorted.length; ++i)
			items[i] = sorted[i].description + " (" + Math.ceil( sorted[i].count ) + ")";
		return items.slice( 0, 25 ).join( ", " );
	}

	this.getBallotCount = function( )
	{
		var count = 0;
		for (var i = 0; i < ballots.length; ++i)
			count += Math.ceil( ballots[i].count );
		return count;
	}
	
	init( );
}

var util = new (function( ) {

	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;
	}
})( );

var platform = new (function( )
{
	var events = new Events( ["onMessage", "onEnter", "onLeave", "onTip", "onDrawPanel"] );
	var isOnMockPlatform = !!cb.cbUsers;
	
	var init = function( )
	{
		cb.onMessage( cbOnMessage );
		cb.onDrawPanel( cbOnDrawPanel );
		cb.onTip( cbOnTip );
		if (!isOnMockPlatform)
		{
			cb.onEnter( cbOnEnter );
			cb.onLeave( cbOnLeave );
		}
	}
	
	this.room_slug = cb.room_slug;

	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 );
		events.raise( "onLeave", cbUser );
	}

	this.fakeEnter = function( usernameOrObj )
	{
		var cbUser = usernameOrObj;
		if (typeof usernameOrObj == "string")
			cbUser = createFakeUserObj( usernameOrObj );
		events.raise( "onEnter", cbUser );

	}

	this.drawPanel = function( )
	{
		cb.drawPanel( );
	}

	this.chatNotice = function( msg, to, fore, back, bold )
	{
		cb.chatNotice( msg, to, fore, back, bold );
	}

	this.changeRoomSubject = function( subj )
	{
		//cb.changeRoomSubject( subj );
	}

	this.setTimeout = function( func, timeout )
	{
		cb.setTimeout( func, timeout );
	}

	this.setInterval = function( func, timeout )
	{
		cb.setTimeout( 
			function( )
			{
				cb.setTimeout( arguments.callee, timeout );
				func( );
			}, 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 )
	{
		events.raise( "onMessage", cbMsg );
		return cbMsg;
	}

	var cbOnEnter = function( cbUser )
	{
		events.raise( "onEnter", cbUser );
	}

	var cbOnLeave = function( cbUser )
	{
		events.raise( "onLeave", cbUser );
	}

	var cbOnTip = function( cbTip )
	{
		events.raise( "onTip", cbTip );
	}

	var cbOnDrawPanel = function( cbUser )
	{
		return events.raise( "onDrawPanel", cbUser );
	}

	init( );
})( );

(function( ) {
	var formatter;
	var tipRankings;
	var commandInterpreter;
	var chatFilter;
	var panel;
	var show;
	var goal = null;
	var showValue = 0;
	var model = platform.room_slug;
	
	var init = function( )
	{
		formatter = new StringFormatter( createCommonStringFormatParams );
		tipRankings = new TipRankings( );
		commandInterpreter = new CommandInterpreter( );
		chatFilter = new ChatFilter( );
		panel = new Panel( formatter );
		show = new Show( );
		polls = new Polls( );
		tipRankings.subscribe( "onTipLeaderChange", onTipLeaderChange );
		tipRankings.subscribe( "onTipLeaderOvertaken", onTipLeaderOvertaken );
		tipRankings.subscribe( "onTip", onTip );
		commandInterpreter.subscribe( "onGoalResetCommand", onGoalResetCommand );
		commandInterpreter.subscribe( "onGoalClearCommand", onGoalClearCommand );
		commandInterpreter.subscribe( "onGoalMoveCommand", onGoalMoveCommand );
		commandInterpreter.subscribe( "onGoalSetCommand", onGoalSetCommand );
		commandInterpreter.subscribe( "onShowCommand", onShowCommand );
		commandInterpreter.subscribe( "onShowCancelCommand", onShowCancelCommand );
		commandInterpreter.subscribe( "onVoteStartCommand", onVoteStartCommand );
		commandInterpreter.subscribe( "onVoteStopCommand", onVoteStopCommand );
		commandInterpreter.subscribe( "onTotalCommand", onTotalCommand );
		commandInterpreter.subscribe( "onCommandError", onCommandError );
		commandInterpreter.subscribe( "onUserTippersCommand", onUserTippersCommand );
		commandInterpreter.subscribe( "onUserVoteCommand", onUserVoteCommand );
		commandInterpreter.subscribe( "onUserRollCommand", onUserRollCommand );
		show.subscribe( "onShowStart", onShowStart );
		show.subscribe( "onShowEnd", onShowEnd );
		show.subscribe( "onShowTick", onShowTick );
		polls.subscribe( "onPollsOpen", onPollsOpen );
		polls.subscribe( "onPollsClosed", onPollsClosed );
		polls.subscribe( "onVoteCast", onVoteCast );
		polls.subscribe( "onVoteDuplicate", onVoteDuplicate );
		platform.onEnter( cbOnUserEnter );
	}

	var onTip = function( tipper, amount )
	{
		if (show.hasTimeLeft( ))
		{
			extendShowByTip( tipper, amount );
		}
		else if (goal)
		{
			goal.received += amount;
			panel.updateGoal( goal.description, goal.amount, goal.received );
			evaluateGoalProgress( );
		}
		panel.setTotalTips( tipRankings.totalTips );
	}

	var extendShowByTip = function( tipper, amount )
	{
		if (showValue > 0)
		{
			var extendedBySeconds = Math.round( (show.getLength( ) / showValue) * amount );
			show.extend( extendedBySeconds );
			announce( createString( "show_extended", 
				{ 
					"time_added" : util.createReadableDuration2( extendedBySeconds ), 
					"tipper" : tipper.username,
					"gender" : tipper.gender
				} ) );
		}
	}

	var evaluateGoalProgress = function( )
	{
		if (!show.hasTimeLeft( ) && goal)
		{
			if (!goal.wasMet)
			{
				if (goal.met( ))
				{
					goal.wasMet = true;
					announce( createString( "goal_met" ) );
					notifyModel( createString( "model_goal_met" ) );
					setRoomTitle( createString( "room_title_goal_met" ) );
				}
				else 
					setRoomTitle( createString( "room_title" ) );
			}
		}
	}

	var onTipLeaderChange = function( tipper )
	{
		if (tipper)
		{
			panel.setTipLeader( tipper );
			chatFilter.tipLeader = tipper.username;
		}
		else
		{
			panel.setTipLeader( null );
			chatFilter.tipLeader = null;
		}
	}

	var onTipLeaderOvertaken = function( newLeader, oldLeader )
	{
		if (oldLeader)
		{
			var difference = newLeader.totalTips - oldLeader.totalTips;
			if (difference > 0)
			{
				var msgParams = { 
						"difference" : difference, 
						"old_leader" : oldLeader.username,
						"gender" : newLeader.gender
				};
				announce( createString( "new_leader", msgParams ) );
			}
		}
		else
		{
				var msgParams = { 
						"gender" : newLeader.gender
				};
			announce( createString( "first_leader", msgParams ) );
		}
	}

	var onGoalResetCommand = function( )
	{
		if (goal)
		{
			goal.received = 0;
			goal.wasMet = false;
			evaluateGoalProgress( );
			announce( createString( "goal_reset" ) );
			panel.updateGoal( goal.description, goal.amount, goal.received );
		}
	}

	var onGoalClearCommand = function( )
	{
		clearGoal( );
	}

	var clearGoal = function( )
	{
		if (goal)
		{
			goal = null;
			evaluateGoalProgress( );
			announce( createString( "goal_cleared" ) );
		}
		panel.clearGoal( );
	}

	var onGoalMoveCommand = function( amount, opt_description )
	{
		if (amount == 0)
		{
			clearGoal( );
		}
		else if (goal)
		{
			goal.amount = amount;
			if (opt_description)
				goal.description = opt_description;
			goal.wasMet = false;
			evaluateGoalProgress( );
			announce( createString( "goal_moved" ) );
			panel.updateGoal( goal.description, goal.amount, goal.received );
		}
	}

	var onGoalSetCommand = function( amount, description )
	{
		goal = new Goal( amount, description );
		evaluateGoalProgress( );
		announce( createString( "goal_set" ) );
		panel.updateGoal( goal.description, goal.amount, goal.received );
	}

	var onShowCommand = function( length, value, warmup )
	{
		show.init( length );
		showValue = value;
		startShowWarmup( warmup );
		var showInstance = show;
		var msgParams = {
			"show_warmup_time" : util.createReadableDuration2( warmup ),
			};
		if (showValue > 0)
			announce( createString( "show_starting_extendable", msgParams ) );
		else
			announce( createString( "show_starting", msgParams ) );
		notifyModel( createString( "model_show_starting", msgParams ) );
		panel.updateShow( show.length, show.timeLeft );
	}

	var startShowWarmup = function( warmup )
	{
		// BUG: A show restarted before warmup window start a show early.
		platform.setTimeout( 
			function( )
			{
				if (show.hasTimeLeft( ) && !show.isRunning( ))
					show.start( );
			}, warmup * 1000 );
	}

	var onShowStart = function( )
	{
		show.start( );
		announce( createString( "show_started" ) );
		notifyModel( createString( "model_show_started" ) );
		setRoomTitle( createString( "room_title_show_started" ) );
	}

	var onShowTick = function( )
	{
		panel.updateShow( show.getLength( ), show.getTimeLeft( ) );
	}

	var onShowEnd = function( instance )
	{
		panel.endShow( );
		announce( createString( "show_ended" ) );
		clearGoal( );
	}

	var onShowCancelCommand = function( )
	{
		endShow( );
	}

	var endShow = function( )
	{
		show.stop( ); 
	}

	var onTotalCommand = function( )
	{
		notifyModel( createString( "total_tips" ) );
	}

	var onVoteStartCommand = function( description )
	{
		polls.start( description );
	}

	var onVoteStopCommand = function( )
	{
		polls.stop( );
	}

	var onUserVoteCommand = function( username, description )
	{
		if (polls.isOpen( ))
		{
			polls.castBallot( username, description, getUserBallotCount( username ) );
		}
		else
			notify( username, "Polls are closed!" );
	}

	var onVoteDuplicate = function( username )
	{
		notify( username, createString( "vote_already_cast" ) );
	}

	var getUserBallotCount = function( username )
	{
		var maxWeight = 2;
		var tippers = tipRankings.getRankedTippers( );
		for (var i = 0; i < tippers.length; ++i)
		{
			if (tippers[i].username == username)
				return 1 + maxWeight * Math.max( 0.5, 1.0 - i/tippers.length );
		}
		return 1;
	}

	var onUserTippersCommand = function( username )
	{
		notify( username, "Top tippers: " + createTippersString( 10 ) );
	}

	var createTippersString = function( max )
	{
		var topTippers = tipRankings.getRankedTippers( ).slice( 0, max );
		var names = [];
		for (var i = 0; i < topTippers.length; ++i)
			names[i] = topTippers[i].username + " (" + topTippers[i].totalTips + ")";
		return names.join( ", " );
	}

	var onPollsOpen = function( )
	{
		announce( createString( "polls_open" ) );
		panel.setPollsOpen( true );
		panel.setBallotCount( polls.getBallotCount( ) );
	}

	var onPollsClosed = function( )
	{
		announce( createString( "polls_closed" ) );
		panel.setPollsOpen( false );
		var msgParams = { "poll_results" : polls.getSummary( ) };
		notifyModel( createString( "model_poll_results", msgParams ) );
	}

	var onVoteCast = function( username )
	{
		panel.setBallotCount( polls.getBallotCount( ) );
		notify( username, createString( "vote_cast" ) );
	}

	var cbOnUserEnter = function( cbUser )
	{
		if (polls.isOpen( ))
			notify( cbUser.user, createString( "polls_open" ) );
	}

	var onUserRollCommand = function( username, numDice, numSides, description )
	{
		numDice = Math.min( 10, numDice );
		var r = 0;
		for (var i = 0; i < numDice; ++i)
			r += Math.floor( Math.random( ) * numSides ) + 1;
		var msgParams = { "user" : username, "num_dice" : numDice, "num_sides" : numSides, 
			"description" : description, "result" : r, "dice" : numDice + "d" + numSides };
		if (description.length > 0)
			announce( createString( "dice_roll", msgParams ) );
		else
			announce( createString( "dice_roll_no_description", msgParams ) );
	}

	var onCommandError = function( username, errorMsg )
	{
		notify( username, errorMsg );
	}

	var announce = function( msg )
	{
		if (msg.length > 0)
			platform.chatNotice( msg, '', '#FFFFFF', '#000000', 'bold' );
	}

	var notifyModel = function( msg )
	{
		notify( model, msg );
	}

	var notify = function( username, msg )
	{
		if (msg.length > 0)
			platform.chatNotice( msg, username, '#000000', '#FFFFFF', 'bold' );
	}

	var setRoomTitle = function( title )
	{
		if (title.length > 0)
			platform.changeRoomSubject( title );
	}

	var createString = function( template, opt_params )
	{
		opt_params = opt_params ? opt_params : {};
		return formatter.createString( template, opt_params );
	}

	var createCommonStringFormatParams = function( )
	{
		var params = {
				"show_length" : show ? util.createReadableDuration( show.getLength( ) ) : 0,
				"show_time_left" : show ? util.createReadableDuration( show.getTimeLeft( ) ) : 0,
				"show_tokens_per_minute" : show ? Math.ceil( showValue / (show.getLength( ) / 60) ) : 0,
				"show_tokens_per_second" : show ? Math.ceil( showValue / show.getLength( ) ) : 0,
				"goal_desc" : goal ? goal.description : "",
				"goal_amount" : goal ? goal.amount : 0,
				"goal_progress" : goal ? goal.received : 0,
				"goal_needed" : goal ? Math.max( 0, goal.amount - goal.received ) : 0,
				"total_tips" : tipRankings.totalTips,
				"poll_description" : polls.getDescription( ),
				"leader" : tipRankings.leader ? tipRankings.leader.username : ""
			};
		return params;
	}
	
	init( );
})( );