#include <stdio.h>
#include <stdlib.h>
#ifdef _WIN32
#include <windows.h>
#endif
#include <string.h>
//Variabili Pre-processore
int scelta;
int a;
char temp[256];

void tempo(void){
    #ifdef __linux__
    sleep(0.025);
    #elif __WIN32
    Sleep(20);
    #endif
}


void pulisci(void) {

    #ifdef __linux__
    system("clear");
    #elif __WIN32
    system("cls");
    #endif

}

void logo_func(void)
{

    printf("  .oooooo.                             .      \n");     tempo();
    printf(" d8P'  `Y8b                          .o8          \n"); tempo();
    printf("888           .ooooo.  ooo. .oo.   .o888oo  .ooooo.\n");    tempo();
    printf("888          d88' `88b `888P.Y88b    888   d88' `88b\n");   tempo();
    printf("888          888   888  888   888    888   888   888\n");   tempo();
    printf("`88b    ooo  888   888  888   888    888 . 888   888\n");   tempo();
    printf(" `Y8bood8P'  `Y8bod8P' o888o o888o   *888* `Y8bod8P'\n");   tempo();
    printf("\n\n\n");   tempo();
    printf("oooooooooo.                                                      **  \n");  tempo();
    printf("`888'   `Y8b                                                     **\n");    tempo();
    printf(" 888     888  .oooo.   ooo. .oo.    .ooooo.   .oooo.   oooo d8b oooo  .ooooo.\n");  tempo();
    printf(" 888oooo888' `P  )88b  `888P*Y88b  d88'      `P  )88b  `888**P `888   d88' `88b\n");    tempo();
    printf(" 888oooo888' `P  )88b  `888P*Y88b  d88'      `P  )88b  `888  8P `888  888   888\n");    tempo();
    printf(" 888    .88P d8(  888   888   888  888       d8(  888   888      888  888   888\n");    tempo();
    printf(" 888    .88P d8(  888   888   888  888       d8(  888   888      888  888   888\n");    tempo();
    printf("o888bood8P'  `Y888**o  o888o o888o `Y8bod8P' `Y888**o   d888b   o888o `Y8bod8P\n\n");   tempo();
}
struct profilo_utente{
    char titolo[256];
    float conto;
    char nome[256];

}dynamic;

int main(void);

void registrazione_utente(void){
    pulisci();
    logo_func();
    FILE *utente;
    printf("Inserire nome utente (questo verrà poi chiesto per il login): ");
    scanf("%s",&dynamic.nome);
    printf("Inserire conto attuale: ");
    scanf("%f",&dynamic.conto);
    sprintf(dynamic.titolo, "%s.txt" ,dynamic.nome);
    utente = fopen(dynamic.titolo,"w");
    fprintf(utente, "%f",dynamic.conto);
    fclose(utente);
}

void login_utente(void)
{
    fflush(stdin);
    int b=2;
    pulisci();
    logo_func();
    float preleva;
    float var;
    FILE *utente,*fp;
    qui:
    printf("\n\nLogin: ");
    scanf("%s",&dynamic.nome);
    sprintf(dynamic.titolo, "%s.txt",dynamic.nome);
    strcpy(temp,dynamic.titolo);
    fp=fopen(dynamic.titolo,"r+");
    if ( fp == NULL)
    {
        printf("Utente non registrato\n");
        goto qui;
    }
    else{
     fclose(fp);

    do
    {

    utente = fopen(temp,"r+");
    fscanf(utente,"%f",&var);
    printf("Sono disponibili %f euro\n\n[1]Prelevare [2]Depositare [3]Assegno [4]Esci: ",var);
    scanf("%d",&scelta);
    fclose(utente);
    utente = fopen(dynamic.titolo,"a+");
    switch(scelta)
    {
        system("cls");
        logo_func();
        case 1:
            if (var<=0){
                printf("\nAzione non consentita, sei in rosso");
            }
            printf("Preleva: ");
            scanf("%f",&preleva);
            fprintf(utente, "%f",var - preleva);
            fclose(utente);
            pulisci();
            break;
        case 2:
            printf("Deposita: ");
            scanf("%f",&preleva);
            fprintf(utente, "%f",var+preleva);
            fclose(utente);
            pulisci();
            break;
        case 3:
            do{
                printf("Somma dell'assegno: ");
                scanf("%f",&preleva);
                if (preleva > var){
                    printf("\nErrore: Non sei cosi tanto ricco. Riprova\n");
                }
                else b=1;
            }while(b>1);
            fprintf(utente, " %f",var - preleva);
            fclose(utente);
            do{
            printf("\n\nA : ");
            scanf("%s",&dynamic.nome);
            sprintf(dynamic.titolo, "%s.txt",dynamic.nome);
            fp=fopen(dynamic.titolo,"r+");
            if ( fp == NULL)
            {
                printf("Utente non registrato\nPremere 1 per riprovare.");
                scanf("%d",&b);
            }
            }while(b>1);
            fclose(fp);
            utente = fopen(dynamic.titolo,"a+");
            fprintf(utente, " %f",var+preleva);
            fclose(utente);
            pulisci();
            break;
        case 4:
            a=0;
            fclose(utente);
            break;
    }

}while(a!=0);

pulisci();
}
main();
}

int main(){
    fflush(stdin);
    pulisci();
    logo_func();
    a=1;
    printf("\n\n[1]Accedi [2]Registrati: ");
    scanf("%d",&scelta);

    switch(scelta){
        case 1:
            login_utente();
            break;
        case 2:
            registrazione_utente();
            system("cls");
            main();
            break;
        default:
            printf("Errore");
            break;
    }
    return 0;
}