//    Instruction Example :      pattern.free (objectid)


        screen.resolution.set (512,384)

        @pattern = pattern.load ("avo\bubble.gif")
        pattern.display (@pattern,0,0,200,200)

        screen.set (FRONT)
          text.display ("Press a key to free the pattern.",CENTER,10)
        screen.end ()

        keyboard.wait ()

        pattern.free (@pattern)

        pattern.display (@pattern,CENTER,CENTER,200,200)

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

        keyboard.wait ()

        script.stop ()