%% %% ============================ ecrire du texte ====================================
%% syntaxe : str x y show_dim --> str x y llx lly wx wy
%% attention, doit laisser la pile intacte
/show_dim {
3 copy pop pop
newpath
0 0 moveto
true charpath flattenpath pathbbox
closepath
} def
/dltext {(show) dlpict} def
/dctext {(show) dcpict} def
/drtext {(show) drpict} def
/dbtext {(show) dbpict} def
/ultext {(show) ulpict} def
/uctext {(show) ucpict} def
/urtext {(show) urpict} def
/ubtext {(show) ubpict} def
/bltext {(show) blpict} def
/bctext {(show) bcpict} def
/brtext {(show) brpict} def
/bbtext {(show) bbpict} def
/cltext {(show) clpict} def
/cctext {(show) ccpict} def
/crtext {(show) crpict} def
/cbtext {(show) cbpict} def
%% les anciennes commandes
/utext {uctext} def
/dtext {dctext} def
/rtext {brtext} def
/ltext {bltext} def
/text {urtext} def
|