//    Instruction Example :     objectid gradient.copy (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,320,240)

        gradient.persistence.set (@grad,TRUE)

        gradient.display (@grad,CENTER,CENTER)

        text.display ("Press a key to copy the gradient.",CENTER,10)

        keyboard.wait ()

        @grad2=gradient.copy (@grad)

        gradient.display (@grad2,0,0)

        gradient.display (@grad,CENTER,CENTER)

        text.display ("Press a key to exit.",CENTER,350)

        keyboard.wait ()

        script.stop ()