Линейные списки на Си, Сортировка и подсчет по условию Опции

[Gera]

Для заданного варианта представления линейного списка составить и отладить программу, которая выполняет по выбору: первоначальное формирование списка, включение элемента в список, удаление элемента из списка, сортировку списка по заданному полю, печать списка и решение дополнительной задачи. Двунаправленный кольцевой список. Упорядочить список поездов в порядке убывания их номеров. Подсчитать количество поездов, отправляющихся до заданного пункта назначения. Список содержит сведения об отправлении поездов дальнего следования на железнодорожном вокзале (номер поезда, станция назначения, время отправления).
Вот текст получившейся у меня программы:

#include <stdio.h>		  /* podkluchenie bibliotek*/
#include <string.h>
#include <conio.h>
#include <alloc.h>
#include <dos.h>
#define LIST struct list
LIST
 {
	int Nomer;								/*nomer poezda*/
	char Stanc[25];		   /*stanciya naznacheniya*/
	float Vremya;			 /*vremya otpravleniya*/
	LIST *next, *pred;			  /*ykazateli na sledyushii i predudyshii elementu*/
 };
LIST *ptr_Beg;
void Insert_List(char Stc[],int Nmr,float Vrm)			   /*dobavlenie novogo elementa*/
 {
	LIST *ptrX,*ptr_Ls;
	ptrX = (LIST *) malloc(sizeof(LIST));
	strcpy(ptrX->Stanc,Stc);
	ptrX->Nomer=Nmr;
	ptrX->Vremya=Vrm;
	ptr_Ls=ptr_Beg;
	while (ptr_Ls->next != ptr_Beg)
	 {
		if(ptr_Ls->next->Nomer<Nmr)
		break;
		ptr_Ls=ptr_Ls->next;
	 }
	ptrX->next=ptr_Ls->next;
	ptrX->pred=ptr_Ls;
	ptr_Ls->next->pred=ptrX;
	ptr_Ls->next=ptrX;
	return;
 };
void Del_List (int Nmr) 			/*ydalenie elementa*/
 {
	LIST *ptr,*ptr_Ls;
	ptr=ptr_Beg->next;
	ptr_Ls=ptr_Beg;
	while (ptr != ptr_Beg) {
		if(ptr->Nomer >= Nmr)
		ptr_Ls->next=ptr->next;
		ptr_Ls=ptr;
		 ptr=ptr->next;
		}
	return;
 };
void Change(LIST *a,LIST *b) 			/*obmen mestami elementov*/
 {
	a->next=b->next;
	a->pred->next=b;
	b->next->pred=a;
	b->next=a;
	b->pred=a->pred;
	a->pred=b;
 };
void Sortirovka()				/*sortirovka spiska po nomery poezdov*/
 {
	LIST *ptr,*ptr_Ls;
	ptr= (LIST *) malloc(sizeof(LIST));
	ptr_Ls= (LIST *) malloc(sizeof(LIST));
	ptr_Ls=ptr_Beg->next;
	while (ptr_Ls != ptr_Beg) {
		ptr=ptr_Beg;
		while (ptr->next->next != ptr_Beg) {
			if(ptr->next->Nomer < ptr->next->next->Nomer)
				Change(ptr->next,ptr->next->next);
			ptr=ptr->next;
			}
		ptr_Ls=ptr_Ls->next;
	}
 return;
 };
void Print_List()								  /*pechat spiska*/
 {
	LIST *ptr_Ls;
	ptr_Ls=ptr_Beg;
	while (ptr_Ls->next != ptr_Beg) {
		ptr_Ls=ptr_Ls->next;
		printf("   %-15s%-12d%-4.2f\n", ptr_Ls->Stanc, ptr_Ls->Nomer, ptr_Ls->Vremya);
	 }
	return;
 };
void Pynkt_List (char *Stc)	 	/*podschet kolichestva poezdov do opredelennogo goroda*/
 {
	int Count=0;
	LIST *ptr_Ls;
	ptr_Ls=ptr_Beg->next;
	while (ptr_Ls != ptr_Beg) {
		if(ptr_Ls->Stanc == Stc)
		 Count++;
		 ptr_Ls=ptr_Ls->next;
	 }
	return;
 };
