function edit_params()
        lang=leer_lengua();
        if lang==1
                %esp
                lang='esp';
        elseif lang==2
                %eng
                lang='eng';
        endif
        fid=fopen([lang".lang"],'r');
        archivo=setstr((fread(fid))');
        fclose(fid);
        
        fid=fopen('config.pbg','rb');
        y=fread(fid);
        fclose(fid);
        y=(setstr(y))';
        
        %A&B
        A=busca_tags('FILE_INPUT',y);
        B=busca_tags('FILE_OUTPUT',y);
        
        %Ticks/negra
        tn=str2num(busca_tags('TICKS_NEGRA',y));
        
        %Titulo del track
        t_track=busca_tags('TRACK_TITLE',y);
        
        %Comentario
        comentario=busca_tags('COMMENT',y);
        
        %Compas
        compas=str2num(busca_tags('TIME_SIGNATURE',y));
        
        %Tempo
        tempo=str2num(busca_tags('TEMPO',y));
        
        %Canal
        canal=str2num(busca_tags('CHANNEL',y));
        
        %Tamaño del segmento
        ts=str2num(busca_tags('SEGMENT_SIZE',y));
        
        %Avance
        dm=str2num(busca_tags('ADVANCE',y));
        
        %Porcentaje silencio
        silen=str2num(busca_tags('PERCENT_SILEN',y));

        %metodo
        metodo=str2num(busca_tags('ANALYSIS_METHOD',y));
        
        %fmax y fmin
        fmax=str2num(busca_tags('FREQ_MAX',y));
        fmin=str2num(busca_tags('FREQ_MIN',y));
        
        %p(num_coef_lpc)
        p=str2num(busca_tags('NUM_LPC',y));
        
        %porcentaje
        porcentaje=str2num(busca_tags('PERCEN_AUTOCOR',y));
        
        %clip
        clip=str2num(busca_tags('CENTER_CLIP_PERCEN',y));
        
        %instrumento
        instrumento=str2num(busca_tags('INSTRUMENT',y));
        
        
        
        lang=leer_lengua();
        if lang==0
                cambia_lengua;
                menu_wtm;
        elseif lang==1
                %esp
                lang='esp';
        elseif lang==2
                %eng
                lang='eng';
        endif
        fid=fopen([lang".lang"],'r');
        archivo=setstr((fread(fid))');
        fclose(fid);
        
        texto=busca_tags('main',busca_tags('param_edit',busca_tags('menus',archivo)));
        
        a_eval=["menu2 " texto];
        [num,txt]=eval(a_eval);
        
        question=busca_tags('question',busca_tags('param_edit',busca_tags('menus',archivo)));
        if strcmp(txt,'A')
                %file_input
                A=input(question,'s');
        elseif strcmp(txt,'B')
                %file_output
                B=input(question,'s');
        elseif strcmp(txt,'ticks')
                %ticks/quarter
                tn=input(question);
        elseif strcmp(txt,'t_track')
                %track title
                t_track=input(question,'s');
        elseif strcmp(txt,'comment')
                %Comment
                comentario=input(question,'s');
        elseif strcmp(txt,'compas')
                %Compas
                printf("4/4 - 3/4");
                compas=input(question);
        elseif strcmp(txt,'tempo')
                %tempo
                tempo=input(question);
        elseif strcmp(txt,'channel')
                %Channel
                canal=input(question);
        elseif strcmp(txt,'s_size')
                %segment_size
                ts=input(question);
        elseif strcmp(txt,'advance')
                %advance
                dm=input(question);
        elseif strcmp(txt,'silen')
                %Percen_silen
                silen=input(question);
        elseif strcmp(txt,'fmax')
                %Freq max
                fmax=input(question);
        elseif strcmp(txt,'fmin')
                %Freq min
                fmin=input(question);
        elseif strcmp(txt,'porcentaje')
                %Percen_autocorr
                porcentaje=input(question);
        elseif strcmp(txt,'lpc')
                %num_lpc
                p=input(question)
        elseif strcmp(txt,'clip')
                %center_clip_percen
                clip=input(question);
        elseif strcmp(txt,'method')
                %analysis method
                metodo=input(question);
        elseif strcmp(txt,'see_method')
                %View analysis methods
		view_methods();
        elseif strcmp(txt,'instrum')
                %instrument
                instrumento=input(question);
        elseif strcmp(txt,'see_instrums')
                %View instruments
		view_instruments();
	elseif strcmp(txt,'quit')
		%quit
        endif
        
        if !strcmp(txt,'quit')
                write_config(A,B,comentario,t_track,fmax,fmin,ts,dm,tn,tempo,canal,compas,instrumento,silen,porcentaje,clip,metodo,p);
                edit_params();
        endif
        
endfunction
