First upload of the code.
git-svn-id: svn://pulkomandy.tk/GrafX2/trunk@2 416bcca6-2ee7-4201-b75f-2eb2f807beb1
This commit is contained in:
Adrien Destugues
255
readline.c
Normal file
255
readline.c
Normal file
@@ -0,0 +1,255 @@
|
||||
#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);
|
||||
}
|
||||
Reference in New Issue
Block a user