program objanal(inseg,input,output);
imports memory from memory;
imports qobjanal from qobjanal;
var inseg:segfiletype;
    i,j,k,block:integer;
    byte:chrblock;
    ch:char;
    objname,outname:fnstring;
begin
writeln('enter name of file to analyse');
reset(input);
readln(objname);
writeln('enter name of output file');
readln(outname);
rewrite(output,outname);

close(output);
end.