V10/vol2/cip/text2.pic

.PS
scale=100
define macro0 |
[ box invis ht 299 wid 157 with .sw at 0,0
line  from 113,83 to 107,40 
line  from 133,84 to 129,55 
"select" at 95,14
"draw" at 112,29
"menu" at 137,44
spline from 110,296\
to 110,296\
to 122,299\
to 111,286\
to 122,289
arc from 102,291 to 91,290 at 96,285
line  from 67,290 to 80,290 
ellipse ht 8 wid 16 at 51,290
box ht 7 wid 10 with .nw at 25,293 
circle rad 5 at 10,290
box ht 19 wid 19 with .nw at 0,299 
box ht 19 wid 19 with .nw at 21,299 
box ht 19 wid 19 with .nw at 42,299 
box ht 19 wid 19 with .nw at 63,299 
box ht 19 wid 19 with .nw at 84,299 
box ht 19 wid 19 with .nw at 105,299 
box ht 19 wid 19 with .nw at 126,299 
"\fB\s16\(sq\fR" at 126,299
box ht 176 wid 145 with .nw at 0,279 
box ht 25 wid 64 with .nw at 81,100 
box ht 8 wid 18 with .nw at 85,87 
box ht 8 wid 18 with .nw at 124,88 
box ht 8 wid 10 with .nw at 108,87 
line  from 94,83 to 84,22 
] |

define macro1 |
[ box invis ht 13 wid 10 with .sw at 0,0
line <- from 10,13 to 0,0 
] |

box invis ht 338 wid 663 with .sw at 0,0
"Xanadu" at 581,200
"Xanadu" at 365,83
macro0 with .nw at 506,299
macro0 with .nw at 335,299
macro0 with .nw at 167,299
macro0 with .nw at 0,299
"d) type CR" at 506,322 ljust
"c) type text" at 335,322 ljust
"push draw button" at 192,307 ljust
"b) move to point," at 167,322 ljust
"a) select Text" at 0,322 ljust
macro1 with .nw at 570,200
macro1 with .nw at 408,204
macro1 with .nw at 238,206
.PE