//    Instruction Example :     long gradient.layer.get (objectid)


        screen.resolution.set (512,384)

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

        @grad = gradient.create (RIGHT,4,80,20,0,200,180,20,50,50)

        gradient.persistence.set (@grad,ON)

        for (%i=1 to 10)

          @grad [%i]=gradient.clone (@grad)

          gradient.layer.set (@grad [%i],%i)
          gradient.display (@grad[%i],196+%i*10,128+%i*10)

        next ()

        text.display ("Press a key to change the layer.",CENTER,10)
        text.display ("Press ESCAPE to exit.",CENTER,350)

         repeat ()

           for (%i=1 to 10)
             gradient.layer.set (@grad[%i],11-%i)
             text.display (" "+str(gradient.layer.get(@grad[%i]))+" ",150,128+%i*15)
           next ()

           keyboard.wait ()

           for (%i=1 to 10)
             gradient.layer.set (@grad[%i],%i)
             text.display (" "+str(gradient.layer.get(@grad[%i]))+" ",150,128+%i*15)
           next ()

           keyboard.wait ()

         until (keyboard.get ()==KEY_ESCAPE)


        script.stop ()