CatchEvent OnLapperStart()
	OnLapperStart_GreatSC3();
EndCatchEvent

CatchEvent OnMSO( $userName, $text ) # Player event

	$idxOfFirtsSpace = indexOf( $text, " ");
	IF( $idxOfFirtsSpace == -1 ) THEN
	  $command = $text;
	  $argv = "";
	ELSE
	  $command = subStr( $text,0,$idxOfFirtsSpace );
	  $argv = trim( subStr( $text,$idxOfFirtsSpace ) );
	ENDIF

	SWITCH( $command )
		CASE "!sectors":
			$UserName = GetCurrentPlayerVar("UserName");
			
			IF( UserInGroup( "showSCuser",$UserName) == 1 )
			THEN
			  RemoveUserFromGroup("showSCuser",$userName);
			  privMsg("^3 Sector time messages are hidden");
			ELSE
			  MoveUserToGroup("showSCuser",$userName);			
			  privMsg("^3 Sector time messages will be shown");
			ENDIF
			BREAK;
			
		CASE "!s":
			$tData = SplitToArray( $showSCuser));
			DumpVar($tData);
			BREAK;
			
		CASE "!a":
			$GreatSC33333 = "0.35.00";
			DumpVar($GreatSC33333);
			$GreatSC33333aaaaaaa = MSHToNum($GreatSC33333);
			DumpVar($GreatSC33333aaaaaaa);
			$GreatSC3333ghj3 = NumToMSH(NumToMSH($GreatSC33333) - NumToMSH("0.20.00"));
			DumpVar($GreatSC3333ghj3);
			$GreatSCtest = NumToMSH($GreatSC33333);
			DumpVar($GreatSCtest);		
			BREAK;		
			
		CASE "!t":
			$UserName = GetCurrentPlayerVar("UserName");		
			IF( UserInGroup( "showSCuser",$UserName) == 1 )
			THEN		
			  privMsg("^3 yo");
			ENDIF
			BREAK;
	ENDSWITCH
EndCatchEvent

CatchEvent OnSpbSplit1( $userName ) # Player event
	OnSpbSplit1_Split_messages();
EndCatchEvent

CatchEvent OnSpbSplit2( $userName ) # Player event
	OnSpbSplit2_Split_messages();
EndCatchEvent

CatchEvent OnLap( $userName ) # Player event
	OnLap_Split_messages();
EndCatchEvent

Sub OnLapperStart_GreatSC3()
	GlobalVar $GreatSC3;
	
	$GreatSC3 = 0.30.00;
EndSub

Sub OnSpbSplit1_Split_messages()
	$userName=GetCurrentPlayerVar("UserName");
	SetStoredValue( $userName . "LastSplit", GetCurrentPlayerVar( "SplitTime" ) );	
	SetStoredValue( $userName . "Sector1", GetStoredValue( $userName."LastSplit" ) ); #Just for database
EndSub

Sub OnSpbSplit2_Split_messages()
	$userName = GetCurrentPlayerVar("UserName");
	SetStoredValue( $userName . "Sector2", ( NumToMSH( GetCurrentPlayerVar( "SplitTime" ) - GetStoredValue( $userName."LastSplit" ))) );
			
	$lop = GetListOfPlayers("N");
	#$NickName = GetCurrentPlayerVar("NickName");
	FOREACH ( $de in $lop )
		$showSCuser = $de["value"];

		IF ( UserInGroup( "showSCuser",$showSCuser ) == 1 )
		THEN
		  #IF ( NumToMSH(GetStoredValue( $userName."Sector2" )) > "0.35.00" )
		  #THEN
		    PrivMsg( $showSCuser, "^3Sector 2: ^7 " . GetStoredValue( $userName."Sector2" ) );
		  #ENDIF
		ENDIF
	ENDFOREACH
	
	openPrivButton( "Sector2Time",25,10,150,12,8,6,ISB_NONE, "^7Sector: " . GetStoredValue( $userName."Sector2" ),"" );
	SetStoredValue( $userName."LastSplit", GetCurrentPlayerVar( "SplitTime" ) );
EndSub

Sub OnLap_Split_messages()
	$userName = GetCurrentPlayerVar("UserName");
	SetStoredValue( $userName . "Sector3", ( NumToMSH (GetCurrentPlayerVar ( "SplitTime" ) - GetStoredValue( $userName."LastSplit" ))) ) ;
			
	$lop = GetListOfPlayers("N");
	$NickName = GetCurrentPlayerVar( "NickName" );

	FOREACH ( $de in $lop )
		$showSCuser = $de["value"];
		IF ( UserInGroup( "showSCuser",$showSCuser ) == 1 )
		THEN
		  IF ( MSHToNum( GetStoredValue( $userName."Sector3" ) ) > 29170 )
		  THEN
		    PrivMsg( $showSCuser, "^3Great sector 3: ^7 ".GetStoredValue( $userName."Sector3" ) . " by " . $NickName );
		  ENDIF
		ENDIF
	ENDFOREACH
		
	openPrivButton( "Sector3Time",25,10,150,12,8,6,ISB_NONE, "^7Sector: ".GetStoredValue( $userName."Sector3" ),"" );
EndSub