%%HP: T(3)A(D)F(.);
\<< FORMAT (-6.2,2)
"There are two font"
2 GLABEL (-6.2,1.1)
"sizes that you may"
2 GLABEL (-6.2,.2)
"choose from." 2
GLABEL (-4.7,-1)
"1. Fontsize #1" 2
GLABEL (-4.7,-1.9)
"2." 2 GLABEL
(-2.9,-2.1)
"Fontsize #2" 1
GLABEL 0 WAIT DUP
  IF 82.1 ==
  THEN 2 'FONTSIZE'
STO
  END
  IF 83.1 ==
  THEN 1 'FONTSIZE'
STO
  END CENTRAL
\>>
