<html>
<head>
<style><!--
.hmmessage P
{
margin:0px;
padding:0px
}
body.hmmessage
{
font-size: 10pt;
font-family:Verdana
}
--></style>
</head>
<body class='hmmessage'>
<br><div style="font-family: bookman old style,new york,times,serif; font-size: 12pt;"><div style="font-family: times new roman,new york,times,serif; font-size: 12pt;"> /<font style="" face="Courier New">*</font><font style="" face="Courier New"><br></font><font style="" face="Courier New"> PROGRAMA QUE PERMITE REALIZAR EL MANEJO DE UNA BIBLIOTECA, UTILIZA MANEJO DE MEMORIA DINAMICA</font><font style="" face="Courier New"><br></font><font style="" face="Courier New"> SE PUEDE ADICIONAR LIBROS, ELIMINAR, MODIFICAR Y ORDENAMIENTO</font><font style="" face="Courier New"><br></font><font style="" face="Courier New"><br></font><font style="" face="Courier New"> */<br><br>Utilizo este medio para poder pedir de su ayuda, porfavor si alquien me puede ayudar, con este problema, se lo agradesco, aqui les dejo los datos.<br><br>Este es el programa que necesito que guarde la informacion en un documento de .txt, tambien que realize busqueda, eliminacion pero del .txt.<br><br>La verdad no he podido pero ya intente de varias formas con FILE *archivo;<br>ofstream para crearlo ifstream para leerlo pero la verda no he podido, le pido de favos<br>si alguien me puede ayudar se lo agradeceria vastante, muchisimo. <br><br><br></font><font style="" face="Courier New">#include <conio.h></font><font style="" face="Courier New"><br></font><font style="" face="Courier New">#include <stdio.h></font><font style="" face="Courier New"><br></font><font style="" face="Courier New">#include <stdlib.h></font><font style="" face="Courier New"><br></font><font style="" face="Courier New">#include <iostream.h></font><font style="" face="Courier New"><br></font><font style="" face="Courier New">#include <string.h></font><font style="" face="Courier New"><br></font><font style="" face="Courier New">#include <dos.h></font><font style="" face="Courier New"><br></font><font style="" face="Courier New">#include <windows.h></font><font style="" face="Courier New"><br></font><font style="" face="Courier New"><br></font><font style="" face="Courier New">#include<fstream.h></font><font style="" face="Courier New"><br></font><font style="" face="Courier New">//#include<graphics.h></font><font style="" face="Courier New"><br></font><font style="" face="Courier New"><br></font><font style="" face="Courier New">#define g gotoxy</font><font style="" face="Courier New"><br></font><font style="" face="Courier New"><br></font><font style="" face="Courier New">char *capturar(int longitud, int tipo); //FUNCION DE VALIDACION( CUANDO SE QUIERE QUE SE DIGITE LO QUE ES)</font><font style="" face="Courier New"><br></font><font style="" face="Courier New">void iniciar();</font><font style="" face="Courier New"><br></font><font style="" face="Courier New">void adicionar();</font><font style="" face="Courier New"><br></font><font style="" face="Courier New">void listar();</font><font style="" face="Courier New"><br></font><font style="" face="Courier New">void eliminar();</font><font style="" face="Courier New"><br></font><font style="" face="Courier New">void ordenar();</font><font style="" face="Courier New"><br></font><font style="" face="Courier New">void modificar();</font><font style="" face="Courier New"><br></font><font style="" face="Courier New">void load(); //EMULA UNA BARRA DE PROGRESO</font><font style="" face="Courier New"><br></font><font style="" face="Courier New"><br></font><font style="" face="Courier New">struct libro</font><font style="" face="Courier New"><br></font><font style="" face="Courier New">{</font><font style="" face="Courier New"><br></font><font style="" face="Courier New"> int cod;</font><font style="" face="Courier New"><br></font><font style="" face="Courier New"> char tit[30],aut[30],edi[30],gen[30],fec[30];</font><font style="" face="Courier New"><br></font><font style="" face="Courier New">};</font><font style="" face="Courier New"><br></font><font style="" face="Courier New">//aux **bib=NULL;</font><font style="" face="Courier New"><br></font><font style="" face="Courier New">libro **bib=NULL;libro **aux=NULL; //libro **aux2=NULL; DECLARACION DE PUNTEROS</font><font style="" face="Courier New"><br></font><font style="" face="Courier New">int tam=0; //VARIABLE QUE ME DETERMINA EL NUMERO DE LIBROS</font><font style="" face="Courier New"><br></font><font style="" face="Courier New">void main()</font><font style="" face="Courier New"><br></font><font style="" face="Courier New">{</font><font style="" face="Courier New"><br></font><font style="" face="Courier New"> </font><font style="" face="Courier New"><br></font><font style="" face="Courier New"> ;</font><font style="" face="Courier New"><br></font><font style="" face="Courier New"> clrscr();</font><font style="" face="Courier New"><br></font><font style="" face="Courier New"> //window(1,1,80,25);textbackground(1);clrscr();window(3,2,78,24);</font><font style="" face="Courier New"><br></font><font style="" face="Courier New"> // textbackground(0);textcolor(15);clrscr();</font><font style="" face="Courier New"><br></font><font style="" face="Courier New"><br></font><font style="" face="Courier New"> char op;</font><font style="" face="Courier New"><br></font><font style="" face="Courier New"><br></font><font style="" face="Courier New"> do{ //CREACION DEL MENU</font><font style="" face="Courier New"><br></font><font style="" face="Courier New"> g(60,23);</font><font style="" face="Courier New"><br></font><font style="" face="Courier New"> //textcolor(BLINK+RED);</font><font style="" face="Courier New"><br></font><font style="" face="Courier New"> puts("'ESC' PARA SALIR");</font><font style="" face="Courier New"><br></font><font style="" face="Courier New"> //textattr(30);</font><font style="" face="Courier New"><br></font><font style="" face="Courier New"> gotoxy(28,8);</font><font style="" face="Courier New"><br></font><font style="" face="Courier New"> printf("Menu Principal\n");</font><font style="" face="Courier New"><br></font><font style="" face="Courier New"> gotoxy(28,9);</font><font style="" face="Courier New"><br></font><font style="" face="Courier New"> //textattr(14);</font><font style="" face="Courier New"><br></font><font style="" face="Courier New"> printf("1");</font><font style="" face="Courier New"><br></font><font style="" face="Courier New"> //textattr(7);</font><font style="" face="Courier New"><br></font><font style="" face="Courier New"> printf(" - INGRESAR\n");</font><font style="" face="Courier New"><br></font><font style="" face="Courier New"> gotoxy(28,10);</font><font style="" face="Courier New"><br></font><font style="" face="Courier New"> //textattr(14);</font><font style="" face="Courier New"><br></font><font style="" face="Courier New"> printf("2");</font><font style="" face="Courier New"><br></font><font style="" face="Courier New"> //textattr(7);</font><font style="" face="Courier New"><br></font><font style="" face="Courier New"> printf(" - LISTADOS\n");</font><font style="" face="Courier New"><br></font><font style="" face="Courier New"> gotoxy(28,11);</font><font style="" face="Courier New"><br></font><font style="" face="Courier New"> //textattr(14);</font><font style="" face="Courier New"><br></font><font style="" face="Courier New"> printf("3");</font><font style="" face="Courier New"><br></font><font style="" face="Courier New"> //textattr(7);</font><font style="" face="Courier New"><br></font><font style="" face="Courier New"> printf(" - ELIMINAR\n");</font><font style="" face="Courier New"><br></font><font style="" face="Courier New"> gotoxy(28,12);</font><font style="" face="Courier New"><br></font><font style="" face="Courier New"> //textattr(14);</font><font style="" face="Courier New"><br></font><font style="" face="Courier New"> printf("4");</font><font style="" face="Courier New"><br></font><font style="" face="Courier New"> //textattr(7);</font><font style="" face="Courier New"><br></font><font style="" face="Courier New"> printf(" - ORDENAR\n");</font><font style="" face="Courier New"><br></font><font style="" face="Courier New"> gotoxy(28,13);</font><font style="" face="Courier New"><br></font><font style="" face="Courier New"> //textattr(14);</font><font style="" face="Courier New"><br></font><font style="" face="Courier New"> printf("5");</font><font style="" face="Courier New"><br></font><font style="" face="Courier New"> //textattr(7);</font><font style="" face="Courier New"><br></font><font style="" face="Courier New"> printf(" - MODIFICAR");</font><font style="" face="Courier New"><br></font><font style="" face="Courier New"> gotoxy(28,15);</font><font style="" face="Courier New"><br></font><font style="" face="Courier New"> //textattr(15);</font><font style="" face="Courier New"><br></font><font style="" face="Courier New"> printf("Opcion");</font><font style="" face="Courier New"><br></font><font style="" face="Courier New"> //textattr(RED+BLINK);</font><font style="" face="Courier New"><br></font><font style="" face="Courier New"> printf("[ ]\b\b");</font><font style="" face="Courier New"><br></font><font style="" face="Courier New"><br></font><font style="" face="Courier New"> op=getch();</font><font style="" face="Courier New"><br></font><font style="" face="Courier New"> switch(op)</font><font style="" face="Courier New"><br></font><font style="" face="Courier New"> {</font><font style="" face="Courier New"><br></font><font style="" face="Courier New"> case '1':</font><font style="" face="Courier New"><br></font><font style="" face="Courier New"> clrscr();</font><font style="" face="Courier New"><br></font><font style="" face="Courier New"> adicionar(Fichero);</font><font style="" face="Courier New"><br></font><font style="" face="Courier New"> break;</font><font style="" face="Courier New"><br></font><font style="" face="Courier New"> case '2':</font><font style="" face="Courier New"><br></font><font style="" face="Courier New"> clrscr();</font><font style="" face="Courier New"><br></font><font style="" face="Courier New"> listar( );</font><font style="" face="Courier New"><br></font><font style="" face="Courier New"> break;</font><font style="" face="Courier New"><br></font><font style="" face="Courier New"> case '3':</font><font style="" face="Courier New"><br></font><font style="" face="Courier New"> clrscr();</font><font style="" face="Courier New"><br></font><font style="" face="Courier New"> eliminar();</font><font style="" face="Courier New"><br></font><font style="" face="Courier New"> break;</font><font style="" face="Courier New"><br></font><font style="" face="Courier New"> case '4':</font><font style="" face="Courier New"><br></font><font style="" face="Courier New"> clrscr();</font><font style="" face="Courier New"><br></font><font style="" face="Courier New"> ordenar();</font><font style="" face="Courier New"><br></font><font style="" face="Courier New"> break;</font><font style="" face="Courier New"><br></font><font style="" face="Courier New"> case '5':</font><font style="" face="Courier New"><br></font><font style="" face="Courier New"> clrscr();</font><font style="" face="Courier New"><br></font><font style="" face="Courier New"> modificar();</font><font style="" face="Courier New"><br></font><font style="" face="Courier New"> break;</font><font style="" face="Courier New"><br></font><font style="" face="Courier New"><br></font><font style="" face="Courier New"> }</font><font style="" face="Courier New"><br></font><font style="" face="Courier New"> </font><font style="" face="Courier New"><br></font><font style="" face="Courier New"><br></font><font style="" face="Courier New"> } while (op!=27);</font><font style="" face="Courier New"><br></font><font style="" face="Courier New"> //vaciar();</font><font style="" face="Courier New"><br></font><font style="" face="Courier New"><br></font><font style="" face="Courier New"> if(bib) bib=NULL; delete bib;</font><font style="" face="Courier New"><br></font><font style="" face="Courier New"> if (aux) aux=NULL; delete aux;</font><font style="" face="Courier New"><br></font><font style="" face="Courier New"><br></font><font style="" face="Courier New"><br></font><font style="" face="Courier New"><br></font><font style="" face="Courier New">}</font><font style="" face="Courier New"><br></font><font style="" face="Courier New">void iniciar() //PIDO MEMORIA</font><font style="" face="Courier New"><br></font><font style="" face="Courier New">{bib =new libro*[tam];</font><font style="" face="Courier New"><br></font><font style="" face="Courier New"><br></font><font style="" face="Courier New">}</font><font style="" face="Courier New"><br></font><font style="" face="Courier New"><br></font><font style="" face="Courier New"><br></font><font style="" face="Courier New"><br></font><font style="" face="Courier New">void adicionar() //FUNCION PARA ADICIONAR LIBROS</font><font style="" face="Courier New"><br></font><font style="" face="Courier New">{</font><font style="" face="Courier New"><br></font><font style="" face="Courier New"><br></font><font style="" face="Courier New"><br></font><font style="" face="Courier New"><br></font><font style="" face="Courier New"> if(tam==0){iniciar(Fichero); bib[tam]=new libro;}</font><font style="" face="Courier New"><br></font><font style="" face="Courier New"> else</font><font style="" face="Courier New"><br></font><font style="" face="Courier New"> {</font><font style="" face="Courier New"><br></font><font style="" face="Courier New"> aux =new libro*[tam+1];</font><font style="" face="Courier New"><br></font><font style="" face="Courier New"> aux[tam]=new libro;</font><font style="" face="Courier New"><br></font><font style="" face="Courier New"> for(int i=0;i<tam;i++)</font><font style="" face="Courier New"><br></font><font style="" face="Courier New"> {aux[i]=bib[i];</font><font style="" face="Courier New"><br></font><font style="" face="Courier New"> }</font><font style="" face="Courier New"><br></font><font style="" face="Courier New"><br></font><font style="" face="Courier New"> if(bib) bib=NULL; delete bib;</font><font style="" face="Courier New"><br></font><font style="" face="Courier New"> bib=aux;</font><font style="" face="Courier New"><br></font><font style="" face="Courier New"> aux=NULL; delete aux;</font><font style="" face="Courier New"><br></font><font style="" face="Courier New"><br></font><font style="" face="Courier New"><br></font><font style="" face="Courier New"> }</font><font style="" face="Courier New"><br></font><font style="" face="Courier New"> clrscr();</font><font style="" face="Courier New"><br></font><font style="" face="Courier New"><br></font><font style="" face="Courier New"> </font><font style="" face="Courier New"><br></font><font style="" face="Courier New"><br></font><font style="" face="Courier New"> g(4,4);cout<<"CODIGO: ";int w=atoi(capturar(30,0));bib[tam]->cod=w;</font><font style="" face="Courier New"><br></font><font style="" face="Courier New"> g(4,5);cout<<"TITULO: ";strcpy(bib[tam]->tit,capturar(30,1));</font><font style="" face="Courier New"><br></font><font style="" face="Courier New"> g(4,6);cout<<"AUTOR : ";strcpy(bib[tam]->aut,capturar(30,1));</font><font style="" face="Courier New"><br></font><font style="" face="Courier New"> g(4,7);cout<<"EDITORIAL: ";strcpy(bib[tam]->edi,capturar(30,1));</font><font style="" face="Courier New"><br></font><font style="" face="Courier New"> g(4,8);cout<<"GENERO: ";strcpy(bib[tam]->gen,capturar(30,1));</font><font style="" face="Courier New"><br></font><font style="" face="Courier New"> g(4,9);cout<<"FECHA : ";strcpy(bib[tam]->fec,capturar(30,2));tam++; clrscr();</font><font style="" face="Courier New"><br></font><font style="" face="Courier New"><br></font><font style="" face="Courier New"><br></font><font style="" face="Courier New"><br></font><font style="" face="Courier New">}</font><font style="" face="Courier New"><br></font><font style="" face="Courier New"><br></font><font style="" face="Courier New">void listar() //FUNCION PARA LISTAR LOS LIBROS</font><font style="" face="Courier New"><br></font><font style="" face="Courier New">{clrscr();int y=2;</font><font style="" face="Courier New"><br></font><font style="" face="Courier New"> for(int i=0;i<tam;i++)</font><font style="" face="Courier New"><br></font><font style="" face="Courier New"> {if(bib[i])</font><font style="" face="Courier New"><br></font><font style="" face="Courier New"> {</font><font style="" face="Courier New"><br></font><font style="" face="Courier New"> g(1,1);</font><font style="" face="Courier New"><br></font><font style="" face="Courier New"> //textcolor(GREEN);</font><font style="" face="Courier New"><br></font><font style="" face="Courier New"> puts("CODIGO TITULO AUTOR EDITORIAL GENERO FECHA ");</font><font style="" face="Courier New"><br></font><font style="" face="Courier New"> g(1,y);cout<<bib[i]->cod;</font><font style="" face="Courier New"><br></font><font style="" face="Courier New"> g(8,y);cout<<bib[i]->tit;</font><font style="" face="Courier New"><br></font><font style="" face="Courier New"> g(25,y);cout<<bib[i]->aut;</font><font style="" face="Courier New"><br></font><font style="" face="Courier New"> g(41,y);cout<<bib[i]->edi;</font><font style="" face="Courier New"><br></font><font style="" face="Courier New"> g(56,y);cout<<bib[i]->gen;</font><font style="" face="Courier New"><br></font><font style="" face="Courier New"> g(66,y);cout<<bib[i]->fec;</font><font style="" face="Courier New"><br></font><font style="" face="Courier New"> y++;</font><font style="" face="Courier New"><br></font><font style="" face="Courier New"> }</font><font style="" face="Courier New"><br></font><font style="" face="Courier New"> }</font><font style="" face="Courier New"><br></font><font style="" face="Courier New"> getch();clrscr();</font><font style="" face="Courier New"><br></font><font style="" face="Courier New">}</font><font style="" face="Courier New"><br></font><font style="" face="Courier New">void eliminar() //FUNCION QUE ELIMINA LIBROS</font><font style="" face="Courier New"><br></font><font style="" face="Courier New">{clrscr();int AUX;</font><font style="" face="Courier New"><br></font><font style="" face="Courier New"> //aux2=new libro*[tam];</font><font style="" face="Courier New"><br></font><font style="" face="Courier New"> g(4,4);puts("CàDIGO: ");g(14,4);int z=atoi(capturar(30,0));AUX=z;</font><font style="" face="Courier New"><br></font><font style="" face="Courier New"> for(int i=0;i<tam&&AUX!=bib[i]->cod;i++);</font><font style="" face="Courier New"><br></font><font style="" face="Courier New"> if(i==tam){g(4,20);puts("NO EXISTE EL CODIGO;");getch();clrscr();}</font><font style="" face="Courier New"><br></font><font style="" face="Courier New"> else</font><font style="" face="Courier New"><br></font><font style="" face="Courier New"> {bib[i]=NULL;g(4,20);puts("LIBRO ELIMINADO"); getch();</font><font style="" face="Courier New"><br></font><font style="" face="Courier New"> aux=new libro*[tam-1]; clrscr();</font><font style="" face="Courier New"><br></font><font style="" face="Courier New"> aux[tam]=new libro;</font><font style="" face="Courier New"><br></font><font style="" face="Courier New"> for(int i=0,j=0;i<tam;i++)</font><font style="" face="Courier New"><br></font><font style="" face="Courier New"> {if(bib[i]){aux[j]=bib[i];j++;}</font><font style="" face="Courier New"><br></font><font style="" face="Courier New"> }</font><font style="" face="Courier New"><br></font><font style="" face="Courier New"> // if(bib[i]){ bib[i]=NULL; delete bib[i]; }</font><font style="" face="Courier New"><br></font><font style="" face="Courier New"> if(bib) {bib=NULL;delete bib;}</font><font style="" face="Courier New"><br></font><font style="" face="Courier New"> bib=aux;getch();tam=j;</font><font style="" face="Courier New"><br></font><font style="" face="Courier New"> //if(aux) {aux=NULL; delete aux;}</font><font style="" face="Courier New"><br></font><font style="" face="Courier New"><br></font><font style="" face="Courier New"> }</font><font style="" face="Courier New"><br></font><font style="" face="Courier New">}</font><font style="" face="Courier New"><br></font><font style="" face="Courier New">void ordenar() //FUNCION QUE ORDENA LOS LIBROS POR AUTOR</font><font style="" face="Courier New"><br></font><font style="" face="Courier New">{libro *aux2;</font><font style="" face="Courier New"><br></font><font style="" face="Courier New"> int com=0,i;</font><font style="" face="Courier New"><br></font><font style="" face="Courier New"> if(tam!=0)</font><font style="" face="Courier New"><br></font><font style="" face="Courier New"> {</font><font style="" face="Courier New"><br></font><font style="" face="Courier New"> for(int i=0;i<tam;i++)</font><font style="" face="Courier New"><br></font><font style="" face="Courier New"> {for(int j=i;j<tam;j++)</font><font style="" face="Courier New"><br></font><font style="" face="Courier New"> {com=strcmp(bib[j]->aut,bib[i]->aut);</font><font style="" face="Courier New"><br></font><font style="" face="Courier New"> if(com<0)</font><font style="" face="Courier New"><br></font><font style="" face="Courier New"> {aux2=bib[i];</font><font style="" face="Courier New"><br></font><font style="" face="Courier New"> bib[i]=bib[j];</font><font style="" face="Courier New"><br></font><font style="" face="Courier New"> bib[j]=aux2;</font><font style="" face="Courier New"><br></font><font style="" face="Courier New"> }</font><font style="" face="Courier New"><br></font><font style="" face="Courier New"> }</font><font style="" face="Courier New"><br></font><font style="" face="Courier New"> }</font><font style="" face="Courier New"><br></font><font style="" face="Courier New"><br></font><font style="" face="Courier New"><br></font><font style="" face="Courier New"> load();clrscr();//g(4,20);puts("DATOS ORDENADOS ...");getch();clrscr();</font><font style="" face="Courier New"><br></font><font style="" face="Courier New"> }</font><font style="" face="Courier New"><br></font><font style="" face="Courier New"> else{g(4,20);puts("NO HAY DATOS"); getch();clrscr();}</font><font style="" face="Courier New"><br></font><font style="" face="Courier New">}</font><font style="" face="Courier New"><br></font><font style="" face="Courier New"><br></font><font style="" face="Courier New">void modificar() //FUNCION PARA MODIFICAR DATOS DE LOS LIBROS EXCEPTO CODIGO</font><font style="" face="Courier New"><br></font><font style="" face="Courier New">{</font><font style="" face="Courier New"><br></font><font style="" face="Courier New"> clrscr();</font><font style="" face="Courier New"><br></font><font style="" face="Courier New"> int auz;</font><font style="" face="Courier New"><br></font><font style="" face="Courier New"> g(4,3);puts("CàDIGO:");g(12,3);int x=atoi(capturar(30,0));auz=x; g(4,3); clreol();</font><font style="" face="Courier New"><br></font><font style="" face="Courier New"> for(int i=0;i<tam&&auz!=bib[i]->cod;i++);</font><font style="" face="Courier New"><br></font><font style="" face="Courier New"> if(i==tam){g(4,20);puts("NO EXISTE EL CODIGO;");getch();clrscr(); }</font><font style="" face="Courier New"><br></font><font style="" face="Courier New"> else</font><font style="" face="Courier New"><br></font><font style="" face="Courier New"> {</font><font style="" face="Courier New"><br></font><font style="" face="Courier New"><br></font><font style="" face="Courier New"><br></font><font style="" face="Courier New"> g(4,4);cout<<"CODIGO: ";cout<<bib[i]->cod;</font><font style="" face="Courier New"><br></font><font style="" face="Courier New"> g(4,5);cout<<"TITULO: ";cout<<bib[i]->tit;</font><font style="" face="Courier New"><br></font><font style="" face="Courier New"> g(4,6);cout<<"AUTOR : ";cout<<bib[i]->aut;</font><font style="" face="Courier New"><br></font><font style="" face="Courier New"> g(4,7);cout<<"EDITORIAL:";cout<<bib[i]->edi;</font><font style="" face="Courier New"><br></font><font style="" face="Courier New"> g(4,8);cout<<"GENERO: ";cout<<bib[i]->gen;</font><font style="" face="Courier New"><br></font><font style="" face="Courier New"> g(4,9);cout<<"FECHA : ";cout<<bib[i]->fec;</font><font style="" face="Courier New"><br></font><font style="" face="Courier New"><br></font><font style="" face="Courier New"><br></font><font style="" face="Courier New"> g(25,15);puts("¨Qu‚ dato desea modificar?");</font><font style="" face="Courier New"><br></font><font style="" face="Courier New"> g(60,23);</font><font style="" face="Courier New"><br></font><font style="" face="Courier New"> //textcolor(BLINK+RED);</font><font style="" face="Courier New"><br></font><font style="" face="Courier New"> puts("0 PARA SALIR");</font><font style="" face="Courier New"><br></font><font style="" face="Courier New"> g(4,16);cout<<"1 - TITULO ";</font><font style="" face="Courier New"><br></font><font style="" face="Courier New"> g(4,17);cout<<"2 - AUTOR ";</font><font style="" face="Courier New"><br></font><font style="" face="Courier New"> g(4,18);cout<<"3 - EDITORIAL";</font><font style="" face="Courier New"><br></font><font style="" face="Courier New"> g(4,19);cout<<"4 - GENERO ";</font><font style="" face="Courier New"><br></font><font style="" face="Courier New"> g(4,20);cout<<"5 - FECHA ";</font><font style="" face="Courier New"><br></font><font style="" face="Courier New"> g(4,23);printf("Opcion");</font><font style="" face="Courier New"><br></font><font style="" face="Courier New"> printf("[ ]\b\b");</font><font style="" face="Courier New"><br></font><font style="" face="Courier New"> char op2=getch(); char aus[30];</font><font style="" face="Courier New"><br></font><font style="" face="Courier New"> switch(op2)</font><font style="" face="Courier New"><br></font><font style="" face="Courier New"> {</font><font style="" face="Courier New"><br></font><font style="" face="Courier New"> case '1':</font><font style="" face="Courier New"><br></font><font style="" face="Courier New"> clrscr();</font><font style="" face="Courier New"><br></font><font style="" face="Courier New"> g(4,4);puts("NUEVO TÖTULO:");g(15,4);strcpy(aus,capturar(30,1));</font><font style="" face="Courier New"><br></font><font style="" face="Courier New"> strcpy(bib[i]->tit,aus);</font><font style="" face="Courier New"><br></font><font style="" face="Courier New"> break;</font><font style="" face="Courier New"><br></font><font style="" face="Courier New"><br></font><font style="" face="Courier New"> case '2':</font><font style="" face="Courier New"><br></font><font style="" face="Courier New"> clrscr();</font><font style="" face="Courier New"><br></font><font style="" face="Courier New"> g(4,4);puts("NUEVO AUTOR:");g(18,4);strcpy(aus,capturar(30,1));</font><font style="" face="Courier New"><br></font><font style="" face="Courier New"> strcpy(bib[i]->aut,aus);</font><font style="" face="Courier New"><br></font><font style="" face="Courier New"> break;</font><font style="" face="Courier New"><br></font><font style="" face="Courier New"> case '3':</font><font style="" face="Courier New"><br></font><font style="" face="Courier New"> clrscr();</font><font style="" face="Courier New"><br></font><font style="" face="Courier New"> g(4,4);puts("NUEVO EDITORIAL:");g(20,4);strcpy(aus,capturar(30,1));</font><font style="" face="Courier New"><br></font><font style="" face="Courier New"> strcpy(bib[i]->edi,aus);</font><font style="" face="Courier New"><br></font><font style="" face="Courier New"> break;</font><font style="" face="Courier New"><br></font><font style="" face="Courier New"> case '4':</font><font style="" face="Courier New"><br></font><font style="" face="Courier New"> clrscr();</font><font style="" face="Courier New"><br></font><font style="" face="Courier New"> g(4,4);puts("NUEVO GENERO:");g(18,4);strcpy(aus,capturar(30,1));</font><font style="" face="Courier New"><br></font><font style="" face="Courier New"> strcpy(bib[i]->gen,aus);</font><font style="" face="Courier New"><br></font><font style="" face="Courier New"> break;</font><font style="" face="Courier New"><br></font><font style="" face="Courier New"> case '5':</font><font style="" face="Courier New"><br></font><font style="" face="Courier New"> clrscr();</font><font style="" face="Courier New"><br></font><font style="" face="Courier New"> g(4,4);puts("NUEVA FECHA:");g(18,4);strcpy(aus,capturar(30,2));</font><font style="" face="Courier New"><br></font><font style="" face="Courier New"> strcpy(bib[i]->fec,aus);</font><font style="" face="Courier New"><br></font><font style="" face="Courier New"> break;</font><font style="" face="Courier New"><br></font><font style="" face="Courier New"><br></font><font style="" face="Courier New"><br></font><font style="" face="Courier New"> }</font><font style="" face="Courier New"><br></font><font style="" face="Courier New">// else{ puts("NO REGISTRADO"); getch(); } </font><font style="" face="Courier New"><br></font><font style="" face="Courier New"> </font><font style="" face="Courier New"><br></font><font style="" face="Courier New"> clrscr();</font><font style="" face="Courier New"><br></font><font style="" face="Courier New"> }</font><font style="" face="Courier New"><br></font><font style="" face="Courier New">}</font><font style="" face="Courier New"><br></font><font style="" face="Courier New">//FUNCION DE VALIDACION</font><font style="" face="Courier New"><br></font><font style="" face="Courier New">char *capturar(int longitud,int tipo)//tipo 0=NUMEROS,1=LETRAS,2=NUMEROS Y LETRAS Y (-)</font><font style="" face="Courier New"><br></font><font style="" face="Courier New"> {</font><font style="" face="Courier New"><br></font><font style="" face="Courier New"> char aux[81],i=0;</font><font style="" face="Courier New"><br></font><font style="" face="Courier New"> unsigned char tecla;</font><font style="" face="Courier New"><br></font><font style="" face="Courier New"> while(tecla!=13)</font><font style="" face="Courier New"><br></font><font style="" face="Courier New"> { tecla=getch();</font><font style="" face="Courier New"><br></font><font style="" face="Courier New"> if(tecla==8)</font><font style="" face="Courier New"><br></font><font style="" face="Courier New"> { if( i>0)</font><font style="" face="Courier New"><br></font><font style="" face="Courier New"> { gotoxy(wherex()-1,wherey());</font><font style="" face="Courier New"><br></font><font style="" face="Courier New"> cout<<" ";</font><font style="" face="Courier New"><br></font><font style="" face="Courier New"> gotoxy(wherex()-1,wherey());</font><font style="" face="Courier New"><br></font><font style="" face="Courier New"> i--;</font><font style="" face="Courier New"><br></font><font style="" face="Courier New"> }</font><font style="" face="Courier New"><br></font><font style="" face="Courier New"> }</font><font style="" face="Courier New"><br></font><font style="" face="Courier New"><br></font><font style="" face="Courier New"><br></font><font style="" face="Courier New"> if(tecla==0) getch();</font><font style="" face="Courier New"><br></font><font style="" face="Courier New"> else</font><font style="" face="Courier New"><br></font><font style="" face="Courier New"> { if(i<longitud-1)</font><font style="" face="Courier New"><br></font><font style="" face="Courier New"> {switch(tipo)</font><font style="" face="Courier New"><br></font><font style="" face="Courier New"> {case 1: if ((tecla>='A'&& tecla<='Z') || (tecla>='a' && tecla<='z') || (tecla==' '))</font><font style="" face="Courier New"><br></font><font style="" face="Courier New"> {</font><font style="" face="Courier New"><br></font><font style="" face="Courier New"><br></font><font style="" face="Courier New"><br></font><font style="" face="Courier New"> cout<<tecla;</font><font style="" face="Courier New"><br></font><font style="" face="Courier New"> aux[i++]=tecla;</font><font style="" face="Courier New"><br></font><font style="" face="Courier New"> }</font><font style="" face="Courier New"><br></font><font style="" face="Courier New"> break;</font><font style="" face="Courier New"><br></font><font style="" face="Courier New"> case 2: if ((tecla>='0'&& tecla<='9') || (tecla>='A'&& tecla<='Z') || (tecla>='a' && tecla<='z') || (tecla==' ') || (tecla=='-'))</font><font style="" face="Courier New"><br></font><font style="" face="Courier New"> { cout<<tecla;</font><font style="" face="Courier New"><br></font><font style="" face="Courier New"> aux[i++]=tecla;</font><font style="" face="Courier New"><br></font><font style="" face="Courier New"> }</font><font style="" face="Courier New"><br></font><font style="" face="Courier New"> break;</font><font style="" face="Courier New"><br></font><font style="" face="Courier New"> case 0: if((tecla>='0'&& tecla<='9'))</font><font style="" face="Courier New"><br></font><font style="" face="Courier New"> {cout<<tecla;</font><font style="" face="Courier New"><br></font><font style="" face="Courier New"> aux[i++]=tecla;</font><font style="" face="Courier New"><br></font><font style="" face="Courier New"> }</font><font style="" face="Courier New"><br></font><font style="" face="Courier New"> break;</font><font style="" face="Courier New"><br></font><font style="" face="Courier New"> }//switch</font><font style="" face="Courier New"><br></font><font style="" face="Courier New"> }//if</font><font style="" face="Courier New"><br></font><font style="" face="Courier New"> }//else</font><font style="" face="Courier New"><br></font><font style="" face="Courier New"> }//while</font><font style="" face="Courier New"><br></font><font style="" face="Courier New"> aux[i]=0;</font><font style="" face="Courier New"><br></font><font style="" face="Courier New"> cout<<"\n";</font><font style="" face="Courier New"><br></font><font style="" face="Courier New"> return aux;</font><font style="" face="Courier New"><br></font><font style="" face="Courier New"> }</font><font style="" face="Courier New"><br></font><font style="" face="Courier New"><br></font><font style="" face="Courier New"><br></font><font style="" face="Courier New">void load()</font><font style="" face="Courier New"><br></font><font style="" face="Courier New">{</font><font style="" face="Courier New"><br></font><font style="" face="Courier New"> </font><font style="" face="Courier New"><br></font><font style="" face="Courier New"> clrscr();</font><font style="" face="Courier New"><br></font><font style="" face="Courier New"> int p=-3,x;</font><font style="" face="Courier New"><br></font><font style="" face="Courier New"> //textcolor(RED);</font><font style="" face="Courier New"><br></font><font style="" face="Courier New"> g(26,5);printf(" ORDENANDO ...");</font><font style="" face="Courier New"><br></font><font style="" face="Courier New"> gotoxy(16,6);printf("0%ÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜ");</font><font style="" face="Courier New"><br></font><font style="" face="Courier New"> //textcolor(LIGHTGREEN);</font><font style="" face="Courier New"><br></font><font style="" face="Courier New"> for (x=19;x<=57;x++) {</font><font style="" face="Courier New"><br></font><font style="" face="Courier New"> gotoxy(x,6);printf("Ü");if (p==111){p=100;}else{p=p+3;}</font><font style="" face="Courier New"><br></font><font style="" face="Courier New"> gotoxy(59,6);printf("%d%",p);</font><font style="" face="Courier New"><br></font><font style="" face="Courier New"> </font><font style="" face="Courier New"><br></font><font style="" face="Courier New"> }</font><font style="" face="Courier New"><br></font><font style="" face="Courier New"> printf("\n\n\t\t Proceso terminado\n\n\t\t\t Presione cualquier tecla");getche();</font><font style="" face="Courier New"><br></font><font style="" face="Courier New"><br></font><font style="" face="Courier New"><br></font><font style="" face="Courier New">}</font><br></div></div> <br /><hr />Explore the seven wonders of the world <a href='http://search.msn.com/results.aspx?q=7+wonders+world&mkt=en-US&form=QBRE' target='_new'>Learn more!</a></body>
</html>