AplicName()

         Determines the application name

    Syntax:

         AplicName( [cName] ) -> cOldName

         cName : The name of the application

    Description:

         With this function you define the message to show in Screen Saver.

    Return:

         The actual application name.

    Example:

         cName := AplicName( "Hello Mary" )
                                // we save the actual name
                                // and set a new
         Tetris()               // when the screen saver starts will see
                                // "Hello Mary..."
         AplicName( cName )     // we restore the old name