fork download

copy

#include<graphics.h>
#include<dos.h>
#include<stdlib.h>
#include<iostream.h>
#include<conio.h>
#include<string.h>
#include<process.h>
#include<fstream.h>
#include<dir.h>
#include<stdio.h>
 
#define xy(z) (8*(z-1))
 
// GLOBAL Funcions
 
void grap();
void intro();
void box();
void mainwindow();
void faculty();
void student();
void enterdata();
void personaldetial();
void admindetails(char *name);
void seeyearfaculty();
void fullaccessfaculty();
void modifyfaculty();
void deletefaculty();
void prin();
void enterdatast();
void personalst();
void academic(char *name);
void seetotalst();
void fullaccessst();
void modifyst();
void deletest();
void encrypt(char *name);
void closeprog();
void quit();
void typeme(int left,int top,const char *word,int interval);
 
// GLOBAL Variables
 
 
int option,pass,i,access,x,y,status;
 
char year[10],ch,name[100],temp[200],newfile[100],a[50],mod;
 
void *p;
 
size_t area;
 
void main()
{
	grap();
	a:clearviewport();
	  i=0;
 
rectangle(getmaxx()/2-140,getmaxy()/2-20,getmaxx()/2+135,getmaxy()/2+4);
	  outtextxy(getmaxx()/2-127,getmaxy()/2-12,"Enter Accesscode:");
	  gotoxy(43,15);
 
 
//Password Code
 
 
do
{
	pass=getch();
	if(pass==13) goto b;
	a[i]=char(pass);
	cout<<"*";
	sound(500);delay(100);nosound();
	i++;
}while(pass!=13);
 
b:a[i]=0;
  access=stricmp(a,"nopassword");
 
  if(access==0)
  {
	  cout<<"
 Access Granted ..
Press Any Key To Continue.......";
	  intro();
	  textcolor(BLACK);
	  textbackground(YELLOW);
	  mainwindow();
  }
 
  else
  {
	  clearviewport();
	  cout<<"
Unautorised Access ";
	  cout<<"
Press Any Key To Continue......... ";
	  getch();
	  goto a;
  }
}
 
// INTRODUCTION SCREEN
 
void intro()
{
	int a,b,c,d;
	setfillstyle(8,1);
 
for(a=0,b=getmaxx(),c=getmaxx()/2,d=getmaxx()/2;a<getmaxx()/2+3;a+=5,b-=5,
c-=5,d+=5)
 
	{
		line(c,xy(8),d,xy(8));line(c,xy(51),d,xy(51));
		bar(0,xy(9),a,xy(50));bar(b,xy(9),getmaxx(),xy(50));
		sound(10*(a+250));delay(10);
	}
 
	nosound();
	char pattern[] ={0xfe,0xbc,0xda,0xe4,0xe2,0xc0,0x88,0x00};
	setfillpattern(pattern,1);
	bar(0,0,640,480);
	settextstyle(1,0,5);
	setcolor(10);
	outtextxy(100,140,"INSTITUTE MANAGEMENT");
	outtextxy(250,200,"SYSTEM");
	getch();
	setcolor(0);
 
	for(i=0;i<=320;i++)
	{
		rectangle(0+i,0,640-i,480);
		delay(5);
	}
 
	closegraph();
}
 
 
// DETECTION OF GRAPHICS
 
