newpage "eps", "tutoriallabels3.eps", 100, 30

# Draw label, then underline it.
#
font "Helvetica-Narrow-Bold", 6
let h1 = "Abcdefg", h2 = "Hij"
move 5, 5
label h1
draw 5 + stringwidth(h1), 5
stroke

# Draw box, then label inside it.
#
clearpath
roundedbox 5, 20 - 2, 5 + stringwidth(h1), 26
fill
clearpath
move 5, 20
color "yellow"
label h1

# Draw one label, then another immediately following it
# in a different color and font.
#
font "Palatino-Roman", 6
clearpath
color "red"
move 40, 4
label h1
color "blue"
shiftpath stringwidth(h1), 0
font "Palatino-Italic", 8
label h2

# Draw yellow label with red outline to highlight it.
#
clearpath
move 35, 16
color "red"
font "Helvetica", 12, "outlinewidth=2"
label h1
color "yellow"
font "Helvetica", 12
label h1

# Draw only outline of letter.
#
clearpath
move 82, 6
color "black"
font "Helvetica", 24, "outlinewidth=0.2"
label "A"
