/*Elaborado por Juan Carlos Ruiz Pacheco.
**Trabajo con datos capturados desde teclado y archivos.
**Compilado con el djgpp 13-03-2003
**juank@007mundo.com
*/
#include<stdio.h>
#include<pc.h>
int main()
{
FILE *archivo=NULL;
char caracter=NULL;
char cadena[255],nombrearchivo[255], aux[255];
int dato=NULL;
ScreenClear();
ScreenSetCursor(0,0);
memset(cadena,' ',sizeof(cadena));
memset(nombrearchivo,' ',sizeof(cadena));
memset(aux,' ',sizeof(cadena));
printf("Introduzca el nombre del archivo:");
gets(nombrearchivo);
if((archivo=fopen(nombrearchivo,"at+"))!=NULL)
{
printf("annnIntroduzca un solo caracter para escribir en el archivo:");
caracter=getchar();
strcpy(aux,"nEl caracter digitado:");
fwrite(aux,strlen(aux),1,archivo);
fputc((int)caracter,archivo);
memset(aux,' ',sizeof(cadena));
printf("nIntroduzca un entero para escribir en el archivo:");
scanf("%d",&dato);
strcpy(aux,"nEl entero digitado:");
fwrite(aux,strlen(aux),1,archivo);
fputc(dato,archivo);
printf("nIntroduzca una cadena escribir en el archivo:");getc(stdin);
gets(cadena);
strcpy(aux,"nLa cadena digitada:");
fwrite(aux,strlen(aux),1,archivo);
fputs(cadena,archivo);
fflush(archivo);
fclose(archivo);
printf("nArchivo %s cerrado.",nombrearchivo);
printf("nPresione Enter para salir");
getch();
return(int) 1;
}
else
{
perror("nError al abrir el archivo.nPresione enter para terminar.");
getch();
return (int)0;
}
}