F3 Mission Development Framework (F2 for ArmA 3)

[zerith 1]

Nametags only work for players, but yes it does work.

[bigshot 64]

Having trouble with Tasks/Briefing notes disappearing from map screen after respawning (only happens when using "group" respawn). Does not disappear when using the "instant" respawn setting.

Using v3.0.0 I think (my F files in common folder are dated 3/10)

Any ideas?

Edited April 10, 2013 by BigShot

[Reggaesmurf 10]

A big thanks to you comrade Fer, FA and all the helpers! Tractors for all!

[zerith 1]

I know this thread has sort of disappeared for the past month. If anybody is currently using this and wasn't sure how to fix the spectator script, I have updated it below for this framework. Kerc Kasha updated it a few days ago. If anybody really wants a file I can e-mail it to you or something, but for this case here is the code that you can just copy/paste into the specta.sqf located in f/common/f_spect/

private ["_player", "_killer", "_seagull", "_debugPlayer", "_markers", "_name", "_setOriginalSide", "_OriginalSide", "_RatingDelta", "_ehVehicles", "_t", "_disp", "_cCamera", "_cTarget", "_cName", "_cCamerasBG", "_cTargetsBG", "_cMap", "_cMapFull", "_cDebug", "_pos", "_foo", "_nNoDialog", "_lastUpdateMarkers", "_lastUpdateMarkerTypes", "_lastUpdateTags", "_allUnits", "_allVehicles", "_newUnits", "_newVehicles", "_fh", "_kh", "_waitUnits", "_m", "_s", "_rate", "_doMarkerTypes", "_mapFull", "_mappos", "_markedVehicles", "_i", "_u", "_type", "_icon", "_map", "_tt", "_bpos", "_bird"];

//
// Spectating Script for Armed Assault
// by Kegetys <kegetys [ät] dnainternet.net>
//

//tartLoadingScreen ["Initializing Spectator Script..."];
disableSerialization;
f_var_debugMode = 0;
_player = _this select 0;
_killer = _this select 1;
_seagull = _this select 2;

if ( isNil "_seagull" )  then  { _seagull = "noWait";};
VM_scriptName="specta";

_debugPlayer=objNull;
if ( f_var_debugMode == 1 ) then {
_debugPlayer=player;
};

// If seagull is valid we came from the respawn scene
if(typeName _seagull == "OBJECT") then {
_seagull setpos[-1000, -1000, 1000];
sleep 1.5;
 titleCut["","BLACK OUT", 1.5];
};


// Globals etc.
vm_count = 0; //Debug loop counter
debugX = [];
NORRN_noMarkersUpdates = true; //Added for no marker update - NORRN
spectate_events = compile preprocessFileLineNumbers ("f\common\f_spect\specta_events.sqf");
If (isNil "OldNVGMethod") then { OldNVGMethod = false };
If (isNil "VM_CommitDelay") then { VM_CommitDelay = 0 };
VM_CurrentCameraView = "";
KEG_Spect_Init = false;
KEGs_target = objNull; 
KEGsMouseButtons = [false, false];
KEGsMouseScroll = 0;
KEGsMouseCoord = [0.5, 0.5];
KEGsUseNVG = false;
KEGsMissileCamActive = false;
KEGsUseMissileCam = false;
KEGsMarkerNames = false; // True = display marker names and arrows
KEGsMarkerType = 1; // 0 = disabled, 1 = names, 2 = types
KEGsTags = false; // Particlesource tags
KEGsAIfilter = false; // Filter AI units (only players displayed)
KEGsDeadFilter = false; // Filter Unknown Dead units (only Alive players displayed)
KEGsClientAddonPresent = false; // Is client-side addon present?
KEGsMarkerSize = 1.0; // Full map marker size
KEGsMinimapZoom = 0.5; // Minimap zoom
KEGsSelect = 0; // Offset Used to change selected target
KEGsCurrentSelectIdx = 0; // Current Index of the selected target
KEGs1stGunner = false; // Gunner view on 1st person camera?
KEGsDroppedCamera = false; // Free camera dropped (non-targeted with free motion)?
KEGsCamForward = false;
KEGsCamBack = false;
KEGsCamLeft = false;
KEGsCamRight = false;
KEGsNeedUpdateLB = false;
mouseDeltaX = 0;
mouseDeltaY = 0;
sdistance = 1; // camera distance
fangle  = 0; // Free camera angle
fangleY = 15;
KEGs_flybydst = 35; // Distance of flyby camera (adjusted based on target speed)
szoom = 0.976;
_markers = []; // Map markers showing positions of all units
KEGsTagSources = []; // Particle sources for tags
KEGs_lastTgt = 0;
KEGs_nameCache = []; // Used to store valid names since name command cannot be trusted
_name = "Unknown";
CheckNewUnitsReady = true;
RefreshListReady = true;

maxDistance = 50;	// Maximum distance for camera
maxZoom = 0.05;		// Maximum zoom level
minZoom = 2;

// Unit sides shown - Show all if sides not set
if(isNil "KEGsShownSides") then {
KEGsShownSides = [west, east, resistance, civilian];
};

// In an effort to compensate for Renegades (players with ratings of less than -2000) we will add this Renegage fix
//Renegade Fix add function _setOriginalSide - ViperMaul 
VM_CheckOriginalSide =  {

_x = _this;

_OriginalSide = _x getVariable "KEG_OriginalSide";
if (isNil "_OriginalSide") then
{
	_RatingDelta = abs(Rating _x);
	_x addRating _RatingDelta; 
	_x setVariable ["KEG_OriginalSide",(side _x)];
	_x addRating -(_RatingDelta);
};
_OriginalSide
};


deathCam = [];
_ehVehicles = []; // Used to keep track of added eventhandlers
KEGsAllUnits = [];

// Create trigger for retrieving all vehicles
_t = createTrigger["EmptyDetector", (player modelToWorld [0,0,0]) ];
_t setTriggerType "NONE";
_t setTriggerStatements ["this", "KEGsAllUnits = thislist", ""];
_t setTriggerArea[50000, 50000, 0, false];
_t setTriggerActivation["ANY", "PRESENT", false];

