<?php
ENDIF
privdelayedcommand( 4, MyDelayedFunc);
EndEvent
Sub MyDelayedFunc( $userName )
...
EndSub
?>
<?php
$ListOfPlayers = GetListOfPlayers("N");
FOREACH ( $Player IN $ListOfPlayers)
privMsg (" Player = " . $Player["value"]);
ENDFOREACH
?>
<?php
$myShortTrackName = getLapperVar( "ShortTrackName" );
IF ( $myShortTrackName == "BL1" || $myShortTrackName == "BL2" || ...
?>
<?php
# 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
?>
<?php
CatchEvent OnNewPlayerJoin( $userName ) # Player event
openPrivButton ( "hud_back",70,0,60,14,1,-1,16,"");
openPrivButton ( "hud_penback",71,1,39,6,1,-1,32,"");
openPrivButton ( "hud_pexback",71,7,39,6,1,-1,32,"");
openPrivButton ( "hud_trackback",110,1,19,12,1,-1,32,"");
openPrivButton ( "hud_lightsbackleft",66,2,4,12,1,-1,16,"");
openPrivButton ( "hud_lightsbackright",130,2,4,12,1,-1,16,"");
openPrivButton ( "hud_pentext",71,1,40,5,5,-1,64,langEngine( "%{hud_pentext}%"));
openPrivButton ( "hud_pextext",71,7,40,5,5,-1,64,langEngine( "%{hud_pextext}%"));
openPrivButton ( "hud_tracktext",109,1,21,5,1,-1,0,langEngine( "%{hud_tracktext}%"));
openPrivButton ( "hud_penfront",97,2,12,4,1,-1,16,"");
openPrivButton ( "hud_pexfront",97,8,12,4,1,-1,16,"");
openPrivButton ( "hud_trackfront",111,6,17,6,1,-1,16,"");
EndCatchEvent
?>
<?php
SWITCH( $command )
CASE "!admins":
CASE "!ma":
DoCifConfigMembership(0,0);
BREAK;
ENDSWITCH
?>
<?php
RegisterNodeAction( "FE1" , 50, StMidCorner1,"" );
RegisterNodeAction( "FE1" , 105, SpeedTrap1,"" );
RegisterNodeAction( "FE1" , 288, SpeedTrap2,"" );
?>
<?php
Sub DoSpeedTrap( $TrapType, $TrapText, $TrapNum )
$currPly = GetPlayerInfo();
$TopSpeed = ToNum( $currPly["InstantSpeed"] );
$StoredVarName = "TrapSpeed" . "-" . $TrapType . "-" . $TrapNum . "-" . getLapperVar("ShortTrackName") . "-" . $currPly["Car"];
$OldTopSpeed = GetUserStoredNum ( $StoredVarName);
IF ( $OldTopSpeed < 0 ) # Have not had a valid Speedtrap time before
THEN
privMsg ( langEngine ( "%{main_st_none}%" , $TrapText, ToPlayerUnit($TopSpeed), $currPly["UnitSpeed"] ) );
SetUserStoredNum ( $StoredVarName, $TopSpeed);
ELSE
IF ( $TopSpeed > $OldTopSpeed)
THEN
privMsg ( langEngine ( "%{main_st_faster}%" , $TrapText, ToPlayerUnit($TopSpeed ), ToPlayerUnit($TopSpeed - $OldTopSpeed), $currPly["UnitSpeed"] ) );
SetUserStoredNum ( $StoredVarName, $TopSpeed);
ELSE
privMsg ( langEngine ( "%{main_st_slower}%" , $TrapText, ToPlayerUnit($TopSpeed), ToPlayerUnit($OldTopSpeed - $TopSpeed), $currPly["UnitSpeed"] ) );
ENDIF
ENDIF
EndSub
Sub StMidCorner1( $userName )
DoSpeedTrap( "MC", "Mid-Corner speed", 1 );
EndSub
Sub StCornerExit1( $userName )
DoSpeedTrap( "CE", "Corner Exit speed", 1 );
EndSub
Sub SpeedTrap1( $userName )
DoSpeedTrap( "RT", "Radar Trap speed", 1 );
EndSub
Sub SpeedTrap2( $userName )
DoSpeedTrap( "RT", "Radar Trap speed", 2 );
EndSub
Sub SpeedTrap3( $userName )
DoSpeedTrap( "RT", "Radar Trap speed", 3 );
EndSub
Sub SpeedTrap4( $userName )
DoSpeedTrap( "RT", "Radar Trap speed", 4 );
EndSub
Sub SpeedTrap5( $userName )
DoSpeedTrap( "RT", "Radar Trap speed", 5 );
EndSub
Sub SpeedTrap6( $userName )
DoSpeedTrap( "RT", "Radar Trap speed", 6 );
EndSub
Lang "EN"
main_st_faster = "{0}: {1} {3} (^2+{2}^0)";
main_st_slower = "{0}: {1} {3} (^1-{2}^0)";
main_st_none = "{0}: {1} {2}";
EndLang
?>
<?php
Sub DoSpeedTrap( $num )
$userName = GetCurrentPlayerVar( "UserName" );
$car = GetCurrentPlayerVar("Car");
$track = getLapperVar("ShortTrackName");
$TopSpeed = ToNum( GetCurrentPlayerVar( "InstantSpeed" ));
$OldTopSpeed = ToNum(GetCurrentPlayerVar ( "ST" . $num . "TopSpeed-" . $track . "-" . $car));
IF ( $OldTopSpeed < 0 ) # Have not had a valid Speedtrap time before
THEN
openPrivButton( "st_text",1,16,20,5,3,4,80, langEngine ( "%{main_st_none}%" ,ToMph($TopSpeed) ) );
SetCurrentPlayerVar ( "ST" . $num . "TopSpeed-" . $track . "-" . $car, $TopSpeed);
ELSE
IF ( $TopSpeed > $OldTopSpeed)
THEN
openPrivButton( "st_text",1,16,30,5,3,4,80, langEngine ( "%{main_st_faster}%" , ToMph($TopSpeed ), ToMph($TopSpeed - $OldTopSpeed) ) );
SetCurrentPlayerVar ( "ST" . $num . "TopSpeed-" . $track . "-" . $car, $TopSpeed);
ELSE
openPrivButton( "st_text",1,16,30,5,3,4,80, langEngine ( "%{main_st_slower}%" ,ToMph($TopSpeed), ToMph($OldTopSpeed - $TopSpeed) ) );
ENDIF
ENDIF
EndSub
?>
<?php
$OldTopSpeed = GetUserStoredValue( $userName, "OldTopSpeed" );
$STdiff = ToNum($OldTopSpeed) - $TopSpeed;
?>
<?php
Sub DoSpeedTrap( $num )
$userName = GetCurrentPlayerVar( "UserName" );
$car = GetCurrentPlayerVar("Car");
$track = getLapperVar("ShortTrackName");
$TopSpeed = ToNum( GetCurrentPlayerVar( "InstantSpeed" ));
$OldTopSpeed = GetUserStoredNum ( $userName, "ST" . $num . "TopSpeed-" . $track . "-" . $car);
IF ( $OldTopSpeed < 0 ) # Have not had a valid Speedtrap time before
THEN
openPrivButton( "st_text",1,16,20,5,3,4,80, langEngine ( "%{main_st_none}%" ,ToMph($TopSpeed) ) );
SetUserStoredNum ( $userName, "ST" . $num . "TopSpeed-" . $track . "-" . $car, $TopSpeed);
ELSE
IF ( $TopSpeed > $OldTopSpeed)
THEN
openPrivButton( "st_text",1,16,30,5,3,4,80, langEngine ( "%{main_st_faster}%" , ToMph($TopSpeed ), ToMph($TopSpeed - $OldTopSpeed) ) );
SetUserStoredNum ( $userName, "ST" . $num . "TopSpeed-" . $track . "-" . $car, $TopSpeed);
ELSE
openPrivButton( "st_text",1,16,30,5,3,4,80, langEngine ( "%{main_st_slower}%" ,ToMph($TopSpeed), ToMph($OldTopSpeed - $TopSpeed) ) );
ENDIF
ENDIF
EndSub
Sub SpeedTrap1( $userName )
DoSpeedTrap( 1 );
EndSub
Sub SpeedTrap2( $userName )
DoSpeedTrap( 2 );
EndSub
Sub SpeedTrap3( $userName )
DoSpeedTrap( 3 );
EndSub
Sub SpeedTrap4( $userName )
DoSpeedTrap( 4 );
EndSub
Sub SpeedTrap5( $userName )
DoSpeedTrap( 5 );
EndSub
Sub SpeedTrap6( $userName )
DoSpeedTrap( 6 );
EndSub
Lang "EN"
main_st_faster = "^0Radar Trap: {0} mph (^2+{1}^0)";
main_st_slower = "^0Radar Trap: {0} mph (^1-{1}^0)";
main_st_none = "^0Radar Trap: {0} mph";
EndLang
?>