/* raw data converter for files: drinks1.dat and drinks2.dat */
/* written by C-Saint 1/29/92, compiled on TopSpeed C Compiler */

#include <stdio.h>

char test(char);

main()
{
        FILE *dat1, *dat2, *out;
        char c=' ';
        int count=0;

        dat1=fopen("drinks1.dat","rt");
        dat2=fopen("drinks2.dat","rt");
        out=fopen("drinks.out", "wt");

        printf("\nDrink data converter");
        do {
           do {
              c = fgetc(dat1);
              if (test(c)) fputc(c, out);
           } while(test(c));   /* output name */
           fputs("\nDrink type: ",out);
           for(count=0; count < 2; count++) {
               switch(c) {
                         case '1': fputs("Blender ",out);
                              break;
                         case '2': fputs("Cocktail ",out);
                              break;
                         case '3': fputs("Coffee ",out);
                              break;
                         case '4': fputs("Cordial ", out);
                              break;
                         case '5': fputs("Creme ",out);
                              break;
                         case '6': fputs("Pousse Cafe ",out);
                              break;
                         case '7': fputs("Punch ",out);
                              break;
                         case '8': fputs("Sour ",out);
                              break;
                         case '9': fputs("Wine ",out);
                              break;
               }
               c = fgetc(dat1);
           }  /* throw away last char */
           fputs("\nTemp: ",out);
           for(count=0; count<2; count++) {
               c = fgetc(dat1);
               switch(c) {
                   case '1': fputs("Cold ",out);
                        break;
                   case '2': fputs("Frozen ",out);
                        break;
                   case '3': fputs("Hot ",out);
                        break;
                   case '4': fputs("Room temp ",out);
                        break;
               }
           }
           fputc('\n',out);
           c = fgetc(dat1);  /* trash 2 spaces */
           c = fgetc(dat1);
           fputs("Serve at: ", out);
           for (count=0; count < 3; count++) {
                c=fgetc(dat1);
                switch(c) {
			case '1': fputs("Brunch ", out);
				break;
			case '2': fputs("Lunch ", out);
				break;
			case '3': fputs("Cocktails ", out);
				break;
			case '4': fputs("Aperitif ", out);
				break;
			case '5': fputs("Dinner ", out);
				break;
			case '6': fputs("Dessert ", out);
				break;
			case '7': fputs("Evening ", out);
				break;
			case '8': fputs("Nightcap ", out);
				break;
			case '9': fputs("Party ", out);
				break;
		}
	}
	fputs("\nSeason(s): ", out);
	for(count = 0; count < 4; count++) {
		c = fgetc(dat1);
		switch(c) {
			case '1': fputs("Spring ", out);
				break;
			case '2': fputs("Summer ", out);
				break;
			case '3': fputs("Fall ", out);
				break;
			case '4': fputs("Winter ", out);
				break;
		}
	}
	printf(".");
           do {
               c = fgetc(dat1);
               fputc(c, out);
           } while(c != '\n');
           do {
              c = fgetc(dat2);
              fputc(c, out);
           } while(c != '\n');
           fputc('\n',out);
        } while ((!feof(dat1)) && (!feof(dat2)));

        fcloseall();
}

char test(char c)
{
	char t=1;
               switch(c) {
                         case '1':
                         case '2':
                         case '3':
                         case '4':
                         case '5':
                         case '6':
                         case '7':
                         case '8':
                         case '9':  t=0;
                              break;
               }
	return t;
}