llamaseltuco
15 de Agosto del 2005

hola por fa si me pueden ayudar con un programa en c++ que permita realizar una agenda personal

Cristian
15 de Agosto del 2005

Viejo aqui te envio un programa pero tienes que modificarlo si quieres comprenderlo espero que te sirva

*/PROGRAMA DE UNA AGENDA
Develop by @ Cristian CP
*/
#include <dos.h>
#include <conio.h>
#include <stdio.h>
#include <string.h>
#include <stdlib.h>
#include <ctype.h>
#include <graphics.h>


const unsigned char ENTRA=1,CONSU=2,BORRA=3,MODIF=4,LISTA=5,ORDENBR=6,
ORDEDNI=7,GENER=8,SALIR=0,NULO=255,MAX=101,FALSO=0,CIERTO=!FALSO,MAXLIN=20;

typedef char TNombre[30],TTelefo[20],TProfe[30];

typedef struct {
TNombre nom;
unsigned long dni;
TTelefo tel;
int edad;
TProfe pro;
} TPersona;
typedef TPersona TListin[MAX];
typedef struct {
TListin lista;
int cant;
} TBase;

unsigned char menu(void);
void entrada(TBase &ag);
void consultar(TBase ag);
void borrar(TBase &ag);
void modificar(TBase &ag);
void listar(TBase ag);
void ordnombre(TBase &ag);
void orddni(TBase &ag);
void generar(TBase &ag);
void inicializar(TBase &ag);
void ini_grafico(void);
void portada(void);

void main(void)
{
TBase agenda;
unsigned char op;

clrscr();
ini_grafico();
portada();
inicializar(agenda);
while ((op = menu()) != SALIR)
switch (op) {
case ENTRA: entrada(agenda); break;
case CONSU: consultar(agenda); break;
case BORRA: borrar(agenda); break;
case MODIF: modificar(agenda); break;
case LISTA: listar(agenda); break;
case ORDENBR: ordnombre(agenda);break;
case ORDEDNI: orddni(agenda);break;
case GENER: generar(agenda); break;
}
restorecrtmode();
}

void plantilla(unsigned char pos)
{
setfillstyle(LINE_FILL,LIGHTBLUE);bar(0,0,700,700);
setfillstyle(SOLID_FILL,BLACK);bar(25,120,600,400);
_setcursortype(_NORMALCURSOR);settextstyle(7,0,1);
setcolor(11);gotoxy(8,10); printf("Ficha n£mero %d",pos);
outtextxy(75,200,"Nombre : ");
outtextxy(410,200,"D.N.I. : ");
outtextxy(75,248,"Tel‚fono : ");
outtextxy(410,248,"Edad : ");
outtextxy(75,297,"Profesi¢n : ");
}

void leernombre(TNombre n)
{
fflush(stdin);gotoxy(26,14);gets(n);
}

void leerdni(unsigned long &d)
{
fflush(stdin);gotoxy(64,14);scanf("%D",&d);
}

void leertelefono(TTelefo t)
{
fflush(stdin);gotoxy(26,17);gets(t);
}

void leeredad(int &e)
{
fflush(stdin);gotoxy(64,17);scanf("%D",&e);
}

void leerprofe(TProfe p)
{
fflush(stdin);gotoxy(26,20);gets(p);
}

int buscar(TBase ag, TNombre n)
{
int i;

for(i=1;i<ag.cant;i++)
{
if(strcmp(ag.lista[i].nom,n)==0) return i;
}return -1;
}

void mostrar(TPersona p)
{
gotoxy(26,14); printf("%s",p.nom);gotoxy(64,14); printf("%ld",p.dni);
gotoxy(26,17); printf("%s",p.tel);gotoxy(64,17); printf("%d",p.edad);
gotoxy(26,20); printf("%s",p.pro);
}


