####	RACE CONTROL SYSTEM
####	============================

####	For LFSLapper

####  Tested with V6.012

####	by Sinanju

####  from an idea by Jonathon.provost

###########################################################################
# Ver 0.1 - 27 April 2011 - Initial workup
# Ver 0.2 - 28 April 2011 - Some more work on menu system and buttons
# Ver 0.3 - 29 April 2011 - Added Head Up Display (HUD) at top of screen
# Ver 0.4 - 01 May 2011 - Addional standard and server messages
# Ver 1.0 - 01 May 2011 - Added Lights to HUD
# Ver 1.01 - 02 May 2011 - Removed IF-THEN-ELSE-ENDIF for testing if admins, and changed trigger word to start RCM to !secretsquirrel
############################################################################
# LFS TeamChat v1.01 by Krayy
                                
CatchEvent OnLapperStart()

### Set initial dialog coordinates & size for buttons and labels ###
### Change the numbers if you want the Race Control Menu in different location
	GlobalVar $RCMorigL; $RCMorigL = 35;	# Left edge of main content window / button / label
	GlobalVar $RCMorigT; $RCMorigT = 49;	# Top edge of window / button / label
	GlobalVar $RCMWidth; $RCMWidth = 24;	# Width of Dialog box / window / button / label
	GlobalVar $RCMHeight; $RCMHeight = 5;	# ...height of row of text
	GlobalVar $RCMspacing; $RCMspacing = 5;	# ...height of spacing between text
	GlobalVar $RCMtime; $RCMtime = 6;	# display button for how many seconds (-1 = permanent)
	# Set TeamChat globals
	GlobalVar $tcDelimiterStart;
	GlobalVar $tcDelimiterEnd;
	# Set the inital values to be square brackets (as used in team names) - change if team uses something else
	$tcDelimiterStart = "[";
	$tcDelimiterEnd = "]";
	EndCatchEvent

CatchEvent OnConnect( $userName ) # Player event
	 SetTeamName();
EndCatchEvent

CatchEvent OnNameChange($userName,$oldNickName,$newNickName) # Player event
	 SetTeamName();
EndCatchEvent

CatchEvent OnMSO( $userName, $text ) # Player event
	$idxOfFirstSpace = indexOf( $text, " ");
	IF( $idxOfFirstSpace == -1 )
	THEN
	  $command = $text;
	  $argv = "";
	ELSE
	  $command = subStr( $text,0,$idxOfFirstSpace );
	  $argv = trim( subStr( $text,$idxOfFirstSpace ) );
	ENDIF

	SWITCH ( $command )
		CASE "!secretsquirrel":
		CASE "!SECRETSQUIRREL":
			DoRCM(0,0);
		BREAK;
		
		CASE "!tc":
				TeamChat($argv);
   		BREAK;		
		
CASE "!pm":
	IF( $argv != "" )   THEN
		$idxSpace = indexOf( $argv, " ");
	IF( $idxSpace != -1 ) THEN
		$toUser = subStr( $argv,0,$idxSpace );
		$argv = trim( subStr( $argv,$idxSpace ) );
			privMsg ( "^6Private Admin message ^8" . GetPlayerVar( $toUser , "Nickname" )  );
			privMsg ( "^7" . $argv );
			userMsg (GetCurrentPlayerVar( "Nickname" ), $toUser, $argv);
	ELSE
		privMsg ( "^7Use format ^2!pm <username> <message>" );
		privMsg ( "^7(for instance ^2!pm sinanju Hello^7)" );
	ENDIF
	ELSE
		privMsg ( "^7Use format ^2!pm <username> <message>" );
	ENDIF
BREAK; 		
		
	ENDSWITCH
EndCatchEvent
            

Sub SetTeamName ( )
	$NickName = GetCurrentPlayerVar("NickName");
	$NickStrip = StripLFSColor( ToLower($NickName) );  
	$IdxStart = indexOf( $NickStrip , $tcDelimiterStart);  
	$IdxEnd = indexOf( $NickStrip , $tcDelimiterEnd);  

	IF ( $IdxStart == -1 || $IdxEnd == -1 )
	THEN
		$MyTeam = "";
	ELSE
		IF ( $IdxStart > $IdxEnd )
		THEN
			$MyTeam = "";
		ELSE
			$MyTeam = subStr( $NickStrip ,$IdxStart + 1, ($IdxEnd - $IdxStart) - 1  );
		ENDIF
	ENDIF
	
	IF ( $MyTeam == "" )
	THEN
		privMsg ("^7I am unable to find a valid Team Name in your NickName...");
		privMsg ("^7A Team name should be bracketed with a ^3" . $tcDelimiterStart . "^7 and a ^3" . $tcDelimiterEnd);
	ELSE
		privMsg ("^7Your nickame shows that you are in Team: ^3" . $MyTeam);
	ENDIF
	SetCurrentPlayerVar("TeamName",$MyTeam);
EndSub

Sub TeamChat ( $msg )
	$NickName = GetCurrentPlayerVar("NickName");
	$MyTeam = GetCurrentPlayerVar("TeamName");
	IF ( $MyTeam != "" )
	THEN
		$lop = GetListOfPlayers("N");
		FOREACH ( $de in $lop )
			$userName = $de["value"];
			IF ( GetPlayerVar($userName,"TeamName") == $MyTeam )
			THEN
				privMsg ( $userName, "^5TeamChat from ^8" . $NickName . "^5: ^8");
				privMsg ( $userName, "^6" . $msg );
			ENDIF
		ENDFOREACH
	ELSE
		privMsg ("You must have your Team name in your Nick to use TeamChat!");
	ENDIF
EndSub

Sub DoRCM( $KeyFlags,$id )
	closePrivButton ("rcm_messages&rcm_track&rcm_penalties&rcm_pitlane&rcm_closemenu&rcm_back&rcm_options&rcm_global&rcm_privrcm&rcm_globrcm&rcm_teammsg&rcm_privmsg");
	closePrivButton ("rcm_track_greenflag&rcm_track_yellowflag&rcm_track_blueflag&flag&rcm_track_safetycar&rcm_track_redflag&rcm_track_qualyprogress&rcm_track_raceprogress&rcm_goback&rcm_track_cheqflag");
	closePrivButton ("rcm_pitoptions&rcm_penopen&rcm_penclosed&rcm_pexopen&rcm_pexclosed&rcm_serverrcm&rcm_standardrcm&rcm_mestext&rcm_tracktext&rcm_trackflags&rcm_trackflagsback");
	closePrivButton ("rcm_smessage1&rcm_smessage2&rcm_smessage3&rcm_smessage4&rcm_smessage5&rcm_message1&rcm_message2&rcm_message3&rcm_message4&rcm_message5&rcm_trackprogback&rcm_trackprogress");
	closePrivButton ("rcm_smess1&rcm_smess2&rcm_smess3&rcm_smess4&rcm_smess5&rcm_mess1&rcm_mess2&rcm_mess3&rcm_mess4&rcm_mess5rcm_servtext&rcm_stantext");
	openPrivButton( "rcm_back",$RCMorigL,$RCMorigT,$RCMWidth+2,$RCMHeight+34,$RCMspacing+1,-1,16,"" );
	openPrivButton( "rcm_front",$RCMorigL+1,$RCMorigT+2,$RCMWidth,$RCMHeight+29,$RCMspacing+1,-1,32,"" );
	openPrivButton( "rcm_menu",$RCMorigL+1,$RCMorigT+4,$RCMWidth,$RCMHeight+3,$RCMspacing+1,-1,0, langEngine( "%{rcm_menu}%"));
	openPrivButton( "rcm_by",$RCMorigL+1,$RCMorigT+17,$RCMWidth,$RCMHeight-1,$RCMspacing,2,0, langEngine( "%{rcm_by}%"));
	openPrivButton( "rcm_menumanager",$RCMorigL+1,$RCMorigT+22,$RCMWidth,$RCMHeight,$RCMspacing,-1,32, langEngine( "%{rcm_menumanager}%"),DoRCmenu );	
	openPrivButton( "rcm_closemenu",$RCMorigL+1,$RCMorigT+29,$RCMWidth,$RCMHeight,$RCMspacing,-1,32, langEngine( "%{rcm_closemenu}%"),DoRCclosemenu );
