// Test pico
// Ecran OLED tft sd1306 et encodeur rotatif
// Utilisation de la librairie U8x8lib simple mais efficace et disponible avec IDE Arduino

#include "U8x8lib.h"
#include "Wire.h"

// Encodeur rotatif
#define encod_sw 6
#define encod_dt 7
#define encod_clk 8

U8X8_SSD1306_128X64_NONAME_HW_I2C display(/* reset=*/ U8X8_PIN_NONE);
int A_menu;
const int nb_ch_menuA = 5;
const String ch_menuA[] = {"Saisir nom","Saisir prenom","Afficher nom","Afficher prenom","Afficher tout"};
String nom = "";
String prenom = "";
String ch_result = "";
String ch_saisie = "";
uint8_t memo_pos = 99;
bool v_passage = false;

void setup(){
	display.begin();
	display.noInverse();
	display.clear();
	display.setFont(u8x8_font_px437wyse700b_2x2_r);
	display.drawString(2,2,"TEST");
	display.drawString(2,4,"PICO");
	display.setFont(u8x8_font_chroma48medium8_r);
	delay(2000);
}

// Affichage du menu et inversion de la valeur en cours de selection
void aff_menu(int pos){
	if(memo_pos != pos){
		display.setInverseFont(0);
		display.drawString(0, memo_pos, ch_menuA[memo_pos].c_str());
		for (uint8_t i = 0; i < nb_ch_menuA; i++) display.drawString(0, i, ch_menuA[i].c_str());
		display.setInverseFont(1);
		display.drawString(0, pos, ch_menuA[pos].c_str());
		display.setInverseFont(0);
		memo_pos = pos;
	}
}

// Affichage du menu Alpha des Majuscules
void aff_menu_Alpha_Maj(uint8_t pos){
	char ch_i[2];
	uint8_t vx;
	uint8_t vy;
	if(!v_passage) display.clear();
	for (uint8_t i = 64; i < 92; i++){
		snprintf(ch_i, 2, "%c", i);
		vy = (2 * ((i - 64) % 4));
		vx = ((i - 64) / 4) * 2;
		if (i == pos+64){
			display.setInverseFont(1);
			display.drawString(vx, vy, ch_i);
		}else{
			display.setInverseFont(0);
			display.drawString(vx, vy, ch_i);
		}
	}
	v_passage=true;
	display.setInverseFont(0);
}

// Selection dans le menu Alpha
uint8_t sel_menu_Alpha_detail(uint8_t max){
	max--;
	bool B_val = false, val_clk = true, memo_clk = true;
	int B_choix = 0;
	aff_menu_Alpha_Maj(B_choix);
	v_passage=false;
	while (! B_val){
		val_clk = digitalRead(encod_clk);
		if (val_clk != memo_clk){
			if (digitalRead(encod_dt) != val_clk) {
				B_choix++;
				if (B_choix > max){
					B_choix = 0;
				}
			} else { 
				B_choix--;
				if (B_choix < 0){ 
					B_choix = max;
				}
			}
			aff_menu_Alpha_Maj(B_choix);
			delay(5);
		}
		if (!(digitalRead(encod_sw))) { B_val = true; }
		memo_clk = val_clk;
		if(B_val){
			if(B_choix == max) return 0;
			B_choix += 64;
			char ch_car = B_choix;
			ch_saisie += ch_car;
			display.clear();
			display.setInverseFont(1);
			display.setFont(u8x8_font_px437wyse700b_2x2_r);
			display.drawString(0, 5, ch_saisie.c_str());
			display.setFont(u8x8_font_chroma48medium8_r);
			display.setInverseFont(0);
			delay(1000);
			display.clear();
			B_val = false;
			aff_menu_Alpha_Maj(0);
		}
	}
	return 0;
}

// Selection dans le menu à l'aide du selecteur rotatif
uint8_t sel_menu(int max){
	max--;
	bool B_val = false, val_clk = true, memo_clk = true;
	int B_choix = 0;
	aff_menu(B_choix);
	while (! B_val){
		val_clk = digitalRead(encod_clk);
		if (val_clk != memo_clk){
			if (digitalRead(encod_dt) != val_clk) { B_choix++; if (B_choix > max) B_choix = max;}
				else { B_choix--; if (B_choix < 0) B_choix = 0;}
			aff_menu(B_choix); delay(10);
		}
		if (!(digitalRead(encod_sw))) { B_val = true; } // Bouton validation
		memo_clk = val_clk;	delay(5);
	}
	aff_menu(B_choix);
	return B_choix;
}

void loop(){
	display.clear();
	A_menu = 0;
	A_menu = sel_menu(nb_ch_menuA);
	delay(300);
	switch (A_menu){
		case 0 : // Saisie du nom
			display.clear();
			display.drawString(0, 1, "Saisir NOM");
			display.drawString(0, 3, "Utiliser car [");
			display.drawString(0, 5, "pour valider");
			delay(1000);
			sel_menu_Alpha_detail(28);
			nom = ch_saisie;
			ch_saisie = "";
			delay(500);
			break;
		case 1 : // Saisie du prénom
			display.clear();
			display.drawString(0, 1, "Saisir PRENOM");
			display.drawString(0, 3, "Utiliser car [");
			display.drawString(0, 5, "pour valider");
			delay(1000);
			sel_menu_Alpha_detail(28);
			prenom = ch_saisie;
			ch_saisie = "";
			ch_result = nom + prenom;
			delay(500);
			break;
		case 2 : // Afficher nom
			display.clear();
			display.drawString(0, 5, nom.c_str());
			delay(1000);
			break;
		case 3 : // Afficher prenom
			display.clear();
			display.drawString(0, 5, prenom.c_str());
			delay(1000);
			break;
		case 4 : // Afficher tout
			display.clear();
			display.drawString(0, 5, ch_result.c_str());
			delay(1000);
			break;
	}
}