// Wait until trigger assigns the array
waitUntil{count KEGsAllUnits > 0};

if(typeName _seagull != "string") then {
sleep 1;
waitUntil {missionnamespace getvariable ["BIS_fnc_feedback_allowDeathScreen",true]};
titleCut ["","BLACK IN", 8];
} else {
titleText["","BLACK IN", 0];	
};
0 fadesound 1;
0 fademusic 1;
BIS_fnc_feedback_allowPP = false;
(["HealthPP_black"] call bis_fnc_rscLayer) cutText ["","BLACK IN",0];
ppEffectDestroy [bIS_UncRadialBlur,BIS_DeathRadialBlur,BIS_DeathBlur,BIS_fnc_healthEffects_radialBlur,BIS_UncBlur];
// Create dialog & assign keyboard handler
createDialog "rscSpectate";
_disp = (findDisplay 55001);
_disp displaySetEventHandler["KeyDown", "[""KeyDown"",_this] call spectate_events"];
_disp displaySetEventHandler["KeyUp", "[""KeyUp"",_this] call spectate_events"];


// hide menus by default
["ToggleCameraMenu",0] call spectate_events;
["ToggleTargetMenu",0] call spectate_events;
["ToggleHelp",0] call spectate_events;
["ToggleMap",1] call spectate_events;

// IDC's from rsc
_cCamera = 55002;
_cTarget = 55003;
_cName = 55004;
KEGs_cLBCameras = 55005;
KEGs_cLBTargets = 55006;
_cCamerasBG = 55007;
_cTargetsBG = 55008;
_cMap = 55013;
_cMapFull = 55014;
_cDebug = 55100;
KEGs_nearest = objNull;

// Create cameras
_pos = [(player modelToWorld [0,0,0] select 0)-1+random 2, (player modelToWorld [0,0,0] select 1)-1+random 2, 2];
KEGscam_static = "camera" camCreate _pos;
KEGscam_target = "camera" camCreate _pos; // "Dummy" target camera for smooth transitions
KEGscam_free = "camera" camCreate _pos;
KEGscam_flyby = "camera" camCreate _pos;
KEGscam_topdown = "camera" camCreate _pos;
KEGscam_1stperson = "camera" camCreate _pos; // Dummy camera
KEGscam_missile = "camera" camCreate _pos; // Missile camera
KEGscam_fullmap = "camera" camCreate _pos; // Full map view camera
KEGs_cameras = [KEGscam_free, KEGscam_static, KEGscam_flyby, KEGscam_topdown, KEGscam_1stperson];
KEGs_cameraNames = ["Free", "Chase", "Flyby", "Top-down", "1st person"];
KEGs_dummy = "HeliHEmpty" createVehicleLocal [0,0,0]; // Dummy object for distance command

// Add cameras to listbox
lbClear KEGs_cLBCameras;
{lbAdd[KEGs_cLBCameras, _x]} foreach KEGs_cameraNames;

// Add separator & toggles
KEGs_cLbSeparator = lbAdd[KEGs_cLBCameras, "---"];
lbSetColor[KEGs_cLBCameras, KEGs_cLbSeparator, [0.5, 0.5, 0.5, 0.5]];
KEGs_cLbMissileCam = lbAdd[KEGs_cLBCameras, "Missile camera"];
KEGs_cLbToggleNVG = lbAdd[KEGs_cLBCameras, "Night vision"];
KEGs_cLbToggleTags = lbAdd[KEGs_cLBCameras, "Unit tags"];
KEGs_cLbToggleAiFilter = lbAdd[KEGs_cLBCameras, "Filter AI"];
KEGs_cLbToggleDeadFilter = lbAdd[KEGs_cLBCameras, "Filter Unknown (Dead)"];

KEGs_tgtIdx = 0;
KEGs_cameraIdx = 0;
showcinemaborder false;
lbClear KEGs_cLBTargets;
onMapSingleClick "[""MapClick"",_pos] call spectate_events";

["EventLogAdd",["Initialize",[1,1,1,1]]] call spectate_events;

// Check for client side addon
_foo = "KEGsAddon10" createVehicleLocal[-1000,-1000,0];
//_foo = "KEGspect_bar_yellow" createVehicleLocal[-1000,-1000,0];
if(!isNull _foo) then {
deletevehicle _foo;
KEGsClientAddonPresent = true;	
};

// Spawn thread to display help reminder after a few seconds
[] spawn {sleep(3);if(dialog) then {cutText["\n\n\n\n\nPress F1 for help","PLAIN DOWN", 0.75]}};

KEGs_camSelLast = 0;
KEGs_tgtSelLast = 0;
mouseLastX = 0.5;
mouseLastY = 0.5;
_nNoDialog = 0;
lastCheckNewUnits = -100;
_lastUpdateMarkers = -100;
_lastUpdateMarkerTypes = -100;
_lastUpdateTags = -100;
KEGs_lastAutoUpdateLB = time;
KEGsCamPos = [0,0,0];
KEGs_cxpos = 0;
KEGs_cypos = 0;
KEGs_czpos = 0;
KEGs_cspeedx = 0;
KEGs_cspeedy = 0;
KEGs_tbase = 0.1;
KEGs_hi = 2;



