function ABCtranslate = num2abc(x)
%  Example:
%        x = 45;
%        num2abc(x);
%
%        ans =
%            AS
%
alphabetStrings = ['A' 'B' 'C' 'D' 'E' 'F' 'G'...
                   'H' 'I' 'J' 'K' 'L' 'M' 'N'...
                   'O' 'P' 'Q' 'R' 'S' 'T' 'U'...
                   'V' 'W' 'X' 'Y' 'Z'];             
B = length(alphabetStrings);
value = x;

S = '';
while (value >= 0)
    %if (flag), value = value-1; end
    if (mod(value,B)==0)
        S = ['Z' S];
    else
        S = [alphabetStrings(ceil(mod(value,B))) S];
    end
    value = (value / B) - 1;
    if value <= 0
        break; 
    end
end

ABCtranslate = S;
end