archives/gates_of_skeldal
2
0
Fork 0
mirror of https://github.com/ondra-novak/gates_of_skeldal.git synced 2025-07-14 10:21:51 -04:00
Code Issues Projects Releases Packages Wiki Activity Actions

github publish

Browse source
This commit is contained in:
Ondrej Novak 2025-01-24 18:27:22 +01:00
commit 506e23bf32
542 changed files with 120675 additions and 0 deletions
Download patch file Download diff file Expand all files Collapse all files

61
GIF/Gif.c Normal file
View file

@ -0,0 +1,61 @@
#include <stdio.h>
#include <conio.h>
#include <string.h>
#include <dos.h>
#include "decoder.c"
#include "gif.h"
int get_byte ()
{
int x;
x=gif_file[gif_pozice];
gif_pozice++;
if (gif_pozice==LENGHTGIF) return (READ_ERROR); else return (x);
}
int out_line (char *pixels, int linelen)
{
memmove ((gif_picture+linelen*RaW), pixels, linelen);
RaW++;
if (RaW<=480) return (RaW); else return (0);
}
int gif_to_buffer (char *filename)
{
FILE *picture;
int x;
char mezi[4];
//-------------------------------------------------------------------------
// Nacteni GIFu
//-------------------------------------------------------------------------
picture=fopen(filename,"rb");
// Read size and alloc memory
fseek (picture, 6, SEEK_SET);
fread (mezi, 4, 1, picture);
gif_size=(mezi[0]+mezi[1]*256)*(mezi[2]+mezi[3]*256);
x_0=mezi[0];
x_1=mezi[1];
y_0=mezi[2];
y_1=mezi[3];
gif_picture=(char*)malloc( (gif_size*sizeof(gif_picture)) );
// Read and prepare palette
fseek (picture, 0x0d, SEEK_SET);
fread (gif_palette, 768, 1, picture);
for (x=0; x<=768; x++) gif_palette[x]>>=3;
// Read coded picture
fseek (picture, 0x317, SEEK_SET);
fread (gif_file, LENGHTGIF, 1, picture);
// Decode picture
RaW=0;
decoder (640);
fclose (picture);
//-------------------------------------------------------------------------
return (0);
}