Librería para hacer juegos con Pascal

[[seoane]]

Hola Ñuño,

ahora mismo no tengo mucho tiempo para hacer pruebas. Pero te cuento como me fue con un par de ejemplos.

Primero hay que añadir el directorio "lib" al "Search Path" del proyecto (Menú: "Project/Options/Directories Conditionals/Search Path"). Y definir la condición WINDOWS (Menu: "Project/Options/Directories Conditionals/Conditionals defines").

Luego modificamos la clausula uses de varios .pas

albitmap.pas

Código Delphi [-]
  USES
    albase, alcolor, alvtable
{$IFNDEF FPC}
 {$IFDEF WINDOWS}
,Windows
 {$ENDIF}
{$ENDIF}
;

alfile.pas

Código Delphi [-]
{$IFNDEF FPC}
  USES Sysutils, albase;
{$ELSE}
  USES strings, albase;
{$ENDIF}

alKeybrd.pas

Código Delphi [-]
{$IFNDEF FPC}
  USES Sysutils, albase;
{$ELSE}
  USES albase;
{$ENDIF}

exBlend.pas, lineas (142 y 154)

Código Delphi [-]
  
  image1 := al_load_bitmap (filename, AL_RGBptr(@pal));
  image2 := al_load_bitmap (filename, AL_RGBptr(@pal));

Hasta aquí llegue, probé los ejemplos: exblend, excolmap y el hipnótico expal, en cuanto tenga tiempo le hecho un vistazo al resto.