// Initialize the arrays and the listboxes.
CheckNewUnits = {
		private["_vm_CheckNewUnitsNumber"];
		_debugplayer sidechat format ["Loop# %1 CheckNewUnits spawn activated",vm_count];
		CheckNewUnitsReady = false;
		RefreshListReady = false;
		_vm_CheckNewUnitsNumber = vm_count;
		_allUnits = allUnits;
		_allVehicles = Vehicles;

		// Avoid game logic

		_newUnits = _allUnits - deathCam;	
		if (count _allVehicles > 0) then {
			// Add event handlers to new vehicles
			_ehVehicles = _allVehicles;
			{
				// Add fired eventhandler for map indication
				_nn = _x getVariable "KEGsEHfired";
				if (isNil "_nn") then {
					_fh = _x addeventhandler["fired", {["UnitFired",_this] call spectate_events}];
					_x setVariable["KEGsEHfired", _fh];
				};
			} foreach _allVehicles;
		};			

		if(count _newUnits > 0) then {
			_debugPlayer globalchat "*New Units";
			_waitUnits = [];
			{
				if ((format["%1", _x getVariable "KEG_SPECT"]) != "true") then
				{
					// If variable not found, set it, thus unit is tagged for next update cycle
					// This way, (re)spawned units have some time to fully initialize. Name arma.rpt Error fix.
					_x setVariable ["KEG_SPECT", true];
					waitUnits set [(count _waitUnits ),_x]; // _waitUnits = _waitUnits + [_x];
				};

				// In an effort to compensate for Renegades (players with ratings of less than -2000) we will add this Renegage fix
				//Renegade Fix - ViperMaul
				_x call VM_CheckOriginalSide;

			} forEach _newUnits;
			_newUnits = _newUnits - _waitUnits;			

			// Add new units to end of list
			deathCam = deathCam + _newUnits;

			// Request listbox update
			KEGsNeedUpdateLB = true;

			// Create markers
			{
				// Crete marker
				_m = createMarkerLocal[format["KEGsMarker%1", count _markers], (player modelToWorld [0,0,0]) ];
				_m setMarkerTypeLocal "hd_dot";			
				_m setMarkerSizeLocal[0.4, 0.4];
				_markers set [(count _markers),_m]; // _markers = _markers + [_m];

				_OriginalSide = _x call VM_CheckOriginalSide;  

				// Set marker color
				if(_OriginalSide == west) then {_m setMarkerColorLocal "ColorBlue";};
				if(_OriginalSide == east) then {_m setMarkerColorLocal "ColorRed";};
				if(_OriginalSide == resistance) then {_m setMarkerColorLocal "ColorGreen";};
				if(_OriginalSide == civilian) then {_m setMarkerColorLocal "ColorWhite";};			

				// Create particle source
				_s = "#particlesource" createvehiclelocal (_x modelToWorld [0,0,0]);
				KEGsTagSources set [(count KEGsTagSources) , [_x, _s]]; //KEGsTagSources = KEGsTagSources + [[_x, _s]];

				// If tags are on, turn them off and back again to include new units
				if(KEGsTags) then {
					["ToggleTags",[false, (KEGs_cameras select KEGs_cameraIdx)]] call spectate_events;
					["ToggleTags",[true, (KEGs_cameras select KEGs_cameraIdx)]] call spectate_events;
				};					
			} foreach _newUnits;						
		};			
		RefreshListReady = true;
		CheckNewUnitsReady = true;	
		lastCheckNewUnits = time;
		_debugplayer sidechat format ["Loop# %1 Completed CheckNewUnits", _vm_CheckNewUnitsNumber];
	  };  // End of Spawn CheckNewUnits





RefreshPlayerList = compile preprocessFileLineNumbers "f\common\f_spect\RefreshPlayerList.sqf";
FreeLookMovementHandler = compile preprocessFileLineNumbers "f\common\f_spect\FreeLookMovementHandler.sqf";
CameraMenuHandler = compile preprocessFileLineNumbers "f\common\f_spect\CameraMenuHandler.sqf";
PlayerMenuHandler = compile preprocessFileLineNumbers "f\common\f_spect\PlayerMenuHandler.sqf";

