/*Holger Berg*/
/*Introduction to Programming*/
/*Assignment I*/
/*Algorithmic Sequencer Program*/
 
/*This is a program that will play a score contained in a text file.*/ 

#include <stdio.h>
#include <stdlib.h>
#include <string.h>
#include <windows.h>
#include "WavPlay.h"




/*I create char variable with 2 arrays: 8 dimensional array for 8 sound files I use and 10 dimensional array for the file names*/

char filemap[8][10] = {"bassA.wav", "bassB.wav", "bassC.wav", "bassD.wav", "bassE.wav", "bassF.wav", "bassG.wav", "crash.wav"};






/*I create a function - playNoteEx - which will make the PlayWave to play the notes */

void playNoteEx(int note) {
	
	PlayWave(filemap[note]);
}




/* I create playNote function which will execute PlayNoteEx function */


void playNote(char note) { /*The letters (in the text file) are omitted the numerical value. 
	That's why I created the 8 dimensional array above.	So, for example, if the program reads 
	the first letter in the text A, then the playNoteEx calls for playWav to play the first 
	note defined with filemap variable*/ 
	
	switch (note) { /*Switch case statements are a substitute for long if statements. 
		The value of the variable given into switch is compared to the value following 
		each of the cases, and when one value matches the value of the variable, 
		the computer continues executing the program from that point. */ 
		
		case 'A':
			playNoteEx(0);
			break;
		case 'B':
			playNoteEx(1);
			break;
		case 'C':
			playNoteEx(2);
			break;
		case 'D':
			playNoteEx(3);
			break;
		case 'E':
			playNoteEx(4);
			break;
		case 'F':
			playNoteEx(5);
			break;
		case 'G':
			playNoteEx(6);
			break;
		case 'Z':
			playNoteEx(7);
			break;
		default:
			break;
	}

}



/*A function to play the score normally*/

void playNormally(char* score, int length) {
	int i;
 	for(i=0;i<length;i++) {
		printf("entry is %c\n", score[i]); /*This is to print the played notes on the screen*/
		playNote(score[i]);
	}
}


/*A function to play the score algoritmically*/

void playAlgo(char* score, int length) {
	int i;
	int n=0;
	for (i=0;i<length;i++) {
		n=rand()%8; /*n will be allotted a value from 0 to 7, as we have 8 different notes. 
				The notes will be played in randomized order*/
		printf("played %c\n", score[n]); /*Prints the played notes on the screen*/
		playNote(score[n]);
	}

}






/*The main function*/

void main() {
	FILE *fp=NULL;               /*declares a file pointer*/
	int i=0;		
	int algo=0;					 
	int patterns=1;				
	char* mingi=NULL;
	int datasize;
	char str[1024];				
	do {						/*do-while statement to repeat the whole program*/
		do {					/* do-while statement to keep looping until the 
								corresponding filename is inserted*/
			printf("Enter the name of the score file: ");
			int ret = scanf("%s", str);	/*typed text will be connected to str*/
		


			fp=fopen(str, "r"); /*opens the file connected to str, which, in our case, 
								is is 'noodid.txt'*/
			if (fp==NULL) {		/* if anything else than noodid.txt will be typed in, 
								an error message will be displayed*/
				char tmp=0;
				printf("Error. Would you like to try again? (y/n): ");
				fflush(stdin); 


				scanf("%c", &tmp);
				if (tmp=='n'||tmp=='N'){
					exit(0);
				} else {
					continue;
				}
			}
		} while (fp==NULL); /*if corresponding file was not found, the .txt-filename is asked again*/


		fseek(fp, 0, SEEK_END); /*seeks the end of the file to count the letters*/
		int pos=ftell(fp);
		fseek(fp, 0, SEEK_SET);/*cursor to the beginning of file to play the file again*/
		
	
		mingi = (char*)malloc(pos);	/*allocates a block of size bytes of memory*/
		datasize=fread(mingi, 1, pos, fp);
		fclose(fp);


		printf("If you want to play the score normally, press 1,\nif you want to play the score algorithmically, press 2\n");
		scanf("%d", &algo);

		printf("How many times should the pattern play?\n");
		scanf("%d", &patterns);
		
		if (algo==1) {
			for (i=0; i<patterns; i++) {
				playNormally(mingi, datasize);
			}
		
		} else {
			for (i=0; i<patterns; i++) {
				playAlgo(mingi, datasize);
			}
		}

		
		
		char tmp=0;
		fflush(stdin);
		printf("Would you like to quit? (y/n): ");
		scanf("%c", &tmp);
		
		if (tmp=='y'||tmp=='Y'){
			break;
		} else {
			continue;
		}
	} while (1); /*end of the main function, if the user wants to repeat the program, 
				 the program starts to loop */  
				  
}