oprf_assets/missile-frigate/Nasal/fdm.nas

# Copyright (C) 2015  onox
#
# This program is free software: you can redistribute it and/or modify
# it under the terms of the GNU General Public License as published by
# the Free Software Foundation; either version 3 of the License, or
# (at your option) any later version.
#
# This program is distributed in the hope that it will be useful,
# but WITHOUT ANY WARRANTY; without even the implied warranty of
# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
# GNU General Public License for more details.
#
# You should have received a copy of the GNU General Public License
# along with this program.  If not, see <http://www.gnu.org/licenses/>.

#io.include("Aircraft/ExpansionPack/Nasal/init.nas");

#with("updateloop");

# Number of iterations per second
var frequency = 20.0;

# Change in heading per second at full rudder deflection
var heading_ps = 5.0;

time_last = 0;
sim_speed = 1;

sink_rate = .025;
pitch_rate = .007;
roll_rate = .007;

var last_speed = 4;

setprop("/carrier/pitch-deg",0);
setprop("/carrier/pitch-offset",0);
setprop("/carrier/roll-deg",0);
setprop("/carrier/roll-offset",0);
setprop("/carrier/sunk",0);
setprop("/carrier/aground",0);

var PositionUpdater = func () {
	
	settimer( PositionUpdater, 1/frequency );
	
	var position = geo.aircraft_position();
	
	var time_now = getprop("/sim/time/elapsed-sec");
	var dt = (time_now - time_last) * sim_speed;
	if (dt == 0) return;

	time_last = time_now;
	var heading = getprop("/orientation/heading-deg");
	var speed   = getprop("/velocities/groundspeed-kt");
	var rudder  = getprop("/surface-positions/rudder-pos-norm");

	var aground_pos = geo.Coord.new().set_latlon(position.lat(),position.lon());
	aground_pos.apply_course_distance(heading,25);

	var aground = geodinfo(aground_pos.lat(), aground_pos.lon());
	if (aground != nil) {
		if (aground[1] != nil){
			aground = aground[1].solid;
			if ( aground == 0 ) {
				aground_pos.apply_course_distance(heading,-50);
				aground = geodinfo(aground_pos.lat(), aground_pos.lon())[1].solid;
			}
			if ( aground == 1 ) {
				setprop("/carrier/aground",1);
				setprop("/carrier/sunk",1);
				speed = 0;
			}
		}
	}
	#print(speed);
	var distance = speed * globals.KT2MPS * dt; 
	position.apply_course_distance(heading, distance);
	
	# check if we've ran aground

	# Set new position
	setprop("/position/latitude-deg", position.lat());
	setprop("/position/longitude-deg", position.lon());
	
	if ( getprop("/carrier/sunk") == 0 ) {

		# Update heading
		var course = heading + rudder * heading_ps * dt;
		setprop("/orientation/heading-deg", course);
		setprop("/position/altitude-ft",getprop("/position/ground-elev-ft"));

#	} elsif ( getprop("/carrier/sunk") == 0 and getprop("/autopilot/route-manager/active") == 1 ) {
#
#		#for event
#		var speed = 15;
#		var cur_waypoint = getprop("/autopilot/route-manager/current-wp");
#		var cur_wp_lon = getprop("/autopilot/route-manager/route/wp[" ~ cur_waypoint ~ "]/longitude-deg");
#		var cur_wp_lat = getprop("/autopilot/route-manager/route/wp[" ~ cur_waypoint ~ "]/latitude-deg");
#		var rm_destination = geo.Coord.new().set_latlon(cur_wp_lat,cur_wp_lon);
#		
#		
#		var heading = position.course_to(rm_destination);
#		
#		var distance = speed * globals.KT2MPS * dt;
#		position.apply_course_distance(heading, distance);
#		
#		# Set new position
#		setprop("/position/latitude-deg", position.lat());
#		setprop("/position/longitude-deg", position.lon());
#		var g_alt = getprop("/position/ground-elev-ft");
#		setprop("/position/altitude-ft",g_alt);
#		
#		# Update heading
#		var course = heading + rudder * heading_ps * dt;
#		setprop("/orientation/heading-deg", course);
#	
	} elsif ( getprop("/carrier/sunk") == 1 ) {
		setprop("/carrier/fbw/target/groundspeed-kt",0);
		setprop("/controls/engines/engine/throttle",0);

		# Set new position
		setprop("/position/latitude-deg", position.lat());
		setprop("/position/longitude-deg", position.lon());
		
		#calculate sinking.
		if ( getprop("carrier/aground") != 1 ) {
			setprop("/position/altitude-ft",getprop("/position/altitude-ft") - ( sink_rate ));
			setprop("/carrier/pitch-offset",getprop("/carrier/pitch-offset") + ( pitch_rate ));
			setprop("/carrier/roll-offset",getprop("/carrier/roll-offset") + ( roll_rate ));
		}
	}
	
	#set pitch
	setprop("/orientation/pitch-deg",getprop("/carrier/pitch-deg") + getprop("/carrier/pitch-offset"));
	
	#set roll
	setprop("/orientation/roll-deg",getprop("/carrier/roll-deg") + getprop("/carrier/roll-offset"));	
	
};

PositionUpdater();