//    Instruction Example :     long text.transparency.level.get (objectid)


        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 (TRUE)
        @text=text.create ("BigTime Font")

        text.transparency.level.set (@text,45)
        text.display (@text,CENTER,CENTER)
        text.font.select ("arial")
        text.transparency.select (true)
        %transp=text.transparency.level.get (@text)
        text.display ("transparency level = " + str (%transp),CENTER,10)

        keyboard.wait ()

        script.stop ()