myFont1 = a2CreateFont("ariel", 30, a2Size_Cell(), a2Style_Normal())
myFont2 = a2CreateFont("ariel", 30, a2Size_Char(), a2Style_Normal())
myFont3 = a2CreateFont("ariel", 30, a2Size_Point(), a2Style_Normal())
a2FillBox 10, 20, screen width(), 50, 0xFFFF0000
h = a2GetLineHeight(myFont1)
a2Text myFont1, 10, 20, "Size 30 from cell size in pixels - line height is "+str$(h), 0xFFFFFFFF
a2FillBox 10, 55, screen width(), 85, 0xFFFF0000
h = a2GetLineHeight(myFont2)
a2Text myFont2, 10, 55, "Size 30 from character size in pixels - line height is "+str$(h), 0xFFFFFFFF
a2FillBox 10, 90, screen width(), 120, 0xFFFF0000
h = a2GetLineHeight(myFont3)
a2Text myFont3, 10, 90, "Size 30 in points - line height is "+str$(h), 0xFFFFFFFF
WAIT KEY