EndSub

Sub DoRCclosemenu( $KeyFlags,$id )
	closePrivButton ("rcm_back&rcm_front&rcm_menu&rcm_menumanager&rcm_closemenu");
EndSub 

Sub DoRCmenu( $KeyFlags,$id )
	closePrivButton ("rcm_menu&rcm_front&rcm_menumanager&rcm_closemenu&rcm_pentext&rcm_penmess&rcm_mestext&rcm_tracktext&rcm_trackflags&rcm_trackflagsback&rcm_privrcm");
	closePrivButton ("rcm_track_greenflag&rcm_track_safetycar&rcm_track_redflag&rcm_track_qualyprogress&rcm_track_raceprogress&rcm_goback&rcm_track_cheqflag&rcm_trackprogback&rcm_trackprogress");
	closePrivButton ("rcm_pitoptions&rcm_penopen&rcm_penclosed&rcm_pexopen&rcm_pexclosed&rcm_serverrcm&rcm_standardrcm&rcm_privmsg&rcm_teammsg&rcm_globrcm&rcm_track_yellowflag&rcm_track_blueflag");
	closePrivButton ("rcm_smess1&rcm_smess2&rcm_smess3&rcm_smess4&rcm_smess5&rcm_mess1&rcm_mess2&rcm_mess3&rcm_mess4&rcm_mess5&rcm_servtext&rcm_stantext");
	closePrivButton ("rcm_smessage1&rcm_smessage2&rcm_smessage3&rcm_smessage4&rcm_smessage5&rcm_message1&rcm_message2&rcm_message3&rcm_message4&rcm_message5");	
	openPrivButton( "rcm_options",$RCMorigL+1,$RCMorigT+1,$RCMWidth,$RCMHeight+2,$RCMspacing+1,-1,0, langEngine( "%{rcm_options}%") );
	openPrivButton( "rcm_messages",$RCMorigL+1,$RCMorigT+8,$RCMWidth,$RCMHeight,$RCMspacing+1,-1,32, langEngine( "%{rcm_messages}%"),DoRCmessages );
	openPrivButton( "rcm_track",$RCMorigL+1,$RCMorigT+13,$RCMWidth,$RCMHeight,$RCMspacing+1,-1,32, langEngine( "%{rcm_track}%"),DoRCtrack );
	openPrivButton( "rcm_pitlane", $RCMorigL+1,$RCMorigT+18,$RCMWidth,$RCMHeight,$RCMspacing+1,-1,32, langEngine( "%{rcm_pitlane}%"),DoRCpitlane );	
	openPrivButton( "rcm_penalties",$RCMorigL+1,$RCMorigT+23,$RCMWidth,$RCMHeight,$RCMspacing+1,-1,32, langEngine( "%{rcm_penalties}%"),DoRCpenalties );
	openPrivButton( "rcm_closemenu",$RCMorigL+1,$RCMorigT+32,$RCMWidth,$RCMHeight,$RCMspacing+1,-1,16, langEngine( "%{rcm_closemenu}%"),DoRCM );
EndSub


Sub DoRCmessages( $KeyFlags,$id )
	closePrivButton ("rcm_messages&rcm_track&rcm_penalties&rcm_pitlane&rcm_closemenu&rcm_options&rcm_trackprogback&rcm_trackprogress");
	closePrivButton ("rcm_mestext&rcm_tracktext&rcm_trackflags&rcm_trackflagsback&rcm_privrcm&rcm_globrcm&rcm_serverrcm&rcm_standardrcm&rcm_privmsg&rcm_teammsg");
	closePrivButton ("rcm_smess1&rcm_smess2&rcm_smess3&rcm_smess4&rcm_smess5&rcm_mess1&rcm_mess2&rcm_mess3&rcm_mess4&rcm_mess5&rcm_servtext&rcm_stantext");
	closePrivButton ("rcm_smessage1&rcm_smessage2&rcm_smessage3&rcm_smessage4&rcm_smessage5&rcm_message1&rcm_message2&rcm_message3&rcm_message4&rcm_message5");	
	openPrivButton( "rcm_mestext",$RCMorigL+1,$RCMorigT+1,$RCMWidth,$RCMHeight+2,$RCMspacing+1,-1,0, langEngine( "%{rcm_mestext}%") );
	openPrivButton( "rcm_privmsg",$RCMorigL+1,$RCMorigT+8,$RCMWidth,$RCMHeight-1,$RCMspacing+1,-1,32, langEngine( "%{rcm_privmsg}%"),DoRCprivmsg );
	openPrivButton( "rcm_teammsg",$RCMorigL+1,$RCMorigT+12,$RCMWidth,$RCMHeight-1,$RCMspacing+1,-1,32, langEngine( "%{rcm_teammsg}%"),DoRCteammsg );
 	openPrivButton( "rcm_privrcm",$RCMorigL+1,$RCMorigT+16,$RCMWidth,$RCMHeight-1,$RCMspacing+1,-1,32, langEngine( "%{rcm_privrcm}%"),DoRCprivrcm );
	openPrivButton( "rcm_globrcm",$RCMorigL+1,$RCMorigT+20,$RCMWidth,$RCMHeight-1,$RCMspacing+1,-1,32, langEngine( "%{rcm_globrcm}%"),DoRCglobrcm );
	openPrivButton( "rcm_serverrcm",$RCMorigL+1,$RCMorigT+24,$RCMWidth,$RCMHeight-1,$RCMspacing+1,-1,32, langEngine( "%{rcm_serverrcm}%"),DoRCserverrcm );
	openPrivButton( "rcm_standardrcm",$RCMorigL+1,$RCMorigT+28,$RCMWidth,$RCMHeight-1,$RCMspacing+1,-1,32, langEngine( "%{rcm_standardrcm}%"),DoRCstandardrcm );
	openPrivButton( "rcm_goback",$RCMorigL+1,$RCMorigT+33,12,$RCMHeight,$RCMspacing,-1,16, langEngine( "%{rcm_goback}%"),DoRCmenu );
	openPrivButton( "rcm_closemenu",$RCMorigL+13,$RCMorigT+33,12,$RCMHeight,$RCMspacing,-1,16, langEngine( "%{rcm_closemenu}%"),DoRCM );	