MovementCameraLoop = {

private ["_debugPlayer", "_bb", "_foo","_l","_w","_hstr","_hstr", "_d", "_z" ];

vm_MovementCameraLoop_count = 0;
While { VM_SpectatorCamerasEnabled  } do {

	// Get target properties
	_bb = boundingBox vehicle KEGs_target;
	_foo = ((_bb select 1) select 2) - ((_bb select 0) select 2); // Height
	_l = ((_bb select 1) select 1) - ((_bb select 0) select 1); // Length
	_w = ((_bb select 1) select 0) - ((_bb select 0) select 0); // Width

	_hstr = 0.15;		
	KEGs_hi = (_foo*_hstr)+(KEGs_hi*(1-_hstr));

	// Free camera, user rotates camera around target
	_d = (-(_l*(0.3 max sdistance)));
	_z = sin(fangleY)*(_l*(0.3 max sdistance));
	KEGscam_free camSetRelPos[(sin(fangle)*_d)*cos(fangleY), (cos(fangle)*_d)*cos(fangleY), _z];
	KEGscam_free camCommit 0;


		if(KEGsDroppedCamera) then {
				// Dropped free camera, moved with WSAD keys
				if(KEGs_cameraIdx != 0) then {
					// User changed camera
					KEGsDroppedCamera = false;
				};			
			    _debugPlayer globalchat "Active Drop Camera - Checking for WSAD controls";

				// Adjust speed from buttons held down
				KEGs_spd = (sdistance max 1)*20;
				if(KEGsCamForward) then {
					KEGs_cspeedx = KEGs_cspeedx + ((KEGs_spd*KEGs_tbase)*sin fangle);
					KEGs_cspeedy = KEGs_cspeedy + ((KEGs_spd*KEGs_tbase)*cos fangle);
				};
				if(KEGsCamBack) then {
					KEGs_cspeedx = KEGs_cspeedx + ((-KEGs_spd*KEGs_tbase)*sin fangle);
					KEGs_cspeedy = KEGs_cspeedy + ((-KEGs_spd*KEGs_tbase)*cos fangle);
				};		
				if(KEGsCamLeft) then {
					KEGs_cspeedx = KEGs_cspeedx + ((KEGs_spd*KEGs_tbase)*sin (fangle-90));
					KEGs_cspeedy = KEGs_cspeedy + ((KEGs_spd*KEGs_tbase)*cos (fangle-90));
				};
				if(KEGsCamRight) then {
					KEGs_cspeedx = KEGs_cspeedx + ((-KEGs_spd*KEGs_tbase)*sin (fangle-90));
					KEGs_cspeedy = KEGs_cspeedy + ((-KEGs_spd*KEGs_tbase)*cos (fangle-90));
				};					
				// Move camera
				KEGs_cxpos = KEGs_cxpos + (KEGs_cspeedx*KEGs_tbase);
				KEGs_cypos = KEGs_cypos + (KEGs_cspeedy*KEGs_tbase);
				KEGs_czpos = 0;
				KEGs_hi = 2; // Static camera height
				_l = 2.2;

				// Slow down
				_bstr = 5;
				KEGs_cspeedx = KEGs_cspeedx * ((1.0-(KEGs_tbase*_bstr)) max 0);
				KEGs_cspeedy = KEGs_cspeedy * ((1.0-(KEGs_tbase*_bstr)) max 0);

				// Check for nearby targets
				KEGs_dummy setpos[KEGs_cxpos, KEGs_cypos, 1.5];
				_objs = [KEGs_cxpos, KEGs_cypos, 1.5] nearObjects 5;
				KEGs_nearest = objNull;
				_dist = 10;
				{
					{
						_d = KEGs_dummy distance _x;
						if(_d < _dist and _x in deathCam and alive _x) then {KEGs_nearest = _x;_dist = _d;};					
					} foreach crew _x;
				} foreach _objs;
				if(!isNull KEGs_nearest) then {KEGs_tgtIdx = deathCam find KEGs_nearest};
	} else {		
		// Set targets for all cameras
		KEGs_cxpos = (vehicle KEGs_target modelToWorld [0,0,0]) select 0;
		KEGs_cypos = (vehicle KEGs_target modelToWorld [0,0,0]) select 1;
		KEGs_czpos = (vehicle KEGs_target modelToWorld [0,0,0]) select 2;
	};


	KEGscam_target camSetPos[KEGs_cxpos, KEGs_cypos, KEGs_czpos+(KEGs_hi*0.7)];
	KEGscam_static camSetTarget KEGscam_target;	
	KEGscam_free camSetTarget[KEGs_cxpos, KEGs_cypos, KEGs_czpos+(KEGs_hi*0.6)];	
	KEGscam_flyby camSetTarget KEGscam_target;	
	KEGscam_topdown camSetTarget[KEGs_cxpos, KEGs_cypos, KEGs_czpos+(KEGs_hi*0.6)];	
	{_x camSetFov szoom} foreach KEGs_cameras;		

	// Static camera, follows unit from behind
	KEGscam_static camSetRelPos[sin(KEGs_dir)*(-(_l*sdistance)), cos(KEGs_dir)*(-(_l*sdistance)), 0.6*abs sdistance];


	// Flyby camera, no user control except zoom
	if(KEGs_target distance KEGscam_flyby > (KEGs_flybydst*1.1)) then {
		KEGs_flybydst = 20+(speed vehicle KEGs_target);
		KEGscam_flyby camSetRelPos[sin(KEGs_dir)*KEGs_flybydst, cos(KEGs_dir)*KEGs_flybydst, 1+((random KEGs_hi)*1.5)];
		KEGscam_flyby camCommit 0;	
		KEGscam_target camCommit 0;	
	};

	// Top-down camera
	KEGscam_topdown camSetRelPos[0.0, -0.01, 2+((0 max sdistance)*15)];
	KEGscam_topdown camCommit 0;	

	// Commit static and flyby cameras
	_comSpeed = 1.0 - ((speed vehicle KEGs_target)/70);
	if(_comSpeed < 0.0) then {_comSpeed = 0.0;};
	if((vehicle KEGs_target) distance KEGscam_static > 650) then {_comSpeed = 0}; // Jump immediately to distant target
	KEGscam_static camCommit _comSpeed/2;
	KEGscam_target camCommit _comSpeed/3;
	KEGscam_flyby camCommit _comSpeed;

	// NIGHT VISION HANDLING
		If (OldNVGMethod) then {
			camUseNVG KEGsUseNVG;
			if (KEGsUseNVG) then { setAperture 4; } else { setAperture -1; }; // Green Night Vision
		} else {
			if (KEGsUseNVG) then {setAperture 0.07; } else { setAperture -1;}; // White Hot Night Vision
		};

		if(ctrlVisible _cMapFull) then {
			KEGscam_fullmap cameraEffect["internal", "BACK"];
		};
	// END OF NIGHT VISION HANDLING


	if ( f_var_debugMode == 1 ) then {
		// vm_MovementCameraLoop_count = vm_MovementCameraLoop_count + 1;
		// _debugPlayer groupchat format ["MovementCameraLoop %1, Loop# %2", VM_SpectatorCamerasEnabled, vm_MovementCameraLoop_count];
	};
};

};		

