screen.resolution.set (512,384)
pattern.display ("avo\bubble.gif")
screen.set (FRONT)
text.display ("Press a key to exit.",CENTER,350)
screen.end ()
text.font.select ("avo\bigtime.fnt")
text.transparency.select (FALSE)
@text=text.create ("BigTime Font")
text.display (@text,CENTER,CENTER)
%transp=text.transparency.get (@text)
text.font.select ("default.fnt")
text.transparency.select (TRUE)
switch (%transp)
case (TRUE)
text.display ("The transparency is : TRUE.",CENTER,10)
case (FALSE)
text.display ("The transparency is : FALSE.",CENTER,10)
endswitch ()
keyboard.wait ()
script.stop ()