EndSub


Sub DoRCtrack( $KeyFlags,$id )
	closePrivButton ("rcm_messages&rcm_track&rcm_penalties&rcm_pitlane&rcm_closemenu&rcm_options");	
	openPrivButton( "rcm_tracktext",$RCMorigL+1,$RCMorigT+1,$RCMWidth,$RCMHeight+2,$RCMspacing+1,-1,0, langEngine( "%{rcm_tracktext}%"));
	openPrivButton( "rcm_trackflagsback",$RCMorigL+1,$RCMorigT+7,$RCMWidth,$RCMHeight+12,$RCMspacing+1,-1,32,"");	
	openPrivButton( "rcm_trackflags",$RCMorigL+1,$RCMorigT+7,$RCMWidth,$RCMHeight-1,$RCMspacing,-1,0, langEngine( "%{rcm_trackflags}%"));
	openPrivButton( "rcm_track_yellowflag",$RCMorigL+2,$RCMorigT+11,$RCMWidth-13,$RCMHeight-1,$RCMspacing,-1,16, langEngine( "%{rcm_yellowflag}%"),DoRCyellowflag );	
	openPrivButton( "rcm_track_greenflag",$RCMorigL+13,$RCMorigT+11,$RCMWidth-13,$RCMHeight-1,$RCMspacing,-1,16, langEngine( "%{rcm_greenflag}%"),DoRCgreenflag );
	openPrivButton( "rcm_track_blueflag",$RCMorigL+2,$RCMorigT+15,$RCMWidth-13,$RCMHeight-1,$RCMspacing,-1,16, langEngine( "%{rcm_blueflag}%"),DoRCblueflag );	
  openPrivButton( "rcm_track_redflag",$RCMorigL+13,$RCMorigT+15,$RCMWidth-13,$RCMHeight-1,$RCMspacing,-1,16, langEngine( "%{rcm_redflag}%"),DoRCredflag );	
	openPrivButton( "rcm_track_safetycar",$RCMorigL+2,$RCMorigT+19,$RCMWidth-13,$RCMHeight-1,$RCMspacing,-1,16, langEngine( "%{rcm_safetycar}%"),DoRCsafetycar );  	
	openPrivButton( "rcm_track_cheqflag",$RCMorigL+13,$RCMorigT+19,$RCMWidth-13,$RCMHeight-1,$RCMspacing,-1,16, langEngine( "%{rcm_cheqflag}%"),DoRCcheqflag );
	openPrivButton( "rcm_trackprogback",$RCMorigL+1,$RCMorigT+24,$RCMWidth,$RCMHeight+4,$RCMspacing+1,-1,32,"");	
	openPrivButton( "rcm_trackprogress",$RCMorigL+1,$RCMorigT+24,$RCMWidth,$RCMHeight-1,$RCMspacing,-1,0, langEngine( "%{rcm_trackprogress}%"));
	openPrivButton( "rcm_track_qualyprogress",$RCMorigL+2,$RCMorigT+28,$RCMWidth-13,$RCMHeight-1,$RCMspacing,-1,16, langEngine( "%{rcm_qualyprogress}%"),DoRCqualy );
	openPrivButton( "rcm_track_raceprogress",$RCMorigL+13,$RCMorigT+28,$RCMWidth-13,$RCMHeight-1,$RCMspacing,-1,16, langEngine( "%{rcm_raceprogress}%"),DoRCrace );
	openPrivButton( "rcm_goback",$RCMorigL+1,$RCMorigT+33,$RCMWidth-12,$RCMHeight,$RCMspacing,-1,16, langEngine( "%{rcm_goback}%"),DoRCmenu );
	openPrivButton( "rcm_closemenu",$RCMorigL+13,$RCMorigT+33,$RCMWidth-12,$RCMHeight,$RCMspacing,-1,16, langEngine( "%{rcm_closemenu}%"),DoRCM );
EndSub


Sub DoRCpenalties( $KeyFlags,$id )
	closePrivButton ("rcm_messages&rcm_track&rcm_penalties&rcm_pitlane&rcm_closemenu&rcm_options");
	openPrivButton( "rcm_pentext",$RCMorigL+1,$RCMorigT+1,$RCMWidth,$RCMHeight+2,$RCMspacing+1,-1,0, langEngine( "%{rcm_pentext}%") );
	openPrivButton( "rcm_penmess",$RCMorigL+1,$RCMorigT+8,$RCMWidth,$RCMHeight,$RCMspacing,-1,32, langEngine( "%{rcm_penmess}%") );
	openPrivButton( "rcm_goback",$RCMorigL+1,$RCMorigT+33,12,$RCMHeight,$RCMspacing,-1,16, langEngine( "%{rcm_goback}%"),DoRCmenu );
	openPrivButton( "rcm_closemenu",$RCMorigL+13,$RCMorigT+33,12,$RCMHeight,$RCMspacing,-1,16, langEngine( "%{rcm_closemenu}%"),DoRCM );	
EndSub


# Messaging Section
###################

Sub DoRCprivrcm( $KeyFlags,$id )
  openPrivTextButton( "rcm_priv",80,60,60,6,5,32,"Admin Message","please click here to open chat window",90,GoRCMprivate );
	openPrivButton( "rcm_closeprivbrcm",104,70,12,6,5,-1,16, langEngine( "%{rcm_closemenu}%"),DoRCcloseprivrdm );
EndSub
 
Sub GoRCMprivate( $Admin Message,$text )
	closePrivButton ("rcm_priv&rcm_closeprivbrcm&rcm_global&rcm_closeglobrcm");
  privMsg( "^1Admin Message: ^6" . $text );
EndSub

Sub DoRCcloseprivrdm( $KeyFlags,$id )
	closePrivButton ("rcm_priv&rcm_closeprivbrcm&rcm_global&rcm_closeglobrcm");
EndSub
                        
Sub DoRCprivmsg( $KeyFlags,$id )
	openPrivButton( "rcm_instruct",80,70,60,6,5,-1,32, langEngine( "%{rcm_instruct}%"));
	openPrivButton( "rcm_privmsginst",80,76,60,6,5,-1,32, langEngine( "%{rcm_privmsginst}%"));
	openPrivButton( "rcm_closeinstruct",104,98,12,6,5,-1,16, langEngine( "%{rcm_closemenu}%"),DoRCcloseinstruct );
EndSub
                     
