clc;
close all;
clear all;

Fs=8000;
Nseconds = 1;
samp=6;
words=5;
for i= 1:1:samp
    
fprintf('say AHEAD immediately after hitting enter');
input('');
x= wavrecord(Nseconds*Fs,Fs,'double');
[s(i,:),g] = lpc(x,12); % 12+1 features
%plot(s(i,:));
end

for i= (samp+1):1:2*samp
    
fprintf('say STOP immediately after hitting enter');
input('');
x= wavrecord(Nseconds*Fs,Fs,'double');
[s(i,:),g] = lpc(x,12); % 12+1 features
%plot(s(i,:));
end
 
for i= (2*samp+1):1:3*samp
    
fprintf('say BACK immediately after hitting enter');
input('');
x= wavrecord(Nseconds*Fs,Fs,'double');
[s(i,:),g] = lpc(x,12); % 12+1 features

%plot(s(i,:));
end

for i= (3*samp+1):1:4*samp
    
fprintf('say LEFT immediately after hitting enter');
input('');
x= wavrecord(Nseconds*Fs,Fs,'double');
[s(i,:),g] = lpc(x,12); % 12+1 features
%plot(s(i,:));
end

for i= (4*samp+1):1:5*samp
    
fprintf('say RIGHT immediately after hitting enter');
input('');
x= wavrecord(Nseconds*Fs,Fs,'double');
[s(i,:),g] = lpc(x,12); % 12+1 features
%plot(s(i,:));
end

% for i= (5*samp+1):1:6*samp
%     
% fprintf('say sLOW immediately after hitting enter');
% input('');
% x= wavrecord(Nseconds*Fs,Fs,'double');
% [s(i,:),g] = lpc(x,12); % 12+1 features
% plot(s(i,:));
% end
% 
% for i= (6*samp+1):1:7*samp
%     
% fprintf('say SPEED immediately after hitting enter');
% input('');
% x= wavrecord(Nseconds*Fs,Fs,'double');
% [s(i,:),g] = lpc(x,12); % 12+1 features
% plot(s(i,:));
% end

S=zeros(1,13);
for i=1:1:samp
    S=cat(1,S,s(i,:));
    S=cat(1,S,s(samp+i,:));
    S=cat(1,S,s(2*samp+i,:));
    S=cat(1,S,s(3*samp+i,:));
    S=cat(1,S,s(4*samp+i,:));
 %    S=cat(1,S,s(5*samp+i,:));
  %   S=cat(1,S,s(6*samp+i,:));
end
S(1,:)=[];
    
    %S=[s(1,:);s(17,:);s(33,:); s(2,:);s(18,:);s(34,:); s(3,:);s(19,:);s(35,:); s(4,:);s(20,:);s(36,:); s(5,:);s(21,:);s(37,:); s(6,:);s(22,:);s(38,:); s(7,:);s(23,:);s(39,:); s(8,:);s(24,:);s(40,:);s(9,:);s(25,:);s(41,:);s(10,:);s(26,:);s(42,:);s(11,:);s(27,:);s(43,:);s(12,:);s(28,:);s(44,:);s(13,:);s(29,:);s(45,:);s(14,:);s(30,:);s(46,:);s(15,:);s(31,:);s(47,:);s(16,:);s(32,:);s(48,:)]; %48 X 13 matrix
save speechp.mat S