/*--------------------------------------------------------------------
 * FICHERO:  UsrAvisa.c
 * OBJETIVO: Definir la fucin Usr_Avisa()
 * AUTOR:    Pedro Reina
 * FECHA:    M.25.4.1995
 *------------------------------------------------------------------*/

#include "Usuario.h"

/*--------------------------------------------------------------------
 * Definicin de funciones
 *------------------------------------------------------------------*/

/*--------------------------------------------------------------Olimpo
 * FUNCION:  Usr_Avisa()
 * OBJETIVO: Avisar al usuario de algo
 * ENTRADAS: El texto del aviso
 * SALIDAS:  Ninguna
 * EJEMPLO:  Usr_Avisa ( "Operacin incorrecta" )
 * ALGORITMO:
 *      Borrar con rojo la zona del usuario
 *      Escribir el texto, en blanco
 *      Indicar que pulse una tecla determinada, en blanco
 *      Sonido de error
 *      Pedir una tecla determinada
 *      Borrar con negro la zona del usuario
 *------------------------------------------------------------------*/
void Usr_Avisa (Texto)
cadena Texto;
  {
  static tecla Opcion[] = { TEC_ESPACIO, NIL };

  Usr_BorraZona ( ROJO );

  Pan_Tinta ( BLANCO );
  Pan_PonTextoControlado (USR_MENSAJE,0,Texto,Pan_Ancho());
  Pan_PonTexto (USR_MENSAJE+1,0,"Pulsa ESPACIO para continuar: " );
  Pan_CursorVisible (SI);
  Son_Error();

  Tec_Validada (Opcion);
  Usr_BorraZona ( NEGRO );
  }