/********************************************\
                |                FLAMEGUI.C                  |
                |      EXTENDED VERSION OF FLAMES WITH       |
                |     ADVANCED GRAPHICAL USER INTERFACE      |
                |       PROGRAMMER : SHEKHAR A. SHERIKAR     |
		|  Student, Diploma in Computer Technology,  |
		|  Babasaheb Gawde Institute Of Technology,  |
		|       Bombay Central, Mumbai-400012.       |
		|                   INDIA                    |
                |                FEB 14 2000                 |
                |                Version 1.2                 |
		|          [Full Debugged Version]           |
		|      SECURITY AUTO TERMINATE PROVIDED      |
		\********************************************/
#include<stdio.h>
#include<conio.h>
#include<graphics.h>
int w_detect=0;
void main()
{
 int gd=DETECT;
 int gm=DETECT;
 int sl1,sl2,msl,i,j,y,p,flag=0,nocheck[100],marker,loopcntr=0;
 int maxx,maxy;
 char ch,name1[100],name2[100],loop;
 char *text[]={"FLAMES","ENTER `HIS' NAME","ENTER `HER' NAME","JUDGEMENT","NO JUDGEMENT"};
 detectgraph(&gd,&gm);
 initgraph(&gd,&gm,"c:\\turboc\\bgi");
 cleardevice();
 maxx=getmaxx();
 maxy=getmaxy();
 screen(&text[0]);
 startup();
 security();
 while(1)
 {
  clearwindow();
  setcolor(BROWN);
  settextstyle(0,HORIZ_DIR,2);
  outtextxy(maxx/2-textwidth(text[1])/2,75,text[1]);
  p=accept(&name1[0],100);
  if(p==1)
   continue;
  strupr(name1);
  setfillstyle(SOLID_FILL,WHITE);
  settextstyle(0,HORIZ_DIR,2);
  setcolor(BROWN);
  outtextxy(maxx/2-textwidth(text[2])/2,175,text[2]);
  p=accept(&name2[0],200);
  if(p==1)
   continue;
  strupr(name2);
  sl1=strlen(name1);
  sl2=strlen(name2);
  msl=sl1+sl2;
  p=0;
  setfillstyle(SOLID_FILL,WHITE);
  for(i=0;i<sl1;i++)
  {
   for(j=0;j<sl2;j++)
   {
    if(name1[i]==name2[j])
    {
     if(p==0)
     {
      msl=msl-2;
      nocheck[p]=j;
      p++;
      break;
     }
     else
     {
      for(y=0;y<p;y++)
      {
       if(j!=nocheck[y])
	flag=1;
       if(j==nocheck[y])
       {
	flag=0;
	break;
       }
      }
      if(flag==1)
      {
       msl=msl-2;
       nocheck[y]=j;
       p++;
       break;
      }
     }
    }
   }
  }
  setcolor(8);
  rectangle(70,275,maxx-70,450);
  setfillstyle(SOLID_FILL,7);
  bar(71,276,maxx-71,449);
  setcolor(WHITE);
  rectangle(75,280,maxx-75,445);
  settextstyle(4,HORIZ_DIR,0);
  setcolor(YELLOW);
  if(msl==0||msl>13)
   outtextxy(maxx/2-textwidth(text[4])/2,290,text[4]);
  else
   outtextxy(maxx/2-textwidth(text[3])/2,290,text[3]);
  settextstyle(0,HORIZ_DIR,0);
  setcolor(BLUE);
  switch(msl)
  {
   case 0 :no(maxx,370);
	   break;
   case 1 :brosis(maxx,370);
	   break;
   case 2 :
   case 3 :
   case 5 :
   case 14:
   case 16:
   case 18:
   case 21:
   case 23:friends(maxx,370);
	   break;
   case 4 :
   case 7 :
   case 9 :
   case 20:
   case 22:
   case 24:
   case 25:enemies(maxx,370);
	   break;
   case 6 :
   case 11:
   case 15:lmarr(maxx,370);
	   break;
   case 8 :
   case 12:
   case 13:
   case 17:adore(maxx,370);
	   break;
   case 10:
   case 19:love(maxx,370);
	   break;
   default:no_telling(maxx,370);
	   break;
  }
  getch();
 }
}