void entrada(TBase &ag)
{
clrscr();
while (ag.cant < MAX)
{
if (ag.cant==0) ag.cant++;
plantilla(ag.cant);
leernombre(ag.lista[ag.cant].nom);
if (strlen(ag.lista[ag.cant].nom) == 0) break;
ag.cant++;
leerdni(ag.lista[ag.cant].dni);leertelefono(ag.lista[ag.cant].tel);
leeredad(ag.lista[ag.cant].edad);leerprofe(ag.lista[ag.cant].pro);

}
if(ag.cant >= MAX)
{
_setcursortype(_NOCURSOR);clrscr();
setfillstyle(LINE_FILL,LIGHTBLUE);bar(0,0,700,700);
settextstyle(SANS_SERIF_FONT,0,1);setcolor(11);
outtextxy(200,200,"La agenda est llena");
outtextxy(500,400,"Pulse una tecla para continuar");
getch();
}
}

void consultar(TBase ag)
{
TNombre n;
int pos;

if (ag.cant==0)
{
clrscr();setcolor(11);
setfillstyle(LINE_FILL,LIGHTBLUE);bar(0,0,700,700);
settextstyle(SANS_SERIF_FONT,0,1);
outtextxy(200,200,"OJO !! La agenda est vac¡a");
outtextxy(180,400,"Pulse una tecla para continuar...");
getch();
}
else
{
do
{
clrscr();plantilla(0);
leernombre(n);
if (strcmp(n,"")==0) break;
pos = buscar(ag,n);
if (pos<0)
{
clrscr();setcolor(11);
setfillstyle(LINE_FILL,LIGHTBLUE);bar(0,0,700,700);
settextstyle(SANS_SERIF_FONT,0,1);setcolor(11);
outtextxy(150,200,"La ficha no se encuentra en esta agenda");
outtextxy(180,400,"Pulse una tecla para continuar...");
}
else
{
plantilla(pos);mostrar(ag.lista[pos]);
}
getch();
}
while(CIERTO);
}
}

void borrar(TBase &ag)
{
int pos,i;
TNombre n;

if (ag.cant==0)
{
clrscr();setcolor(11);
setfillstyle(LINE_FILL,LIGHTBLUE);bar(0,0,700,700);
settextstyle(SANS_SERIF_FONT,0,1);
outtextxy(200,200,"OJO!! La agenda est vac¡a");
outtextxy(180,400,"Pulse una tecla para continuar...");
getch();
}
else {
do
{
plantilla(0);leernombre(n);
if (strcmp(n,"")==0) break;
pos=buscar(ag,n);
if(pos==-1)
{
clrscr();setcolor(11);
setfillstyle(LINE_FILL,LIGHTBLUE);bar(0,0,700,700);
settextstyle(SANS_SERIF_FONT,0,1);
outtextxy(200,200,"No se encuentra la ficha");
outtextxy(180,400,"Pulse una tecla para continuar...");
getch();
}
else
{
plantilla(pos);mostrar(ag.lista[pos]);gotoxy(20,23);
printf("Desea borrar la ficha (s/n) ? ");
if(getch()=='s')
{
for (i=pos ; i<ag.cant; i++)
{
ag.lista[i]=ag.lista[i+1];
}
ag.cant--;
}
}
}
while(CIERTO);
}
}

void modificar(TBase &ag)
{
int pos;
TNombre n;

if (ag.cant==0)
{
clrscr();setcolor(11);
setfillstyle(LINE_FILL,LIGHTBLUE);bar(0,0,700,700);
settextstyle(SANS_SERIF_FONT,0,1);
outtextxy(200,200,"OJO!! La agenda est vac¡a");
outtextxy(180,400,"Pulse una tecla para continuar...");
getch();
}
else
{
do
{
plantilla(0);leernombre(n);
if (strcmp(n,"")==0) break;
pos=buscar(ag,n);
if(pos==-1)
{
clrscr();setcolor(11);
setfillstyle(LINE_FILL,LIGHTBLUE);bar(0,0,700,700);
settextstyle(SANS_SERIF_FONT,0,1);
outtextxy(150,200,"La ficha no se encuentra en esta agenda");
outtextxy(180,400,"Pulse una tecla para continuar...");
getch();
}
else
{
plantilla(pos);mostrar(ag.lista[pos]);gotoxy(20,23);
printf("Desea modificar esta ficha (s/n) ? ");
switch(getch())
{
case 's':
case 'S':
{
TPersona x;plantilla(0);leernombre(x.nom);
leerdni(x.dni);leertelefono(x.tel);leeredad(x.edad);
leerprofe(x.pro);
if(x.nom[1]==0) strcpy(x.nom+2,ag.lista[pos].nom+2);
if(x.dni ==0)x.dni=ag.lista[pos].dni;
if(x.tel[1]==0) strcpy(x.tel+2,ag.lista[pos].tel+2);
if(x.edad == 0)x.edad=ag.lista[pos].edad;
if(x.pro[1] == 0) strcpy(x.pro+2,ag.lista[pos].tel+2);
gotoxy(15,23); printf("Est seguro de que quiere modificar la ficha (s/n)?");
switch(getch())
{
case 's':
case 'S':
{
mostrar(x);ag.lista[pos] = x;
}
break;
}
break;
}
}
}
}
while(CIERTO);
}
}

