// #autoload
// #name = AutoPoints
// #version = 3.0.2
// #date = May 25, 2001
// #author = <a:player
-Boots-
60><spush><color:FFFFFF>-Boots-<spop></a>
// #warrior = -Boots-
// #email = boots@bootsware.com
// #web = http://www.bootsware.com
// #description = Automatically adds waypoints to players.
// #status = Beta
// #readme = scripts/autoexec/-boots-/autopoints.txt
// #config = autoPointsConfigGUI
// #update = AutoPoints
$autoPoints::version = "3.0.2";
package AutoPoints_Update {
function UpgradeInfo()
{
$Upgrade::Instructions = "Read the file AutoPoints.txt it has some very important information. Updates to the script will take affect next time you start Tribes 2.";
$Upgrade::Fixes = "Fixed the problem introduced in v3.0.1 of settings not save across instances of Tribes 2";
$Upgrade::Version = "3.0.2";
}
};
//
// Function: apGetMyClientID
//
// Desc: Get my client ID so I don't try to set a waypoint to myself
//
function apGetMyClientID(%msgType, %msgString, %clientName, %clientId, %targetId, %isAI, %isAdmin, %isSuperAdmin, %isSmurf, %guid) {
if(StrStr(%msgString, "Welcome to Tribes") != -1) {
$CurrentClientId = %clientId;
}
}
//
// Function: apSomeoneJoinedATeam
//
// Desc: A person joined either Storm, Inferno of Observers.. set a waypoint to them if appropriate
//
function apSomeoneJoinedATeam(%msgType, %msgString, %clientName, %teamName, %clientId, %teamId)
{
%i = 0;
while((%obj = PlayerListGroup.getObject(%i)) != -1) {
if (%obj.clientId == %clientId) {
// if this is us, then lets save off the team
if (%clientId == $CurrentClientId && $CurrentClientId != 0) {
$CurrentTeamId = %obj.teamId;
}
}
%i++;
}
apRefreshWayPoints();
}
//
// Function: apCreateWayPoints()
//
// Decs: Goes through the list of players and sets way points
//
function apCreateWayPoints()
{
%i = 0;
while((%obj = PlayerListGroup.getObject(%i)) != -1) {
// if the player we are looking at is not ourselves, set a waypoit
if (%obj.clientId != $CurrentClientId) {
if (%obj.teamId != 0) {
// Is it someone on my team?
if ($autoPoints::addFriendly == 1 && %obj.teamId == $CurrentTeamId) {
echo("Adding friendly: " @ %obj.name);
apAddWayPointToPlayer(%obj.name, %obj.targetID);
}
// Is it an enemy?
if ($autoPoints::addEnemy == 1 && %obj.teamId != $CurrentTeamId && %obj.teamId != 0) {
echo("Adding enemy: " @ %obj.name);
apAddWayPointToPlayer(%obj.name, %obj.targetID);
}
}
}
%i++;
}
}
//
// Function: apAddWayPointToPlayer
//
// Desc: Set a waypoint for this player
//
function apAddWayPointToPlayer(%name, %targetID)
{
// echo("AddWayPointToPlayer: " @ %name @ " target: " @ %targetID);
%targetnum = createClientTarget(%targetID, "0 0 0");
%targetnum.createWaypoint(%name);
$ClientWaypoints.add(%targetnum);
}
//
// Function: apClearWayPoints
//
// Desc: The map has ended, clear out all waypoints
//
function apClearWayPoints()
{
if(isObject($ClientWaypoints))
$ClientWaypoints.delete();
$ClientWaypoints = new SimGroup();
ServerConnection.add($ClientWaypoints);
CommanderMapGui.firstWake = true;
CommanderTree.currentWaypointID = 0;
}
//
// Function: apRefreshWayPoints
//
// Desc: Delete and recreate the waypoints
//
function apRefreshWayPoints()
{
apClearWayPoints();
apCreateWayPoints();
}
//
// Function: apStartMap
//
// Desc: We are starting the map, add all players
//
function apStartMap(%msg)
{
apRefreshWayPoints();
}
package autoPoints {
//
// Function: DispatchLaunchMode
//
// Desc: Register for the the events we are interested in
//
function DisconnectedCleanup()
{
parent::DisconnectedCleanup();
$CurrentClientId = 0;
$CurrentTeamId = 0;
}
//
// Function: DispatchLaunchMode
//
// Desc: Register for the the events we are interested in
//
function DispatchLaunchMode()
{
addMessageCallback('MsgClientJoin', apGetMyClientID);
addMessageCallback('MsgClientJoinTeam', apSomeoneJoinedATeam);
addMessageCallback('MsgGameOver', apClearWayPoints);
addMessageCallBack('MsgMissionStart', apStartMap);
parent::DispatchLaunchMode();
}
//
// Function: OptionsDlg::onWake
//
// Desc: Get us a key binding
//
function OptionsDlg::onWake(%this)
{
if ($RefreshAPBind $= "false") {
$RemapName[$RemapCount]="Refresh AutoPoints";
$RemapCmd[$RemapCount]="apRefreshWayPoints";
$RemapCount++;
$RefreshAPBind = "true";
}
parent::onWake( %this );
}
};
$RefreshAPBind = "false";
$CurrentClientId = 0;
$CurrentTeamId = 0;
$autoPoints::test = "test";
activatePackage(autoPoints);
if(!isObject(autoPointsGUI))
{
new ScriptObject(autoPointsGUI)
{
class = autoPointsGUI;
};
}
//
// Function: autoPointsGUI::CreatePrefFileHeader
//
// Desc: Add a little header to our settings file
//
function autoPointsGUI::CreatePrefFileHeader(%this)
{
if(!isobject(%this.fileeditor))
{
%this.fileeditor = new FileObject();
}
%this.fileeditor.openForWrite("prefs/autopointsprefs.cs");
%this.fileeditor.writeline("// Auto-Points Script Pack Pref File");
%this.fileeditor.writeline("//");
%this.fileeditor.writeline("//
Settings may be altered in this file but you are better off using the GUI");
%this.fileeditor.writeline("//
in the in-game scripts browser for any alterations to this file.");
%this.fileeditor.writeline("// ");
%this.fileeditor.writeline("//
Your changes will not become current until you restart Tribes 2 if edited here.");
%this.fileeditor.writeline("// ");
%this.fileeditor.writeline("// ===========================================================================");
%this.version = $autoPoints::version;
%this.fileeditor.writeline("autoPointsGUI.version = \""@%this.version@"\";");
%this.fileeditor.writeline("");
}
//
// Function: autoPointsGUI::CreateDefaultSettings
//
// Desc: Load the initial settings for Auto-Points
//
function autoPointsGUI::CreateDefaultSettings(%this)
{
%this.CreatePrefFileHeader();
%this.fileeditor.writeline("//");
%this.fileeditor.writeline("//");
%this.fileeditor.writeline("//
Settings");
%this.fileeditor.writeline("autoPointsGUI.addFriendly = 0;");
%this.fileeditor.writeline("autoPointsGUI.addEnemy = 1;");
%this.fileeditor.writeline("//");
%this.fileeditor.writeline("//");
%this.fileeditor.close();
}
//
// Function: autoPointsGUI::SaveSettings
//
// Desc: Write the settings to disk
//
function autoPointsGUI::SaveSettings(%this)
{
%this.CreatePrefFileHeader();
%this.addFriendly = $autoPoints::addFriendly == 1 ? 1 : 0;
%this.addEnemy = $autoPoints::addEnemy == 1 ? 1 : 0;
%this.fileeditor.writeline("//");
%this.fileeditor.writeline("//");
%this.fileeditor.writeline("//
Settings");
%this.fileeditor.writeline("autoPointsGUI.addFriendly = "@%this.addFriendly@";");
%this.fileeditor.writeline("autoPointsGUI.addEnemy = "@%this.addEnemy@";");
%this.fileeditor.writeline("//");
%this.fileeditor.writeline("//");
%this.fileeditor.close();
}
//
// Function: apSaveSettings
//
// Desc: The user wishes to save the changes to the options
//
function apSaveSettings()
{
autoPointsGUI.SaveSettings();
if ($CurrentClientId != 0) {
apClearWayPoints();
apCreateWayPoints();
}
}
//
// Function: autoPointsGUI::Startup
//
// Desc: "Constructor" Go load up my settings
//
function autoPointsGUI::Startup(%this)
{
if(!isfile("prefs/autopointsprefs.cs")) {
echo("prefs/autopointsprefs.cs not found");
%this.CreateDefaultSettings();
}
exec("prefs/autopointsprefs.cs");
$autoPoints::addFriendly = %this.addFriendly;
$autoPoints::addEnemy = %this.addEnemy;
}
autoPointsGUI.Startup();
new GuiControl(autoPointsConfigGUI) {
profile = "GuiDefaultProfile";
horizSizing = "width";
vertSizing = "height";
position = "0 0";
extent = "390 315";
minExtent = "390 315";
visible = "1";
helpTag = "0";
pane = "Main";
new ShellScrollCtrl(AutoPoints_Scroll) {
profile = "NewScrollCtrlProfile";
horizSizing = "width";
vertSizing = "height";
position = "5 6";
extent = "389 314";
minExtent = "389 314";
visible = "1";
helpTag = "0";
willFirstRespond = "1";
hScrollBar = "dynamic";
vScrollBar = "dynamic";
constantThumbHeight = "0";
defaultLineHeight = "15";
childMargin = "0 3";
fieldBase = "gui/shll_field";
new ShellPaneCtrl() {
profile = "ShellDlgPaneProfile";
horizSizing = "left";
vertSizing = "top";
position = "-16 24";
extent = "600 489";
minExtent = "48 92";
visible = "1";
helpTag = "0";
text = "AUTO-POINTS CONFIG";
maxLength = "255";
noTitleBar = "0";
new ShellToggleButton() {
profile = "ShellRadioProfile";
horizSizing = "right";
vertSizing = "bottom";
position = "30 30";
extent = "170 30";
minExtent = "26 27";
visible = "1";
variable = "$autoPoints::addFriendly";
helpTag = "0";
text = "AUTO WAYPOINT FRIENDLIES";
maxLength = "255";
};
new ShellToggleButton() {
profile = "ShellRadioProfile";
horizSizing = "right";
vertSizing = "bottom";
position = "30 60";
extent = "170 30";
minExtent = "26 27";
visible = "1";
variable = "$autoPoints::addEnemy";
helpTag = "0";
text = "AUTO WAYPOINT ENEMIES";
maxLength = "255";
};
new ShellBitmapButton() {
profile = "ShellButtonProfile";
horizSizing = "right";
vertSizing = "bottom";
position = "250 27";
extent = "173 38";
minExtent = "32 38";
visible = "1";
command = "apSaveSettings();";
helpTag = "0";
text = "SAVE CHANGES";
simpleStyle = "0";
};
};
};
};
// EOF - Upgraded File - scripts/autoexec/-boots-/autoPoints.cs
Poll
Author