//    Instruction Example :      icon.layer.set (objectid,long)


        screen.resolution.set (512,384)

        screen.set (BACK)
          pattern.display ("avo\bubble.gif")
        screen.end ()

        @icon=icon.load ("avo\dinosaur.png")
        icon.persistence.set (@icon,ON)

        text.display ("Press a key to switch layers.",CENTER,10)
        text.display ("Press ESCAPE to exit.",CENTER,350)

        for (%i=1 to 10)
          @icon [%i]=icon.clone (@icon)
          icon.layer.set (@icon [%i],%i)
          icon.display (@icon[%i],196+%i*10,64+%i*10)
        next ()

        repeat ()

          for (%i=1 to 10)
            icon.layer.set (@icon[%i],11-%i)
            text.display (" "+str(icon.layer.get(@icon[%i]))+" ",150,64+%i*23)
          next ()

          keyboard.wait ()

          for (%i=1 to 10)
            icon.layer.set (@icon[%i],%i)
            text.display (" "+str(icon.layer.get(@icon[%i]))+" ",150,64+%i*23)
          next ()

          keyboard.wait ()

        until (keyboard.get ()==KEY_ESCAPE)

        script.stop ()