/*FUNCTION FOR FRIENDS*/
friends(int maxx,int y)
{
 char *text[]={"Instinctive Relationship","FRIENDSHIP","These could be very good Friends!"};
 outtextxy(maxx/2-textwidth(text[0])/2,y,text[0]);
 outtextxy(maxx/2-textwidth(text[1])/2,y+25,text[1]);
 outtextxy(maxx/2-textwidth(text[2])/2,y+50,text[2]);
}

/*FUNCTION FOR ENEMIES*/
enemies(int maxx,int y)
{
 char *text[]={"Instinctive Relationship","ENEMITY","Alas! These are Enemies!"};
 outtextxy(maxx/2-textwidth(text[0])/2,y,text[0]);
 outtextxy(maxx/2-textwidth(text[1])/2,y+25,text[1]);
 outtextxy(maxx/2-textwidth(text[2])/2,y+50,text[2]);
}

/*FUNCTION FOR MARRIAGE*/
lmarr(int maxx,int y)
{
 char *text[]={"Instinctive Relationship","MATES FOR LIFE","These could end up Happily Married!"};
 outtextxy(maxx/2-textwidth(text[0])/2,y,text[0]);
 outtextxy(maxx/2-textwidth(text[1])/2,y+25,text[1]);
 outtextxy(maxx/2-textwidth(text[2])/2,y+50,text[2]);
}

/*FUNCTION FOR ADORE*/
adore(int maxx,int y)
{
 char *text[]={"Instinctive Relationship","ADORATION","These could be very posessive about each other!"};
 outtextxy(maxx/2-textwidth(text[0])/2,y,text[0]);
 outtextxy(maxx/2-textwidth(text[1])/2,y+25,text[1]);
 outtextxy(maxx/2-textwidth(text[2])/2,y+50,text[2]);
}

/*FUNCTION FOR IDENTICAL NAMES*/
no(int maxx,int y)
{
 char *text[]={"ALL LETTERS IN THE NAMES ARE IDENTICAL","OR","THE NAMES ARE IDENTICAL"};
 outtextxy(maxx/2-textwidth(text[0])/2,y,text[0]);
 outtextxy(maxx/2-textwidth(text[1])/2,y+25,text[1]);
 outtextxy(maxx/2-textwidth(text[2])/2,y+50,text[2]);
}

/*FUNCTION FOR BROTHER & SISTER PAIR*/
brosis(int maxx,int y)
{
 char *text[]={"Instinctive Relationship","PROTECTIVE","These could be ideal Brother & Sister!"};
 outtextxy(maxx/2-textwidth(text[0])/2,y,text[0]);
 outtextxy(maxx/2-textwidth(text[1])/2,y+25,text[1]);
 outtextxy(maxx/2-textwidth(text[2])/2,y+50,text[2]);
}

/*FUNCTION FOR LOVE*/
love(int maxx,int y)
{
 char *text[]={"Instinctive Relationship","LOVE","These could be Genuine Lovers"};
 outtextxy(maxx/2-textwidth(text[0])/2,y,text[0]);
 outtextxy(maxx/2-textwidth(text[1])/2,y+25,text[1]);
 outtextxy(maxx/2-textwidth(text[2])/2,y+50,text[2]);
}

/*FUNCTION FOR OVERFLOW MESSAGE*/
no_telling(int maxx,int y)
{
 char *text[]={"ERROR","Data Overflow","THIS! I CANNOT TELL!"};
 outtextxy(maxx/2-textwidth(text[0])/2,y,text[0]);
 outtextxy(maxx/2-textwidth(text[1])/2,y+25,text[1]);
 outtextxy(maxx/2-textwidth(text[2])/2,y+50,text[2]);
}