void grap()
{
	int gd= DETECT, gm, errorcode;
	initgraph(&gd, &gm, "c:\tc\bgi");
	errorcode = graphresult();
 
 
if(errorcode != grOk)
{
	printf("Graphics error: %s
", grapherrormsg(errorcode));
	exit(1);
}
 
}
 
// FUNCTION TO DRAW A BOX
 
void box(void)
{
	int i,x,y;
	gotoxy(11,2);
 
	for(i=1; i<=58; i++)
	{
		putch(196);
	}
 
	gotoxy(11,6);
 
	for(i=1; i<=58; i++)
	{
		putch(196);
	}
 
	gotoxy(68,2);
	putch(191);
	y=3;
 
	for(i=1; i<=21; i++)
	{
		gotoxy(68,y);
		y++;
		putch(179);
	}
 
	gotoxy(68,24);
	putch(217);
	gotoxy(11,24);
 
	for(i=1; i<=57; i++)
	{
		putch(196);
	}
 
	gotoxy(11,24);
	putch(192);
	y=3;
 
	for(i=1; i<=21; i++)
	{
		gotoxy(11,y);
		y++;
		putch(179);
	}
 
	gotoxy(11,2);
	putch(218);
 
}
 
 
// Main Window Function
 
void mainwindow()
{
	clrscr();
	box();
 
	gotoxy(26,4);cout<<"INSTITUTE MANAGEMENT SYSTEM ";
	gotoxy(26,5);cout<<"===========================";
	gotoxy(26,8);cout<<"Choose Your Option .......";
	gotoxy(26,10);cout<<"1. Faculty Informaton ";
	gotoxy(26,12);cout<<"2. Students Information ";
	gotoxy(26,14);cout<<"3. Print Any Information ";
	gotoxy(26,16);cout<<"Press 0 To Exit 
";
	gotoxy(26,18);cout<<"Option -----> ";
 
	cin>>option;
 
	switch(option)
	{
		case 1 : faculty();
			break;
 
			case 2 : student();
				break;
 
				case 3 : prin();
					break;
 
					default : closeprog();
						break;
	};
}
 
 
// FUNCTION FOR SHOWING A MAIN WINDOW OF FACULTY INFORMATION
 
void faculty()
{
	clrscr();
	box();
 
	gotoxy(26,4);cout<<"INSTITUTE MANAGEMENT SYSTEM ";
	gotoxy(26,5);cout<<"===========================";
	gotoxy(26,8);cout<<"Choose You Option........";
	gotoxy(26,10);cout<<"1. Add A New Record ";
	gotoxy(26,12);cout<<"2. See All Faculty's ";
	gotoxy(26,14);cout<<"3. Full Access To Any Faculty Information ";
	gotoxy(26,16);cout<<"4. Modify Any Information ";
	gotoxy(26,18);cout<<"5. Delete Any Information ";
	gotoxy(26,20);cout<<"Press 0 To Exit....... ";
	gotoxy(26,22);cout<<"Option------> ";
 
	cin>>option;
 
	switch(option)
	{
		case 1 : enterdata();
			break;
 
			case 2 : seeyearfaculty();
				break;
 
				case 3 : fullaccessfaculty();
					break;
 
					case 4 : modifyfaculty();
						break;
 
						case 5 : deletefaculty();
							break;
 
							default : closeprog();
								break;
	};
}
 
 
// FUNCTION TO INSERT A DATA OF FACULTY
 
void enterdata()
{
	clrscr();
 
	cout<<"
 
		Enter The Year Which you Want To Add The Data ";
	cout<<"
		============================================= ";
	gets(year);
 
	mkdir("data");
	chdir("data");
	mkdir("faculty");
	chdir("faculty");
	mkdir(year);
	chdir(year);
 
	cout<<"
	    Enter The Faculty Name : ";
	gets(name);
 
	mkdir(name);
	chdir(name);
 
	personaldetial();
	chdir("\");
	mainwindow();
}
 
 
// FUNCTION TO ENTER A PERSONAL DETAILS OF A FACULTY
 
void personaldetial()
{
	cout<<"
 
		      Enter The Personal Details ";
	cout<<"
		      ========================== ";
	cout<<"
 
	Enter The The Name Of A Person : ";
	gets(name);
 
	mkdir(name);
	chdir(name);
 
	strcpy(newfile,"p");
	strcat(newfile,name);
	strcat(newfile,".txt");
	ofstream fout(newfile);
 
	if(!fout)
	{
		clrscr();
		perror("
 
 
 
 
		Cannot Open The File ");
		cout<<"
 
		PRESS ANY KEY TO Return To Main Menu  ";
		getch();
		chdir("\");
		mainwindow();
	}
 
	fout<<"NAME : "<<name;
 
	cout<<"
	Enter The Address : ";
	gets(temp);
 
	fout<<"
ADDRESS :"<<temp;
 
	cout<<"
	Enter Contact No. : ";
	gets(temp);
 
	fout<<"
CONTACT No. :"<<temp;
 
	fout.close();
	encrypt(newfile);
	admindetails(name);
}
 
 
// FUNCTION TO ENTER A ADMINISTRATION DETAILS OF A FACULTY
 
 
void admindetails(char *name)
{
	clrscr();
 
	cout<<"
 
		      Enter The Administration Detials ";
	cout<<"
		      ================================ ";
 
	strcpy(newfile,"a");
	strcat(newfile,name);
	strcat(newfile,".txt");
 
	ofstream foutt(newfile);
 
	if(!foutt)
	{
		clrscr();
		perror("
 
 
 
 
		Cannot Open The File ");
		cout<<"
 
		PRESS ANY KEY TO Return To Main Menu  ";
		getch();
		chdir("\");
		mainwindow();
	}
 
	foutt<<"NAME : "<<name;
 
	cout<<"
 
	Enter Educational Qualification :";
	gets(temp);
 
	foutt<<"
EDUCATIONAL QUALIFICATIONS :"<<temp;
 
	cout<<"
	          Enter The Name Of The Subjects Taught ";
	cout<<"
	          ===================================== ";
 
	foutt<<"
SUBJECTS TAUGHT :";
 
	cout<<"
 
	Subject(s) Taught to First Year: ";
	gets(temp);
 
	foutt<<"
 
	 First Year :"<<temp;
 
	cout<<"
	Type Of Subject (Theory / Practical) :";
	gets(temp);
 
	foutt<<"
	 Type of Subject :"<<temp;
 
	cout<<"
 
	Subject(s) Taught to Second Year: ";
	gets(temp);
 
	foutt<<"
 
	 Second Year :"<<temp;
 
	cout<<"
	Type Of Subject (Theory / Practical) :";
	gets(temp);
 
	foutt<<"
	 Type of Subject :"<<temp;
 
	cout<<"
 
	Subject(s) Taught to Third Year: ";
	gets(temp);
 
	foutt<<"
 
	 Third Year :"<<temp;
 
	cout<<"
	Type Of Subject (Theory / Practical) :";
	gets(temp);
 
	foutt<<"
	 Type of Subject :"<<temp;
 
	cout<<"
	Enter Type of Faculty (Permanent / Visiting)";
	gets(temp);
 
	foutt<<"
TYPE OF FACULTY :"<<temp;
 
	foutt.close();
	encrypt(newfile);
 
}
 
 
// FUNCTION TO ENCRYPT A DATA
 
void encrypt(char *newfile)
{
	ofstream fout("temp.txt");
	ifstream fin(newfile);
 
	while(fin)
	{
		fin.get(ch);
		if(ch==EOF)break;
		mod=~ch;
		fout<<mod;
	}
 
	remove(newfile);
	rename("temp.txt",newfile);
}
 
 
// FUNCTION TO SEE THE TOTAL FACULTY OF A YEAR
 
void seeyearfaculty()
{
	clrscr();
 
	cout<<"
 
	Enter The Year Of Which You Want To See The Faculties 
 
";
	gets(year);
 
	chdir("data");
	chdir("faculty");
	chdir(year);
 
	cout<<"
 
	Enter The Faculty Name 
	";
	gets(name);
 
	chdir(name);
 
	clrscr();
 
	cout<<"
 
";
	cout<<"
 
	  These Are The Teachers Of A Stream 
 
";
 
	system("dir /b /ad /w");
	getch();
	chdir("\");
	mainwindow();
}
 
 
// FUNCTION TO GET FULL ACCESS TO A PARTICULAR DATA
 
void fullaccessfaculty()
{
	clrscr();
 
	chdir("data");
	chdir("faculty");
 
	cout<<"
 
	Enter The Year Of The Faculty : ";
	gets(year);
 
	chdir(year);
 
	cout<<"
 
	Enter The Name Of The Faculty : ";
	gets(name);
 
	chdir(name);
 
	cout<<"
 
	Enter The Name Of A Person : ";
	gets(name);
 
	chdir(name);
 
	cout<<"
	What You Want To See Personal Information Or Admin 
Information
";
	cout<<"
	1. Personal ";
	cout<<"
	2. Adminstration ";
	cout<<"
 
	 Option------> ";
 
	cin>>option;
 
	clrscr();
 
	cout<<"
 
 
";
 
	if(option==1)
	{
		strcpy(newfile,"p");
		strcat(newfile,name);
		strcat(newfile,".txt");
 
		ifstream fin(newfile);
 
		if(!fin)
		{
			clrscr();
			perror("
 
 
 
 
		Cannot Open The File ");
			cout<<"
 
		PRESS ANY KEY TO Return To Main Menu  ";
			getch();
			chdir("\");
			mainwindow();
		}
 
		while(fin.get(ch)!=0)
		{
			mod=~ch;
			cout<<mod;
		}
 
		getch();
		fin.close();
	}
 
	if(option==2)
	{
		strcpy(newfile,"a");
		strcat(newfile,name);
		strcat(newfile,".txt");
 
		ifstream fin(newfile);
 
		if(!fin)
		{
			clrscr();
			perror("
 
 
 
 
		Cannot Open The File ");
			cout<<"
 
		PRESS ANY KEY TO Return To Main Menu  ";
			getch();
			chdir("\");
			mainwindow();
		}
 
		while(fin.get(ch)!=0)
		{
			mod=~ch;
			cout<<mod;
		}
 
		getch();
		fin.close();
	}
 
	chdir("\");
	mainwindow();
}
 
 
// FUNTION TO MODIFY A FACULTY DATA
 
void modifyfaculty()
{
	clrscr();
 
	chdir("data");
	chdir("faculty");
 
	cout<<"
 
	Enter The Year : ";
	gets(year);
 
	chdir(year);
 
	cout<<"
 
	Enter The Name Of A Faculty : ";
	gets(name);
 
	chdir(name);
 
	cout<<"
 
	Enter The Name Of A Person : ";
	gets(name);
 
	status=rmdir(name);
 
	if(status==0)
	{
		personaldetial();
	}
 
	else
	{
		clrscr();
		perror("
 
 
 
 
		Cannot Open The File ");
		cout<<"
 
		PRESS ANY KEY TO Return To Main Menu  ";
		getch();
		chdir("\");
		mainwindow();
	}
 
	chdir("\");
	mainwindow();
}
 
// FUNTION FOR DELETING A FACULTY DATA
 
void deletefaculty()
{
	clrscr();
 
	chdir("data");
	chdir("faculty");
 
	cout<<"
 
	Enter The Year : ";
	gets(year);
 
	chdir(year);
 
	cout<<"
 
 
	Enter The Name Of A Faculty : ";
	gets(name);
 
	chdir(name);
 
	cout<<"
 
	Enter The Name Of A Person : ";
	gets(name);
 
	cout<<"
 
		Are You Sure You Want To Remove It (y/n) : ";
	cin>>ch;
 
	if(ch=='y')
	{
		status=rmdir(name);
 
		if(status==0)
		{
			cout<<"
 
		Record Have Been Removed Succesfully ";
			cout<<"
		Press Any Key To Return To Main Menu ";
			getch();
			chdir("\");
			mainwindow();
		}
 
		else
		{
			clrscr();
			perror("
 
 
 
 
		Cannot Open The File ");
			cout<<"
 
		PRESS ANY KEY TO Return To Main Menu  ";
			getch();
			chdir("\");
			mainwindow();
		}
	}
 
	else
	{
		chdir("\");
		mainwindow();
	}
}
 
 
// FUNCTION FOR PRINTING THE DATA
 
void prin()
{
	clrscr();
 
	cout<<"
Enter The Option ";
	cout<<"
1. Faculty ";
	cout<<"
2. Student ";
	cout<<"
 
 Option------> ";
	cin>>option;
 
	chdir("data");
 
	if(option==1)
	{
		chdir("faculty");
 
		cout<<"
Enter The Year ";
		gets(year);
 
		chdir(year);
 
		cout<<"
Enter The Name Of Faculty ";
		gets(name);
 
		chdir(name);
 
		cout<<"
Want Take A Print Document Of Personal Or Admin Details ";
		cout<<"
1. Personal ";
		cout<<"
2. Adminstration ";
		cout<<"
 
 Option------> ";
 
		cin>>option;
 
		if(option==1)
		{
			strcpy(newfile,"p");
			strcat(newfile,name);
			strcat(newfile,".txt");
 
			ifstream fin;
			fin.open(newfile);
 
			if(!fin)
			{
				clrscr();
				perror("
 
 
 
 
		Cannot Open The File ");
				cout<<"
 
		PRESS ANY KEY TO Return To Main Menu  ";
				getch();
				chdir("\");
				mainwindow();
			}
 
			ofstream fout;
			fout.open("PRN");
 
			if(!fout)
			{
				clrscr();
				perror("
 
 
 
 
		Cannot Open The File ");
				cout<<"
 
		PRESS ANY KEY TO Return To Main Menu  ";
				getch();
				chdir("\");
				mainwindow();
			}
 
			while(fin.get(ch)!=0)
			{
				mod=~ch;
				fout.put(mod);
			}
 
			fout.close();
			fin.close();
		}
 
		if(option==2)
		{
			strcpy(newfile,"a");
			strcat(newfile,name);
			strcat(newfile,".txt");
 
			ifstream fin;
			fin.open(newfile);
 
			if(!fin)
			{
				clrscr();
				perror("
 
 
 
 
		Cannot Open The File ");
				cout<<"
 
		PRESS ANY KEY TO Return To Main Menu  ";
				getch();
				chdir("\");
				mainwindow();
			}
 
			ofstream fout;
			fout.open("PRN");
 
			if(!fin)
			{
				clrscr();
				perror("
 
 
 
 
		Cannot Open The File ");
				cout<<"
 
		PRESS ANY KEY TO Return To Main Menu  ";
				getch();
				chdir("\");
				mainwindow();
			}
 
			while(fin.get(ch)!=0)
			{
				mod=~ch;
				fout.put(mod);
			}
 
			fout.close();
			fin.close();
		}
	}
 
	if(option==2)
	{
		chdir("student");
 
		cout<<"
Enter The Year ";
		gets(year);
 
		chdir(year);
 
		cout<<"
Enter The Name Of Student ";
		gets(name);
 
		chdir(name);
 
		cout<<"
Want Take A Print Document Of Personal Or Admin Details ";
		cout<<"
1. Personal ";
		cout<<"
2. Academic ";
		cout<<"
 
 Option------> ";
 
		cin>>option;
 
		if(option==1)
		{
			strcpy(newfile,"p");
			strcat(newfile,name);
			strcat(newfile,".txt");
 
			ifstream fin;
			fin.open(newfile);
 
			if(!fin)
			{
				clrscr();
				perror("
 
 
 
 
		Cannot Open The File ");
				cout<<"
 
		PRESS ANY KEY TO Return To Main Menu  ";
				getch();
				chdir("\");
				mainwindow();
			}
 
			ofstream fout;
			fout.open("PRN");
 
			if(!fout)
			{
				clrscr();
				perror("
 
 
 
 
		Cannot Open The File ");
				cout<<"
 
		PRESS ANY KEY TO Return To Main Menu  ";
				getch();
				chdir("\");
				mainwindow();
			}
 
			while(fin.get(ch)!=0)
			{
				mod=~ch;
				fout.put(mod);
			}
 
			fout.close();
			fin.close();
		}
 
		if(option==2)
		{
			strcpy(newfile,"a");
			strcat(newfile,name);
			strcat(newfile,".txt");
 
			ifstream fin;
			fin.open(newfile);
 
			if(!fin)
			{
				clrscr();
				perror("
 
 
 
 
		Cannot Open The File ");
				cout<<"
 
		PRESS ANY KEY TO Return To Main Menu  ";
				getch();
				chdir("\");
				mainwindow();
			}
 
			ofstream fout;
			fout.open("PRN");
 
			if(!fout)
			{
				clrscr();
				perror("
 
 
 
 
		Cannot Open The File ");
				cout<<"
 
		PRESS ANY KEY TO Return To Main Menu  ";
				getch();
				chdir("\");
				mainwindow();
			}
 
			while(fin.get(ch)!=0)
			{
				mod=~ch;
				fout.put(mod);
			}
 
			fout.close();
			fin.close();
		}
	}
 
	chdir("\");
	mainwindow();
}
 
 
// FUNCTION FOR SHOWING A MAIN WINDOW OF STUDENT INFORMATION
 
void student()
{
	clrscr();
	box();
 
	gotoxy(26,4);cout<<"INSTITUTE MANAGEMENT SYSTEM ";
	gotoxy(26,5);cout<<"===========================";
	gotoxy(26,8);cout<<"Choose You Option........";
	gotoxy(26,10);cout<<"1. Add A New Student Record ";
	gotoxy(26,12);cout<<"2. See All Students ";
	gotoxy(26,14);cout<<"3. Full Access To Any Student Information ";
	gotoxy(26,16);cout<<"4. Modify Any Information ";
	gotoxy(26,18);cout<<"5. Delete Any Information ";
	gotoxy(26,20);cout<<"Press 0 To Exit....... ";
	gotoxy(26,22);cout<<"Option------> ";
 
	cin>>option;
 
	switch(option)
	{
		case 1 : enterdatast();
			break;
 
			case 2 : seetotalst();
				break;
 
				case 3 : fullaccessst();
					break;
 
					case 4 : modifyst();
						break;
 
						case 5 : deletest();
							break;
 
							default : closeprog();
								break;
	};
}
 
 
// FUNCTION TO ENTER A STUDENT DATA
 
void enterdatast()
{
	clrscr();
 
	cout<<"
 
		Enter The Year Which you Want To Add The Data ";
	cout<<"
		=============================================== ";
	gets(year);
 
	mkdir("data");
	chdir("data");
	mkdir("student");
	chdir("student");
	mkdir(year);
	chdir(year);
 
	personalst();
	chdir("\");
	mainwindow();
}
 
 
// FUNCTION TO ENTER A PERSONAL DETAILS OF A STUDENT
 
void personalst()
{
	cout<<"
 
		    Enter The Personal Details ";
	cout<<"
		    ========================== ";
 
	cout<<"
 
	Enter The The Name Of The Student : ";
	gets(name);
 
	mkdir(name);
	chdir(name);
 
	strcpy(newfile,"p");
	strcat(newfile,name);
	strcat(newfile,".txt");
	ofstream fout(newfile);
 
	if(!fout)
	{
		clrscr();
		perror("
 
 
 
 
		Cannot Open The File ");
		cout<<"
 
		PRESS ANY KEY TO Return To Main Menu  ";
		getch();
		chdir("\");
		mainwindow();
	}
 
	fout<<" NAME : "<<name;
 
	cout<<"
	Fathers Name : ";
	gets(temp);
	fout<<"
 Fathers Name : "<<temp;
 
    cout<<"
	Date Of Birth : ";
	gets(temp);
	fout<<"
 Date Of Birth : "<<temp;
 
    cout<<"
	Contact Number : ";
	gets(temp);
	fout<<"
 Contact Number : "<<temp;
 
    cout<<"
	Address : ";
	gets(temp);
	fout<<"
 ADDRESS :"<<temp;
 
    cout<<"
	Course Name : ";
	gets(temp);
	fout<<"
 Course Name : "<<temp;
 
	fout.close();
	encrypt(newfile);
	academic(name);
}
 
 
// FUNCTION TO ENTER A ACADEMIC DETAILS OF A STUDENT
 
void academic(char *name)
{
	clrscr();
 
	cout<<"
 
		    Enter The Academic Detials ";
	cout<<"
		    ========================== ";
 
	strcpy(newfile,"a");
	strcat(newfile,name);
	strcat(newfile,".txt");
 
	ofstream foutt(newfile);
 
	if(!foutt)
	{
		clrscr();
		perror("
 
 
 
 
		Cannot Open The File ");
		cout<<"
 
		PRESS ANY KEY TO Return To Main Menu  ";
		getch();
		chdir("\");
		mainwindow();
	}
 
	foutt<<" NAME : "<<name;
 
	cout<<"
	Type Of Course (Semster/Annual) : ";
	gets(temp);
	foutt<<"
 Type Of Course (Semester/Annual) : "<<temp;
 
    cout<<"
	Year Of Admission : ";
	gets(temp);
	foutt<<"
 Year Of Admission : "<<temp;
 
    cout<<"
	Admission Number : ";
	gets(temp);
	foutt<<"
 Admission Number : "<<temp;
 
    cout<<"
	Percentage In Intermediate : ";
	gets(temp);
	foutt<<"
 Percentage In Intermediate : "<<temp;
 
    cout<<"
		Percentage In College :";
    foutt<<"
	 Percentage In College : ";
 
    cout<<"
	First Year : ";
	gets(temp);
	foutt<<"
 First Year :"<<temp;
 
    cout<<"
	Second Year : ";
	gets(temp);
	foutt<<"
 Second Year :"<<temp;
 
    cout<<"
	Third Year : ";
	gets(temp);
	foutt<<"
 third Year :"<<temp;
 
	foutt.close();
	encrypt(newfile);
}
 
 
// FUNCTION TO SEE A TOTAL STUDENTS OF A PARTICULAR YEAR
 
void seetotalst()
{
	clrscr();
 
	chdir("data");
	chdir("student");
 
	cout<<"
 
	Enter The Year Of Which You Want To See The Students 
";
	gets(year);
 
	chdir(year);
 
	cout<<"
 
	  These Are The Students 
 
";
 
	system("dir /b /ad /w");
 
	getch();
	chdir("\");
	mainwindow();
}
 
 
// FUNCTION TO SEE ALL DETAILS OF A STUDENT
 
void fullaccessst()
{
	clrscr();
 
	chdir("data");
	chdir("student");
 
	cout<<"
 
	Enter The Year Of The Student : ";
	gets(year);
 
	chdir(year);
 
	cout<<"
 
	Enter The Name Of The Student : ";
	gets(name);
 
	chdir(name);
 
	cout<<"
 
	What You Want To See Personal Information Or Academic
Information ";
	cout<<"
	1. Personal ";
	cout<<"
	2. Academic ";
	cout<<"
 
	 Option------> ";
 
	cin>>option;
 
	clrscr();
 
	cout<<"
 
 
";
 
	if(option==1)
	{
		strcpy(newfile,"p");
		strcat(newfile,name);
		strcat(newfile,".txt");
 
		ifstream fin(newfile);
 
		if(!fin)
		{
			clrscr();
			perror("
 
 
 
 
		Cannot Open The File ");
			cout<<"
 
		PRESS ANY KEY TO Return To Main Menu  ";
			getch();
			chdir("\");
			mainwindow();
		}
 
		while(fin.get(ch)!=0)
		{
			mod=~ch;
			cout<<mod;
		}
 
		getch();
		fin.close();
	}
 
	if(option==2)
	{
		strcpy(newfile,"a");
		strcat(newfile,name);
		strcat(newfile,".txt");
 
		ifstream fin(newfile);
 
		if(!fin)
		{
			clrscr();
			perror("
 
 
 
 
		Cannot Open The File ");
			cout<<"
 
		PRESS ANY KEY TO Return To Main Menu  ";
			getch();
			chdir("\");
			mainwindow();
		}
 
		while(fin.get(ch)!=0)
		{
			mod=~ch;
			cout<<mod;
		}
 
		getch();
		fin.close();
	}
 
	chdir("\");
	mainwindow();
}
 
 
// FUNCTION TO MODIFY DETAILS OF A STUDENT
 
void modifyst()
{
	chdir("data");
	chdir("student");
 
	cout<<"
 
	Enter The Year Of You Want To Change The Information : ";
	gets(year);
 
	chdir(year);
 
	cout<<"
 
	Enter The Name Of A Student : ";
	gets(name);
 
	status=rmdir(name);
 
	if(status==0)
	{
		personalst();
	}
 
	else
	{
		clrscr();
		perror("
 
 
 
 
		Cannot Open The File ");
		cout<<"
 
		PRESS ANY KEY TO Return To Main Menu  ";
		getch();
		chdir("\");
		mainwindow();
	}
 
	chdir("\");
	mainwindow();
}
 
 
// FUNCTION TO DELETE A STUDENT RECORD
 
void deletest()
{
	clrscr();
 
	chdir("data");
	chdir("student");
 
	cout<<"
 
	Enter The Year : ";
	gets(year);
 
	chdir(year);
 
	cout<<"
 
	Enter The Name Of A Student : ";
	gets(name);
 
	cout<<"
 
		Are You Sure You Want To Remove It (y/n) : ";
	cin>>ch;
 
	if(ch=='y')
	{
		status=rmdir(name);
 
		if(status==0)
		{
			cout<<"
 
		Record Have Been Removed Succesfully ";
			cout<<"
		Press Any Key To Return To Main Menu ";
			getch();
			chdir("\");
			mainwindow();
		}
 
		else
		{
			clrscr();
			perror("
 
 
 
 
		Cannot Open The File ");
			cout<<"
 
		PRESS ANY KEY TO Return To Main Menu  ";
			getch();
			chdir("\");
			mainwindow();
		}
	}
 
	else
	{
		chdir("\");
		mainwindow();
	}
}
 
 
// FUNCTION TO CLOSE A PROGRAM
 
void closeprog()
{
	grap();
	setcolor(6);
 
	for(i=0;i<=220;i++)
	{
		rectangle(0+i,0+i,640-i,480-i);
		delay(15);
	}
 
	for(i=0;i<=220;i++)
	{
		rectangle(100+i,100,540-i,380);
		delay(10);
	}
 
	quit();
	closegraph();
	exit(0);
}
 
 
void quit()
{
	int a,b,c;
	setcolor(0);
 
	for(a=1,b=getmaxy()-1,c=200;a<=getmaxy()/2;a++,b--,c--)
	{
		line(1,a,getmaxx()-1,a);
		line(1,b,getmaxx()-1,b);
		sound(10*(c+200));
		delay(1);
	}
 
	delay(300);
	nosound();
	setcolor(4);
 
	typeme(xy(2),xy(20),"DEVELOPED BY: VIVEK AND SAURABH JAIN",30);
	delay(1000);
	setcolor(0);
 
	typeme(xy(2),xy(20),"  DEVELOPED BY : SAURABH JAIN ",30);
	delay(100);
	setcolor(4);
 
	typeme(xy(2),xy(20),"FOR YOUR COMMENTS AND YOUR SUGGESTIONS",30);
	delay(500);
	setcolor(4);
 
	typeme(xy(2),xy(26),"EMAIL ME AT dropurmails_here@yahoo.com",30);
	delay(2000);
}
 
 
void typeme(int left,int top,const char *word,int interval)
{
	char code[2];
	int length=strlen(word);
	for(int i=0;i<=length;i++)
	{
		code[0]=word[i];
		code[1]='

gnatgcc -c -pipe -O2 prog.adb
prog.adb:1:01: illegal character
prog.adb:2:01: illegal character
prog.adb:3:01: illegal character
prog.adb:4:01: illegal character
prog.adb:5:01: illegal character
prog.adb:6:01: illegal character
prog.adb:7:01: illegal character
prog.adb:8:01: illegal character
prog.adb:9:01: illegal character
prog.adb:10:01: illegal character
prog.adb:12:01: illegal character
prog.adb:47:10: illegal character, replaced by "("
prog.adb:54:01: illegal character, replaced by "("
prog.adb:68:01: illegal character, replaced by "("
prog.adb:70:16: == should be =
prog.adb:71:10: illegal character, replaced by "("
prog.adb:75:01: illegal character, replaced by ")"
prog.adb:77:04: illegal character, replaced by "("
prog.adb:80:12: == should be =
prog.adb:81:03: illegal character, replaced by "("
prog.adb:82:18: missing string quote
prog.adb:84:34: missing string quote
prog.adb:89:03: illegal character, replaced by ")"
prog.adb:92:03: illegal character, replaced by "("
prog.adb:94:18: missing string quote
prog.adb:95:21: missing string quote
prog.adb:96:18: missing string quote
prog.adb:97:37: missing string quote
prog.adb:100:03: illegal character, replaced by ")"
prog.adb:101:01: illegal character, replaced by ")"
prog.adb:106:01: illegal character, replaced by "("
prog.adb:113:09: illegal character, replaced by "("
prog.adb:117:09: illegal character, replaced by ")"
prog.adb:120:21: illegal character, replaced by "("
prog.adb:131:09: illegal character, replaced by "("
prog.adb:134:09: illegal character, replaced by ")"
prog.adb:137:01: illegal character, replaced by ")"
prog.adb:143:01: illegal character, replaced by "("
prog.adb:149:14: != should be /=
prog.adb:150:01: illegal character, replaced by "("
prog.adb:151:35: missing string quote
prog.adb:152:28: missing string quote
prog.adb:154:01: illegal character, replaced by ")"
prog.adb:156:01: illegal character, replaced by ")"
prog.adb:158:15: missing "("
prog.adb:160:05: missing ";"
prog.adb:161:01: illegal character, replaced by "("
prog.adb:163:15: missing ","
prog.adb:165:09: reserved word "FOR" cannot be used as identifier
prog.adb:166:09: illegal character, replaced by "("
prog.adb:168:09: illegal character, replaced by ")"
prog.adb:173:09: illegal character, replaced by "("
prog.adb:175:09: illegal character, replaced by ")"
prog.adb:182:09: illegal character, replaced by "("
prog.adb:186:09: illegal character, replaced by ")"
prog.adb:193:09: illegal character, replaced by "("
prog.adb:195:09: illegal character, replaced by ")"
prog.adb:202:09: illegal character, replaced by "("
prog.adb:206:09: illegal character, replaced by ")"
prog.adb:211:01: illegal character, replaced by ")"
prog.adb:217:01: illegal character, replaced by "("
prog.adb:227:45: missing string quote
prog.adb:228:02: missing string quote
prog.adb:234:09: illegal character, replaced by "("
prog.adb:246:09: illegal character, replaced by ")"
prog.adb:247:01: illegal character, replaced by ")"
prog.adb:253:01: illegal character, replaced by "("
prog.adb:271:09: illegal character, replaced by "("
prog.adb:289:09: illegal character, replaced by ")"
prog.adb:290:01: illegal character, replaced by ")"
prog.adb:296:01: illegal character, replaced by "("
prog.adb:299:16: missing string quote
prog.adb:301:64: missing string quote
prog.adb:302:16: missing string quote
prog.adb:303:17: == should be =
prog.adb:313:16: missing string quote
prog.adb:314:39: missing string quote
prog.adb:323:01: illegal character, replaced by ")"
prog.adb:329:01: illegal character, replaced by "("
prog.adb:330:16: missing string quote
prog.adb:332:51: missing string quote
prog.adb:333:16: missing string quote
prog.adb:334:23: == should be =
prog.adb:335:16: missing string quote
prog.adb:337:43: missing string quote
prog.adb:349:09: illegal character, replaced by "("
prog.adb:351:25: missing string quote
prog.adb:356:39: missing string quote
prog.adb:357:24: missing string quote
prog.adb:359:56: missing string quote
prog.adb:363:09: illegal character, replaced by ")"
prog.adb:367:16: missing string quote
prog.adb:368:30: missing string quote
prog.adb:371:16: missing string quote
prog.adb:372:17: missing string quote
prog.adb:374:16: missing string quote
prog.adb:375:30: missing string quote
prog.adb:378:16: missing string quote
prog.adb:379:21: missing string quote
prog.adb:384:01: illegal character, replaced by ")"
prog.adb:391:01: illegal character, replaced by "("
prog.adb:394:16: missing string quote
prog.adb:396:57: missing string quote
prog.adb:397:16: missing string quote
prog.adb:398:23: == should be =
prog.adb:407:09: illegal character, replaced by "("
prog.adb:409:25: missing string quote
prog.adb:414:39: missing string quote
prog.adb:415:24: missing string quote
prog.adb:417:56: missing string quote
prog.adb:421:09: illegal character, replaced by ")"
prog.adb:425:16: missing string quote
prog.adb:427:43: missing string quote
prog.adb:430:17: missing string quote
prog.adb:431:36: missing string quote
prog.adb:433:16: missing string quote
prog.adb:434:58: missing string quote
prog.adb:435:16: missing string quote
prog.adb:436:19: == should be =
prog.adb:438:17: missing string quote
prog.adb:439:19: missing string quote
prog.adb:441:16: missing string quote
prog.adb:443:43: missing string quote
prog.adb:446:17: missing string quote
prog.adb:448:29: missing string quote
prog.adb:450:16: missing string quote
prog.adb:451:48: missing string quote
prog.adb:454:17: missing string quote
prog.adb:455:34: missing string quote
prog.adb:457:16: missing string quote
prog.adb:459:44: missing string quote
prog.adb:462:17: missing string quote
prog.adb:464:30: missing string quote
prog.adb:466:16: missing string quote
prog.adb:467:48: missing string quote
prog.adb:470:17: missing string quote
prog.adb:471:34: missing string quote
prog.adb:473:16: missing string quote
prog.adb:475:43: missing string quote
prog.adb:478:17: missing string quote
prog.adb:480:29: missing string quote
prog.adb:482:16: missing string quote
prog.adb:483:48: missing string quote
prog.adb:486:17: missing string quote
prog.adb:487:34: missing string quote
prog.adb:489:16: missing string quote
prog.adb:490:54: missing string quote
prog.adb:493:17: missing string quote
prog.adb:494:25: missing string quote
prog.adb:499:01: illegal character, replaced by ")"
prog.adb:505:01: illegal character, replaced by "("
prog.adb:510:09: illegal character, replaced by "("
prog.adb:512:22: == should be =
prog.adb:513:21: illegal character
prog.adb:515:09: illegal character, replaced by ")"
prog.adb:519:01: illegal character, replaced by ")"
prog.adb:525:01: illegal character, replaced by "("
prog.adb:528:16: missing string quote
prog.adb:532:02: missing string quote
prog.adb:539:16: missing string quote
prog.adb:542:10: missing string quote
prog.adb:549:16: missing string quote
prog.adb:551:02: missing string quote
prog.adb:552:16: missing string quote
prog.adb:556:02: missing string quote
prog.adb:562:01: illegal character, replaced by ")"
prog.adb:568:01: illegal character, replaced by "("
prog.adb:574:16: missing string quote
prog.adb:576:42: missing string quote
prog.adb:581:16: missing string quote
prog.adb:583:42: missing string quote
prog.adb:588:16: missing string quote
prog.adb:590:39: missing string quote
prog.adb:595:16: missing string quote
prog.adb:598:02: missing string quote
prog.adb:599:16: missing string quote
prog.adb:600:10: real literal cannot end with point
prog.adb:601:16: missing string quote
prog.adb:602:10: real literal cannot end with point
prog.adb:603:16: missing string quote
prog.adb:611:16: missing string quote
prog.adb:614:02: missing string quote
prog.adb:616:18: == should be =
prog.adb:617:09: illegal character, replaced by "("
prog.adb:625:17: illegal character, replaced by "("
prog.adb:627:33: missing string quote
prog.adb:632:39: missing string quote
prog.adb:633:32: missing string quote
prog.adb:635:56: missing string quote
prog.adb:639:17: illegal character, replaced by ")"
prog.adb:641:34: != should be /=
prog.adb:642:17: illegal character, replaced by "("
prog.adb:643:29: illegal character
prog.adb:645:17: illegal character, replaced by ")"
prog.adb:649:09: illegal character, replaced by ")"
prog.adb:651:18: == should be =
prog.adb:652:09: illegal character, replaced by "("
prog.adb:660:17: illegal character, replaced by "("
prog.adb:662:33: missing string quote
prog.adb:667:39: missing string quote
prog.adb:668:32: missing string quote
prog.adb:670:56: missing string quote
prog.adb:674:17: illegal character, replaced by ")"
prog.adb:676:34: != should be /=
prog.adb:677:17: illegal character, replaced by "("
prog.adb:678:29: illegal character
prog.adb:680:17: illegal character, replaced by ")"
prog.adb:684:09: illegal character, replaced by ")"
prog.adb:688:01: illegal character, replaced by ")"
prog.adb:694:01: illegal character, replaced by "("
prog.adb:700:16: missing string quote
prog.adb:702:27: missing string quote
prog.adb:707:16: missing string quote
prog.adb:709:40: missing string quote
prog.adb:714:16: missing string quote
prog.adb:716:39: missing string quote
prog.adb:721:18: == should be =
prog.adb:722:09: illegal character, replaced by "("
prog.adb:724:09: illegal character, replaced by ")"
prog.adb:727:09: illegal character, replaced by "("
prog.adb:729:25: missing string quote
prog.adb:734:39: missing string quote
prog.adb:735:24: missing string quote
prog.adb:737:56: missing string quote
prog.adb:741:09: illegal character, replaced by ")"
prog.adb:745:01: illegal character, replaced by ")"
prog.adb:750:01: illegal character, replaced by "("
prog.adb:756:16: missing string quote
prog.adb:758:27: missing string quote
prog.adb:763:16: missing string quote
prog.adb:766:40: missing string quote
prog.adb:771:16: missing string quote
prog.adb:773:39: missing string quote
prog.adb:776:16: missing string quote
prog.adb:778:61: missing string quote
prog.adb:781:14: == should be =
prog.adb:782:09: illegal character, replaced by "("
prog.adb:785:26: == should be =
prog.adb:786:17: illegal character, replaced by "("
prog.adb:787:32: missing string quote
prog.adb:789:55: missing string quote
prog.adb:790:32: missing string quote
prog.adb:791:55: missing string quote
prog.adb:795:17: illegal character, replaced by ")"
prog.adb:798:17: illegal character, replaced by "("
prog.adb:800:33: missing string quote
prog.adb:805:39: missing string quote
prog.adb:806:32: missing string quote
prog.adb:808:56: missing string quote
prog.adb:812:17: illegal character, replaced by ")"
prog.adb:813:09: illegal character, replaced by ")"
prog.adb:816:09: illegal character, replaced by "("
prog.adb:819:09: illegal character, replaced by ")"
prog.adb:820:01: illegal character, replaced by ")"
prog.adb:826:01: illegal character, replaced by "("
prog.adb:829:16: missing string quote
prog.adb:830:19: missing string quote
prog.adb:831:16: missing string quote
prog.adb:832:02: real literal cannot end with point
prog.adb:833:16: missing string quote
prog.adb:834:02: real literal cannot end with point
prog.adb:835:16: missing string quote
prog.adb:842:18: == should be =
prog.adb:843:09: illegal character, replaced by "("
prog.adb:846:24: missing string quote
prog.adb:847:17: missing string quote
prog.adb:852:24: missing string quote
prog.adb:853:28: missing string quote
prog.adb:858:24: missing string quote
prog.adb:859:58: missing string quote
prog.adb:860:24: missing string quote
prog.adb:861:02: real literal cannot end with point
prog.adb:862:24: missing string quote
prog.adb:863:02: real literal cannot end with point
prog.adb:864:24: missing string quote
prog.adb:870:26: == should be =
prog.adb:871:17: illegal character, replaced by "("
prog.adb:880:25: illegal character, replaced by "("
prog.adb:882:41: missing string quote
prog.adb:887:39: missing string quote
prog.adb:888:40: missing string quote
prog.adb:890:56: missing string quote
prog.adb:894:25: illegal character, replaced by ")"
prog.adb:900:25: illegal character, replaced by "("
prog.adb:902:41: missing string quote
prog.adb:907:39: missing string quote
prog.adb:908:40: missing string quote
prog.adb:910:56: missing string quote
prog.adb:914:25: illegal character, replaced by ")"
prog.adb:916:42: != should be /=
prog.adb:917:25: illegal character, replaced by "("
prog.adb:918:37: illegal character
prog.adb:920:25: illegal character, replaced by ")"
prog.adb:924:17: illegal character, replaced by ")"
prog.adb:926:26: == should be =
prog.adb:927:17: illegal character, replaced by "("
prog.adb:936:25: illegal character, replaced by "("
prog.adb:938:41: missing string quote
prog.adb:943:39: missing string quote
prog.adb:944:40: missing string quote
prog.adb:946:56: missing string quote
prog.adb:950:25: illegal character, replaced by ")"
prog.adb:956:25: illegal character, replaced by "("
prog.adb:958:41: missing string quote
prog.adb:963:39: missing string quote
prog.adb:964:40: missing string quote
prog.adb:966:56: missing string quote
prog.adb:970:25: illegal character, replaced by ")"
prog.adb:972:42: != should be /=
prog.adb:973:25: illegal character, replaced by "("
prog.adb:974:37: illegal character
prog.adb:976:25: illegal character, replaced by ")"
prog.adb:980:17: illegal character, replaced by ")"
prog.adb:981:09: illegal character, replaced by ")"
prog.adb:983:18: == should be =
prog.adb:984:09: illegal character, replaced by "("
prog.adb:987:24: missing string quote
prog.adb:988:17: missing string quote
prog.adb:993:24: missing string quote
prog.adb:994:28: missing string quote
prog.adb:999:24: missing string quote
prog.adb:1000:58: missing string quote
prog.adb:1001:24: missing string quote
prog.adb:1002:02: real literal cannot end with point
prog.adb:1003:24: missing string quote
prog.adb:1004:02: real literal cannot end with point
prog.adb:1005:24: missing string quote
prog.adb:1011:26: == should be =
prog.adb:1012:17: illegal character, replaced by "("
prog.adb:1021:25: illegal character, replaced by "("
prog.adb:1023:41: missing string quote
prog.adb:1028:39: missing string quote
prog.adb:1029:40: missing string quote
prog.adb:1031:56: missing string quote
prog.adb:1035:25: illegal character, replaced by ")"
prog.adb:1041:25: illegal character, replaced by "("
prog.adb:1043:41: missing string quote
prog.adb:1048:39: missing string quote
prog.adb:1049:40: missing string quote
prog.adb:1051:56: missing string quote
prog.adb:1055:25: illegal character, replaced by ")"
prog.adb:1057:42: != should be /=
prog.adb:1058:25: illegal character, replaced by "("
prog.adb:1059:37: illegal character
prog.adb:1061:25: illegal character, replaced by ")"
prog.adb:1065:17: illegal character, replaced by ")"
prog.adb:1067:26: == should be =
prog.adb:1068:17: illegal character, replaced by "("
prog.adb:1077:25: illegal character, replaced by "("
prog.adb:1079:41: missing string quote
prog.adb:1084:39: missing string quote
prog.adb:1085:40: missing string quote
prog.adb:1087:56: missing string quote
prog.adb:1091:25: illegal character, replaced by ")"
prog.adb:1097:25: illegal character, replaced by "("
prog.adb:1099:41: missing string quote
prog.adb:1104:39: missing string quote
prog.adb:1105:40: missing string quote
prog.adb:1107:56: missing string quote
prog.adb:1111:25: illegal character, replaced by ")"
prog.adb:1113:42: != should be /=
prog.adb:1114:25: illegal character, replaced by "("
prog.adb:1115:37: illegal character
prog.adb:1117:25: illegal character, replaced by ")"
prog.adb:1121:17: illegal character, replaced by ")"
prog.adb:1122:09: illegal character, replaced by ")"
prog.adb:1126:01: illegal character, replaced by ")"
prog.adb:1132:01: illegal character, replaced by "("
prog.adb:1150:09: illegal character, replaced by "("
prog.adb:1168:09: illegal character, replaced by ")"
prog.adb:1169:01: illegal character, replaced by ")"
prog.adb:1175:01: illegal character, replaced by "("
prog.adb:1178:16: missing string quote
prog.adb:1180:64: missing string quote
prog.adb:1181:16: missing string quote
prog.adb:1182:17: == should be =
prog.adb:1195:01: illegal character, replaced by ")"
prog.adb:1201:01: illegal character, replaced by "("
prog.adb:1202:16: missing string quote
prog.adb:1204:49: missing string quote
prog.adb:1205:16: missing string quote
prog.adb:1206:21: == should be =
prog.adb:1208:16: missing string quote
prog.adb:1210:46: missing string quote
prog.adb:1222:09: illegal character, replaced by "("
prog.adb:1224:25: missing string quote
prog.adb:1229:39: missing string quote
prog.adb:1230:24: missing string quote
prog.adb:1232:56: missing string quote
prog.adb:1236:09: illegal character, replaced by ")"
prog.adb:1240:16: missing string quote
prog.adb:1241:25: missing string quote
prog.adb:1243:16: missing string quote
prog.adb:1244:24: missing string quote
prog.adb:1246:12: missing string quote
prog.adb:1247:26: missing string quote
prog.adb:1249:16: missing string quote
prog.adb:1250:25: missing string quote
prog.adb:1252:12: missing string quote
prog.adb:1253:27: missing string quote
prog.adb:1255:16: missing string quote
prog.adb:1256:26: missing string quote
prog.adb:1258:12: missing string quote
prog.adb:1259:20: missing string quote
prog.adb:1261:16: missing string quote
prog.adb:1262:18: missing string quote
prog.adb:1264:12: missing string quote
prog.adb:1265:24: missing string quote
prog.adb:1267:16: missing string quote
prog.adb:1268:23: missing string quote
prog.adb:1273:01: illegal character, replaced by ")"
prog.adb:1279:01: illegal character, replaced by "("
prog.adb:1282:16: missing string quote
prog.adb:1284:49: missing string quote
prog.adb:1285:16: missing string quote
prog.adb:1286:21: == should be =
prog.adb:1295:09: illegal character, replaced by "("
prog.adb:1297:25: missing string quote
prog.adb:1302:39: missing string quote
prog.adb:1303:24: missing string quote
prog.adb:1305:56: missing string quote
prog.adb:1309:09: illegal character, replaced by ")"
prog.adb:1313:16: missing string quote
prog.adb:1314:44: missing string quote
prog.adb:1316:17: missing string quote
prog.adb:1317:44: missing string quote
prog.adb:1319:12: missing string quote
prog.adb:1320:30: missing string quote
prog.adb:1322:17: missing string quote
prog.adb:1323:29: missing string quote
prog.adb:1325:12: missing string quote
prog.adb:1326:29: missing string quote
prog.adb:1328:17: missing string quote
prog.adb:1329:28: missing string quote
prog.adb:1331:12: missing string quote
prog.adb:1332:39: missing string quote
prog.adb:1334:17: missing string quote
prog.adb:1335:38: missing string quote
prog.adb:1337:12: missing string quote
prog.adb:1338:41: missing string quote
prog.adb:1339:13: missing string quote
prog.adb:1340:35: missing string quote
prog.adb:1342:12: missing string quote
prog.adb:1343:23: missing string quote
prog.adb:1345:17: missing string quote
prog.adb:1346:21: missing string quote
prog.adb:1348:12: missing string quote
prog.adb:1349:24: missing string quote
prog.adb:1351:17: missing string quote
prog.adb:1352:22: missing string quote
prog.adb:1354:12: missing string quote
prog.adb:1355:23: missing string quote
prog.adb:1357:17: missing string quote
prog.adb:1358:21: missing string quote
prog.adb:1362:01: illegal character, replaced by ")"
prog.adb:1368:01: illegal character, replaced by "("
prog.adb:1374:16: missing string quote
prog.adb:1377:02: missing string quote
prog.adb:1382:16: missing string quote
prog.adb:1386:02: missing string quote
prog.adb:1393:01: illegal character, replaced by ")"
prog.adb:1399:01: illegal character, replaced by "("
prog.adb:1405:16: missing string quote
prog.adb:1407:42: missing string quote
prog.adb:1412:16: missing string quote
prog.adb:1414:42: missing string quote
prog.adb:1419:16: missing string quote
prog.adb:1422:14: missing string quote
prog.adb:1423:16: missing string quote
prog.adb:1424:10: real literal cannot end with point
prog.adb:1425:16: missing string quote
prog.adb:1426:10: real literal cannot end with point
prog.adb:1427:16: missing string quote
prog.adb:1435:16: missing string quote
prog.adb:1438:02: missing string quote
prog.adb:1440:18: == should be =
prog.adb:1441:09: illegal character, replaced by "("
prog.adb:1449:17: illegal character, replaced by "("
prog.adb:1451:33: missing string quote
prog.adb:1456:39: missing string quote
prog.adb:1457:32: missing string quote
prog.adb:1459:56: missing string quote
prog.adb:1463:17: illegal character, replaced by ")"
prog.adb:1465:34: != should be /=
prog.adb:1466:17: illegal character, replaced by "("
prog.adb:1467:29: illegal character
prog.adb:1469:17: illegal character, replaced by ")"
prog.adb:1473:09: illegal character, replaced by ")"
prog.adb:1475:18: == should be =
prog.adb:1476:09: illegal character, replaced by "("
prog.adb:1484:17: illegal character, replaced by "("
prog.adb:1486:33: missing string quote
prog.adb:1491:39: missing string quote
prog.adb:1492:32: missing string quote
prog.adb:1494:56: missing string quote
prog.adb:1498:17: illegal character, replaced by ")"
prog.adb:1500:34: != should be /=
prog.adb:1501:17: illegal character, replaced by "("
prog.adb:1502:29: illegal character
prog.adb:1504:17: illegal character, replaced by ")"
prog.adb:1508:09: illegal character, replaced by ")"
prog.adb:1512:01: illegal character, replaced by ")"
prog.adb:1518:01: illegal character, replaced by "("
prog.adb:1522:16: missing string quote
prog.adb:1524:65: missing string quote
prog.adb:1529:16: missing string quote
prog.adb:1531:40: missing string quote
prog.adb:1536:18: == should be =
prog.adb:1537:09: illegal character, replaced by "("
prog.adb:1539:09: illegal character, replaced by ")"
prog.adb:1542:09: illegal character, replaced by "("
prog.adb:1544:25: missing string quote
prog.adb:1549:39: missing string quote
prog.adb:1550:24: missing string quote
prog.adb:1552:56: missing string quote
prog.adb:1556:09: illegal character, replaced by ")"
prog.adb:1560:01: illegal character, replaced by ")"
prog.adb:1566:01: illegal character, replaced by "("
prog.adb:1572:16: missing string quote
prog.adb:1574:27: missing string quote
prog.adb:1579:16: missing string quote
prog.adb:1581:40: missing string quote
prog.adb:1584:16: missing string quote
prog.adb:1586:61: missing string quote
prog.adb:1589:14: == should be =
prog.adb:1590:09: illegal character, replaced by "("
prog.adb:1593:26: == should be =
prog.adb:1594:17: illegal character, replaced by "("
prog.adb:1595:32: missing string quote
prog.adb:1597:55: missing string quote
prog.adb:1598:32: missing string quote
prog.adb:1599:55: missing string quote
prog.adb:1603:17: illegal character, replaced by ")"
prog.adb:1606:17: illegal character, replaced by "("
prog.adb:1608:33: missing string quote
prog.adb:1613:39: missing string quote
prog.adb:1614:32: missing string quote
prog.adb:1616:56: missing string quote
prog.adb:1620:17: illegal character, replaced by ")"
prog.adb:1621:09: illegal character, replaced by ")"
prog.adb:1624:09: illegal character, replaced by "("
prog.adb:1627:09: illegal character, replaced by ")"
prog.adb:1628:01: illegal character, replaced by ")"
prog.adb:1634:01: illegal character, replaced by "("
prog.adb:1639:09: illegal character, replaced by "("
prog.adb:1642:09: illegal character, replaced by ")"
prog.adb:1645:09: illegal character, replaced by "("
prog.adb:1648:09: illegal character, replaced by ")"
prog.adb:1653:01: illegal character, replaced by ")"
prog.adb:1657:01: illegal character, replaced by "("
prog.adb:1662:09: illegal character, replaced by "("
prog.adb:1667:09: illegal character, replaced by ")"
prog.adb:1687:01: illegal character, replaced by ")"
prog.adb:1691:01: illegal character, replaced by "("
prog.adb:1692:18: illegal character, replaced by "("
prog.adb:1695:09: illegal character, replaced by "("
prog.adb:1696:21: illegal character, replaced by "("
prog.adb:1697:21: illegal character, replaced by "("
compilation abandoned due to previous error
gnatmake: "prog.adb" compilation error

Standard output is empty