call {

		lastCheckNewUnits = time;

		player setVariable ['BIS_IS_inAgony',false];

		"dynamicBlur" ppEffectAdjust [0];
		"dynamicBlur" ppEffectCommit 0.0;
		"dynamicBlur" ppEffectEnable false;

		// Avoid game logics
		_allUnits = allUnits;
		_allVehicles = Vehicles;
		_newUnits = _allUnits - deathCam;	

		if (count _allVehicles > 0) then {
			// Add event handlers to new vehicles
			_ehVehicles = _allVehicles;
			{
				// Add fired eventhandler for map indication
				_nn = _x getVariable "KEGsEHfired";
				if (isNil "_nn") then {
					_fh = _x addeventhandler["fired", {["UnitFired",_this] call spectate_events}];
					_x setVariable["KEGsEHfired", _fh];
				};
			} foreach _allVehicles;
		};
		if(count _newUnits > 0) then {
			_debugPlayer globalchat "*New Units";
			_waitUnits = [];
			{
				if ((format["%1", _x getVariable "KEG_SPECT"]) != "true") then
				{
					// If variable not found, set it, thus unit is tagged for next update cycle
					// This way, (re)spawned units have some time to fully initialize. Name arma.rpt Error fix.
					_x setVariable ["KEG_SPECT", true];
					_waitUnits set [(count _waitUnits ),_x];
				};

				// In an effort to compensate for Renegades (players with ratings of less than -2000) we will add this Renegage fix
				//Renegade Fix - ViperMaul
				_x call VM_CheckOriginalSide;

			} forEach _newUnits;
			// _newUnits = _newUnits - _waitUnits;	// this line is not needed for the initialization  -ViperMaul

			// Add new units to end of list
			deathCam = deathCam + _newUnits;

			// Request listbox update
			KEGsNeedUpdateLB = true;

			// Create markers
			{ 
				// Crete marker
				_m = createMarkerLocal[format["KEGsMarker%1", count _markers], (player modelToWorld [0,0,0]) ];
				_m setMarkerTypeLocal "hd_dot";			
				_m setMarkerSizeLocal[0.4, 0.4];
				_markers set [(count _markers),_m];

				_OriginalSide = _x call VM_CheckOriginalSide;  

				// Set marker color
				if(_OriginalSide == west) then {_m setMarkerColorLocal "ColorBlue";};
				if(_OriginalSide == east) then {_m setMarkerColorLocal "ColorRed";};
				if(_OriginalSide == resistance) then {_m setMarkerColorLocal "ColorGreen";};
				if(_OriginalSide == civilian) then {_m setMarkerColorLocal "ColorWhite";};			

				// Create particle source
				_s = "#particlesource" createvehiclelocal (_x modelToWorld [0,0,0]);
				KEGsTagSources set [(count KEGsTagSources) , [_x, _s]]; //KEGsTagSources = KEGsTagSources + [[_x, _s]];


				// If tags are on, turn them off and back again to include new units
				if(KEGsTags) then {
					["ToggleTags",[false, (KEGs_cameras select KEGs_cameraIdx)]] call spectate_events;
					["ToggleTags",[true, (KEGs_cameras select KEGs_cameraIdx)]] call spectate_events;
				};					
			} foreach _newUnits;						
		};
		call RefreshPlayerList;
		["Init"] call CameraMenuHandler;
		["Init"] call PlayerMenuHandler;
		["Init"] call FreeLookMovementHandler;

		// KEGscam_free camSetTarget[KEGs_cxpos, KEGs_cypos, KEGs_czpos+(KEGs_hi*0.6)];	
		// KEGscam_free camSetPos [(sin(fangle)*0.3)*cos(fangleY), (cos(fangle)*0.3)*cos(fangleY), 0.7];
		// KEGscam_free camSetTarget[KEGs_cxpos, KEGs_cypos, KEGs_czpos+(KEGs_hi*0.6)];	
		// KEGscam_free camCommit 0;

		if(count deathCam > 0 and !KEG_Spect_Init) then { _debugPlayer groupchat "Spectator Mode Initialized."; KEG_Spect_Init = true; VM_SpectatorCamerasEnabled = true; };
		KEGs_target = deathCam select KEGs_tgtIdx;  // reset camera to the new or current player target
	   (KEGs_cameras select KEGs_cameraIdx) cameraEffect["internal", "BACK"];
	   [] spawn MovementCameraLoop; 

	};

EndLoadingScreen;		