/*SECURITY AUTO TERMINATE*/
watchdog(char *nam)
{
 int i,j,maxx,maxy,flag=0,ind=0;
 char verify[]={83,72,69,75,72,65,82,32,65,46,32,83,72,69,82,73,75,65,82,'\0'},verifant[19];
 char t_el[5];
 maxx=getmaxx();
 maxy=getmaxy();
 for(i=0;i<19;i++,nam++)
  verifant[i]=*nam;
 verifant[i]='\0';
 strupr(verifant);
 if(strcmp(verify,verifant)!=0)
  flag=1;
 else
  flag=0;
 if(flag==1)
 {
  clearwindow();
  w_detect=0;
  setcolor(RED);
  settextstyle(GOTHIC_FONT,HORIZ_DIR,4);
  outtextxy(maxx/2-textwidth("RED ALERT")/2,maxy/2-150,"RED ALERT");
  settextstyle(0,HORIZ_DIR,3);
  outtextxy(maxx/2-textwidth("ILLEGAL ACTIVITY DETECTED")/2,maxy/2-70,"ILLEGAL ACTIVITY DETECTED");
  settextstyle(1,HORIZ_DIR,3);
  setcolor(BLUE);
  outtextxy(maxx/2-textwidth("The file FLAMES.EXE has been MODIFIED Illegally")/2+10,maxy/2,"The file FLAMES.EXE has been MODIFIED Illegally");
  setcolor(8);
  settextstyle(0,HORIZ_DIR,2);
  outtextxy(maxx/2-textwidth("PRESS A KEY")/2,maxy/2+200,"PRESS A KEY");
  settextstyle(TRIPLEX_FONT,HORIZ_DIR,3);
  for(i=1;i<=5000;i++)
  {
   sound(i);
   outtextxy(maxx/2-textwidth("TIME ELAPSED: ")/2-30,maxy/2+100,"TIME ELAPSED: ");
   for(j=i;j>0;j=j/10)
   {
    setfillstyle(SOLID_FILL,WHITE);
    bar(maxx/2+textwidth("TIME ELAPSED: ")/2-40,maxy/2+100,maxx-145,maxy/2+100+textheight(t_el));
    itoa(i,t_el,10);
    t_el[5]='\0';
    outtextxy(maxx/2+textwidth("TIME ELAPSED: ")/2-30,maxy/2+100,t_el);
   }
   if(kbhit())
   {
    getch();
    break;
   }
   i++;
   delay(100);
  }
  sound(1000);
  sleep(1);
  nosound();
  closegraph();
  restorecrtmode();
  printf("CONTROL TRANSFERED...\nUNINSTALLING FLAMES 1.2...\n\n");
  i=0;
  while(i<3)
  {
   switch(i)
   {
    case 0:ind=system("c:\\");
	   break;
    case 1:ind=system("cd\\");
	   break;
    case 2:ind=system("deltree /y flames");
	   break;
   }
   if(ind!=0)
   {
    printf("\nERROR... CANNOT AUTO UNINSTALL\n\n");
    break;
   }
   i++;
  }
  mess();
 }
 w_detect=1;
 return(1);
}

/*MESSAGES AFTER SECURITY AUTO TERMINATE*/
mess()
{
 printf("\nFLAMES 1.2 with Advanced GUI");
 printf("\nILLEGAL MODIFICATIONS were made in the program.\n");
 printf("\nThe name of the programmer had been changed to suit someone else's interests.");
 printf("\nThis is an ILLEGAL ACTIVITY and a punishable CRIMINAL OFFENCE");
 printf("\n             under U.S and International Law\n");
 printf("\nTo Reload the Program on your Hard Drive\nReaquire the program from a RELIABLE SOURCE\n");
 printf("\n           OPPOSE PIRACY - HELP SAVE SOFTWARE\n\n");
 abort();
}

