; Script: Fly, Be Free
; BC - Bruce Cartwright
; April 4, 1996
; Location: To be added to OUTCHAT
; Synopsis: Moves user from current position to just short mouse position 
;           in gradual flight slowing as the user reaches the new destination
        {
          MOUSEPOS mousy = mousx =      
          {
              i++
              mousx POSX - 10 / POSX + newx = 
              mousy POSY - 10 / POSY + newy =
              newx newy SETPOS
          } { i 30 < } WHILE

           "" CHATSTR =
        } CHATSTR "^fly" GREPSTR IF