LONG tmpPen;
WORD pen;
UBYTE pens[256];

for( pen=0; pen<(palette[0]>>16); pen++ ) {
   tmpPen = ObtainBestPen( cm,
               palette[pen*3+1],
               palette[pen*3+2],
               palette[pen*3+3],
               OBP_Precision, PRECISION_ICON, TAG_END );
   if( tmpPen==-1 ) { puts( "Impossible d'allouer les pinceaux." ); break; }
   else pens[i]=tmpPen;
}

ULONG pixel;

for( pixel=0; pixel<IMAGE_WIDTH*IMAGE_HEIGHT; pixel++ ) {
   image[pixel] = pens[image[pixel]];
}

WriteChunkyPixels( win->RPort,        // RastPort sur lequel tracer
   win->BorderLeft, win->BorderTop,   // Position de l'angle supérieur gauche dans le RPort
   win->BorderLeft+IMAGE_WIDTH-1, win->BorderTop+IMAGE_HEIGHT-1,  // Angle inférieur droit
   image,                             // Données chunky à tracer
   IMAGE_WIDTH );                     // Nombre d'octets par ligne de l'image

#include <intuition/intuition.h>
#include <proto/exec.h>
#include <proto/graphics.h>
#include <proto/intuition.h>
#include <stdio.h>

#define IMAGE_WIDTH 320
#define IMAGE_HEIGHT 240

#include "image.h"
#include "palette.h"

int main(void)
{
   struct Window *win=NULL;
   struct ColorMap *cm;
   LONG tmpPen,pixel;
   WORD pen;
   UBYTE pens[256];

   // Ouverture de la fenêtre
   win = OpenWindowTags( NULL,
            WA_Title,       (ULONG)"Pouet",
            WA_InnerWidth,  IMAGE_WIDTH,
            WA_InnerHeight, IMAGE_HEIGHT,
            WA_DragBar,     TRUE,
            WA_CloseGadget, TRUE,
            WA_DepthGadget, TRUE,
            WA_IDCMP,       IDCMP_CLOSEWINDOW,
            TAG_END );

   if( !win ) {
      puts( "Impossible d'ouvrir la fenêtre." );
      return 10;
   }

   // Allocation des couleurs
   cm = win->WScreen->ViewPort.ColorMap;
   for( pen=0; pen<(palette[0]>>16); pen++ ) {
      tmpPen = ObtainBestPen( cm,
                  palette[pen*3+1],
                  palette[pen*3+2],
                  palette[pen*3+3],
                  OBP_Precision, PRECISION_ICON, TAG_END );
      if( tmpPen==-1 ) break;
      else pens[pen]=tmpPen;
   }

   if( tmpPen==-1 ) {
      puts( "Impossible d'allouer un pinceau !" );
      CloseWindow( win );
      return 10;
      // Note : en l'absence de la balise OBP_FailIfBad, s'il est impossible
      // d'allouer un pinceau, alors il est impossible d'allouer tous les
      // pinceaux. Il est donc inutile de les libérer avant de quitter...
   }

   // Recalcul des pixels
   for( pixel=0; pixelRPort,        // RastPort sur lequel tracer
      win->BorderLeft, win->BorderTop,   // Position de l'angle supérieur gauche dans le RPort
      win->BorderLeft+IMAGE_WIDTH-1, win->BorderTop+IMAGE_HEIGHT-1,  // Angle inférieur droit
      image,                             // Données chunky à tracer
      IMAGE_WIDTH );                     // Nombre d'octets par ligne de l'image

   WaitPort( win->UserPort );

   CloseWindow( win );

   // Libération des pinceaux
   for( pen=0; pen<(palette[0]>>16); pen++ ) {
      ReleasePen( cm, pens[pen] );
   }

   return 0;
}