begin_block drawtexts
setPen red
drawLine 0 20 width 20
setPen blue

setFont "times" 12
drawText 0 20 "(times)"

setFont "times" 12 bold
drawText 100 20 "(times, 12, bold)"

setFont "times" 12 normal italic
drawText 250 20 "(times, 12, italic)"

setFont "times" 12 bold italic
drawText 400 20 "(times, 12, bold, italic)"

translate 0 20

setPen red
drawLine 0 20 width 20
setPen green

setFont "helvetica" 12
drawText 0 20 "(helvetica)"

setFont "helvetica" 12 bold
drawText 100 20 "(helvetica, 12, bold)"

setFont "helvetica" 12 normal italic
drawText 250 20 "(helvetica, 12, italic)"

setFont "helvetica" 12 bold italic
drawText 400 20 "(helvetica, 12, bold, italic)"

translate 0 20

setPen red
drawLine 0 20 width 20
setPen orange

setFont "courier" 12
drawText 0 20 "(courier)"

setFont "courier" 12 bold
drawText 100 20 "(courier, 12, b)"

setFont "courier" 12 normal italic
drawText 250 20 "(courier, 12, i)"

setFont "courier" 12 bold italic
drawText 400 20 "(courier, 12, bi)"
end_block 

# Repeat with scale
translate 0 100
scale 1 2
repeat_block drawtexts

# Repeat with rotation
resetMatrix
translate 100 300
rotate 20
repeat_block drawtexts