|
Реферат: Электронная картотека (Компьютеры)
Текст программы:
#include
#include
#include
#include
#include
struct PL //Задание структурных переменных
{
char namepl[18];
int year;
char people[15];
unsigned int sputnik;
PL *prev;
PL *next;
};
void menu1() //Функция главного меню
{
clrscr();
printf("nt?------------------------------------------------------------
?n");
printf( "t| |
");
puts( "nt| К А Р Т О Т Е К А П Л А Н Е Т
|n");
" t |tt С О Л Н Е Ч Н О Й С И С Т Е М Ы |
");
puts( "t?------------------------------------------------------------?
");
puts("ntt Главное меню :n");
puts("tt 1- Рекомендации пользователю.");
puts("tt 2- Ввод данных.");
puts("tt 3- Вывод всех данных.");
puts("tt 4- Просмотр, удаление, добавление.");
puts("tt 5- Вывод данных по определенному признаку.");
puts("tt 6- Сортировка.");
puts("tt 7- Выход.");
}
void menu2() //Меню поиска элементов
{
puts("nnnnttt Меню поиска:n");
puts("ttt 1- Вывод по названию планеты.");
puts("ttt 2- Вывод по году открытия.");
puts("nnnnnnnnnnnnnnnt Для выхода в главное меню
нажмите любую клавишу.");
}
void sovet(char *s) //Функция подсказки
{
window(1,25,79,25);
textcolor(GREEN+BLUE);
textbackground(WHITE+YELLOW);
clrscr();
cprintf(" %s",s);
textcolor(10);
window(1,1,79,25);
textbackground(0);
}
void vvod(PL *pla) //Функция ввода структуры
{
do
{
clrscr();
puts("Введите имя планеты :");
fflush(stdin);
gets(pla->namepl);
}
while(strlen(pla->namepl)>18);
do
{
puts("Год открытия планеты :");
scanf("%d",&(pla->year));
}
while((pla->year)year)>30000);
do
{
puts("Кто открыл планету :");
fflush(stdin);
gets(pla->people);
}
while(strlen(pla->people)>15);
do
{
puts("Сколько спутников ?");
scanf("%d",&(pla->sputnik));
}
while(((pla->sputnik)sputnik)>999));
}
PL* vvodall() //Функция ввода структур
{
PL *playn, *pla;
clrscr();
sovet("Введите параметры планеты");
pla=(PL*)malloc(sizeof(PL));
vvod(pla);
playn=pla;
pla->next=NULL;
sovet("Для дальнейщего ввода нажми y, иначе любую клавишу.");
while (getch()=='y')
{
clrscr();
sovet("Введите параметры планеты");
pla=(PL*)malloc(sizeof(PL));
vvod(pla);
playn->prev=pla;
pla->next=playn;
playn=pla;
sovet("Для дальнейщего ввода нажми y, иначе любую клавишу.");
}
pla->prev=NULL;
while (pla->next)
pla=pla->next;
return(pla);
}
void vivodall(PL *pla) //Функция вывода на экран всех структур
{
int i=1;
puts("nttt В С Я К А Р Т О Т Е К Аn");
printf("+------+-----------------+------------+---------------+-----------
+n");
printf("| Номер| Название | Когда | Кто открыл | Кол-во
|n");
printf("| стр. | планеты | открыли | планету | спутников
|n");
printf("+------+-----------------+------------+---------------+-----------
+n");
printf("+------+-----------------+------------+---------------+-----------
+n");
while (pla->prev)
{
printf("| %5d | %18s | %12u | %15s | %11u | ",i,pla->namepl,
pla->year,pla->people,pla->sputnik);
pla=pla->prev; i++;
}
printf("| %5d | %18s | %12u | %15s | %11u | ",i,pla->namepl,
pla->year,pla->people,pla->sputnik);
printf("+------+-----------------+------------+---------------+-----------
+");
gotoxy(22,24);
puts("Вывод закончен, нажмите любую клавишу.");
getch();
}
void spisok(PL* pla) //Функция для работы со списком
{
clrscr();
window(17,2,62,15);
textbackground(4);
textcolor(15);
clrscr();
if (pla!=NULL)
{
cprintf("n");
cprintf("%30s","ПАРАМЕТРЫ ПЛАНЕТnn");
gotoxy(1,wherey()+2);
cprintf(" Название: %s",pla->namepl);
gotoxy(1,wherey()+2);
cprintf(" Год открытия: %d",pla->year);
gotoxy(1,wherey()+2);
cprintf(" Кто открыл: %s",pla->people);
gotoxy(1,wherey()+2);
cprintf(" Сколько спутников: %d",pla->sputnik);
}
textbackground(2);
sovet("Cледующая/Предыдущая планета(PgDn/PgUp)"
"Удаление(Del)""Добавление(Ins)""Выход(Esc)");
}
PL* vvodspisok(PL* pla) //Функция ввода элементов списка
{
PL* plr=pla;
char c;
sovet("Добавить элемент до / после текущего(Home/End)"
"Отмена(Esc)");
do
{
c=getch();
/*Esc*/ if (c==27) return(pla);
if (c==71||c==79)
{
clrscr();
sovet("Введите параметры планеты");
plr=(PL*)malloc(sizeof(PL));
vvod(plr);
if (pla==NULL)
{
plr->next=NULL;
plr->prev=NULL;
return(plr);
}
/*End*/ if (c==79)
{
plr->next=pla->next;
plr->prev=pla;
pla->next=plr;
(plr->next)->prev=plr;
}
/*Home*/if (c==71)
{
plr->next=pla;
plr->prev=pla->prev;
pla->prev=plr;
(plr->prev)->next=plr;
}
return(plr);
}
}
while(1);
}
PL* vozvr(PL* pla) //Возвращает указатель
{ //на начало списка pla
if (pla==NULL)
return(pla);
while(pla->next!=NULL)
pla=pla->next;
return(pla);
}
PL* korrekt(PL *pla) //Управляющие клавиши при работе со списком
{
spisok(pla);
PL* delit(PL*);
do
{
switch(getch())
{
/*PgUp*/ case 73:if(pla!=NULL)
{
if(pla->prev!=NULL)pla=pla->prev;spisok(pla);
}
break;
/*PgDn*/ case 81:if(pla!=NULL)
{
if(pla->next!=NULL)pla=pla->next;spisok(pla);
}
break;
/*Del*/ case 83:if(pla!=NULL)
{
pla=delit(pla);
spisok(pla);
}
break;
/*Ins*/ case 82:pla=vvodspisok(pla); spisok(pla); break;
/*Esc*/ case 27:pla=vozvr(pla); return(pla);
}
}
while(1);
}
PL* delit(PL* pla) //Функция удаления элементов из списка
{
PL* plr=NULL;
if(pla->prev!=NULL)
{
(pla->prev)->next=pla->next;
plr=pla->prev;
}
if(pla->next!=NULL)
{
(pla->next)->prev=pla->prev;
plr=pla->next;
}
free(pla);
return(plr);
}
void poisk1(PL *pla) //Функция поиска по названиям планет
{
char s[15],ch;
do
{
int i=1,l=0;
clrscr();
fflush(stdin);
puts("Введите интерессующее вас название планеты :");
gets(s);
printf("nn Планеты с названием %s :n",s);
printf("+------+-----------------+------------+---------------+---------
--+n");
printf("|Номер | Название | Когда | Кто открыл | Кол-во
|n");
printf("| стр. | планеты | открыли | планету | спутников
|n");
printf("+------+-----------------+------------+---------------+-----------
+n");
printf("+------+-----------------+------------+---------------+-----------
+n");
while (pla->prev)
{
if(strcmpi(pla->namepl,s)==0)
{
printf("| %5d | %18s | %12u | %15s | %11u | ",i,pla->namepl,
pla->year,pla->people,pla->sputnik);
l++;i++;
}
pla=pla->prev;
}
if (strcmpi(pla->namepl,s)==0)
{
printf("| %5d | %18s | %12u | %15s | %11u | ",i,pla->namepl,
pla->year,pla->people,pla->sputnik);
l++;i++; }
puts("+------+-----------------+------------+-----------------+-------------
+");
printf("n Найдено %d планет.n",l);
puts(" Поиск по названиям планет завершен. Продолжить?(y- да)");
fflush(stdin);
ch=getch();
}
while(ch=='y');
}
void poisk2(PL *pla) //Функция поиска по годам открытия
{
char ch;
do
{
int i=1,l=0,a,b;
clrscr();
fflush(stdin);
puts("Введите интерессующее вас границы поиска (от чего- то до чего-
то) :");
while(scanf("%d%d",&a,&b)!=2)
{
while (getchar()!='n');
printf("Все- таки стоит здесь что- нибудь ввестиn(от a до b)n");
}
printf("nn Планеты открытые в таком диапозоне(с %d до %d
года):n",a,b);
printf("+------+-----------------+------------+---------------+-----------
+n");
printf("|Номер | Название | Когда | Кто открыл | Кол-во
|n");
printf("| стр. | планеты | открыли | планету | спутников
|n");
printf("+------+-----------------+------------+---------------+-----------
+n");
printf("+------+-----------------+------------+---------------+-----------
+n");
while(pla->prev)
{
if((ayear)&&(b>=pla->year))
{
printf("| %5d | %18s | %12u | %15s | %11u | ",i,pla->namepl,
pla->year,pla->people,pla->sputnik);
l++;i++;
}
pla=pla->prev;
}
if((ayear)&&(b>=pla->year))
{
printf("| %5d | %18s | %12u | %15s | %11u | ",i,pla->namepl,
pla->year,pla->people,pla->sputnik);
l++;i++;
}
puts("+------+-----------------+------------+---------------+-----------
+");
printf("n Найдено %d планет.n",l);
puts(" Поиск по годам открытия планет завершен. Продолжить?(y- да)");
fflush(stdin);
ch=getch();
}
while(ch=='y');
}
void klear(PL* pla) //Функция очистки памяти
{
PL *plr;
if (pla)
{
if (pla->prev)
{
plr=pla->prev;
while (plr->prev)
{
free(plr->next);
plr=plr->prev;
}
}
else
plr=pla;
free(plr);
}
}
char * fname() //Функция ввода имени файла
{
char *t;
t=(char *)malloc(80*sizeof(char));
cprintf("Введите имя файла: n");
fflush(stdin);
scanf("%79s",t);
return t;
}
int save1(PL *pla,char *filename) //Функция, сохраняющая данные
{
FILE *fp;
if((fp=fopen(filename,"w"))==NULL) return 0;
while(pla)
{
fprintf(fp,"%s %d %s %d |",
pla->namepl,pla->year,pla->people,pla->sputnik);
pla=pla->prev;
}
fclose(fp);
return 1;
}
int save(PL *pla) //Функция для сохранения данных
{
char * name;
window(1,1,79,25);
clrscr();
name=fname();
if (save1(pla,name)==1) return 1;
cprintf("nНевозможно произвести запись!!!");
sovet("Ошибка!!! Нажмите любую кнопку");
getch();
return 0;
}
PL *load(PL *pla) //Функция загрузки данных из файла
{
char c,*name;
int i;
PL *plan=NULL,*plane=NULL;
FILE *fp;
window(1,1,79,25);
clrscr();
name=fname();
cprintf("Осуществлять чтение? (y-Да , n-Нет)n");
do
c=getch();
while((c!='y')&&(c!='n'));
if (c=='n') return (pla);
if((fp=fopen(name,"rt"))==NULL)
{
klear(pla);
cprintf("nОшибка при открытии файла!!!");
sovet("Ошибка!!! Нажмите любую кнопку");
getch();
return (NULL);
}
plane=(PL*)malloc(sizeof(PL));
while (fscanf(fp,"%s %d %s %d |",
plane->namepl,&(plane->year),plane->people,&(plane->sputnik))==4)
{
plane->prev=NULL;
plane->next=plan;
if (plan!=NULL) plan->prev=plane;
plan=plane;
plane=(PL*)malloc(sizeof(PL));
}
free(plane);
if (plan!=NULL)
{
while(plan->next)
plan=plan->next;
}
fclose(fp);
klear(pla);
return (plan);
}
/*Функция сортировки по алфавиту*/
PL *sort(PL *pla)
{
PL *point,*tmp=NULL,*f,*s;
int i,j,srav;
//Указатель на начало
f=pla;
point=pla;
while(f!=NULL)
{
s=f->next;
while(s!=NULL)
{
if((strcmp(f->namepl,s->namepl)>0))
{ tmp=(PL*)malloc(sizeof(PL));
strcpy(tmp->namepl,f->namepl);
tmp->year=f->year;
strcpy(tmp->people,f->people);
tmp->sputnik,f->sputnik;
//
strcpy(f->namepl,s->namepl);
f->year=s->year;
strcpy(f->people,s->people);
f->sputnik=s->sputnik;
//
strcpy(s->namepl,tmp->namepl);
s->year=tmp->year;
strcpy(s->people,tmp->people);
s->sputnik=tmp->sputnik;
free(tmp);
}
s=s->next;
}
strcpy(point->namepl,f->namepl);
point->year=f->year;
strcpy(point->people,f->people);
point->sputnik=f->sputnik;
point=point->next;
f=f->next;
}
point=pla;
return(point);
}
void main()
{
char ccc,hhh,ch;
int i;
PL* planet=NULL;
planet->prev=planet->next=NULL;
_setcursortype(_NOCURSOR);
textcolor(10);
menu1();
do
{
do
{
fflush(stdin);
switch(ccc=getch())
{
case '1':
{
clrscr();
printf("ttt Рекомендации пользователю :nn"
"Эта программа- это подобие электронной базы
данных. Программа работает, "
"nиспользуя массивы в памяти ЭВМ для хранения информации
введенной пользователем."
"nДанные могут вводиться с клавиатуры или загружаться из
файла."
"Также можно вывестина экран всю картотеку или же
просматривать картотеку по карточкам,"
" с возмож- ностью добавления или удаления некоторых
карточек по выбору."
" Программа имеет хороший интерфейс и показывает
устойчивую работу."
" В программе имеется поиск элементов по заданным
условиям, а также сортировка планет по названиям."
" В программе есть главное меню и подменю для поиска
планет по некоторым признакам."
" Желательно, чтобы данные были точные, корректно
записанные и касающиеся"
"n непосредственно темы данной лабораторной
работы.");
puts("nnnnnttДля перехода в главное меню нажмите
любую клавишу...");
getch();
menu1();
break;
}
case '2':
{
free(planet);
planet=NULL;
planet->prev=planet->next=NULL;
clrscr();
puts("Это новая база данных?(да-y/ нет-n) ");
do
{
fflush(stdin);scanf ("%c", &ch);
printf ("tВведите символ(да- y / нет- n) ");
}
while (ch!='n' && ch!='y'&& ch!='Y'&& ch!='N');
if (ch=='y'|| ch=='Y')
{
clrscr();
planet=vvodall();
clrscr();
puts("nnЗаписать в файл (да-y/нет-n)?");
do
{
fflush(stdin);
scanf ("%c", &ch);
printf ("Введите символ(да- y / нет- n)n ");
}
while (ch!='n' && ch!='y'&& ch!='Y'&& ch!='N');
if (ch=='Y'|| ch=='y')
{
save(planet);
puts("nnnnntt Запись данных
закончена! Нажмите любую клавишу.");
getch();
}
}
else
planet=load(planet);
menu1();
continue;
}
case '3':
{
if(planet!=NULL)
{
clrscr();
vivodall(planet);
menu1();
continue;
}
break;
}
case '4':
{
free(planet);
planet=korrekt(planet);
menu1();
break;
}
case '5':
{
if(planet!=NULL)
{
clrscr();
menu2();
switch(hhh=getch())
{
case '1':
{
poisk1(planet);
menu1();
continue;
}
case '2':
{
poisk2(planet);
menu1();
continue;
}
default : menu1();
}
menu1();
continue;
}
break;
}
case '6':
{
if(planet!=NULL)
{
clrscr();
i=5;
puts("nnnntt Идет сортировка по названию
планеты.");
while(i | |
