; WW4 Binocular script for WW4mod25 with Fwatch 1.1 by Faguss (ofp-faguss.com) 23.11.11



	? Format ["%1", player] == "<NULL-object>"  : exit
	? localize "STR_USRACT_CHEAT_1" != "FWATCH" : exit
	if (Format ["%1", WW4BINOCSCRIPT] == "scalar bool array string 0xfcffffef") then {WW4BINOCSCRIPT=true} else {exit} 


	_binocsIN  = [37,52,55,56,181,305,314,339,374]
	_binocsOUT = [39,54,59,60,183,307,316,341,376]
	_saveSTATE = false
	_busy = false


	
	
	#Loop
	@alive player  &&  vehicle player == player
	~0.1

	_animCODE = call loadFile ":mem getplayeranim"
	
	? _animCODE in _binocsIN  : if (!_busy) then {_saveSTATE=(call loadFile ":mem getoptics") select 0; loadFile ":mem setoptics true"; _busy=true}; goto "Loop"
	? _animCODE in _binocsOUT : if (!_busy) then {loadFile format [":mem setoptics %1", _saveSTATE]; _busy=true}; goto "Loop"
	
	_busy = false
	goto "Loop"