Forum Graph100

# include <memzones.c>
# include <casio2.h>

unsigned char far* font;

void main ()
{

 loadfont(3,"FONT");
 textbm (0,0,"J'AIME LE POULET !");
 textbm (0,6,"J'aime le poulet !");
 textbm (0,13,"MADJAR IL EST TROP BEAU");
 textbm (0,20,"Madjar il est trop beau");
 textbm (0,27,"BIJA EST PAS MAL NON PLUS");
 textbm (0,34,"Bija est pas mal non plus");
 
}


int textbm (int x, int y, char texte [])
{
 int i=0;
 while (texte [i])
 {
     printb (texte [i],x+5*i,y);
     i++;
 }
 
 return (0);
}

int printb (char lettre,int x,int y)
{
int a,b,c,d;
for (a=0; a<5; a++)
{
b=font[lettre*8+a];
for (c=7; c>3; c--)
{
if (b & 1<<c) setPix(x+7-c,y+a,0,1);
else setPix(x+7-c,y+a,0,0);
}
}
return (0);
}


int  loadfont (int zone,char police [])
{
 struct memory_zone bf;
 search_mem_zone(zone,police,&bf);
 font = (unsigned char far*)MK_FP(bf.b_segment, bf.b_inner_offset);

 return (0);
}

unsigned char far* font;

//textbm 2 : la revenche du octet par octet (il revien et il est pas content) par Bija et Madjar

#include <memzones.c>

unsigned char far* font;

void  loadfont (int zone,char police [])       //on prend le fichier spécifié dans la zone choisie, et on en extrait la police
{
 struct memory_zone bf;
 search_mem_zone(zone,police,&bf);
 font = (unsigned char far*)MK_FP(bf.b_segment, bf.b_inner_offset);

}

void printbm (int x,int y,char lettre)
{
 char a;
 int i,debut=0,fin=8;
 int adresse_video;
 char decalage;
 if (y<0) debut=-y;                      // clipping haut
 if (y>63) fin=127-y;                    // clipping bas

  if (x>=0)                              // si le caractère n'est pas à gauche de l'écran
    {
              for (i=debut;i<fin;i++)                         //boucle pour chaque ligne à afficher
              {
                    a= font [lettre*8+i];                              //recupere la bonne ligne de la bonne lettre
                  adresse_video = 1023;                                      //
                  adresse_video = adresse_video - y;                         // definit où ecrire
                  adresse_video = adresse_video - ( x / 8 ) *64 - i ;        //
                  decalage = x%8;                                            //definit le decalage de la lettre sur l'octet
                  asm mov ax, 0x1A20                                   //on ecrit l'adresse du buffer video
                  asm mov es, ax                                       //on le déplace dans es
                  asm xor ax, ax                                       //on vide ax
                  asm mov ah, a                                        //on met le bout à afficher dans ah
                  asm mov cl, decalage                                 //on définit le décalage dans cl
                  asm shr ax,cl                                        //on le décale
                  asm mov di,adresse_video                             //on met l'adresse video ou ecrire dans di

                  if (i<=4) asm mov bx,0x0F00                          //on genere la partie haute du masque
                  if (i>=5) asm mov bx,0xFF00                          //la partie basse

                  asm shl bx,cl                                        //on decale le masque

                  if (x<=120) asm and [es:di], bh                      //on affiche le masque
                  if (x<=127) asm and [es:di-64], bl                   // les if sont pour le cas ou on veut ecrire à droite

                  if (x<=120) asm or [es:di], ah                       //on affiche la lettre
                  if (x<=127) asm or [es:di-64], al
                  }
       }

}

void textbm (int x, int y, char texte [])
{
 int i=0;
 while (texte [i])
 {
    printbm (x+5*i,y,texte [i]);
    i++;
 }
}

void main ()
{

 loadfont (3,"FONT");

 textbm (0,0,"J'AIME LE POULET !");
 textbm (0,6,"J'aime le poulet !");
 textbm (0,12,"MADJAR IL EST TROP BEAU");
 textbm (0,18,"Madjar il est trop beau");
 textbm (0,24,"BIJA EST PAS MAL NON PLUS");
 textbm (0,30,"Bija est pas mal non plus");

}