main()					  /*osnovnaya programma*/
 {
	char c,Stc[25];
	int Count,Nmr;
	float Vrm;
	LIST *ptr,*ptrX,*ptr_Ls;
 /*inicializaciya spiska*/
	ptr_Beg = (LIST *)malloc(sizeof(LIST));
	clrscr();
	do {					  /*vuvod na ekran menu*/
	 window(41,1,80,8);
	 gotoxy(1,1);puts("1.Formirovanie spiska");
	 gotoxy(1,2);puts("2.Vkluchenie elementa v spisok");
	 gotoxy(1,3);puts("3.Ydalenie elementa iz spiska");
	 gotoxy(1,4);puts("4.Nahojdenie kol-va poezdov do pynkta");
	 gotoxy(1,5);puts("5.Pechat' spiska");
	 gotoxy(1,6);puts("6.Vuhod");
		c = getch();			  /*ojidanie najatiya klavishi*/
		window(1,1,40,25);
		clrscr();
		switch© {			 /*vubor punkta menu*/
			case '1': {		   /*formirovanie spiska*/
				ptr=ptr_Beg;
				while(1) {
					printf("Vvedite pynkt naznacheniya: ");
					scanf("%s",Stc);
					if(strcmp(Stc,"*")==0) {
						ptr->next = ptr_Beg; break;
					 }
					printf("Vvedite nomer poezda: ");
					scanf("%d",&Nmr);
					printf("Vvedite vremya otpravleniya: ");
					scanf("%f",&Vrm);
					ptrX=(LIST *) malloc(sizeof(LIST));
					strcpy(ptrX->Stanc,Stc);
					ptrX->Nomer=Nmr;
					ptrX->Vremya=Vrm;
					ptr->next=ptrX;
					ptr=ptrX;
				 }
				Sortirovka();
				break;
			 }
			case '2': {
				printf("Vvedite pynkt nazn-ya, nomer i vremya: \n");
				scanf("%s%d%f",Stc,&Nmr,&Vrm);
				Insert_List(Stc,Nmr,Vrm);
				break;
			 }
			case '3': {		   /*ydalenie elementa iz spiska*/
				Del_List(300); break;
			 }
			case '4': {
				printf("Vvedite pynkt naznacheniya");
				scanf("%s",Stc);
				Pynkt_List(Stc);
				printf("Kol-vo poezdov do pynkta nazn-ya = %d\n",Count);
				break;
			 }
			case '5': {		   /*pechat' vseh elementov spiska*/
				printf("Pynkt nazn-ya Nomer p-da Vremya otpr-ya \n");
				Print_List();
				break;
			 }
			case '6': {		   /*vuhod*/
				break;
			 }
		 }
	 } while(c>'0' && c<'6');
 }

Проблем у меня несколько: формируется, печатается и добавляется все вроде нормально, а вот удаляется по заданному условию по очень странному алгоритму: когда я первый раз вызываю функцию удаления, то удаляются все элементы, кроме самого близкого к 300 (см.условие), а потом ещё раз вызываю функцию удаления и тот элемент тоже удаляется; что касается сортировки и поиска с подсчетом по условию, тут вообще беда - ничего не выходит.
Пожалуйста, помогите разобраться с этими проблемами, я уже столько раз пыталась что-то переделать...

[volvo]

Gera, смотри:
 LIST_2.CPP ( 5.58 килобайт ) Кол-во скачиваний: 392


Что изменилось?

1. Добавлено меню (шестым пунктом) сортировка, выход перенесен на №7
2. Подкорректирована функция Insert_List, теперь она отражает тот факт, что список двухсвязный, то есть заполняется и поле prev.
3. Как вызывать вставку перед/после определенного элемента. Я сделал так: просишь ввести число, идентифицирующее позицию, в которой стоит элемент, относительно которого будет производиться вставка. Причем, если введено число отрицательное - то элемент будет вставлен перед указанным, а если положительное - то после него. То есть, если у меня уже есть список:

moscow 123 12.05
moscow 114 14.10

, и я введу "-2" или "1" (число с плюсом, то есть положительное), то элемент добавится перед вторым (соответственно, после первого):

moscow 123 12.05
new_elem 345 12.20
moscow 114 14.10

, а если "2" - то после второго:

moscow 123 12.05
moscow 114 14.10
new_elem 345 12.20

Детально не тестировал, только на списке из трех элементов пару раз прогнал - вроде работает... Будут замечены баги - говори, исправим...