void listar(TBase ag)
{
unsigned char i, x;

clrscr();_setcursortype(_NOCURSOR);
if (ag.cant == 0)
{
setcolor(11);setfillstyle(LINE_FILL,LIGHTBLUE);
bar(0,0,800,800);settextstyle(SANS_SERIF_FONT,0,1);
outtextxy(200,200,"OJO !!! La agenda est vac¡a");
outtextxy(180,400,"Pulse una tecla para continuar...");
getch();
}
else {

x=0;clrscr();setfillstyle(SOLID_FILL,BLACK);
bar(0,0,800,800);
gotoxy(1,x);
printf("N§ Nombre D.N.I.");
printf(" Tel‚fono Edad Profesi¢n");
x=3;
for (i=1 ; i < ag.cant && i<MAX; i++)
{
gotoxy(1,x);printf("%d",i);
gotoxy(8,x);printf("%s",ag.lista[i].nom);
gotoxy(34,x);printf("%ld", ag.lista[i].dni);
gotoxy(45,x);printf("%s", ag.lista[i].tel);
gotoxy(54,x);printf("%d", ag.lista[i].edad);
gotoxy(60,x);printf("%s",ag.lista[i].pro);
x++;
if (x==23)
{
printf("nnPulse una tecla para continuar...n");
getch();clrscr();
setfillstyle(SOLID_FILL,BLACK);
bar(0,0,700,700);
printf("N§ Nombre D.N.I.");
printf(" Tel‚fono Edad Profesi¢n");
x=3;
}
putchar('n');
}
printf("nnPulse una tecla para continuar n");
if (x != 0) getch();
}
_setcursortype(_NORMALCURSOR);
}

void ordnombre(TBase &ag)
{
unsigned int i,j;
TPersona x;

clrscr();_setcursortype(_NOCURSOR);
if (ag.cant == 0)
{
setcolor(11);setfillstyle(LINE_FILL,LIGHTBLUE);
bar(0,0,800,800);settextstyle(SANS_SERIF_FONT,0,1);
outtextxy(200,200,"OJO !!! La agenda est vac¡a");
outtextxy(180,400,"Pulse una tecla para continuar...");
getch();
}
else
{
for(i=1; i < ag.cant; i++)
{
for(j=ag.cant-1; j > 1; j--)
{
if(stricmp(ag.lista[j-1].nom,ag.lista[j].nom)>0)
{
x=ag.lista[j-1];
ag.lista[j-1]=ag.lista[j];
ag.lista[j]=x;
}
}
}
}
}

void orddni(TBase &ag)
{
int i,j;
TPersona x;
clrscr();_setcursortype(_NOCURSOR);
if (ag.cant == 0)
{
setcolor(11);setfillstyle(LINE_FILL,LIGHTBLUE);
bar(0,0,800,800);settextstyle(SANS_SERIF_FONT,0,1);
outtextxy(200,200,"OJO !!! La agenda est vac¡a");
outtextxy(180,400,"Pulse una tecla para continuar...");
getch();
}
else
{
for(i=1; i<ag.cant; i++)
{
x=ag.lista[i];
j=i-1;
while(x.dni<ag.lista[j].dni && j>0)
{
ag.lista[j+1]=ag.lista[j];
j--;
}
ag.lista[j+1]=x;
}
}
}