Sub DoRCteammsg( $KeyFlags,$id )
	openPrivButton( "rcm_instruct",80,70,60,6,5,-1,32, langEngine( "%{rcm_instruct}%"));
	openPrivButton( "rcm_teammsginst",80,76,60,5,4,-1,32, langEngine( "%{rcm_teammsginst}%"));
	openPrivButton( "rcm_closeinstruct",104,108,12,6,5,-1,16, langEngine( "%{rcm_closemenu}%"),DoRCcloseinstruct );
EndSub

Sub DoRCcloseinstruct( $KeyFlags,$id )
	closePrivButton ("rcm_instruct&rcm_closeinstruct&rcm_privmsginst&rcm_teammsginst");
EndSub

 Sub DoRCglobrcm( $KeyFlags,$id )
  openPrivTextButton( "rcm_global",80,60,60,6,5,32,"Admin Message","please click here to open chat window",90,GoRCMglobal );
	openPrivButton( "rcm_closeglobrcm",104,70,12,6,5,-1,16, langEngine( "%{rcm_closemenu}%"),DoRCcloseglobrdm );
EndSub
 
Sub GoRCMglobal( $Admin Message,$text )
	closePrivButton ("rcm_priv&rcm_closeprivbrcm&rcm_global&rcm_closeglobrcm");
  GlobalRcm( "^1Admin: ^6" . $text );
EndSub

Sub DoRCcloseglobrdm( $KeyFlags,$id )
	closePrivButton ("rcm_priv&rcm_closeprivbrcm&rcm_global&rcm_closeglobrcm");
EndSub
                     
Sub DoRCserverrcm( $KeyFlags,$id )
	closePrivButton ("rcm_menu&rcm_front&rcm_menumanager&rcm_closemenu&rcm_pentext&rcm_penmess&rcm_mestext&rcm_tracktext&rcm_trackflags&rcm_trackflagsback&rcm_privrcm&rcm_globrcm");
	closePrivButton ("rcm_mestext&rcm_tracktext&rcm_trackflags&rcm_trackflagsback&rcm_privrcm&rcm_globrcm&rcm_serverrcm&rcm_standardrcm&rcm_privmsg&rcm_teammsg&rcm_trackprogback&rcm_trackprogress");
	openPrivButton( "rcm_servtext",$RCMorigL+1,$RCMorigT+1,$RCMWidth,$RCMHeight+2,$RCMspacing+1,-1,0, langEngine( "%{rcm_servtext}%") );
	openPrivButton( "rcm_smessage1",$RCMorigL+1,$RCMorigT+7,$RCMWidth,$RCMHeight,$RCMspacing,-1,32, langEngine( "%{rcm_smessage1}%"),DoRCsmess1 );
	openPrivButton( "rcm_smessage2",$RCMorigL+1,$RCMorigT+12,$RCMWidth,$RCMHeight,$RCMspacing,-1,32, langEngine( "%{rcm_smessage2}%"),DoRCsmess2 );
	openPrivButton( "rcm_smessage3",$RCMorigL+1,$RCMorigT+17,$RCMWidth,$RCMHeight,$RCMspacing,-1,32, langEngine( "%{rcm_smessage3}%"),DoRCsmess3 );
	openPrivButton( "rcm_smessage4",$RCMorigL+1,$RCMorigT+22,$RCMWidth,$RCMHeight,$RCMspacing,-1,32, langEngine( "%{rcm_smessage4}%"),DoRCsmess4 );
	openPrivButton( "rcm_smessage5",$RCMorigL+1,$RCMorigT+27,$RCMWidth,$RCMHeight,$RCMspacing,-1,32, langEngine( "%{rcm_smessage5}%"),DoRCsmess5 );
	openPrivButton( "rcm_goback",$RCMorigL+1,$RCMorigT+33,12,$RCMHeight,$RCMspacing,-1,16, langEngine( "%{rcm_goback}%"),DoRCmessages );
	openPrivButton( "rcm_closemenu",$RCMorigL+13,$RCMorigT+33,12,$RCMHeight,$RCMspacing,-1,16, langEngine( "%{rcm_closemenu}%"),DoRCM );	
EndSub

Sub DoRCstandardrcm( $KeyFlags,$id )
	closePrivButton ("rcm_menu&rcm_front&rcm_menumanager&rcm_closemenu&rcm_pentext&rcm_penmess&rcm_mestext&rcm_tracktext&rcm_trackflags&rcm_trackflagsback&rcm_privrcm&rcm_globrcm");
	closePrivButton ("rcm_mestext&rcm_tracktext&rcm_trackflags&rcm_trackflagsback&rcm_privrcm&rcm_globrcm&rcm_serverrcm&rcm_standardrcm&rcm_privmsg&rcm_teammsg&rcm_trackprogback&rcm_trackprogress");
	openPrivButton( "rcm_stantext",$RCMorigL+1,$RCMorigT+1,$RCMWidth,$RCMHeight+2,$RCMspacing+1,-1,0, langEngine( "%{rcm_stantext}%") );
	openPrivButton( "rcm_message1",$RCMorigL+1,$RCMorigT+7,$RCMWidth,$RCMHeight,$RCMspacing,-1,32, langEngine( "%{rcm_message1}%"),DoRCmess1 );
	openPrivButton( "rcm_message2",$RCMorigL+1,$RCMorigT+12,$RCMWidth,$RCMHeight,$RCMspacing,-1,32, langEngine( "%{rcm_message2}%"),DoRCmess2 );
	openPrivButton( "rcm_message3",$RCMorigL+1,$RCMorigT+17,$RCMWidth,$RCMHeight,$RCMspacing,-1,32, langEngine( "%{rcm_message3}%"),DoRCmess3 );
	openPrivButton( "rcm_message4",$RCMorigL+1,$RCMorigT+22,$RCMWidth,$RCMHeight,$RCMspacing,-1,32, langEngine( "%{rcm_message4}%"),DoRCmess4 );
	openPrivButton( "rcm_message5",$RCMorigL+1,$RCMorigT+27,$RCMWidth,$RCMHeight,$RCMspacing,-1,32, langEngine( "%{rcm_message5}%"),DoRCmess5 );
	openPrivButton( "rcm_goback",$RCMorigL+1,$RCMorigT+33,12,$RCMHeight,$RCMspacing,-1,16, langEngine( "%{rcm_goback}%"),DoRCmessages );
	openPrivButton( "rcm_closemenu",$RCMorigL+13,$RCMorigT+33,12,$RCMHeight,$RCMspacing,-1,16, langEngine( "%{rcm_closemenu}%"),DoRCM );	
EndSub
                    
Sub DoRCsmess1( $KeyFlags,$id )
    $Host = getLapperVar( "HostName" );
  closePrivButton ("rcm_smess&rcm_mess");
  openPrivButton( "rcm_smess",80,60,60,6,5,5,32, langEngine( "%{rcm_smess1}%"),$Host);
EndSub

Sub DoRCsmess2( $KeyFlags,$id )
	closePrivButton ("rcm_smess&rcm_mess");
  openPrivButton( "rcm_smess",80,60,60,6,5,5,32, langEngine( "%{rcm_smess2}%"));