/*FUNCTION TO EXIT*/
terminate(maxx)
{
 char *text[]={"Do you want to Quit?","YES","NO"},ch;
 setfillstyle(SOLID_FILL,BLUE);
 setcolor(8);
 rectangle(70,275,maxx-70,450);
 setfillstyle(SOLID_FILL,7);
 bar(71,276,maxx-71,449);
 setcolor(WHITE);
 rectangle(75,280,maxx-75,445);
 settextstyle(4,HORIZ_DIR,0);
 setcolor(BLUE);
 outtextxy(maxx/2-textwidth(text[0])/2,300,text[0]);
 outtextxy(maxx/2-textwidth(text[1])-100,360,text[1]);
 outtextxy(maxx/2+100,360,text[2]);
 setcolor(8);
 line(maxx/2-textwidth(text[1])-100,360+textheight(text[1])+10,maxx/2-textwidth(text[1])-100+textwidth("Y"),360+textheight(text[1])+10);
 line(maxx/2+100,360+textheight(text[2])+10,maxx/2+100+textwidth("N"),360+textheight(text[2])+10);
 ch=getch();
 if(ch=='y'||ch=='Y'||ch==13)
   return(1);
 else
   return(0);
}

/*FUNCTION FOR SECURITY*/
security()
{
 int maxx,maxy,i,j;
 char pwd[9],ch;
 char *text[]={"VALENTINE","Seems that you are new to FLAMES","Next time,use the above Password","Do you want to be helped? Y/N","Guess What??!","to Log On as an Experienced User!"};
 maxx=getmaxx();
 maxy=getmaxy();
 clearwindow();
 setcolor(BLUE);
 settextstyle(0,HORIZ_DIR,3);
 outtextxy(maxx/2-textwidth("PASSWORD")/2,maxy/2,"PASSWORD");
 pwd[0]='\0';
 while(pwd[0]=='\0')
 {
  accept(&pwd[0],maxy/2+50);
  if(pwd[0]=='\0')
  {
   setfillstyle(SOLID_FILL,WHITE);
   bar(6,maxy/2,maxx-6,maxy/2+100);
   setcolor(RED);
   settextstyle(0,HORIZ_DIR,2);
   outtextxy(maxx/2-textwidth("THIS IS NOT A VALID PASSWORD")/2,maxy/2+50,"THIS IS NOT A VALID PASSWORD");
   sound(400);
   sleep(1);
   nosound();
   bar(6,maxy/2,maxx-6,maxy/2+100);
   setcolor(BLUE);
   settextstyle(0,HORIZ_DIR,3);
   outtextxy(maxx/2-textwidth("PASSWORD")/2,maxy/2,"PASSWORD");
  }
 }
 strupr(pwd);
 settextstyle(DEFAULT_FONT,HORIZ_DIR,3);
 if(strcmp(pwd,text[0])==0)
 {
  setcolor(MAGENTA);
  outtextxy(maxx/2-textwidth("PASSWORD CORRECT!")/2,maxy/2+150,"PASSWORD CORRECT!");
  sound(5000);
  delay(25000);
  nosound();
 }
 else
 {
  sound(5000);
  for(i=0,j=0;i<100;i++,j++)
  {
   setcolor(j);
   outtextxy(maxx/2-textwidth("SECURITY BREACH!")/2,maxy/2+150,"SECURITY BREACH!");
   delay(1000);
   setcolor(15);
   outtextxy(maxx/2-textwidth("SECURITY BREACH!")/2,maxy/2+150,"SECURITY BREACH!");
   delay(100);
   if(j>15)
    j=1;
   if(kbhit())
   {
    getch();
    break;
   }
  }
  nosound();
  setcolor(BROWN);
  settextstyle(DEFAULT_FONT,HORIZ_DIR,3);
  outtextxy(maxx/2-textwidth("JUST KIDDING!")/2,maxy/2+150,"JUST KIDDING!");
  sleep(1);
  clearwindow();
  setcolor(12);
  settextstyle(TRIPLEX_FONT,HORIZ_DIR,1);
  outtextxy(maxx/2-textwidth(text[4])/2,maxy/2-150,text[4]);
  setcolor(4);
  settextstyle(DEFAULT_FONT,HORIZ_DIR,3);
  outtextxy(maxx/2-textwidth("PASSWORD")/2,maxy/2-100,"PASSWORD");
  setcolor(9);
  settextstyle(SANS_SERIF_FONT,HORIZ_DIR,4);
  outtextxy(maxx/2-textwidth(text[0])/2,maxy/2-70,text[0]);
  setcolor(MAGENTA);
  settextstyle(TRIPLEX_FONT,HORIZ_DIR,2);
  outtextxy(maxx/2-textwidth(text[1])/2,maxy/2,text[1]);
  outtextxy(maxx/2-textwidth(text[2])/2,maxy/2+50,text[2]);
  outtextxy(maxx/2-textwidth(text[5])/2,maxy/2+70,text[5]);
  setcolor(4);
  settextstyle(6,HORIZ_DIR,2);
  outtextxy(maxx/2-textwidth(text[3])/2,maxy/2+150,text[3]);
  ch=getch();
  if(ch==0)
   ch=getch();
  switch(ch)
  {
   case 'Y':
   case 'y':
   case 59 :help();
	    break;
   case 27 :ch=terminate(maxx);
	    if(ch==1)
	    {
	     closegraph();
	     restorecrtmode();
	     exit();
	    }
	    break;
  }
 }
 about();
 fflush(stdin);
}

