/*
 * Programme test pour illustrer les routines d'affichage de ligne de EGA/VGA.
 *
 * Compilé avec Borland C++ 4.02
 * Testé par Jim Mischel 11/21/94 
 *
 * Doit être lié avec L14-1.C ou L14-3.ASM. Construit avec l'une
 * de ces lignes de commande:
 *   bcc l14-2.c l14-1.c, ou
 *   bcc l14-2.c l14-3.asm
 *
 * Par Michael Abrash.
 */

#include <dos.h>     /* contient geninterrupt */

#define GRAPHICS_MODE   0x10
#define TEXT_MODE       0x03
#define BIOS_VIDEO_INT  0x10
#define X_MAX           640      /* largeur de l'écran */
#define Y_MAX           348      /* hauteur de l'écran */

extern void EVGALine();

/*
 * Routine pour afficher un rectangle uni, de couleur
 * et de longueur spécifiées,
 */
void VectorsUp(XCenter, YCenter, XLength, YLength, Color)
int XCenter, YCenter;   /* centre du rectangle à remplir */
int XLength, YLength;   /* distance du centre au bord du rectangle */
int Color;              /* couleur dans laquelle afficher les lignes */
{
   int WorkingX, WorkingY;

   /* Lignes du centre au haut du rectangle */
   WorkingX = XCenter - XLength;
   WorkingY = YCenter - YLength;
   for ( ; WorkingX < ( XCenter + XLength ); WorkingX++ )
      EVGALine(XCenter, YCenter, WorkingX, WorkingY, Color);

   /* Lignes du centre à la droite du rectangle */
   WorkingX = XCenter + XLength - 1;
   WorkingY = YCenter - YLength;
   for ( ; WorkingY < ( YCenter + YLength ); WorkingY++ )
      EVGALine(XCenter, YCenter, WorkingX, WorkingY, Color);

   /* Lignes du centre au bas du rectangle */
   WorkingX = XCenter + XLength - 1;
   WorkingY = YCenter + YLength - 1;
   for ( ; WorkingX >= ( XCenter - XLength ); WorkingX-- )
      EVGALine(XCenter, YCenter, WorkingX, WorkingY, Color);

   /* Lignes du centre à la gauche du rectangle */
   WorkingX = XCenter - XLength;
   WorkingY = YCenter + YLength - 1;
   for ( ; WorkingY >= ( YCenter - YLength ); WorkingY-- )
      EVGALine(XCenter, YCenter, WorkingX, WorkingY, Color );
}

/*
 * Programme test pour afficher quatre rectangles avec des lignes.
 */
void main()
{
   char temp;

   /* Sélectionne le mode graphique */
   _AX = GRAPHICS_MODE;
   geninterrupt(BIOS_VIDEO_INT);

   /* Affiche les quatre rectangles */
   VectorsUp(X_MAX / 4, Y_MAX / 4, X_MAX / 4,
      Y_MAX / 4, 1);
   VectorsUp(X_MAX * 3 / 4, Y_MAX / 4, X_MAX / 4,
      Y_MAX / 4, 2);
   VectorsUp(X_MAX / 4, Y_MAX * 3 / 4, X_MAX / 4,
      Y_MAX / 4, 3);
   VectorsUp(X_MAX * 3 / 4, Y_MAX * 3 / 4, X_MAX / 4,
      Y_MAX / 4, 4);

   /* Attend une touche clavier */
   scanf("%c", &temp);

   /* Retour au mode texte */
   _AX = TEXT_MODE;
   geninterrupt(BIOS_VIDEO_INT);
}