void generar(TBase &ag)
{
clrscr();
int i;
for(i=1; ag.cant < MAX && i <= 11; ag.cant++, i++)
{
itoa(random(1000),ag.lista[ag.cant].nom,10);
itoa(random(1000),ag.lista[ag.cant].tel,10);
itoa(random(1000),ag.lista[ag.cant].pro,10);
ag.lista[ag.cant].dni = random(1000);
ag.lista[ag.cant].edad = random(1000);
}
if(ag.cant >= MAX)
{
_setcursortype(_NOCURSOR);
clrscr();
setfillstyle(LINE_FILL,LIGHTBLUE);
bar(0,0,700,700);
settextstyle(SANS_SERIF_FONT,0,1);
setcolor(11);
outtextxy(200,200,"La agenda est llena");
outtextxy(180,400,"Pulse una tecla para continuar...");
getch();
_setcursortype(_NORMALCURSOR);
}
}

void inicializar(TBase &ag)
{
ag.cant = 0;
}

void ini_grafico(void) // Permite operar en modo gr…fico.
{
int gdriver = DETECT, gmode, errorcode;

initgraph(&gdriver, &gmode,"c:\borlandc\borlandc\bgi");
errorcode = graphresult();
if (errorcode != grOk)
{
printf("Error de gr…fics: %sn", grapherrormsg(errorcode));
printf("Prem una tecla per acabar... ");
getch();exit(1);
}
}


unsigned char menu(void)
{
int x;
unsigned char op;

clearviewport();setfillstyle(1,4);
floodfill(1,1,1);setcolor(14);
// Tri ngulos superior e inferior.
for (x=0;x<640;x+=3)
{
line(320,240,x,0);
line(320,240,x,480);
}
// Tri ngulos laterales.
for (x=0;x<480;x+=3)
{
line(320,240,0,x);
line(320,240,640,x);
}
settextstyle(2,HORIZ_DIR,6);setcolor(3);
outtextxy(255,157,"MENU PRINCIPAL");
outtextxy(240,165,"ÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍ");
outtextxy(230,180,"1.- Altas");
outtextxy(230,195,"2.- Consultas");
outtextxy(230,210,"3.- Bajas");
outtextxy(230,225,"4.- Modificaciones");
outtextxy(230,240,"5.- Listado de fichas");
outtextxy(230,255,"6.- Ord. por nombre");
outtextxy(230,270,"7.- Ord. por D.N.I.");
outtextxy(230,285,"8.- Generar 10 ");
outtextxy(230,300,"0.- Salir");
do {
gotoxy(43,24);
switch (getch()) {
case '0': op = SALIR; break;
case '1': op = ENTRA; break;
case '2': op = CONSU; break;
case '3': op = BORRA; break;
case '4': op = MODIF; break;
case '5': op = LISTA; break;
case '6': op = ORDENBR; break;
case '7': op = ORDEDNI; break;
case '8': op = GENER; break;
default : op = NULO; break;
}
}while (op == NULO);
return op;
}

void portada(void)
{
int x,color;

// Estrellas aleatorias en pantalla.
randomize();
for (x=0;x<1500;x++)
{
color=random(15);
while (color==0) color=random(15);
putpixel(random(640),random(480),color);
delay(3);
}
// Informaci¢n del programa.
setcolor(14);settextstyle(4,HORIZ_DIR,6);
outtextxy(10,150,"AGENDA PERSONAL");
settextstyle(2,HORIZ_DIR,5);outtextxy(560,190,"Ver. 1.0");
settextstyle(7,HORIZ_DIR,5);setcolor(12);
outtextxy(200,240,"Autores : ");setcolor(10);
settextstyle(7,HORIZ_DIR,4);
outtextxy(200,290,"M•nica Salas");
outtextxy(200,330,"S¡lvia de la Orden");
setcolor(15);getch();
}