Novell-style snake screen saver
──────────────────────────────────────────────────────────────────────────────

 Syntax

        GT_Snake(<cColour>) -> NIL

 Arguments:

      <cColour> This is the snakes colour, defaults to setColour()

 Returns:

      NIL

 Description:

      Screen saver for any Clipper application. This screen saver draws a
      snake on the screen and lets it fly !

 Examples:

      GT_Snake("W+/BG") -> NIL

 Source: GT_SNAKE.PRG

 Author:  Phillip Hamlyn