function [ ret ] = vc2ret1( vc )
% function [ ret ] = vc2ret1( vc )
%  prevod velkeho cisla reprezentovane 
% polem dvojic cifer uloznych v unit8
% na textovy retezec

d=length(vc);
ret=num2str(vc(1));
for k=2:d
    s1=num2str(vc(k));
    if length(s1)==1, s1=['0',s1]; end
    ret=[ret,s1];
end

end