/*FUNCTION TO GENERATE BACKGROUND GRAPHICS SCREEN*/
screen(char *text[0])
{
 int maxx,maxy,i,j;
 maxx=getmaxx();
 maxy=getmaxy();
 setbkcolor(15);/*SET BACKGROUND*/
 /*DRAW SCREEN BORDER*/
 setcolor(7);
 for(i=0;i<5;i++)
 {
  for(j=0;j<5;j++)
  {
   rectangle(i,j,maxx-i,maxy-j);
  }
 }
 setcolor(8);
 rectangle(0,0,maxx,maxy);
 rectangle(5,5,maxx-5,maxy-5);
 /*DONE SCREEN BORDER*/
 /*DRAW MENU*/
 setcolor(7);
 for(i=7;i<45;i++)
  line(7,i,maxx-7,i);
 setcolor(8);
 rectangle(7,7,maxx-7,45);
 setfillstyle(SOLID_FILL,LIGHTGREEN);
 bar(10,20,textwidth("F1 HELP")-1,32);
 bar(maxx-textwidth("ESC QUIT")+5,20,maxx-10,32);
 setcolor(BLUE);
 rectangle(10,20,textwidth("F1 HELP")-1,32);
 rectangle(maxx-textwidth("ESC QUIT")+5,20,maxx-10,32);
 setcolor(4);
 settextstyle(SMALL_FONT,HORIZ_DIR,0);
 outtextxy(12,20,"F1 HELP");
 outtextxy(maxx-10-textwidth("ESC QUIT"),20,"ESC QUIT");
 setcolor(RED);
 settextstyle(GOTHIC_FONT,HORIZ_DIR,4);
 outtextxy(maxx/2-textwidth(text[0])/2,5,text[0]);
 setcolor(7);
 setfillstyle(0,7);
 /*DONE MENU*/
}

/*FUNCTION TO GENERATE STARTUP GRAPHICS*/
startup()
{
 int maxx,maxy,i,j,flag;
 char *text[]={"FLAMES","FLAMES Version 1.2 with Advanced Graphical User Interface","Welcome to FLAMES Version 2.1 with advanced GUI.","FLAMES has been Programmed by Shekhar A. Sherikar"," a student of Computer Technology."};
 w_detect=0;
 watchdog(&*text[3]+30);
 maxx=getmaxx();
 maxy=getmaxy();
 i=0;
 sleep(1);
 if(w_detect!=1)
 {
  closegraph();
  restorecrtmode();
  abort();
 }
 for(flag=0;flag<11;flag++)
 {
  w_detect=0;
  while(1)
  {
   setcolor(i);
   settextstyle(4,HORIZ_DIR,2);
   outtextxy(maxx/2-textwidth(text[1])/2,360,text[1]);
   rectangle(maxx/2-textwidth("LOADING...WAIT")/2-5,395,maxx/2+textwidth("LOADING...WAIT")/2+5,430);
   setcolor(RED);
   settextstyle(TRIPLEX_FONT,HORIZ_DIR,1);
   outtextxy(maxx/2-textwidth("LOADING...WAIT")/2,400,"LOADING...WAIT");
   setcolor(i);
   setfillstyle(0,4);
   line(6,maxy/2-110,maxx-6,maxy/2-110);
   line(6,maxy/2-100,maxx-6,maxy/2-100);
   settextstyle(0,HORIZ_DIR,i);
   outtextxy(maxx/2-textwidth(text[0])/2,maxy/2-textheight(text[0])/2,text[0]);
   line(6,maxy/2+100,maxx-6,maxy/2+100);
   line(6,maxy/2+110,maxx-6,maxy/2+110);
   delay(500);
   if(flag%2==0)
   {
    i++;
    if(i>12)
     break;
   }
   else
   {
    i--;
    if(i<=0)
     break;
   }
  }
  watchdog(&*text[3]+30);
  if(flag%2==0)
   i=14;
  else
   i=0;
  if(flag==10)
   sleep(1);
  if(kbhit())
  {
   getch();
   sound(400);
   delay(15000);
   nosound();
   break;
  }
 }
 w_detect=0;
}

