//    Instruction Example :      track.resize.interpolation.set (long)


        screen.resolution.set (512,384)

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

        @sprite1=sprite.load ("avo\dinosaur.spr")
        @sprite2=sprite.load ("avo\dinosaur.spr")
        sprite.display (@sprite1,256-50,CENTER)
        sprite.display (@sprite2,256+50,CENTER)

        @track1=track.create (TRACK_LOOP)
          track.resize.interpolation.set (INTERP_LINEAR)
          init ()
        track.end ()

        @track2=track.create (TRACK_LOOP)
          track.resize.interpolation.set (INTERP_TCBSPLINE)
          init ()
        track.end ()

        @sequence1=sequence.play (@track1,@sprite1)
        @sequence2=sequence.play (@track2,@sprite2)

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

        keyboard.wait ()

        script.stop ()

        procedure init ()
          track.key.set (0)
          track.key.resize.set (0,0)
          track.key.set (1)
          track.key.resize.set (100,100)
          track.key.set (2)
          track.key.resize.set (0,0)
        end procedure