/* Programme test de tracé de ligne pour illustrer l'antialiasing de Wu. trace
 * également les lignes non antialiasées pour comparer.
 * Testé avec Borland C++ 4.02 en modèle small par Jim Mischel 12/16/94.
 */
#include <dos.h>
#include <conio.h>

void SetPalette(struct WuColor *);
extern void DrawWuLine(int, int, int, int, int, int, unsigned int);
extern void DrawLine(int, int, int, int, int);
extern void SetMode(void);
extern int ScreenWidthInPixels;  /* dimension globale de l'écran */
extern int ScreenHeightInPixels;

#define NUM_WU_COLORS 2 /* nombre de couleurs avec lesquelles nous ferons le tracé de l'antialiasing*/
struct WuColor {        /* décrit une couleur pour l'antialiasing */
   int BaseColor;       /* numéro du début du bloc d'intensité de la palette dans le DAC */
   int NumLevels;       /* nombre de niveaux d'intensité */
   int IntensityBits;   /* IntensityBits == log2 NumLevels */
   int MaxRed;          /* composant rouge de la couleur à pleine intensité */
   int MaxGreen;        /* composant vert de la couleur à pleine intensité */
   int MaxBlue;         /* composant bleu de la couleur à pleine intensité */
};
enum {WU_BLUE=0, WU_WHITE=1};             /* couleurs d'affichage */
struct WuColor WuColors[NUM_WU_COLORS] =  /* bleu et blanc */
    {{192, 32, 5, 0, 0, 0x3F}, {224, 32, 5, 0x3F, 0x3F, 0x3F}};

void main()
{
   int CurrentColor, i;
   union REGS regset;

   /* Affiche les lignes antialiasées de Wu dans toutes les directions */
   SetMode();
   SetPalette(WuColors);
   for (i=5; i<ScreenWidthInPixels; i += 10) {
      DrawWuLine(ScreenWidthInPixels/2-ScreenWidthInPixels/10+i/5,
            ScreenHeightInPixels/5, i, ScreenHeightInPixels-1,
            WuColors[WU_BLUE].BaseColor, WuColors[WU_BLUE].NumLevels,
            WuColors[WU_BLUE].IntensityBits);
   }
   for (i=0; i<ScreenHeightInPixels; i += 10) {
      DrawWuLine(ScreenWidthInPixels/2-ScreenWidthInPixels/10, i/5, 0, i,
            WuColors[WU_BLUE].BaseColor, WuColors[WU_BLUE].NumLevels,
            WuColors[WU_BLUE].IntensityBits);
   }
   for (i=0; i<ScreenHeightInPixels; i += 10) {
      DrawWuLine(ScreenWidthInPixels/2+ScreenWidthInPixels/10, i/5,
            ScreenWidthInPixels-1, i, WuColors[WU_BLUE].BaseColor,
            WuColors[WU_BLUE].NumLevels, WuColors[WU_BLUE].IntensityBits);
   }
   for (i=0; i<ScreenWidthInPixels; i += 10) {
      DrawWuLine(ScreenWidthInPixels/2-ScreenWidthInPixels/10+i/5,
            ScreenHeightInPixels, i, 0, WuColors[WU_WHITE].BaseColor,
            WuColors[WU_WHITE].NumLevels,
            WuColors[WU_WHITE].IntensityBits);
   }
   getch();                /* attend une touche clavier */

   /* A présent vide l'écran et affiche les lignes non antialiasées */
   SetMode();
   SetPalette(WuColors);
   for (i=0; i<ScreenWidthInPixels; i += 10) {
      DrawLine(ScreenWidthInPixels/2-ScreenWidthInPixels/10+i/5,
            ScreenHeightInPixels/5, i, ScreenHeightInPixels-1,
            WuColors[WU_BLUE].BaseColor);
   }
   for (i=0; i<ScreenHeightInPixels; i += 10) {
      DrawLine(ScreenWidthInPixels/2-ScreenWidthInPixels/10, i/5, 0, i,
            WuColors[WU_BLUE].BaseColor);
   }
   for (i=0; i<ScreenHeightInPixels; i += 10) {
      DrawLine(ScreenWidthInPixels/2+ScreenWidthInPixels/10, i/5,
            ScreenWidthInPixels-1, i, WuColors[WU_BLUE].BaseColor);
   }
   for (i=0; i<ScreenWidthInPixels; i += 10) {
      DrawLine(ScreenWidthInPixels/2-ScreenWidthInPixels/10+i/5,
            ScreenHeightInPixels, i, 0, WuColors[WU_WHITE].BaseColor);
   }
   getch();                /* attend une touche clavier */

   regset.x.ax = 0x0003;   /* AL = 3 sélectionne le mode texte 80x25 */
   int86(0x10, &regset, &regset);   /* revient en mode texte */
}

/* Configure la palette pour l'antialiasing avec les couleurs spécifiées.
 * Les niveaux d'intensité pour chaque couleur sont échelonnées à partir de
 * l'intensité maximum désirée des composants rouge, vert et bleu pour cette 
 * couleur jusqu'à l'intensité 0%; Chaque étape est arrondie à l'entier le plus 
 * proche. Les couleurs sont correctes pour un gamma de 2.3..
 */
void SetPalette(struct WuColor * WColors)
{
   int i, j;
   union REGS regset;
   struct SREGS sregset;
   static unsigned char PaletteBlock[256][3];   /* 256 entrées RVB */
   /* Composants de couleur du DAC corrigés par Gamma pour les 64 niveaux 
 linéaires d'intensité 0% à 100% */
   static unsigned char GammaTable[] = {
      0, 10, 14, 17, 19, 21, 23, 24, 26, 27, 28, 29, 31, 32, 33, 34,
      35, 36, 37, 37, 38, 39, 40, 41, 41, 42, 43, 44, 44, 45, 46, 46,
      47, 48, 48, 49, 49, 50, 51, 51, 52, 52, 53, 53, 54, 54, 55, 55,
      56, 56, 57, 57, 58, 58, 59, 59, 60, 60, 61, 61, 62, 62, 63, 63};

   for (i=0; i<NUM_WU_COLORS; i++) {
      for (j=0; j<WColors[i].NumLevels; j++) {
         PaletteBlock[j][0] = GammaTable[((double)WColors[i].MaxRed * (1.0 -
               (double)j / (double)(WColors[i].NumLevels - 1))) + 0.5];
         PaletteBlock[j][1] = GammaTable[((double)WColors[i].MaxGreen * (1.0 -
               (double)j / (double)(WColors[i].NumLevels - 1))) + 0.5];
         PaletteBlock[j][2] = GammaTable[((double)WColors[i].MaxBlue * (1.0 -
               (double)j / (double)(WColors[i].NumLevels - 1))) + 0.5];
      }
      /* A présent configure la palette pour effectuer l'antialiasing de Wu pour cette couleur*/
      regset.x.ax = 0x1012;   /* fonction paramètrage de bloc des registres DAC */
      regset.x.bx = WColors[i].BaseColor;   /* premier emplacement du DAC à charger*/
      regset.x.cx = WColors[i].NumLevels;   /* nombre d'emplacements du DAC à charger*/
regset.x.dx = (unsigned int)PaletteBlock; /* offset du tableau à partir duquel  
                                               charger les paramètres RVB */
      sregset.es = _DS; /* segment du tableau à partir duquel charger les paramètres*/
      int86x(0x10, &regset, &regset, &sregset); /* charge le bloc de la palette */
   }
}