EndSub

Sub DoRCsmess3( $KeyFlags,$id )
	closePrivButton ("rcm_smess&rcm_mess");
  openPrivButton( "rcm_smess",80,60,60,6,5,5,32, langEngine( "%{rcm_smess3}%"));
EndSub

Sub DoRCsmess4( $KeyFlags,$id )
	closePrivButton ("rcm_smess&rcm_mess");
  openPrivButton( "rcm_smess",80,60,60,6,5,5,32, langEngine( "%{rcm_smess4}%"));
EndSub

Sub DoRCsmess5( $KeyFlags,$id )
	closePrivButton ("rcm_smess&rcm_mess");
  openPrivButton( "rcm_smess",80,60,60,6,5,5,32, langEngine( "%{rcm_smess5}%"));
EndSub
  
Sub DoRCmess1( $KeyFlags,$id )
	closePrivButton ("rcm_smess&rcm_mess");
  openPrivButton( "rcm_smess",80,60,60,6,5,5,32, langEngine( "%{rcm_mess1}%"));
EndSub

Sub DoRCmess2( $KeyFlags,$id )
	closePrivButton ("rcm_smess&rcm_mess");
   openPrivButton( "rcm_smess",80,60,60,6,5,5,32, langEngine( "%{rcm_mess2}%"));
EndSub

Sub DoRCmess3( $KeyFlags,$id )
	closePrivButton ("rcm_smess&rcm_mess");
  openPrivButton( "rcm_smess",80,60,60,6,5,5,32, langEngine( "%{rcm_mess3}%"));
EndSub

Sub DoRCmess4( $KeyFlags,$id )
	closePrivButton ("rcm_smess&rcm_mess");
  openPrivButton( "rcm_smess",80,60,60,6,5,5,32, langEngine( "%{rcm_mess4}%"));
EndSub

Sub DoRCmess5( $KeyFlags,$id )
	closePrivButton ("rcm_smess&rcm_mess");
  openPrivButton( "rcm_smess",80,60,60,6,5,5,32, langEngine( "%{rcm_mess5}%"));
EndSub
                                        
# Track Conditions Section
##########################

Sub DoRCgreenflag( $KeyFlags,$id )
	closeGlobalButton ("rcm_backflag&rcm_contrast&rcm_contrast2&rcm_bl_bsr1&rcm_bl_bsr2&rcm_bl_bsr3&rcm_bl_bsr4&rcm_bl_bsr5&rcm_bl_bsr6&rcm_bl_bsr7&rcm_bl_bsr8&rcm_bl_bsr9&rcm_bl_bsr0");
	closeGlobalButton ("hud_trackstatus&hud_pexstatus&hud_lightsleft&hud_lightsleft1&&hud_lightsleft2&&hud_lightsleft3&&hud_lightsleft4&&hud_lightsleft5");
	closeGlobalButton ("hud_lightsright&hud_lightsright1&hud_lightsright2&hud_lightsright3&hud_lightsright4&hud_lightsright5");
	globalRcm( langEngine( "%{rcm_greenflagmessage}%" )); 
	openGlobalButton( "hud_trackstatus",111,6,17,6,1,-1,16,langEngine( "%{hud_trackstatusgreen}%" ));
	openGlobalButton( "hud_penstatus",97,2,12,4,1,-1,16,langEngine( "%{hud_pstatusopen}%"));	
	openGlobalButton( "hud_pexstatus",97,8,12,4,1,-1,16,langEngine( "%{hud_pstatusopen}%"));
	openGlobalButton( "hud_lightsleft",62,0,12,12,4,-1,0,langEngine( "%{hud_lightsgreen}%" )); 
  openGlobalButton( "hud_lightsright",126,0,12,12,4,-1,0,langEngine( "%{hud_lightsgreen}%" )); 
  EndSub

Sub DoRCsafetycar( $KeyFlags,$id )
	closeGlobalButton ("hud_trackstatus&hud_pexstatus&hud_lightsleft&hud_lightsleft1&&hud_lightsleft2&&hud_lightsleft3&&hud_lightsleft4&&hud_lightsleft5");
	closeGlobalButton ("hud_lightsright&hud_lightsright1&hud_lightsright2&hud_lightsright3&hud_lightsright4&hud_lightsright5");
	closeGlobalButton ("rcm_backflag&rcm_contrast&rcm_contrast2&rcm_bl_bsr1&rcm_bl_bsr2&rcm_bl_bsr3&rcm_bl_bsr4&rcm_bl_bsr5&rcm_bl_bsr6&rcm_bl_bsr7&rcm_bl_bsr8&rcm_bl_bsr9&rcm_bl_bsr0");	
	globalRcm( langEngine( "%{rcm_safetycarmessage}%" ));
	openGlobalButton( "hud_penstatus",97,2,12,4,1,-1,16,langEngine( "%{hud_pstatusopen}%"));
	openGlobalButton( "hud_pexstatus",97,8,12,4,1,-1,16,langEngine( "%{hud_pstatusclosed}%"));
	openGlobalButton( "hud_trackstatus",111,6,17,6,1,-1,16,langEngine( "%{hud_trackstatussafety}%" ));
 	openGlobalButton( "hud_lightsleft",62,0,12,12,4,-1,0 + 8,langEngine( "%{hud_lightswhite}%" ));	
 	openGlobalButton( "hud_lightsright",126,0,12,12,4,-1,0 + 8,langEngine( "%{hud_lightswhite}%" ));       
EndSub

Sub DoRCredflag( $KeyFlags,$id )
	closeGlobalButton ("hud_trackstatus&hud_pexstatus&hud_lightsleft&hud_lightsleft1&&hud_lightsleft2&&hud_lightsleft3&&hud_lightsleft4&&hud_lightsleft5");
	closeGlobalButton ("hud_lightsright&hud_lightsright1&hud_lightsright2&hud_lightsright3&hud_lightsright4&hud_lightsright5");
	closeGlobalButton ("rcm_backflag&rcm_contrast&rcm_contrast2&rcm_bl_bsr1&rcm_bl_bsr2&rcm_bl_bsr3&rcm_bl_bsr4&rcm_bl_bsr5&rcm_bl_bsr6&rcm_bl_bsr7&rcm_bl_bsr8&rcm_bl_bsr9&rcm_bl_bsr0");	
	globalRcm( langEngine( "%{rcm_redflagmessage}%" ));
	openGlobalButton( "hud_penstatus",97,2,12,4,1,-1,16,langEngine( "%{hud_pstatusopen}%"));
	openGlobalButton( "hud_pexstatus",97,8,12,4,1,-1,16,langEngine( "%{hud_pstatusclosed}%"));	
	openGlobalButton( "hud_trackstatus",111,6,17,6,1,-1,16,langEngine( "%{hud_trackstatusred}%" ));
	openGlobalButton( "hud_lightsleft",62,0,12,12,4,-1,0 + 8,langEngine( "%{hud_lightsred}%" )); 
	openGlobalButton( "hud_lightsright",126,0,12,12,4,-1,0 + 8,langEngine( "%{hud_lightsred}%" ));      
EndSub

Sub DoRCcheqflag( $KeyFlags,$id )
	closeGlobalButton ("hud_trackstatus&hud_pexstatus&hud_lightsleft&hud_lightsleft1&&hud_lightsleft2&&hud_lightsleft3&&hud_lightsleft4&&hud_lightsleft5");
	closeGlobalButton ("hud_lightsright&hud_lightsright1&hud_lightsright2&hud_lightsright3&hud_lightsright4&hud_lightsright5");
	closeGlobalButton ("rcm_backflag&rcm_contrast&rcm_contrast2&rcm_bl_bsr1&rcm_bl_bsr2&rcm_bl_bsr3&rcm_bl_bsr4&rcm_bl_bsr5&rcm_bl_bsr6&rcm_bl_bsr7&rcm_bl_bsr8&rcm_bl_bsr9&rcm_bl_bsr0");	
	globalRcm( langEngine( "%{rcm_chequeredflag}%" )); 
      openGlobalButton( "rcm_backflag",92,64,15,16,1,6,32," "); # backing for whole flag
    	openGlobalButton( "rcm_contrast",92,64,15,16,1,6,16," "); # backing for contrast
    	openGlobalButton( "rcm_contrast2",92,64,15,16,1,6,16," "); # another layer for contrast
    	openGlobalButton( "rcm_bl_bsr1",95,64,3,4,1,6,32," "); # first of little black squares on flag
    	openGlobalButton( "rcm_bl_bsr2",92,68,3,4,1,6,32," ");
    	openGlobalButton( "rcm_bl_bsr3",95,72,3,4,1,6,32," ");
    	openGlobalButton( "rcm_bl_bsr4",92,76,3,4,1,6,32," ");
    	openGlobalButton( "rcm_bl_bsr5",101,64,3,4,1,6,32," ");
    	openGlobalButton( "rcm_bl_bsr6",98,68,3,4,1,6,32," ");
    	openGlobalButton( "rcm_bl_bsr7",101,72,3,4,1,6,32," ");
    	openGlobalButton( "rcm_bl_bsr8",98,76,3,4,1,6,32," "); 
    	openGlobalButton( "rcm_bl_bsr9",104,68,3,4,1,6,32," ");
    	openGlobalButton( "rcm_bl_bsr0",104,76,3,4,1,6,32," ");
	openGlobalButton( "hud_trackstatus",111,6,17,6,1,-1,16,langEngine( "%{hud_trackstatuscheq}%" ));
  OpenGlobalButton( "hud_penstatus",97,2,12,4,1,-1,16,langEngine( "%{hud_pstatusopen}%"));
	openGlobalButton( "hud_pexstatus",97,8,12,4,1,-1,16,langEngine( "%{hud_pstatusopen}%"));
  openGlobalButton( "hud_lightsleft",66,2,2,4,2,-1,16,"");
  openGlobalButton( "hud_lightsleft1",68,2,2,4,2,-1,32,"");
  openGlobalButton( "hud_lightsleft2",66,6,2,4,2,-1,32,"");  
  openGlobalButton( "hud_lightsleft3",68,6,2,4,2,-1,16,"");
  openGlobalButton( "hud_lightsleft4",66,10,2,4,2,-1,16,"");
  openGlobalButton( "hud_lightsleft5",68,10,2,4,2,-1,32,"");	
 	openGlobalButton( "hud_lightsright",130,2,2,4,2,-1,16,"");
 	openGlobalButton( "hud_lightsright1",132,2,2,4,2,-1,32,"");
  openGlobalButton( "hud_lightsright2",130,6,2,4,2,-1,32,"");  
  openGlobalButton( "hud_lightsright3",132,6,2,4,2,-1,16,"");
  openGlobalButton( "hud_lightsright4",130,10,2,4,2,-1,16,"");
  openGlobalButton( "hud_lightsright5",132,10,2,4,2,-1,32,""); 	 	
EndSub

Sub DoRCqualy( $KeyFlags,$id )
	closeGlobalButton ("hud_trackstatus&hud_pexstatus&hud_lightsleft&hud_lightsleft1&&hud_lightsleft2&&hud_lightsleft3&&hud_lightsleft4&&hud_lightsleft5");
	closeGlobalButton ("hud_lightsright&hud_lightsright1&hud_lightsright2&hud_lightsright3&hud_lightsright4&hud_lightsright5");
	closeGlobalButton ("rcm_backflag&rcm_contrast&rcm_contrast2&rcm_bl_bsr1&rcm_bl_bsr2&rcm_bl_bsr3&rcm_bl_bsr4&rcm_bl_bsr5&rcm_bl_bsr6&rcm_bl_bsr7&rcm_bl_bsr8&rcm_bl_bsr9&rcm_bl_bsr0");	
	globalRcm( langEngine( "%{rcm_qualymessage}%" ));
	openGlobalButton( "hud_trackstatus",111,6,17,6,1,-1,16,langEngine( "%{hud_trackstatusqualy}%" ));
	openGlobalButton( "hud_pexstatus",97,8,12,4,1,-1,16,langEngine( "%{hud_pstatusopen}%"));
EndSub

Sub DoRCrace( $KeyFlags,$id )
	closeGlobalButton ("hud_trackstatus&hud_pexstatus&hud_lightsleft&hud_lightsleft1&&hud_lightsleft2&&hud_lightsleft3&&hud_lightsleft4&&hud_lightsleft5");
	closeGlobalButton ("hud_lightsright&hud_lightsright1&hud_lightsright2&hud_lightsright3&hud_lightsright4&hud_lightsright5");
	closeGlobalButton ("rcm_backflag&rcm_contrast&rcm_contrast2&rcm_bl_bsr1&rcm_bl_bsr2&rcm_bl_bsr3&rcm_bl_bsr4&rcm_bl_bsr5&rcm_bl_bsr6&rcm_bl_bsr7&rcm_bl_bsr8&rcm_bl_bsr9&rcm_bl_bsr0");	
	globalRcm( langEngine( "%{rcm_racemessage}%" ));
  openGlobalButton( "hud_trackstatus",111,6,17,6,1,-1,16,langEngine( "%{hud_trackstatusrace}%" ));
  openGlobalButton( "hud_pexstatus",97,8,12,4,1,-1,16,langEngine( "%{hud_pstatusopen}%"));
	openGlobalButton( "hud_lightsleft",62,0,12,12,4,-1,0 + 8,langEngine( "%{hud_lightsgreen}%" )); 
  openGlobalButton( "hud_lightsright",126,0,12,12,4,-1,0 + 8,langEngine( "%{hud_lightsgreen}%" ));       
EndSub

