1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
|
#include "../gd/gd.h"
#include "../machine.h"
void C2F(deallocategifimg)(im);
gdImagePtr **im;
{
gdImageDestroy(*im);
}
void C2F(readgifimg)(buf,imgptr,m,n,ncol)
char * buf;
gdImagePtr **imgptr;
int *m,*n,*ncol;
{
FILE *fd;
gdImagePtr *im;
fd=fopen(string1,"w")
if (fd == 0)
{
sciprint("Can't open file %s\n");
return;
}
im = gdImageCreateFromGif(fd);
*m = im->sx;
*n = im->sy;
*ncol = im->colorsTotal;
}
void C2F(readxbmimg)(buf,imgptr,m,n,ncol)
char * buf;
gdImagePtr **imgptr;
int *m,*n,*ncol;
{
FILE *fd;
gdImagePtr *im;
fd=fopen(string1,"w")
if (fd == 0)
{
sciprint("Can't open file %s\n");
return;
}
im = gdImageCreateFromXbm(fd);
*m = im->sx;
*n = im->sy;
*ncol = im->colorsTotal;
}
void C2F(getgifpixels)(imgptr,pixels)
gdImagePtr **imgptr;
unsigned char *pixels;
{
int i,m,n,x,y;
gdImagePtr *im;
im = *imgptr;
m = im->sx;
n = im->sy;
i =0;
for (y=0; (y<n); y++) {
for (x=0; (x<m); x++) {
pixels[i] = im->pixels[y][x];
i++;
}
}
}
void C2F(getgifcmap)(imgptr,cmap)
gdImagePtr **imgptr;
unsigned char *cmap;
{
int i,k, ncol;
unsigned char *c1;
gdImagePtr *im;
im = *imgptr;
ncol = im->colorsTotal;
k = 0;
for (i=0; (i<ncol); i++) {
cmap[k] = im->red[i];
cmap[ncol+k] = im->green[i];
cmap[2*ncol+k] = im->blue[i];
k++;
}
}
|
