//    Instruction Example :     objectid picture.copy (objectid)


        screen.resolution.set (512,384)

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

        @picture[1]=picture.load ("avo\fruit.jpg")

        for (%i=2 to 8)
          @picture[%i]=picture.copy (@picture[1])
        next ()

        for (%i=1 to 8)
          picture.display (@picture[%i],%x+50,%y+20)
          time.wait (0.1)
          %x+=100
          if (%x>320)
            %x=0
            %y+=160
          endif ()
        next ()

        keyboard.wait ()

        for (%i=1 to 8)
          screen.mask (on)
            picture.kill (@picture[%i])
          screen.mask (OFF)
          time.wait (0.1)
        next ()

        script.stop ()