📄 main_formant_track.m
字号:
%
% A Graphic User Interface for calculating formant tracks
% Taken from the analysis software package
%
% Modified by D. G. Childers July, 1998
close all;
clear;
clc;
%path(path,'.\track_for');
%path(path,'.\track_for\out');
%path(path,'.\data');
path('.\track_for',path);
path('.\track_for\out',path);
path('.\data',path);
% Define some global variables
global Ts; %Sampling period in seconds
Ts = 1e-4;
num_poles = 14; % Default number of poles
max_np = 20; % Maximum number of poles
min_np=1; % Minimum number of poles
num_zeros=4; % Default number of zeros
max_nz=20; % Maximum number of zeros
min_nz=0; % Minimum number of zeros
pzplot_flag=1; % Default is to plot the pole-zero plot
spec_flag=0; % Default is not to plot the spectrogram
asyn_flag=0; % Default is to do asynchronous analysis
iter_flag=1; % Default is to do iterative analysis
arma_flag=1; % Default is to do ARMA analysis
check = 1; %Variable used for proper closing and opening of windows
catch2 = 'check = 0;';
catch1 = 'break;';
zoom_level =1;
%color_flag=0; % Black background and white text
color_flag=1; % White background and black text
global BACK_COLOR TEXT_COLOR LINE_COLOR;
if color_flag == 1
BACK_COLOR=[1 1 1];%white
TEXT_COLOR=[0 0 0];%black
LINE_COLOR=[0 0 1];%blue
else
BACK_COLOR=[0 0 0];
TEXT_COLOR=[1 1 1];
LINE_COLOR=[0 0 1];%blue
end
ff = [ 500 1500 2500 3500 5000 ];
fb = [ 200 200 200 200 200 ];
gain=200; % Default gain in dB
% Define some character strings
o_fname='';
o_pname='';
if exist('vgif-init.mat') == 2
load vgif-init
end
PV=[2 350 170 157];
m_win_h=figure('Position',PV,...
'Resize','off',...
'Numbertitle','off',...
'color',BACK_COLOR,...
'Name','Main');
m_pb_file_h=uicontrol('Style','pushbutton',...
'Position',[10 120 148 30],...
'String','File',...
'Callback','m_file');
%m_pb_edit_h=uicontrol('Style','pushbutton',...
% 'Position',[90 120 70 30],...
% 'String','Edit',...
% 'Callback','m_edit',...
% 'Visible','on');
m_pb_anal_h=uicontrol('Style','pushbutton',...
'Position',[10 70 148 30],...
'String','Analysis',...
'Callback','m_anal',...
'Visible','on');
m_pb_quit_h=uicontrol('Style','pushbutton',...
'Position',[10 20 148 30],...
'String','Quit',...
'Callback','close_main_formant_track',...
'Visible','on');
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -