67 lines
2.1 KiB
Matlab
67 lines
2.1 KiB
Matlab
function [ status ] = sendCTRL( ctrl, acft, IP, port )
|
|
% sendCTRL Send X-Plane Aircraft Control Commands over UDP
|
|
% Version 0.25
|
|
%
|
|
% Inputs
|
|
% ctrl: control array where the elements are as follows:
|
|
% 1. Latitudinal Stick [-1,1]
|
|
% 2. Longitudinal Stick [-1,1]
|
|
% 3. Pedal [-1, 1]
|
|
% 4. Throttle [-1, 1]
|
|
% 5. Gear (0=up, 1=down)
|
|
% 6. Flaps [0, 1]
|
|
% acft (optional): Aircraft # (default is 0; 0 = own aircraft)
|
|
% IP Address (optional): IP Address of the machine that will receive the data as a character array. Default is '127.0.0.1' (local machine)
|
|
% port (optional): Port on the receiving machine where the data will be sent. Default is 49009 (XPlaneConnect). In general use 49009 to send to the plugin and 49005 to send to the x-plane udp
|
|
%
|
|
% Outputs
|
|
% status: If there was an error. Status<0 means there was an error.
|
|
%
|
|
% Use
|
|
% 1. import XPlaneConnect.*;
|
|
% 2. #Send the data array to port 49009 on the computer at IP address 172.0.100.54.
|
|
% 3. status = sendCTRL([0, 0, 0, 0.8, 0, 1], 1, '172.0.100.54',49009);
|
|
%
|
|
% Note: send the value -998 to not overwrite that parameter. That is, if -998 is sent, the parameter will stay at the current X-Plane value
|
|
%
|
|
% Change Log
|
|
% 10/02/14: [CT] V0.25: Updated to work with updated xpcPlugin
|
|
% 09/26/14: [CT] Code created
|
|
%
|
|
% Contributors
|
|
% [CT] Christopher Teubert (SGT, Inc.)
|
|
% christopher.a.teubert@nasa.gov
|
|
%
|
|
% To Do
|
|
% 1. Verify Input
|
|
%
|
|
% BEGIN CODE
|
|
|
|
import XPlaneConnect.*
|
|
|
|
%% Handle Input
|
|
% Optional parameters
|
|
if ~exist('IP','var'), IP = "127.0.0.1"; end
|
|
if ~exist('port','var'), port = 49009; end
|
|
if ~exist('acft','var'), acft = 0; end
|
|
|
|
% Check format of input-TODO
|
|
|
|
%%BODY
|
|
header = ['CTRL'-0,0];
|
|
dataStream = [header, acft];
|
|
|
|
% Deal with position update
|
|
control = [0, 0, 0, 0.8, 0, 1];
|
|
|
|
for i=1:min(length(ctrl),length(control))
|
|
control(i) = ctrl(i);
|
|
end
|
|
dataStream = [dataStream, typecast(single(control),'uint8')];
|
|
|
|
% Send DATA
|
|
status = sendUDP(IP, port, dataStream);
|
|
|
|
end
|
|
|