/*FUNCTION TO GIVE INFORMATION ABOUT FLAMES*/
about()
{
 int maxx;
 char *text[]={"FLAMES","FLAMES Version 1.2 with Advanced Graphical User Interface","Welcome to FLAMES Version 1.2 with advanced GUI.","FLAMES has been Programmed by Shekhar A. Sherikar,"," a student of Computer Technology."};
 char ch;
 watchdog(&*text[3]+30);
 maxx=getmaxx();
 clearwindow();
 setcolor(7);
 setfillstyle(SOLID_FILL,7);
 bar(21,101,maxx-21,399);
 setcolor(WHITE);
 rectangle(279,349,maxx-279,371);
 setcolor(8);
 rectangle(280,350,maxx-280,370);
 setlinestyle(3,0,0);
 rectangle(282,352,maxx-282,368);
 setlinestyle(0,0,0);
 setcolor(8);
 settextstyle(0,HORIZ_DIR,0);
 rectangle(20,100,maxx-20,400);
 outtextxy(maxx/2-textwidth("OK")/2,357,"OK");
 w_detect=0;
 watchdog(&*text[3]+30);
 setcolor(4);
 settextstyle(GOTHIC_FONT,HORIZ_DIR,8);
 outtextxy(maxx/2-textwidth(text[0])/2,100,text[0]);
 setcolor(BLUE);
 settextstyle(TRIPLEX_FONT,HORIZ_DIR,1);
 outtextxy(maxx/2-textwidth(text[1])/2,200,text[1]);
 settextstyle(SANS_SERIF_FONT,HORIZ_DIR,1);
 watchdog(&*text[3]+30);
 if(w_detect!=1)
 {
  closegraph();
  restorecrtmode();
  abort();
 }
 outtextxy(maxx/2-textwidth(text[2])/2,250,text[2]);
 outtextxy(maxx/2-textwidth(text[3])/2,270,text[3]);
 outtextxy(maxx/2-textwidth(text[4])/2,290,text[4]);
 w_detect=0;
 ch=getch();
 if(ch==0)
  ch=getch();
 switch(ch)
 {
  case 59:help();
	  break;
  case 27:ch=terminate(maxx);
	  if(ch==1)
	  {
	   closegraph();
	   restorecrtmode();
	   exit();
	  }
	  break;
 }
}

/*FUNCTION TO CLEAR WORK AREA*/
clearwindow()
{
 int maxx,maxy;
 maxx=getmaxx();
 maxy=getmaxy();
 setfillstyle(0,WHITE);
 bar(6,50,maxx-6,maxy-6);
}

