Helicopter Rotor motion simulator: arrow3d( orgin,r,h1,h2,dir) - File Exchange

Code covered by the BSD License

Highlights from
Helicopter Rotor motion simulator

CollectiveAndCyclic(varargin) CollectiveAndCyclic M-file for CollectiveAndCyclic.fig
Cone( orgin,r,h,dir,n,closed ) CONE Summary of this function goes here
Cylinder( orgin,r,h,dir,n,clo... This Function plots a cylinder at specified orgin, with specified radius, height, direction(axis), no of points along the circumference
Extrude( x1,x2,h1,h2,dir,clos... global xx1
Make_Blade(x,y,rR,R,psi,theta... MAKE_BLADE Summary of this function goes here
[]=Rotor(be,th,ze)% be=[0 10 ...
[hRevolve, hPlate1,hPlate2]=R...
arrow3d( orgin,r,h1,h2,dir) ARROW3D Summary of this function goes here
View all files

from Helicopter Rotor motion simulator by Divahar Jayaraman
Educating tool for understanding the complicated Helicopter blade motions & various reference planes

arrow3d( orgin,r,h1,h2,dir)

 function [ hHead,hTail,hPlate ] = arrow3d( orgin,r,h1,h2,dir)
%ARROW3D Summary of this function goes here
%  Detailed explanation goes here

% 
% orgin=[0 0 0.2]';
% r=1;
% h=90;
% dir='y';

n=50;
% p=0.15;

hTail=Cylinder(orgin,r/2,h1,dir,n,'open');
hold on

if dir=='x'
    org=orgin+[h1; 0; 0];
elseif dir=='y'
    org=orgin+[0; h1; 0];
elseif dir=='z'
    org=orgin+[0; 0; h1];
end

xlabel('x')
ylabel('y')
zlabel('z')

[hHead hPlate]=Cone( org,r,h2,dir,n,'closed' );
set(hTail,'EdgeAlpha',0)

Highlights from Helicopter Rotor motion simulator

Highlights from
Helicopter Rotor motion simulator