Arvorezinha – POSTSCRIPT
Boas,
depois de ver estas novas arvorezinhas, deu-me uma vontade de fazer uma. O postscript é muito marado, é uma maquina de stack, e ainda por cima, a origem das coordenadas é no canto inferior esquerdo. Aqui vai…
%!PS
/cm {28.34645669 mul} def %definir centrimetros
/size{2 cm}def %definir uma constante
/w{595}def %width da folha em pontos
/h{842}def %height da folha em pontos
/PageSize [ w h ]
/movetoTop{
/yy exch def
/xx exch def
h yy sub
/aux2 exch def
xx aux2 moveto
}def % O (0,0) é no canto inferior esquerdo, então esta função transforma o (0,0) no canto superior esquerdo com as coordenadas positivas para baixo
/Courier % Nome do tipo de letra
size selectfont % Definir o tamanho da letra
0 1 4{
/i exch def
i size mul
size add
/yy exch def
0 1 i{
/j exch def
j size mul
size add
/xx exch def
xx yy movetoTop
(*) show
clear
}for %colunas
}for %linhas
showpage % imprimir página
O resultado final é este:

3 comentários a “Arvorezinha – POSTSCRIPT”