/*FUNCTION TO ACCEPT NAMES*/
accept(char *name,int y)
{
 int flag=0,num=0,maxx,marker,quit=0;
 char nam[100],ch,case_id;
 fflush(stdin);
 marker=name;
 maxx=getmaxx();
 settextstyle(0,HORIZ_DIR,2);
 while(1)
 {
  ch=getch();
  switch(ch)
  {
   case 0:ch=getch();
	  flag=1;
	  switch(ch)
	  {
	   case 59:help();
		   clearwindow();
		   *name='\0';
		   return(1);
		   break;
	   default:break;
	  }
   default:switch(flag)
	   {
	    case 0:switch(ch)
		   {
		    default:case_id=ch;
			    if(ch==13)
			    {
			     *name='\0';
			     setfillstyle(SOLID_FILL,WHITE);
			     bar(6,y,maxx-6,y+75);
			     strupr(nam);
			     setcolor(4);
			     outtextxy(maxx/2-textwidth(nam)/2,y,nam);
			     return(0);
			     break;
			    }
			    if((case_id>=48||case_id<=57)||(case_id>=65&&case_id<=90)||(case_id>=97&&case_id<=122))
			    {
			     *name=ch;
			     name++;
			     nam[num]=ch;
			     num++;
			     nam[num]='\0';
			     setfillstyle(SOLID_FILL,WHITE);
			     bar(6,y,maxx-6,y+75);
			     setcolor(4);
			     outtextxy(maxx/2-textwidth(nam)/2,y,nam);
			     break;
			    }
			    else
			    {
			     setfillstyle(SOLID_FILL,WHITE);
			     bar(6,y,maxx-6,y+75);
			     setcolor(4);
			     outtextxy(maxx/2-textwidth(nam)/2,y,nam);
			     break;
			    }
		    case 32:break;
		    case 27:*name='\0';
			    quit=terminate(maxx);
			    settextstyle(0,HORIZ_DIR,2);
			    if(quit==1)
			    {
			     clearwindow();
			     about();
			     closegraph();
			     restorecrtmode();
			     exit();
			    }
			    else
			    {
			     setfillstyle(SOLID_FILL,WHITE);
			     bar(70,275,maxx-70,450);
			    }
			    break;
		    case 8: if(name>=marker)
			    {
			     *name--;
			     num--;
			     nam[num]='\0';
			     setfillstyle(SOLID_FILL,WHITE);
			     bar(6,y,maxx-6,y+75);
			     setcolor(4);
			     outtextxy(maxx/2-textwidth(nam)/2,y,nam);
			    }
			    else
			     break;
			    break;
		   }
	    case 1:break;
	   }
   flag=0;
  }
 }
}

