void ingresar_paciente(Paciente** cabeza)
{
if(saberfunc_est(*cabeza)>9)
{
system("CLS");
marco();
printf("Solo se pueden registrar un maximo de 10 pacientes.");
getch();
}
else
{
system("CLS");
marco();
int id;
Paciente* nuevo,*aux;
char Nombres[50],Departamento[50],op;
int duracion;
fflush(stdin);
puts("Ingrese nombre: ");
gotoxy(11,11);
gets(Nombres);
fflush(stdin);
gotoxy(11,13);
puts("Ingrese el apellido: ");
gotoxy(11,15);
gets(Departamento);
fflush(stdin);
gotoxy(11,19);
printf("Ingrese edad: ");
scanf("%d",&duracion);
fflush(stdin);
id=saberfunc_pac(*cabeza);
nuevo=crear_Paciente(id,Nombres,Departamento,duracion);
gotoxy(11,21);
nuevo->sgt=*cabeza;
gotoxy(11,22);
textbackground(GREEN);
printf("Registrado!");
getch();
*cabeza=nuevo;
}
}
void main (){
FILE *Fichero;
char nArchivo[100],c,*m;
Pila *p=creaPila(100);
marco();
printf("Dame el nombre del archivo que deseas verificar si tiene sus llavas, corchetes y parentesis balanceadas dentro de el, Recuerda que el archivo tiene que estar en la misma direccion que este programa y no olvodes poner su extensión\n");
gets(nArchivo);
Fichero=fopen(nArchivo,"r");
if(Fichero==NULL){
printf("NO exixte tu archivo");
exit(0);
}
do{
c=fgetc(Fichero);
if(c=='{' || c=='[' || c=='(')
push(p,(void*)creaChar(c));
if(c=='}' || c==']' || c==')')
m=pop(p);
}while(!feof(Fichero));
fclose(Fichero);
if(isEmpty(p))
printf("\nEsta balanceado\n");
else
printf("\nNo esta balanceado\n");
}
int jvg_scanf(char *title, char *prompt, char *fmt, ...){
int cnt;
int x, y, h = 8, w, i, len, m, bb, bf;
va_list argptr;
w = 20 + strlen(title);
len = 5;
for(i = 0; i < strlen(prompt); i++){
if((prompt[i] == '\n')&&(prompt[i+1] == '\r')){
h++;
len = 0;
i++;
}
if(len > w) w = len;
len++;
}
x = (80 - w) / 2;
y = (50 - h) / 2;
guardar_estado();
guardar_ventana();
bf = JVGmarcf;
bb = JVGmarcb;
m = JVGmarco;
m_borde(14);
m_fondo(1);
ajustarmarco(MARCO_DOBLE);
gettext(x, y, x + w - 1, y + h - 1, JVGbuffer);
marco(x, y, x + w - 1,y + h - 1);
gotoxy(x + 1, y);
cputs("(ž)");
cputs(title);
window(x + 2, y + 1, x + w, y + h - 2);
cputs(prompt);
ajustarmarco(m);
restaurar_ventana();
marco(x + 1, y + h - 4, x + w - 2, y + h - 2);
gotoxy(x + 2, y + h - 3);
va_start(argptr, fmt);
cnt = vscanf(fmt, argptr);
va_end(argptr);
fflush(stdin);
m_borde(bb);
m_fondo(bf);
restaurar_colores();
puttext(x, y, x + w - 1, y + h - 1, JVGbuffer);
return cnt;
}
Boolean jvg_xmessage(char *title, char *msg, char *fmt, ...){
int x, y, h = 5, w, i, len, m, bb, bf;
va_list argptr;
Boolean ret = False;
w = 20 + strlen(title);
len = 5;
for(i = 0; i < strlen(msg); i++){
if((msg[i] == '\n')&&(msg[i+1] == '\r')){
h++;
len = 0;
i++;
}
if(len > w) w = len;
len++;
}
x = (80 - w) / 2;
y = (50 - h) / 2;
guardar_estado();
guardar_ventana();
bf = JVGmarcf;
bb = JVGmarcb;
m = JVGmarco;
m_borde(14);
m_fondo(1);
ajustarmarco(MARCO_DOBLE);
gettext(x, y, x + w - 1, y + h - 1, JVGbuffer);
marco(x, y, x + w - 1,y + h - 1);
_setcursortype(_NOCURSOR);
gotoxy(x + 1, y);
cputs("(ž)");
cputs(title);
window(x + 2, y + 1, x + w, y + h - 2);
cputs("\n\r");
cputs(msg);
va_start(argptr, msg);
vprintf(fmt, argptr);
va_end(argptr);
restaurar_ventana();
gotoxy(x + w/2 - 10, y + h - 2);
m_borde(bb);
m_fondo(bf);
ajustarmarco(m);
ret = aceptar_cancelar();
_setcursortype(_NORMALCURSOR);
restaurar_colores();
puttext(x, y, x + w - 1, y + h - 1, JVGbuffer);
return ret;
}
void errormsg(char *title, char *msg){
int h = 3, w, i, len, bb, bf, m, x, y;
w = 6 + strlen(title);
len = 3;
for(i = 0; i < strlen(msg); i++){
if((msg[i] == '\n')&&(msg[i+1] == '\r')){
h++;
len = 0;
i++;
}
if(len > w) w = len;
len++;
}
x = (80 - w) / 2;
y = (50 - h) / 2;
guardar_estado();
guardar_ventana();
bf = JVGmarcf;
bb = JVGmarcb;
m = JVGmarco;
m_borde(15);
m_fondo(4);
ajustarmarco(MARCO_DOBLE);
gettext(x, y, x + w - 1, y + h - 1, JVGbuffer);
marco(x, y, x + w - 1,y + h - 1);
_setcursortype(_NOCURSOR);
m_borde(bb);
m_fondo(bf);
gotoxy(x + 1, y);
cputs("(ž)");
cputs(title);
window(x + 1, y + 1, x + w, y + h);
textcolor(15);
textbackground(4);
cputs(msg);
error_snd();
getch();
_setcursortype(_NORMALCURSOR);
restaurar_ventana();
restaurar_colores();
puttext(x, y, x + w - 1, y + h - 1, JVGbuffer);
ajustarmarco(m);
}
void mostrar_paciente(Paciente* cabeza)
{
Paciente* aux;
printf("\n");
system("CLS");
marco();
int Y=10,X=11;
for(aux=cabeza; aux; aux=aux->sgt)
{
textcolor(YELLOW);
gotoxy(X,Y-1);
printf("%c%c%c%c%c%c%c%c%c%c%c%c%c%c%c%c%c%c%c%c%c%c%c%c%c%c%c%c%c%c%c%c%c%c%c%c%c%c%c%c%c%c%c%c",201,205,205,205,205,205,205,205,205,205,205,205,205,205,205,205,205,205,205,205,205,205,205,205,205,205,205,205,205,205,205,205,205,205,205,205,205,205,205,205,205,205,205,187);
gotoxy(X,Y);
printf("%c",186);
textcolor(WHITE);
printf(" ID: ");
printf("%d",aux->id);
gotoxy(X,Y+1);
textcolor(YELLOW);
printf("%c",186);
textcolor(WHITE);
printf(" Nombre: ");
printf("%s",aux->Nombres);
gotoxy(X,Y+2);
textcolor(YELLOW);
printf("%c",186);
textcolor(WHITE);
printf(" Apellido: ");
printf("%s",aux->Apellido);
gotoxy(X,Y+3);
textcolor(YELLOW);
printf("%c",186);
textcolor(WHITE);
printf(" Edad: ");
printf("%d",aux->edad);
textcolor(WHITE);
//printf(" Carrera: ");
//printf("%s",aux->Carrera);
gotoxy(X,Y+4);
textcolor(YELLOW);
printf("%c%c%c%c%c%c%c%c%c%c%c%c%c%c%c%c%c%c%c%c%c%c%c%c%c%c%c%c%c%c%c%c%c%c%c%c%c%c%c%c%c%c%c%c%c",200,205,205,205,205,205,205,205,205,205,205,205,205,205,205,205,205,205,205,205,205,205,205,205,205,205,205,205,205,205,205,205,205,205,205,205,205,205,205,205,205,205,205,188);
gotoxy(X+43,Y);
printf("%c",186);
gotoxy(X+43,Y+1);
printf("%c",186);
gotoxy(X+43,Y+2);
printf("%c",186);
gotoxy(X+43,Y+3);
printf("%c",186);
textcolor(WHITE);
if(X==11)
X+=48;
else
{
Y+=6;
X=11;
}
}
}
//*************
void Fondo(void){
marco();
//setbkcolor(BLACK);//Darle el Borde del Boton Negro
boton(90,70,500,120,8,15,7,5);}
void cabecera(void){
marco();
printf("\n\t\t\t CALCULADORA DE AREAS\n");
marco();
printf("\n");
}
void main()
{
Estudiante Est[60],*AptEst;
float P1,P2,P3,Def,PromTotal,temp;
float MejAlum[60];
int Opc,n,i,j,lon,Cod,sw,pass;
char Nom[40];
AptEst=&Est[0];
clrscr();
sw=0;
do{
marco();
gotoxy(25,2);
printf("M E N U P R I N C I P A L");
gotoxy(17,4);
printf("CREAR REGISTROS..........................[1]\n");
gotoxy(17,5);
printf("LISTADO DE LOS ESTUDIANTES...............[2]\n");
gotoxy(17,6);
// printf("MEJOR ALUMNO DEL CURSO...................[3]\n");
gotoxy(17,7);
printf("PROMEDIO DEL CURSO.......................[4]\n");
gotoxy(17,8);
printf("SALIDA DEL PROGRAMA......................[5]\n\n");
gotoxy(17,14);
printf("DIGITE OPCION DESEADA: ");
scanf("%d",&Opc);
clrscr();
switch(Opc){
case 1:
if(sw==0){
sw=1;
gotoxy(2,3);
do{
printf("DIGITE CANTIDAD DE ESTUDIANTES: ");
scanf("%d",&n);
}while(n<=0 || n>60);
//LECTURA Y ASIGNACION A CADA REGISTRO
for(i=0;i<n;i++){
clrscr();
gotoxy(27,2);
printf("DATOS DE LOS ESTUDIANTES\n\n");
printf("DIGITE NOMBRE DEL ESTUDIANTE: ");
cin.getline(Nom,40);
printf("DIGITE CODIGO: ");
scanf("%d",&Cod);
do{
printf("DIGITE PRIMERA NOTA: ");
scanf("%f",&P1);
}while(P1<0 || P1>5);
do{
printf("DIGITE SEGUNDA NOTA: ");
scanf("%f",&P2);
}while(P2<0 || P2>5);
do{
printf("DIGITE TERCERA NOTA: ");
scanf("%f",&P3);
}while(P3<0 || P3>5);
Def=((P1*0.35)+(P2*0.35)+(P3*0.30));
PromTotal+=Def/n;
//ASIGNACION USANDO APUNTADOR
lon=strlen(Nom);
//ASIGNACION DE UNA VARIABLE STRING
for(j=0;j<=lon;j++){
AptEst->Alum[j]=Nom[j];
}
AptEst->Codigo=Cod;
AptEst->N1=P1;
AptEst->N2=P2;
AptEst->N3=P3;
AptEst->Prom=Def;
AptEst->PromCurso=PromTotal;
AptEst++;
}
printf("\n\n");
printf("PRESIONE UNA TECLA PARA CONTINUAR");
getch();
clrscr();
}
else{
gotoxy(19,10);
printf("REGISTROS YA DEFINIDOS... PRESIONE UNA TECLA");
getch();
clrscr();
}
break;
case 2:
if(sw==1){
gotoxy(24,2);
printf("LISTA DE LOS ESTUDIANTES\n\n");
printf(" CODIGOS NOMBRES Y APELLIDOS Not1 Not2 Not3 Nota.Def\n\n");
AptEst=&Est[0];
j=6;
for(i=0;i<n;i++){
gotoxy(1,j);
printf(" %d %-8s ",AptEst->Codigo,AptEst->Alum);
gotoxy(37,j);
printf("%1.1f %1.1f %1.1f %1.2f\n",AptEst->N1,AptEst->N2,AptEst->N3,AptEst->Prom);
AptEst++;
j++;
}
printf("\n\n");
printf("PRESIONE UNA TECLA PARA CONTINUAR");
getch();
clrscr();
}
else{
marco();
gotoxy(19,10);
printf("REGISTROS NO DEFINIDOS... PRESIONE UNA TECLA ");
getch();
clrscr();
}
break;
/* case 3:
if(sw==1){
gotoxy(26,2);
printf("M E J O R A L U M N O\n\n");
for(i=0;i<n;i++){
MejAlum[i]=Def;
for(pass=0;pass<n;pass++)
for(j=0;j<n-1;j++)
if(MejAlum[j] > MejAlum[j+1]){
temp=MejAlum[j];
MejAlum[j]=MejAlum[j+1];
MejAlum[j+1]=temp;
}
}
printf("PROMEDIO DEL MEJOR ALUMNO ES: %1.2f",MejAlum[j+1]);
printf("\n\n");
printf("PRESIONE UNA TECLA PARA CONTINUAR");
getch();
clrscr();
}
else{
gotoxy(19,10);
printf("REGISTROS NO DEFINIDOS... PRESIONE UNA TECLA");
getch();
clrscr();
}
break;*/
case 4:
if(sw==1){
AptEst=&Est[0];
for(i=0;i<n;i++){
gotoxy(1,3);
printf("EL PROMEDIO DEL CURSO ES: %1.2f",AptEst->PromCurso);
AptEst++;
}
printf("\n\n");
printf("PRESIONE UNA TECLA PARA CONTINUAR");
getch();
clrscr();
}
else{
gotoxy(19,10);
printf("REGISTROS NO DEFINIDOS... PRESIONE UNA TECLA");
getch();
clrscr();
}
break;
default:
break;
}
}while(Opc!=5);
gotoxy(30,10);
printf("FIN DEL PROGRAMA");
}
int main(void)
{
char n;
int x=10,y=10;
clrscr();
textbackground(0);
ipn();
Sleep(600);
voca3();
Sleep(1000);
marco();
textcolor(10);
Sleep(200);
textbackground(0);
gotoxy(10,11);
printf("Altas");
Sleep(200);
gotoxy(10,12);
textbackground(0);
printf("Bajas");
Sleep(200);
gotoxy(10,13);
textbackground(0);
printf("Modificaciones");
Sleep(200);
textbackground(0);
gotoxy(10,14);
printf("Consultas");
Sleep(200);
gotoxy(10,15);
textbackground(0);
printf("Reportes");
Sleep(200);
gotoxy(10,16);
textbackground(0);
printf("Salir");
Sleep(500);
about();
do
{
n = tolower(getch());
switch(n)
{
case 'w':
if(y<=16 && y>=12)
{
y=y-1;
menu(&x,&y);
about();
}
else
{
Beep(9000,300);
if(y==12)
{
y=9;
menu(&x,&y);
about();
}
}
break;
case 's':
if(y<=15 && y>=10)
{
y=y+1;
menu(&x,&y);
about();
}
else
{
y=16;
Beep(9000,300);
menu(&x,&y);
about();
}
break;
case enter:
if(y==11)
{
daralta();
}
if(y==12)
{
darbaja();
}
if(y==13)
{
modificaciones();
}
if(y==14)
{
consultas();
}
if(y==15)
{
reportes();
}
if(y==16)
{
salir();
}
break;
}
}
while(n !='v');
}