% Script PlayScale
% Plays scales using the function OmegaTable

% Sample rate, note duration, sample times...
Fs = 32768;
Tfinal = .25;
t = 0:(1/Fs):Tfinal;

F = OmegaTable();
for j = 3:5  
    % Play each note in Octave j ...
    for k=1:12
        % Play the k-th note in Octave j
        f = F(k,j);
        y = sin(2*pi*f*t);
        sound(y,Fs)
    end
end
