256 lines
9.3 KiB
C
256 lines
9.3 KiB
C
#include "const.h"
|
||
#include "struct.h"
|
||
#include "global.h"
|
||
#include "graph.h"
|
||
#include "divers.h"
|
||
|
||
//ÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛ
|
||
//Û Û°
|
||
//Û READLINE (proc‚dure permettant de saisir une chaŒne de caractŠres) Û°
|
||
//Û Û°
|
||
//ÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛ°
|
||
// °°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°
|
||
|
||
#define COULEUR_TEXTE CM_Noir
|
||
#define COULEUR_FOND CM_Clair
|
||
#define COULEUR_TEXTE_CURSEUR CM_Noir
|
||
#define COULEUR_FOND_CURSEUR CM_Fonce
|
||
|
||
|
||
// V‚rification de la validit‚ d'un nom de fichier
|
||
byte Chaine_valide(char * Chaine)
|
||
{
|
||
byte Point_trouve=0; // Bool‚en "on a trouv‚ un point dans la chaine"
|
||
byte Taille_racine=0; // Taille de la racine du nom de fichier
|
||
byte Taille_extension=0; // Taille de l'extension du nom de fichier
|
||
byte Position; // Position du caractŠre dans la chaŒne en cours d'‚tude
|
||
|
||
for (Position=0;Chaine[Position]!='\0';Position++)
|
||
{
|
||
if (Chaine[Position]!='.')
|
||
{
|
||
if (Point_trouve)
|
||
Taille_extension++;
|
||
else
|
||
Taille_racine++;
|
||
}
|
||
else
|
||
{
|
||
if (Point_trouve)
|
||
return 0;
|
||
else
|
||
Point_trouve=1;
|
||
}
|
||
}
|
||
|
||
return ( (Taille_racine>0) && (Taille_racine<=8) && (Taille_extension<=3) );
|
||
}
|
||
|
||
|
||
// Suppresion d'un caractŠre … une certaine POSITION dans une CHAINE.
|
||
void Supprimer_caractere(char * Chaine, byte Position)
|
||
{
|
||
for (;Chaine[Position]!='\0';Position++)
|
||
Chaine[Position]=Chaine[Position+1];
|
||
}
|
||
|
||
|
||
void Inserer_caractere(char * Chaine, char Lettre, byte Position)
|
||
// Insertion d'une LETTRE … une certaine POSITION
|
||
// dans une CHAINE d'une certaine TAILLE.
|
||
{
|
||
char Char_tempo;
|
||
|
||
for (;Lettre!='\0';Position++)
|
||
{
|
||
// On m‚morise le caractŠre qui se trouve en "Position"
|
||
Char_tempo=Chaine[Position];
|
||
// On splotch la lettre … ins‚rer
|
||
Chaine[Position]=Lettre;
|
||
// On place le caractŠre m‚moris‚ dans "Lettre" comme nouvelle lettre … ins‚rer
|
||
Lettre=Char_tempo;
|
||
}
|
||
// On termine la chaine
|
||
Chaine[Position]='\0';
|
||
}
|
||
|
||
|
||
void Rafficher_toute_la_chaine(word Pos_X,word Pos_Y,char * Chaine,byte Position)
|
||
{
|
||
Print_dans_fenetre(Pos_X,Pos_Y,Chaine,COULEUR_TEXTE,COULEUR_FOND);
|
||
Print_char_dans_fenetre(Pos_X+(Position<<3),Pos_Y,Chaine[Position],COULEUR_TEXTE_CURSEUR,COULEUR_FOND_CURSEUR);
|
||
}
|
||
|
||
|
||
//****************************************************************************
|
||
//* Enhanced super scanf deluxe pro plus giga mieux :-) *
|
||
//****************************************************************************
|
||
byte Readline(word Pos_X,word Pos_Y,char * Chaine,byte Taille_maxi,byte Type_saisie)
|
||
// ParamŠtres:
|
||
// Pos_X, Pos_Y : Coordonn‚es de la saisie dans la fenˆtre
|
||
// Chaine : ChaŒne recevant la saisie (et contenant ‚ventuellement une valeur initiale)
|
||
// Taille_maxi : Nombre de caractŠres logeant dans la zone de saisie
|
||
// Type_saisie : 0=ChaŒne, 1=Nombre, 2=Nom de fichier (12 carcactŠres)
|
||
// Sortie:
|
||
// 0: Sortie par annulation (Esc.) / 1: sortie par acceptation (Return)
|
||
{
|
||
char Chaine_initiale[256];
|
||
byte Position;
|
||
byte Taille;
|
||
char Touche_lue=0;
|
||
byte Touche_autorisee;
|
||
|
||
|
||
// Effacement de la chaŒne
|
||
Block(Fenetre_Pos_X+(Pos_X*Menu_Facteur_X),Fenetre_Pos_Y+(Pos_Y*Menu_Facteur_Y),
|
||
Taille_maxi*(Menu_Facteur_X<<3),(Menu_Facteur_Y<<3),COULEUR_FOND);
|
||
|
||
// Mise … jour des variables se rapportant … la chaŒne en fonction de la chaŒne initiale
|
||
strcpy(Chaine_initiale,Chaine);
|
||
|
||
if (Type_saisie==1)
|
||
itoa(atoi(Chaine),Chaine,10); // On tasse la chaine … gauche
|
||
// Chaine[0]='\0'; // On efface la chaŒne si c'est valeur num‚rique
|
||
|
||
Taille=strlen(Chaine);
|
||
Position=(Taille<Taille_maxi)? Taille:Taille-1;
|
||
Rafficher_toute_la_chaine(Pos_X,Pos_Y,Chaine,Position);
|
||
|
||
|
||
while ((Touche_lue!=13) && (Touche_lue!=27))
|
||
{
|
||
Touche_lue=Get_key();
|
||
switch (Touche_lue)
|
||
{
|
||
case 0 :
|
||
Touche_lue=Get_key();
|
||
switch (Touche_lue)
|
||
{
|
||
case 83 : // Suppr.
|
||
if (Position<Taille)
|
||
{
|
||
Supprimer_caractere(Chaine,Position);
|
||
Taille--;
|
||
// Effacement de la chaŒne
|
||
Block(Fenetre_Pos_X+(Pos_X*Menu_Facteur_X),Fenetre_Pos_Y+(Pos_Y*Menu_Facteur_Y),
|
||
Taille_maxi*(Menu_Facteur_X<<3),(Menu_Facteur_Y<<3),COULEUR_FOND);
|
||
Rafficher_toute_la_chaine(Pos_X,Pos_Y,Chaine,Position);
|
||
}
|
||
break;
|
||
case 75 : // Gauche
|
||
if (Position)
|
||
{
|
||
// Effacement de la chaŒne
|
||
if (Position==Taille)
|
||
Block(Fenetre_Pos_X+(Pos_X*Menu_Facteur_X),Fenetre_Pos_Y+(Pos_Y*Menu_Facteur_Y),
|
||
Taille_maxi*(Menu_Facteur_X<<3),(Menu_Facteur_Y<<3),COULEUR_FOND);
|
||
Rafficher_toute_la_chaine(Pos_X,Pos_Y,Chaine,--Position);
|
||
}
|
||
break;
|
||
case 77 : // Droite
|
||
if ((Position<Taille) && (Position<Taille_maxi-1))
|
||
Rafficher_toute_la_chaine(Pos_X,Pos_Y,Chaine,++Position);
|
||
break;
|
||
case 71 : // Home
|
||
if (Position)
|
||
{
|
||
// Effacement de la chaŒne
|
||
if (Position==Taille)
|
||
Block(Fenetre_Pos_X+(Pos_X*Menu_Facteur_X),Fenetre_Pos_Y+(Pos_Y*Menu_Facteur_Y),
|
||
Taille_maxi*(Menu_Facteur_X<<3),(Menu_Facteur_Y<<3),COULEUR_FOND);
|
||
Rafficher_toute_la_chaine(Pos_X,Pos_Y,Chaine,Position=0);
|
||
}
|
||
break;
|
||
case 79 : // End
|
||
if ((Position<Taille) && (Position<Taille_maxi-1))
|
||
Rafficher_toute_la_chaine(Pos_X,Pos_Y,Chaine,Position=(Taille<Taille_maxi)?Taille:Taille-1);
|
||
}
|
||
break;
|
||
case 8 :
|
||
if (Position)
|
||
{
|
||
Supprimer_caractere(Chaine,--Position);
|
||
Taille--;
|
||
// Effacement de la chaŒne
|
||
Block(Fenetre_Pos_X+(Pos_X*Menu_Facteur_X),Fenetre_Pos_Y+(Pos_Y*Menu_Facteur_Y),
|
||
Taille_maxi*(Menu_Facteur_X<<3),(Menu_Facteur_Y<<3),COULEUR_FOND);
|
||
Rafficher_toute_la_chaine(Pos_X,Pos_Y,Chaine,Position);
|
||
}
|
||
break;
|
||
case 13 :
|
||
if ( (Type_saisie!=2) || (Chaine_valide(Chaine)) )
|
||
break;
|
||
// Si on ‚tait en saisie de nom de fichier et qu'il y ait une erreur
|
||
// dans la chaŒne
|
||
Erreur(0); // On flash en rouge & ...
|
||
Touche_lue=27; // ... on simule l'appuie sur la touche [Esc]
|
||
case 27 :
|
||
// On restaure la chaine initiale
|
||
strcpy(Chaine,Chaine_initiale);
|
||
Taille=strlen(Chaine);
|
||
break;
|
||
default :
|
||
if (Taille<Taille_maxi)
|
||
{
|
||
// On va regarder si l'utilisateur le droit de se servir de cette touche
|
||
Touche_autorisee=0; // On commence par supposer qu'elle est interdite
|
||
switch(Type_saisie)
|
||
{
|
||
case 0 : // N'importe quelle chaŒne:
|
||
if (Touche_lue>=' ')
|
||
Touche_autorisee=1;
|
||
break;
|
||
case 1 : // Nombre
|
||
if ( (Touche_lue>='0') && (Touche_lue<='9') )
|
||
Touche_autorisee=1;
|
||
break;
|
||
default : // Nom de fichier
|
||
// On commence par passez la lettre en majuscule
|
||
if ( (Touche_lue>='a') && (Touche_lue<='z') )
|
||
Touche_lue-=32;
|
||
// Ensuite on regarde si la touche est autoris‚e
|
||
if ( (Touche_lue> ' ') && (Touche_lue!='+') && (Touche_lue!='\\') &&
|
||
(Touche_lue!='>') && (Touche_lue!='<') && (Touche_lue!='*') &&
|
||
(Touche_lue!='?') && (Touche_lue!=':') && (Touche_lue!='|') &&
|
||
(Touche_lue!='/') && (Touche_lue!='"') && (Touche_lue!='=') &&
|
||
(Touche_lue!=',') && (Touche_lue!=';') && (Touche_lue!='[') &&
|
||
(Touche_lue!=']') )
|
||
Touche_autorisee=1;
|
||
} // Fin du "switch(Type_saisie)"
|
||
|
||
// Si la touche ‚tait autoris‚e...
|
||
if (Touche_autorisee)
|
||
{
|
||
// ... alors on l'insŠre ...
|
||
Inserer_caractere(Chaine,Touche_lue,Position/*,Taille*/);
|
||
// ce qui augmente la taille de la chaine
|
||
Taille++;
|
||
// et qui risque de d‚placer le curseur vers la droite
|
||
if (Taille<Taille_maxi)
|
||
Position++;
|
||
// Enfin, on raffiche la chaine
|
||
Rafficher_toute_la_chaine(Pos_X,Pos_Y,Chaine,Position);
|
||
} // Fin du test d'autorisation de touche
|
||
} // Fin du test de place libre
|
||
} // Fin du "switch(Touche_lue)"
|
||
} // Fin du "while"
|
||
|
||
// Effacement de la chaŒne
|
||
Block(Fenetre_Pos_X+(Pos_X*Menu_Facteur_X),Fenetre_Pos_Y+(Pos_Y*Menu_Facteur_Y),
|
||
Taille_maxi*(Menu_Facteur_X<<3),(Menu_Facteur_Y<<3),COULEUR_FOND);
|
||
// On raffiche la chaine correctement
|
||
if (Type_saisie==1)
|
||
{
|
||
if (Chaine[0]=='\0')
|
||
{
|
||
strcpy(Chaine,"0");
|
||
Taille=1;
|
||
}
|
||
Print_dans_fenetre(Pos_X+((Taille_maxi-Taille)<<3),Pos_Y,Chaine,COULEUR_TEXTE,COULEUR_FOND);
|
||
}
|
||
else
|
||
Print_dans_fenetre(Pos_X,Pos_Y,Chaine,COULEUR_TEXTE,COULEUR_FOND);
|
||
|
||
return (Touche_lue==13);
|
||
}
|