FONTCHARACTER pinFile[]={'\\','\\','f','l','s','0','\\','f','x','l','o','c','k','.','m','d','p',0};

int worb=1;
clignote()
{
    int i,j;
    worb=-worb;
    if(worb==1)
    {
        for(i=123;i<=127;i++)for(j=0;j<=4;j++)Bdisp_SetPoint_DD(i,j,1);
    }
    else
    {
        Bdisp_PutDisp_DD();
    }
}

int matchCode(unsigned char * pass1, unsigned char * pass2)
{
    while(*pass1==*pass2){
        if(*pass1==0)return 1;
        pass1++;
        pass2++;
    }
    return 0;
}

getUserCode(int pos_x, int pos_y, unsigned char * pass){
    unsigned int key;
    unsigned char etoile[2]={0x2A,0};
    int pos=0;
    SetTimer(1,350,clignote);
    do{
        GetKey(&key);
        if(pos<10 && key!=KEY_CTRL_DEL)
        {
            locate((pos_x+pos),pos_y);
            pass[pos]=(unsigned char)key;
            Print((unsigned char*)etoile);
            pos++;
        }
        if(key==KEY_CTRL_DEL && pos>0)
        {
            pos--;
            locate((pos_x+pos),pos_y);
            Print((unsigned char*)" ");
        }
    }while(key!=KEY_CTRL_EXE || pos==0);
    pass[pos]=0;
    KillTimer(1);
}

readPassword(unsigned char * buf){
    int file;
    file=Bfile_OpenFile(pinFile,_OPENMODE_READ);
    Bfile_ReadFile(file ,buf ,11,1);
    Bfile_CloseFile(file);
}

setPassword(unsigned char * pass){
    int file;
    unsigned char buf[12];
    int i=1;
    i=1;
    buf[0]=1;
    do{
        buf[i++]=*pass;
    } while(*(++pass));
    buf[i]=0;
    Bfile_DeleteFile(pinFile);
    Bfile_CreateFile(pinFile, 12);
    file=Bfile_OpenFile(pinFile,_OPENMODE_WRITE);
    Bfile_WriteFile(file,buf,12);
    Bfile_CloseFile(file);
}

unsigned char isFirstUse()
{
    unsigned char buf;
    int file;
    
    Bfile_CreateFile(pinFile,12);
    file=Bfile_OpenFile(pinFile,_OPENMODE_READ);
    Bfile_ReadFile(file ,&buf ,1,0);
    Bfile_CloseFile(file);
    
    if(buf!=1)return 1;
    return 0;
}

install()
{
    unsigned int key;
    unsigned char tampon=1;
    int file;
    unsigned char pass1[12];
    unsigned char pass2[12];
    
    file=Bfile_OpenFile(pinFile,_OPENMODE_WRITE);
    Bfile_WriteFile(file,&tampon,1);
    Bfile_CloseFile(file);
    
    locate(0,1);
    Print((unsigned char*)"Premiere utilisation");
    PopUpWin(2);
    locate(3,3);
    do
    {
        PopUpWin(2);
        locate(3,3);
        Print((unsigned char*)"mot de passe : 1");
        Bdisp_PutDisp_DD();
        getUserCode(4,4,pass1);
        PopUpWin(2);
        locate(3,3);
        Print((unsigned char*)"mot de passe : 2");
        Bdisp_PutDisp_DD();
        getUserCode(4,4,pass2);
    } while(matchCode(pass1,pass2)==0);
    Bdisp_PutDisp_DD();
    
    
    setPassword(pass1);
    PopUpWin(2);
    locate(3,3);
    Print((unsigned char*)"mot de passe : Ok");
    Bdisp_PutDisp_DD();
    GetKey(&key);
}

MessLock()
{
    unsigned int key;
    unsigned char pass1[12];
    unsigned char pass2[12];
    PopUpWin(5);
    Bdisp_PutDisp_DD();
    locate(3,2);
    Print((unsigned char*)"Cette Graph 75+");
    locate(3,3);
    Print((unsigned char*)"est verrouill\xE6\x0A""e");
    locate(3,4);
    Print((unsigned char*)"Entrez le code...");
    getUserCode(6,6,pass1);
    readPassword(pass2);
    if(matchCode(pass1,pass2)==0) MessLock();
    
}
ChangeCode()
{
    unsigned int key;
    unsigned char pass1[12];
    unsigned char pass2[12];
    unsigned char pass0[12];
    SaveDisp(1);
    PopUpWin(2);
    locate(3,3);
    Print((unsigned char*)"Entrez le code : ");
    Bdisp_PutDisp_DD();
    getUserCode(4,4,pass0);
    readPassword(pass1);
    if(matchCode(pass0,pass1)==0){
        locate(4,3);
        PopUpWin(2);
        Print((unsigned char*)"Rat\xE6\x0A"" !");
        GetKey(&key);
    }
    else
    {
        do
        {
            PopUpWin(2);
            locate(3,3);
            Print((unsigned char*)"Nouveau code : 1");
            Bdisp_PutDisp_DD();
            getUserCode(4,4,pass1);
            PopUpWin(2);
            locate(3,3);
            Print((unsigned char*)"Nouveau code : 2");
            Bdisp_PutDisp_DD();
            getUserCode(4,4,pass2);
        } while(matchCode(pass1,pass2)==0);
        setPassword(pass1);
        
        PopUpWin(2);
        locate(3,3);
        Print((unsigned char*)"Nouveau code : Ok");
        GetKey(&key);    
    }
    RestoreDisp(1);
    Bdisp_PutDisp_DD();
}
int AddIn_main(int isAppli, unsigned short OptionNum)
{
    unsigned int key;
    
    unsigned char pass1[12];
    unsigned char pass2[12];
    
    Bdisp_AllClr_DDVRAM();
    
    if(isFirstUse())install();
    Bdisp_AllClr_DDVRAM();
    
    locate(1,1);
    Print((unsigned char*)"[F1] : changer code");
    locate(1,3);
    Print((unsigned char*)"[Menu] : Quitter");
    locate(1,6);
    Print((unsigned char*)"=====================");
    locate(1,7);
    Print((unsigned char*)"= Graph 75 prot\xE6\x0A""g\xE6\x0A""e =");
    locate(1,8);
    Print((unsigned char*)"=====================");


    
    SetQuitHandler(MessLock);
    
    SaveDisp(1);
    while(1){
        GetKey(&key);
        if(key==KEY_CTRL_F1)ChangeCode();
    }
    
    return 1;
}