Sub DoRCyellowflag( $KeyFlags,$id )
	closeGlobalButton ("rcm_backflag&rcm_contrast&rcm_contrast2&rcm_bl_bsr1&rcm_bl_bsr2&rcm_bl_bsr3&rcm_bl_bsr4&rcm_bl_bsr5&rcm_bl_bsr6&rcm_bl_bsr7&rcm_bl_bsr8&rcm_bl_bsr9&rcm_bl_bsr0");
	closeGlobalButton ("hud_trackstatus&hud_pexstatus&hud_lightsleft&hud_lightsleft1&&hud_lightsleft2&&hud_lightsleft3&&hud_lightsleft4&&hud_lightsleft5");
	closeGlobalButton ("hud_lightsright&hud_lightsright1&hud_lightsright2&hud_lightsright3&hud_lightsright4&hud_lightsright5");
	globalRcm( langEngine( "%{rcm_yellowflagmessage}%" )); 
	openGlobalButton( "hud_trackstatus",111,6,17,6,1,6,16,langEngine( "%{hud_trackstatusyellow}%" ));
	openGlobalButton( "hud_lightsleft",62,0,12,12,4,6,0,langEngine( "%{hud_lightsyellow}%" )); 
  openGlobalButton( "hud_lightsright",126,0,12,12,4,6,0,langEngine( "%{hud_lightsyellow}%" )); 
EndSub
  
Sub DoRCblueflag( $KeyFlags,$id )
	closeGlobalButton ("rcm_backflag&rcm_contrast&rcm_contrast2&rcm_bl_bsr1&rcm_bl_bsr2&rcm_bl_bsr3&rcm_bl_bsr4&rcm_bl_bsr5&rcm_bl_bsr6&rcm_bl_bsr7&rcm_bl_bsr8&rcm_bl_bsr9&rcm_bl_bsr0");
	closeGlobalButton ("hud_trackstatus&hud_pexstatus&hud_lightsleft&hud_lightsleft1&&hud_lightsleft2&&hud_lightsleft3&&hud_lightsleft4&&hud_lightsleft5");
	closeGlobalButton ("hud_lightsright&hud_lightsright1&hud_lightsright2&hud_lightsright3&hud_lightsright4&hud_lightsright5");
	globalRcm( langEngine( "%{rcm_blueflagmessage}%" )); 
	openGlobalButton( "hud_trackstatus",111,6,17,6,1,6,16,langEngine( "%{hud_trackstatusblue}%" ));
	openGlobalButton( "hud_lightsleft",62,0,12,12,4,6,0,langEngine( "%{hud_lightsblue}%" )); 
  openGlobalButton( "hud_lightsright",126,0,12,12,4,6,0,langEngine( "%{hud_lightsblue}%" )); 
EndSub  

# Pitlane Conditions Section
############################
Sub DoRCpitlane( $KeyFlags,$id )
  closePrivButton ("rcm_messages&rcm_track&rcm_penalties&rcm_pitlane&rcm_closemenu&rcm_options&rcm_track_yellowflag&rcm_track_blueflag");
	closePrivButton ("rcm_track_greenflag&rcm_track_safetycar&rcm_track_redflag&rcm_track_qualyprogress&rcm_track_raceprogress&rcm_goback&rcm_track_cheqflag");
	OpenPrivButton( "rcm_pitoptions",$RCMorigL+1,$RCMorigT+1,$RCMWidth,$RCMHeight+2,$RCMspacing+1,-1,0, langEngine( "%{rcm_pitoptions}%") );
	openPrivButton( "rcm_penopen",$RCMorigL+1,$RCMorigT+8,$RCMWidth,$RCMHeight,$RCMspacing+1,-1,32, langEngine( "%{rcm_penopen}%"),DoRCpenopen );
	openPrivButton( "rcm_penclosed",$RCMorigL+1,$RCMorigT+13,$RCMWidth,$RCMHeight,$RCMspacing+1,-1,32, langEngine( "%{rcm_penclosed}%"),DoRCpenclosed );
	openPrivButton( "rcm_pexopen",$RCMorigL+1,$RCMorigT+18,$RCMWidth,$RCMHeight,$RCMspacing+1,-1,32, langEngine( "%{rcm_pexopen}%"),DoRCpexopen );
	openPrivButton( "rcm_pexclosed", $RCMorigL+1,$RCMorigT+23,$RCMWidth,$RCMHeight,$RCMspacing+1,-1,32, langEngine( "%{rcm_pexclosed}%"),DoRCpexclosed );
	openPrivButton( "rcm_goback",$RCMorigL+1,$RCMorigT+33,12,$RCMHeight,$RCMspacing,-1,16, langEngine( "%{rcm_goback}%"),DoRCmenu );
	openPrivButton( "rcm_closemenu",$RCMorigL+13,$RCMorigT+33,12,$RCMHeight,$RCMspacing,-1,16, langEngine( "%{rcm_closemenu}%"),DoRCM );
EndSub

Sub DoRCpenopen( $KeyFlags,$id )
	closeGlobalButton ("hud_penstatus");
	globalRcm( langEngine( "%{rcm_penopenmsg}%" ) );
	openGlobalButton( "hud_penstatus",97,2,12,4,1,-1,16,langEngine( "%{hud_pstatusopen}%"));	
EndSub

Sub DoRCpexopen( $KeyFlags,$id )
	closeGlobalButton ("hud_pexstatus");
	globalRcm( langEngine( "%{rcm_pexopenmsg}%" ) );
	openGlobalButton( "hud_pexstatus",97,8,12,4,1,-1,16,langEngine( "%{hud_pstatusopen}%"));
EndSub

Sub DoRCpenclosed( $KeyFlags,$id )
	closeGlobalButton ("hud_penstatus");
	globalRcm( langEngine( "%{rcm_penclosedmsg}%" ) );
	openGlobalButton( "hud_penstatus",97,2,12,4,1,-1,16,langEngine( "%{hud_pstatusclosed}%"));	
EndSub

Sub DoRCpexclosed( $KeyFlags,$id )
	closeGlobalButton ("hud_pexstatus");
	globalRcm( langEngine( "%{rcm_pexclosedmsg}%" ) );
	openGlobalButton( "hud_pexstatus",97,8,12,4,1,-1,16,langEngine( "%{hud_pstatusclosed}%"));	
EndSub 	

# HUD Status Section
####################

Event OnNewPlayerJoin( $userName )  # Player event

	openGlobalButton( "hud_back",70,0,60,14,1,-1,16,"");
	openGlobalButton( "hud_penback",71,1,39,6,1,-1,32,"");
	openGlobalButton( "hud_pexback",71,7,39,6,1,-1,32,"");
	openGlobalButton( "hud_trackback",110,1,19,12,1,-1,32,"");
	openGlobalButton( "hud_lightsbackleft",66,2,4,12,1,-1,16,"");
	openGlobalButton( "hud_lightsbackright",130,2,4,12,1,-1,16,"");
	openGlobalButton( "hud_pentext",71,1,40,5,5,-1,64,langEngine( "%{hud_pentext}%"));
	openGlobalButton( "hud_pextext",71,7,40,5,5,-1,64,langEngine( "%{hud_pextext}%"));
	openGlobalButton( "hud_tracktext",109,1,21,5,1,-1,0,langEngine( "%{hud_tracktext}%"));
	openGlobalButton( "hud_penfront",97,2,12,4,1,-1,16,"");
	openGlobalButton( "hud_pexfront",97,8,12,4,1,-1,16,"");
	openGlobalButton( "hud_trackfront",111,6,17,6,1,-1,16,"");   	