while{ dialog } do {


// If ((player getVariable "BIS_IS_inAgony") == true) then { player setVariable ['BIS_IS_inAgony',false]; };
player setVariable ['BIS_IS_inAgony',false];
"dynamicBlur" ppEffectAdjust [0];
"dynamicBlur" ppEffectCommit 0.0;
"dynamicBlur" ppEffectEnable false;

_debugplayer globalchat format ["Loop# %1 Check for new units (%2)", vm_count, time - lastCheckNewUnits];


	// Request listbox update every 20 seconds to update dead units or jip player names (
	if(time - KEGs_lastAutoUpdateLB > 20 && (RefreshListReady) && (CheckNewUnitsReady)) then {
		KEGs_lastAutoUpdateLB = time;
		KEGsNeedUpdateLB = true;
	};	

if(KEGsNeedUpdateLB && RefreshListReady && (CheckNewUnitsReady)) then {
	_debugPlayer globalchat format ["Loop# %1 Refeshing Player List ", vm_count]; //_debugplayer
	[] spawn RefreshPlayerList;
};

	// Check for new units every 20 seconds
	if((time - lastCheckNewUnits > 20)  && (CheckNewUnitsReady) ) then {
		lastCheckNewUnits = time;
		RefreshListReady = false;
		_debugplayer globalchat format ["Loop# %1 Starting CheckNewUnits", vm_count];
		 [] spawn CheckNewUnits;
	}; 
	// End of If statement for Checking New Units


		//ctrlSetText[_cDebug, format["%1", count _markers]];			

		// Update tag particlesources
		if(time - _lastUpdateTags > (1/5)) then {
			_lastUpdateTags = time;
			if(KEGsTags) then {
				["ToggleTags", [true, (KEGs_cameras select KEGs_cameraIdx)]] call spectate_events;
			};
		};

		// Update markers 10fps
		_rate = 10; // modified from 15 - norrin/ViperMaul
		if(count _markers > 100) then {_rate = 5}; // Update large number of markers less often // modified from 7.5 - norrin/ViperMaul
		if(count _markers > 200) then {_rate = 0.5}; // Update large number of markers less often // added - norrin/ViperMaul
		if(time - _lastUpdateMarkers > (1/_rate)) then {
			_lastUpdateMarkers = time;

			if (!NORRN_noMarkersUpdates) then //added check to remove marker updates - norrin
			{
				// setMarkerTypeLocal is very slow, call it only once per second
				_doMarkerTypes = false;
				if(time - _lastUpdateMarkerTypes > 1) then {
					_lastUpdateMarkerTypes = time;
					_doMarkerTypes = true; // Allow update marker types
				};

				if(ctrlVisible _cMapFull) then {
					// Position camera in the middle of full map, for sound and
					// smoother marker motion (distant objects appear less smooth)
					_mapFull = _disp displayctrl _cMapFull;
					_mappos = _mapFull posScreenToWorld[0.5, 0.5];
					KEGscam_fullmap camsettarget _mappos;
					KEGscam_fullmap camsetrelpos [0, -1, 150];
					KEGscam_fullmap camcommit 0;
				};

				_markedVehicles = []; // Keep track of vehicles with markers to avoid multiple markers for one vehicle
				for "_i" from 0 to ((count _markers)-1) do {
					_m = _markers select _i;
					_u = (deathCam select _i);
					_m setMarkerPosLocal ((vehicle _u modelToWorld [0,0,0]));

					_OriginalSide = _u call VM_CheckOriginalSide; 
					if(!((_OriginalSide) in KEGsShownSides)) then {
						// We arent' supposed to show this side unit - hide marker
						if(_doMarkerTypes) then {_m setMarkerTypeLocal "empty"};
					} else { 				
						if(KEGsMarkerNames or KEGsMinimapZoom < 0.15) then {
							// Set full screen map marker types - Also zoomed minimap
							if(ctrlVisible _cMapFull) then {
								switch(KEGsMarkerType) do {
									case 0: {	// No text
										_m setMarkerTextLocal "";
									};
									case 1: {	// Names
										if(alive (vehicle _u)) then {
											if(name (vehicle _u) != "Error: no unit") then {_m setMarkerTextLocal name ( _u)};
										};
									};
									case 2: {	// Types
										_m setMarkerTextLocal getText (configFile >> "CfgVehicles" >> format["%1", typeOf (vehicle _u)] >> "DisplayName");
									};
								};
							} else {
								// Minimap with detailed icons but no text
								_m setMarkerTextLocal "";
							};

							if(KEGsClientAddonPresent) then {
								// With client side addon use better icons
								_type = getText(configFile >> "CfgVehicles" >> format["%1", typeOf (vehicle _u)] >> "simulation");
								_icon = "Arrow";
								switch(_type) do {
									case "tank": {_icon = "KEGsTank"};
									case "car": {_icon = "KEGsCar"};
									case "soldier": {_icon = "KEGsMan"};
									case "ship": {_icon = "KEGsShip"};
									case "airplane": {_icon = "KEGsPlane"};
									case "helicopter": {_icon = "KEGsHelicopter"};
									case "motorcycle": {_icon = "KEGsMotorcycle"};
									case "parachute": {_icon = "KEGsParachute"};
								};
								if(_doMarkerTypes) then {_m setMarkerTypeLocal _icon};
								_m setMarkerSizeLocal[0.42*KEGsMarkerSize, 0.42*KEGsMarkerSize];
							} else {
								// No client side addon - basic markers
								if(_doMarkerTypes) then {_m setMarkerTypeLocal "Arrow"};						
								if(_u == vehicle _u) then {
									_m setMarkerSizeLocal[0.33*KEGsMarkerSize, 0.27*KEGsMarkerSize];
								} else {
									_m setMarkerSizeLocal[0.42*KEGsMarkerSize, 0.42*KEGsMarkerSize];
								};						
							};

							_m setMarkerDirLocal (getdir (vehicle _u));
						} else {
							_m setMarkerTextLocal "";
							if(_doMarkerTypes) then {_m setMarkerTypeLocal "hd_dot"};
							_m setMarkerSizeLocal[0.4,0.4];
						};		
					};

					if(not alive _u) then {
						if(KEGsClientAddonPresent) then {
							// Switch to darker color, cant use side since the unit is already dead
							if(getMarkerColor _m == "ColorBlue") then {_m setMarkerColorLocal "KEGsDarkBlue"};
							if(getMarkerColor _m == "ColorRed") then {_m setMarkerColorLocal "KEGsDarkRed"};
							if(getMarkerColor _m == "ColorGreen") then {_m setMarkerColorLocal "KEGsDarkGreen"};
							if(getMarkerColor _m == "ColorWhite") then {_m setMarkerColorLocal "KEGsGrey"};								
						} else {
							_m setMarkerColorLocal "ColorBlack"
						};
					};

					if(vehicle _u in _markedVehicles) then {
						// This vehicle was already marked, hide marker
						_m setMarkerTypeLocal "Empty";
					} else {
						_markedVehicles set [(count _markedVehicles) , vehicle _u];  // _markedVehicles = _markedVehicles + [vehicle _u];
					};
				};	
			};
		// END OF added check to remove marker updates - norrin

			// Follow target with small map			
			_map = _disp displayctrl _cMap;
			ctrlMapAnimClear _map;
			if(KEGsDroppedCamera) then {
				// Center on dropped camera position
				_map ctrlMapAnimAdd[0.3, KEGsMinimapZoom, [KEGs_cxpos, KEGs_cypos,0]];
			} else {
				// Center on target
				_map ctrlMapAnimAdd[0.3, KEGsMinimapZoom, visiblePosition KEGs_target];
			};
			ctrlMapAnimCommit _map;					
		};

		// Check if target changed and center main map
		if(KEGs_tgtIdx != KEGs_lastTgt) then {
			_map = _disp displayctrl _cMapFull;
			ctrlMapAnimClear _map;
			_map ctrlMapAnimAdd [0.2, 1.0, visiblePosition (deathcam select KEGs_tgtIdx)];
			ctrlMapAnimCommit _map;			
		};





	// KEGsKEGs_lastTgt = KEGs_tgtIdx;	 //capture the last target index for the player in focus	

	// Wait a moment. 150fps ought to be enough for everyone :-)
	_tt = time;
	sleep(1/150);
	KEGs_tbase = time-_tt;

	vm_count = vm_count + 1;
};
StartLoadingScreen ["EXITING SPECTATOR MODE..."];
_debugPlayer groupchat format ["EXITING SPECTATOR MODE", VM_SpectatorCamerasEnabled];
VM_SpectatorCamerasEnabled = False;
// Dialog closed with esc key
titleText["","BLACK IN", 0.5];

