Forum Graph100

//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 [])
{
 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;
 short adresse_video;
 int debut=0,fin=5;
 char decalage;
 if (y<0) debut=-y;                      // clipping haut
 if (y>63) fin=63-y;                    // clipping bas
 if ( x<0 ) return;  //clipping : vérifie que ca ne dépasse pas de l'écran à gauche
 for (i=debut;i<fin;i++)                         //le sprite comporte 5 lignes
 {
 a= font [lettre*8+i];                     //on récupré la ligne du sprite dans a
 adresse_video = 1023 - y - ( x / 8 ) *64 - i;  //on calcule l'adresse video en mode C3
 decalage = x%8;                                //on calcule le décalage
 asm mov si, x
 asm mov ax, 0x1A20                             //l'adresse du 1er buffer dans ax
 asm mov es, ax                                 //pour la mettre dans es
 asm xor ax, ax                                 //on met ax à 0
 asm mov ah, a                                  //on met la 1ere ligne du sprite dans ah
 asm mov cl, decalage                           //le décalage dans cl
 asm shr ax,cl                                  //on décale ax pour avoir la bonne position
 asm mov di,adresse_video                       //l'adresse dans di
 asm mov bx,0x0FFF                              //seuls les 4 premiers bits de ax sont utilisés donc bx est un masque qu'on va appliquer sur l'écran
 asm ror bx,cl                                  //on fait une rotation a bx en fonction du décalage
 
 asm cmp si, 120
 asm ja gauche

 droite:
 asm and [es:di-64],bl
 asm or [es:di-64],al

 gauche:
 
 asm cmp si, 127
 asm ja fin

 asm and [es:di],bh                             //on met les bits du sprite à 0 et les autres sont conservés
 asm or [es:di],ah                              //on affiche le sprite avec un or

 fin:

 }}


void textbm (int x, int y,char texte[])
{
int a;
for (a=0; a<strlen(texte); a++)
printbm(x+5*a,y,texte[a]);
}

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");
 getch();
 }