s = "holaquetalsoycolosal!!";
    l = length(s);
    x = floor(l/4);
    y = ceil(l/4);
    w = char(ones(y+1, x+1)*' ');
    w(1+[0:y+1:x*(y+1) x*(y+1)+[1:y] x*(y+1)-1:-y-1:y y-1:-1:1]) = s