//    Instruction Example :      picture.transparency.level.set (objectid,long)


        screen.resolution.set (512,384)

        screen.set (BACK)
          pattern.display ("avo\bubble.gif")
          @pic=picture.load ("avo\fruit.jpg")
          picture.transparency.level.set (@pic,64)
          picture.display (@pic,CENTER,CENTER)
        screen.end ()

        screen.set (FRONT)
          %pictransparency  =picture.transparency.level.get (@pic)
          text.display ("The transparency level of the picture is : "+str(%pictransparency)+" ",CENTER,10)
          text.display ("Press a key to exit.",CENTER,350)
        screen.end ()

        keyboard.wait ()

        script.stop ()