EndEvent


# English Language Section
##########################

Lang "EN"

rcm_notrcadmin = "^2You do not have ^1Admin ^2priviliges";
rcm_menu = "^7RACE CONTROL%nl%^7MANAGER";
rcm_by = "^8by Sinanju";
rcm_menumanager = "^3RCM MENU";
rcm_closemenu = "^1CLOSE";
rcm_options = "^7OPTIONS";
rcm_messages = "^3Messaging";
rcm_track = "^3Track Options";
rcm_penalties = "^3Penalties";
rcm_pitlane = "^3Pitlane Options";
rcm_greenflag = "^2Green ^3Flag";
rcm_greenflagmessage = "^2!! GREEN FLAG !!";
rcm_safetycar = "^3Safety Car";
rcm_safetycarmessage = "^7!! SAFETY CAR DEPLOYED !!";
rcm_redflag = "^1Red ^3Flag";
rcm_redflagmessage = "^1!! RED FLAG !!";
rcm_goback = "^7< BACK";
rcm_cheqflag = "^0Chequered Flag";
rcm_chequeredflag = "^0CHEQUERED FLAG";
rcm_qualyprogress = "^6Qualy";
rcm_qualymessage = "^7!! QUALIFYING IN PROGRESS !!";
rcm_raceprogress = "^6Race";
rcm_racemessage = "^7!! RACE IN PROGRESS !!";
rcm_yellowflag = "^3Yellow Flag";
rcm_yellowflagmessage = "^3YELLOW FLAG - BE PREPARED TO SLOW OR STOP";
rcm_blueflag = "^4Blue ^3Flag";
rcm_blueflagmessage = "^4BLUE FLAG - LET LEADER(S) THROUGH";
rcm_pitoptions = "^7Pitlane Options";
rcm_penopen = "^2Open ^3Pitlane Entrance";
rcm_pexopen = "^2Open ^3Pitlane Exit";
rcm_penclosed = "^1Close ^3Pitlane Entrance";
rcm_pexclosed = "^1Close ^3Pitlane Exit";
rcm_penopenmsg = "^3Pitlane Entrance ^2Open";
rcm_pexopenmsg = "^3Pitlane Exit ^2Open";
rcm_penclosedmsg = "^3Pitlane Entrance ^1Closed";
rcm_pexclosedmsg = "^3Pitlane Exit ^1Closed";
rcm_pentext = "^7PENALTIES";
rcm_mestext = "^7MESSAGING";
rcm_tracktext = "^7TRACK OPTIONS";
rcm_penmess = "^3LFSLapper%nl%^2sets automatic%nl%^2penalties for%nl%^2any infractions";
rcm_privrcm = "^2WHISPER ^3Global Message";
rcm_globrcm = "^1SHOUT ^3Global Message";
rcm_serverrcm = "^3Server Messages";
rcm_standardrcm = "^3Standard Messages";
rcm_servtext = "^7SERVER MESSAGES";
rcm_stantext = "^7STANDARD MESSAGES";
rcm_smessage1 = "^3Welcome to server";
rcm_smessage2 = "^3email address";
rcm_smessage3 = "^3Any problems";
rcm_smessage4 = "^3Admin Break";
rcm_smessage5 = "^3Admin Rules";
rcm_message1 = "^3Going blind";
rcm_message2 = "^3Crashing";
rcm_message3 = "^3Accidents";
rcm_message4 = "^3Race shortly";
rcm_message5 = "^3Qualy shortly";
rcm_smess1 = "^2Welcome to {0}";
rcm_smess2 = "^2email address is: ^6sinanju@hotmail.co.uk";
rcm_smess3 = "^2Any problems then contact Admin or email team";
rcm_smess4 = "^2Admin is taking short break.  Back shortly.";
rcm_smess5 = "^2The Admins ruling is final";
rcm_mess1 = "^1CAUTION! ^2You can go blind doing that!";
rcm_mess2 = "^2Crashing is ^1not ^2encouraged; can get you ^7kicked";
rcm_mess3 = "^2Accidents happen; ^3Shift S ^2or ^3Shift P ^2to get out of way.";
rcm_mess4 = "^2The race will start shortly";
rcm_mess5 = "^2Qualifying will start shortly";
rcm_privmsg = "^3Send ^1PRIVATE ^3message";
rcm_teammsg = "^3Send ^1TEAM ^3message";
rcm_instruct = "Please follow these instructions"; 
rcm_privmsginst = "^7Use following format%nl%^2!pm <username> <message>%nl%^7for instance%nl%^3!pm sinanju Hello";
rcm_teammsginst = "^7To use in game, make sure that you and the %nl%^7other members of your team have their teamname%nl%^7set with their team name in square brackets%nl%^7(this can be changed in the module) ie Krayy[LFSNZ]%nl%^7Then when you type '^3!tc <msg>'%nl%^7everyone who has the same team name%nl%^7will see the message but no one else";
rcm_trackflags = "^7Flags";
rcm_trackprogress = "^7In Progress";

# HUD System
############

hud_pentext = "^7Pitlane Entrance Status"; 
hud_pextext = "^7Pitlane Exit Status" ;
hud_tracktext = "^7Track Status"; 
hud_pstatusopen = "^2OPEN";
hud_pstatusclosed = "^1CLOSED";
hud_trackstatusqualy = "^3QUALIFYING IN PROGRESS";
hud_trackstatusgreen = "^2GREEN FLAG";
hud_trackstatusyellow = "^3YELLOW FLAG";
hud_trackstatusblue = "^4BLUE FLAG";
hud_trackstatussafety = "^1SAFETY CAR OUT";
hud_trackstatusred = "^1RED FLAG";
hud_trackstatuscheq = "^3RACE COMPLETE";
hud_trackstatusrace = "^2RACE IN PROGRESS";
hud_lights = "^8•%nl%^8•";
hud_lightswhite = "^7•%nl%^7•";  
hud_lightsyellow = "^3•%nl%^3•"; 
hud_lightsgreen = "^2•%nl%^2•"; 
hud_lightsblue = "^4•%nl%^4•"; 
hud_lightsred = "^1•%nl%^1•";
hud_lightscheq = "^0•%nl%^7•";
        	
EndLang



# French Language Section
##########################

Lang "FR"

rcm_penalties = "^7OPTIONS PEINE";
rcm_greenflag = "^3Drapeau Vert";
rcm_greenflagmessage = "^2!! DRAPEAU VERT !!";
rcm_redflag = "^3Drapeau Rouge";
rcm_redflagmessage = "^2!! DRAPEAU ROUGE !!";
     	
EndLang