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


        screen.resolution.set (512,384)

        @picture=picture.load ("avo\fruit.jpg")
        picture.persistence.set (@picture,ON)
        picture.display (@picture,512,384)

        for (%i=1 to 512 step 2)
          picture.resize.set (@picture,%i,384,RESIZE_MAINTAIN_RATIO)
          picture.position.set (@picture,CENTER,CENTER)
          time.wait (0.001)
        next ()

        screen.set (FRONT)
          text.display ("Press a key to exit.", CENTER,350)
        screen.end ()

        keyboard.wait ()

        script.stop ()