// Destroy cameras, markers, particlesources, etc.
_debugPlayer groupchat format ["Destroying Cameras", VM_SpectatorCamerasEnabled];
camDestroy KEGscam_target;
camDestroy KEGscam_missile;
camDestroy KEGscam_fullmap;
//deletevehicle KEGscam_target;
//deletevehicle KEGscam_missile;
//deletevehicle KEGscam_fullmap;
{camDestroy _x} foreach KEGs_cameras;
{deletemarkerlocal _x} foreach _markers;	 
_debugPlayer groupchat format ["Cleaning up", VM_SpectatorCamerasEnabled];
deletevehicle _t;
deletevehicle KEGs_dummy;
// camUseNVG false;
// KEGsTags = false;
onMapSingleClick "";
{deletevehicle (_x select 1)} foreach KEGsTagSources;
KEGsTagSources = [];

// Remove eventhandlers TODO: does this work properly?
{
_fh = _x getVariable "KEGsEHfired";
//_kh = _x getVariable "KEGsEHkilled";
if(typeName _fh == "SCALAR") then {_x removeEventHandler["fired", _fh]};
//if(typeName _kh == "SCALAR") then {_x removeEventHandler["killed", _kh]};
} foreach _ehVehicles;


_debugPlayer groupchat format ["ENTERING ButterFly Mode", VM_SpectatorCamerasEnabled];
// Create a butterfly for player to fly with
_bpos = [(((vehicle KEGs_target)modelToWorld [0,0,0])  select 0)-5+random 10, (((vehicle KEGs_target) modelToWorld [0,0,0])  select 1)-5+random 10, 1];
// _bird = "ButterFlySpectator"createVehicle _bpos; //custom ButterFly for improved flight.
_bird = "SeaGull" createvehicle _bpos;
_bird setvelocity[0,0,5];
_bird setpos _bpos;
_bird switchCamera "INTERNAL";

_bird cameraEffect["terminate","FRONT"];
_bird camCommand "manual on";

camUseNVG false; setAperture -1; //  Reset NVGs
EndLoadingScreen;	
KEGsBird = _bird;
onMapSingleClick "KEGsBird setpos [_pos select 0, _pos select 1, 2];KEGsBird setvelocity[0,0,5];";

cutText["\n\n\n\n\nLand on ground to return to spectating\nClick at map to jump to location","PLAIN DOWN", 0.75];

// Wait until landed, delete bird & restart script
waitUntil{(_bird modelToWorld [0,0,0]) select 2 < 0.05 and speed _bird < 1};
onMapSingleClick "";

sleep(0.5);
if !( f_var_debugMode == 1 ) then {
titleText["","BLACK OUT", 0.5];
sleep(1);
};


_player switchCamera "INTERNAL";
_player cameraEffect["terminate","FRONT"];
deletevehicle _bird;
if !( f_var_debugMode == 1 ) then {
[_player, _killer, "noWait"] execVM ("f\common\f_spect\specta.sqf");
};

[fer 21]

I know this thread has sort of disappeared for the past month.

Hi Zerith - thanks for posting this fix; F3 is still active, so well look at rolling this into our next update. - Fer :)

[fer 21]

F3 Mission Development Framework for ArmA 3

F3 v3-0-3 Released

From the ReadMe.md file:

3-0-3 | 25 JUN 2013

Quick updates to reflect key ArmA 3 Beta content and changes.

Updated all F3 Folk ARPS components to include Green faction.

Updated all F3 Folk ARPS components to reflect Blue/Red/Green faction names.

Updated F3 Folk ARPS Platoons component to include new/upgraded vehicles.

Updated ORBAT Notes component (group names are now clickable and zoom map to group marker).

Updated F3 Folk ARPS JIP Reinforcement Options component (JIP group does not follow player).

Updated F3 Folk ARPS JIP Reinforcement Options component (JIP option more visible).

Fixed F3 Common Local Variables component (prevented double-counts of vehicle crew).

Special thanks to comrade scripting heroes Head and Wolfenswan.

About F3

The F3 Mission Development Framework (F3) is the successor to the popular F2 and BAS f mission development frameworks for ArmA 2 and ArmA. The new framework contains many of the features you know from F2, updated to work with ArmA 3; new components which take advantage of the new game's special features are planned.

For downloads and to find out more please see our online manual:

• http://www.ferstaberinde.com/f3/en/ (English version)

[goldenfiver 11]

Hi Fer, thank you for your work!.

A quick question- how do I get the assign_gear script to work after reapswn, so I can make the character respawn with the same gear it had at the start of the mission?

[fer 21]

Hi Fer, thank you for your work!.

A quick question- how do I get the assign_gear script to work after reapswn, so I can make the character respawn with the same gear it had at the start of the mission?

In your respawn script, just call the assignGear function when the player has respawned, as outlined here:

http://ferstaberinde.com/f3/en//index.php?title=F3_Folk_ARPS_Assign_Gear_Script#Calling_the_script

Just a reminder, there's a whole team of us making F3 :)

Let us know how you get on, and what you'd like to see in future versions of F3!

[falconx1 13]

I was wondering if this was gonna be available for Arma3. Happy it is, thanks for all the work! so much useful stuff

[wickedfable 10]

Hi there,

Thanks for the great work. I just wanted to mention that I am getting the same "no entry 'bin\config.bin/CfgWeapons.'." that aPerfectMisterMan mentions on the first page. I am using the latest version (v3.0.3) with the stable beta build. This error usually only pops up the first time you are running a mission created with F3 and does not reappear until restarting Arma 3 and running the mission again - at least when launching from the editor. So, in that sense, it is not too big of an issue but it isn't a pleasant sight to see while loading up a mission on a multiplayer server.

In any case, keep up the good job. F3 is really great for quickly putting together a mission as I can focus on the actual mission design instead of the components that should go into it to make it work. So thanks a bunch for that!

[fer 21]

Sorry to hear you're still getting that error - we'll be working to address it in the next patch. Also on our workstack: expanding the platoons, expanding the weather conditions (if the relevant commands are fixed), reviewing the spectator and camera scripts. We're also very interested to hear for you - community members - as to what would make F3 even more useful.

