//    Instruction Example :      gradient.persistence.set (objectid,long)


        screen.resolution.set (512,384)

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

        @gradient = gradient.create (RIGHT,4,80,20,0,200,180,20,320/2,240/2)
        gradient.display (@gradient,CENTER,CENTER)

        screen.set (FRONT)
          text.display ("Press a key to set the persistence of the gradient.",CENTER,10)
          text.color.stack (COLOR_RED)
          text.display ("Press ESCAPE to exit.",CENTER,350)
        screen.end ()

        repeat ()

          !angle+=1.5
          gradient.position.set (@gradient,180+80*number.sin.get (!angle),120+80*number.cos.get (!angle))

          if (keyboard.get ())
          keyboard.set (OFF)

            %i+=1
            switch (%i mod 3)
              case (0)
                gradient.persistence.set (@gradient,OFF)
              case (1)
                gradient.persistence.set (@gradient,ON)
              case (2)
                gradient.persistence.set (@gradient,PERSISTENCE_TRAILS)
            end switch ()

            screen.set (FRONT)
              switch (gradient.persistence.get (@gradient))
                case (OFF)
                  text.display ("The persistence of the gradient is : OFF   ",CENTER,30)
                case (ON)
                  text.display ("The persistence of the gradient is : ON    ",CENTER,30)
                case (PERSISTENCE_TRAILS)
                  text.display ("The persistence of the gradient is : TRAILS",CENTER,30)
              end switch ()
            screen.end ()

          endif ()

          time.wait (0.005)

        until (keyboard.get ()==KEY_ESCAPE)

        script.stop ()