/*FUNCTION TO HELP THE USER TO USE FLAMES*/
help()
{
 int maxx,y=50;
 char *text1[]={"FLAMES HELP","Welcome to the World of FLAMES!","FLAMES stands for:"};
 char *text2[]={"WHAT IS FLAMES?","From the names of individuals, generally couples,","FLAMES can reveal/predict the kind of relationship between them.","It does so by performing some arithmatic on the letters of your names."};
 char *text3[]={"F       L       A       M       E       S","Friends Lovers  Adorers Married Enemies Siblings"};
 char *text4[]={"HOW TO USE FLAMES 1.2","Just type in the name of the couple according to the message","to know about the best possible relationship they might have.","Press ESC for Quitting and F1 for Help"};
 char *text5[]={"FLAMES Version 1.2 with Advanced Graphical User Interface","Programmed & Devoloped by SHEKHAR A. SHERIKAR","A student at Babasaheb Gawde Institute Of Technology,","Maratha Mandir Annexe, Mumbai Central, Mumbai-400012. INDIA"};
 char *text6[]={"This program does not intend to cause any impact on any person's Relationships, Feelings or Psychology.","The Program is just a form of Entertainment and is not based on any systematic science."};
 char *text7[]={"The Programmer doesnot claim the genuinity of the Program's results,","and hence disclaims any damage in any form caused due to it's use.","DISCLAIMER"};
 char *text8[]={"Suggestions regarding this program are Welcome.","PRESS A KEY TO MOVE"};
 char ch;
 w_detect=0;
 watchdog(&*text5[1]+26);
 maxx=getmaxx();
 clearwindow();
 setcolor(BROWN);
 settextstyle(GOTHIC_FONT,HORIZ_DIR,2);
 outtextxy(maxx/2-textwidth(text1[1])/2,y,text1[1]);
 setcolor(CYAN);
 settextstyle(5,HORIZ_DIR,2);
 outtextxy(maxx/2-textwidth(text1[2])/2,y+25,text1[2]);
 setcolor(RED);
 settextstyle(GOTHIC_FONT,HORIZ_DIR,2);
 outtextxy(maxx/2-textwidth(text3[0])/2,y+50,text3[0]);
 settextstyle(3,HORIZ_DIR,3);
 setcolor(MAGENTA);
 outtextxy(maxx/2-textwidth(text3[1])/2,y+75,text3[1]);
 setcolor(12);
 settextstyle(DEFAULT_FONT,HORIZ_DIR,1);
 outtextxy(maxx/2-textwidth(text2[0])/2,y+125,text2[0]);
 setcolor(9);
 settextstyle(0,HORIZ_DIR,0);
 outtextxy(maxx/2-textwidth(text2[1])/2,y+140,text2[1]);
 outtextxy(maxx/2-textwidth(text2[2])/2,y+155,text2[2]);
 outtextxy(maxx/2-textwidth(text2[3])/2,y+170,text2[3]);
 setcolor(12);
 settextstyle(0,HORIZ_DIR,1);
 outtextxy(maxx/2-textwidth(text4[0])/2,y+190,text4[0]);
 setcolor(9);
 w_detect=0;
 settextstyle(0,HORIZ_DIR,0);
 outtextxy(maxx/2-textwidth(text4[1])/2,y+205,text4[1]);
 outtextxy(maxx/2-textwidth(text4[2])/2,y+220,text4[2]);
 setcolor(RED);
 outtextxy(maxx/2-textwidth(text4[3])/2,y+240,text4[3]);
 setcolor(2);
 watchdog(&*text5[1]+26);
 outtextxy(maxx/2-textwidth(text5[0])/2,y+260,text5[0]);
 outtextxy(maxx/2-textwidth(text5[1])/2,y+275,text5[1]);
 outtextxy(maxx/2-textwidth(text5[2])/2,y+290,text5[2]);
 outtextxy(maxx/2-textwidth(text5[3])/2,y+305,text5[3]);
 if(w_detect!=1)
 {
  closegraph();
  restorecrtmode();
  abort();
 }
 setcolor(8);
 outtextxy(maxx/2-textwidth(text7[2])/2,y+370,text7[2]);
 settextstyle(SMALL_FONT,HORIZ_DIR,0);
 outtextxy(maxx/2-textwidth(text6[0])/2,y+380,text6[0]);
 outtextxy(maxx/2-textwidth(text6[1])/2,y+390,text6[1]);
 outtextxy(maxx/2-textwidth(text7[0])/2,y+400,text7[0]);
 outtextxy(maxx/2-textwidth(text7[1])/2,y+410,text7[1]);
 settextstyle(0,HORIZ_DIR,1);
 w_detect=0;
 setcolor(4);
 rectangle(maxx/2-textwidth(text8[1])/2-5,y+345,maxx/2+textwidth(text8[1])/2+5,y+360);
 outtextxy(maxx/2-textwidth(text8[1])/2,y+350,text8[1]);
 setcolor(9);
 watchdog(&*text5[1]+26);
 settextstyle(5,HORIZ_DIR,1);
 outtextxy(maxx/2-textwidth(text8[0])/2,y+310,text8[0]);
 if(w_detect!=1)
 {
  closegraph();
  restorecrtmode();
  abort();
 }
 ch=getch();
 if(ch==0)
  ch=getch();
 switch(ch)
 {
  case 27:ch=terminate(maxx);
	  if(ch==1)
	  {
	   closegraph();
	   restorecrtmode();
	   exit();
	  }
	  break;
 }
 w_detect=0;
 return(1);
}
/*FLAMES 2.1 WITH ADVANCED GUI & SECURITY AUTO TERMINATE*/
/*PROGRAMMED BY SHEKHAR A. SHERIKAR*/
/*FULL DEBUGGED VERSION/*
/*THE SOURCE CODE WAS LAST MODIFIED ON 03:03:2000*/
/*END OF FILE*/