www.pudn.com > nnctrl_v5.zip > fblinit.m, change:1997-06-05,size:2476b


% ------------------------------>  FBLINIT.M  <------------------------------ 
 
% ----------      Switches       ----------- 
regty      ='fbl';           % Controller type (fbl, pid, none) 
refty      ='myref';         % Reference signal (siggener/<var. name>) 
simul      ='simulink';      % Control object spec. (simulink/matlab/nnet) 
if exist('simulink')~=4, 
  simul      ='matlab';      % Simulink not present 
end 
 
 
% ------    General Initializations  ------- 
Ts = 0.20;                   % Sampling period (in seconds) 
samples = 300 ;              % Number of samples to be simulated 
 
 
% --  System to be Controlled (SIMULINK) -- 
integrator= 'ode45';         % Name of dif. eq. solver (f. ex. ode45 or ode15s) 
sim_model = 'spm1';          % Name of SIMULINK model 
 
 
% ---  System to be Controlled (MATLAB)  -- 
mat_model = 'springm';       % Name of MATLAB model 
model_out = 'smout';         % Output equation (function of the states) 
x0        = [0;0];           % Initial states 
  
 
% ----- Neural Network Specification ------ 
% "nnfile" must contain the following variables which together define 
% the network model: 
% NN, NetDeff, NetDefg, W1f, W2f, W1g, W2g 
% (i.e. regressor structure, architecture definitions, and weight matrices) 
nnfile = 'forward3';         % Name of file 
 
 
% ---- Desired characteristic polynomial --- 
Am = [1 -1.4 0.49];          % Characteristic polynomial 
 
 
% ------------ Reference signal ------------ 
dc      = 0;                 % DC-level 
sq_amp  = 1;                 % Amplitude of square signals (row vector) 
sq_freq = 0.05;              % Frequency of square signals (column vector) 
sin_amp = [0];               % Amplitude of sine signals  (row vector) 
sin_freq= [0]';              % Frequency of sine signals   (column vector) 
Nvar  = 0';                  % Variance white noise signal 
myref =[0.3*ones(50,1);-0.3*ones(50,1);]; 
myref =[myref;1*ones(50,1);-1*ones(50,1)]; 
myref=[myref;2*ones(50,1);-2*ones(50,1)]; 
 
% --------  Linear Controller Parameters  ---------  
K=8;                         % PID parameters 
Td=0.8;                      % PID 
alf=0.1;                     % PID 
Wi=0.2;                      % PID (1/Ti) 
 
 
% ------- Specify data vectors to plot -------- 
% Notice that all strings in plot_a and plot_b resp. MUST have the same length 
plot_a(1,:) = 'ref_data    '; 
plot_a(2,:) = 'ym_data     '; 
plot_a(3,:) = 'y_data      '; 
plot_b(1,:) = 'u_data';