[Brickle 10]

My favorite mission editing tool. Period. However, the new beta patch release has caused me to get script errors like CRAZY when I start my missions, mostly having to do with GroupID I think, I have an OP on Saturday that was completely finished and I went to do a test with the new update only to find that there are script errors constantly flashing on and off. Are you guys planning on releasing an updated version soon? Would really help if it was out by, say, tomorrow?....

Thanks a ton for this extremely helpful template!

[clydefrog 3]

The one I'm getting a lot is to do with this I think: f_var_debugMode

e.g.

Error in expression <tAction"];

if (!local player || f_var_debugMode == 0 && f_missionMakerTe>

Error position: <f_var_debugMode == 0 && f_missionMakerTe>

Error Undefined variable in expression: f_var_debugmode

[kylania 568]

f_var_debugmode isn't defined anywhere in the F3 scripts, so to stop that error define it. Just slap a f_var_debugmode = 0; in init.sqf and it'll start.

Edited July 26, 2013 by kylania

[clydefrog 3]

f_var_debugmode isn't defined anywhere in the F2 scripts, so to stop that error define it. Just slap a f_var_debugmode = 0; in init.sqf or someplace.

Alright I'll try that cheers.

By the way anybody know if the body removal in F3 works yet? Last time I tried it didn't.

[Brickle 10]

f_var_debugmode isn't defined anywhere in the F3 scripts, so to stop that error define it. Just slap a f_var_debugmode = 0; in init.sqf and it'll start.

Thanks, that seemed to fix the debug related errors, I was able to fix the GroupID errors just by disabling the Folk GroupIDs, pretty simple. However I'm still getting a load of script errors. From this and a few other things, such as ACRE and EOS. The new update messed up a lot of my scripts/addons. Hopefully some fixes will start rolling out soon.

By the way anybody know if the body removal in F3 works yet? Last time I tried it didn't.

I was getting script errors from the body removal script after the new update, it didn't work before, and now with the new beta patch it's just broken, so I disabled it.

[fer 21]

Sorry to hear you are getting these errors - we're working on an update, but I'm afraid I can't give you a date yet; we do hope to be out in the next week or so, but the latest update had created a raft of problems. You will, however, be pleased to know that we tracked down that config message error that was driving everyone wild.

[Brickle 10]

Sorry to hear you are getting these errors - we're working on an update, but I'm afraid I can't give you a date yet; we do hope to be out in the next week or so, but the latest update had created a raft of problems. You will, however, be pleased to know that we tracked down that config message error that was driving everyone wild.

Very cool! I've been able to fix most of the errors I've been having myself by just disabling things here and there, but and update would be great ;)

[fer 21]

Update: We're closing in on a new build, v3-0-4, which addresses a lot of bugs reported in v3-0-3 (including the infamous config message error!).

++

Call for testers

The team developing F3 remains small, and one of our biggest challenges is testing and checking manual pages; this is especially important right now, as we are working against the 'moving target' of ArmA 3 beta.

There are 25+ components in F3, and whilst testing individual components is relatively quick (sometimes taking just a few minutes), it remains a lot of work for one person. Delays in testing mean we can't release new builds of F3 as often as we'd like. Thankfully, this is task where some extra help can make a big difference.

We're looking for individuals who can test a handful of components every time we prepare a release (and review the relevant manual pages). It might only mean 30-60 minutes of your time, but it would help us accelerate our release cycle. You won't need any special software - just the current stable branch of ArmA 3 beta. You don't need to be a master scripter either, just an experienced mission maker and user of F2/F3.

If you think you could help, please drop me a PM here. Thank you in advance.

[fer 21]

F3 Mission Development Framework for ArmA 3

F3 v3-0-4 Released

From the ReadMe.md file:

3-0-4 | 08 AUG 2013

Fixed "no entry 'bin\config.bin/CfgWeapons.'." error.

Fixed various unsassigned variable errors.

Fixed medic markers in F3 Folk ARPS Group Markers component.

Fixed time of day parameter in Mission Conditions Selector component.

Disabled weather parameter in Mission Conditions Selector component.

Added new options to Casualties Cap component.

Added new options to Casualties Cap (Advanced) component..

Special thanks to comrade scripting heroes Head and Wolfenswan.

About F3

The F3 Mission Development Framework (F3) is the successor to the popular F2 and BAS f mission development frameworks for ArmA 2 and ArmA. The new framework contains many of the features you know from F2, updated to work with ArmA 3; new components which take advantage of the new game's special features are planned.

For downloads and to find out more please see our online manual:

• http://www.ferstaberinde.com/f3/en/ (English version)

[Lonestar 11]

Thanks for the hard work.

Glad you fixed the error messages.

[headswe 17]

Thanks for the hard work.

Glad you fixed the error messages.

Yes doing that i just had too gut assigngear

[Valixx 11]

This error is spaming througout the mission.

If i disable the Group ID in init.sqf, then:

Edited August 10, 2013 by Valixx

[fer 21]

This error is spaming througout the mission.

http://www10.pic-upload.de/10.08.13/h1scd72wbtx.jpg

I can't reproduce this error myself, and also I don't recognise those variables (e.g. _slot) as being from F3 components. Are you using any scripts or addons in addition to F3?

If i disable the Group ID in init.sqf, then:

http://www10.pic-upload.de/10.08.13/r1rts2wsxfb.jpg

You can get rid of this error message by commenting-out line #6 of the script f/common/f_orbatNotes.sqf, like so:

// waitUntil {scriptDone f_script_setGroupIDs};

However, the ORBAT component won't work completely - the names listed in the ORBAT will not link to the group markers, despite being clickable.

[Valixx 11]

Thanks for your answer.

I can't reproduce this error myself, and also I don't recognise those variables (e.g. _slot) as being from F3 components. Are you using any scripts or addons in addition to F3?

I'm using the VAS Script with the F3 Framework.